mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-08-21 18:29:46 +00:00
We now match all of 403.gcc (as emitted by clang). :) git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@78750 91177308-0d34-0410-b5e6-96231b3b80d8
1546 lines
54 KiB
C++
1546 lines
54 KiB
C++
//===- AsmMatcherEmitter.cpp - Generate an assembly matcher ---------------===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
//
|
|
// This tablegen backend emits a target specifier matcher for converting parsed
|
|
// assembly operands in the MCInst structures.
|
|
//
|
|
// The input to the target specific matcher is a list of literal tokens and
|
|
// operands. The target specific parser should generally eliminate any syntax
|
|
// which is not relevant for matching; for example, comma tokens should have
|
|
// already been consumed and eliminated by the parser. Most instructions will
|
|
// end up with a single literal token (the instruction name) and some number of
|
|
// operands.
|
|
//
|
|
// Some example inputs, for X86:
|
|
// 'addl' (immediate ...) (register ...)
|
|
// 'add' (immediate ...) (memory ...)
|
|
// 'call' '*' %epc
|
|
//
|
|
// The assembly matcher is responsible for converting this input into a precise
|
|
// machine instruction (i.e., an instruction with a well defined encoding). This
|
|
// mapping has several properties which complicate matching:
|
|
//
|
|
// - It may be ambiguous; many architectures can legally encode particular
|
|
// variants of an instruction in different ways (for example, using a smaller
|
|
// encoding for small immediates). Such ambiguities should never be
|
|
// arbitrarily resolved by the assembler, the assembler is always responsible
|
|
// for choosing the "best" available instruction.
|
|
//
|
|
// - It may depend on the subtarget or the assembler context. Instructions
|
|
// which are invalid for the current mode, but otherwise unambiguous (e.g.,
|
|
// an SSE instruction in a file being assembled for i486) should be accepted
|
|
// and rejected by the assembler front end. However, if the proper encoding
|
|
// for an instruction is dependent on the assembler context then the matcher
|
|
// is responsible for selecting the correct machine instruction for the
|
|
// current mode.
|
|
//
|
|
// The core matching algorithm attempts to exploit the regularity in most
|
|
// instruction sets to quickly determine the set of possibly matching
|
|
// instructions, and the simplify the generated code. Additionally, this helps
|
|
// to ensure that the ambiguities are intentionally resolved by the user.
|
|
//
|
|
// The matching is divided into two distinct phases:
|
|
//
|
|
// 1. Classification: Each operand is mapped to the unique set which (a)
|
|
// contains it, and (b) is the largest such subset for which a single
|
|
// instruction could match all members.
|
|
//
|
|
// For register classes, we can generate these subgroups automatically. For
|
|
// arbitrary operands, we expect the user to define the classes and their
|
|
// relations to one another (for example, 8-bit signed immediates as a
|
|
// subset of 32-bit immediates).
|
|
//
|
|
// By partitioning the operands in this way, we guarantee that for any
|
|
// tuple of classes, any single instruction must match either all or none
|
|
// of the sets of operands which could classify to that tuple.
|
|
//
|
|
// In addition, the subset relation amongst classes induces a partial order
|
|
// on such tuples, which we use to resolve ambiguities.
|
|
//
|
|
// FIXME: What do we do if a crazy case shows up where this is the wrong
|
|
// resolution?
|
|
//
|
|
// 2. The input can now be treated as a tuple of classes (static tokens are
|
|
// simple singleton sets). Each such tuple should generally map to a single
|
|
// instruction (we currently ignore cases where this isn't true, whee!!!),
|
|
// which we can emit a simple matcher for.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "AsmMatcherEmitter.h"
|
|
#include "CodeGenTarget.h"
|
|
#include "Record.h"
|
|
#include "llvm/ADT/OwningPtr.h"
|
|
#include "llvm/ADT/SmallVector.h"
|
|
#include "llvm/ADT/STLExtras.h"
|
|
#include "llvm/ADT/StringExtras.h"
|
|
#include "llvm/Support/CommandLine.h"
|
|
#include "llvm/Support/Debug.h"
|
|
#include <list>
|
|
#include <map>
|
|
#include <set>
|
|
using namespace llvm;
|
|
|
|
static cl::opt<std::string>
|
|
MatchPrefix("match-prefix", cl::init(""),
|
|
cl::desc("Only match instructions with the given prefix"));
|
|
|
|
/// FlattenVariants - Flatten an .td file assembly string by selecting the
|
|
/// variant at index \arg N.
|
|
static std::string FlattenVariants(const std::string &AsmString,
|
|
unsigned N) {
|
|
StringRef Cur = AsmString;
|
|
std::string Res = "";
|
|
|
|
for (;;) {
|
|
// Find the start of the next variant string.
|
|
size_t VariantsStart = 0;
|
|
for (size_t e = Cur.size(); VariantsStart != e; ++VariantsStart)
|
|
if (Cur[VariantsStart] == '{' &&
|
|
(VariantsStart == 0 || (Cur[VariantsStart-1] != '$' &&
|
|
Cur[VariantsStart-1] != '\\')))
|
|
break;
|
|
|
|
// Add the prefix to the result.
|
|
Res += Cur.slice(0, VariantsStart);
|
|
if (VariantsStart == Cur.size())
|
|
break;
|
|
|
|
++VariantsStart; // Skip the '{'.
|
|
|
|
// Scan to the end of the variants string.
|
|
size_t VariantsEnd = VariantsStart;
|
|
unsigned NestedBraces = 1;
|
|
for (size_t e = Cur.size(); VariantsEnd != e; ++VariantsEnd) {
|
|
if (Cur[VariantsEnd] == '}' && Cur[VariantsEnd-1] != '\\') {
|
|
if (--NestedBraces == 0)
|
|
break;
|
|
} else if (Cur[VariantsEnd] == '{')
|
|
++NestedBraces;
|
|
}
|
|
|
|
// Select the Nth variant (or empty).
|
|
StringRef Selection = Cur.slice(VariantsStart, VariantsEnd);
|
|
for (unsigned i = 0; i != N; ++i)
|
|
Selection = Selection.split('|').second;
|
|
Res += Selection.split('|').first;
|
|
|
|
assert(VariantsEnd != Cur.size() &&
|
|
"Unterminated variants in assembly string!");
|
|
Cur = Cur.substr(VariantsEnd + 1);
|
|
}
|
|
|
|
return Res;
|
|
}
|
|
|
|
/// TokenizeAsmString - Tokenize a simplified assembly string.
|
|
static void TokenizeAsmString(const StringRef &AsmString,
|
|
SmallVectorImpl<StringRef> &Tokens) {
|
|
unsigned Prev = 0;
|
|
bool InTok = true;
|
|
for (unsigned i = 0, e = AsmString.size(); i != e; ++i) {
|
|
switch (AsmString[i]) {
|
|
case '[':
|
|
case ']':
|
|
case '*':
|
|
case '!':
|
|
case ' ':
|
|
case '\t':
|
|
case ',':
|
|
if (InTok) {
|
|
Tokens.push_back(AsmString.slice(Prev, i));
|
|
InTok = false;
|
|
}
|
|
if (!isspace(AsmString[i]) && AsmString[i] != ',')
|
|
Tokens.push_back(AsmString.substr(i, 1));
|
|
Prev = i + 1;
|
|
break;
|
|
|
|
case '\\':
|
|
if (InTok) {
|
|
Tokens.push_back(AsmString.slice(Prev, i));
|
|
InTok = false;
|
|
}
|
|
++i;
|
|
assert(i != AsmString.size() && "Invalid quoted character");
|
|
Tokens.push_back(AsmString.substr(i, 1));
|
|
Prev = i + 1;
|
|
break;
|
|
|
|
case '$': {
|
|
// If this isn't "${", treat like a normal token.
|
|
if (i + 1 == AsmString.size() || AsmString[i + 1] != '{') {
|
|
if (InTok) {
|
|
Tokens.push_back(AsmString.slice(Prev, i));
|
|
InTok = false;
|
|
}
|
|
Prev = i;
|
|
break;
|
|
}
|
|
|
|
if (InTok) {
|
|
Tokens.push_back(AsmString.slice(Prev, i));
|
|
InTok = false;
|
|
}
|
|
|
|
StringRef::iterator End =
|
|
std::find(AsmString.begin() + i, AsmString.end(), '}');
|
|
assert(End != AsmString.end() && "Missing brace in operand reference!");
|
|
size_t EndPos = End - AsmString.begin();
|
|
Tokens.push_back(AsmString.slice(i, EndPos+1));
|
|
Prev = EndPos + 1;
|
|
i = EndPos;
|
|
break;
|
|
}
|
|
|
|
default:
|
|
InTok = true;
|
|
}
|
|
}
|
|
if (InTok && Prev != AsmString.size())
|
|
Tokens.push_back(AsmString.substr(Prev));
|
|
}
|
|
|
|
static bool IsAssemblerInstruction(const StringRef &Name,
|
|
const CodeGenInstruction &CGI,
|
|
const SmallVectorImpl<StringRef> &Tokens) {
|
|
// Ignore "codegen only" instructions.
|
|
if (CGI.TheDef->getValueAsBit("isCodeGenOnly"))
|
|
return false;
|
|
|
|
// Ignore pseudo ops.
|
|
//
|
|
// FIXME: This is a hack; can we convert these instructions to set the
|
|
// "codegen only" bit instead?
|
|
if (const RecordVal *Form = CGI.TheDef->getValue("Form"))
|
|
if (Form->getValue()->getAsString() == "Pseudo")
|
|
return false;
|
|
|
|
// Ignore "Int_*" and "*_Int" instructions, which are internal aliases.
|
|
//
|
|
// FIXME: This is a total hack.
|
|
if (StringRef(Name).startswith("Int_") || StringRef(Name).endswith("_Int"))
|
|
return false;
|
|
|
|
// Ignore instructions with no .s string.
|
|
//
|
|
// FIXME: What are these?
|
|
if (CGI.AsmString.empty())
|
|
return false;
|
|
|
|
// FIXME: Hack; ignore any instructions with a newline in them.
|
|
if (std::find(CGI.AsmString.begin(),
|
|
CGI.AsmString.end(), '\n') != CGI.AsmString.end())
|
|
return false;
|
|
|
|
// Ignore instructions with attributes, these are always fake instructions for
|
|
// simplifying codegen.
|
|
//
|
|
// FIXME: Is this true?
|
|
//
|
|
// Also, check for instructions which reference the operand multiple times;
|
|
// this implies a constraint we would not honor.
|
|
std::set<std::string> OperandNames;
|
|
for (unsigned i = 1, e = Tokens.size(); i < e; ++i) {
|
|
if (Tokens[i][0] == '$' &&
|
|
std::find(Tokens[i].begin(),
|
|
Tokens[i].end(), ':') != Tokens[i].end()) {
|
|
DEBUG({
|
|
errs() << "warning: '" << Name << "': "
|
|
<< "ignoring instruction; operand with attribute '"
|
|
<< Tokens[i] << "'\n";
|
|
});
|
|
return false;
|
|
}
|
|
|
|
if (Tokens[i][0] == '$' && !OperandNames.insert(Tokens[i]).second) {
|
|
std::string Err = "'" + Name.str() + "': " +
|
|
"invalid assembler instruction; tied operand '" + Tokens[i].str() + "'";
|
|
throw TGError(CGI.TheDef->getLoc(), Err);
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
namespace {
|
|
|
|
/// ClassInfo - Helper class for storing the information about a particular
|
|
/// class of operands which can be matched.
|
|
struct ClassInfo {
|
|
enum ClassInfoKind {
|
|
/// Invalid kind, for use as a sentinel value.
|
|
Invalid = 0,
|
|
|
|
/// The class for a particular token.
|
|
Token,
|
|
|
|
/// The (first) register class, subsequent register classes are
|
|
/// RegisterClass0+1, and so on.
|
|
RegisterClass0,
|
|
|
|
/// The (first) user defined class, subsequent user defined classes are
|
|
/// UserClass0+1, and so on.
|
|
UserClass0 = 1<<16
|
|
};
|
|
|
|
/// Kind - The class kind, which is either a predefined kind, or (UserClass0 +
|
|
/// N) for the Nth user defined class.
|
|
unsigned Kind;
|
|
|
|
/// SuperClasses - The super classes of this class. Note that for simplicities
|
|
/// sake user operands only record their immediate super class, while register
|
|
/// operands include all superclasses.
|
|
std::vector<ClassInfo*> SuperClasses;
|
|
|
|
/// Name - The full class name, suitable for use in an enum.
|
|
std::string Name;
|
|
|
|
/// ClassName - The unadorned generic name for this class (e.g., Token).
|
|
std::string ClassName;
|
|
|
|
/// ValueName - The name of the value this class represents; for a token this
|
|
/// is the literal token string, for an operand it is the TableGen class (or
|
|
/// empty if this is a derived class).
|
|
std::string ValueName;
|
|
|
|
/// PredicateMethod - The name of the operand method to test whether the
|
|
/// operand matches this class; this is not valid for Token or register kinds.
|
|
std::string PredicateMethod;
|
|
|
|
/// RenderMethod - The name of the operand method to add this operand to an
|
|
/// MCInst; this is not valid for Token or register kinds.
|
|
std::string RenderMethod;
|
|
|
|
/// For register classes, the records for all the registers in this class.
|
|
std::set<Record*> Registers;
|
|
|
|
public:
|
|
/// isRegisterClass() - Check if this is a register class.
|
|
bool isRegisterClass() const {
|
|
return Kind >= RegisterClass0 && Kind < UserClass0;
|
|
}
|
|
|
|
/// isUserClass() - Check if this is a user defined class.
|
|
bool isUserClass() const {
|
|
return Kind >= UserClass0;
|
|
}
|
|
|
|
/// isRelatedTo - Check whether this class is "related" to \arg RHS. Classes
|
|
/// are related if they are in the same class hierarchy.
|
|
bool isRelatedTo(const ClassInfo &RHS) const {
|
|
// Tokens are only related to tokens.
|
|
if (Kind == Token || RHS.Kind == Token)
|
|
return Kind == Token && RHS.Kind == Token;
|
|
|
|
// Registers classes are only related to registers classes, and only if
|
|
// their intersection is non-empty.
|
|
if (isRegisterClass() || RHS.isRegisterClass()) {
|
|
if (!isRegisterClass() || !RHS.isRegisterClass())
|
|
return false;
|
|
|
|
std::set<Record*> Tmp;
|
|
std::insert_iterator< std::set<Record*> > II(Tmp, Tmp.begin());
|
|
std::set_intersection(Registers.begin(), Registers.end(),
|
|
RHS.Registers.begin(), RHS.Registers.end(),
|
|
II);
|
|
|
|
return !Tmp.empty();
|
|
}
|
|
|
|
// Otherwise we have two users operands; they are related if they are in the
|
|
// same class hierarchy.
|
|
//
|
|
// FIXME: This is an oversimplification, they should only be related if they
|
|
// intersect, however we don't have that information.
|
|
assert(isUserClass() && RHS.isUserClass() && "Unexpected class!");
|
|
const ClassInfo *Root = this;
|
|
while (!Root->SuperClasses.empty())
|
|
Root = Root->SuperClasses.front();
|
|
|
|
const ClassInfo *RHSRoot = &RHS;
|
|
while (!RHSRoot->SuperClasses.empty())
|
|
RHSRoot = RHSRoot->SuperClasses.front();
|
|
|
|
return Root == RHSRoot;
|
|
}
|
|
|
|
/// isSubsetOf - Test whether this class is a subset of \arg RHS;
|
|
bool isSubsetOf(const ClassInfo &RHS) const {
|
|
// This is a subset of RHS if it is the same class...
|
|
if (this == &RHS)
|
|
return true;
|
|
|
|
// ... or if any of its super classes are a subset of RHS.
|
|
for (std::vector<ClassInfo*>::const_iterator it = SuperClasses.begin(),
|
|
ie = SuperClasses.end(); it != ie; ++it)
|
|
if ((*it)->isSubsetOf(RHS))
|
|
return true;
|
|
|
|
return false;
|
|
}
|
|
|
|
/// operator< - Compare two classes.
|
|
bool operator<(const ClassInfo &RHS) const {
|
|
// Unrelated classes can be ordered by kind.
|
|
if (!isRelatedTo(RHS))
|
|
return Kind < RHS.Kind;
|
|
|
|
switch (Kind) {
|
|
case Invalid:
|
|
assert(0 && "Invalid kind!");
|
|
case Token:
|
|
// Tokens are comparable by value.
|
|
//
|
|
// FIXME: Compare by enum value.
|
|
return ValueName < RHS.ValueName;
|
|
|
|
default:
|
|
// This class preceeds the RHS if it is a proper subset of the RHS.
|
|
return this != &RHS && isSubsetOf(RHS);
|
|
}
|
|
}
|
|
};
|
|
|
|
/// InstructionInfo - Helper class for storing the necessary information for an
|
|
/// instruction which is capable of being matched.
|
|
struct InstructionInfo {
|
|
struct Operand {
|
|
/// The unique class instance this operand should match.
|
|
ClassInfo *Class;
|
|
|
|
/// The original operand this corresponds to, if any.
|
|
const CodeGenInstruction::OperandInfo *OperandInfo;
|
|
};
|
|
|
|
/// InstrName - The target name for this instruction.
|
|
std::string InstrName;
|
|
|
|
/// Instr - The instruction this matches.
|
|
const CodeGenInstruction *Instr;
|
|
|
|
/// AsmString - The assembly string for this instruction (with variants
|
|
/// removed).
|
|
std::string AsmString;
|
|
|
|
/// Tokens - The tokenized assembly pattern that this instruction matches.
|
|
SmallVector<StringRef, 4> Tokens;
|
|
|
|
/// Operands - The operands that this instruction matches.
|
|
SmallVector<Operand, 4> Operands;
|
|
|
|
/// ConversionFnKind - The enum value which is passed to the generated
|
|
/// ConvertToMCInst to convert parsed operands into an MCInst for this
|
|
/// function.
|
|
std::string ConversionFnKind;
|
|
|
|
/// operator< - Compare two instructions.
|
|
bool operator<(const InstructionInfo &RHS) const {
|
|
if (Operands.size() != RHS.Operands.size())
|
|
return Operands.size() < RHS.Operands.size();
|
|
|
|
// Compare lexicographically by operand. The matcher validates that other
|
|
// orderings wouldn't be ambiguous using \see CouldMatchAmiguouslyWith().
|
|
for (unsigned i = 0, e = Operands.size(); i != e; ++i) {
|
|
if (*Operands[i].Class < *RHS.Operands[i].Class)
|
|
return true;
|
|
if (*RHS.Operands[i].Class < *Operands[i].Class)
|
|
return false;
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
/// CouldMatchAmiguouslyWith - Check whether this instruction could
|
|
/// ambiguously match the same set of operands as \arg RHS (without being a
|
|
/// strictly superior match).
|
|
bool CouldMatchAmiguouslyWith(const InstructionInfo &RHS) {
|
|
// The number of operands is unambiguous.
|
|
if (Operands.size() != RHS.Operands.size())
|
|
return false;
|
|
|
|
// Tokens and operand kinds are unambiguous (assuming a correct target
|
|
// specific parser).
|
|
for (unsigned i = 0, e = Operands.size(); i != e; ++i)
|
|
if (Operands[i].Class->Kind != RHS.Operands[i].Class->Kind ||
|
|
Operands[i].Class->Kind == ClassInfo::Token)
|
|
if (*Operands[i].Class < *RHS.Operands[i].Class ||
|
|
*RHS.Operands[i].Class < *Operands[i].Class)
|
|
return false;
|
|
|
|
// Otherwise, this operand could commute if all operands are equivalent, or
|
|
// there is a pair of operands that compare less than and a pair that
|
|
// compare greater than.
|
|
bool HasLT = false, HasGT = false;
|
|
for (unsigned i = 0, e = Operands.size(); i != e; ++i) {
|
|
if (*Operands[i].Class < *RHS.Operands[i].Class)
|
|
HasLT = true;
|
|
if (*RHS.Operands[i].Class < *Operands[i].Class)
|
|
HasGT = true;
|
|
}
|
|
|
|
return !(HasLT ^ HasGT);
|
|
}
|
|
|
|
public:
|
|
void dump();
|
|
};
|
|
|
|
class AsmMatcherInfo {
|
|
public:
|
|
/// The tablegen AsmParser record.
|
|
Record *AsmParser;
|
|
|
|
/// The AsmParser "CommentDelimiter" value.
|
|
std::string CommentDelimiter;
|
|
|
|
/// The AsmParser "RegisterPrefix" value.
|
|
std::string RegisterPrefix;
|
|
|
|
/// The classes which are needed for matching.
|
|
std::vector<ClassInfo*> Classes;
|
|
|
|
/// The information on the instruction to match.
|
|
std::vector<InstructionInfo*> Instructions;
|
|
|
|
/// Map of Register records to their class information.
|
|
std::map<Record*, ClassInfo*> RegisterClasses;
|
|
|
|
private:
|
|
/// Map of token to class information which has already been constructed.
|
|
std::map<std::string, ClassInfo*> TokenClasses;
|
|
|
|
/// Map of RegisterClass records to their class information.
|
|
std::map<Record*, ClassInfo*> RegisterClassClasses;
|
|
|
|
/// Map of AsmOperandClass records to their class information.
|
|
std::map<Record*, ClassInfo*> AsmOperandClasses;
|
|
|
|
private:
|
|
/// getTokenClass - Lookup or create the class for the given token.
|
|
ClassInfo *getTokenClass(const StringRef &Token);
|
|
|
|
/// getOperandClass - Lookup or create the class for the given operand.
|
|
ClassInfo *getOperandClass(const StringRef &Token,
|
|
const CodeGenInstruction::OperandInfo &OI);
|
|
|
|
/// BuildRegisterClasses - Build the ClassInfo* instances for register
|
|
/// classes.
|
|
void BuildRegisterClasses(CodeGenTarget &Target,
|
|
std::set<std::string> &SingletonRegisterNames);
|
|
|
|
/// BuildOperandClasses - Build the ClassInfo* instances for user defined
|
|
/// operand classes.
|
|
void BuildOperandClasses(CodeGenTarget &Target);
|
|
|
|
public:
|
|
AsmMatcherInfo(Record *_AsmParser);
|
|
|
|
/// BuildInfo - Construct the various tables used during matching.
|
|
void BuildInfo(CodeGenTarget &Target);
|
|
};
|
|
|
|
}
|
|
|
|
void InstructionInfo::dump() {
|
|
errs() << InstrName << " -- " << "flattened:\"" << AsmString << '\"'
|
|
<< ", tokens:[";
|
|
for (unsigned i = 0, e = Tokens.size(); i != e; ++i) {
|
|
errs() << Tokens[i];
|
|
if (i + 1 != e)
|
|
errs() << ", ";
|
|
}
|
|
errs() << "]\n";
|
|
|
|
for (unsigned i = 0, e = Operands.size(); i != e; ++i) {
|
|
Operand &Op = Operands[i];
|
|
errs() << " op[" << i << "] = " << Op.Class->ClassName << " - ";
|
|
if (Op.Class->Kind == ClassInfo::Token) {
|
|
errs() << '\"' << Tokens[i] << "\"\n";
|
|
continue;
|
|
}
|
|
|
|
if (!Op.OperandInfo) {
|
|
errs() << "(singleton register)\n";
|
|
continue;
|
|
}
|
|
|
|
const CodeGenInstruction::OperandInfo &OI = *Op.OperandInfo;
|
|
errs() << OI.Name << " " << OI.Rec->getName()
|
|
<< " (" << OI.MIOperandNo << ", " << OI.MINumOperands << ")\n";
|
|
}
|
|
}
|
|
|
|
static std::string getEnumNameForToken(const StringRef &Str) {
|
|
std::string Res;
|
|
|
|
for (StringRef::iterator it = Str.begin(), ie = Str.end(); it != ie; ++it) {
|
|
switch (*it) {
|
|
case '*': Res += "_STAR_"; break;
|
|
case '%': Res += "_PCT_"; break;
|
|
case ':': Res += "_COLON_"; break;
|
|
|
|
default:
|
|
if (isalnum(*it)) {
|
|
Res += *it;
|
|
} else {
|
|
Res += "_" + utostr((unsigned) *it) + "_";
|
|
}
|
|
}
|
|
}
|
|
|
|
return Res;
|
|
}
|
|
|
|
/// getRegisterRecord - Get the register record for \arg name, or 0.
|
|
static Record *getRegisterRecord(CodeGenTarget &Target, const StringRef &Name) {
|
|
for (unsigned i = 0, e = Target.getRegisters().size(); i != e; ++i) {
|
|
const CodeGenRegister &Reg = Target.getRegisters()[i];
|
|
if (Name == Reg.TheDef->getValueAsString("AsmName"))
|
|
return Reg.TheDef;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
ClassInfo *AsmMatcherInfo::getTokenClass(const StringRef &Token) {
|
|
ClassInfo *&Entry = TokenClasses[Token];
|
|
|
|
if (!Entry) {
|
|
Entry = new ClassInfo();
|
|
Entry->Kind = ClassInfo::Token;
|
|
Entry->ClassName = "Token";
|
|
Entry->Name = "MCK_" + getEnumNameForToken(Token);
|
|
Entry->ValueName = Token;
|
|
Entry->PredicateMethod = "<invalid>";
|
|
Entry->RenderMethod = "<invalid>";
|
|
Classes.push_back(Entry);
|
|
}
|
|
|
|
return Entry;
|
|
}
|
|
|
|
ClassInfo *
|
|
AsmMatcherInfo::getOperandClass(const StringRef &Token,
|
|
const CodeGenInstruction::OperandInfo &OI) {
|
|
if (OI.Rec->isSubClassOf("RegisterClass")) {
|
|
ClassInfo *CI = RegisterClassClasses[OI.Rec];
|
|
|
|
if (!CI) {
|
|
PrintError(OI.Rec->getLoc(), "register class has no class info!");
|
|
throw std::string("ERROR: Missing register class!");
|
|
}
|
|
|
|
return CI;
|
|
}
|
|
|
|
assert(OI.Rec->isSubClassOf("Operand") && "Unexpected operand!");
|
|
Record *MatchClass = OI.Rec->getValueAsDef("ParserMatchClass");
|
|
ClassInfo *CI = AsmOperandClasses[MatchClass];
|
|
|
|
if (!CI) {
|
|
PrintError(OI.Rec->getLoc(), "operand has no match class!");
|
|
throw std::string("ERROR: Missing match class!");
|
|
}
|
|
|
|
return CI;
|
|
}
|
|
|
|
void AsmMatcherInfo::BuildRegisterClasses(CodeGenTarget &Target,
|
|
std::set<std::string>
|
|
&SingletonRegisterNames) {
|
|
std::vector<CodeGenRegisterClass> RegisterClasses;
|
|
std::vector<CodeGenRegister> Registers;
|
|
|
|
RegisterClasses = Target.getRegisterClasses();
|
|
Registers = Target.getRegisters();
|
|
|
|
// The register sets used for matching.
|
|
std::set< std::set<Record*> > RegisterSets;
|
|
|
|
// Gather the defined sets.
|
|
for (std::vector<CodeGenRegisterClass>::iterator it = RegisterClasses.begin(),
|
|
ie = RegisterClasses.end(); it != ie; ++it)
|
|
RegisterSets.insert(std::set<Record*>(it->Elements.begin(),
|
|
it->Elements.end()));
|
|
|
|
// Add any required singleton sets.
|
|
for (std::set<std::string>::iterator it = SingletonRegisterNames.begin(),
|
|
ie = SingletonRegisterNames.end(); it != ie; ++it)
|
|
if (Record *Rec = getRegisterRecord(Target, *it))
|
|
RegisterSets.insert(std::set<Record*>(&Rec, &Rec + 1));
|
|
|
|
// Introduce derived sets where necessary (when a register does not determine
|
|
// a unique register set class), and build the mapping of registers to the set
|
|
// they should classify to.
|
|
std::map<Record*, std::set<Record*> > RegisterMap;
|
|
for (std::vector<CodeGenRegister>::iterator it = Registers.begin(),
|
|
ie = Registers.end(); it != ie; ++it) {
|
|
CodeGenRegister &CGR = *it;
|
|
// Compute the intersection of all sets containing this register.
|
|
std::set<Record*> ContainingSet;
|
|
|
|
for (std::set< std::set<Record*> >::iterator it = RegisterSets.begin(),
|
|
ie = RegisterSets.end(); it != ie; ++it) {
|
|
if (!it->count(CGR.TheDef))
|
|
continue;
|
|
|
|
if (ContainingSet.empty()) {
|
|
ContainingSet = *it;
|
|
} else {
|
|
std::set<Record*> Tmp;
|
|
std::swap(Tmp, ContainingSet);
|
|
std::insert_iterator< std::set<Record*> > II(ContainingSet,
|
|
ContainingSet.begin());
|
|
std::set_intersection(Tmp.begin(), Tmp.end(), it->begin(), it->end(),
|
|
II);
|
|
}
|
|
}
|
|
|
|
if (!ContainingSet.empty()) {
|
|
RegisterSets.insert(ContainingSet);
|
|
RegisterMap.insert(std::make_pair(CGR.TheDef, ContainingSet));
|
|
}
|
|
}
|
|
|
|
// Construct the register classes.
|
|
std::map<std::set<Record*>, ClassInfo*> RegisterSetClasses;
|
|
unsigned Index = 0;
|
|
for (std::set< std::set<Record*> >::iterator it = RegisterSets.begin(),
|
|
ie = RegisterSets.end(); it != ie; ++it, ++Index) {
|
|
ClassInfo *CI = new ClassInfo();
|
|
CI->Kind = ClassInfo::RegisterClass0 + Index;
|
|
CI->ClassName = "Reg" + utostr(Index);
|
|
CI->Name = "MCK_Reg" + utostr(Index);
|
|
CI->ValueName = "";
|
|
CI->PredicateMethod = ""; // unused
|
|
CI->RenderMethod = "addRegOperands";
|
|
CI->Registers = *it;
|
|
Classes.push_back(CI);
|
|
RegisterSetClasses.insert(std::make_pair(*it, CI));
|
|
}
|
|
|
|
// Find the superclasses; we could compute only the subgroup lattice edges,
|
|
// but there isn't really a point.
|
|
for (std::set< std::set<Record*> >::iterator it = RegisterSets.begin(),
|
|
ie = RegisterSets.end(); it != ie; ++it) {
|
|
ClassInfo *CI = RegisterSetClasses[*it];
|
|
for (std::set< std::set<Record*> >::iterator it2 = RegisterSets.begin(),
|
|
ie2 = RegisterSets.end(); it2 != ie2; ++it2)
|
|
if (*it != *it2 &&
|
|
std::includes(it2->begin(), it2->end(), it->begin(), it->end()))
|
|
CI->SuperClasses.push_back(RegisterSetClasses[*it2]);
|
|
}
|
|
|
|
// Name the register classes which correspond to a user defined RegisterClass.
|
|
for (std::vector<CodeGenRegisterClass>::iterator it = RegisterClasses.begin(),
|
|
ie = RegisterClasses.end(); it != ie; ++it) {
|
|
ClassInfo *CI = RegisterSetClasses[std::set<Record*>(it->Elements.begin(),
|
|
it->Elements.end())];
|
|
if (CI->ValueName.empty()) {
|
|
CI->ClassName = it->getName();
|
|
CI->Name = "MCK_" + it->getName();
|
|
CI->ValueName = it->getName();
|
|
} else
|
|
CI->ValueName = CI->ValueName + "," + it->getName();
|
|
|
|
RegisterClassClasses.insert(std::make_pair(it->TheDef, CI));
|
|
}
|
|
|
|
// Populate the map for individual registers.
|
|
for (std::map<Record*, std::set<Record*> >::iterator it = RegisterMap.begin(),
|
|
ie = RegisterMap.end(); it != ie; ++it)
|
|
this->RegisterClasses[it->first] = RegisterSetClasses[it->second];
|
|
|
|
// Name the register classes which correspond to singleton registers.
|
|
for (std::set<std::string>::iterator it = SingletonRegisterNames.begin(),
|
|
ie = SingletonRegisterNames.end(); it != ie; ++it) {
|
|
if (Record *Rec = getRegisterRecord(Target, *it)) {
|
|
ClassInfo *CI = this->RegisterClasses[Rec];
|
|
assert(CI && "Missing singleton register class info!");
|
|
|
|
if (CI->ValueName.empty()) {
|
|
CI->ClassName = Rec->getName();
|
|
CI->Name = "MCK_" + Rec->getName();
|
|
CI->ValueName = Rec->getName();
|
|
} else
|
|
CI->ValueName = CI->ValueName + "," + Rec->getName();
|
|
}
|
|
}
|
|
}
|
|
|
|
void AsmMatcherInfo::BuildOperandClasses(CodeGenTarget &Target) {
|
|
std::vector<Record*> AsmOperands;
|
|
AsmOperands = Records.getAllDerivedDefinitions("AsmOperandClass");
|
|
unsigned Index = 0;
|
|
for (std::vector<Record*>::iterator it = AsmOperands.begin(),
|
|
ie = AsmOperands.end(); it != ie; ++it, ++Index) {
|
|
ClassInfo *CI = new ClassInfo();
|
|
CI->Kind = ClassInfo::UserClass0 + Index;
|
|
|
|
Init *Super = (*it)->getValueInit("SuperClass");
|
|
if (DefInit *DI = dynamic_cast<DefInit*>(Super)) {
|
|
ClassInfo *SC = AsmOperandClasses[DI->getDef()];
|
|
if (!SC)
|
|
PrintError((*it)->getLoc(), "Invalid super class reference!");
|
|
else
|
|
CI->SuperClasses.push_back(SC);
|
|
} else {
|
|
assert(dynamic_cast<UnsetInit*>(Super) && "Unexpected SuperClass field!");
|
|
}
|
|
CI->ClassName = (*it)->getValueAsString("Name");
|
|
CI->Name = "MCK_" + CI->ClassName;
|
|
CI->ValueName = (*it)->getName();
|
|
|
|
// Get or construct the predicate method name.
|
|
Init *PMName = (*it)->getValueInit("PredicateMethod");
|
|
if (StringInit *SI = dynamic_cast<StringInit*>(PMName)) {
|
|
CI->PredicateMethod = SI->getValue();
|
|
} else {
|
|
assert(dynamic_cast<UnsetInit*>(PMName) &&
|
|
"Unexpected PredicateMethod field!");
|
|
CI->PredicateMethod = "is" + CI->ClassName;
|
|
}
|
|
|
|
// Get or construct the render method name.
|
|
Init *RMName = (*it)->getValueInit("RenderMethod");
|
|
if (StringInit *SI = dynamic_cast<StringInit*>(RMName)) {
|
|
CI->RenderMethod = SI->getValue();
|
|
} else {
|
|
assert(dynamic_cast<UnsetInit*>(RMName) &&
|
|
"Unexpected RenderMethod field!");
|
|
CI->RenderMethod = "add" + CI->ClassName + "Operands";
|
|
}
|
|
|
|
AsmOperandClasses[*it] = CI;
|
|
Classes.push_back(CI);
|
|
}
|
|
}
|
|
|
|
AsmMatcherInfo::AsmMatcherInfo(Record *_AsmParser)
|
|
: AsmParser(_AsmParser),
|
|
CommentDelimiter(AsmParser->getValueAsString("CommentDelimiter")),
|
|
RegisterPrefix(AsmParser->getValueAsString("RegisterPrefix"))
|
|
{
|
|
}
|
|
|
|
void AsmMatcherInfo::BuildInfo(CodeGenTarget &Target) {
|
|
// Parse the instructions; we need to do this first so that we can gather the
|
|
// singleton register classes.
|
|
std::set<std::string> SingletonRegisterNames;
|
|
for (std::map<std::string, CodeGenInstruction>::const_iterator
|
|
it = Target.getInstructions().begin(),
|
|
ie = Target.getInstructions().end();
|
|
it != ie; ++it) {
|
|
const CodeGenInstruction &CGI = it->second;
|
|
|
|
if (!StringRef(it->first).startswith(MatchPrefix))
|
|
continue;
|
|
|
|
OwningPtr<InstructionInfo> II(new InstructionInfo);
|
|
|
|
II->InstrName = it->first;
|
|
II->Instr = &it->second;
|
|
II->AsmString = FlattenVariants(CGI.AsmString, 0);
|
|
|
|
// Remove comments from the asm string.
|
|
if (!CommentDelimiter.empty()) {
|
|
size_t Idx = StringRef(II->AsmString).find(CommentDelimiter);
|
|
if (Idx != StringRef::npos)
|
|
II->AsmString = II->AsmString.substr(0, Idx);
|
|
}
|
|
|
|
TokenizeAsmString(II->AsmString, II->Tokens);
|
|
|
|
// Ignore instructions which shouldn't be matched.
|
|
if (!IsAssemblerInstruction(it->first, CGI, II->Tokens))
|
|
continue;
|
|
|
|
// Collect singleton registers, if used.
|
|
if (!RegisterPrefix.empty()) {
|
|
for (unsigned i = 0, e = II->Tokens.size(); i != e; ++i) {
|
|
if (II->Tokens[i].startswith(RegisterPrefix)) {
|
|
StringRef RegName = II->Tokens[i].substr(RegisterPrefix.size());
|
|
Record *Rec = getRegisterRecord(Target, RegName);
|
|
|
|
if (!Rec) {
|
|
std::string Err = "unable to find register for '" + RegName.str() +
|
|
"' (which matches register prefix)";
|
|
throw TGError(CGI.TheDef->getLoc(), Err);
|
|
}
|
|
|
|
SingletonRegisterNames.insert(RegName);
|
|
}
|
|
}
|
|
}
|
|
|
|
Instructions.push_back(II.take());
|
|
}
|
|
|
|
// Build info for the register classes.
|
|
BuildRegisterClasses(Target, SingletonRegisterNames);
|
|
|
|
// Build info for the user defined assembly operand classes.
|
|
BuildOperandClasses(Target);
|
|
|
|
// Build the instruction information.
|
|
for (std::vector<InstructionInfo*>::iterator it = Instructions.begin(),
|
|
ie = Instructions.end(); it != ie; ++it) {
|
|
InstructionInfo *II = *it;
|
|
|
|
for (unsigned i = 0, e = II->Tokens.size(); i != e; ++i) {
|
|
StringRef Token = II->Tokens[i];
|
|
|
|
// Check for singleton registers.
|
|
if (!RegisterPrefix.empty() && Token.startswith(RegisterPrefix)) {
|
|
StringRef RegName = II->Tokens[i].substr(RegisterPrefix.size());
|
|
InstructionInfo::Operand Op;
|
|
Op.Class = RegisterClasses[getRegisterRecord(Target, RegName)];
|
|
Op.OperandInfo = 0;
|
|
assert(Op.Class && Op.Class->Registers.size() == 1 &&
|
|
"Unexpected class for singleton register");
|
|
II->Operands.push_back(Op);
|
|
continue;
|
|
}
|
|
|
|
// Check for simple tokens.
|
|
if (Token[0] != '$') {
|
|
InstructionInfo::Operand Op;
|
|
Op.Class = getTokenClass(Token);
|
|
Op.OperandInfo = 0;
|
|
II->Operands.push_back(Op);
|
|
continue;
|
|
}
|
|
|
|
// Otherwise this is an operand reference.
|
|
StringRef OperandName;
|
|
if (Token[1] == '{')
|
|
OperandName = Token.substr(2, Token.size() - 3);
|
|
else
|
|
OperandName = Token.substr(1);
|
|
|
|
// Map this token to an operand. FIXME: Move elsewhere.
|
|
unsigned Idx;
|
|
try {
|
|
Idx = II->Instr->getOperandNamed(OperandName);
|
|
} catch(...) {
|
|
throw std::string("error: unable to find operand: '" +
|
|
OperandName.str() + "'");
|
|
}
|
|
|
|
const CodeGenInstruction::OperandInfo &OI = II->Instr->OperandList[Idx];
|
|
InstructionInfo::Operand Op;
|
|
Op.Class = getOperandClass(Token, OI);
|
|
Op.OperandInfo = &OI;
|
|
II->Operands.push_back(Op);
|
|
}
|
|
}
|
|
|
|
// Reorder classes so that classes preceed super classes.
|
|
std::sort(Classes.begin(), Classes.end(), less_ptr<ClassInfo>());
|
|
}
|
|
|
|
static void EmitConvertToMCInst(CodeGenTarget &Target,
|
|
std::vector<InstructionInfo*> &Infos,
|
|
raw_ostream &OS) {
|
|
// Write the convert function to a separate stream, so we can drop it after
|
|
// the enum.
|
|
std::string ConvertFnBody;
|
|
raw_string_ostream CvtOS(ConvertFnBody);
|
|
|
|
// Function we have already generated.
|
|
std::set<std::string> GeneratedFns;
|
|
|
|
// Start the unified conversion function.
|
|
|
|
CvtOS << "static bool ConvertToMCInst(ConversionKind Kind, MCInst &Inst, "
|
|
<< "unsigned Opcode,\n"
|
|
<< " SmallVectorImpl<"
|
|
<< Target.getName() << "Operand> &Operands) {\n";
|
|
CvtOS << " Inst.setOpcode(Opcode);\n";
|
|
CvtOS << " switch (Kind) {\n";
|
|
CvtOS << " default:\n";
|
|
|
|
// Start the enum, which we will generate inline.
|
|
|
|
OS << "// Unified function for converting operants to MCInst instances.\n\n";
|
|
OS << "enum ConversionKind {\n";
|
|
|
|
for (std::vector<InstructionInfo*>::const_iterator it = Infos.begin(),
|
|
ie = Infos.end(); it != ie; ++it) {
|
|
InstructionInfo &II = **it;
|
|
|
|
// Order the (class) operands by the order to convert them into an MCInst.
|
|
SmallVector<std::pair<unsigned, unsigned>, 4> MIOperandList;
|
|
for (unsigned i = 0, e = II.Operands.size(); i != e; ++i) {
|
|
InstructionInfo::Operand &Op = II.Operands[i];
|
|
if (Op.OperandInfo)
|
|
MIOperandList.push_back(std::make_pair(Op.OperandInfo->MIOperandNo, i));
|
|
}
|
|
std::sort(MIOperandList.begin(), MIOperandList.end());
|
|
|
|
// Compute the total number of operands.
|
|
unsigned NumMIOperands = 0;
|
|
for (unsigned i = 0, e = II.Instr->OperandList.size(); i != e; ++i) {
|
|
const CodeGenInstruction::OperandInfo &OI = II.Instr->OperandList[i];
|
|
NumMIOperands = std::max(NumMIOperands,
|
|
OI.MIOperandNo + OI.MINumOperands);
|
|
}
|
|
|
|
// Build the conversion function signature.
|
|
std::string Signature = "Convert";
|
|
unsigned CurIndex = 0;
|
|
for (unsigned i = 0, e = MIOperandList.size(); i != e; ++i) {
|
|
InstructionInfo::Operand &Op = II.Operands[MIOperandList[i].second];
|
|
assert(CurIndex <= Op.OperandInfo->MIOperandNo &&
|
|
"Duplicate match for instruction operand!");
|
|
|
|
Signature += "_";
|
|
|
|
// Skip operands which weren't matched by anything, this occurs when the
|
|
// .td file encodes "implicit" operands as explicit ones.
|
|
//
|
|
// FIXME: This should be removed from the MCInst structure.
|
|
for (; CurIndex != Op.OperandInfo->MIOperandNo; ++CurIndex)
|
|
Signature += "Imp";
|
|
|
|
// Registers are always converted the same, don't duplicate the conversion
|
|
// function based on them.
|
|
//
|
|
// FIXME: We could generalize this based on the render method, if it
|
|
// mattered.
|
|
if (Op.Class->isRegisterClass())
|
|
Signature += "Reg";
|
|
else
|
|
Signature += Op.Class->ClassName;
|
|
Signature += utostr(Op.OperandInfo->MINumOperands);
|
|
Signature += "_" + utostr(MIOperandList[i].second);
|
|
|
|
CurIndex += Op.OperandInfo->MINumOperands;
|
|
}
|
|
|
|
// Add any trailing implicit operands.
|
|
for (; CurIndex != NumMIOperands; ++CurIndex)
|
|
Signature += "Imp";
|
|
|
|
II.ConversionFnKind = Signature;
|
|
|
|
// Check if we have already generated this signature.
|
|
if (!GeneratedFns.insert(Signature).second)
|
|
continue;
|
|
|
|
// If not, emit it now.
|
|
|
|
// Add to the enum list.
|
|
OS << " " << Signature << ",\n";
|
|
|
|
// And to the convert function.
|
|
CvtOS << " case " << Signature << ":\n";
|
|
CurIndex = 0;
|
|
for (unsigned i = 0, e = MIOperandList.size(); i != e; ++i) {
|
|
InstructionInfo::Operand &Op = II.Operands[MIOperandList[i].second];
|
|
|
|
// Add the implicit operands.
|
|
for (; CurIndex != Op.OperandInfo->MIOperandNo; ++CurIndex)
|
|
CvtOS << " Inst.addOperand(MCOperand::CreateReg(0));\n";
|
|
|
|
CvtOS << " Operands[" << MIOperandList[i].second
|
|
<< "]." << Op.Class->RenderMethod
|
|
<< "(Inst, " << Op.OperandInfo->MINumOperands << ");\n";
|
|
CurIndex += Op.OperandInfo->MINumOperands;
|
|
}
|
|
|
|
// And add trailing implicit operands.
|
|
for (; CurIndex != NumMIOperands; ++CurIndex)
|
|
CvtOS << " Inst.addOperand(MCOperand::CreateReg(0));\n";
|
|
CvtOS << " break;\n";
|
|
}
|
|
|
|
// Finish the convert function.
|
|
|
|
CvtOS << " }\n";
|
|
CvtOS << " return false;\n";
|
|
CvtOS << "}\n\n";
|
|
|
|
// Finish the enum, and drop the convert function after it.
|
|
|
|
OS << " NumConversionVariants\n";
|
|
OS << "};\n\n";
|
|
|
|
OS << CvtOS.str();
|
|
}
|
|
|
|
/// EmitMatchClassEnumeration - Emit the enumeration for match class kinds.
|
|
static void EmitMatchClassEnumeration(CodeGenTarget &Target,
|
|
std::vector<ClassInfo*> &Infos,
|
|
raw_ostream &OS) {
|
|
OS << "namespace {\n\n";
|
|
|
|
OS << "/// MatchClassKind - The kinds of classes which participate in\n"
|
|
<< "/// instruction matching.\n";
|
|
OS << "enum MatchClassKind {\n";
|
|
OS << " InvalidMatchClass = 0,\n";
|
|
for (std::vector<ClassInfo*>::iterator it = Infos.begin(),
|
|
ie = Infos.end(); it != ie; ++it) {
|
|
ClassInfo &CI = **it;
|
|
OS << " " << CI.Name << ", // ";
|
|
if (CI.Kind == ClassInfo::Token) {
|
|
OS << "'" << CI.ValueName << "'\n";
|
|
} else if (CI.isRegisterClass()) {
|
|
if (!CI.ValueName.empty())
|
|
OS << "register class '" << CI.ValueName << "'\n";
|
|
else
|
|
OS << "derived register class\n";
|
|
} else {
|
|
OS << "user defined class '" << CI.ValueName << "'\n";
|
|
}
|
|
}
|
|
OS << " NumMatchClassKinds\n";
|
|
OS << "};\n\n";
|
|
|
|
OS << "}\n\n";
|
|
}
|
|
|
|
/// EmitClassifyOperand - Emit the function to classify an operand.
|
|
static void EmitClassifyOperand(CodeGenTarget &Target,
|
|
AsmMatcherInfo &Info,
|
|
raw_ostream &OS) {
|
|
OS << "static MatchClassKind ClassifyOperand("
|
|
<< Target.getName() << "Operand &Operand) {\n";
|
|
|
|
// Classify tokens.
|
|
OS << " if (Operand.isToken())\n";
|
|
OS << " return MatchTokenString(Operand.getToken());\n\n";
|
|
|
|
// Classify registers.
|
|
//
|
|
// FIXME: Don't hardcode isReg, getReg.
|
|
OS << " if (Operand.isReg()) {\n";
|
|
OS << " switch (Operand.getReg()) {\n";
|
|
OS << " default: return InvalidMatchClass;\n";
|
|
for (std::map<Record*, ClassInfo*>::iterator
|
|
it = Info.RegisterClasses.begin(), ie = Info.RegisterClasses.end();
|
|
it != ie; ++it)
|
|
OS << " case " << Target.getName() << "::"
|
|
<< it->first->getName() << ": return " << it->second->Name << ";\n";
|
|
OS << " }\n";
|
|
OS << " }\n\n";
|
|
|
|
// Classify user defined operands.
|
|
for (std::vector<ClassInfo*>::iterator it = Info.Classes.begin(),
|
|
ie = Info.Classes.end(); it != ie; ++it) {
|
|
ClassInfo &CI = **it;
|
|
|
|
if (!CI.isUserClass())
|
|
continue;
|
|
|
|
OS << " // '" << CI.ClassName << "' class";
|
|
if (!CI.SuperClasses.empty()) {
|
|
OS << ", subclass of ";
|
|
for (unsigned i = 0, e = CI.SuperClasses.size(); i != e; ++i) {
|
|
if (i) OS << ", ";
|
|
OS << "'" << CI.SuperClasses[i]->ClassName << "'";
|
|
assert(CI < *CI.SuperClasses[i] && "Invalid class relation!");
|
|
}
|
|
}
|
|
OS << "\n";
|
|
|
|
OS << " if (Operand." << CI.PredicateMethod << "()) {\n";
|
|
|
|
// Validate subclass relationships.
|
|
if (!CI.SuperClasses.empty()) {
|
|
for (unsigned i = 0, e = CI.SuperClasses.size(); i != e; ++i)
|
|
OS << " assert(Operand." << CI.SuperClasses[i]->PredicateMethod
|
|
<< "() && \"Invalid class relationship!\");\n";
|
|
}
|
|
|
|
OS << " return " << CI.Name << ";\n";
|
|
OS << " }\n\n";
|
|
}
|
|
OS << " return InvalidMatchClass;\n";
|
|
OS << "}\n\n";
|
|
}
|
|
|
|
/// EmitIsSubclass - Emit the subclass predicate function.
|
|
static void EmitIsSubclass(CodeGenTarget &Target,
|
|
std::vector<ClassInfo*> &Infos,
|
|
raw_ostream &OS) {
|
|
OS << "/// IsSubclass - Compute whether \\arg A is a subclass of \\arg B.\n";
|
|
OS << "static bool IsSubclass(MatchClassKind A, MatchClassKind B) {\n";
|
|
OS << " if (A == B)\n";
|
|
OS << " return true;\n\n";
|
|
|
|
OS << " switch (A) {\n";
|
|
OS << " default:\n";
|
|
OS << " return false;\n";
|
|
for (std::vector<ClassInfo*>::iterator it = Infos.begin(),
|
|
ie = Infos.end(); it != ie; ++it) {
|
|
ClassInfo &A = **it;
|
|
|
|
if (A.Kind != ClassInfo::Token) {
|
|
std::vector<StringRef> SuperClasses;
|
|
for (std::vector<ClassInfo*>::iterator it = Infos.begin(),
|
|
ie = Infos.end(); it != ie; ++it) {
|
|
ClassInfo &B = **it;
|
|
|
|
if (&A != &B && A.isSubsetOf(B))
|
|
SuperClasses.push_back(B.Name);
|
|
}
|
|
|
|
if (SuperClasses.empty())
|
|
continue;
|
|
|
|
OS << "\n case " << A.Name << ":\n";
|
|
|
|
if (SuperClasses.size() == 1) {
|
|
OS << " return B == " << SuperClasses.back() << ";\n";
|
|
continue;
|
|
}
|
|
|
|
OS << " switch (B) {\n";
|
|
OS << " default: return false;\n";
|
|
for (unsigned i = 0, e = SuperClasses.size(); i != e; ++i)
|
|
OS << " case " << SuperClasses[i] << ": return true;\n";
|
|
OS << " }\n";
|
|
}
|
|
}
|
|
OS << " }\n";
|
|
OS << "}\n\n";
|
|
}
|
|
|
|
typedef std::pair<std::string, std::string> StringPair;
|
|
|
|
/// FindFirstNonCommonLetter - Find the first character in the keys of the
|
|
/// string pairs that is not shared across the whole set of strings. All
|
|
/// strings are assumed to have the same length.
|
|
static unsigned
|
|
FindFirstNonCommonLetter(const std::vector<const StringPair*> &Matches) {
|
|
assert(!Matches.empty());
|
|
for (unsigned i = 0, e = Matches[0]->first.size(); i != e; ++i) {
|
|
// Check to see if letter i is the same across the set.
|
|
char Letter = Matches[0]->first[i];
|
|
|
|
for (unsigned str = 0, e = Matches.size(); str != e; ++str)
|
|
if (Matches[str]->first[i] != Letter)
|
|
return i;
|
|
}
|
|
|
|
return Matches[0]->first.size();
|
|
}
|
|
|
|
/// EmitStringMatcherForChar - Given a set of strings that are known to be the
|
|
/// same length and whose characters leading up to CharNo are the same, emit
|
|
/// code to verify that CharNo and later are the same.
|
|
///
|
|
/// \return - True if control can leave the emitted code fragment.
|
|
static bool EmitStringMatcherForChar(const std::string &StrVariableName,
|
|
const std::vector<const StringPair*> &Matches,
|
|
unsigned CharNo, unsigned IndentCount,
|
|
raw_ostream &OS) {
|
|
assert(!Matches.empty() && "Must have at least one string to match!");
|
|
std::string Indent(IndentCount*2+4, ' ');
|
|
|
|
// If we have verified that the entire string matches, we're done: output the
|
|
// matching code.
|
|
if (CharNo == Matches[0]->first.size()) {
|
|
assert(Matches.size() == 1 && "Had duplicate keys to match on");
|
|
|
|
// FIXME: If Matches[0].first has embeded \n, this will be bad.
|
|
OS << Indent << Matches[0]->second << "\t // \"" << Matches[0]->first
|
|
<< "\"\n";
|
|
return false;
|
|
}
|
|
|
|
// Bucket the matches by the character we are comparing.
|
|
std::map<char, std::vector<const StringPair*> > MatchesByLetter;
|
|
|
|
for (unsigned i = 0, e = Matches.size(); i != e; ++i)
|
|
MatchesByLetter[Matches[i]->first[CharNo]].push_back(Matches[i]);
|
|
|
|
|
|
// If we have exactly one bucket to match, see how many characters are common
|
|
// across the whole set and match all of them at once.
|
|
if (MatchesByLetter.size() == 1) {
|
|
unsigned FirstNonCommonLetter = FindFirstNonCommonLetter(Matches);
|
|
unsigned NumChars = FirstNonCommonLetter-CharNo;
|
|
|
|
// Emit code to break out if the prefix doesn't match.
|
|
if (NumChars == 1) {
|
|
// Do the comparison with if (Str[1] != 'f')
|
|
// FIXME: Need to escape general characters.
|
|
OS << Indent << "if (" << StrVariableName << "[" << CharNo << "] != '"
|
|
<< Matches[0]->first[CharNo] << "')\n";
|
|
OS << Indent << " break;\n";
|
|
} else {
|
|
// Do the comparison with if (Str.substr(1,3) != "foo").
|
|
// FIXME: Need to escape general strings.
|
|
OS << Indent << "if (" << StrVariableName << ".substr(" << CharNo << ","
|
|
<< NumChars << ") != \"";
|
|
OS << Matches[0]->first.substr(CharNo, NumChars) << "\")\n";
|
|
OS << Indent << " break;\n";
|
|
}
|
|
|
|
return EmitStringMatcherForChar(StrVariableName, Matches,
|
|
FirstNonCommonLetter, IndentCount, OS);
|
|
}
|
|
|
|
// Otherwise, we have multiple possible things, emit a switch on the
|
|
// character.
|
|
OS << Indent << "switch (" << StrVariableName << "[" << CharNo << "]) {\n";
|
|
OS << Indent << "default: break;\n";
|
|
|
|
for (std::map<char, std::vector<const StringPair*> >::iterator LI =
|
|
MatchesByLetter.begin(), E = MatchesByLetter.end(); LI != E; ++LI) {
|
|
// TODO: escape hard stuff (like \n) if we ever care about it.
|
|
OS << Indent << "case '" << LI->first << "':\t // "
|
|
<< LI->second.size() << " strings to match.\n";
|
|
if (EmitStringMatcherForChar(StrVariableName, LI->second, CharNo+1,
|
|
IndentCount+1, OS))
|
|
OS << Indent << " break;\n";
|
|
}
|
|
|
|
OS << Indent << "}\n";
|
|
return true;
|
|
}
|
|
|
|
|
|
/// EmitStringMatcher - Given a list of strings and code to execute when they
|
|
/// match, output a simple switch tree to classify the input string.
|
|
///
|
|
/// If a match is found, the code in Vals[i].second is executed; control must
|
|
/// not exit this code fragment. If nothing matches, execution falls through.
|
|
///
|
|
/// \param StrVariableName - The name of the variable to test.
|
|
static void EmitStringMatcher(const std::string &StrVariableName,
|
|
const std::vector<StringPair> &Matches,
|
|
raw_ostream &OS) {
|
|
// First level categorization: group strings by length.
|
|
std::map<unsigned, std::vector<const StringPair*> > MatchesByLength;
|
|
|
|
for (unsigned i = 0, e = Matches.size(); i != e; ++i)
|
|
MatchesByLength[Matches[i].first.size()].push_back(&Matches[i]);
|
|
|
|
// Output a switch statement on length and categorize the elements within each
|
|
// bin.
|
|
OS << " switch (" << StrVariableName << ".size()) {\n";
|
|
OS << " default: break;\n";
|
|
|
|
for (std::map<unsigned, std::vector<const StringPair*> >::iterator LI =
|
|
MatchesByLength.begin(), E = MatchesByLength.end(); LI != E; ++LI) {
|
|
OS << " case " << LI->first << ":\t // " << LI->second.size()
|
|
<< " strings to match.\n";
|
|
if (EmitStringMatcherForChar(StrVariableName, LI->second, 0, 0, OS))
|
|
OS << " break;\n";
|
|
}
|
|
|
|
OS << " }\n";
|
|
}
|
|
|
|
|
|
/// EmitMatchTokenString - Emit the function to match a token string to the
|
|
/// appropriate match class value.
|
|
static void EmitMatchTokenString(CodeGenTarget &Target,
|
|
std::vector<ClassInfo*> &Infos,
|
|
raw_ostream &OS) {
|
|
// Construct the match list.
|
|
std::vector<StringPair> Matches;
|
|
for (std::vector<ClassInfo*>::iterator it = Infos.begin(),
|
|
ie = Infos.end(); it != ie; ++it) {
|
|
ClassInfo &CI = **it;
|
|
|
|
if (CI.Kind == ClassInfo::Token)
|
|
Matches.push_back(StringPair(CI.ValueName, "return " + CI.Name + ";"));
|
|
}
|
|
|
|
OS << "static MatchClassKind MatchTokenString(const StringRef &Name) {\n";
|
|
|
|
EmitStringMatcher("Name", Matches, OS);
|
|
|
|
OS << " return InvalidMatchClass;\n";
|
|
OS << "}\n\n";
|
|
}
|
|
|
|
/// EmitMatchRegisterName - Emit the function to match a string to the target
|
|
/// specific register enum.
|
|
static void EmitMatchRegisterName(CodeGenTarget &Target, Record *AsmParser,
|
|
raw_ostream &OS) {
|
|
// Construct the match list.
|
|
std::vector<StringPair> Matches;
|
|
for (unsigned i = 0, e = Target.getRegisters().size(); i != e; ++i) {
|
|
const CodeGenRegister &Reg = Target.getRegisters()[i];
|
|
if (Reg.TheDef->getValueAsString("AsmName").empty())
|
|
continue;
|
|
|
|
Matches.push_back(StringPair(Reg.TheDef->getValueAsString("AsmName"),
|
|
"return " + utostr(i + 1) + ";"));
|
|
}
|
|
|
|
OS << "unsigned " << Target.getName()
|
|
<< AsmParser->getValueAsString("AsmParserClassName")
|
|
<< "::MatchRegisterName(const StringRef &Name) {\n";
|
|
|
|
EmitStringMatcher("Name", Matches, OS);
|
|
|
|
OS << " return 0;\n";
|
|
OS << "}\n\n";
|
|
}
|
|
|
|
void AsmMatcherEmitter::run(raw_ostream &OS) {
|
|
CodeGenTarget Target;
|
|
Record *AsmParser = Target.getAsmParser();
|
|
std::string ClassName = AsmParser->getValueAsString("AsmParserClassName");
|
|
|
|
// Compute the information on the instructions to match.
|
|
AsmMatcherInfo Info(AsmParser);
|
|
Info.BuildInfo(Target);
|
|
|
|
// Sort the instruction table using the partial order on classes.
|
|
std::sort(Info.Instructions.begin(), Info.Instructions.end(),
|
|
less_ptr<InstructionInfo>());
|
|
|
|
DEBUG_WITH_TYPE("instruction_info", {
|
|
for (std::vector<InstructionInfo*>::iterator
|
|
it = Info.Instructions.begin(), ie = Info.Instructions.end();
|
|
it != ie; ++it)
|
|
(*it)->dump();
|
|
});
|
|
|
|
// Check for ambiguous instructions.
|
|
unsigned NumAmbiguous = 0;
|
|
for (unsigned i = 0, e = Info.Instructions.size(); i != e; ++i) {
|
|
for (unsigned j = i + 1; j != e; ++j) {
|
|
InstructionInfo &A = *Info.Instructions[i];
|
|
InstructionInfo &B = *Info.Instructions[j];
|
|
|
|
if (A.CouldMatchAmiguouslyWith(B)) {
|
|
DEBUG_WITH_TYPE("ambiguous_instrs", {
|
|
errs() << "warning: ambiguous instruction match:\n";
|
|
A.dump();
|
|
errs() << "\nis incomparable with:\n";
|
|
B.dump();
|
|
errs() << "\n\n";
|
|
});
|
|
++NumAmbiguous;
|
|
}
|
|
}
|
|
}
|
|
if (NumAmbiguous)
|
|
DEBUG_WITH_TYPE("ambiguous_instrs", {
|
|
errs() << "warning: " << NumAmbiguous
|
|
<< " ambiguous instructions!\n";
|
|
});
|
|
|
|
// Write the output.
|
|
|
|
EmitSourceFileHeader("Assembly Matcher Source Fragment", OS);
|
|
|
|
// Emit the function to match a register name to number.
|
|
EmitMatchRegisterName(Target, AsmParser, OS);
|
|
|
|
// Generate the unified function to convert operands into an MCInst.
|
|
EmitConvertToMCInst(Target, Info.Instructions, OS);
|
|
|
|
// Emit the enumeration for classes which participate in matching.
|
|
EmitMatchClassEnumeration(Target, Info.Classes, OS);
|
|
|
|
// Emit the routine to match token strings to their match class.
|
|
EmitMatchTokenString(Target, Info.Classes, OS);
|
|
|
|
// Emit the routine to classify an operand.
|
|
EmitClassifyOperand(Target, Info, OS);
|
|
|
|
// Emit the subclass predicate routine.
|
|
EmitIsSubclass(Target, Info.Classes, OS);
|
|
|
|
// Finally, build the match function.
|
|
|
|
size_t MaxNumOperands = 0;
|
|
for (std::vector<InstructionInfo*>::const_iterator it =
|
|
Info.Instructions.begin(), ie = Info.Instructions.end();
|
|
it != ie; ++it)
|
|
MaxNumOperands = std::max(MaxNumOperands, (*it)->Operands.size());
|
|
|
|
OS << "bool " << Target.getName() << ClassName
|
|
<< "::MatchInstruction("
|
|
<< "SmallVectorImpl<" << Target.getName() << "Operand> &Operands, "
|
|
<< "MCInst &Inst) {\n";
|
|
|
|
// Emit the static match table; unused classes get initalized to 0 which is
|
|
// guaranteed to be InvalidMatchClass.
|
|
//
|
|
// FIXME: We can reduce the size of this table very easily. First, we change
|
|
// it so that store the kinds in separate bit-fields for each index, which
|
|
// only needs to be the max width used for classes at that index (we also need
|
|
// to reject based on this during classification). If we then make sure to
|
|
// order the match kinds appropriately (putting mnemonics last), then we
|
|
// should only end up using a few bits for each class, especially the ones
|
|
// following the mnemonic.
|
|
OS << " static const struct MatchEntry {\n";
|
|
OS << " unsigned Opcode;\n";
|
|
OS << " ConversionKind ConvertFn;\n";
|
|
OS << " MatchClassKind Classes[" << MaxNumOperands << "];\n";
|
|
OS << " } MatchTable[" << Info.Instructions.size() << "] = {\n";
|
|
|
|
for (std::vector<InstructionInfo*>::const_iterator it =
|
|
Info.Instructions.begin(), ie = Info.Instructions.end();
|
|
it != ie; ++it) {
|
|
InstructionInfo &II = **it;
|
|
|
|
OS << " { " << Target.getName() << "::" << II.InstrName
|
|
<< ", " << II.ConversionFnKind << ", { ";
|
|
for (unsigned i = 0, e = II.Operands.size(); i != e; ++i) {
|
|
InstructionInfo::Operand &Op = II.Operands[i];
|
|
|
|
if (i) OS << ", ";
|
|
OS << Op.Class->Name;
|
|
}
|
|
OS << " } },\n";
|
|
}
|
|
|
|
OS << " };\n\n";
|
|
|
|
// Emit code to compute the class list for this operand vector.
|
|
OS << " // Eliminate obvious mismatches.\n";
|
|
OS << " if (Operands.size() > " << MaxNumOperands << ")\n";
|
|
OS << " return true;\n\n";
|
|
|
|
OS << " // Compute the class list for this operand vector.\n";
|
|
OS << " MatchClassKind Classes[" << MaxNumOperands << "];\n";
|
|
OS << " for (unsigned i = 0, e = Operands.size(); i != e; ++i) {\n";
|
|
OS << " Classes[i] = ClassifyOperand(Operands[i]);\n\n";
|
|
|
|
OS << " // Check for invalid operands before matching.\n";
|
|
OS << " if (Classes[i] == InvalidMatchClass)\n";
|
|
OS << " return true;\n";
|
|
OS << " }\n\n";
|
|
|
|
OS << " // Mark unused classes.\n";
|
|
OS << " for (unsigned i = Operands.size(), e = " << MaxNumOperands << "; "
|
|
<< "i != e; ++i)\n";
|
|
OS << " Classes[i] = InvalidMatchClass;\n\n";
|
|
|
|
// Emit code to search the table.
|
|
OS << " // Search the table.\n";
|
|
OS << " for (const MatchEntry *it = MatchTable, "
|
|
<< "*ie = MatchTable + " << Info.Instructions.size()
|
|
<< "; it != ie; ++it) {\n";
|
|
for (unsigned i = 0; i != MaxNumOperands; ++i) {
|
|
OS << " if (!IsSubclass(Classes["
|
|
<< i << "], it->Classes[" << i << "]))\n";
|
|
OS << " continue;\n";
|
|
}
|
|
OS << "\n";
|
|
OS << " return ConvertToMCInst(it->ConvertFn, Inst, "
|
|
<< "it->Opcode, Operands);\n";
|
|
OS << " }\n\n";
|
|
|
|
OS << " return true;\n";
|
|
OS << "}\n\n";
|
|
}
|