options {
  STATIC = false;
  JAVA_UNICODE_ESCAPE = true;
}

PARSER_BEGIN(Parser)
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(2, 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)

BusRoute _BusRoute() : {
  BusRoute it;
  RouteName _name;
  RouteLen _totalLength;
  BusStop_List _busStops;
  Bus_List _buses;
} {
  { it=new BusRoute(); }
  "BusRoute:"  _name=_RouteName() { it.set_name(_name); }
  "total"  "route"  "length"  ":"  _totalLength=_RouteLen() { it.set_totalLength(_totalLength); }
  "consisting"  "of"  "bus"  "stops"  ":"  _busStops=_BusStop_List() { it.set_busStops(_busStops); }
  "with"  "assigned"  "busses"  ":"  _buses=_Bus_List() { it.set_buses(_buses); }
  { return it; }
}

BusStop _BusStop() : {
  BusStop it;
  StopId _id;
  RouteLoc _location;
  Person_List _waitingList;
} {
  { it=new BusStop(); }
  _id=_StopId() { it.set_id(_id); }
  "at:"  _location=_RouteLoc() { it.set_location(_location); }
  "with"  "waiting"  "list"  ":"  _waitingList=_Person_List() { it.set_waitingList(_waitingList); }
  { return it; }
}

Bus _Bus() : {
  Bus it;
  BusId _id;
  RouteLoc _position;
  StopId _currentStop;
  BusCapac _capacity;
  BusSpeed _speed;
  Person_List _passengers;
} {
  { it=new Bus(); }
  _id=_BusId() { it.set_id(_id); }
  "at:"  _position=_RouteLoc() { it.set_position(_position); }
  [  "currently"  "at"  "stop"  ":"  _currentStop=_StopId() { it.set_currentStop(_currentStop); }  ]
  "capacity:"  _capacity=_BusCapac() { it.set_capacity(_capacity); }
  "speed:"  _speed=_BusSpeed() { it.set_speed(_speed); }
  "carrying"  "passenger(s)"  ":"  _passengers=_Person_List() { it.set_passengers(_passengers); }
  { return it; }
}

Person _Person() : {
  Person it;
  PersonId _id;
  StopId _destination;
} {
  { it=new Person(); }
  _id=_PersonId() { it.set_id(_id); }
  "destination:"  _destination=_StopId() { it.set_destination(_destination); }
  { return it; }
}

RouteName _RouteName() : {
  RouteName it;
  String _v;
} {
  { it=new RouteName(); }
  _v=_String() { it.set_v(_v); }
  { return it; }
}

RouteLen _RouteLen() : {
  RouteLen it;
  Integer _v;
} {
  { it=new RouteLen(); }
  _v=_Integer() { it.set_v(_v); }
  "ft"  { return it; }
}

RouteLoc _RouteLoc() : {
  RouteLoc it;
  Integer _v;
} {
  { it=new RouteLoc(); }
  _v=_Integer() { it.set_v(_v); }
  "ft"  { return it; }
}

BusCapac _BusCapac() : {
  BusCapac it;
  Integer _v;
} {
  { it=new BusCapac(); }
  _v=_Integer() { it.set_v(_v); }
  "passengers"  { return it; }
}

BusSpeed _BusSpeed() : {
  BusSpeed it;
  Integer _v;
} {
  { it=new BusSpeed(); }
  _v=_Integer() { it.set_v(_v); }
  "ft/min"  { return it; }
}

StopId _StopId() : {
  StopId it;
  Ident _v;
} {
  { it=new StopId(); }
  _v=_Ident() { it.set_v(_v); }
  { return it; }
}

BusId _BusId() : {
  BusId it;
  Ident _v;
} {
  { it=new BusId(); }
  _v=_Ident() { it.set_v(_v); }
  { return it; }
}

PersonId _PersonId() : {
  PersonId it;
  Ident _v;
} {
  { it=new PersonId(); }
  _v=_Ident() { it.set_v(_v); }
  { return it; }
}

Main _Main() : {
  Main it;
} {
  { it=new Main(); }
  { return it; }
}

BusStop_List _BusStop_List() : {
  BusStop_List it;
  Nonempty_BusStop_List _first;
} {
  { it=new BusStop_List(); }
  "("  [  _first=_Nonempty_BusStop_List() { it.set_first(_first); }  ]
  ")"  { return it; }
}

