tblgen/AsmMatcherEmitter: Fix alias handling to honor -match-prefix.
[oota-llvm.git] / utils / TableGen / AsmMatcherEmitter.cpp
1 //===- AsmMatcherEmitter.cpp - Generate an assembly matcher ---------------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This tablegen backend emits a target specifier matcher for converting parsed
11 // assembly operands in the MCInst structures.
12 //
13 // The input to the target specific matcher is a list of literal tokens and
14 // operands. The target specific parser should generally eliminate any syntax
15 // which is not relevant for matching; for example, comma tokens should have
16 // already been consumed and eliminated by the parser. Most instructions will
17 // end up with a single literal token (the instruction name) and some number of
18 // operands.
19 //
20 // Some example inputs, for X86:
21 //   'addl' (immediate ...) (register ...)
22 //   'add' (immediate ...) (memory ...)
23 //   'call' '*' %epc
24 //
25 // The assembly matcher is responsible for converting this input into a precise
26 // machine instruction (i.e., an instruction with a well defined encoding). This
27 // mapping has several properties which complicate matching:
28 //
29 //  - It may be ambiguous; many architectures can legally encode particular
30 //    variants of an instruction in different ways (for example, using a smaller
31 //    encoding for small immediates). Such ambiguities should never be
32 //    arbitrarily resolved by the assembler, the assembler is always responsible
33 //    for choosing the "best" available instruction.
34 //
35 //  - It may depend on the subtarget or the assembler context. Instructions
36 //    which are invalid for the current mode, but otherwise unambiguous (e.g.,
37 //    an SSE instruction in a file being assembled for i486) should be accepted
38 //    and rejected by the assembler front end. However, if the proper encoding
39 //    for an instruction is dependent on the assembler context then the matcher
40 //    is responsible for selecting the correct machine instruction for the
41 //    current mode.
42 //
43 // The core matching algorithm attempts to exploit the regularity in most
44 // instruction sets to quickly determine the set of possibly matching
45 // instructions, and the simplify the generated code. Additionally, this helps
46 // to ensure that the ambiguities are intentionally resolved by the user.
47 //
48 // The matching is divided into two distinct phases:
49 //
50 //   1. Classification: Each operand is mapped to the unique set which (a)
51 //      contains it, and (b) is the largest such subset for which a single
52 //      instruction could match all members.
53 //
54 //      For register classes, we can generate these subgroups automatically. For
55 //      arbitrary operands, we expect the user to define the classes and their
56 //      relations to one another (for example, 8-bit signed immediates as a
57 //      subset of 32-bit immediates).
58 //
59 //      By partitioning the operands in this way, we guarantee that for any
60 //      tuple of classes, any single instruction must match either all or none
61 //      of the sets of operands which could classify to that tuple.
62 //
63 //      In addition, the subset relation amongst classes induces a partial order
64 //      on such tuples, which we use to resolve ambiguities.
65 //
66 //   2. The input can now be treated as a tuple of classes (static tokens are
67 //      simple singleton sets). Each such tuple should generally map to a single
68 //      instruction (we currently ignore cases where this isn't true, whee!!!),
69 //      which we can emit a simple matcher for.
70 //
71 //===----------------------------------------------------------------------===//
72
73 #include "AsmMatcherEmitter.h"
74 #include "CodeGenTarget.h"
75 #include "Record.h"
76 #include "StringMatcher.h"
77 #include "llvm/ADT/OwningPtr.h"
78 #include "llvm/ADT/PointerUnion.h"
79 #include "llvm/ADT/SmallPtrSet.h"
80 #include "llvm/ADT/SmallVector.h"
81 #include "llvm/ADT/STLExtras.h"
82 #include "llvm/ADT/StringExtras.h"
83 #include "llvm/Support/CommandLine.h"
84 #include "llvm/Support/Debug.h"
85 #include <map>
86 #include <set>
87 using namespace llvm;
88
89 static cl::opt<std::string>
90 MatchPrefix("match-prefix", cl::init(""),
91             cl::desc("Only match instructions with the given prefix"));
92
93
94 namespace {
95   class AsmMatcherInfo;
96 struct SubtargetFeatureInfo;
97
98 /// ClassInfo - Helper class for storing the information about a particular
99 /// class of operands which can be matched.
100 struct ClassInfo {
101   enum ClassInfoKind {
102     /// Invalid kind, for use as a sentinel value.
103     Invalid = 0,
104
105     /// The class for a particular token.
106     Token,
107
108     /// The (first) register class, subsequent register classes are
109     /// RegisterClass0+1, and so on.
110     RegisterClass0,
111
112     /// The (first) user defined class, subsequent user defined classes are
113     /// UserClass0+1, and so on.
114     UserClass0 = 1<<16
115   };
116
117   /// Kind - The class kind, which is either a predefined kind, or (UserClass0 +
118   /// N) for the Nth user defined class.
119   unsigned Kind;
120
121   /// SuperClasses - The super classes of this class. Note that for simplicities
122   /// sake user operands only record their immediate super class, while register
123   /// operands include all superclasses.
124   std::vector<ClassInfo*> SuperClasses;
125
126   /// Name - The full class name, suitable for use in an enum.
127   std::string Name;
128
129   /// ClassName - The unadorned generic name for this class (e.g., Token).
130   std::string ClassName;
131
132   /// ValueName - The name of the value this class represents; for a token this
133   /// is the literal token string, for an operand it is the TableGen class (or
134   /// empty if this is a derived class).
135   std::string ValueName;
136
137   /// PredicateMethod - The name of the operand method to test whether the
138   /// operand matches this class; this is not valid for Token or register kinds.
139   std::string PredicateMethod;
140
141   /// RenderMethod - The name of the operand method to add this operand to an
142   /// MCInst; this is not valid for Token or register kinds.
143   std::string RenderMethod;
144
145   /// For register classes, the records for all the registers in this class.
146   std::set<Record*> Registers;
147
148 public:
149   /// isRegisterClass() - Check if this is a register class.
150   bool isRegisterClass() const {
151     return Kind >= RegisterClass0 && Kind < UserClass0;
152   }
153
154   /// isUserClass() - Check if this is a user defined class.
155   bool isUserClass() const {
156     return Kind >= UserClass0;
157   }
158
159   /// isRelatedTo - Check whether this class is "related" to \arg RHS. Classes
160   /// are related if they are in the same class hierarchy.
161   bool isRelatedTo(const ClassInfo &RHS) const {
162     // Tokens are only related to tokens.
163     if (Kind == Token || RHS.Kind == Token)
164       return Kind == Token && RHS.Kind == Token;
165
166     // Registers classes are only related to registers classes, and only if
167     // their intersection is non-empty.
168     if (isRegisterClass() || RHS.isRegisterClass()) {
169       if (!isRegisterClass() || !RHS.isRegisterClass())
170         return false;
171
172       std::set<Record*> Tmp;
173       std::insert_iterator< std::set<Record*> > II(Tmp, Tmp.begin());
174       std::set_intersection(Registers.begin(), Registers.end(),
175                             RHS.Registers.begin(), RHS.Registers.end(),
176                             II);
177
178       return !Tmp.empty();
179     }
180
181     // Otherwise we have two users operands; they are related if they are in the
182     // same class hierarchy.
183     //
184     // FIXME: This is an oversimplification, they should only be related if they
185     // intersect, however we don't have that information.
186     assert(isUserClass() && RHS.isUserClass() && "Unexpected class!");
187     const ClassInfo *Root = this;
188     while (!Root->SuperClasses.empty())
189       Root = Root->SuperClasses.front();
190
191     const ClassInfo *RHSRoot = &RHS;
192     while (!RHSRoot->SuperClasses.empty())
193       RHSRoot = RHSRoot->SuperClasses.front();
194
195     return Root == RHSRoot;
196   }
197
198   /// isSubsetOf - Test whether this class is a subset of \arg RHS;
199   bool isSubsetOf(const ClassInfo &RHS) const {
200     // This is a subset of RHS if it is the same class...
201     if (this == &RHS)
202       return true;
203
204     // ... or if any of its super classes are a subset of RHS.
205     for (std::vector<ClassInfo*>::const_iterator it = SuperClasses.begin(),
206            ie = SuperClasses.end(); it != ie; ++it)
207       if ((*it)->isSubsetOf(RHS))
208         return true;
209
210     return false;
211   }
212
213   /// operator< - Compare two classes.
214   bool operator<(const ClassInfo &RHS) const {
215     if (this == &RHS)
216       return false;
217
218     // Unrelated classes can be ordered by kind.
219     if (!isRelatedTo(RHS))
220       return Kind < RHS.Kind;
221
222     switch (Kind) {
223     case Invalid:
224       assert(0 && "Invalid kind!");
225     case Token:
226       // Tokens are comparable by value.
227       //
228       // FIXME: Compare by enum value.
229       return ValueName < RHS.ValueName;
230
231     default:
232       // This class preceeds the RHS if it is a proper subset of the RHS.
233       if (isSubsetOf(RHS))
234         return true;
235       if (RHS.isSubsetOf(*this))
236         return false;
237
238       // Otherwise, order by name to ensure we have a total ordering.
239       return ValueName < RHS.ValueName;
240     }
241   }
242 };
243
244 /// MatchableInfo - Helper class for storing the necessary information for an
245 /// instruction or alias which is capable of being matched.
246 struct MatchableInfo {
247   struct AsmOperand {
248     /// Token - This is the token that the operand came from.
249     StringRef Token;
250     
251     /// The unique class instance this operand should match.
252     ClassInfo *Class;
253
254     /// The operand name this is, if anything.
255     StringRef SrcOpName;
256     
257     explicit AsmOperand(StringRef T) : Token(T), Class(0) {}
258   };
259   
260   /// ResOperand - This represents a single operand in the result instruction
261   /// generated by the match.  In cases (like addressing modes) where a single
262   /// assembler operand expands to multiple MCOperands, this represents the
263   /// single assembler operand, not the MCOperand.
264   struct ResOperand {
265     enum {
266       /// RenderAsmOperand - This represents an operand result that is
267       /// generated by calling the render method on the assembly operand.  The
268       /// corresponding AsmOperand is specified by AsmOperandNum.
269       RenderAsmOperand,
270       
271       /// TiedOperand - This represents a result operand that is a duplicate of
272       /// a previous result operand.
273       TiedOperand,
274       
275       /// ImmOperand - This represents an immediate value that is dumped into
276       /// the operand.
277       ImmOperand,
278       
279       /// RegOperand - This represents a fixed register that is dumped in.
280       RegOperand
281     } Kind;
282     
283     union {
284       /// This is the operand # in the AsmOperands list that this should be
285       /// copied from.
286       unsigned AsmOperandNum;
287       
288       /// TiedOperandNum - This is the (earlier) result operand that should be
289       /// copied from.
290       unsigned TiedOperandNum;
291       
292       /// ImmVal - This is the immediate value added to the instruction.
293       int64_t ImmVal;
294       
295       /// Register - This is the register record.
296       Record *Register;
297     };
298     
299     /// OpInfo - This is the information about the instruction operand that is
300     /// being populated.
301     const CGIOperandList::OperandInfo *OpInfo;
302     
303     static ResOperand getRenderedOp(unsigned AsmOpNum,
304                                     const CGIOperandList::OperandInfo *Op) {
305       ResOperand X;
306       X.Kind = RenderAsmOperand;
307       X.AsmOperandNum = AsmOpNum;
308       X.OpInfo = Op;
309       return X;
310     }
311     
312     static ResOperand getTiedOp(unsigned TiedOperandNum,
313                                 const CGIOperandList::OperandInfo *Op) {
314       ResOperand X;
315       X.Kind = TiedOperand;
316       X.TiedOperandNum = TiedOperandNum;
317       X.OpInfo = Op;
318       return X;
319     }
320     
321     static ResOperand getImmOp(int64_t Val,
322                                const CGIOperandList::OperandInfo *Op) {
323       ResOperand X;
324       X.Kind = ImmOperand;
325       X.ImmVal = Val;
326       X.OpInfo = Op;
327       return X;
328     }
329     
330     static ResOperand getRegOp(Record *Reg,
331                                const CGIOperandList::OperandInfo *Op) {
332       ResOperand X;
333       X.Kind = RegOperand;
334       X.Register = Reg;
335       X.OpInfo = Op;
336       return X;
337     }
338     
339   };
340
341   /// TheDef - This is the definition of the instruction or InstAlias that this
342   /// matchable came from.
343   Record *const TheDef;
344   
345   /// DefRec - This is the definition that it came from.
346   PointerUnion<const CodeGenInstruction*, const CodeGenInstAlias*> DefRec;
347   
348   const CodeGenInstruction *getResultInst() const {
349     if (DefRec.is<const CodeGenInstruction*>())
350       return DefRec.get<const CodeGenInstruction*>();
351     return DefRec.get<const CodeGenInstAlias*>()->ResultInst;
352   }
353   
354   /// ResOperands - This is the operand list that should be built for the result
355   /// MCInst.
356   std::vector<ResOperand> ResOperands;
357
358   /// AsmString - The assembly string for this instruction (with variants
359   /// removed), e.g. "movsx $src, $dst".
360   std::string AsmString;
361
362   /// Mnemonic - This is the first token of the matched instruction, its
363   /// mnemonic.
364   StringRef Mnemonic;
365   
366   /// AsmOperands - The textual operands that this instruction matches,
367   /// annotated with a class and where in the OperandList they were defined.
368   /// This directly corresponds to the tokenized AsmString after the mnemonic is
369   /// removed.
370   SmallVector<AsmOperand, 4> AsmOperands;
371
372   /// Predicates - The required subtarget features to match this instruction.
373   SmallVector<SubtargetFeatureInfo*, 4> RequiredFeatures;
374
375   /// ConversionFnKind - The enum value which is passed to the generated
376   /// ConvertToMCInst to convert parsed operands into an MCInst for this
377   /// function.
378   std::string ConversionFnKind;
379   
380   MatchableInfo(const CodeGenInstruction &CGI)
381     : TheDef(CGI.TheDef), DefRec(&CGI), AsmString(CGI.AsmString) {
382   }
383
384   MatchableInfo(const CodeGenInstAlias *Alias)
385     : TheDef(Alias->TheDef), DefRec(Alias), AsmString(Alias->AsmString) {
386   }
387   
388   void Initialize(const AsmMatcherInfo &Info,
389                   SmallPtrSet<Record*, 16> &SingletonRegisters);
390   
391   /// Validate - Return true if this matchable is a valid thing to match against
392   /// and perform a bunch of validity checking.
393   bool Validate(StringRef CommentDelimiter, bool Hack) const;
394   
395   /// getSingletonRegisterForAsmOperand - If the specified token is a singleton
396   /// register, return the Record for it, otherwise return null.
397   Record *getSingletonRegisterForAsmOperand(unsigned i,
398                                             const AsmMatcherInfo &Info) const;  
399
400   int FindAsmOperandNamed(StringRef N) const {
401     for (unsigned i = 0, e = AsmOperands.size(); i != e; ++i)
402       if (N == AsmOperands[i].SrcOpName)
403         return i;
404     return -1;
405   }
406   
407   void BuildInstructionResultOperands();
408   void BuildAliasResultOperands();
409
410   /// operator< - Compare two matchables.
411   bool operator<(const MatchableInfo &RHS) const {
412     // The primary comparator is the instruction mnemonic.
413     if (Mnemonic != RHS.Mnemonic)
414       return Mnemonic < RHS.Mnemonic;
415
416     if (AsmOperands.size() != RHS.AsmOperands.size())
417       return AsmOperands.size() < RHS.AsmOperands.size();
418
419     // Compare lexicographically by operand. The matcher validates that other
420     // orderings wouldn't be ambiguous using \see CouldMatchAmiguouslyWith().
421     for (unsigned i = 0, e = AsmOperands.size(); i != e; ++i) {
422       if (*AsmOperands[i].Class < *RHS.AsmOperands[i].Class)
423         return true;
424       if (*RHS.AsmOperands[i].Class < *AsmOperands[i].Class)
425         return false;
426     }
427
428     return false;
429   }
430
431   /// CouldMatchAmiguouslyWith - Check whether this matchable could
432   /// ambiguously match the same set of operands as \arg RHS (without being a
433   /// strictly superior match).
434   bool CouldMatchAmiguouslyWith(const MatchableInfo &RHS) {
435     // The primary comparator is the instruction mnemonic.
436     if (Mnemonic != RHS.Mnemonic)
437       return false;
438     
439     // The number of operands is unambiguous.
440     if (AsmOperands.size() != RHS.AsmOperands.size())
441       return false;
442
443     // Otherwise, make sure the ordering of the two instructions is unambiguous
444     // by checking that either (a) a token or operand kind discriminates them,
445     // or (b) the ordering among equivalent kinds is consistent.
446
447     // Tokens and operand kinds are unambiguous (assuming a correct target
448     // specific parser).
449     for (unsigned i = 0, e = AsmOperands.size(); i != e; ++i)
450       if (AsmOperands[i].Class->Kind != RHS.AsmOperands[i].Class->Kind ||
451           AsmOperands[i].Class->Kind == ClassInfo::Token)
452         if (*AsmOperands[i].Class < *RHS.AsmOperands[i].Class ||
453             *RHS.AsmOperands[i].Class < *AsmOperands[i].Class)
454           return false;
455
456     // Otherwise, this operand could commute if all operands are equivalent, or
457     // there is a pair of operands that compare less than and a pair that
458     // compare greater than.
459     bool HasLT = false, HasGT = false;
460     for (unsigned i = 0, e = AsmOperands.size(); i != e; ++i) {
461       if (*AsmOperands[i].Class < *RHS.AsmOperands[i].Class)
462         HasLT = true;
463       if (*RHS.AsmOperands[i].Class < *AsmOperands[i].Class)
464         HasGT = true;
465     }
466
467     return !(HasLT ^ HasGT);
468   }
469
470   void dump();
471   
472 private:
473   void TokenizeAsmString(const AsmMatcherInfo &Info);
474 };
475
476 /// SubtargetFeatureInfo - Helper class for storing information on a subtarget
477 /// feature which participates in instruction matching.
478 struct SubtargetFeatureInfo {
479   /// \brief The predicate record for this feature.
480   Record *TheDef;
481
482   /// \brief An unique index assigned to represent this feature.
483   unsigned Index;
484
485   SubtargetFeatureInfo(Record *D, unsigned Idx) : TheDef(D), Index(Idx) {}
486   
487   /// \brief The name of the enumerated constant identifying this feature.
488   std::string getEnumName() const {
489     return "Feature_" + TheDef->getName();
490   }
491 };
492
493 class AsmMatcherInfo {
494 public:
495   /// Tracked Records
496   RecordKeeper &Records;
497
498   /// The tablegen AsmParser record.
499   Record *AsmParser;
500
501   /// Target - The target information.
502   CodeGenTarget &Target;
503
504   /// The AsmParser "RegisterPrefix" value.
505   std::string RegisterPrefix;
506
507   /// The classes which are needed for matching.
508   std::vector<ClassInfo*> Classes;
509
510   /// The information on the matchables to match.
511   std::vector<MatchableInfo*> Matchables;
512
513   /// Map of Register records to their class information.
514   std::map<Record*, ClassInfo*> RegisterClasses;
515
516   /// Map of Predicate records to their subtarget information.
517   std::map<Record*, SubtargetFeatureInfo*> SubtargetFeatures;
518   
519 private:
520   /// Map of token to class information which has already been constructed.
521   std::map<std::string, ClassInfo*> TokenClasses;
522
523   /// Map of RegisterClass records to their class information.
524   std::map<Record*, ClassInfo*> RegisterClassClasses;
525
526   /// Map of AsmOperandClass records to their class information.
527   std::map<Record*, ClassInfo*> AsmOperandClasses;
528
529 private:
530   /// getTokenClass - Lookup or create the class for the given token.
531   ClassInfo *getTokenClass(StringRef Token);
532
533   /// getOperandClass - Lookup or create the class for the given operand.
534   ClassInfo *getOperandClass(const CGIOperandList::OperandInfo &OI);
535
536   /// BuildRegisterClasses - Build the ClassInfo* instances for register
537   /// classes.
538   void BuildRegisterClasses(SmallPtrSet<Record*, 16> &SingletonRegisters);
539
540   /// BuildOperandClasses - Build the ClassInfo* instances for user defined
541   /// operand classes.
542   void BuildOperandClasses();
543
544   void BuildInstructionOperandReference(MatchableInfo *II,
545                                         StringRef OpName,
546                                         MatchableInfo::AsmOperand &Op);
547   void BuildAliasOperandReference(MatchableInfo *II,
548                                   StringRef OpName,
549                                   MatchableInfo::AsmOperand &Op);
550                                   
551 public:
552   AsmMatcherInfo(Record *AsmParser, 
553                  CodeGenTarget &Target, 
554                  RecordKeeper &Records);
555
556   /// BuildInfo - Construct the various tables used during matching.
557   void BuildInfo();
558   
559   /// getSubtargetFeature - Lookup or create the subtarget feature info for the
560   /// given operand.
561   SubtargetFeatureInfo *getSubtargetFeature(Record *Def) const {
562     assert(Def->isSubClassOf("Predicate") && "Invalid predicate type!");
563     std::map<Record*, SubtargetFeatureInfo*>::const_iterator I =
564       SubtargetFeatures.find(Def);
565     return I == SubtargetFeatures.end() ? 0 : I->second;
566   }
567
568   RecordKeeper &getRecords() const {
569     return Records;
570   }
571 };
572
573 }
574
575 void MatchableInfo::dump() {
576   errs() << TheDef->getName() << " -- " << "flattened:\"" << AsmString <<"\"\n";
577
578   for (unsigned i = 0, e = AsmOperands.size(); i != e; ++i) {
579     AsmOperand &Op = AsmOperands[i];
580     errs() << "  op[" << i << "] = " << Op.Class->ClassName << " - ";
581     errs() << '\"' << Op.Token << "\"\n";
582   }
583 }
584
585 void MatchableInfo::Initialize(const AsmMatcherInfo &Info,
586                                SmallPtrSet<Record*, 16> &SingletonRegisters) {
587   // TODO: Eventually support asmparser for Variant != 0.
588   AsmString = CodeGenInstruction::FlattenAsmStringVariants(AsmString, 0);
589   
590   TokenizeAsmString(Info);
591   
592   // Compute the require features.
593   std::vector<Record*> Predicates =TheDef->getValueAsListOfDefs("Predicates");
594   for (unsigned i = 0, e = Predicates.size(); i != e; ++i)
595     if (SubtargetFeatureInfo *Feature =
596         Info.getSubtargetFeature(Predicates[i]))
597       RequiredFeatures.push_back(Feature);
598   
599   // Collect singleton registers, if used.
600   for (unsigned i = 0, e = AsmOperands.size(); i != e; ++i) {
601     if (Record *Reg = getSingletonRegisterForAsmOperand(i, Info))
602       SingletonRegisters.insert(Reg);
603   }
604 }
605
606 /// TokenizeAsmString - Tokenize a simplified assembly string.
607 void MatchableInfo::TokenizeAsmString(const AsmMatcherInfo &Info) {
608   StringRef String = AsmString;
609   unsigned Prev = 0;
610   bool InTok = true;
611   for (unsigned i = 0, e = String.size(); i != e; ++i) {
612     switch (String[i]) {
613     case '[':
614     case ']':
615     case '*':
616     case '!':
617     case ' ':
618     case '\t':
619     case ',':
620       if (InTok) {
621         AsmOperands.push_back(AsmOperand(String.slice(Prev, i)));
622         InTok = false;
623       }
624       if (!isspace(String[i]) && String[i] != ',')
625         AsmOperands.push_back(AsmOperand(String.substr(i, 1)));
626       Prev = i + 1;
627       break;
628
629     case '\\':
630       if (InTok) {
631         AsmOperands.push_back(AsmOperand(String.slice(Prev, i)));
632         InTok = false;
633       }
634       ++i;
635       assert(i != String.size() && "Invalid quoted character");
636       AsmOperands.push_back(AsmOperand(String.substr(i, 1)));
637       Prev = i + 1;
638       break;
639
640     case '$': {
641       if (InTok) {
642         AsmOperands.push_back(AsmOperand(String.slice(Prev, i)));
643         InTok = false;
644       }
645       
646       // If this isn't "${", treat like a normal token.
647       if (i + 1 == String.size() || String[i + 1] != '{') {
648         Prev = i;
649         break;
650       }
651
652       StringRef::iterator End = std::find(String.begin() + i, String.end(),'}');
653       assert(End != String.end() && "Missing brace in operand reference!");
654       size_t EndPos = End - String.begin();
655       AsmOperands.push_back(AsmOperand(String.slice(i, EndPos+1)));
656       Prev = EndPos + 1;
657       i = EndPos;
658       break;
659     }
660
661     case '.':
662       if (InTok)
663         AsmOperands.push_back(AsmOperand(String.slice(Prev, i)));
664       Prev = i;
665       InTok = true;
666       break;
667
668     default:
669       InTok = true;
670     }
671   }
672   if (InTok && Prev != String.size())
673     AsmOperands.push_back(AsmOperand(String.substr(Prev)));
674   
675   // The first token of the instruction is the mnemonic, which must be a
676   // simple string, not a $foo variable or a singleton register.
677   assert(!AsmOperands.empty() && "Instruction has no tokens?");
678   Mnemonic = AsmOperands[0].Token;
679   if (Mnemonic[0] == '$' || getSingletonRegisterForAsmOperand(0, Info))
680     throw TGError(TheDef->getLoc(),
681                   "Invalid instruction mnemonic '" + Mnemonic.str() + "'!");
682   
683   // Remove the first operand, it is tracked in the mnemonic field.
684   AsmOperands.erase(AsmOperands.begin());
685 }
686
687
688
689 bool MatchableInfo::Validate(StringRef CommentDelimiter, bool Hack) const {
690   // Reject matchables with no .s string.
691   if (AsmString.empty())
692     throw TGError(TheDef->getLoc(), "instruction with empty asm string");
693   
694   // Reject any matchables with a newline in them, they should be marked
695   // isCodeGenOnly if they are pseudo instructions.
696   if (AsmString.find('\n') != std::string::npos)
697     throw TGError(TheDef->getLoc(),
698                   "multiline instruction is not valid for the asmparser, "
699                   "mark it isCodeGenOnly");
700   
701   // Remove comments from the asm string.  We know that the asmstring only
702   // has one line.
703   if (!CommentDelimiter.empty() &&
704       StringRef(AsmString).find(CommentDelimiter) != StringRef::npos)
705     throw TGError(TheDef->getLoc(),
706                   "asmstring for instruction has comment character in it, "
707                   "mark it isCodeGenOnly");
708   
709   // Reject matchables with operand modifiers, these aren't something we can
710   // handle, the target should be refactored to use operands instead of
711   // modifiers.
712   //
713   // Also, check for instructions which reference the operand multiple times;
714   // this implies a constraint we would not honor.
715   std::set<std::string> OperandNames;
716   for (unsigned i = 0, e = AsmOperands.size(); i != e; ++i) {
717     StringRef Tok = AsmOperands[i].Token;
718     if (Tok[0] == '$' && Tok.find(':') != StringRef::npos)
719       throw TGError(TheDef->getLoc(),
720                     "matchable with operand modifier '" + Tok.str() +
721                     "' not supported by asm matcher.  Mark isCodeGenOnly!");
722     
723     // Verify that any operand is only mentioned once.
724     // We reject aliases and ignore instructions for now.
725     if (Tok[0] == '$' && !OperandNames.insert(Tok).second) {
726       if (!Hack)
727         throw TGError(TheDef->getLoc(),
728                       "ERROR: matchable with tied operand '" + Tok.str() +
729                       "' can never be matched!");
730       // FIXME: Should reject these.  The ARM backend hits this with $lane in a
731       // bunch of instructions.  It is unclear what the right answer is.
732       DEBUG({
733         errs() << "warning: '" << TheDef->getName() << "': "
734                << "ignoring instruction with tied operand '"
735                << Tok.str() << "'\n";
736       });
737       return false;
738     }
739   }
740   
741   return true;
742 }
743
744
745 /// getSingletonRegisterForAsmOperand - If the specified token is a singleton
746 /// register, return the register name, otherwise return a null StringRef.
747 Record *MatchableInfo::
748 getSingletonRegisterForAsmOperand(unsigned i, const AsmMatcherInfo &Info) const{
749   StringRef Tok = AsmOperands[i].Token;
750   if (!Tok.startswith(Info.RegisterPrefix))
751     return 0;
752   
753   StringRef RegName = Tok.substr(Info.RegisterPrefix.size());
754   if (const CodeGenRegister *Reg = Info.Target.getRegisterByName(RegName))
755     return Reg->TheDef;
756   
757   // If there is no register prefix (i.e. "%" in "%eax"), then this may
758   // be some random non-register token, just ignore it.
759   if (Info.RegisterPrefix.empty())
760     return 0;
761     
762   // Otherwise, we have something invalid prefixed with the register prefix,
763   // such as %foo.
764   std::string Err = "unable to find register for '" + RegName.str() +
765   "' (which matches register prefix)";
766   throw TGError(TheDef->getLoc(), Err);
767 }
768
769
770 static std::string getEnumNameForToken(StringRef Str) {
771   std::string Res;
772
773   for (StringRef::iterator it = Str.begin(), ie = Str.end(); it != ie; ++it) {
774     switch (*it) {
775     case '*': Res += "_STAR_"; break;
776     case '%': Res += "_PCT_"; break;
777     case ':': Res += "_COLON_"; break;
778     case '!': Res += "_EXCLAIM_"; break;
779     case '.': Res += "_DOT_"; break;
780     default:
781       if (isalnum(*it))
782         Res += *it;
783       else
784         Res += "_" + utostr((unsigned) *it) + "_";
785     }
786   }
787
788   return Res;
789 }
790
791 ClassInfo *AsmMatcherInfo::getTokenClass(StringRef Token) {
792   ClassInfo *&Entry = TokenClasses[Token];
793
794   if (!Entry) {
795     Entry = new ClassInfo();
796     Entry->Kind = ClassInfo::Token;
797     Entry->ClassName = "Token";
798     Entry->Name = "MCK_" + getEnumNameForToken(Token);
799     Entry->ValueName = Token;
800     Entry->PredicateMethod = "<invalid>";
801     Entry->RenderMethod = "<invalid>";
802     Classes.push_back(Entry);
803   }
804
805   return Entry;
806 }
807
808 ClassInfo *
809 AsmMatcherInfo::getOperandClass(const CGIOperandList::OperandInfo &OI) {
810   if (OI.Rec->isSubClassOf("RegisterClass")) {
811     if (ClassInfo *CI = RegisterClassClasses[OI.Rec])
812       return CI;
813     throw TGError(OI.Rec->getLoc(), "register class has no class info!");
814   }
815
816   assert(OI.Rec->isSubClassOf("Operand") && "Unexpected operand!");
817   Record *MatchClass = OI.Rec->getValueAsDef("ParserMatchClass");
818   if (ClassInfo *CI = AsmOperandClasses[MatchClass])
819     return CI;
820
821   throw TGError(OI.Rec->getLoc(), "operand has no match class!");
822 }
823
824 void AsmMatcherInfo::
825 BuildRegisterClasses(SmallPtrSet<Record*, 16> &SingletonRegisters) {
826   const std::vector<CodeGenRegister> &Registers = Target.getRegisters();
827   const std::vector<CodeGenRegisterClass> &RegClassList =
828     Target.getRegisterClasses();
829
830   // The register sets used for matching.
831   std::set< std::set<Record*> > RegisterSets;
832
833   // Gather the defined sets.
834   for (std::vector<CodeGenRegisterClass>::const_iterator it =
835        RegClassList.begin(), ie = RegClassList.end(); it != ie; ++it)
836     RegisterSets.insert(std::set<Record*>(it->Elements.begin(),
837                                           it->Elements.end()));
838
839   // Add any required singleton sets.
840   for (SmallPtrSet<Record*, 16>::iterator it = SingletonRegisters.begin(),
841        ie = SingletonRegisters.end(); it != ie; ++it) {
842     Record *Rec = *it;
843     RegisterSets.insert(std::set<Record*>(&Rec, &Rec + 1));
844   }
845
846   // Introduce derived sets where necessary (when a register does not determine
847   // a unique register set class), and build the mapping of registers to the set
848   // they should classify to.
849   std::map<Record*, std::set<Record*> > RegisterMap;
850   for (std::vector<CodeGenRegister>::const_iterator it = Registers.begin(),
851          ie = Registers.end(); it != ie; ++it) {
852     const CodeGenRegister &CGR = *it;
853     // Compute the intersection of all sets containing this register.
854     std::set<Record*> ContainingSet;
855
856     for (std::set< std::set<Record*> >::iterator it = RegisterSets.begin(),
857            ie = RegisterSets.end(); it != ie; ++it) {
858       if (!it->count(CGR.TheDef))
859         continue;
860
861       if (ContainingSet.empty()) {
862         ContainingSet = *it;
863         continue;
864       }
865       
866       std::set<Record*> Tmp;
867       std::swap(Tmp, ContainingSet);
868       std::insert_iterator< std::set<Record*> > II(ContainingSet,
869                                                    ContainingSet.begin());
870       std::set_intersection(Tmp.begin(), Tmp.end(), it->begin(), it->end(), II);
871     }
872
873     if (!ContainingSet.empty()) {
874       RegisterSets.insert(ContainingSet);
875       RegisterMap.insert(std::make_pair(CGR.TheDef, ContainingSet));
876     }
877   }
878
879   // Construct the register classes.
880   std::map<std::set<Record*>, ClassInfo*> RegisterSetClasses;
881   unsigned Index = 0;
882   for (std::set< std::set<Record*> >::iterator it = RegisterSets.begin(),
883          ie = RegisterSets.end(); it != ie; ++it, ++Index) {
884     ClassInfo *CI = new ClassInfo();
885     CI->Kind = ClassInfo::RegisterClass0 + Index;
886     CI->ClassName = "Reg" + utostr(Index);
887     CI->Name = "MCK_Reg" + utostr(Index);
888     CI->ValueName = "";
889     CI->PredicateMethod = ""; // unused
890     CI->RenderMethod = "addRegOperands";
891     CI->Registers = *it;
892     Classes.push_back(CI);
893     RegisterSetClasses.insert(std::make_pair(*it, CI));
894   }
895
896   // Find the superclasses; we could compute only the subgroup lattice edges,
897   // but there isn't really a point.
898   for (std::set< std::set<Record*> >::iterator it = RegisterSets.begin(),
899          ie = RegisterSets.end(); it != ie; ++it) {
900     ClassInfo *CI = RegisterSetClasses[*it];
901     for (std::set< std::set<Record*> >::iterator it2 = RegisterSets.begin(),
902            ie2 = RegisterSets.end(); it2 != ie2; ++it2)
903       if (*it != *it2 &&
904           std::includes(it2->begin(), it2->end(), it->begin(), it->end()))
905         CI->SuperClasses.push_back(RegisterSetClasses[*it2]);
906   }
907
908   // Name the register classes which correspond to a user defined RegisterClass.
909   for (std::vector<CodeGenRegisterClass>::const_iterator
910        it = RegClassList.begin(), ie = RegClassList.end(); it != ie; ++it) {
911     ClassInfo *CI = RegisterSetClasses[std::set<Record*>(it->Elements.begin(),
912                                                          it->Elements.end())];
913     if (CI->ValueName.empty()) {
914       CI->ClassName = it->getName();
915       CI->Name = "MCK_" + it->getName();
916       CI->ValueName = it->getName();
917     } else
918       CI->ValueName = CI->ValueName + "," + it->getName();
919
920     RegisterClassClasses.insert(std::make_pair(it->TheDef, CI));
921   }
922
923   // Populate the map for individual registers.
924   for (std::map<Record*, std::set<Record*> >::iterator it = RegisterMap.begin(),
925          ie = RegisterMap.end(); it != ie; ++it)
926     RegisterClasses[it->first] = RegisterSetClasses[it->second];
927
928   // Name the register classes which correspond to singleton registers.
929   for (SmallPtrSet<Record*, 16>::iterator it = SingletonRegisters.begin(),
930          ie = SingletonRegisters.end(); it != ie; ++it) {
931     Record *Rec = *it;
932     ClassInfo *CI = RegisterClasses[Rec];
933     assert(CI && "Missing singleton register class info!");
934
935     if (CI->ValueName.empty()) {
936       CI->ClassName = Rec->getName();
937       CI->Name = "MCK_" + Rec->getName();
938       CI->ValueName = Rec->getName();
939     } else
940       CI->ValueName = CI->ValueName + "," + Rec->getName();
941   }
942 }
943
944 void AsmMatcherInfo::BuildOperandClasses() {
945   std::vector<Record*> AsmOperands =
946     Records.getAllDerivedDefinitions("AsmOperandClass");
947
948   // Pre-populate AsmOperandClasses map.
949   for (std::vector<Record*>::iterator it = AsmOperands.begin(),
950          ie = AsmOperands.end(); it != ie; ++it)
951     AsmOperandClasses[*it] = new ClassInfo();
952
953   unsigned Index = 0;
954   for (std::vector<Record*>::iterator it = AsmOperands.begin(),
955          ie = AsmOperands.end(); it != ie; ++it, ++Index) {
956     ClassInfo *CI = AsmOperandClasses[*it];
957     CI->Kind = ClassInfo::UserClass0 + Index;
958
959     ListInit *Supers = (*it)->getValueAsListInit("SuperClasses");
960     for (unsigned i = 0, e = Supers->getSize(); i != e; ++i) {
961       DefInit *DI = dynamic_cast<DefInit*>(Supers->getElement(i));
962       if (!DI) {
963         PrintError((*it)->getLoc(), "Invalid super class reference!");
964         continue;
965       }
966
967       ClassInfo *SC = AsmOperandClasses[DI->getDef()];
968       if (!SC)
969         PrintError((*it)->getLoc(), "Invalid super class reference!");
970       else
971         CI->SuperClasses.push_back(SC);
972     }
973     CI->ClassName = (*it)->getValueAsString("Name");
974     CI->Name = "MCK_" + CI->ClassName;
975     CI->ValueName = (*it)->getName();
976
977     // Get or construct the predicate method name.
978     Init *PMName = (*it)->getValueInit("PredicateMethod");
979     if (StringInit *SI = dynamic_cast<StringInit*>(PMName)) {
980       CI->PredicateMethod = SI->getValue();
981     } else {
982       assert(dynamic_cast<UnsetInit*>(PMName) &&
983              "Unexpected PredicateMethod field!");
984       CI->PredicateMethod = "is" + CI->ClassName;
985     }
986
987     // Get or construct the render method name.
988     Init *RMName = (*it)->getValueInit("RenderMethod");
989     if (StringInit *SI = dynamic_cast<StringInit*>(RMName)) {
990       CI->RenderMethod = SI->getValue();
991     } else {
992       assert(dynamic_cast<UnsetInit*>(RMName) &&
993              "Unexpected RenderMethod field!");
994       CI->RenderMethod = "add" + CI->ClassName + "Operands";
995     }
996
997     AsmOperandClasses[*it] = CI;
998     Classes.push_back(CI);
999   }
1000 }
1001
1002 AsmMatcherInfo::AsmMatcherInfo(Record *asmParser, 
1003                                CodeGenTarget &target, 
1004                                RecordKeeper &records)
1005   : Records(records), AsmParser(asmParser), Target(target),
1006     RegisterPrefix(AsmParser->getValueAsString("RegisterPrefix")) {
1007 }
1008
1009
1010 void AsmMatcherInfo::BuildInfo() {
1011   // Build information about all of the AssemblerPredicates.
1012   std::vector<Record*> AllPredicates =
1013     Records.getAllDerivedDefinitions("Predicate");
1014   for (unsigned i = 0, e = AllPredicates.size(); i != e; ++i) {
1015     Record *Pred = AllPredicates[i];
1016     // Ignore predicates that are not intended for the assembler.
1017     if (!Pred->getValueAsBit("AssemblerMatcherPredicate"))
1018       continue;
1019     
1020     if (Pred->getName().empty())
1021       throw TGError(Pred->getLoc(), "Predicate has no name!");
1022     
1023     unsigned FeatureNo = SubtargetFeatures.size();
1024     SubtargetFeatures[Pred] = new SubtargetFeatureInfo(Pred, FeatureNo);
1025     assert(FeatureNo < 32 && "Too many subtarget features!");
1026   }
1027
1028   StringRef CommentDelimiter = AsmParser->getValueAsString("CommentDelimiter");
1029   
1030   // Parse the instructions; we need to do this first so that we can gather the
1031   // singleton register classes.
1032   SmallPtrSet<Record*, 16> SingletonRegisters;
1033   for (CodeGenTarget::inst_iterator I = Target.inst_begin(),
1034        E = Target.inst_end(); I != E; ++I) {
1035     const CodeGenInstruction &CGI = **I;
1036
1037     // If the tblgen -match-prefix option is specified (for tblgen hackers),
1038     // filter the set of instructions we consider.
1039     if (!StringRef(CGI.TheDef->getName()).startswith(MatchPrefix))
1040       continue;
1041
1042     // Ignore "codegen only" instructions.
1043     if (CGI.TheDef->getValueAsBit("isCodeGenOnly"))
1044       continue;
1045     
1046     // Validate the operand list to ensure we can handle this instruction.
1047     for (unsigned i = 0, e = CGI.Operands.size(); i != e; ++i) {
1048       const CGIOperandList::OperandInfo &OI = CGI.Operands[i];
1049       
1050       // Validate tied operands.
1051       if (OI.getTiedRegister() != -1) {
1052         // If we have a tied operand that consists of multiple MCOperands, reject
1053         // it.  We reject aliases and ignore instructions for now.
1054         if (OI.MINumOperands != 1) {
1055           // FIXME: Should reject these.  The ARM backend hits this with $lane
1056           // in a bunch of instructions. It is unclear what the right answer is.
1057           DEBUG({
1058             errs() << "warning: '" << CGI.TheDef->getName() << "': "
1059             << "ignoring instruction with multi-operand tied operand '"
1060             << OI.Name << "'\n";
1061           });
1062           continue;
1063         }
1064       }
1065     }
1066     
1067     OwningPtr<MatchableInfo> II(new MatchableInfo(CGI));
1068
1069     II->Initialize(*this, SingletonRegisters);
1070     
1071     // Ignore instructions which shouldn't be matched and diagnose invalid
1072     // instruction definitions with an error.
1073     if (!II->Validate(CommentDelimiter, true))
1074       continue;
1075     
1076     // Ignore "Int_*" and "*_Int" instructions, which are internal aliases.
1077     //
1078     // FIXME: This is a total hack.
1079     if (StringRef(II->TheDef->getName()).startswith("Int_") ||
1080         StringRef(II->TheDef->getName()).endswith("_Int"))
1081       continue;
1082     
1083      Matchables.push_back(II.take());
1084   }
1085   
1086   // Parse all of the InstAlias definitions and stick them in the list of
1087   // matchables.
1088   std::vector<Record*> AllInstAliases =
1089     Records.getAllDerivedDefinitions("InstAlias");
1090   for (unsigned i = 0, e = AllInstAliases.size(); i != e; ++i) {
1091     CodeGenInstAlias *Alias = new CodeGenInstAlias(AllInstAliases[i], Target);
1092
1093     // If the tblgen -match-prefix option is specified (for tblgen hackers),
1094     // filter the set of instruction aliases we consider, based on the target
1095     // instruction.
1096     if (!StringRef(Alias->ResultInst->TheDef->getName()).startswith(
1097           MatchPrefix))
1098       continue;
1099
1100     OwningPtr<MatchableInfo> II(new MatchableInfo(Alias));
1101     
1102     II->Initialize(*this, SingletonRegisters);
1103     
1104     // Validate the alias definitions.
1105     II->Validate(CommentDelimiter, false);
1106     
1107     Matchables.push_back(II.take());
1108   }
1109
1110   // Build info for the register classes.
1111   BuildRegisterClasses(SingletonRegisters);
1112
1113   // Build info for the user defined assembly operand classes.
1114   BuildOperandClasses();
1115
1116   // Build the information about matchables, now that we have fully formed
1117   // classes.
1118   for (std::vector<MatchableInfo*>::iterator it = Matchables.begin(),
1119          ie = Matchables.end(); it != ie; ++it) {
1120     MatchableInfo *II = *it;
1121
1122     // Parse the tokens after the mnemonic.
1123     for (unsigned i = 0, e = II->AsmOperands.size(); i != e; ++i) {
1124       MatchableInfo::AsmOperand &Op = II->AsmOperands[i];
1125       StringRef Token = Op.Token;
1126
1127       // Check for singleton registers.
1128       if (Record *RegRecord = II->getSingletonRegisterForAsmOperand(i, *this)) {
1129         Op.Class = RegisterClasses[RegRecord];
1130         assert(Op.Class && Op.Class->Registers.size() == 1 &&
1131                "Unexpected class for singleton register");
1132         continue;
1133       }
1134
1135       // Check for simple tokens.
1136       if (Token[0] != '$') {
1137         Op.Class = getTokenClass(Token);
1138         continue;
1139       }
1140
1141       if (Token.size() > 1 && isdigit(Token[1])) {
1142         Op.Class = getTokenClass(Token);
1143         continue;
1144       }
1145       
1146       // Otherwise this is an operand reference.
1147       StringRef OperandName;
1148       if (Token[1] == '{')
1149         OperandName = Token.substr(2, Token.size() - 3);
1150       else
1151         OperandName = Token.substr(1);
1152       
1153       if (II->DefRec.is<const CodeGenInstruction*>())
1154         BuildInstructionOperandReference(II, OperandName, Op);
1155       else
1156         BuildAliasOperandReference(II, OperandName, Op);
1157     }
1158     
1159     if (II->DefRec.is<const CodeGenInstruction*>())
1160       II->BuildInstructionResultOperands();
1161     else
1162       II->BuildAliasResultOperands();
1163   }
1164
1165   // Reorder classes so that classes preceed super classes.
1166   std::sort(Classes.begin(), Classes.end(), less_ptr<ClassInfo>());
1167 }
1168
1169 /// BuildInstructionOperandReference - The specified operand is a reference to a
1170 /// named operand such as $src.  Resolve the Class and OperandInfo pointers.
1171 void AsmMatcherInfo::
1172 BuildInstructionOperandReference(MatchableInfo *II,
1173                                  StringRef OperandName,
1174                                  MatchableInfo::AsmOperand &Op) {
1175   const CodeGenInstruction &CGI = *II->DefRec.get<const CodeGenInstruction*>();
1176   const CGIOperandList &Operands = CGI.Operands;
1177   
1178   // Map this token to an operand.
1179   unsigned Idx;
1180   if (!Operands.hasOperandNamed(OperandName, Idx))
1181     throw TGError(II->TheDef->getLoc(), "error: unable to find operand: '" +
1182                   OperandName.str() + "'");
1183
1184   // Set up the operand class.
1185   Op.Class = getOperandClass(Operands[Idx]);
1186
1187   // If the named operand is tied, canonicalize it to the untied operand.
1188   // For example, something like:
1189   //   (outs GPR:$dst), (ins GPR:$src)
1190   // with an asmstring of
1191   //   "inc $src"
1192   // we want to canonicalize to:
1193   //   "inc $dst"
1194   // so that we know how to provide the $dst operand when filling in the result.
1195   int OITied = Operands[Idx].getTiedRegister();
1196   if (OITied != -1) {
1197     // The tied operand index is an MIOperand index, find the operand that
1198     // contains it.
1199     for (unsigned i = 0, e = Operands.size(); i != e; ++i) {
1200       if (Operands[i].MIOperandNo == unsigned(OITied)) {
1201         OperandName = Operands[i].Name;
1202         break;
1203       }
1204     }
1205   }
1206   
1207   Op.SrcOpName = OperandName;
1208 }
1209
1210 /// BuildAliasOperandReference - When parsing an operand reference out of the
1211 /// matching string (e.g. "movsx $src, $dst"), determine what the class of the
1212 /// operand reference is by looking it up in the result pattern definition.
1213 void AsmMatcherInfo::BuildAliasOperandReference(MatchableInfo *II,
1214                                                 StringRef OperandName,
1215                                                 MatchableInfo::AsmOperand &Op) {
1216   const CodeGenInstAlias &CGA = *II->DefRec.get<const CodeGenInstAlias*>();
1217    
1218   // Set up the operand class.
1219   for (unsigned i = 0, e = CGA.ResultOperands.size(); i != e; ++i)
1220     if (CGA.ResultOperands[i].isRecord() &&
1221         CGA.ResultOperands[i].getName() == OperandName) {
1222       // It's safe to go with the first one we find, because CodeGenInstAlias
1223       // validates that all operands with the same name have the same record.
1224       unsigned ResultIdx = CGA.ResultInstOperandIndex[i];
1225       Op.Class = getOperandClass(CGA.ResultInst->Operands[ResultIdx]);
1226       Op.SrcOpName = OperandName;
1227       return;
1228     }
1229
1230   throw TGError(II->TheDef->getLoc(), "error: unable to find operand: '" +
1231                 OperandName.str() + "'");
1232 }
1233
1234 void MatchableInfo::BuildInstructionResultOperands() {
1235   const CodeGenInstruction *ResultInst = getResultInst();
1236   
1237   // Loop over all operands of the result instruction, determining how to
1238   // populate them.
1239   for (unsigned i = 0, e = ResultInst->Operands.size(); i != e; ++i) {
1240     const CGIOperandList::OperandInfo &OpInfo = ResultInst->Operands[i];
1241
1242     // If this is a tied operand, just copy from the previously handled operand.
1243     int TiedOp = OpInfo.getTiedRegister();
1244     if (TiedOp != -1) {
1245       ResOperands.push_back(ResOperand::getTiedOp(TiedOp, &OpInfo));
1246       continue;
1247     }
1248     
1249     // Find out what operand from the asmparser that this MCInst operand comes
1250     // from.
1251     int SrcOperand = FindAsmOperandNamed(OpInfo.Name);
1252
1253     if (!OpInfo.Name.empty() && SrcOperand != -1) {
1254       ResOperands.push_back(ResOperand::getRenderedOp(SrcOperand, &OpInfo));
1255       continue;
1256     }
1257     
1258     throw TGError(TheDef->getLoc(), "Instruction '" +
1259                   TheDef->getName() + "' has operand '" + OpInfo.Name +
1260                   "' that doesn't appear in asm string!");
1261   }
1262 }
1263
1264 void MatchableInfo::BuildAliasResultOperands() {
1265   const CodeGenInstAlias &CGA = *DefRec.get<const CodeGenInstAlias*>();
1266   const CodeGenInstruction *ResultInst = getResultInst();
1267   
1268   // Loop over all operands of the result instruction, determining how to
1269   // populate them.
1270   unsigned AliasOpNo = 0;
1271   for (unsigned i = 0, e = ResultInst->Operands.size(); i != e; ++i) {
1272     const CGIOperandList::OperandInfo &OpInfo = ResultInst->Operands[i];
1273     
1274     // If this is a tied operand, just copy from the previously handled operand.
1275     int TiedOp = OpInfo.getTiedRegister();
1276     if (TiedOp != -1) {
1277       ResOperands.push_back(ResOperand::getTiedOp(TiedOp, &OpInfo));
1278       continue;
1279     }
1280     
1281     // Find out what operand from the asmparser that this MCInst operand comes
1282     // from.
1283     switch (CGA.ResultOperands[AliasOpNo].Kind) {
1284     case CodeGenInstAlias::ResultOperand::K_Record: {
1285       StringRef Name = CGA.ResultOperands[AliasOpNo++].getName();
1286       int SrcOperand = FindAsmOperandNamed(Name);
1287       if (SrcOperand != -1) {
1288         ResOperands.push_back(ResOperand::getRenderedOp(SrcOperand, &OpInfo));
1289         continue;
1290       }
1291       
1292       throw TGError(TheDef->getLoc(), "Instruction '" +
1293                     TheDef->getName() + "' has operand '" + OpInfo.Name +
1294                     "' that doesn't appear in asm string!");
1295     }
1296     case CodeGenInstAlias::ResultOperand::K_Imm: {
1297       int64_t ImmVal = CGA.ResultOperands[AliasOpNo++].getImm();
1298       ResOperands.push_back(ResOperand::getImmOp(ImmVal, &OpInfo));
1299       continue;
1300     }
1301
1302     case CodeGenInstAlias::ResultOperand::K_Reg: {
1303       Record *Reg = CGA.ResultOperands[AliasOpNo++].getRegister();
1304       ResOperands.push_back(ResOperand::getRegOp(Reg, &OpInfo));
1305       continue;
1306     }
1307     }
1308   }
1309 }
1310
1311 static void EmitConvertToMCInst(CodeGenTarget &Target,
1312                                 std::vector<MatchableInfo*> &Infos,
1313                                 raw_ostream &OS) {
1314   // Write the convert function to a separate stream, so we can drop it after
1315   // the enum.
1316   std::string ConvertFnBody;
1317   raw_string_ostream CvtOS(ConvertFnBody);
1318
1319   // Function we have already generated.
1320   std::set<std::string> GeneratedFns;
1321
1322   // Start the unified conversion function.
1323   CvtOS << "static void ConvertToMCInst(ConversionKind Kind, MCInst &Inst, "
1324         << "unsigned Opcode,\n"
1325         << "                      const SmallVectorImpl<MCParsedAsmOperand*"
1326         << "> &Operands) {\n";
1327   CvtOS << "  Inst.setOpcode(Opcode);\n";
1328   CvtOS << "  switch (Kind) {\n";
1329   CvtOS << "  default:\n";
1330
1331   // Start the enum, which we will generate inline.
1332
1333   OS << "// Unified function for converting operands to MCInst instances.\n\n";
1334   OS << "enum ConversionKind {\n";
1335
1336   // TargetOperandClass - This is the target's operand class, like X86Operand.
1337   std::string TargetOperandClass = Target.getName() + "Operand";
1338
1339   for (std::vector<MatchableInfo*>::const_iterator it = Infos.begin(),
1340          ie = Infos.end(); it != ie; ++it) {
1341     MatchableInfo &II = **it;
1342
1343     // Build the conversion function signature.
1344     std::string Signature = "Convert";
1345     std::string CaseBody;
1346     raw_string_ostream CaseOS(CaseBody);
1347     
1348     // Compute the convert enum and the case body.
1349     for (unsigned i = 0, e = II.ResOperands.size(); i != e; ++i) {
1350       const MatchableInfo::ResOperand &OpInfo = II.ResOperands[i];
1351
1352       // Generate code to populate each result operand.
1353       switch (OpInfo.Kind) {
1354       case MatchableInfo::ResOperand::RenderAsmOperand: {
1355         // This comes from something we parsed.
1356         MatchableInfo::AsmOperand &Op = II.AsmOperands[OpInfo.AsmOperandNum];
1357         
1358         // Registers are always converted the same, don't duplicate the
1359         // conversion function based on them.
1360         Signature += "__";
1361         if (Op.Class->isRegisterClass())
1362           Signature += "Reg";
1363         else
1364           Signature += Op.Class->ClassName;
1365         Signature += utostr(OpInfo.OpInfo->MINumOperands);
1366         Signature += "_" + itostr(OpInfo.AsmOperandNum);
1367         
1368         CaseOS << "    ((" << TargetOperandClass << "*)Operands["
1369                << (OpInfo.AsmOperandNum+1) << "])->" << Op.Class->RenderMethod
1370                << "(Inst, " << OpInfo.OpInfo->MINumOperands << ");\n";
1371         break;
1372       }
1373           
1374       case MatchableInfo::ResOperand::TiedOperand: {
1375         // If this operand is tied to a previous one, just copy the MCInst
1376         // operand from the earlier one.We can only tie single MCOperand values.
1377       //assert(OpInfo.OpInfo->MINumOperands == 1 && "Not a singular MCOperand");
1378         unsigned TiedOp = OpInfo.TiedOperandNum;
1379         assert(i > TiedOp && "Tied operand preceeds its target!");
1380         CaseOS << "    Inst.addOperand(Inst.getOperand(" << TiedOp << "));\n";
1381         Signature += "__Tie" + utostr(TiedOp);
1382         break;
1383       }
1384       case MatchableInfo::ResOperand::ImmOperand: {
1385         int64_t Val = OpInfo.ImmVal;
1386         CaseOS << "    Inst.addOperand(MCOperand::CreateImm(" << Val << "));\n";
1387         Signature += "__imm" + itostr(Val);
1388         break;
1389       }
1390       case MatchableInfo::ResOperand::RegOperand: {
1391         if (OpInfo.Register == 0) {
1392           CaseOS << "    Inst.addOperand(MCOperand::CreateReg(0));\n";
1393           Signature += "__reg0";
1394         } else {
1395           std::string N = getQualifiedName(OpInfo.Register);
1396           CaseOS << "    Inst.addOperand(MCOperand::CreateReg(" << N << "));\n";
1397           Signature += "__reg" + OpInfo.Register->getName();
1398         }
1399       }  
1400       }
1401     }
1402     
1403     II.ConversionFnKind = Signature;
1404
1405     // Check if we have already generated this signature.
1406     if (!GeneratedFns.insert(Signature).second)
1407       continue;
1408
1409     // If not, emit it now.  Add to the enum list.
1410     OS << "  " << Signature << ",\n";
1411
1412     CvtOS << "  case " << Signature << ":\n";
1413     CvtOS << CaseOS.str();
1414     CvtOS << "    return;\n";
1415   }
1416
1417   // Finish the convert function.
1418
1419   CvtOS << "  }\n";
1420   CvtOS << "}\n\n";
1421
1422   // Finish the enum, and drop the convert function after it.
1423
1424   OS << "  NumConversionVariants\n";
1425   OS << "};\n\n";
1426
1427   OS << CvtOS.str();
1428 }
1429
1430 /// EmitMatchClassEnumeration - Emit the enumeration for match class kinds.
1431 static void EmitMatchClassEnumeration(CodeGenTarget &Target,
1432                                       std::vector<ClassInfo*> &Infos,
1433                                       raw_ostream &OS) {
1434   OS << "namespace {\n\n";
1435
1436   OS << "/// MatchClassKind - The kinds of classes which participate in\n"
1437      << "/// instruction matching.\n";
1438   OS << "enum MatchClassKind {\n";
1439   OS << "  InvalidMatchClass = 0,\n";
1440   for (std::vector<ClassInfo*>::iterator it = Infos.begin(),
1441          ie = Infos.end(); it != ie; ++it) {
1442     ClassInfo &CI = **it;
1443     OS << "  " << CI.Name << ", // ";
1444     if (CI.Kind == ClassInfo::Token) {
1445       OS << "'" << CI.ValueName << "'\n";
1446     } else if (CI.isRegisterClass()) {
1447       if (!CI.ValueName.empty())
1448         OS << "register class '" << CI.ValueName << "'\n";
1449       else
1450         OS << "derived register class\n";
1451     } else {
1452       OS << "user defined class '" << CI.ValueName << "'\n";
1453     }
1454   }
1455   OS << "  NumMatchClassKinds\n";
1456   OS << "};\n\n";
1457
1458   OS << "}\n\n";
1459 }
1460
1461 /// EmitClassifyOperand - Emit the function to classify an operand.
1462 static void EmitClassifyOperand(AsmMatcherInfo &Info,
1463                                 raw_ostream &OS) {
1464   OS << "static MatchClassKind ClassifyOperand(MCParsedAsmOperand *GOp) {\n"
1465      << "  " << Info.Target.getName() << "Operand &Operand = *("
1466      << Info.Target.getName() << "Operand*)GOp;\n";
1467
1468   // Classify tokens.
1469   OS << "  if (Operand.isToken())\n";
1470   OS << "    return MatchTokenString(Operand.getToken());\n\n";
1471
1472   // Classify registers.
1473   //
1474   // FIXME: Don't hardcode isReg, getReg.
1475   OS << "  if (Operand.isReg()) {\n";
1476   OS << "    switch (Operand.getReg()) {\n";
1477   OS << "    default: return InvalidMatchClass;\n";
1478   for (std::map<Record*, ClassInfo*>::iterator
1479          it = Info.RegisterClasses.begin(), ie = Info.RegisterClasses.end();
1480        it != ie; ++it)
1481     OS << "    case " << Info.Target.getName() << "::"
1482        << it->first->getName() << ": return " << it->second->Name << ";\n";
1483   OS << "    }\n";
1484   OS << "  }\n\n";
1485
1486   // Classify user defined operands.  To do so, we need to perform a topological
1487   // sort of the superclass relationship graph so that we always match the 
1488   // narrowest type first.
1489   
1490   // Collect the incoming edge counts for each class.
1491   std::map<ClassInfo*, unsigned> IncomingEdges;
1492   for (std::vector<ClassInfo*>::iterator it = Info.Classes.begin(),
1493          ie = Info.Classes.end(); it != ie; ++it) {
1494     ClassInfo &CI = **it;
1495
1496     if (!CI.isUserClass())
1497       continue;
1498     
1499     for (std::vector<ClassInfo*>::iterator SI = CI.SuperClasses.begin(),
1500          SE = CI.SuperClasses.end(); SI != SE; ++SI)
1501       ++IncomingEdges[*SI];
1502   }
1503   
1504   // Initialize a worklist of classes with no incoming edges.
1505   std::vector<ClassInfo*> LeafClasses;
1506   for (std::vector<ClassInfo*>::iterator it = Info.Classes.begin(),
1507          ie = Info.Classes.end(); it != ie; ++it) {
1508     if (!IncomingEdges[*it])
1509       LeafClasses.push_back(*it);
1510   }
1511   
1512   // Iteratively pop the list, process that class, and update the incoming
1513   // edge counts for its super classes.  When a superclass reaches zero
1514   // incoming edges, push it onto the worklist for processing.
1515   while (!LeafClasses.empty()) {
1516     ClassInfo &CI = *LeafClasses.back();
1517     LeafClasses.pop_back();
1518     
1519     if (!CI.isUserClass())
1520       continue;
1521     
1522     OS << "  // '" << CI.ClassName << "' class";
1523     if (!CI.SuperClasses.empty()) {
1524       OS << ", subclass of ";
1525       for (unsigned i = 0, e = CI.SuperClasses.size(); i != e; ++i) {
1526         if (i) OS << ", ";
1527         OS << "'" << CI.SuperClasses[i]->ClassName << "'";
1528         assert(CI < *CI.SuperClasses[i] && "Invalid class relation!");
1529         
1530         --IncomingEdges[CI.SuperClasses[i]];
1531         if (!IncomingEdges[CI.SuperClasses[i]])
1532           LeafClasses.push_back(CI.SuperClasses[i]);
1533       }
1534     }
1535     OS << "\n";
1536
1537     OS << "  if (Operand." << CI.PredicateMethod << "()) {\n";
1538
1539     // Validate subclass relationships.
1540     if (!CI.SuperClasses.empty()) {
1541       for (unsigned i = 0, e = CI.SuperClasses.size(); i != e; ++i)
1542         OS << "    assert(Operand." << CI.SuperClasses[i]->PredicateMethod
1543            << "() && \"Invalid class relationship!\");\n";
1544     }
1545     
1546     OS << "    return " << CI.Name << ";\n";
1547     OS << "  }\n\n";
1548   }
1549   
1550   OS << "  return InvalidMatchClass;\n";
1551   OS << "}\n\n";
1552 }
1553
1554 /// EmitIsSubclass - Emit the subclass predicate function.
1555 static void EmitIsSubclass(CodeGenTarget &Target,
1556                            std::vector<ClassInfo*> &Infos,
1557                            raw_ostream &OS) {
1558   OS << "/// IsSubclass - Compute whether \\arg A is a subclass of \\arg B.\n";
1559   OS << "static bool IsSubclass(MatchClassKind A, MatchClassKind B) {\n";
1560   OS << "  if (A == B)\n";
1561   OS << "    return true;\n\n";
1562
1563   OS << "  switch (A) {\n";
1564   OS << "  default:\n";
1565   OS << "    return false;\n";
1566   for (std::vector<ClassInfo*>::iterator it = Infos.begin(),
1567          ie = Infos.end(); it != ie; ++it) {
1568     ClassInfo &A = **it;
1569
1570     if (A.Kind != ClassInfo::Token) {
1571       std::vector<StringRef> SuperClasses;
1572       for (std::vector<ClassInfo*>::iterator it = Infos.begin(),
1573              ie = Infos.end(); it != ie; ++it) {
1574         ClassInfo &B = **it;
1575
1576         if (&A != &B && A.isSubsetOf(B))
1577           SuperClasses.push_back(B.Name);
1578       }
1579
1580       if (SuperClasses.empty())
1581         continue;
1582
1583       OS << "\n  case " << A.Name << ":\n";
1584
1585       if (SuperClasses.size() == 1) {
1586         OS << "    return B == " << SuperClasses.back() << ";\n";
1587         continue;
1588       }
1589
1590       OS << "    switch (B) {\n";
1591       OS << "    default: return false;\n";
1592       for (unsigned i = 0, e = SuperClasses.size(); i != e; ++i)
1593         OS << "    case " << SuperClasses[i] << ": return true;\n";
1594       OS << "    }\n";
1595     }
1596   }
1597   OS << "  }\n";
1598   OS << "}\n\n";
1599 }
1600
1601
1602
1603 /// EmitMatchTokenString - Emit the function to match a token string to the
1604 /// appropriate match class value.
1605 static void EmitMatchTokenString(CodeGenTarget &Target,
1606                                  std::vector<ClassInfo*> &Infos,
1607                                  raw_ostream &OS) {
1608   // Construct the match list.
1609   std::vector<StringMatcher::StringPair> Matches;
1610   for (std::vector<ClassInfo*>::iterator it = Infos.begin(),
1611          ie = Infos.end(); it != ie; ++it) {
1612     ClassInfo &CI = **it;
1613
1614     if (CI.Kind == ClassInfo::Token)
1615       Matches.push_back(StringMatcher::StringPair(CI.ValueName,
1616                                                   "return " + CI.Name + ";"));
1617   }
1618
1619   OS << "static MatchClassKind MatchTokenString(StringRef Name) {\n";
1620
1621   StringMatcher("Name", Matches, OS).Emit();
1622
1623   OS << "  return InvalidMatchClass;\n";
1624   OS << "}\n\n";
1625 }
1626
1627 /// EmitMatchRegisterName - Emit the function to match a string to the target
1628 /// specific register enum.
1629 static void EmitMatchRegisterName(CodeGenTarget &Target, Record *AsmParser,
1630                                   raw_ostream &OS) {
1631   // Construct the match list.
1632   std::vector<StringMatcher::StringPair> Matches;
1633   for (unsigned i = 0, e = Target.getRegisters().size(); i != e; ++i) {
1634     const CodeGenRegister &Reg = Target.getRegisters()[i];
1635     if (Reg.TheDef->getValueAsString("AsmName").empty())
1636       continue;
1637
1638     Matches.push_back(StringMatcher::StringPair(
1639                                         Reg.TheDef->getValueAsString("AsmName"),
1640                                         "return " + utostr(i + 1) + ";"));
1641   }
1642
1643   OS << "static unsigned MatchRegisterName(StringRef Name) {\n";
1644
1645   StringMatcher("Name", Matches, OS).Emit();
1646
1647   OS << "  return 0;\n";
1648   OS << "}\n\n";
1649 }
1650
1651 /// EmitSubtargetFeatureFlagEnumeration - Emit the subtarget feature flag
1652 /// definitions.
1653 static void EmitSubtargetFeatureFlagEnumeration(AsmMatcherInfo &Info,
1654                                                 raw_ostream &OS) {
1655   OS << "// Flags for subtarget features that participate in "
1656      << "instruction matching.\n";
1657   OS << "enum SubtargetFeatureFlag {\n";
1658   for (std::map<Record*, SubtargetFeatureInfo*>::const_iterator
1659          it = Info.SubtargetFeatures.begin(),
1660          ie = Info.SubtargetFeatures.end(); it != ie; ++it) {
1661     SubtargetFeatureInfo &SFI = *it->second;
1662     OS << "  " << SFI.getEnumName() << " = (1 << " << SFI.Index << "),\n";
1663   }
1664   OS << "  Feature_None = 0\n";
1665   OS << "};\n\n";
1666 }
1667
1668 /// EmitComputeAvailableFeatures - Emit the function to compute the list of
1669 /// available features given a subtarget.
1670 static void EmitComputeAvailableFeatures(AsmMatcherInfo &Info,
1671                                          raw_ostream &OS) {
1672   std::string ClassName =
1673     Info.AsmParser->getValueAsString("AsmParserClassName");
1674
1675   OS << "unsigned " << Info.Target.getName() << ClassName << "::\n"
1676      << "ComputeAvailableFeatures(const " << Info.Target.getName()
1677      << "Subtarget *Subtarget) const {\n";
1678   OS << "  unsigned Features = 0;\n";
1679   for (std::map<Record*, SubtargetFeatureInfo*>::const_iterator
1680          it = Info.SubtargetFeatures.begin(),
1681          ie = Info.SubtargetFeatures.end(); it != ie; ++it) {
1682     SubtargetFeatureInfo &SFI = *it->second;
1683     OS << "  if (" << SFI.TheDef->getValueAsString("CondString")
1684        << ")\n";
1685     OS << "    Features |= " << SFI.getEnumName() << ";\n";
1686   }
1687   OS << "  return Features;\n";
1688   OS << "}\n\n";
1689 }
1690
1691 static std::string GetAliasRequiredFeatures(Record *R,
1692                                             const AsmMatcherInfo &Info) {
1693   std::vector<Record*> ReqFeatures = R->getValueAsListOfDefs("Predicates");
1694   std::string Result;
1695   unsigned NumFeatures = 0;
1696   for (unsigned i = 0, e = ReqFeatures.size(); i != e; ++i) {
1697     SubtargetFeatureInfo *F = Info.getSubtargetFeature(ReqFeatures[i]);
1698     
1699     if (F == 0)
1700       throw TGError(R->getLoc(), "Predicate '" + ReqFeatures[i]->getName() +
1701                     "' is not marked as an AssemblerPredicate!");
1702     
1703     if (NumFeatures)
1704       Result += '|';
1705   
1706     Result += F->getEnumName();
1707     ++NumFeatures;
1708   }
1709   
1710   if (NumFeatures > 1)
1711     Result = '(' + Result + ')';
1712   return Result;
1713 }
1714
1715 /// EmitMnemonicAliases - If the target has any MnemonicAlias<> definitions,
1716 /// emit a function for them and return true, otherwise return false.
1717 static bool EmitMnemonicAliases(raw_ostream &OS, const AsmMatcherInfo &Info) {
1718   // Ignore aliases when match-prefix is set.
1719   if (!MatchPrefix.empty())
1720     return false;
1721
1722   std::vector<Record*> Aliases =
1723     Info.getRecords().getAllDerivedDefinitions("MnemonicAlias");
1724   if (Aliases.empty()) return false;
1725
1726   OS << "static void ApplyMnemonicAliases(StringRef &Mnemonic, "
1727         "unsigned Features) {\n";
1728   
1729   // Keep track of all the aliases from a mnemonic.  Use an std::map so that the
1730   // iteration order of the map is stable.
1731   std::map<std::string, std::vector<Record*> > AliasesFromMnemonic;
1732   
1733   for (unsigned i = 0, e = Aliases.size(); i != e; ++i) {
1734     Record *R = Aliases[i];
1735     AliasesFromMnemonic[R->getValueAsString("FromMnemonic")].push_back(R);
1736   }
1737
1738   // Process each alias a "from" mnemonic at a time, building the code executed
1739   // by the string remapper.
1740   std::vector<StringMatcher::StringPair> Cases;
1741   for (std::map<std::string, std::vector<Record*> >::iterator
1742        I = AliasesFromMnemonic.begin(), E = AliasesFromMnemonic.end();
1743        I != E; ++I) {
1744     const std::vector<Record*> &ToVec = I->second;
1745
1746     // Loop through each alias and emit code that handles each case.  If there
1747     // are two instructions without predicates, emit an error.  If there is one,
1748     // emit it last.
1749     std::string MatchCode;
1750     int AliasWithNoPredicate = -1;
1751     
1752     for (unsigned i = 0, e = ToVec.size(); i != e; ++i) {
1753       Record *R = ToVec[i];
1754       std::string FeatureMask = GetAliasRequiredFeatures(R, Info);
1755     
1756       // If this unconditionally matches, remember it for later and diagnose
1757       // duplicates.
1758       if (FeatureMask.empty()) {
1759         if (AliasWithNoPredicate != -1) {
1760           // We can't have two aliases from the same mnemonic with no predicate.
1761           PrintError(ToVec[AliasWithNoPredicate]->getLoc(),
1762                      "two MnemonicAliases with the same 'from' mnemonic!");
1763           throw TGError(R->getLoc(), "this is the other MnemonicAlias.");
1764         }
1765         
1766         AliasWithNoPredicate = i;
1767         continue;
1768       }
1769      
1770       if (!MatchCode.empty())
1771         MatchCode += "else ";
1772       MatchCode += "if ((Features & " + FeatureMask + ") == "+FeatureMask+")\n";
1773       MatchCode += "  Mnemonic = \"" +R->getValueAsString("ToMnemonic")+"\";\n";
1774     }
1775     
1776     if (AliasWithNoPredicate != -1) {
1777       Record *R = ToVec[AliasWithNoPredicate];
1778       if (!MatchCode.empty())
1779         MatchCode += "else\n  ";
1780       MatchCode += "Mnemonic = \"" + R->getValueAsString("ToMnemonic")+"\";\n";
1781     }
1782     
1783     MatchCode += "return;";
1784
1785     Cases.push_back(std::make_pair(I->first, MatchCode));
1786   }
1787   
1788   
1789   StringMatcher("Mnemonic", Cases, OS).Emit();
1790   OS << "}\n\n";
1791   
1792   return true;
1793 }
1794
1795 void AsmMatcherEmitter::run(raw_ostream &OS) {
1796   CodeGenTarget Target(Records);
1797   Record *AsmParser = Target.getAsmParser();
1798   std::string ClassName = AsmParser->getValueAsString("AsmParserClassName");
1799
1800   // Compute the information on the instructions to match.
1801   AsmMatcherInfo Info(AsmParser, Target, Records);
1802   Info.BuildInfo();
1803
1804   // Sort the instruction table using the partial order on classes. We use
1805   // stable_sort to ensure that ambiguous instructions are still
1806   // deterministically ordered.
1807   std::stable_sort(Info.Matchables.begin(), Info.Matchables.end(),
1808                    less_ptr<MatchableInfo>());
1809
1810   DEBUG_WITH_TYPE("instruction_info", {
1811       for (std::vector<MatchableInfo*>::iterator
1812              it = Info.Matchables.begin(), ie = Info.Matchables.end();
1813            it != ie; ++it)
1814         (*it)->dump();
1815     });
1816
1817   // Check for ambiguous matchables.
1818   DEBUG_WITH_TYPE("ambiguous_instrs", {
1819     unsigned NumAmbiguous = 0;
1820     for (unsigned i = 0, e = Info.Matchables.size(); i != e; ++i) {
1821       for (unsigned j = i + 1; j != e; ++j) {
1822         MatchableInfo &A = *Info.Matchables[i];
1823         MatchableInfo &B = *Info.Matchables[j];
1824
1825         if (A.CouldMatchAmiguouslyWith(B)) {
1826           errs() << "warning: ambiguous matchables:\n";
1827           A.dump();
1828           errs() << "\nis incomparable with:\n";
1829           B.dump();
1830           errs() << "\n\n";
1831           ++NumAmbiguous;
1832         }
1833       }
1834     }
1835     if (NumAmbiguous)
1836       errs() << "warning: " << NumAmbiguous
1837              << " ambiguous matchables!\n";
1838   });
1839
1840   // Write the output.
1841
1842   EmitSourceFileHeader("Assembly Matcher Source Fragment", OS);
1843
1844   // Information for the class declaration.
1845   OS << "\n#ifdef GET_ASSEMBLER_HEADER\n";
1846   OS << "#undef GET_ASSEMBLER_HEADER\n";
1847   OS << "  // This should be included into the middle of the declaration of \n";
1848   OS << "  // your subclasses implementation of TargetAsmParser.\n";
1849   OS << "  unsigned ComputeAvailableFeatures(const " <<
1850            Target.getName() << "Subtarget *Subtarget) const;\n";
1851   OS << "  enum MatchResultTy {\n";
1852   OS << "    Match_Success, Match_MnemonicFail, Match_InvalidOperand,\n";
1853   OS << "    Match_MissingFeature\n";
1854   OS << "  };\n";
1855   OS << "  MatchResultTy MatchInstructionImpl(\n";
1856   OS << "    const SmallVectorImpl<MCParsedAsmOperand*> &Operands,\n";
1857   OS << "    MCInst &Inst, unsigned &ErrorInfo);\n\n";
1858   OS << "#endif // GET_ASSEMBLER_HEADER_INFO\n\n";
1859
1860   OS << "\n#ifdef GET_REGISTER_MATCHER\n";
1861   OS << "#undef GET_REGISTER_MATCHER\n\n";
1862
1863   // Emit the subtarget feature enumeration.
1864   EmitSubtargetFeatureFlagEnumeration(Info, OS);
1865
1866   // Emit the function to match a register name to number.
1867   EmitMatchRegisterName(Target, AsmParser, OS);
1868
1869   OS << "#endif // GET_REGISTER_MATCHER\n\n";
1870
1871
1872   OS << "\n#ifdef GET_MATCHER_IMPLEMENTATION\n";
1873   OS << "#undef GET_MATCHER_IMPLEMENTATION\n\n";
1874
1875   // Generate the function that remaps for mnemonic aliases.
1876   bool HasMnemonicAliases = EmitMnemonicAliases(OS, Info);
1877   
1878   // Generate the unified function to convert operands into an MCInst.
1879   EmitConvertToMCInst(Target, Info.Matchables, OS);
1880
1881   // Emit the enumeration for classes which participate in matching.
1882   EmitMatchClassEnumeration(Target, Info.Classes, OS);
1883
1884   // Emit the routine to match token strings to their match class.
1885   EmitMatchTokenString(Target, Info.Classes, OS);
1886
1887   // Emit the routine to classify an operand.
1888   EmitClassifyOperand(Info, OS);
1889
1890   // Emit the subclass predicate routine.
1891   EmitIsSubclass(Target, Info.Classes, OS);
1892
1893   // Emit the available features compute function.
1894   EmitComputeAvailableFeatures(Info, OS);
1895
1896
1897   size_t MaxNumOperands = 0;
1898   for (std::vector<MatchableInfo*>::const_iterator it =
1899          Info.Matchables.begin(), ie = Info.Matchables.end();
1900        it != ie; ++it)
1901     MaxNumOperands = std::max(MaxNumOperands, (*it)->AsmOperands.size());
1902
1903
1904   // Emit the static match table; unused classes get initalized to 0 which is
1905   // guaranteed to be InvalidMatchClass.
1906   //
1907   // FIXME: We can reduce the size of this table very easily. First, we change
1908   // it so that store the kinds in separate bit-fields for each index, which
1909   // only needs to be the max width used for classes at that index (we also need
1910   // to reject based on this during classification). If we then make sure to
1911   // order the match kinds appropriately (putting mnemonics last), then we
1912   // should only end up using a few bits for each class, especially the ones
1913   // following the mnemonic.
1914   OS << "namespace {\n";
1915   OS << "  struct MatchEntry {\n";
1916   OS << "    unsigned Opcode;\n";
1917   OS << "    const char *Mnemonic;\n";
1918   OS << "    ConversionKind ConvertFn;\n";
1919   OS << "    MatchClassKind Classes[" << MaxNumOperands << "];\n";
1920   OS << "    unsigned RequiredFeatures;\n";
1921   OS << "  };\n\n";
1922
1923   OS << "// Predicate for searching for an opcode.\n";
1924   OS << "  struct LessOpcode {\n";
1925   OS << "    bool operator()(const MatchEntry &LHS, StringRef RHS) {\n";
1926   OS << "      return StringRef(LHS.Mnemonic) < RHS;\n";
1927   OS << "    }\n";
1928   OS << "    bool operator()(StringRef LHS, const MatchEntry &RHS) {\n";
1929   OS << "      return LHS < StringRef(RHS.Mnemonic);\n";
1930   OS << "    }\n";
1931   OS << "    bool operator()(const MatchEntry &LHS, const MatchEntry &RHS) {\n";
1932   OS << "      return StringRef(LHS.Mnemonic) < StringRef(RHS.Mnemonic);\n";
1933   OS << "    }\n";
1934   OS << "  };\n";
1935
1936   OS << "} // end anonymous namespace.\n\n";
1937
1938   OS << "static const MatchEntry MatchTable["
1939      << Info.Matchables.size() << "] = {\n";
1940
1941   for (std::vector<MatchableInfo*>::const_iterator it =
1942        Info.Matchables.begin(), ie = Info.Matchables.end();
1943        it != ie; ++it) {
1944     MatchableInfo &II = **it;
1945
1946
1947     OS << "  { " << Target.getName() << "::"
1948        << II.getResultInst()->TheDef->getName() << ", \"" << II.Mnemonic << "\""
1949        << ", " << II.ConversionFnKind << ", { ";
1950     for (unsigned i = 0, e = II.AsmOperands.size(); i != e; ++i) {
1951       MatchableInfo::AsmOperand &Op = II.AsmOperands[i];
1952
1953       if (i) OS << ", ";
1954       OS << Op.Class->Name;
1955     }
1956     OS << " }, ";
1957
1958     // Write the required features mask.
1959     if (!II.RequiredFeatures.empty()) {
1960       for (unsigned i = 0, e = II.RequiredFeatures.size(); i != e; ++i) {
1961         if (i) OS << "|";
1962         OS << II.RequiredFeatures[i]->getEnumName();
1963       }
1964     } else
1965       OS << "0";
1966
1967     OS << "},\n";
1968   }
1969
1970   OS << "};\n\n";
1971
1972   // Finally, build the match function.
1973   OS << Target.getName() << ClassName << "::MatchResultTy "
1974      << Target.getName() << ClassName << "::\n"
1975      << "MatchInstructionImpl(const SmallVectorImpl<MCParsedAsmOperand*>"
1976      << " &Operands,\n";
1977   OS << "                     MCInst &Inst, unsigned &ErrorInfo) {\n";
1978
1979   // Emit code to get the available features.
1980   OS << "  // Get the current feature set.\n";
1981   OS << "  unsigned AvailableFeatures = getAvailableFeatures();\n\n";
1982
1983   OS << "  // Get the instruction mnemonic, which is the first token.\n";
1984   OS << "  StringRef Mnemonic = ((" << Target.getName()
1985      << "Operand*)Operands[0])->getToken();\n\n";
1986
1987   if (HasMnemonicAliases) {
1988     OS << "  // Process all MnemonicAliases to remap the mnemonic.\n";
1989     OS << "  ApplyMnemonicAliases(Mnemonic, AvailableFeatures);\n\n";
1990   }
1991   
1992   // Emit code to compute the class list for this operand vector.
1993   OS << "  // Eliminate obvious mismatches.\n";
1994   OS << "  if (Operands.size() > " << (MaxNumOperands+1) << ") {\n";
1995   OS << "    ErrorInfo = " << (MaxNumOperands+1) << ";\n";
1996   OS << "    return Match_InvalidOperand;\n";
1997   OS << "  }\n\n";
1998
1999   OS << "  // Compute the class list for this operand vector.\n";
2000   OS << "  MatchClassKind Classes[" << MaxNumOperands << "];\n";
2001   OS << "  for (unsigned i = 1, e = Operands.size(); i != e; ++i) {\n";
2002   OS << "    Classes[i-1] = ClassifyOperand(Operands[i]);\n\n";
2003
2004   OS << "    // Check for invalid operands before matching.\n";
2005   OS << "    if (Classes[i-1] == InvalidMatchClass) {\n";
2006   OS << "      ErrorInfo = i;\n";
2007   OS << "      return Match_InvalidOperand;\n";
2008   OS << "    }\n";
2009   OS << "  }\n\n";
2010
2011   OS << "  // Mark unused classes.\n";
2012   OS << "  for (unsigned i = Operands.size()-1, e = " << MaxNumOperands << "; "
2013      << "i != e; ++i)\n";
2014   OS << "    Classes[i] = InvalidMatchClass;\n\n";
2015
2016   OS << "  // Some state to try to produce better error messages.\n";
2017   OS << "  bool HadMatchOtherThanFeatures = false;\n\n";
2018   OS << "  // Set ErrorInfo to the operand that mismatches if it is \n";
2019   OS << "  // wrong for all instances of the instruction.\n";
2020   OS << "  ErrorInfo = ~0U;\n";
2021
2022   // Emit code to search the table.
2023   OS << "  // Search the table.\n";
2024   OS << "  std::pair<const MatchEntry*, const MatchEntry*> MnemonicRange =\n";
2025   OS << "    std::equal_range(MatchTable, MatchTable+"
2026      << Info.Matchables.size() << ", Mnemonic, LessOpcode());\n\n";
2027
2028   OS << "  // Return a more specific error code if no mnemonics match.\n";
2029   OS << "  if (MnemonicRange.first == MnemonicRange.second)\n";
2030   OS << "    return Match_MnemonicFail;\n\n";
2031
2032   OS << "  for (const MatchEntry *it = MnemonicRange.first, "
2033      << "*ie = MnemonicRange.second;\n";
2034   OS << "       it != ie; ++it) {\n";
2035
2036   OS << "    // equal_range guarantees that instruction mnemonic matches.\n";
2037   OS << "    assert(Mnemonic == it->Mnemonic);\n";
2038
2039   // Emit check that the subclasses match.
2040   OS << "    bool OperandsValid = true;\n";
2041   OS << "    for (unsigned i = 0; i != " << MaxNumOperands << "; ++i) {\n";
2042   OS << "      if (IsSubclass(Classes[i], it->Classes[i]))\n";
2043   OS << "        continue;\n";
2044   OS << "      // If this operand is broken for all of the instances of this\n";
2045   OS << "      // mnemonic, keep track of it so we can report loc info.\n";
2046   OS << "      if (it == MnemonicRange.first || ErrorInfo == i+1)\n";
2047   OS << "        ErrorInfo = i+1;\n";
2048   OS << "      else\n";
2049   OS << "        ErrorInfo = ~0U;";
2050   OS << "      // Otherwise, just reject this instance of the mnemonic.\n";
2051   OS << "      OperandsValid = false;\n";
2052   OS << "      break;\n";
2053   OS << "    }\n\n";
2054
2055   OS << "    if (!OperandsValid) continue;\n";
2056
2057   // Emit check that the required features are available.
2058   OS << "    if ((AvailableFeatures & it->RequiredFeatures) "
2059      << "!= it->RequiredFeatures) {\n";
2060   OS << "      HadMatchOtherThanFeatures = true;\n";
2061   OS << "      continue;\n";
2062   OS << "    }\n";
2063
2064   OS << "\n";
2065   OS << "    ConvertToMCInst(it->ConvertFn, Inst, it->Opcode, Operands);\n";
2066
2067   // Call the post-processing function, if used.
2068   std::string InsnCleanupFn =
2069     AsmParser->getValueAsString("AsmParserInstCleanup");
2070   if (!InsnCleanupFn.empty())
2071     OS << "    " << InsnCleanupFn << "(Inst);\n";
2072
2073   OS << "    return Match_Success;\n";
2074   OS << "  }\n\n";
2075
2076   OS << "  // Okay, we had no match.  Try to return a useful error code.\n";
2077   OS << "  if (HadMatchOtherThanFeatures) return Match_MissingFeature;\n";
2078   OS << "  return Match_InvalidOperand;\n";
2079   OS << "}\n\n";
2080
2081   OS << "#endif // GET_MATCHER_IMPLEMENTATION\n\n";
2082 }