options { STATIC = false; JAVA_UNICODE_ESCAPE = true; } PARSER_BEGIN(Parser) import edu.neu.ccs.demeter.dj.*; import java.util.*; import java.io.*; import edu.neu.ccs.demeter.*; public class Parser { // oit is uugly. Why isn't there a Character.valueOf(String)? static char unescapifyChar(String s) { char c = s.charAt(0); if (c == '\\') { switch (s.charAt(1)) { case 'n': c = '\n'; break; case 't': c = '\t'; break; case 'b': c = '\b'; break; case 'r': c = '\r'; break; case 'f': c = '\f'; break; case '\\': c = '\\'; break; case '\'': c = '\''; break; case '\"': c = '\"'; break; default: c = (char) Integer.parseInt(s.substring(1, s.length()), 8); break; } } return c; } // Even uglier... static String unescapify(String s) { char str[] = new char[s.length()]; int i = 0, o = 0; while (i < s.length()) { char c = s.charAt(i++); if (c == '\\') { int j = i + 1; while (j < s.length() && Character.digit(s.charAt(j), 8) != -1) { j++; } c = unescapifyChar(s.substring(i-1, j)); i = j; } str[o++] = c; } return String.valueOf(str, 0, o); } } PARSER_END(Parser) Main _Main() : { Main it = null; } { { it=new Main(); } { return it; } } Input _Input() : { Input it = null; ClassGraphh _classgraphh; SyntaxEnhancement _syntaxenhancement; } { { it=new Input(); } _classgraphh=_ClassGraphh() { it.set_classgraphh(_classgraphh); } _syntaxenhancement=_SyntaxEnhancement() { it.set_syntaxenhancement(_syntaxenhancement); } { return it; } } ClassGraphh _ClassGraphh() : { ClassGraphh it = null; Definition_DList _classes; } { { it=new ClassGraphh(); } _classes=_Definition_DList() { it.set_classes(_classes); } { return it; } } Definition _Definition() : { Definition it = null; } { ( it=_ClassDef() ) { return it; } } void common_Definition(Definition it) : { } { { } } ClassDef _ClassDef() : { ClassDef it = null; ParamClassName _paramclassname; ClassParts _classparts; } { { it=new ClassDef(); } _paramclassname=_ParamClassName() { it.set_paramclassname(_paramclassname); } _classparts=_ClassParts() { it.set_classparts(_classparts); } "." common_Definition(it) { return it; } } ParamClassName _ParamClassName() : { ParamClassName it = null; ClassName _classname; ClassName_Commalist _parameters; } { { it=new ParamClassName(); } _classname=_ClassName() { it.set_classname(_classname); } [ "(" _parameters=_ClassName_Commalist() { it.set_parameters(_parameters); } ")" ] { return it; } } ClassParts _ClassParts() : { ClassParts it = null; } { ( it=_ConstOrAltClass() | it=_RepetitionClass() ) { return it; } } void common_ClassParts(ClassParts it) : { } { { } } ConstOrAltClass _ConstOrAltClass() : { ConstOrAltClass it = null; } { ( it=_ConstructionClass() | it=_AlternationClass() ) { return it; } } void common_ConstOrAltClass(ConstOrAltClass it) : { ClassElementWithSyntax_List _parts; } { _parts=_ClassElementWithSyntax_List() { it.set_parts(_parts); } common_ClassParts(it) { } } ClassElement _ClassElement() : { ClassElement it = null; } { ( it=_Part() | it=_OptionalPart() ) { return it; } } void common_ClassElement(ClassElement it) : { } { common_ClassElementWithSyntax(it) { } } ClassElementWithSyntax _ClassElementWithSyntax() : { ClassElementWithSyntax it = null; } { ( it=_ClassElement() | it=_SandwichedClassElement() ) { return it; } } void common_ClassElementWithSyntax(ClassElementWithSyntax it) : { } { { } } SandwichedClassElement _SandwichedClassElement() : { SandwichedClassElement it = null; ClassElement_PSandwich _classelement_psandwich; } { { it=new SandwichedClassElement(); } _classelement_psandwich=_ClassElement_PSandwich() { it.set_classelement_psandwich(_classelement_psandwich); } common_ClassElementWithSyntax(it) { return it; } } Part _Part() : { Part it = null; PartName _partname; ClassSpec _classspec; } { { it=new Part(); } [ "<" _partname=_PartName() { it.set_partname(_partname); } ">" ] _classspec=_ClassSpec() { it.set_classspec(_classspec); } common_ClassElement(it) { return it; } } OptionalPart _OptionalPart() : { OptionalPart it = null; Part_Sandwich _part; } { { it=new OptionalPart(); } "[" _part=_Part_Sandwich() { it.set_part(_part); } "]" common_ClassElement(it) { return it; } } ConstructionClass _ConstructionClass() : { ConstructionClass it = null; } { { it=new ConstructionClass(); } "=" common_ConstOrAltClass(it) { return it; } } AlternationClass _AlternationClass() : { AlternationClass it = null; ClassSpec_Barlist _subclasses; } { { it=new AlternationClass(); } ":" [ _subclasses=_ClassSpec_Barlist() { it.set_subclasses(_subclasses); } ] "common" common_ConstOrAltClass(it) { return it; } } RepetitionClass _RepetitionClass() : { RepetitionClass it = null; RepeatedPart_Sandwich _sandwiched; } { { it=new RepetitionClass(); } "~" _sandwiched=_RepeatedPart_Sandwich() { it.set_sandwiched(_sandwiched); } common_ClassParts(it) { return it; } } RepeatedPart _RepeatedPart() : { RepeatedPart it = null; ClassSpec _nonempty; ClassSpec_Sandwich _repeated; } { { it=new RepeatedPart(); } [ _nonempty=_ClassSpec() { it.set_nonempty(_nonempty); } ] "{" _repeated=_ClassSpec_Sandwich() { it.set_repeated(_repeated); } "}" { return it; } } ClassSpec _ClassSpec() : { ClassSpec it = null; ClassName _classname; ClassSpec_Commalist _actual_parameters; } { { it=new ClassSpec(); } _classname=_ClassName() { it.set_classname(_classname); } [ "(" _actual_parameters=_ClassSpec_Commalist() { it.set_actual_parameters(_actual_parameters); } ")" ] { return it; } } Syntax _Syntax() : { Syntax it = null; } { ( it=_SyntaxToken() | it=_PrintCommand() ) { return it; } } void common_Syntax(Syntax it) : { } { { } } SyntaxToken _SyntaxToken() : { SyntaxToken it = null; String _string; } { { it=new SyntaxToken(); } _string=_String() { it.set_string(_string); } common_Syntax(it) { return it; } } PrintCommand _PrintCommand() : { PrintCommand it = null; } { ( it=_PrintIndent() | it=_PrintUnindent() | it=_PrintSkip() | it=_PrintSpace() ) { return it; } } void common_PrintCommand(PrintCommand it) : { } { common_Syntax(it) { } } PrintIndent _PrintIndent() : { PrintIndent it = null; } { { it=new PrintIndent(); } "+" common_PrintCommand(it) { return it; } } PrintUnindent _PrintUnindent() : { PrintUnindent it = null; } { { it=new PrintUnindent(); } "-" common_PrintCommand(it) { return it; } } PrintSkip _PrintSkip() : { PrintSkip it = null; } { { it=new PrintSkip(); } "*l" common_PrintCommand(it) { return it; } } PrintSpace _PrintSpace() : { PrintSpace it = null; } { { it=new PrintSpace(); } "*s" common_PrintCommand(it) { return it; } } ClassName _ClassName() : { ClassName it = null; Ident _ident; } { { it=new ClassName(); } _ident=_Ident() { it.set_ident(_ident); } { return it; } } PartName _PartName() : { PartName it = null; Ident _name; } { { it=new PartName(); } _name=_Ident() { it.set_name(_name); } { return it; } } SyntaxEnhancement _SyntaxEnhancement() : { SyntaxEnhancement it = null; Enhancement_List _enhancement_list; } { { it=new SyntaxEnhancement(); } _enhancement_list=_Enhancement_List() { it.set_enhancement_list(_enhancement_list); } { return it; } } Enhancement _Enhancement() : { Enhancement it = null; Where _where; EnhancementBody _enhancementbody; } { { it=new Enhancement(); } _where=_Where() { it.set_where(_where); } _enhancementbody=_EnhancementBody() { it.set_enhancementbody(_enhancementbody); } { return it; } } EnhancementBody _EnhancementBody() : { EnhancementBody it = null; } { ( it=_ClassBody() | it=_PartCoordinate() | it=_OptionalPartCoordinate() | it=_CollectionCoordinate() ) { return it; } } void common_EnhancementBody(EnhancementBody it) : { SyntaxToken _syntaxtoken; } { ":" _syntaxtoken=_SyntaxToken() { it.set_syntaxtoken(_syntaxtoken); } { } } PartCoordinate _PartCoordinate() : { PartCoordinate it = null; SyntaxClassName _syntaxclassname; SyntaxPartName _syntaxpartname; } { { it=new PartCoordinate(); } "part" _syntaxclassname=_SyntaxClassName() { it.set_syntaxclassname(_syntaxclassname); } "." _syntaxpartname=_SyntaxPartName() { it.set_syntaxpartname(_syntaxpartname); } common_EnhancementBody(it) { return it; } } OptionalPartCoordinate _OptionalPartCoordinate() : { OptionalPartCoordinate it = null; SyntaxClassName _syntaxclassname; SyntaxPartName _syntaxpartname; } { { it=new OptionalPartCoordinate(); } "inside" "optional" "part" _syntaxclassname=_SyntaxClassName() { it.set_syntaxclassname(_syntaxclassname); } "." _syntaxpartname=_SyntaxPartName() { it.set_syntaxpartname(_syntaxpartname); } common_EnhancementBody(it) { return it; } } ClassBody _ClassBody() : { ClassBody it = null; SyntaxClassName _syntaxclassname; } { { it=new ClassBody(); } "class" _syntaxclassname=_SyntaxClassName() { it.set_syntaxclassname(_syntaxclassname); } common_EnhancementBody(it) { return it; } } CollectionCoordinate _CollectionCoordinate() : { CollectionCoordinate it = null; SyntaxClassName _syntaxclassname; CurlyBracket _curlybracket; } { { it=new CollectionCoordinate(); } "collection" _syntaxclassname=_SyntaxClassName() { it.set_syntaxclassname(_syntaxclassname); } _curlybracket=_CurlyBracket() { it.set_curlybracket(_curlybracket); } common_EnhancementBody(it) { return it; } } CurlyBracket _CurlyBracket() : { CurlyBracket it = null; } { ( it=_Left() | it=_Right() ) { return it; } } void common_CurlyBracket(CurlyBracket it) : { } { { } } Left _Left() : { Left it = null; } { { it=new Left(); } "{" common_CurlyBracket(it) { return it; } } Right _Right() : { Right it = null; } { { it=new Right(); } "}" common_CurlyBracket(it) { return it; } } SyntaxClassName _SyntaxClassName() : { SyntaxClassName it = null; Ident _ident; } { { it=new SyntaxClassName(); } _ident=_Ident() { it.set_ident(_ident); } { return it; } } SyntaxPartName _SyntaxPartName() : { SyntaxPartName it = null; Ident _ident; } { { it=new SyntaxPartName(); } _ident=_Ident() { it.set_ident(_ident); } { return it; } } Where _Where() : { Where it = null; } { ( it=_Before() | it=_After() ) { return it; } } void common_Where(Where it) : { } { { } } Before _Before() : { Before it = null; } { { it=new Before(); } "before" common_Where(it) { return it; } } After _After() : { After it = null; } { { it=new After(); } "after" common_Where(it) { return it; } } ClassGraphVisitor _ClassGraphVisitor() : { ClassGraphVisitor it = null; } { { it=new ClassGraphVisitor(); } { return it; } } CommandVisitor _CommandVisitor() : { CommandVisitor it = null; } { { it=new CommandVisitor(); } { return it; } } ClassCommandVisitor _ClassCommandVisitor() : { ClassCommandVisitor it = null; } { { it=new ClassCommandVisitor(); } { return it; } } CollectionCommandVisitor _CollectionCommandVisitor() : { CollectionCommandVisitor it = null; } { { it=new CollectionCommandVisitor(); } { return it; } } PartCommandVisitor _PartCommandVisitor() : { PartCommandVisitor it = null; } { { it=new PartCommandVisitor(); } { return it; } } Definition_DList _Definition_DList() : { Definition_DList it = null; Nonempty_Definition_DList _first; } { { it=new Definition_DList(); } _first=_Nonempty_Definition_DList() { it.set_first(_first); } { return it; } } ClassName_Commalist _ClassName_Commalist() : { ClassName_Commalist it = null; Nonempty_ClassName_Commalist _first; } { { it=new ClassName_Commalist(); } _first=_Nonempty_ClassName_Commalist() { it.set_first(_first); } { return it; } } ClassElementWithSyntax_List _ClassElementWithSyntax_List() : { ClassElementWithSyntax_List it = null; Nonempty_ClassElementWithSyntax_List _first; } { { it=new ClassElementWithSyntax_List(); } [ _first=_Nonempty_ClassElementWithSyntax_List() { it.set_first(_first); } ] { return it; } } ClassElement_PSandwich _ClassElement_PSandwich() : { ClassElement_PSandwich it = null; ClassElement_Sandwich _s; } { { it=new ClassElement_PSandwich(); } "{" _s=_ClassElement_Sandwich() { it.set_s(_s); } "}" { return it; } } ClassElement_Sandwich _ClassElement_Sandwich() : { ClassElement_Sandwich it = null; Syntax_List _first; ClassElement _inner; Syntax_List _second; } { { it=new ClassElement_Sandwich(); } _first=_Syntax_List() { it.set_first(_first); } _inner=_ClassElement() { it.set_inner(_inner); } _second=_Syntax_List() { it.set_second(_second); } { return it; } } Part_Sandwich _Part_Sandwich() : { Part_Sandwich it = null; Syntax_List _first; Part _inner; Syntax_List _second; } { { it=new Part_Sandwich(); } _first=_Syntax_List() { it.set_first(_first); } _inner=_Part() { it.set_inner(_inner); } _second=_Syntax_List() { it.set_second(_second); } { return it; } } ClassSpec_Barlist _ClassSpec_Barlist() : { ClassSpec_Barlist it = null; Nonempty_ClassSpec_Barlist _first; } { { it=new ClassSpec_Barlist(); } _first=_Nonempty_ClassSpec_Barlist() { it.set_first(_first); } { return it; } } RepeatedPart_Sandwich _RepeatedPart_Sandwich() : { RepeatedPart_Sandwich it = null; Syntax_List _first; RepeatedPart _inner; Syntax_List _second; } { { it=new RepeatedPart_Sandwich(); } _first=_Syntax_List() { it.set_first(_first); } _inner=_RepeatedPart() { it.set_inner(_inner); } _second=_Syntax_List() { it.set_second(_second); } { return it; } } ClassSpec_Sandwich _ClassSpec_Sandwich() : { ClassSpec_Sandwich it = null; Syntax_List _first; ClassSpec _inner; Syntax_List _second; } { { it=new ClassSpec_Sandwich(); } _first=_Syntax_List() { it.set_first(_first); } _inner=_ClassSpec() { it.set_inner(_inner); } _second=_Syntax_List() { it.set_second(_second); } { return it; } } Syntax_List _Syntax_List() : { Syntax_List it = null; Nonempty_Syntax_List _first; } { { it=new Syntax_List(); } [ _first=_Nonempty_Syntax_List() { it.set_first(_first); } ] { return it; } } ClassSpec_Commalist _ClassSpec_Commalist() : { ClassSpec_Commalist it = null; Nonempty_ClassSpec_Commalist _first; } { { it=new ClassSpec_Commalist(); } _first=_Nonempty_ClassSpec_Commalist() { it.set_first(_first); } { return it; } } Enhancement_List _Enhancement_List() : { Enhancement_List it = null; Nonempty_Enhancement_List _first; } { { it=new Enhancement_List(); } [ _first=_Nonempty_Enhancement_List() { it.set_first(_first); } ] { return it; } } Nonempty_Definition_DList _Nonempty_Definition_DList() : { Nonempty_Definition_DList it = null; Definition _it; Nonempty_Definition_DList _next; } { { it=new Nonempty_Definition_DList(); } _it=_Definition() { it.set_it(_it); } [ _next=_Nonempty_Definition_DList() { it.set_next(_next); } ] { return it; } } Nonempty_ClassName_Commalist _Nonempty_ClassName_Commalist() : { Nonempty_ClassName_Commalist it = null; ClassName _it; Nonempty_ClassName_Commalist _next; } { { it=new Nonempty_ClassName_Commalist(); } _it=_ClassName() { it.set_it(_it); } [ "," _next=_Nonempty_ClassName_Commalist() { it.set_next(_next); } ] { return it; } } Nonempty_ClassElementWithSyntax_List _Nonempty_ClassElementWithSyntax_List() : { Nonempty_ClassElementWithSyntax_List it = null; ClassElementWithSyntax _it; Nonempty_ClassElementWithSyntax_List _next; } { { it=new Nonempty_ClassElementWithSyntax_List(); } _it=_ClassElementWithSyntax() { it.set_it(_it); } [ _next=_Nonempty_ClassElementWithSyntax_List() { it.set_next(_next); } ] { return it; } } Nonempty_ClassSpec_Barlist _Nonempty_ClassSpec_Barlist() : { Nonempty_ClassSpec_Barlist it = null; ClassSpec _it; Nonempty_ClassSpec_Barlist _next; } { { it=new Nonempty_ClassSpec_Barlist(); } _it=_ClassSpec() { it.set_it(_it); } [ "|" _next=_Nonempty_ClassSpec_Barlist() { it.set_next(_next); } ] { return it; } } Nonempty_Syntax_List _Nonempty_Syntax_List() : { Nonempty_Syntax_List it = null; Syntax _it; Nonempty_Syntax_List _next; } { { it=new Nonempty_Syntax_List(); } _it=_Syntax() { it.set_it(_it); } [ _next=_Nonempty_Syntax_List() { it.set_next(_next); } ] { return it; } } Nonempty_ClassSpec_Commalist _Nonempty_ClassSpec_Commalist() : { Nonempty_ClassSpec_Commalist it = null; ClassSpec _it; Nonempty_ClassSpec_Commalist _next; } { { it=new Nonempty_ClassSpec_Commalist(); } _it=_ClassSpec() { it.set_it(_it); } [ "," _next=_Nonempty_ClassSpec_Commalist() { it.set_next(_next); } ] { return it; } } Nonempty_Enhancement_List _Nonempty_Enhancement_List() : { Nonempty_Enhancement_List it = null; Enhancement _it; Nonempty_Enhancement_List _next; } { { it=new Nonempty_Enhancement_List(); } _it=_Enhancement() { it.set_it(_it); } [ _next=_Nonempty_Enhancement_List() { it.set_next(_next); } ] { return it; } } boolean _boolean() : { Token t; }{ ( t= { return true; } | t= { return false; } ) } char _char() : { Token t; } { t= { String s = t.image; return unescapifyChar(s.substring(1, s.length()-1)); } } byte _byte() : { int i; } { i=_int() { return (byte) i; } } short _short() : { int i; } { i=_int() { return (short) i; } } int _int() : { Number num; } { num=_Number() { return num.intValue(); } } long _long() : { Number num; } { num=_Number() { return num.longValue(); } } float _float() : { Number num; } { num=_Number() { return num.floatValue(); } } double _double() : { Number num; } { num=_Number() { return num.doubleValue(); } } Boolean _Boolean() : { Token t; }{ ( t= { return Boolean.TRUE; } | t= { return Boolean.FALSE; } ) } Character _Character() : { char c; } { c=_char() { return new Character(c); } } Integer _Integer() : { int i; } { i = _int() { return new Integer(i); } } Long _Long() : { long l; } { l=_long() { return new Long(l); } } Float _Float() : { float f; } { f=_float() { return new Float(f); } } Double _Double() : { double d; } { d=_double() { return new Double(d); } } Number _Number() : { Token t; String s = null; int radix = 0; Number num = null; } { ( ( t= { s = t.image; radix = 10; } | t= { // Strip off the "0x". s = t.image.substring(2, t.image.length()); radix = 16; } | t= { s = t.image; radix = 8; } ) { switch (s.charAt(s.length()-1)) { case 'l': case 'L': s = s.substring(0, s.length()-1); num = new Long(new java.math.BigInteger(s, radix).longValue()); break; default: num = new Integer(new java.math.BigInteger(s, radix).intValue()); break; } } | t= { s = t.image; switch (s.charAt(s.length()-1)) { case 'd': case 'D': num = Double.valueOf(s.substring(0, s.length()-1)); break; case 'f': case 'F': num = Float.valueOf(s.substring(0, s.length()-1)); break; default: num = Float.valueOf(s); break; } } ) { return num; } } String _String() : { Token t; } { t= { String s = t.image; return unescapify(s.substring(1, s.length()-1)); } } StringBuffer _StringBuffer() : { String s; } { s=_String() { return new StringBuffer(s); } } Ident _Ident() : { Token t; } { t= { return new Ident(t.image); } } Text _Text() : { Token t; } { t= { String s = t.image; return new Text(s.substring(2, s.length()-2)); } } Line _Line() : { Token t; } { { token_source.SwitchTo(1); } t= { return new Line(t.image); } } Word _Word() : { Token t; } { { token_source.SwitchTo(2); } t= { return new Word(t.image); } } // Lexical specification (largely taken from Java.jack): SKIP : { " " | "\t" | "\n" | "\r" | <"//" (~["\n","\r"])* ("\n"|"\r\n")> | <"/*" (~["*"])* "*" (~["/"] (~["*"])* "*")* "/"> } TOKEN : { /* LITERALS */ < DECIMAL_LITERAL: ["1"-"9"] (["0"-"9"])* (["l","L"])? > | < HEX_LITERAL: "0" ["x","X"] (["0"-"9","a"-"f","A"-"F"])+ (["l","L"])? > | < OCTAL_LITERAL: "0" (["0"-"7"])* (["l","L"])? > | < FLOATING_POINT_LITERAL: (["0"-"9"])+ "." (["0"-"9"])+ ()? (["f","F","d","D"])? | "." (["0"-"9"])+ ()? (["f","F","d","D"])? | (["0"-"9"])+ (["f","F","d","D"])? | (["0"-"9"])+ ()? ["f","F","d","D"] > | < #EXPONENT: ["e","E"] (["+","-"])? (["0"-"9"])+ > | < CHARACTER_LITERAL: "'" ( (~["\'","\\","\n","\r"]) | ("\\" ( ["n","t","b","r","f","\\","\'","\""] | ["0"-"7"] ( ["0"-"7"] )? | ["0"-"3"] ["0"-"7"] ["0"-"7"] ) ) ) "'" > | < STRING_LITERAL: "\"" ( (~["\"","\\","\n","\r"]) | ("\\" ( ["n","t","b","r","f","\\","\'","\""] | ["0"-"7"] ( ["0"-"7"] )? | ["0"-"3"] ["0"-"7"] ["0"-"7"] ) ) )* "\"" > | < TEXT_LITERAL: ( "(@" (~["@"])* ( "@" ~[")"] (~["@"])* )* "@)" ) | ( "{{" (~["}"])* ( "}" ~["}"] (~["}"])* )* "}}" ) > | < TRUE: "true" > | < FALSE: "false" > } TOKEN : { /* IDENTIFIERS */ < IDENTIFIER: (|)* > | < #LETTER: [ "\u0024", "\u0041"-"\u005a", "\u005f", "\u0061"-"\u007a", "\u00c0"-"\u00d6", "\u00d8"-"\u00f6", "\u00f8"-"\u00ff", "\u0100"-"\u1fff", "\u3040"-"\u318f", "\u3300"-"\u337f", "\u3400"-"\u3d2d", "\u4e00"-"\u9fff", "\uf900"-"\ufaff" ] > | < #DIGIT: [ "\u0030"-"\u0039", "\u0660"-"\u0669", "\u06f0"-"\u06f9", "\u0966"-"\u096f", "\u09e6"-"\u09ef", "\u0a66"-"\u0a6f", "\u0ae6"-"\u0aef", "\u0b66"-"\u0b6f", "\u0be7"-"\u0bef", "\u0c66"-"\u0c6f", "\u0ce6"-"\u0cef", "\u0d66"-"\u0d6f", "\u0e50"-"\u0e59", "\u0ed0"-"\u0ed9", "\u1040"-"\u1049" ] > } TOKEN : { < LINE: (~["\n","\r"])* > : DEFAULT } SKIP : { " " | "\t" | "\n" | "\r" } TOKEN : { < WORD: (~[" ","\t","\n","\r"])* > : DEFAULT }