// ** This class was generated with DemFGen (vers:11/03/2008) options{ STATIC = false; } PARSER_BEGIN(TheParser) package gen; import java.io.FileInputStream; import edu.neu.ccs.demeterf.demfgen.lib.*; import edu.neu.ccs.demeterf.control.Fields; import edu.neu.ccs.demeterf.demfgen.lib.ident; import edu.neu.ccs.demeterf.demfgen.lib.verbatim; class TheParser{ static char unescapeChar(String s){ s = s.substring(1,s.length()-1); char c = s.charAt(0); if (c == '\\'){ switch (s.charAt(1)) { case 'n': return '\n'; case 't': return '\t'; case 'b': return '\b'; case 'r': return '\r'; case 'f': return '\f'; case '\\': return '\\'; case '\'': return '\''; case '\"': return '\"'; default: return (char)Integer.parseInt(s.substring(1, s.length()), 8); } } return c; } } PARSER_END(TheParser) byte parse_byte():{ int i; }{ i = parse_int() { return (byte)i; } } Byte parse_Byte():{ byte b; }{ b = parse_byte() { return b; } } short parse_short():{ int i; }{ i = parse_int() { return (short)i; } } Short parse_Short():{ short s; }{ s = parse_short() { return s; } } int parse_int():{ Token t; }{ t = { return Integer.parseInt(t.image); } } Integer parse_Integer():{ int i; }{ i = parse_int() { return i; } } long parse_long():{ Token t; }{ t = { return Long.parseLong(t.image); } } Long parse_Long():{ long l; }{ l = parse_long() { return l; } } double parse_double():{ Token t; }{ t = { return Double.parseDouble(t.image); } } Double parse_Double():{ double d; }{ d = parse_double() { return d; } } float parse_float():{ Token t; }{ t = { return Float.parseFloat(t.image); } } Float parse_Float():{ float f; }{ f = parse_float() { return f; } } String parse_String():{ Token t; }{ t = { return t.image.substring(1,t.image.length()-1); } } boolean parse_boolean():{ Token t; }{ t = { return true; } | t = { return false; } } Boolean parse_Boolean():{ boolean b; }{ b = parse_boolean() { return b; } } char parse_char():{ Token t; }{ t = { return unescapeChar(t.image); } } Character parse_Character():{ char c; }{ c = parse_char() { return c; } } ident parse_ident():{ Token t; }{ t = { return new ident(t.image); } } verbatim parse_verbatim():{ Token t; }{ t = { return new verbatim(t.image.substring(2,t.image.length()-2)); } } public Outcome parse_Outcome():{ String name; }{ name = parse_String() { return new Outcome(name); } } public Value parse_Value():{ }{ "VAL" { return new Value(); } } public Predicate parse_Predicate():{ String pred; }{ "pred" pred = parse_String() { return new Predicate(pred); } } public Derivative parse_Derivative():{ String name; Price price; Predicate predicate; Option optraw; Option optfinished; }{ "deriv" "[" name = parse_String() price = parse_Price() predicate = parse_Predicate() optraw = parse_Option$RawMaterial$() optfinished = parse_Option$FinishedProduct$() "]" { return new Derivative(name,price,predicate,optraw,optfinished); } } public RawMaterial parse_RawMaterial():{ Predicate predicate; RawMaterialInstance instance; }{ "rm" "[" predicate = parse_Predicate() instance = parse_RawMaterialInstance() "]" { return new RawMaterial(predicate,instance); } } public RawMaterialInstance parse_RawMaterialInstance():{ String name; }{ name = parse_String() { return new RawMaterialInstance(name); } } public FinishedProduct parse_FinishedProduct():{ RawMaterial rm; Outcome ip; Quality quality; }{ "finish" "[" rm = parse_RawMaterial() ip = parse_Outcome() quality = parse_Quality() "]" { return new FinishedProduct(rm,ip,quality); } } public Price parse_Price():{ double val; }{ val = parse_double() { return new Price(val); } } public Quality parse_Quality():{ double val; }{ val = parse_double() { return new Quality(val); } } public History parse_History():{ List rounds; }{ "history" "[" rounds = parse_List$Round$() "]" { return new History(rounds); } } public Round parse_Round():{ List ptransactions; }{ "round" "[" ptransactions = parse_List$PlayerTransaction$() "]" { return new Round(ptransactions); } } public PlayerTransaction parse_PlayerTransaction():{ String playerName; List transactions; }{ playerName = parse_String() transactions = parse_List$Transaction$() { return new PlayerTransaction(playerName,transactions); } } public Transaction parse_Transaction():{ TransactionType ttype; Derivative deriv; }{ ttype = parse_TransactionType() deriv = parse_Derivative() { return new Transaction(ttype,deriv); } } public TransactionType parse_TransactionType():{ TransactionType sup = null; }{ ( sup = parse_Buy() { return sup; } | sup = parse_Create() { return sup; } | sup = parse_Reoffer() { return sup; } | sup = parse_Deliver() { return sup; } | sup = parse_Finish() { return sup; } ) } public Buy parse_Buy():{ }{ "BUY" { return new Buy(); } } public Create parse_Create():{ }{ "CREATE" { return new Create(); } } public Reoffer parse_Reoffer():{ }{ "REOFFER" { return new Reoffer(); } } public Deliver parse_Deliver():{ }{ "DELIVER" { return new Deliver(); } } public Finish parse_Finish():{ }{ "FINISH" { return new Finish(); } } public SDG parse_SDG():{ List players; List> account; List> store; Config config; }{ "SDG" "players" players = parse_List$Player$() "accounts" account = parse_List$Pair$PlayerID$Double$$() "store" store = parse_List$Pair$PlayerID$PlayerStore$$() "config" config = parse_Config() { return new SDG(players,account,store,config); } } public Player parse_Player():{ PlayerID id; String name; }{ "player" id = parse_PlayerID() name = parse_String() { return new Player(id,name); } } public PlayerStore parse_PlayerStore():{ List forSale; List bought; }{ "pstore" forSale = parse_List$Derivative$() bought = parse_List$BoughtDeriv$() { return new PlayerStore(forSale,bought); } } public BoughtDeriv parse_BoughtDeriv():{ Derivative d; PlayerID seller; Option r; Option f; }{ "bought" d = parse_Derivative() seller = parse_PlayerID() r = parse_Option$RawMaterial$() f = parse_Option$FinishedProduct$() { return new BoughtDeriv(d,seller,r,f); } } public Config parse_Config():{ double init; int maxTurns; int timeslot; double mindec; }{ init = parse_double() maxTurns = parse_int() timeslot = parse_int() mindec = parse_double() { return new Config(init,maxTurns,timeslot,mindec); } } public PlayerID parse_PlayerID():{ int id; }{ id = parse_int() { return new PlayerID(id); } } public Option parse_Option$FinishedProduct$():{ Option sup = null; }{ ( sup = parse_Some$FinishedProduct$() { return sup; } | sup = parse_None$FinishedProduct$() { return sup; } ) } public None parse_None$FinishedProduct$():{ }{ { return new None(); } } public Some parse_Some$FinishedProduct$():{ FinishedProduct just; }{ just = parse_FinishedProduct() { return new Some(just); } } public Option parse_Option$RawMaterial$():{ Option sup = null; }{ ( sup = parse_Some$RawMaterial$() { return sup; } | sup = parse_None$RawMaterial$() { return sup; } ) } public None parse_None$RawMaterial$():{ }{ { return new None(); } } public Some parse_Some$RawMaterial$():{ RawMaterial just; }{ just = parse_RawMaterial() { return new Some(just); } } public List parse_List$BoughtDeriv$():{ List sup = null; }{ ( sup = parse_Cons$BoughtDeriv$() { return sup; } | sup = parse_Empty$BoughtDeriv$() { return sup; } ) } public Empty parse_Empty$BoughtDeriv$():{ }{ { return new Empty(); } } public Cons parse_Cons$BoughtDeriv$():{ BoughtDeriv first; List rest; }{ first = parse_BoughtDeriv() rest = parse_List$BoughtDeriv$() { return new Cons(first,rest); } } public List parse_List$Derivative$():{ List sup = null; }{ ( sup = parse_Cons$Derivative$() { return sup; } | sup = parse_Empty$Derivative$() { return sup; } ) } public Empty parse_Empty$Derivative$():{ }{ { return new Empty(); } } public Cons parse_Cons$Derivative$():{ Derivative first; List rest; }{ first = parse_Derivative() rest = parse_List$Derivative$() { return new Cons(first,rest); } } public List> parse_List$Pair$PlayerID$PlayerStore$$():{ List> sup = null; }{ ( sup = parse_Cons$Pair$PlayerID$PlayerStore$$() { return sup; } | sup = parse_Empty$Pair$PlayerID$PlayerStore$$() { return sup; } ) } public Empty> parse_Empty$Pair$PlayerID$PlayerStore$$():{ }{ { return new Empty>(); } } public Cons> parse_Cons$Pair$PlayerID$PlayerStore$$():{ Pair first; List> rest; }{ first = parse_Pair$PlayerID$PlayerStore$() rest = parse_List$Pair$PlayerID$PlayerStore$$() { return new Cons>(first,rest); } } public Pair parse_Pair$PlayerID$PlayerStore$():{ PlayerID a; PlayerStore b; }{ a = parse_PlayerID() b = parse_PlayerStore() { return new Pair(a,b); } } public List> parse_List$Pair$PlayerID$Double$$():{ List> sup = null; }{ ( sup = parse_Cons$Pair$PlayerID$Double$$() { return sup; } | sup = parse_Empty$Pair$PlayerID$Double$$() { return sup; } ) } public Empty> parse_Empty$Pair$PlayerID$Double$$():{ }{ { return new Empty>(); } } public Cons> parse_Cons$Pair$PlayerID$Double$$():{ Pair first; List> rest; }{ first = parse_Pair$PlayerID$Double$() rest = parse_List$Pair$PlayerID$Double$$() { return new Cons>(first,rest); } } public Pair parse_Pair$PlayerID$Double$():{ PlayerID a; Double b; }{ a = parse_PlayerID() b = parse_Double() { return new Pair(a,b); } } public List parse_List$Player$():{ List sup = null; }{ ( sup = parse_Cons$Player$() { return sup; } | sup = parse_Empty$Player$() { return sup; } ) } public Empty parse_Empty$Player$():{ }{ { return new Empty(); } } public Cons parse_Cons$Player$():{ Player first; List rest; }{ first = parse_Player() rest = parse_List$Player$() { return new Cons(first,rest); } } public List parse_List$Transaction$():{ List sup = null; }{ ( sup = parse_Cons$Transaction$() { return sup; } | sup = parse_Empty$Transaction$() { return sup; } ) } public Empty parse_Empty$Transaction$():{ }{ { return new Empty(); } } public Cons parse_Cons$Transaction$():{ Transaction first; List rest; }{ first = parse_Transaction() rest = parse_List$Transaction$() { return new Cons(first,rest); } } public List parse_List$PlayerTransaction$():{ List sup = null; }{ ( sup = parse_Cons$PlayerTransaction$() { return sup; } | sup = parse_Empty$PlayerTransaction$() { return sup; } ) } public Empty parse_Empty$PlayerTransaction$():{ }{ { return new Empty(); } } public Cons parse_Cons$PlayerTransaction$():{ PlayerTransaction first; List rest; }{ first = parse_PlayerTransaction() rest = parse_List$PlayerTransaction$() { return new Cons(first,rest); } } public List parse_List$Round$():{ List sup = null; }{ ( sup = parse_Cons$Round$() { return sup; } | sup = parse_Empty$Round$() { return sup; } ) } public Empty parse_Empty$Round$():{ }{ { return new Empty(); } } public Cons parse_Cons$Round$():{ Round first; List rest; }{ first = parse_Round() rest = parse_List$Round$() { return new Cons(first,rest); } } SKIP : { " " | "\t" | "\n" | "\r" | "\r\n" } SKIP : { <"//" (~["\n","\r"])* ("\n"|"\r\n")> } SKIP : { <"/*" (~["*"])* "*" (~["/"] (~["*"])* "*")* "/">} TOKEN: { < INT : ("+" | "-")?(["0"-"9"])+ > } TOKEN: { < STRING : "\"" (~["\""])* "\"" > } TOKEN: { < TRUE : "true" > } TOKEN: { < FALSE : "false" > } TOKEN: { < DOUBLE : ("-")?(["0"-"9"])+ "." (["0"-"9"])+ | "." (["0"-"9"])+ > } TOKEN: { < IDENT : ["a"-"z","A"-"Z"] (["a"-"z","A"-"Z","0"-"9","_"])* > } TOKEN: { < TEXT : ( "{{" (~["}"])* ( "}" ~["}"] (~["}"])* )* "}}" ) > } TOKEN: { < CHAR: "\'" ( (~["\'","\\","\n","\r"]) | ("\\" ( ["n","t","b","r","f","\\","\'","\""] | ["0"-"7"] ( ["0"-"7"] )? | ["0"-"3"] ["0"-"7"] ["0"-"7"] ) ) ) "\'" > }