// ** This file was generated with DemFGen (vers:12/15/2010)

options{ STATIC = false;  }
PARSER_BEGIN(TheParser)
package gen;

import edu.neu.ccs.demeterf.lib.*;
import edu.neu.ccs.demeterf.*;
import edu.neu.ccs.demeterf.Fields;
import edu.neu.ccs.demeterf.lib.ident;
import edu.neu.ccs.demeterf.lib.verbatim;

  public class TheParser{

   public static String unescape(String str){
      String retval = "";
      int index = 0;
      char ch, ch1;
      int ordinal = 0;
      while (index < str.length()) {
         if(str.charAt(index) != '\\') { retval += str.charAt(index++); continue; }
         ch = str.charAt(++index);
         if(ch == 'b') { retval += '\b'; index++; continue; }
         if(ch == 't') { retval += '\t'; index++; continue; }
         if(ch == 'n') { retval += '\n'; index++; continue; }
         if(ch == 'f') { retval += '\f'; index++; continue; }
         if(ch == 'r') { retval += '\r'; index++; continue; }
         if(ch == '"') { retval += '\"'; index++; continue; }
         if(ch == '\'') { retval += '\''; index++; continue; }
         if(ch == '\\') { retval += '\\'; index++; continue; }
         if(ch >= '0' && ch <= '7'){
            ordinal = ((int)ch) - ((int)'0'); index++;
            ch1 = str.charAt(index);
            if(ch1 >= '0' && ch1 <= '7'){
               ordinal = ordinal*8 + ((int)ch1) - ((int)'0'); index++;
               ch1 = str.charAt(index);
               if(ch <= '3' && ch1 >= '0' && ch1 <= '7'){
                  ordinal = ordinal*8 + ((int)ch1) - ((int)'0'); index++;
               }
            }
            retval += (char)ordinal;
            continue;
         }
         if(ch == 'u'){
            ordinal = 0;
            for(int i = 0; i < 4; i++){
               index++; ch = str.charAt(index);
               ordinal = ordinal*16+hexval(ch);
            }
            index++;
            retval += (char)ordinal;
            continue;
         }
      }
      return retval;
   }
   static int hexval(char c){
      int r = "0123456789ABCDEF".indexOf(Character.toUpperCase(c));
      if(r >= 0)return r;
      throw new RuntimeException(" ** Bad Escaped Character");
   }
  }
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 = <INT>
    { if(t.image.length() > 1 && Character.toLowerCase(t.image.charAt(1)) == 'x')
          return Integer.parseInt(t.image.substring(2), 16);
      return Integer.parseInt(t.image); }
}
Integer parse_Integer():{ int i; }{
    i = parse_int() { return i; }
}
long parse_long():{ Token t; }{
    t = <INT>
    { if(t.image.length() > 1 && Character.toLowerCase(t.image.charAt(1)) == 'x')
          return Long.parseLong(t.image.substring(2), 16);
    return Long.parseLong(t.image); }
}
Long parse_Long():{ long l; }{
    l = parse_long() { return l; }
}
double parse_double():{ Token t; }{
    t = <DOUBLE>
    { return Double.parseDouble(t.image); }
}
Double parse_Double():{ double d; }{
    d = parse_double() { return d; }
}
float parse_float():{ Token t; }{
    t = <DOUBLE>
    { return Float.parseFloat(t.image); }
}
Float parse_Float():{ float f; }{
    f = parse_float() { return f; }
}
String parse_String():{ Token t; }{
    t = <STRING>
    { return unescape(t.image.substring(1,t.image.length()-1)); }
}
boolean parse_boolean():{ Token t; }{
    t = <TRUE> { return true; } |
    t = <FALSE> { return false; }
}
Boolean parse_Boolean():{ boolean b; }{
    b = parse_boolean() { return b; }
}
char parse_char():{ Token t; }{
    t = <CHAR>
    { return unescape(t.image.substring(1,t.image.length()-1)).charAt(0); }
}
Character parse_Character():{ char c; }{
    c = parse_char() { return c; }
}
ident parse_ident():{ Token t; }{
    t = <IDENT>
    { return new ident(t.image); }
}
verbatim parse_verbatim():{ Token t; }{
    t = <TEXT>
    { return new verbatim(t.image.substring(2,t.image.length()-2)); }
}







