1 //===-- FileParser.y - Parser for TableGen files ----------------*- C++ -*-===//
3 // This file implements the bison parser for Table Generator files...
5 //===------------------------------------------------------------------------=//
9 #include "Support/StringExtras.h"
12 #define YYERROR_VERBOSE 1
14 int yyerror(const char *ErrorMsg);
16 extern int Filelineno;
17 static Record *CurRec = 0;
19 typedef std::pair<Record*, std::vector<Init*>*> SubClassRefTy;
23 std::vector<unsigned> Bits;
26 LetRecord(const std::string &N, std::vector<unsigned> *B, Init *V)
27 : Name(N), Value(V), HasBits(B != 0) {
28 if (HasBits) Bits = *B;
32 static std::vector<std::vector<LetRecord> > LetStack;
35 extern std::ostream &err();
37 static void addValue(const RecordVal &RV) {
38 if (RecordVal *ERV = CurRec->getValue(RV.getName())) {
39 // The value already exists in the class, treat this as a set...
40 if (ERV->setValue(RV.getValue())) {
41 err() << "New definition of '" << RV.getName() << "' of type '"
42 << *RV.getType() << "' is incompatible with previous "
43 << "definition of type '" << *ERV->getType() << "'!\n";
51 static void addSuperClass(Record *SC) {
52 if (CurRec->isSubClassOf(SC)) {
53 err() << "Already subclass of '" << SC->getName() << "'!\n";
56 CurRec->addSuperClass(SC);
59 static void setValue(const std::string &ValName,
60 std::vector<unsigned> *BitList, Init *V) {
63 RecordVal *RV = CurRec->getValue(ValName);
65 err() << "Value '" << ValName << "' unknown!\n";
69 // If we are assigning to a subset of the bits in the value... then we must be
70 // assigning to a field of BitsRecTy, which must have a BitsInit
74 BitsInit *CurVal = dynamic_cast<BitsInit*>(RV->getValue());
76 err() << "Value '" << ValName << "' is not a bits type!\n";
80 // Convert the incoming value to a bits type of the appropriate size...
81 Init *BI = V->convertInitializerTo(new BitsRecTy(BitList->size()));
83 V->convertInitializerTo(new BitsRecTy(BitList->size()));
84 err() << "Initializer '" << *V << "' not compatible with bit range!\n";
88 // We should have a BitsInit type now...
89 assert(dynamic_cast<BitsInit*>(BI) != 0 || &(std::cerr << *BI) == 0);
90 BitsInit *BInit = (BitsInit*)BI;
92 BitsInit *NewVal = new BitsInit(CurVal->getNumBits());
94 // Loop over bits, assigning values as appropriate...
95 for (unsigned i = 0, e = BitList->size(); i != e; ++i) {
96 unsigned Bit = (*BitList)[i];
97 if (NewVal->getBit(Bit)) {
98 err() << "Cannot set bit #" << Bit << " of value '" << ValName
99 << "' more than once!\n";
102 NewVal->setBit(Bit, BInit->getBit(i));
105 for (unsigned i = 0, e = CurVal->getNumBits(); i != e; ++i)
106 if (NewVal->getBit(i) == 0)
107 NewVal->setBit(i, CurVal->getBit(i));
112 if (RV->setValue(V)) {
113 err() << "Value '" << ValName << "' of type '" << *RV->getType()
114 << "' is incompatible with initializer '" << *V << "'!\n";
119 static void addSubClass(Record *SC, const std::vector<Init*> &TemplateArgs) {
120 // Add all of the values in the subclass into the current class...
121 const std::vector<RecordVal> &Vals = SC->getValues();
122 for (unsigned i = 0, e = Vals.size(); i != e; ++i)
125 const std::vector<std::string> &TArgs = SC->getTemplateArgs();
127 // Ensure that an appropriate number of template arguments are specified...
128 if (TArgs.size() < TemplateArgs.size()) {
129 err() << "ERROR: More template args specified than expected!\n";
131 } else { // This class expects template arguments...
132 // Loop over all of the template arguments, setting them to the specified
133 // value or leaving them as the default as neccesary.
134 for (unsigned i = 0, e = TArgs.size(); i != e; ++i) {
135 if (i < TemplateArgs.size()) { // A value is specified for this temp-arg?
137 setValue(TArgs[i], 0, TemplateArgs[i]);
138 } else if (!CurRec->getValue(TArgs[i])->getValue()->isComplete()) {
139 err() << "ERROR: Value not specified for template argument #"
140 << i << " (" << TArgs[i] << ") of subclass '" << SC->getName()
148 // Since everything went well, we can now set the "superclass" list for the
150 const std::vector<Record*> &SCs = SC->getSuperClasses();
151 for (unsigned i = 0, e = SCs.size(); i != e; ++i)
152 addSuperClass(SCs[i]);
164 std::vector<Init*> *DagValueList;
165 std::vector<Init*> *FieldList;
166 std::vector<unsigned>*BitList;
168 SubClassRefTy *SubClassRef;
169 std::vector<SubClassRefTy> *SubClassList;
172 %token INT BIT STRING BITS LIST CODE DAG CLASS DEF FIELD LET IN
173 %token <IntVal> INTVAL
174 %token <StrVal> ID STRVAL CODEFRAGMENT
177 %type <Rec> ClassInst DefInst Object ObjectBody ClassID
179 %type <SubClassRef> SubClassRef
180 %type <SubClassList> ClassList ClassListNE
181 %type <IntVal> OptPrefix
182 %type <Initializer> Value OptValue
183 %type <DagValueList> DagArgList DagArgListNE
184 %type <FieldList> ValueList ValueListNE
185 %type <BitList> BitList OptBitList RBitList
186 %type <StrVal> Declaration OptID
192 $$ = Records.getClass(*$1);
194 err() << "Couldn't find class '" << *$1 << "'!\n";
202 Type : STRING { // string type
203 $$ = new StringRecTy();
204 } | BIT { // bit type
206 } | BITS '<' INTVAL '>' { // bits<x> type
207 $$ = new BitsRecTy($3);
208 } | INT { // int type
210 } | LIST '<' Type '>' { // list<x> type
211 $$ = new ListRecTy($3);
212 } | CODE { // code type
213 $$ = new CodeRecTy();
214 } | DAG { // dag type
216 } | ClassID { // Record Type
217 $$ = new RecordRecTy($1);
220 OptPrefix : /*empty*/ { $$ = 0; } | FIELD { $$ = 1; };
222 OptValue : /*empty*/ { $$ = 0; } | '=' Value { $$ = $2; };
225 $$ = new IntInit($1);
227 $$ = new StringInit(*$1);
230 $$ = new CodeInit(*$1);
233 $$ = new UnsetInit();
234 } | '{' ValueList '}' {
235 BitsInit *Init = new BitsInit($2->size());
236 for (unsigned i = 0, e = $2->size(); i != e; ++i) {
237 struct Init *Bit = (*$2)[i]->convertInitializerTo(new BitRecTy());
239 err() << "Element #" << i << " (" << *(*$2)[i]
240 << ") is not convertable to a bit!\n";
243 Init->setBit($2->size()-i-1, Bit);
248 if (const RecordVal *RV = (CurRec ? CurRec->getValue(*$1) : 0)) {
249 $$ = new VarInit(*$1, RV->getType());
250 } else if (Record *D = Records.getDef(*$1)) {
253 err() << "Variable not defined: '" << *$1 << "'!\n";
258 } | Value '{' BitList '}' {
259 $$ = $1->convertInitializerBitRange(*$3);
261 err() << "Invalid bit range for value '" << *$1 << "'!\n";
265 } | '[' ValueList ']' {
266 $$ = new ListInit(*$2);
269 if (!$1->getFieldType(*$3)) {
270 err() << "Cannot access field '" << *$3 << "' of value '" << *$1 << "!\n";
273 $$ = new FieldInit($1, *$3);
275 } | '(' ID DagArgList ')' {
276 Record *D = Records.getDef(*$2);
278 err() << "Invalid def '" << *$2 << "'!\n";
281 $$ = new DagInit(D, *$3);
282 delete $2; delete $3;
285 DagArgListNE : Value {
286 $$ = new std::vector<Init*>();
289 | DagArgListNE ',' Value {
293 DagArgList : /*empty*/ {
294 $$ = new std::vector<Init*>();
296 | DagArgListNE { $$ = $1; };
300 $$ = new std::vector<unsigned>();
302 } | INTVAL '-' INTVAL {
303 if ($1 < $3 || $1 < 0 || $3 < 0) {
304 err() << "Invalid bit range: " << $1 << "-" << $3 << "!\n";
307 $$ = new std::vector<unsigned>();
308 for (int i = $1; i >= $3; --i)
312 if ($1 < $2 || $1 < 0 || $2 < 0) {
313 err() << "Invalid bit range: " << $1 << "-" << $2 << "!\n";
316 $$ = new std::vector<unsigned>();
317 for (int i = $1; i >= $2; --i)
319 } | RBitList ',' INTVAL {
320 ($$=$1)->push_back($3);
321 } | RBitList ',' INTVAL '-' INTVAL {
322 if ($3 < $5 || $3 < 0 || $5 < 0) {
323 err() << "Invalid bit range: " << $3 << "-" << $5 << "!\n";
327 for (int i = $3; i >= $5; --i)
329 } | RBitList ',' INTVAL INTVAL {
331 if ($3 < $4 || $3 < 0 || $4 < 0) {
332 err() << "Invalid bit range: " << $3 << "-" << $4 << "!\n";
336 for (int i = $3; i >= $4; --i)
340 BitList : RBitList { $$ = $1; std::reverse($1->begin(), $1->end()); };
342 OptBitList : /*empty*/ { $$ = 0; } | '{' BitList '}' { $$ = $2; };
346 ValueList : /*empty*/ {
347 $$ = new std::vector<Init*>();
352 ValueListNE : Value {
353 $$ = new std::vector<Init*>();
355 } | ValueListNE ',' Value {
356 ($$ = $1)->push_back($3);
359 Declaration : OptPrefix Type ID OptValue {
360 addValue(RecordVal(*$3, $2, $1));
361 setValue(*$3, 0, $4);
365 BodyItem : Declaration ';' {
367 } | LET ID OptBitList '=' Value ';' {
368 setValue(*$2, $3, $5);
373 BodyList : /*empty*/ | BodyList BodyItem;
374 Body : ';' | '{' BodyList '}';
376 SubClassRef : ClassID {
377 $$ = new SubClassRefTy($1, new std::vector<Init*>());
378 } | ClassID '<' ValueListNE '>' {
379 $$ = new SubClassRefTy($1, $3);
382 ClassListNE : SubClassRef {
383 $$ = new std::vector<SubClassRefTy>();
387 | ClassListNE ',' SubClassRef {
388 ($$=$1)->push_back(*$3);
392 ClassList : /*empty */ {
393 $$ = new std::vector<SubClassRefTy>();
399 DeclListNE : Declaration {
400 CurRec->addTemplateArg(*$1);
402 } | DeclListNE ',' Declaration {
403 CurRec->addTemplateArg(*$3);
407 TemplateArgList : '<' DeclListNE '>' {};
408 OptTemplateArgList : /*empty*/ | TemplateArgList;
410 OptID : ID { $$ = $1; } | /*empty*/ { $$ = new std::string(); };
413 static unsigned AnonCounter = 0;
415 *$1 = "anonymous."+utostr(AnonCounter++);
416 CurRec = new Record(*$1);
418 } OptTemplateArgList ClassList {
419 for (unsigned i = 0, e = $4->size(); i != e; ++i) {
420 addSubClass((*$4)[i].first, *(*$4)[i].second);
421 // Delete the template arg values for the class
422 delete (*$4)[i].second;
425 // Process any variables on the set stack...
426 for (unsigned i = 0, e = LetStack.size(); i != e; ++i)
427 for (unsigned j = 0, e = LetStack[i].size(); j != e; ++j)
428 setValue(LetStack[i][j].Name,
429 LetStack[i][j].HasBits ? &LetStack[i][j].Bits : 0,
430 LetStack[i][j].Value);
432 CurRec->resolveReferences();
434 // Now that all of the references have been resolved, we can delete template
435 // arguments for superclasses, so they don't pollute our record, and so that
436 // their names won't conflict with later uses of the name...
437 for (unsigned i = 0, e = $4->size(); i != e; ++i) {
438 Record *SuperClass = (*$4)[i].first;
439 for (unsigned i = 0, e = SuperClass->getTemplateArgs().size(); i != e; ++i)
440 CurRec->removeValue(SuperClass->getTemplateArgs()[i]);
442 delete $4; // Delete the class list...
448 ClassInst : CLASS ObjectBody {
449 if (Records.getClass($2->getName())) {
450 err() << "Class '" << $2->getName() << "' already defined!\n";
453 Records.addClass($$ = $2);
456 DefInst : DEF ObjectBody {
457 if (!$2->getTemplateArgs().empty()) {
458 err() << "Def '" << $2->getName()
459 << "' is not permitted to have template arguments!\n";
462 // If ObjectBody has template arguments, it's an error.
463 if (Records.getDef($2->getName())) {
464 err() << "Def '" << $2->getName() << "' already defined!\n";
467 Records.addDef($$ = $2);
471 Object : ClassInst | DefInst;
473 LETItem : ID OptBitList '=' Value {
474 LetStack.back().push_back(LetRecord(*$1, $2, $4));
475 delete $1; delete $2;
478 LETList : LETItem | LETList ',' LETItem;
480 // LETCommand - A 'LET' statement start...
481 LETCommand : LET { LetStack.push_back(std::vector<LetRecord>()); } LETList IN;
483 // Support Set commands wrapping objects... both with and without braces.
484 Object : LETCommand '{' ObjectList '}' {
487 | LETCommand Object {
491 ObjectList : Object {} | ObjectList Object {};
493 File : ObjectList {};
497 int yyerror(const char *ErrorMsg) {
498 err() << "Error parsing: " << ErrorMsg << "\n";