Robust/src/IR/Tree/BuildIR.java

   1 package IR.Tree;
   2 import IR.*;
   3
   4 import java.util.*;
   5
   6
   7 public class BuildIR {
   8   State state;
   9
  10   private int m_taskexitnum;
  11
  12   public BuildIR(State state) {
  13     this.state=state;
  14     this.m_taskexitnum = 0;
  15   }
  16
  17   public void buildtree(ParseNode pn, Set toanalyze) {
  18     parseFile(pn, toanalyze);
  19   }
  20
  21   Vector singleimports;
  22   Vector multiimports;
  23   NameDescriptor packages;
  24
  25   /** Parse the classes in this file */
  26   public void parseFile(ParseNode pn, Set toanalyze) {
  27     singleimports=new Vector();
  28     multiimports=new Vector();
  29
  30     ParseNode ipn=pn.getChild("imports").getChild("import_decls_list");
  31     if (ipn!=null) {
  32       ParseNodeVector pnv=ipn.getChildren();
  33       for(int i=0; i<pnv.size(); i++) {
  34         ParseNode pnimport=pnv.elementAt(i);
  35         NameDescriptor nd=parseName(pnimport.getChild("name"));
  36         if (isNode(pnimport,"import_single"))
  37           singleimports.add(nd);
  38         else
  39           multiimports.add(nd);
  40       }
  41     }
  42     ParseNode ppn=pn.getChild("packages").getChild("package");
  43     if (ppn!=null) {
  44       packages=parseName(ppn.getChild("name"));
  45     }
  46     ParseNode tpn=pn.getChild("type_declaration_list");
  47     if (tpn!=null) {
  48       ParseNodeVector pnv=tpn.getChildren();
  49       for(int i=0; i<pnv.size(); i++) {
  50         ParseNode type_pn=pnv.elementAt(i);
  51         if (isEmpty(type_pn))         /* Skip the semicolon */
  52           continue;
  53         if (isNode(type_pn,"class_declaration")) {
  54           ClassDescriptor cn=parseTypeDecl(type_pn);
  55           parseInitializers(cn);
  56           if (toanalyze!=null)
  57             toanalyze.add(cn);
  58           state.addClass(cn);
  59           // for inner classes/enum
  60           HashSet tovisit = new HashSet();
  61           Iterator it_icds = cn.getInnerClasses();
  62           while(it_icds.hasNext()) {
  63             tovisit.add(it_icds.next());
  64           }
  65
  66           while(!tovisit.isEmpty()) {
  67             ClassDescriptor cd = (ClassDescriptor)tovisit.iterator().next();
  68             tovisit.remove(cd);
  69             parseInitializers(cd);
  70             if(toanalyze != null) {
  71               toanalyze.add(cd);
  72             }
  73             state.addClass(cd);
  74
  75             Iterator it_ics = cd.getInnerClasses();
  76             while(it_ics.hasNext()) {
  77               tovisit.add(it_ics.next());
  78             }
  79
  80             Iterator it_ienums = cd.getEnum();
  81             while(it_ienums.hasNext()) {
  82               ClassDescriptor iecd = (ClassDescriptor)it_ienums.next();
  83               if(toanalyze != null) {
  84                 toanalyze.add(iecd);
  85               }
  86               state.addClass(iecd);
  87             }
  88           }
  89
  90           Iterator it_enums = cn.getEnum();
  91           while(it_enums.hasNext()) {
  92             ClassDescriptor ecd = (ClassDescriptor)it_enums.next();
  93             if(toanalyze != null) {
  94               toanalyze.add(ecd);
  95             }
  96             state.addClass(ecd);
  97           }
  98         } else if (isNode(type_pn,"task_declaration")) {
  99           TaskDescriptor td=parseTaskDecl(type_pn);
 100           if (toanalyze!=null)
 101             toanalyze.add(td);
 102           state.addTask(td);
 103         } else if (isNode(type_pn,"interface_declaration")) {
 104           // TODO add version for normal Java later
 105           ClassDescriptor cn = parseInterfaceDecl(type_pn);
 106           if (toanalyze!=null)
 107             toanalyze.add(cn);
 108           state.addClass(cn);
 109
 110           // for enum
 111           Iterator it_enums = cn.getEnum();
 112           while(it_enums.hasNext()) {
 113             ClassDescriptor ecd = (ClassDescriptor)it_enums.next();
 114             if(toanalyze != null) {
 115               toanalyze.add(ecd);
 116             }
 117             state.addClass(ecd);
 118           }
 119         } else if (isNode(type_pn,"enum_declaration")) {
 120           // TODO add version for normal Java later
 121           ClassDescriptor cn = parseEnumDecl(null, type_pn);
 122           if (toanalyze!=null)
 123             toanalyze.add(cn);
 124           state.addClass(cn);
 125         } else {
 126           throw new Error(type_pn.getLabel());
 127         }
 128       }
 129     }
 130   }
 131
 132  public void parseInitializers(ClassDescriptor cn){
 133         Vector fv=cn.getFieldVec();
 134         for(int i=0;i<fv.size();i++) {
 135             FieldDescriptor fd=(FieldDescriptor)fv.get(i);
 136             if(fd.getExpressionNode()!=null) {
 137                 Iterator methodit = cn.getMethods();
 138                 while(methodit.hasNext()){
 139                     MethodDescriptor currmd=(MethodDescriptor)methodit.next();
 140                     if(currmd.isConstructor()){
 141                         BlockNode bn=state.getMethodBody(currmd);
 142                         NameNode nn=new NameNode(new NameDescriptor(fd.getSymbol()));
 143                         AssignmentNode an=new AssignmentNode(nn,fd.getExpressionNode(),new AssignOperation(1));
 144                         bn.addFirstBlockStatement(new BlockExpressionNode(an));
 145                     }
 146                 }
 147             }
 148         }
 149     }
 150
 151   private ClassDescriptor parseEnumDecl(ClassDescriptor cn, ParseNode pn) {
 152     ClassDescriptor ecd=new ClassDescriptor(pn.getChild("name").getTerminal(), false);
 153     ecd.setAsEnum();
 154     if(cn != null) {
 155       ecd.setSurroundingClass(cn.getSymbol());
 156       ecd.setSurrounding(cn);
 157       cn.addEnum(ecd);
 158     }
 159     if (!(ecd.getSymbol().equals(TypeUtil.ObjectClass)||
 160         ecd.getSymbol().equals(TypeUtil.TagClass))) {
 161       ecd.setSuper(TypeUtil.ObjectClass);
 162     }
 163     ecd.setModifiers(parseModifiersList(pn.getChild("modifiers")));
 164     parseEnumBody(ecd, pn.getChild("enumbody"));
 165     return ecd;
 166   }
 167
 168   private void parseEnumBody(ClassDescriptor cn, ParseNode pn) {
 169     ParseNode decls=pn.getChild("enum_constants_list");
 170     if (decls!=null) {
 171       ParseNodeVector pnv=decls.getChildren();
 172       for(int i=0; i<pnv.size(); i++) {
 173         ParseNode decl=pnv.elementAt(i);
 174         if (isNode(decl,"enum_constant")) {
 175           parseEnumConstant(cn,decl);
 176         } else throw new Error();
 177       }
 178     }
 179   }
 180
 181   private void parseEnumConstant(ClassDescriptor cn, ParseNode pn) {
 182     cn.addEnumConstant(pn.getChild("name").getTerminal());
 183   }
 184
 185   public ClassDescriptor parseInterfaceDecl(ParseNode pn) {
 186     ClassDescriptor cn=new ClassDescriptor(pn.getChild("name").getTerminal(), true);
 187     //cn.setAsInterface();
 188     if (!isEmpty(pn.getChild("superIF").getTerminal())) {
 189       /* parse inherited interface name */
 190       ParseNode snlist=pn.getChild("superIF").getChild("extend_interface_list");
 191       ParseNodeVector pnv=snlist.getChildren();
 192       for(int i=0; i<pnv.size(); i++) {
 193         ParseNode decl=pnv.elementAt(i);
 194         if (isNode(decl,"type")) {
 195           NameDescriptor nd=parseName(decl.getChild("class").getChild("name"));
 196           cn.addSuperInterface(nd.toString());
 197         }
 198       }
 199     }
 200     cn.setModifiers(parseModifiersList(pn.getChild("modifiers")));
 201     parseInterfaceBody(cn, pn.getChild("interfacebody"));
 202     return cn;
 203   }
 204
 205   private void parseInterfaceBody(ClassDescriptor cn, ParseNode pn) {
 206     assert(cn.isInterface());
 207     ParseNode decls=pn.getChild("interface_member_declaration_list");
 208     if (decls!=null) {
 209       ParseNodeVector pnv=decls.getChildren();
 210       for(int i=0; i<pnv.size(); i++) {
 211         ParseNode decl=pnv.elementAt(i);
 212         if (isNode(decl,"constant")) {
 213           parseInterfaceConstant(cn,decl);
 214         } else if (isNode(decl,"method")) {
 215           parseInterfaceMethod(cn,decl.getChild("method_declaration"));
 216         } else throw new Error();
 217       }
 218     }
 219   }
 220
 221   private void parseInterfaceConstant(ClassDescriptor cn, ParseNode pn) {
 222     if (pn!=null) {
 223       parseFieldDecl(cn,pn.getChild("field_declaration"));
 224       return;
 225     }
 226     throw new Error();
 227   }
 228
 229   private void parseInterfaceMethod(ClassDescriptor cn, ParseNode pn) {
 230     ParseNode headern=pn.getChild("header");
 231     ParseNode bodyn=pn.getChild("body");
 232     MethodDescriptor md=parseMethodHeader(headern.getChild("method_header"));
 233     md.getModifiers().addModifier(Modifiers.PUBLIC);
 234     md.getModifiers().addModifier(Modifiers.ABSTRACT);
 235     try {
 236       BlockNode bn=parseBlock(bodyn);
 237       cn.addMethod(md);
 238       state.addTreeCode(md,bn);
 239
 240       // this is a hack for investigating new language features
 241       // at the AST level, someday should evolve into a nice compiler
 242       // option *wink*
 243       //if( cn.getSymbol().equals( ***put a class in here like:     "Test" ) &&
 244       //    md.getSymbol().equals( ***put your method in here like: "main" )
 245       //) {
 246       //  bn.setStyle( BlockNode.NORMAL );
 247       //  System.out.println( bn.printNode( 0 ) );
 248       //}
 249
 250     } catch (Exception e) {
 251       System.out.println("Error with method:"+md.getSymbol());
 252       e.printStackTrace();
 253       throw new Error();
 254     } catch (Error e) {
 255       System.out.println("Error with method:"+md.getSymbol());
 256       e.printStackTrace();
 257       throw new Error();
 258     }
 259   }
 260
 261   public TaskDescriptor parseTaskDecl(ParseNode pn) {
 262     TaskDescriptor td=new TaskDescriptor(pn.getChild("name").getTerminal());
 263     ParseNode bodyn=pn.getChild("body");
 264     BlockNode bn=parseBlock(bodyn);
 265     parseParameterList(td, pn);
 266     state.addTreeCode(td,bn);
 267     if (pn.getChild("flag_effects_list")!=null)
 268       td.addFlagEffects(parseFlags(pn.getChild("flag_effects_list")));
 269     return td;
 270   }
 271
 272   public Vector parseFlags(ParseNode pn) {
 273     Vector vfe=new Vector();
 274     ParseNodeVector pnv=pn.getChildren();
 275     for(int i=0; i<pnv.size(); i++) {
 276       ParseNode fn=pnv.elementAt(i);
 277       FlagEffects fe=parseFlagEffects(fn);
 278       vfe.add(fe);
 279     }
 280     return vfe;
 281   }
 282
 283   public FlagEffects parseFlagEffects(ParseNode pn) {
 284     if (isNode(pn,"flag_effect")) {
 285       String flagname=pn.getChild("name").getTerminal();
 286       FlagEffects fe=new FlagEffects(flagname);
 287       if (pn.getChild("flag_list")!=null)
 288         parseFlagEffect(fe, pn.getChild("flag_list"));
 289       if (pn.getChild("tag_list")!=null)
 290         parseTagEffect(fe, pn.getChild("tag_list"));
 291       return fe;
 292     } else throw new Error();
 293   }
 294
 295   public void parseTagEffect(FlagEffects fes, ParseNode pn) {
 296     ParseNodeVector pnv=pn.getChildren();
 297     for(int i=0; i<pnv.size(); i++) {
 298       ParseNode pn2=pnv.elementAt(i);
 299       boolean status=true;
 300       if (isNode(pn2,"not")) {
 301         status=false;
 302         pn2=pn2.getChild("name");
 303       }
 304       String name=pn2.getTerminal();
 305       fes.addTagEffect(new TagEffect(name,status));
 306     }
 307   }
 308
 309   public void parseFlagEffect(FlagEffects fes, ParseNode pn) {
 310     ParseNodeVector pnv=pn.getChildren();
 311     for(int i=0; i<pnv.size(); i++) {
 312       ParseNode pn2=pnv.elementAt(i);
 313       boolean status=true;
 314       if (isNode(pn2,"not")) {
 315         status=false;
 316         pn2=pn2.getChild("name");
 317       }
 318       String name=pn2.getTerminal();
 319       fes.addEffect(new FlagEffect(name,status));
 320     }
 321   }
 322
 323   public FlagExpressionNode parseFlagExpression(ParseNode pn) {
 324     if (isNode(pn,"or")) {
 325       ParseNodeVector pnv=pn.getChildren();
 326       ParseNode left=pnv.elementAt(0);
 327       ParseNode right=pnv.elementAt(1);
 328       return new FlagOpNode(parseFlagExpression(left), parseFlagExpression(right), new Operation(Operation.LOGIC_OR));
 329     } else if (isNode(pn,"and")) {
 330       ParseNodeVector pnv=pn.getChildren();
 331       ParseNode left=pnv.elementAt(0);
 332       ParseNode right=pnv.elementAt(1);
 333       return new FlagOpNode(parseFlagExpression(left), parseFlagExpression(right), new Operation(Operation.LOGIC_AND));
 334     } else if (isNode(pn, "not")) {
 335       ParseNodeVector pnv=pn.getChildren();
 336       ParseNode left=pnv.elementAt(0);
 337       return new FlagOpNode(parseFlagExpression(left), new Operation(Operation.LOGIC_NOT));
 338
 339     } else if (isNode(pn,"name")) {
 340       return new FlagNode(pn.getTerminal());
 341     } else {
 342       throw new Error();
 343     }
 344   }
 345
 346   public Vector parseChecks(ParseNode pn) {
 347     Vector ccs=new Vector();
 348     ParseNodeVector pnv=pn.getChildren();
 349     for(int i=0; i<pnv.size(); i++) {
 350       ParseNode fn=pnv.elementAt(i);
 351       ConstraintCheck cc=parseConstraintCheck(fn);
 352       ccs.add(cc);
 353     }
 354     return ccs;
 355   }
 356
 357   public ConstraintCheck parseConstraintCheck(ParseNode pn) {
 358     if (isNode(pn,"cons_check")) {
 359       String specname=pn.getChild("name").getChild("identifier").getTerminal();
 360       Vector[] args=parseConsArgumentList(pn);
 361       ConstraintCheck cc=new ConstraintCheck(specname);
 362       for(int i=0; i<args[0].size(); i++) {
 363         cc.addVariable((String)args[0].get(i));
 364         cc.addArgument((ExpressionNode)args[1].get(i));
 365       }
 366       return cc;
 367     } else throw new Error();
 368   }
 369
 370   public void parseParameterList(TaskDescriptor td, ParseNode pn) {
 371
 372     boolean optional;
 373     ParseNode paramlist=pn.getChild("task_parameter_list");
 374     if (paramlist==null)
 375       return;
 376     ParseNodeVector pnv=paramlist.getChildren();
 377     for(int i=0; i<pnv.size(); i++) {
 378       ParseNode paramn=pnv.elementAt(i);
 379       if(paramn.getChild("optional")!=null) {
 380         optional = true;
 381         paramn = paramn.getChild("optional").getFirstChild();
 382         System.out.println("OPTIONAL FOUND!!!!!!!");
 383       } else { optional = false;
 384                System.out.println("NOT OPTIONAL");}
 385
 386       TypeDescriptor type=parseTypeDescriptor(paramn);
 387
 388       String paramname=paramn.getChild("single").getTerminal();
 389       FlagExpressionNode fen=null;
 390       if (paramn.getChild("flag")!=null)
 391         fen=parseFlagExpression(paramn.getChild("flag").getFirstChild());
 392
 393       ParseNode tagnode=paramn.getChild("tag");
 394
 395       TagExpressionList tel=null;
 396       if (tagnode!=null) {
 397         tel=parseTagExpressionList(tagnode);
 398       }
 399
 400       td.addParameter(type,paramname,fen, tel, optional);
 401     }
 402   }
 403
 404   public TagExpressionList parseTagExpressionList(ParseNode pn) {
 405     //BUG FIX: change pn.getChildren() to pn.getChild("tag_expression_list").getChildren()
 406     //To test, feed in any input program that uses tags
 407     ParseNodeVector pnv=pn.getChild("tag_expression_list").getChildren();
 408     TagExpressionList tel=new TagExpressionList();
 409     for(int i=0; i<pnv.size(); i++) {
 410       ParseNode tn=pnv.elementAt(i);
 411       String type=tn.getChild("type").getTerminal();
 412       String name=tn.getChild("single").getTerminal();
 413       tel.addTag(type, name);
 414     }
 415     return tel;
 416   }
 417
 418   public ClassDescriptor parseTypeDecl(ParseNode pn) {
 419     ClassDescriptor cn=new ClassDescriptor(pn.getChild("name").getTerminal(), false);
 420     if (!isEmpty(pn.getChild("super").getTerminal())) {
 421       /* parse superclass name */
 422       ParseNode snn=pn.getChild("super").getChild("type").getChild("class").getChild("name");
 423       NameDescriptor nd=parseName(snn);
 424       cn.setSuper(nd.toString());
 425     } else {
 426       if (!(cn.getSymbol().equals(TypeUtil.ObjectClass)||
 427             cn.getSymbol().equals(TypeUtil.TagClass)))
 428         cn.setSuper(TypeUtil.ObjectClass);
 429     }
 430     // check inherited interfaces
 431     if (!isEmpty(pn.getChild("superIF").getTerminal())) {
 432       /* parse inherited interface name */
 433       ParseNode snlist=pn.getChild("superIF").getChild("interface_type_list");
 434       ParseNodeVector pnv=snlist.getChildren();
 435       for(int i=0; i<pnv.size(); i++) {
 436         ParseNode decl=pnv.elementAt(i);
 437         if (isNode(decl,"type")) {
 438           NameDescriptor nd=parseName(decl.getChild("class").getChild("name"));
 439           cn.addSuperInterface(nd.toString());
 440         }
 441       }
 442     }
 443     cn.setModifiers(parseModifiersList(pn.getChild("modifiers")));
 444     parseClassBody(cn, pn.getChild("classbody"));
 445
 446     boolean hasConstructor = false;
 447     for(Iterator method_it=cn.getMethods(); method_it.hasNext();) {
 448       MethodDescriptor md=(MethodDescriptor)method_it.next();
 449       hasConstructor |= md.isConstructor();
 450     }
 451     if((!hasConstructor) && (!cn.isEnum())) {
 452       // add a default constructor for this class
 453       MethodDescriptor md = new MethodDescriptor(new Modifiers(Modifiers.PUBLIC),
 454           cn.getSymbol(), false);
 455       BlockNode bn=new BlockNode();
 456       state.addTreeCode(md,bn);
 457       md.setDefaultConstructor();
 458       cn.addMethod(md);
 459     }
 460     return cn;
 461   }
 462
 463   private void parseClassBody(ClassDescriptor cn, ParseNode pn) {
 464     ParseNode decls=pn.getChild("class_body_declaration_list");
 465     if (decls!=null) {
 466       ParseNodeVector pnv=decls.getChildren();
 467       for(int i=0; i<pnv.size(); i++) {
 468         ParseNode decl=pnv.elementAt(i);
 469         if (isNode(decl,"member")) {
 470           parseClassMember(cn,decl);
 471         } else if (isNode(decl,"constructor")) {
 472           parseConstructorDecl(cn,decl.getChild("constructor_declaration"));
 473         } else if (isNode(decl, "static_block")) {
 474           parseStaticBlockDecl(cn, decl.getChild("static_block_declaration"));
 475         } else if (isNode(decl,"block")) {
 476         } else throw new Error();
 477       }
 478     }
 479   }
 480
 481   private void parseClassMember(ClassDescriptor cn, ParseNode pn) {
 482     ParseNode fieldnode=pn.getChild("field");
 483     if (fieldnode!=null) {
 484       parseFieldDecl(cn,fieldnode.getChild("field_declaration"));
 485       return;
 486     }
 487     ParseNode methodnode=pn.getChild("method");
 488     if (methodnode!=null) {
 489       parseMethodDecl(cn,methodnode.getChild("method_declaration"));
 490       return;
 491     }
 492     ParseNode innerclassnode=pn.getChild("inner_class_declaration");
 493     if (innerclassnode!=null) {
 494       parseInnerClassDecl(cn,innerclassnode);
 495       return;
 496     }
 497     ParseNode enumnode=pn.getChild("enum_declaration");
 498     if (enumnode!=null) {
 499       parseEnumDecl(cn,enumnode);
 500       return;
 501     }
 502     ParseNode flagnode=pn.getChild("flag");
 503     if (flagnode!=null) {
 504       parseFlagDecl(cn, flagnode.getChild("flag_declaration"));
 505       return;
 506     }
 507     // in case there are empty node
 508     ParseNode emptynode=pn.getChild("empty");
 509     if(emptynode != null) {
 510       return;
 511     }
 512     throw new Error();
 513   }
 514
 515   private ClassDescriptor parseInnerClassDecl(ClassDescriptor cn, ParseNode pn) {
 516     ClassDescriptor icn=new ClassDescriptor(pn.getChild("name").getTerminal(), false);
 517     icn.setAsInnerClass();
 518     icn.setSurroundingClass(cn.getSymbol());
 519     icn.setSurrounding(cn);
 520     cn.addInnerClass(icn);
 521     if (!isEmpty(pn.getChild("super").getTerminal())) {
 522       /* parse superclass name */
 523       ParseNode snn=pn.getChild("super").getChild("type").getChild("class").getChild("name");
 524       NameDescriptor nd=parseName(snn);
 525       icn.setSuper(nd.toString());
 526     } else {
 527       if (!(icn.getSymbol().equals(TypeUtil.ObjectClass)||
 528           icn.getSymbol().equals(TypeUtil.TagClass)))
 529         icn.setSuper(TypeUtil.ObjectClass);
 530     }
 531     // check inherited interfaces
 532     if (!isEmpty(pn.getChild("superIF").getTerminal())) {
 533       /* parse inherited interface name */
 534       ParseNode snlist=pn.getChild("superIF").getChild("interface_type_list");
 535       ParseNodeVector pnv=snlist.getChildren();
 536       for(int i=0; i<pnv.size(); i++) {
 537         ParseNode decl=pnv.elementAt(i);
 538         if (isNode(decl,"type")) {
 539           NameDescriptor nd=parseName(decl.getChild("class").getChild("name"));
 540           icn.addSuperInterface(nd.toString());
 541         }
 542       }
 543     }
 544     icn.setModifiers(parseModifiersList(pn.getChild("modifiers")));
 545     if(!icn.isStatic()) {
 546       throw new Error("Error: inner class " + icn.getSymbol() + " in Class " +
 547           cn.getSymbol() + " is not a nested class and is not supported yet!");
 548     }
 549     parseClassBody(icn, pn.getChild("classbody"));
 550     return icn;
 551   }
 552
 553   private TypeDescriptor parseTypeDescriptor(ParseNode pn) {
 554     ParseNode tn=pn.getChild("type");
 555     String type_st=tn.getTerminal();
 556     if(type_st.equals("byte")) {
 557       return state.getTypeDescriptor(TypeDescriptor.BYTE);
 558     } else if(type_st.equals("short")) {
 559       return state.getTypeDescriptor(TypeDescriptor.SHORT);
 560     } else if(type_st.equals("boolean")) {
 561       return state.getTypeDescriptor(TypeDescriptor.BOOLEAN);
 562     } else if(type_st.equals("int")) {
 563       return state.getTypeDescriptor(TypeDescriptor.INT);
 564     } else if(type_st.equals("long")) {
 565       return state.getTypeDescriptor(TypeDescriptor.LONG);
 566     } else if(type_st.equals("char")) {
 567       return state.getTypeDescriptor(TypeDescriptor.CHAR);
 568     } else if(type_st.equals("float")) {
 569       return state.getTypeDescriptor(TypeDescriptor.FLOAT);
 570     } else if(type_st.equals("double")) {
 571       return state.getTypeDescriptor(TypeDescriptor.DOUBLE);
 572     } else if(type_st.equals("class")) {
 573       ParseNode nn=tn.getChild("class");
 574       return state.getTypeDescriptor(parseName(nn.getChild("name")));
 575     } else if(type_st.equals("array")) {
 576       ParseNode nn=tn.getChild("array");
 577       TypeDescriptor td=parseTypeDescriptor(nn.getChild("basetype"));
 578       Integer numdims=(Integer)nn.getChild("dims").getLiteral();
 579       for(int i=0; i<numdims.intValue(); i++)
 580         td=td.makeArray(state);
 581       return td;
 582     } else {
 583       System.out.println(pn.PPrint(2, true));
 584       throw new Error();
 585     }
 586   }
 587
 588   private NameDescriptor parseName(ParseNode nn) {
 589     ParseNode base=nn.getChild("base");
 590     ParseNode id=nn.getChild("identifier");
 591     if (base==null)
 592       return new NameDescriptor(id.getTerminal());
 593     return new NameDescriptor(parseName(base.getChild("name")),id.getTerminal());
 594
 595   }
 596
 597   private void parseFlagDecl(ClassDescriptor cn,ParseNode pn) {
 598     String name=pn.getChild("name").getTerminal();
 599     FlagDescriptor flag=new FlagDescriptor(name);
 600     if (pn.getChild("external")!=null)
 601       flag.makeExternal();
 602     cn.addFlag(flag);
 603   }
 604
 605   private void parseFieldDecl(ClassDescriptor cn,ParseNode pn) {
 606     ParseNode mn=pn.getChild("modifier");
 607     Modifiers m=parseModifiersList(mn);
 608     if(cn.isInterface()) {
 609       // TODO add version for normal Java later
 610       // Can only be PUBLIC or STATIC or FINAL
 611       if((m.isAbstract()) || (m.isAtomic()) || (m.isNative())
 612           || (m.isSynchronized())) {
 613         throw new Error("Error: field in Interface " + cn.getSymbol() + "can only be PUBLIC or STATIC or FINAL");
 614       }
 615       m.addModifier(Modifiers.PUBLIC);
 616       m.addModifier(Modifiers.STATIC);
 617       m.addModifier(Modifiers.FINAL);
 618     }
 619
 620     ParseNode tn=pn.getChild("type");
 621     TypeDescriptor t=parseTypeDescriptor(tn);
 622     assignAnnotationsToType(m,t);
 623     ParseNode vn=pn.getChild("variables").getChild("variable_declarators_list");
 624     ParseNodeVector pnv=vn.getChildren();
 625     boolean isglobal=pn.getChild("global")!=null;
 626
 627     for(int i=0; i<pnv.size(); i++) {
 628       ParseNode vardecl=pnv.elementAt(i);
 629       ParseNode tmp=vardecl;
 630       TypeDescriptor arrayt=t;
 631       while (tmp.getChild("single")==null) {
 632         arrayt=arrayt.makeArray(state);
 633         tmp=tmp.getChild("array");
 634       }
 635       String identifier=tmp.getChild("single").getTerminal();
 636       ParseNode epn=vardecl.getChild("initializer");
 637
 638       ExpressionNode en=null;
 639       if (epn!=null) {
 640         en=parseExpression(epn.getFirstChild());
 641         if(m.isStatic()) {
 642           // for static field, the initializer should be considered as a
 643           // static block
 644           boolean isfirst = false;
 645           MethodDescriptor md = (MethodDescriptor)cn.getMethodTable().getFromSameScope("staticblocks");
 646           if(md == null) {
 647             // the first static block for this class
 648             Modifiers m_i=new Modifiers();
 649             m_i.addModifier(Modifiers.STATIC);
 650             md = new MethodDescriptor(m_i, "staticblocks", false);
 651             md.setAsStaticBlock();
 652             isfirst = true;
 653           }
 654           if(isfirst) {
 655             cn.addMethod(md);
 656           }
 657           cn.incStaticBlocks();
 658           BlockNode bn=new BlockNode();
 659           NameNode nn=new NameNode(new NameDescriptor(identifier));
 660           AssignmentNode an=new AssignmentNode(nn,en,new AssignOperation(1));
 661           bn.addBlockStatement(new BlockExpressionNode(an));
 662           if(isfirst) {
 663             state.addTreeCode(md,bn);
 664           } else {
 665             BlockNode obn = state.getMethodBody(md);
 666             for(int ii = 0; ii < bn.size(); ii++) {
 667               BlockStatementNode bsn = bn.get(ii);
 668               obn.addBlockStatement(bsn);
 669             }
 670             state.addTreeCode(md, obn);
 671             bn = null;
 672           }
 673           en = null;
 674         }
 675       }
 676
 677       cn.addField(new FieldDescriptor(m, arrayt, identifier, en, isglobal));
 678     }
 679   }
 680
 681   private void assignAnnotationsToType(Modifiers modifiers, TypeDescriptor type){
 682     Vector<AnnotationDescriptor> annotations=modifiers.getAnnotations();
 683     for(int i=0; i<annotations.size(); i++) {
 684       // it only supports a marker annotation
 685       AnnotationDescriptor an=annotations.elementAt(i);
 686       type.addAnnotationMarker(an);
 687     }
 688   }
 689
 690   private ExpressionNode parseExpression(ParseNode pn) {
 691     if (isNode(pn,"assignment"))
 692       return parseAssignmentExpression(pn);
 693     else if (isNode(pn,"logical_or")||isNode(pn,"logical_and")||
 694              isNode(pn,"bitwise_or")||isNode(pn,"bitwise_xor")||
 695              isNode(pn,"bitwise_and")||isNode(pn,"equal")||
 696              isNode(pn,"not_equal")||isNode(pn,"comp_lt")||
 697              isNode(pn,"comp_lte")||isNode(pn,"comp_gt")||
 698              isNode(pn,"comp_gte")||isNode(pn,"leftshift")||
 699              isNode(pn,"rightshift")||isNode(pn,"sub")||
 700              isNode(pn,"urightshift")||isNode(pn,"sub")||
 701              isNode(pn,"add")||isNode(pn,"mult")||
 702              isNode(pn,"div")||isNode(pn,"mod")) {
 703       ParseNodeVector pnv=pn.getChildren();
 704       ParseNode left=pnv.elementAt(0);
 705       ParseNode right=pnv.elementAt(1);
 706       Operation op=new Operation(pn.getLabel());
 707       return new OpNode(parseExpression(left),parseExpression(right),op);
 708     } else if (isNode(pn,"unaryplus")||
 709                isNode(pn,"unaryminus")||
 710                isNode(pn,"not")||
 711                isNode(pn,"comp")) {
 712       ParseNode left=pn.getFirstChild();
 713       Operation op=new Operation(pn.getLabel());
 714       return new OpNode(parseExpression(left),op);
 715     } else if (isNode(pn,"postinc")||
 716                isNode(pn,"postdec")) {
 717       ParseNode left=pn.getFirstChild();
 718       AssignOperation op=new AssignOperation(pn.getLabel());
 719       return new AssignmentNode(parseExpression(left),null,op);
 720
 721     } else if (isNode(pn,"preinc")||
 722                isNode(pn,"predec")) {
 723       ParseNode left=pn.getFirstChild();
 724       AssignOperation op=isNode(pn,"preinc") ? new AssignOperation(AssignOperation.PLUSEQ) : new AssignOperation(AssignOperation.MINUSEQ);
 725       return new AssignmentNode(parseExpression(left),
 726                                 new LiteralNode("integer",new Integer(1)),op);
 727     } else if (isNode(pn,"literal")) {
 728       String literaltype=pn.getTerminal();
 729       ParseNode literalnode=pn.getChild(literaltype);
 730       Object literal_obj=literalnode.getLiteral();
 731       return new LiteralNode(literaltype, literal_obj);
 732     } else if (isNode(pn,"createobject")) {
 733       TypeDescriptor td=parseTypeDescriptor(pn);
 734
 735       Vector args=parseArgumentList(pn);
 736       boolean isglobal=pn.getChild("global")!=null||
 737         pn.getChild("scratch")!=null;
 738       String disjointId=null;
 739       if( pn.getChild("disjoint") != null) {
 740         disjointId = pn.getChild("disjoint").getTerminal();
 741       }
 742       CreateObjectNode con=new CreateObjectNode(td, isglobal, disjointId);
 743       for(int i=0; i<args.size(); i++) {
 744         con.addArgument((ExpressionNode)args.get(i));
 745       }
 746       /* Could have flag set or tag added here */
 747       if (pn.getChild("flag_list")!=null||pn.getChild("tag_list")!=null) {
 748         FlagEffects fe=new FlagEffects(null);
 749         if (pn.getChild("flag_list")!=null)
 750           parseFlagEffect(fe, pn.getChild("flag_list"));
 751
 752         if (pn.getChild("tag_list")!=null)
 753           parseTagEffect(fe, pn.getChild("tag_list"));
 754         con.addFlagEffects(fe);
 755       }
 756
 757       return con;
 758     } else if (isNode(pn,"createarray")) {
 759       //System.out.println(pn.PPrint(3,true));
 760       boolean isglobal=pn.getChild("global")!=null||
 761         pn.getChild("scratch")!=null;
 762       String disjointId=null;
 763       if( pn.getChild("disjoint") != null) {
 764         disjointId = pn.getChild("disjoint").getTerminal();
 765       }
 766       TypeDescriptor td=parseTypeDescriptor(pn);
 767       Vector args=parseDimExprs(pn);
 768       int num=0;
 769       if (pn.getChild("dims_opt").getLiteral()!=null)
 770         num=((Integer)pn.getChild("dims_opt").getLiteral()).intValue();
 771       for(int i=0; i<(args.size()+num); i++)
 772         td=td.makeArray(state);
 773       CreateObjectNode con=new CreateObjectNode(td, isglobal, disjointId);
 774       for(int i=0; i<args.size(); i++) {
 775         con.addArgument((ExpressionNode)args.get(i));
 776       }
 777       return con;
 778     } if (isNode(pn,"createarray2")) {
 779       TypeDescriptor td=parseTypeDescriptor(pn);
 780       int num=0;
 781       if (pn.getChild("dims_opt").getLiteral()!=null)
 782     num=((Integer)pn.getChild("dims_opt").getLiteral()).intValue();
 783       for(int i=0; i<num; i++)
 784     td=td.makeArray(state);
 785       CreateObjectNode con=new CreateObjectNode(td, false, null);
 786       // TODO array initializers
 787       ParseNode ipn = pn.getChild("initializer");
 788       Vector initializers=parseVariableInitializerList(ipn);
 789       ArrayInitializerNode ain = new ArrayInitializerNode(initializers);
 790       con.addArrayInitializer(ain);
 791       return con;
 792     } else if (isNode(pn,"name")) {
 793       NameDescriptor nd=parseName(pn);
 794       return new NameNode(nd);
 795     } else if (isNode(pn,"this")) {
 796       NameDescriptor nd=new NameDescriptor("this");
 797       return new NameNode(nd);
 798     } else if (isNode(pn,"isavailable")) {
 799       NameDescriptor nd=new NameDescriptor(pn.getTerminal());
 800       return new OpNode(new NameNode(nd),null,new Operation(Operation.ISAVAILABLE));
 801     } else if (isNode(pn,"methodinvoke1")) {
 802       NameDescriptor nd=parseName(pn.getChild("name"));
 803       Vector args=parseArgumentList(pn);
 804       MethodInvokeNode min=new MethodInvokeNode(nd);
 805       for(int i=0; i<args.size(); i++) {
 806         min.addArgument((ExpressionNode)args.get(i));
 807       }
 808       return min;
 809     } else if (isNode(pn,"methodinvoke2")) {
 810       String methodid=pn.getChild("id").getTerminal();
 811       ExpressionNode exp=parseExpression(pn.getChild("base").getFirstChild());
 812       Vector args=parseArgumentList(pn);
 813       MethodInvokeNode min=new MethodInvokeNode(methodid,exp);
 814       for(int i=0; i<args.size(); i++) {
 815         min.addArgument((ExpressionNode)args.get(i));
 816       }
 817       return min;
 818     } else if (isNode(pn,"fieldaccess")) {
 819       ExpressionNode en=parseExpression(pn.getChild("base").getFirstChild());
 820       String fieldname=pn.getChild("field").getTerminal();
 821       return new FieldAccessNode(en,fieldname);
 822     } else if (isNode(pn,"arrayaccess")) {
 823       ExpressionNode en=parseExpression(pn.getChild("base").getFirstChild());
 824       ExpressionNode index=parseExpression(pn.getChild("index").getFirstChild());
 825       return new ArrayAccessNode(en,index);
 826     } else if (isNode(pn,"cast1")) {
 827       try {
 828         return new CastNode(parseTypeDescriptor(pn.getChild("type")),parseExpression(pn.getChild("exp").getFirstChild()));
 829       } catch (Exception e) {
 830         System.out.println(pn.PPrint(1,true));
 831         e.printStackTrace();
 832         throw new Error();
 833       }
 834     } else if (isNode(pn,"cast2")) {
 835       return new CastNode(parseExpression(pn.getChild("type").getFirstChild()),parseExpression(pn.getChild("exp").getFirstChild()));
 836     } else if (isNode(pn, "getoffset")) {
 837       TypeDescriptor td=parseTypeDescriptor(pn);
 838       String fieldname = pn.getChild("field").getTerminal();
 839       //System.out.println("Checking the values of: "+ " td.toString()= " + td.toString()+ "  fieldname= " + fieldname);
 840       return new OffsetNode(td, fieldname);
 841     } else if (isNode(pn, "tert")) {
 842       return new TertiaryNode(parseExpression(pn.getChild("cond").getFirstChild()),
 843                               parseExpression(pn.getChild("trueexpr").getFirstChild()),
 844                               parseExpression(pn.getChild("falseexpr").getFirstChild()) );
 845     } else if (isNode(pn, "instanceof")) {
 846       ExpressionNode exp=parseExpression(pn.getChild("exp").getFirstChild());
 847       TypeDescriptor t=parseTypeDescriptor(pn);
 848       return new InstanceOfNode(exp,t);
 849     } else if (isNode(pn, "array_initializer")) {
 850       Vector initializers=parseVariableInitializerList(pn);
 851       return new ArrayInitializerNode(initializers);
 852     } else if (isNode(pn, "class_type")) {
 853       TypeDescriptor td=parseTypeDescriptor(pn);
 854       return new ClassTypeNode(td);
 855     } else if (isNode(pn, "empty")) {
 856       return null;
 857     } else {
 858       System.out.println("---------------------");
 859       System.out.println(pn.PPrint(3,true));
 860       throw new Error();
 861     }
 862   }
 863
 864   private Vector parseDimExprs(ParseNode pn) {
 865     Vector arglist=new Vector();
 866     ParseNode an=pn.getChild("dim_exprs");
 867     if (an==null)       /* No argument list */
 868       return arglist;
 869     ParseNodeVector anv=an.getChildren();
 870     for(int i=0; i<anv.size(); i++) {
 871       arglist.add(parseExpression(anv.elementAt(i)));
 872     }
 873     return arglist;
 874   }
 875
 876   private Vector parseArgumentList(ParseNode pn) {
 877     Vector arglist=new Vector();
 878     ParseNode an=pn.getChild("argument_list");
 879     if (an==null)       /* No argument list */
 880       return arglist;
 881     ParseNodeVector anv=an.getChildren();
 882     for(int i=0; i<anv.size(); i++) {
 883       arglist.add(parseExpression(anv.elementAt(i)));
 884     }
 885     return arglist;
 886   }
 887
 888   private Vector[] parseConsArgumentList(ParseNode pn) {
 889     Vector arglist=new Vector();
 890     Vector varlist=new Vector();
 891     ParseNode an=pn.getChild("cons_argument_list");
 892     if (an==null)       /* No argument list */
 893       return new Vector[] {varlist, arglist};
 894     ParseNodeVector anv=an.getChildren();
 895     for(int i=0; i<anv.size(); i++) {
 896       ParseNode cpn=anv.elementAt(i);
 897       ParseNode var=cpn.getChild("var");
 898       ParseNode exp=cpn.getChild("exp").getFirstChild();
 899       varlist.add(var.getTerminal());
 900       arglist.add(parseExpression(exp));
 901     }
 902     return new Vector[] {varlist, arglist};
 903   }
 904
 905   private Vector parseVariableInitializerList(ParseNode pn) {
 906     Vector varInitList=new Vector();
 907     ParseNode vin=pn.getChild("var_init_list");
 908     if (vin==null)       /* No argument list */
 909       return varInitList;
 910     ParseNodeVector vinv=vin.getChildren();
 911     for(int i=0; i<vinv.size(); i++) {
 912       varInitList.add(parseExpression(vinv.elementAt(i)));
 913     }
 914     return varInitList;
 915   }
 916
 917   private ExpressionNode parseAssignmentExpression(ParseNode pn) {
 918     AssignOperation ao=new AssignOperation(pn.getChild("op").getTerminal());
 919     ParseNodeVector pnv=pn.getChild("args").getChildren();
 920
 921     AssignmentNode an=new AssignmentNode(parseExpression(pnv.elementAt(0)),parseExpression(pnv.elementAt(1)),ao);
 922     return an;
 923   }
 924
 925
 926   private void parseMethodDecl(ClassDescriptor cn, ParseNode pn) {
 927     ParseNode headern=pn.getChild("method_header");
 928     ParseNode bodyn=pn.getChild("body");
 929     MethodDescriptor md=parseMethodHeader(headern);
 930     try {
 931       BlockNode bn=parseBlock(bodyn);
 932       cn.addMethod(md);
 933       state.addTreeCode(md,bn);
 934
 935       // this is a hack for investigating new language features
 936       // at the AST level, someday should evolve into a nice compiler
 937       // option *wink*
 938       //if( cn.getSymbol().equals( ***put a class in here like:     "Test" ) &&
 939       //    md.getSymbol().equals( ***put your method in here like: "main" )
 940       //) {
 941       //  bn.setStyle( BlockNode.NORMAL );
 942       //  System.out.println( bn.printNode( 0 ) );
 943       //}
 944
 945     } catch (Exception e) {
 946       System.out.println("Error with method:"+md.getSymbol());
 947       e.printStackTrace();
 948       throw new Error();
 949     } catch (Error e) {
 950       System.out.println("Error with method:"+md.getSymbol());
 951       e.printStackTrace();
 952       throw new Error();
 953     }
 954   }
 955
 956   private void parseConstructorDecl(ClassDescriptor cn, ParseNode pn) {
 957     ParseNode mn=pn.getChild("modifiers");
 958     Modifiers m=parseModifiersList(mn);
 959     ParseNode cdecl=pn.getChild("constructor_declarator");
 960     boolean isglobal=cdecl.getChild("global")!=null;
 961     String name=cdecl.getChild("name").getChild("identifier").getTerminal();
 962     MethodDescriptor md=new MethodDescriptor(m, name, isglobal);
 963     ParseNode paramnode=cdecl.getChild("parameters");
 964     parseParameterList(md,paramnode);
 965     ParseNode bodyn0=pn.getChild("body");
 966     ParseNode bodyn=bodyn0.getChild("constructor_body");
 967     cn.addMethod(md);
 968     BlockNode bn=null;
 969     if (bodyn!=null&&bodyn.getChild("block_statement_list")!=null)
 970       bn=parseBlock(bodyn);
 971     else
 972       bn=new BlockNode();
 973     if (bodyn!=null&&bodyn.getChild("superinvoke")!=null) {
 974       ParseNode sin=bodyn.getChild("superinvoke");
 975       NameDescriptor nd=new NameDescriptor("super");
 976       Vector args=parseArgumentList(sin);
 977       MethodInvokeNode min=new MethodInvokeNode(nd);
 978       for(int i=0; i<args.size(); i++) {
 979         min.addArgument((ExpressionNode)args.get(i));
 980       }
 981       BlockExpressionNode ben=new BlockExpressionNode(min);
 982       bn.addFirstBlockStatement(ben);
 983
 984     } else if (bodyn!=null&&bodyn.getChild("explconstrinv")!=null) {
 985       ParseNode eci=bodyn.getChild("explconstrinv");
 986       NameDescriptor nd=new NameDescriptor(cn.getSymbol());
 987       Vector args=parseArgumentList(eci);
 988       MethodInvokeNode min=new MethodInvokeNode(nd);
 989       for(int i=0; i<args.size(); i++) {
 990         min.addArgument((ExpressionNode)args.get(i));
 991       }
 992       BlockExpressionNode ben=new BlockExpressionNode(min);
 993       bn.addFirstBlockStatement(ben);
 994     }
 995     state.addTreeCode(md,bn);
 996   }
 997
 998   private void parseStaticBlockDecl(ClassDescriptor cn, ParseNode pn) {
 999     // Each class maintains one MethodDecscriptor which combines all its
1000     // static blocks in their declaration order
1001     boolean isfirst = false;
1002     MethodDescriptor md = (MethodDescriptor)cn.getMethodTable().getFromSameScope("staticblocks");
1003     if(md == null) {
1004       // the first static block for this class
1005       Modifiers m_i=new Modifiers();
1006       m_i.addModifier(Modifiers.STATIC);
1007       md = new MethodDescriptor(m_i, "staticblocks", false);
1008       md.setAsStaticBlock();
1009       isfirst = true;
1010     }
1011     ParseNode bodyn=pn.getChild("body");
1012     if(isfirst) {
1013       cn.addMethod(md);
1014     }
1015     cn.incStaticBlocks();
1016     BlockNode bn=null;
1017     if (bodyn!=null&&bodyn.getChild("block_statement_list")!=null)
1018       bn=parseBlock(bodyn);
1019     else
1020       bn=new BlockNode();
1021     if(isfirst) {
1022       state.addTreeCode(md,bn);
1023     } else {
1024       BlockNode obn = state.getMethodBody(md);
1025       for(int i = 0; i < bn.size(); i++) {
1026         BlockStatementNode bsn = bn.get(i);
1027         obn.addBlockStatement(bsn);
1028       }
1029       state.addTreeCode(md, obn);
1030       bn = null;
1031     }
1032   }
1033
1034   public BlockNode parseBlock(ParseNode pn) {
1035     this.m_taskexitnum = 0;
1036     if (pn==null||isEmpty(pn.getTerminal()))
1037       return new BlockNode();
1038     ParseNode bsn=pn.getChild("block_statement_list");
1039     return parseBlockHelper(bsn);
1040   }
1041
1042   private BlockNode parseBlockHelper(ParseNode pn) {
1043     ParseNodeVector pnv=pn.getChildren();
1044     BlockNode bn=new BlockNode();
1045     for(int i=0; i<pnv.size(); i++) {
1046       Vector bsv=parseBlockStatement(pnv.elementAt(i));
1047       for(int j=0; j<bsv.size(); j++) {
1048         bn.addBlockStatement((BlockStatementNode)bsv.get(j));
1049       }
1050     }
1051     return bn;
1052   }
1053
1054   public BlockNode parseSingleBlock(ParseNode pn) {
1055     BlockNode bn=new BlockNode();
1056     Vector bsv=parseBlockStatement(pn);
1057     for(int j=0; j<bsv.size(); j++) {
1058       bn.addBlockStatement((BlockStatementNode)bsv.get(j));
1059     }
1060     bn.setStyle(BlockNode.NOBRACES);
1061     return bn;
1062   }
1063
1064   public Vector parseSESEBlock(Vector parentbs, ParseNode pn) {
1065     ParseNodeVector pnv=pn.getChildren();
1066     Vector bv=new Vector();
1067     for(int i=0; i<pnv.size(); i++) {
1068       bv.addAll(parseBlockStatement(pnv.elementAt(i)));
1069     }
1070     return bv;
1071   }
1072
1073   public Vector parseBlockStatement(ParseNode pn) {
1074     Vector blockstatements=new Vector();
1075     if (isNode(pn,"tag_declaration")) {
1076       String name=pn.getChild("single").getTerminal();
1077       String type=pn.getChild("type").getTerminal();
1078
1079       blockstatements.add(new TagDeclarationNode(name, type));
1080     } else if (isNode(pn,"local_variable_declaration")) {
1081
1082       ParseNode mn=pn.getChild("modifiers");
1083       TypeDescriptor t=parseTypeDescriptor(pn);
1084       if(mn!=null){
1085         Modifiers m=parseModifiersList(mn);
1086         assignAnnotationsToType(m, t);
1087       }
1088       ParseNode vn=pn.getChild("variable_declarators_list");
1089       ParseNodeVector pnv=vn.getChildren();
1090       for(int i=0; i<pnv.size(); i++) {
1091         ParseNode vardecl=pnv.elementAt(i);
1092
1093
1094         ParseNode tmp=vardecl;
1095         TypeDescriptor arrayt=t;
1096
1097         while (tmp.getChild("single")==null) {
1098           arrayt=arrayt.makeArray(state);
1099           tmp=tmp.getChild("array");
1100         }
1101         String identifier=tmp.getChild("single").getTerminal();
1102
1103         ParseNode epn=vardecl.getChild("initializer");
1104
1105
1106         ExpressionNode en=null;
1107         if (epn!=null)
1108           en=parseExpression(epn.getFirstChild());
1109
1110         blockstatements.add(new DeclarationNode(new VarDescriptor(arrayt, identifier),en));
1111       }
1112     } else if (isNode(pn,"nop")) {
1113       /* Do Nothing */
1114     } else if (isNode(pn,"expression")) {
1115       blockstatements.add(new BlockExpressionNode(parseExpression(pn.getFirstChild())));
1116     } else if (isNode(pn,"ifstatement")) {
1117       blockstatements.add(new IfStatementNode(parseExpression(pn.getChild("condition").getFirstChild()),
1118                                               parseSingleBlock(pn.getChild("statement").getFirstChild()),
1119                                               pn.getChild("else_statement")!=null ? parseSingleBlock(pn.getChild("else_statement").getFirstChild()) : null));
1120     } else if (isNode(pn,"switch_statement")) {
1121       // TODO add version for normal Java later
1122       blockstatements.add(new SwitchStatementNode(parseExpression(pn.getChild("condition").getFirstChild()),
1123           parseSingleBlock(pn.getChild("statement").getFirstChild())));
1124     } else if (isNode(pn,"switch_block_list")) {
1125       // TODO add version for normal Java later
1126       ParseNodeVector pnv=pn.getChildren();
1127       for(int i=0; i<pnv.size(); i++) {
1128         ParseNode sblockdecl=pnv.elementAt(i);
1129
1130         if(isNode(sblockdecl, "switch_block")) {
1131           ParseNode lpn=sblockdecl.getChild("switch_labels").getChild("switch_label_list");
1132           ParseNodeVector labelv=lpn.getChildren();
1133           Vector<SwitchLabelNode> slv = new Vector<SwitchLabelNode>();
1134           for(int j=0; j<labelv.size(); j++) {
1135             ParseNode labeldecl=labelv.elementAt(j);
1136             if(isNode(labeldecl, "switch_label")) {
1137               slv.addElement(new SwitchLabelNode(parseExpression(labeldecl.getChild("constant_expression").getFirstChild()), false));
1138             } else if(isNode(labeldecl, "default_switch_label")) {
1139               slv.addElement(new SwitchLabelNode(null, true));
1140             }
1141           }
1142
1143           blockstatements.add(new SwitchBlockNode(slv,
1144               parseSingleBlock(sblockdecl.getChild("switch_statements").getFirstChild())));
1145
1146         }
1147       }
1148     } else if (isNode(pn, "trycatchstatement")) {
1149       // TODO add version for normal Java later
1150       // Do not fully support exceptions now. Only make sure that if there are no
1151       // exceptions thrown, the execution is right
1152       ParseNode tpn = pn.getChild("tryblock").getFirstChild();
1153       BlockNode bn=parseBlockHelper(tpn);
1154       blockstatements.add(new SubBlockNode(bn));
1155
1156       ParseNode fbk = pn.getChild("finallyblock");
1157       if(fbk != null) {
1158         ParseNode fpn = fbk.getFirstChild();
1159         BlockNode fbn=parseBlockHelper(fpn);
1160         blockstatements.add(new SubBlockNode(fbn));
1161       }
1162     } else if (isNode(pn, "throwstatement")) {
1163       // TODO Simply return here
1164       //blockstatements.add(new ReturnNode());
1165     } else if (isNode(pn,"taskexit")) {
1166       Vector vfe=null;
1167       if (pn.getChild("flag_effects_list")!=null)
1168         vfe=parseFlags(pn.getChild("flag_effects_list"));
1169       Vector ccs=null;
1170       if (pn.getChild("cons_checks")!=null)
1171         ccs=parseChecks(pn.getChild("cons_checks"));
1172
1173       blockstatements.add(new TaskExitNode(vfe, ccs, this.m_taskexitnum++));
1174     } else if (isNode(pn,"atomic")) {
1175       BlockNode bn=parseBlockHelper(pn);
1176       blockstatements.add(new AtomicNode(bn));
1177     } else if (isNode(pn,"synchronized")) {
1178       BlockNode bn=parseBlockHelper(pn.getChild("block"));
1179       ExpressionNode en=parseExpression(pn.getChild("expr").getFirstChild());
1180       blockstatements.add(new SynchronizedNode(en, bn));
1181     } else if (isNode(pn,"return")) {
1182       if (isEmpty(pn.getTerminal()))
1183         blockstatements.add(new ReturnNode());
1184       else {
1185         ExpressionNode en=parseExpression(pn.getFirstChild());
1186         blockstatements.add(new ReturnNode(en));
1187       }
1188     } else if (isNode(pn,"block_statement_list")) {
1189       BlockNode bn=parseBlockHelper(pn);
1190       blockstatements.add(new SubBlockNode(bn));
1191     } else if (isNode(pn,"empty")) {
1192       /* nop */
1193     } else if (isNode(pn,"statement_expression_list")) {
1194       ParseNodeVector pnv=pn.getChildren();
1195       BlockNode bn=new BlockNode();
1196       for(int i=0; i<pnv.size(); i++) {
1197         ExpressionNode en=parseExpression(pnv.elementAt(i));
1198         blockstatements.add(new BlockExpressionNode(en));
1199       }
1200       bn.setStyle(BlockNode.EXPRLIST);
1201     } else if (isNode(pn,"forstatement")) {
1202       BlockNode init=parseSingleBlock(pn.getChild("initializer").getFirstChild());
1203       BlockNode update=parseSingleBlock(pn.getChild("update").getFirstChild());
1204       ExpressionNode condition=parseExpression(pn.getChild("condition").getFirstChild());
1205       BlockNode body=parseSingleBlock(pn.getChild("statement").getFirstChild());
1206       if(condition == null) {
1207         // no condition clause, make a 'true' expression as the condition
1208         condition = (ExpressionNode)new LiteralNode("boolean", new Boolean(true));
1209       }
1210       blockstatements.add(new LoopNode(init,condition,update,body));
1211     } else if (isNode(pn,"whilestatement")) {
1212       ExpressionNode condition=parseExpression(pn.getChild("condition").getFirstChild());
1213       BlockNode body=parseSingleBlock(pn.getChild("statement").getFirstChild());
1214       if(condition == null) {
1215         // no condition clause, make a 'true' expression as the condition
1216         condition = (ExpressionNode)new LiteralNode("boolean", new Boolean(true));
1217       }
1218       blockstatements.add(new LoopNode(condition,body,LoopNode.WHILELOOP));
1219     } else if (isNode(pn,"dowhilestatement")) {
1220       ExpressionNode condition=parseExpression(pn.getChild("condition").getFirstChild());
1221       BlockNode body=parseSingleBlock(pn.getChild("statement").getFirstChild());
1222       if(condition == null) {
1223         // no condition clause, make a 'true' expression as the condition
1224         condition = (ExpressionNode)new LiteralNode("boolean", new Boolean(true));
1225       }
1226       blockstatements.add(new LoopNode(condition,body,LoopNode.DOWHILELOOP));
1227     } else if (isNode(pn,"sese")) {
1228       ParseNode pnID=pn.getChild("identifier");
1229       String stID=null;
1230       if( pnID != null ) { stID=pnID.getFirstChild().getTerminal(); }
1231       SESENode start=new SESENode(stID);
1232       SESENode end  =new SESENode(stID);
1233       start.setEnd( end   );
1234       end.setStart( start );
1235       blockstatements.add(start);
1236       blockstatements.addAll(parseSESEBlock(blockstatements,pn.getChild("body").getFirstChild()));
1237       blockstatements.add(end);
1238     } else if (isNode(pn,"continue")) {
1239       blockstatements.add(new ContinueBreakNode(false));
1240     } else if (isNode(pn,"break")) {
1241       blockstatements.add(new ContinueBreakNode(true));
1242
1243     } else if (isNode(pn,"genreach")) {
1244       String graphName = pn.getChild("graphName").getTerminal();
1245       blockstatements.add( new GenReachNode( graphName ) );
1246
1247     } else {
1248       System.out.println("---------------");
1249       System.out.println(pn.PPrint(3,true));
1250       throw new Error();
1251     }
1252     return blockstatements;
1253   }
1254
1255   public MethodDescriptor parseMethodHeader(ParseNode pn) {
1256     ParseNode mn=pn.getChild("modifiers");
1257     Modifiers m=parseModifiersList(mn);
1258
1259     ParseNode tn=pn.getChild("returntype");
1260     TypeDescriptor returntype;
1261     if (tn!=null)
1262       returntype=parseTypeDescriptor(tn);
1263     else
1264       returntype=new TypeDescriptor(TypeDescriptor.VOID);
1265
1266     ParseNode pmd=pn.getChild("method_declarator");
1267     String name=pmd.getChild("name").getTerminal();
1268     MethodDescriptor md=new MethodDescriptor(m, returntype, name);
1269
1270     ParseNode paramnode=pmd.getChild("parameters");
1271     parseParameterList(md,paramnode);
1272     return md;
1273   }
1274
1275   public void parseParameterList(MethodDescriptor md, ParseNode pn) {
1276     ParseNode paramlist=pn.getChild("formal_parameter_list");
1277     if (paramlist==null)
1278       return;
1279     ParseNodeVector pnv=paramlist.getChildren();
1280     for(int i=0; i<pnv.size(); i++) {
1281       ParseNode paramn=pnv.elementAt(i);
1282
1283       if (isNode(paramn, "tag_parameter")) {
1284         String paramname=paramn.getChild("single").getTerminal();
1285         TypeDescriptor type=new TypeDescriptor(TypeDescriptor.TAG);
1286         md.addTagParameter(type, paramname);
1287       } else {
1288         TypeDescriptor type=parseTypeDescriptor(paramn);
1289
1290         ParseNode tmp=paramn;
1291         while (tmp.getChild("single")==null) {
1292           type=type.makeArray(state);
1293           tmp=tmp.getChild("array");
1294         }
1295         String paramname=tmp.getChild("single").getTerminal();
1296
1297         md.addParameter(type, paramname);
1298       }
1299     }
1300   }
1301
1302   public Modifiers parseModifiersList(ParseNode pn) {
1303     Modifiers m=new Modifiers();
1304     ParseNode modlist=pn.getChild("modifier_list");
1305     if (modlist!=null) {
1306       ParseNodeVector pnv=modlist.getChildren();
1307       for(int i=0; i<pnv.size(); i++) {
1308         ParseNode modn=pnv.elementAt(i);
1309         if (isNode(modn,"public"))
1310           m.addModifier(Modifiers.PUBLIC);
1311         else if (isNode(modn,"protected"))
1312           m.addModifier(Modifiers.PROTECTED);
1313         else if (isNode(modn,"private"))
1314           m.addModifier(Modifiers.PRIVATE);
1315         else if (isNode(modn,"static"))
1316           m.addModifier(Modifiers.STATIC);
1317         else if (isNode(modn,"final"))
1318           m.addModifier(Modifiers.FINAL);
1319         else if (isNode(modn,"native"))
1320           m.addModifier(Modifiers.NATIVE);
1321         else if (isNode(modn,"synchronized"))
1322           m.addModifier(Modifiers.SYNCHRONIZED);
1323         else if (isNode(modn,"atomic"))
1324           m.addModifier(Modifiers.ATOMIC);
1325     else if (isNode(modn,"abstract"))
1326       m.addModifier(Modifiers.ABSTRACT);
1327     else if (isNode(modn,"volatile"))
1328       m.addModifier(Modifiers.VOLATILE);
1329     else if (isNode(modn,"transient"))
1330       m.addModifier(Modifiers.TRANSIENT);
1331     else if(isNode(modn,"annotation_list"))
1332       parseAnnotationList(modn,m);
1333         else{
1334           throw new Error("Unrecognized Modifier:"+modn.getLabel());}
1335       }
1336     }
1337     return m;
1338   }
1339
1340   private void parseAnnotationList(ParseNode pn, Modifiers m){
1341       ParseNodeVector pnv=pn.getChildren();
1342       for(int i=0; i<pnv.size(); i++) {
1343         ParseNode body_list=pnv.elementAt(i);
1344         if(isNode(body_list,"annotation_body")){
1345           ParseNode body_node=body_list.getFirstChild();
1346           if (isNode(body_node,"marker_annotation")){
1347             m.addAnnotation(new AnnotationDescriptor(body_node.getChild("name").getTerminal()));
1348           }else if(isNode(body_node,"single_annotation")){
1349             throw new Error("Annotation with single piece of data is not supported yet.");
1350           } else if(isNode(body_node,"normal_annotation")){
1351             throw new Error("Annotation with multiple data members is not supported yet.");
1352           }
1353         }
1354       }
1355   }
1356
1357   private boolean isNode(ParseNode pn, String label) {
1358     if (pn.getLabel().equals(label))
1359       return true;
1360     else return false;
1361   }
1362
1363   private static boolean isEmpty(ParseNode pn) {
1364     if (pn.getLabel().equals("empty"))
1365       return true;
1366     else
1367       return false;
1368   }
1369
1370   private static boolean isEmpty(String s) {
1371     if (s.equals("empty"))
1372       return true;
1373     else
1374       return false;
1375   }
1376
1377   /** Throw an exception if something is unexpected */
1378   private void check(ParseNode pn, String label) {
1379     if (pn == null) {
1380       throw new Error(pn+ "IE: Expected '" + label + "', got null");
1381     }
1382     if (!pn.getLabel().equals(label)) {
1383       throw new Error(pn+ "IE: Expected '" + label + "', got '"+pn.getLabel()+"'");
1384     }
1385   }
1386 }