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     }
 501     ParseNode flagnode=pn.getChild("flag");
 502     if (flagnode!=null) {
 503       parseFlagDecl(cn, flagnode.getChild("flag_declaration"));
 504       return;
 505     }
 506     // in case there are empty node
 507     ParseNode emptynode=pn.getChild("empty");
 508     if(emptynode != null) {
 509       return;
 510     }
 511     throw new Error();
 512   }
 513
 514   private ClassDescriptor parseInnerClassDecl(ClassDescriptor cn, ParseNode pn) {
 515     ClassDescriptor icn=new ClassDescriptor(pn.getChild("name").getTerminal(), false);
 516     icn.setAsInnerClass();
 517     icn.setSurroundingClass(cn.getSymbol());
 518     icn.setSurrounding(cn);
 519     cn.addInnerClass(icn);
 520     if (!isEmpty(pn.getChild("super").getTerminal())) {
 521       /* parse superclass name */
 522       ParseNode snn=pn.getChild("super").getChild("type").getChild("class").getChild("name");
 523       NameDescriptor nd=parseName(snn);
 524       icn.setSuper(nd.toString());
 525     } else {
 526       if (!(icn.getSymbol().equals(TypeUtil.ObjectClass)||
 527           icn.getSymbol().equals(TypeUtil.TagClass)))
 528         icn.setSuper(TypeUtil.ObjectClass);
 529     }
 530     // check inherited interfaces
 531     if (!isEmpty(pn.getChild("superIF").getTerminal())) {
 532       /* parse inherited interface name */
 533       ParseNode snlist=pn.getChild("superIF").getChild("interface_type_list");
 534       ParseNodeVector pnv=snlist.getChildren();
 535       for(int i=0; i<pnv.size(); i++) {
 536         ParseNode decl=pnv.elementAt(i);
 537         if (isNode(decl,"type")) {
 538           NameDescriptor nd=parseName(decl.getChild("class").getChild("name"));
 539           icn.addSuperInterface(nd.toString());
 540         }
 541       }
 542     }
 543     icn.setModifiers(parseModifiersList(pn.getChild("modifiers")));
 544     if(!icn.isStatic()) {
 545       throw new Error("Error: inner class " + icn.getSymbol() + " in Class " +
 546           cn.getSymbol() + " is not a nested class and is not supported yet!");
 547     }
 548     parseClassBody(icn, pn.getChild("classbody"));
 549     return icn;
 550   }
 551
 552   private TypeDescriptor parseTypeDescriptor(ParseNode pn) {
 553     ParseNode tn=pn.getChild("type");
 554     String type_st=tn.getTerminal();
 555     if(type_st.equals("byte")) {
 556       return state.getTypeDescriptor(TypeDescriptor.BYTE);
 557     } else if(type_st.equals("short")) {
 558       return state.getTypeDescriptor(TypeDescriptor.SHORT);
 559     } else if(type_st.equals("boolean")) {
 560       return state.getTypeDescriptor(TypeDescriptor.BOOLEAN);
 561     } else if(type_st.equals("int")) {
 562       return state.getTypeDescriptor(TypeDescriptor.INT);
 563     } else if(type_st.equals("long")) {
 564       return state.getTypeDescriptor(TypeDescriptor.LONG);
 565     } else if(type_st.equals("char")) {
 566       return state.getTypeDescriptor(TypeDescriptor.CHAR);
 567     } else if(type_st.equals("float")) {
 568       return state.getTypeDescriptor(TypeDescriptor.FLOAT);
 569     } else if(type_st.equals("double")) {
 570       return state.getTypeDescriptor(TypeDescriptor.DOUBLE);
 571     } else if(type_st.equals("class")) {
 572       ParseNode nn=tn.getChild("class");
 573       return state.getTypeDescriptor(parseName(nn.getChild("name")));
 574     } else if(type_st.equals("array")) {
 575       ParseNode nn=tn.getChild("array");
 576       TypeDescriptor td=parseTypeDescriptor(nn.getChild("basetype"));
 577       Integer numdims=(Integer)nn.getChild("dims").getLiteral();
 578       for(int i=0; i<numdims.intValue(); i++)
 579         td=td.makeArray(state);
 580       return td;
 581     } else {
 582       System.out.println(pn.PPrint(2, true));
 583       throw new Error();
 584     }
 585   }
 586
 587   private NameDescriptor parseName(ParseNode nn) {
 588     ParseNode base=nn.getChild("base");
 589     ParseNode id=nn.getChild("identifier");
 590     if (base==null)
 591       return new NameDescriptor(id.getTerminal());
 592     return new NameDescriptor(parseName(base.getChild("name")),id.getTerminal());
 593
 594   }
 595
 596   private void parseFlagDecl(ClassDescriptor cn,ParseNode pn) {
 597     String name=pn.getChild("name").getTerminal();
 598     FlagDescriptor flag=new FlagDescriptor(name);
 599     if (pn.getChild("external")!=null)
 600       flag.makeExternal();
 601     cn.addFlag(flag);
 602   }
 603
 604   private void parseFieldDecl(ClassDescriptor cn,ParseNode pn) {
 605     ParseNode mn=pn.getChild("modifier");
 606     Modifiers m=parseModifiersList(mn);
 607     if(cn.isInterface()) {
 608       // TODO add version for normal Java later
 609       // Can only be PUBLIC or STATIC or FINAL
 610       if((m.isAbstract()) || (m.isAtomic()) || (m.isNative())
 611           || (m.isSynchronized())) {
 612         throw new Error("Error: field in Interface " + cn.getSymbol() + "can only be PUBLIC or STATIC or FINAL");
 613       }
 614       m.addModifier(Modifiers.PUBLIC);
 615       m.addModifier(Modifiers.STATIC);
 616       m.addModifier(Modifiers.FINAL);
 617     }
 618
 619     ParseNode tn=pn.getChild("type");
 620     TypeDescriptor t=parseTypeDescriptor(tn);
 621     assignAnnotationsToType(m,t);
 622     ParseNode vn=pn.getChild("variables").getChild("variable_declarators_list");
 623     ParseNodeVector pnv=vn.getChildren();
 624     boolean isglobal=pn.getChild("global")!=null;
 625
 626     for(int i=0; i<pnv.size(); i++) {
 627       ParseNode vardecl=pnv.elementAt(i);
 628       ParseNode tmp=vardecl;
 629       TypeDescriptor arrayt=t;
 630       while (tmp.getChild("single")==null) {
 631         arrayt=arrayt.makeArray(state);
 632         tmp=tmp.getChild("array");
 633       }
 634       String identifier=tmp.getChild("single").getTerminal();
 635       ParseNode epn=vardecl.getChild("initializer");
 636
 637       ExpressionNode en=null;
 638       if (epn!=null) {
 639         en=parseExpression(epn.getFirstChild());
 640         if(m.isStatic()) {
 641           // for static field, the initializer should be considered as a
 642           // static block
 643           boolean isfirst = false;
 644           MethodDescriptor md = (MethodDescriptor)cn.getMethodTable().getFromSameScope("staticblocks");
 645           if(md == null) {
 646             // the first static block for this class
 647             Modifiers m_i=new Modifiers();
 648             m_i.addModifier(Modifiers.STATIC);
 649             md = new MethodDescriptor(m_i, "staticblocks", false);
 650             md.setAsStaticBlock();
 651             isfirst = true;
 652           }
 653           if(isfirst) {
 654             cn.addMethod(md);
 655           }
 656           cn.incStaticBlocks();
 657           BlockNode bn=new BlockNode();
 658           NameNode nn=new NameNode(new NameDescriptor(identifier));
 659           AssignmentNode an=new AssignmentNode(nn,en,new AssignOperation(1));
 660           bn.addBlockStatement(new BlockExpressionNode(an));
 661           if(isfirst) {
 662             state.addTreeCode(md,bn);
 663           } else {
 664             BlockNode obn = state.getMethodBody(md);
 665             for(int ii = 0; ii < bn.size(); ii++) {
 666               BlockStatementNode bsn = bn.get(ii);
 667               obn.addBlockStatement(bsn);
 668             }
 669             state.addTreeCode(md, obn);
 670             bn = null;
 671           }
 672           en = null;
 673         }
 674       }
 675
 676       cn.addField(new FieldDescriptor(m, arrayt, identifier, en, isglobal));
 677     }
 678   }
 679
 680   private void assignAnnotationsToType(Modifiers modifiers, TypeDescriptor type){
 681     Vector<AnnotationDescriptor> annotations=modifiers.getAnnotations();
 682     for(int i=0; i<annotations.size(); i++) {
 683       // it only supports a marker annotation
 684       AnnotationDescriptor an=annotations.elementAt(i);
 685       type.addAnnotationMarker(an);
 686     }
 687   }
 688
 689   private ExpressionNode parseExpression(ParseNode pn) {
 690     if (isNode(pn,"assignment"))
 691       return parseAssignmentExpression(pn);
 692     else if (isNode(pn,"logical_or")||isNode(pn,"logical_and")||
 693              isNode(pn,"bitwise_or")||isNode(pn,"bitwise_xor")||
 694              isNode(pn,"bitwise_and")||isNode(pn,"equal")||
 695              isNode(pn,"not_equal")||isNode(pn,"comp_lt")||
 696              isNode(pn,"comp_lte")||isNode(pn,"comp_gt")||
 697              isNode(pn,"comp_gte")||isNode(pn,"leftshift")||
 698              isNode(pn,"rightshift")||isNode(pn,"sub")||
 699              isNode(pn,"urightshift")||isNode(pn,"sub")||
 700              isNode(pn,"add")||isNode(pn,"mult")||
 701              isNode(pn,"div")||isNode(pn,"mod")) {
 702       ParseNodeVector pnv=pn.getChildren();
 703       ParseNode left=pnv.elementAt(0);
 704       ParseNode right=pnv.elementAt(1);
 705       Operation op=new Operation(pn.getLabel());
 706       return new OpNode(parseExpression(left),parseExpression(right),op);
 707     } else if (isNode(pn,"unaryplus")||
 708                isNode(pn,"unaryminus")||
 709                isNode(pn,"not")||
 710                isNode(pn,"comp")) {
 711       ParseNode left=pn.getFirstChild();
 712       Operation op=new Operation(pn.getLabel());
 713       return new OpNode(parseExpression(left),op);
 714     } else if (isNode(pn,"postinc")||
 715                isNode(pn,"postdec")) {
 716       ParseNode left=pn.getFirstChild();
 717       AssignOperation op=new AssignOperation(pn.getLabel());
 718       return new AssignmentNode(parseExpression(left),null,op);
 719
 720     } else if (isNode(pn,"preinc")||
 721                isNode(pn,"predec")) {
 722       ParseNode left=pn.getFirstChild();
 723       AssignOperation op=isNode(pn,"preinc") ? new AssignOperation(AssignOperation.PLUSEQ) : new AssignOperation(AssignOperation.MINUSEQ);
 724       return new AssignmentNode(parseExpression(left),
 725                                 new LiteralNode("integer",new Integer(1)),op);
 726     } else if (isNode(pn,"literal")) {
 727       String literaltype=pn.getTerminal();
 728       ParseNode literalnode=pn.getChild(literaltype);
 729       Object literal_obj=literalnode.getLiteral();
 730       return new LiteralNode(literaltype, literal_obj);
 731     } else if (isNode(pn,"createobject")) {
 732       TypeDescriptor td=parseTypeDescriptor(pn);
 733
 734       Vector args=parseArgumentList(pn);
 735       boolean isglobal=pn.getChild("global")!=null||
 736         pn.getChild("scratch")!=null;
 737       String disjointId=null;
 738       if( pn.getChild("disjoint") != null) {
 739         disjointId = pn.getChild("disjoint").getTerminal();
 740       }
 741       CreateObjectNode con=new CreateObjectNode(td, isglobal, disjointId);
 742       for(int i=0; i<args.size(); i++) {
 743         con.addArgument((ExpressionNode)args.get(i));
 744       }
 745       /* Could have flag set or tag added here */
 746       if (pn.getChild("flag_list")!=null||pn.getChild("tag_list")!=null) {
 747         FlagEffects fe=new FlagEffects(null);
 748         if (pn.getChild("flag_list")!=null)
 749           parseFlagEffect(fe, pn.getChild("flag_list"));
 750
 751         if (pn.getChild("tag_list")!=null)
 752           parseTagEffect(fe, pn.getChild("tag_list"));
 753         con.addFlagEffects(fe);
 754       }
 755
 756       return con;
 757     } else if (isNode(pn,"createarray")) {
 758       //System.out.println(pn.PPrint(3,true));
 759       boolean isglobal=pn.getChild("global")!=null||
 760         pn.getChild("scratch")!=null;
 761       String disjointId=null;
 762       if( pn.getChild("disjoint") != null) {
 763         disjointId = pn.getChild("disjoint").getTerminal();
 764       }
 765       TypeDescriptor td=parseTypeDescriptor(pn);
 766       Vector args=parseDimExprs(pn);
 767       int num=0;
 768       if (pn.getChild("dims_opt").getLiteral()!=null)
 769         num=((Integer)pn.getChild("dims_opt").getLiteral()).intValue();
 770       for(int i=0; i<(args.size()+num); i++)
 771         td=td.makeArray(state);
 772       CreateObjectNode con=new CreateObjectNode(td, isglobal, disjointId);
 773       for(int i=0; i<args.size(); i++) {
 774         con.addArgument((ExpressionNode)args.get(i));
 775       }
 776       return con;
 777     } if (isNode(pn,"createarray2")) {
 778       TypeDescriptor td=parseTypeDescriptor(pn);
 779       int num=0;
 780       if (pn.getChild("dims_opt").getLiteral()!=null)
 781     num=((Integer)pn.getChild("dims_opt").getLiteral()).intValue();
 782       for(int i=0; i<num; i++)
 783     td=td.makeArray(state);
 784       CreateObjectNode con=new CreateObjectNode(td, false, null);
 785       // TODO array initializers
 786       ParseNode ipn = pn.getChild("initializer");
 787       Vector initializers=parseVariableInitializerList(ipn);
 788       ArrayInitializerNode ain = new ArrayInitializerNode(initializers);
 789       con.addArrayInitializer(ain);
 790       return con;
 791     } else if (isNode(pn,"name")) {
 792       NameDescriptor nd=parseName(pn);
 793       return new NameNode(nd);
 794     } else if (isNode(pn,"this")) {
 795       NameDescriptor nd=new NameDescriptor("this");
 796       return new NameNode(nd);
 797     } else if (isNode(pn,"isavailable")) {
 798       NameDescriptor nd=new NameDescriptor(pn.getTerminal());
 799       return new OpNode(new NameNode(nd),null,new Operation(Operation.ISAVAILABLE));
 800     } else if (isNode(pn,"methodinvoke1")) {
 801       NameDescriptor nd=parseName(pn.getChild("name"));
 802       Vector args=parseArgumentList(pn);
 803       MethodInvokeNode min=new MethodInvokeNode(nd);
 804       for(int i=0; i<args.size(); i++) {
 805         min.addArgument((ExpressionNode)args.get(i));
 806       }
 807       return min;
 808     } else if (isNode(pn,"methodinvoke2")) {
 809       String methodid=pn.getChild("id").getTerminal();
 810       ExpressionNode exp=parseExpression(pn.getChild("base").getFirstChild());
 811       Vector args=parseArgumentList(pn);
 812       MethodInvokeNode min=new MethodInvokeNode(methodid,exp);
 813       for(int i=0; i<args.size(); i++) {
 814         min.addArgument((ExpressionNode)args.get(i));
 815       }
 816       return min;
 817     } else if (isNode(pn,"fieldaccess")) {
 818       ExpressionNode en=parseExpression(pn.getChild("base").getFirstChild());
 819       String fieldname=pn.getChild("field").getTerminal();
 820       return new FieldAccessNode(en,fieldname);
 821     } else if (isNode(pn,"arrayaccess")) {
 822       ExpressionNode en=parseExpression(pn.getChild("base").getFirstChild());
 823       ExpressionNode index=parseExpression(pn.getChild("index").getFirstChild());
 824       return new ArrayAccessNode(en,index);
 825     } else if (isNode(pn,"cast1")) {
 826       try {
 827         return new CastNode(parseTypeDescriptor(pn.getChild("type")),parseExpression(pn.getChild("exp").getFirstChild()));
 828       } catch (Exception e) {
 829         System.out.println(pn.PPrint(1,true));
 830         e.printStackTrace();
 831         throw new Error();
 832       }
 833     } else if (isNode(pn,"cast2")) {
 834       return new CastNode(parseExpression(pn.getChild("type").getFirstChild()),parseExpression(pn.getChild("exp").getFirstChild()));
 835     } else if (isNode(pn, "getoffset")) {
 836       TypeDescriptor td=parseTypeDescriptor(pn);
 837       String fieldname = pn.getChild("field").getTerminal();
 838       //System.out.println("Checking the values of: "+ " td.toString()= " + td.toString()+ "  fieldname= " + fieldname);
 839       return new OffsetNode(td, fieldname);
 840     } else if (isNode(pn, "tert")) {
 841       return new TertiaryNode(parseExpression(pn.getChild("cond").getFirstChild()),
 842                               parseExpression(pn.getChild("trueexpr").getFirstChild()),
 843                               parseExpression(pn.getChild("falseexpr").getFirstChild()) );
 844     } else if (isNode(pn, "instanceof")) {
 845       ExpressionNode exp=parseExpression(pn.getChild("exp").getFirstChild());
 846       TypeDescriptor t=parseTypeDescriptor(pn);
 847       return new InstanceOfNode(exp,t);
 848     } else if (isNode(pn, "array_initializer")) {
 849       Vector initializers=parseVariableInitializerList(pn);
 850       return new ArrayInitializerNode(initializers);
 851     } else if (isNode(pn, "class_type")) {
 852       TypeDescriptor td=parseTypeDescriptor(pn);
 853       return new ClassTypeNode(td);
 854     } else if (isNode(pn, "empty")) {
 855       return null;
 856     } else {
 857       System.out.println("---------------------");
 858       System.out.println(pn.PPrint(3,true));
 859       throw new Error();
 860     }
 861   }
 862
 863   private Vector parseDimExprs(ParseNode pn) {
 864     Vector arglist=new Vector();
 865     ParseNode an=pn.getChild("dim_exprs");
 866     if (an==null)       /* No argument list */
 867       return arglist;
 868     ParseNodeVector anv=an.getChildren();
 869     for(int i=0; i<anv.size(); i++) {
 870       arglist.add(parseExpression(anv.elementAt(i)));
 871     }
 872     return arglist;
 873   }
 874
 875   private Vector parseArgumentList(ParseNode pn) {
 876     Vector arglist=new Vector();
 877     ParseNode an=pn.getChild("argument_list");
 878     if (an==null)       /* No argument list */
 879       return arglist;
 880     ParseNodeVector anv=an.getChildren();
 881     for(int i=0; i<anv.size(); i++) {
 882       arglist.add(parseExpression(anv.elementAt(i)));
 883     }
 884     return arglist;
 885   }
 886
 887   private Vector[] parseConsArgumentList(ParseNode pn) {
 888     Vector arglist=new Vector();
 889     Vector varlist=new Vector();
 890     ParseNode an=pn.getChild("cons_argument_list");
 891     if (an==null)       /* No argument list */
 892       return new Vector[] {varlist, arglist};
 893     ParseNodeVector anv=an.getChildren();
 894     for(int i=0; i<anv.size(); i++) {
 895       ParseNode cpn=anv.elementAt(i);
 896       ParseNode var=cpn.getChild("var");
 897       ParseNode exp=cpn.getChild("exp").getFirstChild();
 898       varlist.add(var.getTerminal());
 899       arglist.add(parseExpression(exp));
 900     }
 901     return new Vector[] {varlist, arglist};
 902   }
 903
 904   private Vector parseVariableInitializerList(ParseNode pn) {
 905     Vector varInitList=new Vector();
 906     ParseNode vin=pn.getChild("var_init_list");
 907     if (vin==null)       /* No argument list */
 908       return varInitList;
 909     ParseNodeVector vinv=vin.getChildren();
 910     for(int i=0; i<vinv.size(); i++) {
 911       varInitList.add(parseExpression(vinv.elementAt(i)));
 912     }
 913     return varInitList;
 914   }
 915
 916   private ExpressionNode parseAssignmentExpression(ParseNode pn) {
 917     AssignOperation ao=new AssignOperation(pn.getChild("op").getTerminal());
 918     ParseNodeVector pnv=pn.getChild("args").getChildren();
 919
 920     AssignmentNode an=new AssignmentNode(parseExpression(pnv.elementAt(0)),parseExpression(pnv.elementAt(1)),ao);
 921     return an;
 922   }
 923
 924
 925   private void parseMethodDecl(ClassDescriptor cn, ParseNode pn) {
 926     ParseNode headern=pn.getChild("method_header");
 927     ParseNode bodyn=pn.getChild("body");
 928     MethodDescriptor md=parseMethodHeader(headern);
 929     try {
 930       BlockNode bn=parseBlock(bodyn);
 931       cn.addMethod(md);
 932       state.addTreeCode(md,bn);
 933
 934       // this is a hack for investigating new language features
 935       // at the AST level, someday should evolve into a nice compiler
 936       // option *wink*
 937       //if( cn.getSymbol().equals( ***put a class in here like:     "Test" ) &&
 938       //    md.getSymbol().equals( ***put your method in here like: "main" )
 939       //) {
 940       //  bn.setStyle( BlockNode.NORMAL );
 941       //  System.out.println( bn.printNode( 0 ) );
 942       //}
 943
 944     } catch (Exception e) {
 945       System.out.println("Error with method:"+md.getSymbol());
 946       e.printStackTrace();
 947       throw new Error();
 948     } catch (Error e) {
 949       System.out.println("Error with method:"+md.getSymbol());
 950       e.printStackTrace();
 951       throw new Error();
 952     }
 953   }
 954
 955   private void parseConstructorDecl(ClassDescriptor cn, ParseNode pn) {
 956     ParseNode mn=pn.getChild("modifiers");
 957     Modifiers m=parseModifiersList(mn);
 958     ParseNode cdecl=pn.getChild("constructor_declarator");
 959     boolean isglobal=cdecl.getChild("global")!=null;
 960     String name=cdecl.getChild("name").getChild("identifier").getTerminal();
 961     MethodDescriptor md=new MethodDescriptor(m, name, isglobal);
 962     ParseNode paramnode=cdecl.getChild("parameters");
 963     parseParameterList(md,paramnode);
 964     ParseNode bodyn0=pn.getChild("body");
 965     ParseNode bodyn=bodyn0.getChild("constructor_body");
 966     cn.addMethod(md);
 967     BlockNode bn=null;
 968     if (bodyn!=null&&bodyn.getChild("block_statement_list")!=null)
 969       bn=parseBlock(bodyn);
 970     else
 971       bn=new BlockNode();
 972     if (bodyn!=null&&bodyn.getChild("superinvoke")!=null) {
 973       ParseNode sin=bodyn.getChild("superinvoke");
 974       NameDescriptor nd=new NameDescriptor("super");
 975       Vector args=parseArgumentList(sin);
 976       MethodInvokeNode min=new MethodInvokeNode(nd);
 977       for(int i=0; i<args.size(); i++) {
 978         min.addArgument((ExpressionNode)args.get(i));
 979       }
 980       BlockExpressionNode ben=new BlockExpressionNode(min);
 981       bn.addFirstBlockStatement(ben);
 982
 983     } else if (bodyn!=null&&bodyn.getChild("explconstrinv")!=null) {
 984       ParseNode eci=bodyn.getChild("explconstrinv");
 985       NameDescriptor nd=new NameDescriptor(cn.getSymbol());
 986       Vector args=parseArgumentList(eci);
 987       MethodInvokeNode min=new MethodInvokeNode(nd);
 988       for(int i=0; i<args.size(); i++) {
 989         min.addArgument((ExpressionNode)args.get(i));
 990       }
 991       BlockExpressionNode ben=new BlockExpressionNode(min);
 992       bn.addFirstBlockStatement(ben);
 993     }
 994     state.addTreeCode(md,bn);
 995   }
 996
 997   private void parseStaticBlockDecl(ClassDescriptor cn, ParseNode pn) {
 998     // Each class maintains one MethodDecscriptor which combines all its
 999     // static blocks in their declaration order
1000     boolean isfirst = false;
1001     MethodDescriptor md = (MethodDescriptor)cn.getMethodTable().getFromSameScope("staticblocks");
1002     if(md == null) {
1003       // the first static block for this class
1004       Modifiers m_i=new Modifiers();
1005       m_i.addModifier(Modifiers.STATIC);
1006       md = new MethodDescriptor(m_i, "staticblocks", false);
1007       md.setAsStaticBlock();
1008       isfirst = true;
1009     }
1010     ParseNode bodyn=pn.getChild("body");
1011     if(isfirst) {
1012       cn.addMethod(md);
1013     }
1014     cn.incStaticBlocks();
1015     BlockNode bn=null;
1016     if (bodyn!=null&&bodyn.getChild("block_statement_list")!=null)
1017       bn=parseBlock(bodyn);
1018     else
1019       bn=new BlockNode();
1020     if(isfirst) {
1021       state.addTreeCode(md,bn);
1022     } else {
1023       BlockNode obn = state.getMethodBody(md);
1024       for(int i = 0; i < bn.size(); i++) {
1025         BlockStatementNode bsn = bn.get(i);
1026         obn.addBlockStatement(bsn);
1027       }
1028       state.addTreeCode(md, obn);
1029       bn = null;
1030     }
1031   }
1032
1033   public BlockNode parseBlock(ParseNode pn) {
1034     this.m_taskexitnum = 0;
1035     if (pn==null||isEmpty(pn.getTerminal()))
1036       return new BlockNode();
1037     ParseNode bsn=pn.getChild("block_statement_list");
1038     return parseBlockHelper(bsn);
1039   }
1040
1041   private BlockNode parseBlockHelper(ParseNode pn) {
1042     ParseNodeVector pnv=pn.getChildren();
1043     BlockNode bn=new BlockNode();
1044     for(int i=0; i<pnv.size(); i++) {
1045       Vector bsv=parseBlockStatement(pnv.elementAt(i));
1046       for(int j=0; j<bsv.size(); j++) {
1047         bn.addBlockStatement((BlockStatementNode)bsv.get(j));
1048       }
1049     }
1050     return bn;
1051   }
1052
1053   public BlockNode parseSingleBlock(ParseNode pn) {
1054     BlockNode bn=new BlockNode();
1055     Vector bsv=parseBlockStatement(pn);
1056     for(int j=0; j<bsv.size(); j++) {
1057       bn.addBlockStatement((BlockStatementNode)bsv.get(j));
1058     }
1059     bn.setStyle(BlockNode.NOBRACES);
1060     return bn;
1061   }
1062
1063   public Vector parseSESEBlock(Vector parentbs, ParseNode pn) {
1064     ParseNodeVector pnv=pn.getChildren();
1065     Vector bv=new Vector();
1066     for(int i=0; i<pnv.size(); i++) {
1067       bv.addAll(parseBlockStatement(pnv.elementAt(i)));
1068     }
1069     return bv;
1070   }
1071
1072   public Vector parseBlockStatement(ParseNode pn) {
1073     Vector blockstatements=new Vector();
1074     if (isNode(pn,"tag_declaration")) {
1075       String name=pn.getChild("single").getTerminal();
1076       String type=pn.getChild("type").getTerminal();
1077
1078       blockstatements.add(new TagDeclarationNode(name, type));
1079     } else if (isNode(pn,"local_variable_declaration")) {
1080
1081       ParseNode mn=pn.getChild("modifiers");
1082       TypeDescriptor t=parseTypeDescriptor(pn);
1083       if(mn!=null){
1084         Modifiers m=parseModifiersList(mn);
1085         assignAnnotationsToType(m, t);
1086       }
1087       ParseNode vn=pn.getChild("variable_declarators_list");
1088       ParseNodeVector pnv=vn.getChildren();
1089       for(int i=0; i<pnv.size(); i++) {
1090         ParseNode vardecl=pnv.elementAt(i);
1091
1092
1093         ParseNode tmp=vardecl;
1094         TypeDescriptor arrayt=t;
1095
1096         while (tmp.getChild("single")==null) {
1097           arrayt=arrayt.makeArray(state);
1098           tmp=tmp.getChild("array");
1099         }
1100         String identifier=tmp.getChild("single").getTerminal();
1101
1102         ParseNode epn=vardecl.getChild("initializer");
1103
1104
1105         ExpressionNode en=null;
1106         if (epn!=null)
1107           en=parseExpression(epn.getFirstChild());
1108
1109         blockstatements.add(new DeclarationNode(new VarDescriptor(arrayt, identifier),en));
1110       }
1111     } else if (isNode(pn,"nop")) {
1112       /* Do Nothing */
1113     } else if (isNode(pn,"expression")) {
1114       blockstatements.add(new BlockExpressionNode(parseExpression(pn.getFirstChild())));
1115     } else if (isNode(pn,"ifstatement")) {
1116       blockstatements.add(new IfStatementNode(parseExpression(pn.getChild("condition").getFirstChild()),
1117                                               parseSingleBlock(pn.getChild("statement").getFirstChild()),
1118                                               pn.getChild("else_statement")!=null ? parseSingleBlock(pn.getChild("else_statement").getFirstChild()) : null));
1119     } else if (isNode(pn,"switch_statement")) {
1120       // TODO add version for normal Java later
1121       blockstatements.add(new SwitchStatementNode(parseExpression(pn.getChild("condition").getFirstChild()),
1122           parseSingleBlock(pn.getChild("statement").getFirstChild())));
1123     } else if (isNode(pn,"switch_block_list")) {
1124       // TODO add version for normal Java later
1125       ParseNodeVector pnv=pn.getChildren();
1126       for(int i=0; i<pnv.size(); i++) {
1127         ParseNode sblockdecl=pnv.elementAt(i);
1128
1129         if(isNode(sblockdecl, "switch_block")) {
1130           ParseNode lpn=sblockdecl.getChild("switch_labels").getChild("switch_label_list");
1131           ParseNodeVector labelv=lpn.getChildren();
1132           Vector<SwitchLabelNode> slv = new Vector<SwitchLabelNode>();
1133           for(int j=0; j<labelv.size(); j++) {
1134             ParseNode labeldecl=labelv.elementAt(j);
1135             if(isNode(labeldecl, "switch_label")) {
1136               slv.addElement(new SwitchLabelNode(parseExpression(labeldecl.getChild("constant_expression").getFirstChild()), false));
1137             } else if(isNode(labeldecl, "default_switch_label")) {
1138               slv.addElement(new SwitchLabelNode(null, true));
1139             }
1140           }
1141
1142           blockstatements.add(new SwitchBlockNode(slv,
1143               parseSingleBlock(sblockdecl.getChild("switch_statements").getFirstChild())));
1144
1145         }
1146       }
1147     } else if (isNode(pn, "trycatchstatement")) {
1148       // TODO add version for normal Java later
1149       // Do not fully support exceptions now. Only make sure that if there are no
1150       // exceptions thrown, the execution is right
1151       ParseNode tpn = pn.getChild("tryblock").getFirstChild();
1152       BlockNode bn=parseBlockHelper(tpn);
1153       blockstatements.add(new SubBlockNode(bn));
1154
1155       ParseNode fbk = pn.getChild("finallyblock");
1156       if(fbk != null) {
1157         ParseNode fpn = fbk.getFirstChild();
1158         BlockNode fbn=parseBlockHelper(fpn);
1159         blockstatements.add(new SubBlockNode(fbn));
1160       }
1161     } else if (isNode(pn, "throwstatement")) {
1162       // TODO Simply return here
1163       //blockstatements.add(new ReturnNode());
1164     } else if (isNode(pn,"taskexit")) {
1165       Vector vfe=null;
1166       if (pn.getChild("flag_effects_list")!=null)
1167         vfe=parseFlags(pn.getChild("flag_effects_list"));
1168       Vector ccs=null;
1169       if (pn.getChild("cons_checks")!=null)
1170         ccs=parseChecks(pn.getChild("cons_checks"));
1171
1172       blockstatements.add(new TaskExitNode(vfe, ccs, this.m_taskexitnum++));
1173     } else if (isNode(pn,"atomic")) {
1174       BlockNode bn=parseBlockHelper(pn);
1175       blockstatements.add(new AtomicNode(bn));
1176     } else if (isNode(pn,"synchronized")) {
1177       BlockNode bn=parseBlockHelper(pn.getChild("block"));
1178       ExpressionNode en=parseExpression(pn.getChild("expr").getFirstChild());
1179       blockstatements.add(new SynchronizedNode(en, bn));
1180     } else if (isNode(pn,"return")) {
1181       if (isEmpty(pn.getTerminal()))
1182         blockstatements.add(new ReturnNode());
1183       else {
1184         ExpressionNode en=parseExpression(pn.getFirstChild());
1185         blockstatements.add(new ReturnNode(en));
1186       }
1187     } else if (isNode(pn,"block_statement_list")) {
1188       BlockNode bn=parseBlockHelper(pn);
1189       blockstatements.add(new SubBlockNode(bn));
1190     } else if (isNode(pn,"empty")) {
1191       /* nop */
1192     } else if (isNode(pn,"statement_expression_list")) {
1193       ParseNodeVector pnv=pn.getChildren();
1194       BlockNode bn=new BlockNode();
1195       for(int i=0; i<pnv.size(); i++) {
1196         ExpressionNode en=parseExpression(pnv.elementAt(i));
1197         blockstatements.add(new BlockExpressionNode(en));
1198       }
1199       bn.setStyle(BlockNode.EXPRLIST);
1200     } else if (isNode(pn,"forstatement")) {
1201       BlockNode init=parseSingleBlock(pn.getChild("initializer").getFirstChild());
1202       BlockNode update=parseSingleBlock(pn.getChild("update").getFirstChild());
1203       ExpressionNode condition=parseExpression(pn.getChild("condition").getFirstChild());
1204       BlockNode body=parseSingleBlock(pn.getChild("statement").getFirstChild());
1205       if(condition == null) {
1206         // no condition clause, make a 'true' expression as the condition
1207         condition = (ExpressionNode)new LiteralNode("boolean", new Boolean(true));
1208       }
1209       blockstatements.add(new LoopNode(init,condition,update,body));
1210     } else if (isNode(pn,"whilestatement")) {
1211       ExpressionNode condition=parseExpression(pn.getChild("condition").getFirstChild());
1212       BlockNode body=parseSingleBlock(pn.getChild("statement").getFirstChild());
1213       if(condition == null) {
1214         // no condition clause, make a 'true' expression as the condition
1215         condition = (ExpressionNode)new LiteralNode("boolean", new Boolean(true));
1216       }
1217       blockstatements.add(new LoopNode(condition,body,LoopNode.WHILELOOP));
1218     } else if (isNode(pn,"dowhilestatement")) {
1219       ExpressionNode condition=parseExpression(pn.getChild("condition").getFirstChild());
1220       BlockNode body=parseSingleBlock(pn.getChild("statement").getFirstChild());
1221       if(condition == null) {
1222         // no condition clause, make a 'true' expression as the condition
1223         condition = (ExpressionNode)new LiteralNode("boolean", new Boolean(true));
1224       }
1225       blockstatements.add(new LoopNode(condition,body,LoopNode.DOWHILELOOP));
1226     } else if (isNode(pn,"sese")) {
1227       ParseNode pnID=pn.getChild("identifier");
1228       String stID=null;
1229       if( pnID != null ) { stID=pnID.getFirstChild().getTerminal(); }
1230       SESENode start=new SESENode(stID);
1231       SESENode end  =new SESENode(stID);
1232       start.setEnd( end   );
1233       end.setStart( start );
1234       blockstatements.add(start);
1235       blockstatements.addAll(parseSESEBlock(blockstatements,pn.getChild("body").getFirstChild()));
1236       blockstatements.add(end);
1237     } else if (isNode(pn,"continue")) {
1238       blockstatements.add(new ContinueBreakNode(false));
1239     } else if (isNode(pn,"break")) {
1240       blockstatements.add(new ContinueBreakNode(true));
1241
1242     } else if (isNode(pn,"genreach")) {
1243       String graphName = pn.getChild("graphName").getTerminal();
1244       blockstatements.add( new GenReachNode( graphName ) );
1245
1246     } else {
1247       System.out.println("---------------");
1248       System.out.println(pn.PPrint(3,true));
1249       throw new Error();
1250     }
1251     return blockstatements;
1252   }
1253
1254   public MethodDescriptor parseMethodHeader(ParseNode pn) {
1255     ParseNode mn=pn.getChild("modifiers");
1256     Modifiers m=parseModifiersList(mn);
1257
1258     ParseNode tn=pn.getChild("returntype");
1259     TypeDescriptor returntype;
1260     if (tn!=null)
1261       returntype=parseTypeDescriptor(tn);
1262     else
1263       returntype=new TypeDescriptor(TypeDescriptor.VOID);
1264
1265     ParseNode pmd=pn.getChild("method_declarator");
1266     String name=pmd.getChild("name").getTerminal();
1267     MethodDescriptor md=new MethodDescriptor(m, returntype, name);
1268
1269     ParseNode paramnode=pmd.getChild("parameters");
1270     parseParameterList(md,paramnode);
1271     return md;
1272   }
1273
1274   public void parseParameterList(MethodDescriptor md, ParseNode pn) {
1275     ParseNode paramlist=pn.getChild("formal_parameter_list");
1276     if (paramlist==null)
1277       return;
1278     ParseNodeVector pnv=paramlist.getChildren();
1279     for(int i=0; i<pnv.size(); i++) {
1280       ParseNode paramn=pnv.elementAt(i);
1281
1282       if (isNode(paramn, "tag_parameter")) {
1283         String paramname=paramn.getChild("single").getTerminal();
1284         TypeDescriptor type=new TypeDescriptor(TypeDescriptor.TAG);
1285         md.addTagParameter(type, paramname);
1286       } else {
1287         TypeDescriptor type=parseTypeDescriptor(paramn);
1288
1289         ParseNode tmp=paramn;
1290         while (tmp.getChild("single")==null) {
1291           type=type.makeArray(state);
1292           tmp=tmp.getChild("array");
1293         }
1294         String paramname=tmp.getChild("single").getTerminal();
1295
1296         md.addParameter(type, paramname);
1297       }
1298     }
1299   }
1300
1301   public Modifiers parseModifiersList(ParseNode pn) {
1302     Modifiers m=new Modifiers();
1303     ParseNode modlist=pn.getChild("modifier_list");
1304     if (modlist!=null) {
1305       ParseNodeVector pnv=modlist.getChildren();
1306       for(int i=0; i<pnv.size(); i++) {
1307         ParseNode modn=pnv.elementAt(i);
1308         if (isNode(modn,"public"))
1309           m.addModifier(Modifiers.PUBLIC);
1310         else if (isNode(modn,"protected"))
1311           m.addModifier(Modifiers.PROTECTED);
1312         else if (isNode(modn,"private"))
1313           m.addModifier(Modifiers.PRIVATE);
1314         else if (isNode(modn,"static"))
1315           m.addModifier(Modifiers.STATIC);
1316         else if (isNode(modn,"final"))
1317           m.addModifier(Modifiers.FINAL);
1318         else if (isNode(modn,"native"))
1319           m.addModifier(Modifiers.NATIVE);
1320         else if (isNode(modn,"synchronized"))
1321           m.addModifier(Modifiers.SYNCHRONIZED);
1322         else if (isNode(modn,"atomic"))
1323           m.addModifier(Modifiers.ATOMIC);
1324     else if (isNode(modn,"abstract"))
1325       m.addModifier(Modifiers.ABSTRACT);
1326     else if (isNode(modn,"volatile"))
1327       m.addModifier(Modifiers.VOLATILE);
1328     else if (isNode(modn,"transient"))
1329       m.addModifier(Modifiers.TRANSIENT);
1330     else if(isNode(modn,"annotation_list"))
1331       parseAnnotationList(modn,m);
1332         else{
1333           throw new Error("Unrecognized Modifier:"+modn.getLabel());}
1334       }
1335     }
1336     return m;
1337   }
1338
1339   private void parseAnnotationList(ParseNode pn, Modifiers m){
1340       ParseNodeVector pnv=pn.getChildren();
1341       for(int i=0; i<pnv.size(); i++) {
1342         ParseNode body_list=pnv.elementAt(i);
1343         if(isNode(body_list,"annotation_body")){
1344           ParseNode body_node=body_list.getFirstChild();
1345           if (isNode(body_node,"marker_annotation")){
1346             m.addAnnotation(new AnnotationDescriptor(body_node.getChild("name").getTerminal()));
1347           }else if(isNode(body_node,"single_annotation")){
1348             throw new Error("Annotation with single piece of data is not supported yet.");
1349           } else if(isNode(body_node,"normal_annotation")){
1350             throw new Error("Annotation with multiple data members is not supported yet.");
1351           }
1352         }
1353       }
1354   }
1355
1356   private boolean isNode(ParseNode pn, String label) {
1357     if (pn.getLabel().equals(label))
1358       return true;
1359     else return false;
1360   }
1361
1362   private static boolean isEmpty(ParseNode pn) {
1363     if (pn.getLabel().equals("empty"))
1364       return true;
1365     else
1366       return false;
1367   }
1368
1369   private static boolean isEmpty(String s) {
1370     if (s.equals("empty"))
1371       return true;
1372     else
1373       return false;
1374   }
1375
1376   /** Throw an exception if something is unexpected */
1377   private void check(ParseNode pn, String label) {
1378     if (pn == null) {
1379       throw new Error(pn+ "IE: Expected '" + label + "', got null");
1380     }
1381     if (!pn.getLabel().equals(label)) {
1382       throw new Error(pn+ "IE: Expected '" + label + "', got '"+pn.getLabel()+"'");
1383     }
1384   }
1385 }