public Domain parse_Domain():{
     Instance p;
     Solution s;
     ValidPredicate valid;
     QualityFunction quality;
}{
    p = parse_Instance()
    s = parse_Solution()
    valid = parse_ValidPredicate()
    quality = parse_QualityFunction()
    { return new Domain(p,s,valid,quality); }
}

public Instance parse_Instance():{
     ClassDictionary cd;
}{
    cd = parse_ClassDictionary()
    { return new Instance(cd); }
}

public Solution parse_Solution():{
     ClassDictionary cd;
}{
    cd = parse_ClassDictionary()
    { return new Solution(cd); }
}

public ValidPredicate parse_ValidPredicate():{
     ValidBody body;
}{
    body = parse_ValidBody()
    { return new ValidPredicate(body); }
}

public QualityFunction parse_QualityFunction():{
     QualityBody body;
}{
    body = parse_QualityBody()
    { return new QualityFunction(body); }
}

public Claim parse_Claim():{
     Domain d;
     ClassDictionary cd;
     InstancePredicate setOfInstances;
     ProtocolDefinition protocol;
}{
    d = parse_Domain()
    cd = parse_ClassDictionary()
    setOfInstances = parse_InstancePredicate()
    protocol = parse_ProtocolDefinition()
    { return new Claim(d,cd,setOfInstances,protocol); }
}

public InstancePredicate parse_InstancePredicate():{
     PredicateBody body;
}{
    body = parse_PredicateBody()
    { return new InstancePredicate(body); }
}

public ValidBody parse_ValidBody():{
     JavaCode v;
}{
    v = parse_JavaCode()
    { return new ValidBody(v); }
}

public QualityBody parse_QualityBody():{
     JavaCode v;
}{
    v = parse_JavaCode()
    { return new QualityBody(v); }
}

public PredicateBody parse_PredicateBody():{
     JavaCode v;
}{
    v = parse_JavaCode()
    { return new PredicateBody(v); }
}

public InstanceId parse_InstanceId():{
     ident v;
}{
    v = parse_ident()
    { return new InstanceId(v); }
}

public InstanceStructure parse_InstanceStructure():{
}{

    { return new InstanceStructure(); }
}

public SolutionStructure parse_SolutionStructure():{
}{

    { return new SolutionStructure(); }
}

public ClassDictionary parse_ClassDictionary():{
     verbatim v;
}{
    v = parse_verbatim()
    { return new ClassDictionary(v); }
}

public ProtocolTest parse_ProtocolTest():{
     List<ProtocolDefinition> ps;
}{
    ps = parse_List$ProtocolDefinition$()
    <EOF>
    { return new ProtocolTest(ps); }
}

public ProtocolDefinition parse_ProtocolDefinition():{
     ProtocolName pn;
     Option<ClaimSetName> claimSetName;
     List<VariableDeclaration> variableDeclarations;
     List<ProtocolStep> protocolSteps;
     Predicate predicate;
}{
    "protocol"
    pn = parse_ProtocolName()
    claimSetName = parse_Option$ClaimSetName$()
    "variables"
    variableDeclarations = parse_List$VariableDeclaration$()
    protocolSteps = parse_List$ProtocolStep$()
    "predicate"
    predicate = parse_Predicate()
    { return new ProtocolDefinition(pn,claimSetName,variableDeclarations,protocolSteps,predicate); }
}

public ProtocolStep parse_ProtocolStep():{
     StepName stepName;
     ScholarName scholar;
     List<VariableBinding> variableBindings;
}{
    "step"
    stepName = parse_StepName()
    scholar = parse_ScholarName()
    variableBindings = parse_List$VariableBinding$()
    { return new ProtocolStep(stepName,scholar,variableBindings); }
}

