options {
  LOOKAHEAD=1;
}


PARSER_BEGIN(Q1)

  class KeyWord {
    public String tok; 
    public int line; 
    public int nest;
    public KeyWord(String t, int l, int n)
    { tok=t; line=l; nest=n; }
  }


public class Q1 {

  /*** The counters ***/
  static int maxNesting = 0;
  static int currNesting = 0;
  static int numGotos = 0;

  /*** Storing keyword information ***/
  static java.util.Vector kwInfo = new java.util.Vector();
  static void printKwInfo()
  {
    System.out.println("Information on keywords:");
    System.out.println("\tWord\tLine\tNesting");
    for(int i=0; i<kwInfo.size(); i++) {
      KeyWord kw = (KeyWord)kwInfo.elementAt(i);
      System.out.println("\t"+kw.tok+"\t"+kw.line+"\t"+kw.nest);
    }
  }
  /*** Main routine - just call parser ***/
  public static void main(String args[]) throws ParseException {
    Q1 parser = new Q1(System.in);
    try {
      parser.c_prog();
      System.out.println("Max. depth of nesting is " + maxNesting);
      System.out.println("Number of gotos is " + numGotos);
      printKwInfo();

    } catch (ParseException x) {
      System.out.println("Exiting due to parse error.");
      throw x;
    }
  }

}

PARSER_END(Q1)

SKIP : /* comments */
{
  <"//" (~["\n","\r"])* ("\n" | "\r" | "\r\n")>
|  <"/*" (~["*"])* "*" ("*" | ~["*","/"] (~["*"])* "*")* "/">
}
 

TOKEN :
{
  < LCURL : "{" >
| < RCURL : "}" >
| < WHILE : "while" >
| < IF : "if" >
| < FOR : "for" >
| < GOTO : "goto" >
}

SPECIAL_TOKEN : /* COMMENTS */
{
  <SINGLE_LINE_COMMENT: "//" (~["\n","\r"])* ("\n"|"\r"|"\r\n")>
| <MULTI_LINE_COMMENT: "/*" (~["*"])* "*" ("*" | (~["*","/"] (~["*"])* "*"))* "/">
}
 
SPECIAL_TOKEN :  
/* Make it ignore identifiers that might contain keywords, for example
 * "my_while", which otherwise would get returned as a <WHILE>
 */
{
  < IDENT : <LETTER> (<LETTER> | ["0"-"9"])+ >
| < #LETTER : ["A"-"Z", "a"-"z", "_"] >
| < OTHER : ~[] >
}

/*************************/
/***** GRAMMAR RULES *****/
/*************************/


void c_prog() :
{}
{
  ( tok() )+ ( <EOF> )
}


void tok() :
{}
{
  <LCURL> 
  { 
    currNesting++; 
    if (currNesting>maxNesting)
      maxNesting = currNesting;
  }
| <RCURL> { currNesting--; }
| ( <WHILE> | <IF> | <FOR> )
  {
    kwInfo.addElement(new KeyWord(token.image, token.beginLine, currNesting));
  }
| <GOTO> { numGotos++; }
}