Bus_List _Bus_List() : {
  Bus_List it;
  Nonempty_Bus_List _first;
} {
  { it=new Bus_List(); }
  "("  [  _first=_Nonempty_Bus_List() { it.set_first(_first); }  ]
  ")"  { return it; }
}

Person_List _Person_List() : {
  Person_List it;
  Nonempty_Person_List _first;
} {
  { it=new Person_List(); }
  "("  [  _first=_Nonempty_Person_List() { it.set_first(_first); }  ]
  ")"  { return it; }
}

Nonempty_BusStop_List _Nonempty_BusStop_List() : {
  Nonempty_BusStop_List it;
  BusStop _it;
  Nonempty_BusStop_List _next;
} {
  { it=new Nonempty_BusStop_List(); }
  _it=_BusStop() { it.set_it(_it); }
  [  _next=_Nonempty_BusStop_List() { it.set_next(_next); }  ]
  { return it; }
}

Nonempty_Bus_List _Nonempty_Bus_List() : {
  Nonempty_Bus_List it;
  Bus _it;
  Nonempty_Bus_List _next;
} {
  { it=new Nonempty_Bus_List(); }
  _it=_Bus() { it.set_it(_it); }
  [  _next=_Nonempty_Bus_List() { it.set_next(_next); }  ]
  { return it; }
}

Nonempty_Person_List _Nonempty_Person_List() : {
  Nonempty_Person_List it;
  Person _it;
  Nonempty_Person_List _next;
} {
  { it=new Nonempty_Person_List(); }
  _it=_Person() { it.set_it(_it); }
  [  _next=_Nonempty_Person_List() { it.set_next(_next); }  ]
  { return it; }
}

 
boolean _boolean() : { Token t; }
{
  ( t=<TRUE> { return true; }
  | t=<FALSE> { return false; }
  )
}
 
char _char() : { Token t; } 
{ 
    t=<CHARACTER_LITERAL> { 
       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=<TRUE> { return Boolean.TRUE; }
  | t=<FALSE> { 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; 
    int radix; 
    Number num; 
} { 
  ( 
    ( t=<DECIMAL_LITERAL> { 
       s = t.image; 
       radix = 10; 
      } 
    | t=<HEX_LITERAL> { 
       // Strip off the "0x". 
       s = t.image.substring(2, t.image.length()); 
       radix = 16; 
      } 
    | t=<OCTAL_LITERAL> { 
       s = t.image; 
       radix = 8; 
      } 
    ) { 
       switch (s.charAt(s.length()-1)) { 
       case 'l': case 'L': 
           num = Long.valueOf(s.substring(0, s.length()-1), radix); 
           break; 
       default: 
           num = Integer.valueOf(s, radix); 
           break; 
       } 
    } 
  | t=<FLOATING_POINT_LITERAL> { 
       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_LITERAL> { 
       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=<IDENTIFIER> { 
       return new Ident(t.image); 
    } 
} 
 
Text _Text() : { Token t; } 
{ 
    t=<TEXT_LITERAL> { 
       String s = t.image; 
       return new Text(s.substring(2, s.length()-2)); 
    } 
} 
 
Line _Line() : { Token t; } 
{ 
    { token_source.SwitchTo(1); } 
    t=<LINE> { 
       return new Line(t.image); 
    } 
} 
 
Word _Word() : { Token t; } 
{ 
    { token_source.SwitchTo(2); } 
    t=<WORD> { 
       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"])+ (<EXPONENT>)? (["f","F","d","D"])? 
      | "." (["0"-"9"])+ (<EXPONENT>)? (["f","F","d","D"])? 
      | (["0"-"9"])+ <EXPONENT> (["f","F","d","D"])? 
      | (["0"-"9"])+ (<EXPONENT>)? ["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> (<LETTER>|<DIGIT>)* >
|
  < #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"
      ]
  >
}

<Line> TOKEN :
{
  < LINE: (~["\n","\r"])* > : DEFAULT
}

<Word> SKIP : { " " | "\t" | "\n" | "\r" }
<Word> TOKEN :
{
  < WORD: (~[" ","\t","\n","\r"])* > : DEFAULT
}