public VariableBinding parse_VariableBinding():{
    VariableBinding sup = null;
}{
(   sup = parse_SecretBinding() { return sup; } | 
    sup = parse_RegularBinding() { return sup; } )
}

public VariableDeclaration parse_VariableDeclaration():{
     VariableType variableType;
     VariableName variableName;
}{
    variableType = parse_VariableType()
    variableName = parse_VariableName()
    { return new VariableDeclaration(variableType,variableName); }
}

public Predicate parse_Predicate():{
     List<VariableName> args;
     JavaCode code;
}{
    args = parse_List$VariableName$()
    code = parse_JavaCode()
    { return new Predicate(args,code); }
}

public SecretBinding parse_SecretBinding():{
     StepName sn;
     VariableName varName;
}{
    "secret"
    "until"
    sn = parse_StepName()
    varName = parse_VariableName()
    { return new SecretBinding(sn,varName); }
}

public RegularBinding parse_RegularBinding():{
     VariableName varName;
}{
    varName = parse_VariableName()
    { return new RegularBinding(varName); }
}

public ProtocolName parse_ProtocolName():{
     ident v;
}{
    v = parse_ident()
    { return new ProtocolName(v); }
}

public StepName parse_StepName():{
     ident v;
}{
    v = parse_ident()
    { return new StepName(v); }
}

public VariableName parse_VariableName():{
     ident v;
}{
    v = parse_ident()
    { return new VariableName(v); }
}

public VariableType parse_VariableType():{
     ident v;
}{
    v = parse_ident()
    { return new VariableType(v); }
}

public JavaCode parse_JavaCode():{
     verbatim v;
}{
    v = parse_verbatim()
    { return new JavaCode(v); }
}

public ScholarName parse_ScholarName():{
     ident v;
}{
    v = parse_ident()
    { return new ScholarName(v); }
}

public ClaimSetName parse_ClaimSetName():{
     ident v;
}{
    "claim"
    "set"
    "name"
    v = parse_ident()
    { return new ClaimSetName(v); }
}

public List<VariableName> parse_List$VariableName$():{
    List<VariableName> sup = null;
}{
(   sup = parse_Cons$VariableName$() { return sup; } | 
    sup = parse_Empty$VariableName$() { return sup; } )
}
public Empty<VariableName> parse_Empty$VariableName$():{
}{

    { return new Empty<VariableName>(); }
}
public Cons<VariableName> parse_Cons$VariableName$():{
     VariableName first;
     List<VariableName> rest;
}{
    first = parse_VariableName()
    rest = parse_List$VariableName$()
    { return new Cons<VariableName>(first,rest); }
}
public List<VariableBinding> parse_List$VariableBinding$():{
    List<VariableBinding> sup = null;
}{
(   sup = parse_Cons$VariableBinding$() { return sup; } | 
    sup = parse_Empty$VariableBinding$() { return sup; } )
}
public Empty<VariableBinding> parse_Empty$VariableBinding$():{
}{

    { return new Empty<VariableBinding>(); }
}
public Cons<VariableBinding> parse_Cons$VariableBinding$():{
     VariableBinding first;
     List<VariableBinding> rest;
}{
    first = parse_VariableBinding()
    rest = parse_List$VariableBinding$()
    { return new Cons<VariableBinding>(first,rest); }
}
public List<ProtocolStep> parse_List$ProtocolStep$():{
    List<ProtocolStep> sup = null;
}{
(   sup = parse_Cons$ProtocolStep$() { return sup; } | 
    sup = parse_Empty$ProtocolStep$() { return sup; } )
}
public Empty<ProtocolStep> parse_Empty$ProtocolStep$():{
}{

    { return new Empty<ProtocolStep>(); }
}
public Cons<ProtocolStep> parse_Cons$ProtocolStep$():{
     ProtocolStep first;
     List<ProtocolStep> rest;
}{
    first = parse_ProtocolStep()
    rest = parse_List$ProtocolStep$()
    { return new Cons<ProtocolStep>(first,rest); }
}
public List<VariableDeclaration> parse_List$VariableDeclaration$():{
    List<VariableDeclaration> sup = null;
}{
(   sup = parse_Cons$VariableDeclaration$() { return sup; } | 
    sup = parse_Empty$VariableDeclaration$() { return sup; } )
}
public Empty<VariableDeclaration> parse_Empty$VariableDeclaration$():{
}{

    { return new Empty<VariableDeclaration>(); }
}
public Cons<VariableDeclaration> parse_Cons$VariableDeclaration$():{
     VariableDeclaration first;
     List<VariableDeclaration> rest;
}{
    first = parse_VariableDeclaration()
    rest = parse_List$VariableDeclaration$()
    { return new Cons<VariableDeclaration>(first,rest); }
}
public Option<ClaimSetName> parse_Option$ClaimSetName$():{
    Option<ClaimSetName> sup = null;
}{
(   sup = parse_Some$ClaimSetName$() { return sup; } | 
    sup = parse_None$ClaimSetName$() { return sup; } )
}
public None<ClaimSetName> parse_None$ClaimSetName$():{
}{

    { return new None<ClaimSetName>(); }
}
public Some<ClaimSetName> parse_Some$ClaimSetName$():{
     ClaimSetName just;
}{
    just = parse_ClaimSetName()
    { return new Some<ClaimSetName>(just); }
}
public List<ProtocolDefinition> parse_List$ProtocolDefinition$():{
    List<ProtocolDefinition> sup = null;
}{
(   sup = parse_Cons$ProtocolDefinition$() { return sup; } | 
    sup = parse_Empty$ProtocolDefinition$() { return sup; } )
}
public Empty<ProtocolDefinition> parse_Empty$ProtocolDefinition$():{
}{

    { return new Empty<ProtocolDefinition>(); }
}
public Cons<ProtocolDefinition> parse_Cons$ProtocolDefinition$():{
     ProtocolDefinition first;
     List<ProtocolDefinition> rest;
}{
    first = parse_ProtocolDefinition()
    rest = parse_List$ProtocolDefinition$()
    { return new Cons<ProtocolDefinition>(first,rest); }
}
TOKEN: { < INT : ("+" | "-")? ( (["0"-"9"])+ 
                                  | ("0" ["x","X"]) (["0"-"9","a"-"f","A"-"F"])+ ) >
       | < DOUBLE : ("-")?(["0"-"9"])+ "." (["0"-"9"])+ (<EXPON>)?
                            | "." (["0"-"9"])+  (<EXPON>)? >
       | < #EXPON: ["e","E"] (["+","-"])? (["0"-"9"])+ > }
SKIP : { " " | "\t" | "\n" | "\r" | "\r\n" }
SKIP : { < "//" (~["\n","\r"])* ("\n"|"\r\n") >
       | < "/*" (~["*"])* "*" (~["/"] (~["*"])* "*")* "/" > }
TOKEN: { < TRUE : "true" >
       | < FALSE : "false" > }
TOKEN: { < CHAR: "\'" 
              ( (~["\'","\\","\n","\r"]) | 
                ("\\" ( ["n","t","b","r","f","\\","\'","\""] |
                            ["0"-"7"] ( ["0"-"7"] )? |
                            ["0"-"3"] ["0"-"7"] ["0"-"7"] ) ) )
              "\'" >
       | < STRING :
              "\""
              (   (~["\"","\\","\n","\r"])
                | ("\\"
                    ( ["n","t","b","r","f","\\","'","\""]
                    | ["0"-"7"] ( ["0"-"7"] )?
                    | ["0"-"3"] ["0"-"7"] ["0"-"7"]
                    )
                  )
              )*
              "\"" >
       | < TEXT : ( "{{" (~["}"])* ( "}" ~["}"] (~["}"])* )* "}}" ) >
       | < IDENT : ["a"-"z","A"-"Z","$","_"]
                   (["a"-"z","A"-"Z","0"-"9","_","$"])* > }