6f3ed520c4f21eb96f52667005807ab026bb9654
[IRC.git] / Robust / src / IR / Tree / BuildIR.java
1 package IR.Tree;
2 import IR.*;
3 import Util.Lattice;
4 import Util.Pair;
5
6 import java.io.File;
7 import java.util.*;
8 import java.io.*;
9 import java.lang.Throwable;
10 public class BuildIR {
11   State state;
12   private boolean isRunningRecursiveInnerClass;
13   private int m_taskexitnum;
14
15   public BuildIR(State state) {
16     this.state=state;
17     this.m_taskexitnum = 0;
18     this.isRunningRecursiveInnerClass = false;
19   }
20
21   public void buildtree(ParseNode pn, Set toanalyze, String sourcefile) {
22     parseFile(pn, toanalyze, sourcefile);
23
24     // numering the interfaces
25     int if_num = 0;
26     Iterator it_classes = state.getClassSymbolTable().getValueSet().iterator();
27     while(it_classes.hasNext()) {
28       ClassDescriptor cd = (ClassDescriptor)it_classes.next();
29       if(cd.isInterface()) {
30         cd.setInterfaceId(if_num++);
31       }
32     }
33   }
34
35   //This is all single imports and a subset of the
36   //multi imports that have been resolved.
37   ChainHashMap mandatoryImports;
38   //maps class names in file to full name
39   //Note may map a name to an ERROR.
40   ChainHashMap multiimports;
41   String packageName;
42
43   String currsourcefile;
44   Set analyzeset;
45
46   void pushChainMaps() {
47     mandatoryImports=mandatoryImports.makeChild();
48     multiimports=multiimports.makeChild();
49   }
50   
51   void popChainMaps() {
52     mandatoryImports=mandatoryImports.getParent();
53     multiimports=multiimports.getParent();
54   }
55
56   /** Parse the classes in this file */
57   public void parseFile(ParseNode pn, Set toanalyze, String sourcefile) {
58     mandatoryImports = new ChainHashMap();
59     multiimports = new ChainHashMap();
60     currsourcefile=sourcefile;
61     analyzeset=toanalyze;
62
63     if(state.JNI) {
64       //add java.lang as our default multi-import
65       this.addMultiImport(sourcefile, "java.lang", false);
66     }
67
68     ParseNode ipn = pn.getChild("imports").getChild("import_decls_list");
69     if ((ipn != null) && !state.MGC) {
70       ParseNodeVector pnv = ipn.getChildren();
71       for (int i = 0; i < pnv.size(); i++) {
72         ParseNode pnimport = pnv.elementAt(i);
73         NameDescriptor nd = parseName(pnimport.getChild("name"));
74         if (isNode(pnimport, "import_single")) {
75           if (!mandatoryImports.containsKey(nd.getIdentifier())) {
76             // map name to full name (includes package/directory
77             mandatoryImports.put(nd.getIdentifier(), nd.getPathFromRootToHere());
78           } else {
79             throw new Error("An ambiguous class "+ nd.getIdentifier() +" has been found. It is included for " +
80                             ((String)mandatoryImports.get(nd.getIdentifier())) + " and " +
81                             nd.getPathFromRootToHere());
82           }
83         } else {
84           addMultiImport(sourcefile, nd.getPathFromRootToHere(), false);
85         }
86       }
87     }
88
89     ParseNode ppn=pn.getChild("packages").getChild("package");
90     packageName = null;
91     if ((ppn!=null) && !state.MGC){
92       NameDescriptor nd = parseClassName(ppn.getChild("name"));
93       packageName = nd.getPathFromRootToHere();
94       //Trick -> import the package directory as a multi-import and it'll
95       //automatically recognize files in the same directory.
96       addMultiImport(sourcefile, packageName, true);
97     }
98
99     ParseNode tpn=pn.getChild("type_declaration_list");
100     if (tpn != null) {
101       ParseNodeVector pnv = tpn.getChildren();
102       for (int i = 0; i < pnv.size(); i++) {
103         ParseNode type_pn = pnv.elementAt(i);
104         if (isEmpty(type_pn)) /* Skip the semicolon */
105           continue;
106         if (isNode(type_pn, "class_declaration")) {
107           ClassDescriptor cn = parseTypeDecl(type_pn);
108           parseInitializers(cn);
109
110           // for inner classes/enum
111           HashSet tovisit = new HashSet();
112           Iterator it_icds = cn.getInnerClasses();
113           while (it_icds.hasNext()) {
114             tovisit.add(it_icds.next());
115           }
116
117           while (!tovisit.isEmpty()) {
118             ClassDescriptor cd = (ClassDescriptor) tovisit.iterator().next();
119             tovisit.remove(cd);
120             parseInitializers(cd);
121
122             Iterator it_ics = cd.getInnerClasses();
123             while (it_ics.hasNext()) {
124               tovisit.add(it_ics.next());
125             }
126           }
127         } else if (isNode(type_pn, "task_declaration")) {
128           TaskDescriptor td = parseTaskDecl(type_pn);
129           if (toanalyze != null)
130             toanalyze.add(td);
131           state.addTask(td);
132         } else if (isNode(type_pn, "interface_declaration")) {
133           // TODO add version for normal Java later
134           ClassDescriptor cn = parseInterfaceDecl(type_pn, null);
135         } else if (isNode(type_pn, "enum_declaration")) {
136           // TODO add version for normal Java later
137           ClassDescriptor cn = parseEnumDecl(null, type_pn);
138
139         } else if(isNode(type_pn,"annotation_type_declaration")) {
140           ClassDescriptor cn=parseAnnotationTypeDecl(type_pn);
141         } else {
142           throw new Error(type_pn.getLabel());
143         }
144       }
145     }
146   }
147
148
149   //This kind of breaks away from tradition a little bit by doing the file checks here
150   // instead of in Semantic check, but doing it here is easier because we have a mapping early on
151   // if I wait until semantic check, I have to change ALL the type descriptors to match the new
152   // mapping and that's both ugly and tedious.
153   private void addMultiImport(String currentSource, String importPath, boolean isPackageDirectory) {
154     boolean found = false;
155     for (int j = 0; j < state.classpath.size(); j++) {
156       String path = (String) state.classpath.get(j);
157       File folder = new File(path, importPath.replace('.', '/'));
158       if (folder.exists()) {
159         found = true;
160         for (String file : folder.list()) {
161           // if the file is of type *.java add to multiImport list.
162           if (file.lastIndexOf('.') != -1 && file.substring(file.lastIndexOf('.')).equalsIgnoreCase(".java")) {
163             String classname = file.substring(0, file.length() - 5);
164             // single imports have precedence over multi-imports
165             if (!mandatoryImports.containsKey(classname)) {
166               //package files have precedence over multi-imports.
167               if (multiimports.containsKey(classname)  && !isPackageDirectory) {
168                 // put error in for later, in case we try to import
169                 multiimports.put(classname, new Error("Error: class " + classname + " is defined more than once in a multi-import in " + currentSource));
170               } else {
171                 multiimports.put(classname, importPath + "." + classname);
172               }
173             }
174           }
175         }
176       }
177     }
178
179     if(!found) {
180       throw new Error("Import package " + importPath + " in  " + currentSource
181                       + " cannot be resolved.");
182     }
183   }
184
185   public void parseInitializers(ClassDescriptor cn) {
186     Vector fv=cn.getFieldVec();
187     int pos = 0;
188     for(int i=0; i<fv.size(); i++) {
189       FieldDescriptor fd=(FieldDescriptor)fv.get(i);
190       if(fd.getExpressionNode()!=null) {
191         Iterator methodit = cn.getMethods();
192         while(methodit.hasNext()) {
193           MethodDescriptor currmd=(MethodDescriptor)methodit.next();
194           if(currmd.isConstructor()) {
195             BlockNode bn=state.getMethodBody(currmd);
196             NameNode nn=new NameNode(new NameDescriptor(fd.getSymbol()));
197             AssignmentNode an=new AssignmentNode(nn,fd.getExpressionNode(),new AssignOperation(1));
198             bn.addBlockStatementAt(new BlockExpressionNode(an), pos);
199           }
200         }
201         pos++;
202       }
203     }
204   }
205   
206   private ClassDescriptor parseEnumDecl(ClassDescriptor cn, ParseNode pn) {    
207     String basename=pn.getChild("name").getTerminal();
208     String classname=(cn!=null)?cn.getClassName()+"$"+basename:basename;
209     ClassDescriptor ecd=new ClassDescriptor(cn!=null?cn.getPackage():null, classname, false);
210     
211     if (cn!=null) {
212       if (packageName==null)
213         cn.getSingleImportMappings().put(basename,classname);
214       else
215         cn.getSingleImportMappings().put(basename,packageName+"."+classname);
216     }
217
218     pushChainMaps();
219     ecd.setImports(mandatoryImports, multiimports);
220     ecd.setAsEnum();
221     if(cn != null) {
222       ecd.setSurroundingClass(cn.getSymbol());
223       ecd.setSurrounding(cn);
224       cn.addEnum(ecd);
225     }
226     if (!(ecd.getSymbol().equals(TypeUtil.ObjectClass)||
227           ecd.getSymbol().equals(TypeUtil.TagClass))) {
228       ecd.setSuper(TypeUtil.ObjectClass);
229     }
230     ecd.setModifiers(parseModifiersList(pn.getChild("modifiers")));
231     parseEnumBody(ecd, pn.getChild("enumbody"));
232
233     if (analyzeset != null)
234       analyzeset.add(ecd);
235     ecd.setSourceFileName(currsourcefile);
236     state.addClass(ecd);
237
238     popChainMaps();
239     return ecd;
240   }
241
242   private void parseEnumBody(ClassDescriptor cn, ParseNode pn) {
243     ParseNode decls=pn.getChild("enum_constants_list");
244     if (decls!=null) {
245       ParseNodeVector pnv=decls.getChildren();
246       for(int i=0; i<pnv.size(); i++) {
247         ParseNode decl=pnv.elementAt(i);
248         if (isNode(decl,"enum_constant")) {
249           parseEnumConstant(cn,decl);
250         } else throw new Error();
251       }
252     }
253   }
254
255   private void parseEnumConstant(ClassDescriptor cn, ParseNode pn) {
256     cn.addEnumConstant(pn.getChild("name").getTerminal());
257   }
258
259   private ClassDescriptor parseAnnotationTypeDecl(ParseNode pn) {
260     ClassDescriptor cn=new ClassDescriptor(pn.getChild("name").getTerminal(), true);
261     pushChainMaps();
262     cn.setImports(mandatoryImports, multiimports);
263     ParseNode modifiers=pn.getChild("modifiers");
264     if(modifiers!=null) {
265       cn.setModifiers(parseModifiersList(modifiers));
266     }
267     parseAnnotationTypeBody(cn,pn.getChild("body"));
268     popChainMaps();
269
270     if (analyzeset != null)
271       analyzeset.add(cn);
272     cn.setSourceFileName(currsourcefile);
273     state.addClass(cn);
274
275     return cn;
276   }
277
278   private void parseAnnotationTypeBody(ClassDescriptor cn, ParseNode pn) {
279     ParseNode list_node=pn.getChild("annotation_type_element_list");
280     if(list_node!=null) {
281       ParseNodeVector pnv = list_node.getChildren();
282       for (int i = 0; i < pnv.size(); i++) {
283         ParseNode element_node = pnv.elementAt(i);
284         if (isNode(element_node, "annotation_type_element_declaration")) {
285           ParseNodeVector elementProps = element_node.getChildren();
286           String identifier=null;
287           TypeDescriptor type=null;
288           Modifiers modifiers=new Modifiers();
289           for(int eidx=0; eidx<elementProps.size(); eidx++) {
290             ParseNode prop_node=elementProps.elementAt(eidx);
291             if(isNode(prop_node,"name")) {
292               identifier=prop_node.getTerminal();
293             } else if(isNode(prop_node,"type")) {
294               type=parseTypeDescriptor(prop_node);
295             } else if(isNode(prop_node,"modifier")) {
296               modifiers=parseModifiersList(prop_node);
297             }
298           }
299           cn.addField(new FieldDescriptor(modifiers, type, identifier, null, false));
300         }
301       }
302     }
303   }
304
305   public ClassDescriptor parseInterfaceDecl(ParseNode pn, ClassDescriptor outerclass) {
306     String basename=pn.getChild("name").getTerminal();
307     String classname=((outerclass==null)?"":(outerclass.getClassName()+"$"))+basename;
308     if (outerclass!=null) {
309       if (packageName==null)
310         outerclass.getSingleImportMappings().put(basename,classname);
311       else
312         outerclass.getSingleImportMappings().put(basename,packageName+"."+classname);
313     }
314     ClassDescriptor cn= new ClassDescriptor(packageName, classname, true);
315
316     pushChainMaps();
317     cn.setImports(mandatoryImports, multiimports);
318     //cn.setAsInterface();
319     if (!isEmpty(pn.getChild("superIF").getTerminal())) {
320       /* parse inherited interface name */
321       ParseNode snlist=pn.getChild("superIF").getChild("extend_interface_list");
322       ParseNodeVector pnv=snlist.getChildren();
323       for(int i=0; i<pnv.size(); i++) {
324         ParseNode decl=pnv.elementAt(i);
325         if (isNode(decl,"type")) {
326           NameDescriptor nd=parseClassName(decl.getChild("class").getChild("name"));
327           cn.addSuperInterface(nd.toString());
328         } else if (isNode(decl, "interface_declaration")) {
329           ClassDescriptor innercn = parseInterfaceDecl(decl, cn);
330         } else throw new Error();
331       }
332     }
333     cn.setModifiers(parseModifiersList(pn.getChild("modifiers")));
334     parseInterfaceBody(cn, pn.getChild("interfacebody"));
335     if (analyzeset != null)
336       analyzeset.add(cn);
337     cn.setSourceFileName(currsourcefile);
338     state.addClass(cn);
339     popChainMaps();
340     return cn;
341   }
342
343   private void parseInterfaceBody(ClassDescriptor cn, ParseNode pn) {
344     assert(cn.isInterface());
345     ParseNode decls=pn.getChild("interface_member_declaration_list");
346     if (decls!=null) {
347       ParseNodeVector pnv=decls.getChildren();
348       for(int i=0; i<pnv.size(); i++) {
349         ParseNode decl=pnv.elementAt(i);
350         if (isNode(decl,"constant")) {
351           parseInterfaceConstant(cn,decl);
352         } else if (isNode(decl,"method")) {
353           parseInterfaceMethod(cn,decl.getChild("method_declaration"));
354         } else if (isNode(decl, "interface_declaration")) {
355           parseInterfaceDecl(decl, cn);
356         } else throw new Error(decl.PPrint(2, true));
357       }
358     }
359   }
360
361
362
363   private void parseInterfaceConstant(ClassDescriptor cn, ParseNode pn) {
364     if (pn!=null) {
365       parseFieldDecl(cn,pn.getChild("field_declaration"));
366       return;
367     }
368     throw new Error();
369   }
370
371   private void parseInterfaceMethod(ClassDescriptor cn, ParseNode pn) {
372     ParseNode headern=pn.getChild("header");
373     ParseNode bodyn=pn.getChild("body");
374     MethodDescriptor md=parseMethodHeader(headern.getChild("method_header"));
375     md.getModifiers().addModifier(Modifiers.PUBLIC);
376     md.getModifiers().addModifier(Modifiers.ABSTRACT);
377     try {
378       BlockNode bn=parseBlock(bodyn);
379       cn.addMethod(md);
380       state.addTreeCode(md,bn);
381     } catch (Exception e) {
382       System.out.println("Error with method:"+md.getSymbol());
383       e.printStackTrace();
384       throw new Error();
385     } catch (Error e) {
386       System.out.println("Error with method:"+md.getSymbol());
387       e.printStackTrace();
388       throw new Error();
389     }
390   }
391
392   public TaskDescriptor parseTaskDecl(ParseNode pn) {
393     TaskDescriptor td=new TaskDescriptor(pn.getChild("name").getTerminal());
394     ParseNode bodyn=pn.getChild("body");
395     BlockNode bn=parseBlock(bodyn);
396     parseParameterList(td, pn);
397     state.addTreeCode(td,bn);
398     if (pn.getChild("flag_effects_list")!=null)
399       td.addFlagEffects(parseFlags(pn.getChild("flag_effects_list")));
400     return td;
401   }
402
403   public Vector parseFlags(ParseNode pn) {
404     Vector vfe=new Vector();
405     ParseNodeVector pnv=pn.getChildren();
406     for(int i=0; i<pnv.size(); i++) {
407       ParseNode fn=pnv.elementAt(i);
408       FlagEffects fe=parseFlagEffects(fn);
409       vfe.add(fe);
410     }
411     return vfe;
412   }
413
414   public FlagEffects parseFlagEffects(ParseNode pn) {
415     if (isNode(pn,"flag_effect")) {
416       String flagname=pn.getChild("name").getTerminal();
417       FlagEffects fe=new FlagEffects(flagname);
418       if (pn.getChild("flag_list")!=null)
419         parseFlagEffect(fe, pn.getChild("flag_list"));
420       if (pn.getChild("tag_list")!=null)
421         parseTagEffect(fe, pn.getChild("tag_list"));
422       return fe;
423     } else throw new Error();
424   }
425
426   public void parseTagEffect(FlagEffects fes, ParseNode pn) {
427     ParseNodeVector pnv=pn.getChildren();
428     for(int i=0; i<pnv.size(); i++) {
429       ParseNode pn2=pnv.elementAt(i);
430       boolean status=true;
431       if (isNode(pn2,"not")) {
432         status=false;
433         pn2=pn2.getChild("name");
434       }
435       String name=pn2.getTerminal();
436       fes.addTagEffect(new TagEffect(name,status));
437     }
438   }
439
440   public void parseFlagEffect(FlagEffects fes, ParseNode pn) {
441     ParseNodeVector pnv=pn.getChildren();
442     for(int i=0; i<pnv.size(); i++) {
443       ParseNode pn2=pnv.elementAt(i);
444       boolean status=true;
445       if (isNode(pn2,"not")) {
446         status=false;
447         pn2=pn2.getChild("name");
448       }
449       String name=pn2.getTerminal();
450       fes.addEffect(new FlagEffect(name,status));
451     }
452   }
453
454   public FlagExpressionNode parseFlagExpression(ParseNode pn) {
455     if (isNode(pn,"or")) {
456       ParseNodeVector pnv=pn.getChildren();
457       ParseNode left=pnv.elementAt(0);
458       ParseNode right=pnv.elementAt(1);
459       return new FlagOpNode(parseFlagExpression(left), parseFlagExpression(right), new Operation(Operation.LOGIC_OR));
460     } else if (isNode(pn,"and")) {
461       ParseNodeVector pnv=pn.getChildren();
462       ParseNode left=pnv.elementAt(0);
463       ParseNode right=pnv.elementAt(1);
464       return new FlagOpNode(parseFlagExpression(left), parseFlagExpression(right), new Operation(Operation.LOGIC_AND));
465     } else if (isNode(pn, "not")) {
466       ParseNodeVector pnv=pn.getChildren();
467       ParseNode left=pnv.elementAt(0);
468       return new FlagOpNode(parseFlagExpression(left), new Operation(Operation.LOGIC_NOT));
469
470     } else if (isNode(pn,"name")) {
471       return new FlagNode(pn.getTerminal());
472     } else {
473       throw new Error();
474     }
475   }
476
477   public Vector parseChecks(ParseNode pn) {
478     Vector ccs=new Vector();
479     ParseNodeVector pnv=pn.getChildren();
480     for(int i=0; i<pnv.size(); i++) {
481       ParseNode fn=pnv.elementAt(i);
482       ConstraintCheck cc=parseConstraintCheck(fn);
483       ccs.add(cc);
484     }
485     return ccs;
486   }
487
488   public ConstraintCheck parseConstraintCheck(ParseNode pn) {
489     if (isNode(pn,"cons_check")) {
490       String specname=pn.getChild("name").getChild("identifier").getTerminal();
491       Vector[] args=parseConsArgumentList(pn);
492       ConstraintCheck cc=new ConstraintCheck(specname);
493       for(int i=0; i<args[0].size(); i++) {
494         cc.addVariable((String)args[0].get(i));
495         cc.addArgument((ExpressionNode)args[1].get(i));
496       }
497       return cc;
498     } else throw new Error();
499   }
500
501   public void parseParameterList(TaskDescriptor td, ParseNode pn) {
502
503     boolean optional;
504     ParseNode paramlist=pn.getChild("task_parameter_list");
505     if (paramlist==null)
506       return;
507     ParseNodeVector pnv=paramlist.getChildren();
508     for(int i=0; i<pnv.size(); i++) {
509       ParseNode paramn=pnv.elementAt(i);
510       if(paramn.getChild("optional")!=null) {
511         optional = true;
512         paramn = paramn.getChild("optional").getFirstChild();
513         System.out.println("OPTIONAL FOUND!!!!!!!");
514       } else { optional = false;
515                System.out.println("NOT OPTIONAL"); }
516
517       TypeDescriptor type=parseTypeDescriptor(paramn);
518
519       String paramname=paramn.getChild("single").getTerminal();
520       FlagExpressionNode fen=null;
521       if (paramn.getChild("flag")!=null)
522         fen=parseFlagExpression(paramn.getChild("flag").getFirstChild());
523
524       ParseNode tagnode=paramn.getChild("tag");
525
526       TagExpressionList tel=null;
527       if (tagnode!=null) {
528         tel=parseTagExpressionList(tagnode);
529       }
530
531       td.addParameter(type,paramname,fen, tel, optional);
532     }
533   }
534
535   public TagExpressionList parseTagExpressionList(ParseNode pn) {
536     //BUG FIX: change pn.getChildren() to pn.getChild("tag_expression_list").getChildren()
537     //To test, feed in any input program that uses tags
538     ParseNodeVector pnv=pn.getChild("tag_expression_list").getChildren();
539     TagExpressionList tel=new TagExpressionList();
540     for(int i=0; i<pnv.size(); i++) {
541       ParseNode tn=pnv.elementAt(i);
542       String type=tn.getChild("type").getTerminal();
543       String name=tn.getChild("single").getTerminal();
544       tel.addTag(type, name);
545     }
546     return tel;
547   }
548
549   public ClassDescriptor parseTypeDecl(ParseNode pn) {
550     ClassDescriptor cn=new ClassDescriptor(packageName, pn.getChild("name").getTerminal(), false);
551     pushChainMaps();
552     cn.setImports(mandatoryImports, multiimports);
553     if (!isEmpty(pn.getChild("super").getTerminal())) {
554       /* parse superclass name */
555       ParseNode snn=pn.getChild("super").getChild("type").getChild("class").getChild("name");
556       NameDescriptor nd=parseClassName(snn);
557       cn.setSuper(nd.toString());
558     } else {
559       if (!(cn.getSymbol().equals(TypeUtil.ObjectClass)||
560             cn.getSymbol().equals(TypeUtil.TagClass)))
561         cn.setSuper(TypeUtil.ObjectClass);
562     }
563     // check inherited interfaces
564     if (!isEmpty(pn.getChild("superIF").getTerminal())) {
565       /* parse inherited interface name */
566       ParseNode snlist=pn.getChild("superIF").getChild("interface_type_list");
567       ParseNodeVector pnv=snlist.getChildren();
568       for(int i=0; i<pnv.size(); i++) {
569         ParseNode decl=pnv.elementAt(i);
570         if (isNode(decl,"type")) {
571           NameDescriptor nd=parseClassName(decl.getChild("class").getChild("name"));
572           cn.addSuperInterface(nd.toString());
573         }
574       }
575     }
576     cn.setModifiers(parseModifiersList(pn.getChild("modifiers")));
577     parseClassBody(cn, pn.getChild("classbody"));
578
579     boolean hasConstructor = false;
580     for(Iterator method_it=cn.getMethods(); method_it.hasNext(); ) {
581       MethodDescriptor md=(MethodDescriptor)method_it.next();
582       hasConstructor |= md.isConstructor();
583     }
584     if((!hasConstructor) && (!cn.isEnum())) {
585       // add a default constructor for this class
586       MethodDescriptor md = new MethodDescriptor(new Modifiers(Modifiers.PUBLIC),
587                                                  cn.getSymbol(), false);
588       BlockNode bn=new BlockNode();
589       state.addTreeCode(md,bn);
590       md.setDefaultConstructor();
591       cn.addMethod(md);
592     }
593
594
595     popChainMaps();
596
597     cn.setSourceFileName(currsourcefile);
598
599
600     
601     if (analyzeset != null)
602       analyzeset.add(cn);
603     state.addClass(cn);
604 //create this$n representing a final reference to the next surrounding class. each inner class should have whatever inner class
605 //pointers the surrounding class has + a pointer to the surrounding class.
606    if( true )
607    {
608         this.isRunningRecursiveInnerClass = true; //fOR dEBUGGING PURPOSES IN ORDER TO DUMP STRINGS WHILE IN THIS CODE PATH
609         addOuterClassReferences( cn, 0 );
610         addOuterClassParam( cn, 0 );
611         this.isRunningRecursiveInnerClass = false;
612     }
613     return cn;
614   }
615
616 private void initializeOuterMember( MethodDescriptor md, String fieldName, String formalParameter ) {
617          BlockNode obn = state.getMethodBody(md);
618          NameNode nn=new NameNode( new NameDescriptor( fieldName ) );
619          NameNode fn = new NameNode ( new NameDescriptor( formalParameter ) );
620           //nn.setNumLine(en.getNumLine())
621          AssignmentNode an=new AssignmentNode(nn,fn,new AssignOperation(1));
622          //an.setNumLine(pn.getLine());
623          obn.addFirstBlockStatement(new BlockExpressionNode(an));
624         // System.out.print( "The code inserted is : " + obn.printNode( 0 ) + "\n" );
625          state.addTreeCode(md, obn);
626 }
627
628 private void addOuterClassParam( ClassDescriptor cn, int depth )
629 {
630         Iterator nullCheckItr = cn.getInnerClasses();
631         if( false == nullCheckItr.hasNext() )
632                 return;
633
634         //create a typedescriptor of type cn
635         TypeDescriptor theTypeDesc = new TypeDescriptor( cn );
636         
637         for(Iterator it=cn.getInnerClasses(); it.hasNext(); ) {
638                 ClassDescriptor icd=(ClassDescriptor)it.next();
639                 if(icd.isStatic()) {
640                     continue;
641                 }
642                 
643                 //iterate over all ctors of I.Cs and add a new param
644                 for(Iterator method_it=icd.getMethods(); method_it.hasNext(); ) {
645                          MethodDescriptor md=(MethodDescriptor)method_it.next();
646                          if( md.isConstructor() ){
647                                 md.addParameter( theTypeDesc, "surrounding$" + String.valueOf(depth) ); 
648                                 initializeOuterMember( md, "this$" + String.valueOf( depth ), "surrounding$" + String.valueOf(depth) );
649                                 //System.out.println( "The added param is " + md.toString() + "\n" );           
650                         }
651                 }
652                 addOuterClassParam( icd, depth + 1 );
653                 
654         }
655         
656 }
657 private void addOuterClassReferences( ClassDescriptor cn, int depth )
658 {
659         //SYMBOLTABLE does not have a length or empty method, hence could not define a hasInnerClasses method in classDescriptor
660         Iterator nullCheckItr = cn.getInnerClasses();
661         if( false == nullCheckItr.hasNext() )
662                 return;
663
664         String tempCopy = cn.getClassName();
665         //MESSY HACK FOLLOWS
666         int i = 0;
667
668         ParseNode theNode = new ParseNode( "field_declaration" );
669         theNode.addChild("modifier").addChild( new ParseNode( "modifier_list" ) ).addChild("final");
670         ParseNode theTypeNode = new ParseNode("type");
671         ParseNode tempChildNode = theTypeNode.addChild("class").addChild( "name" );
672                 //tempChildNode.addChild("base").addChild( new ParseNode("empty") );
673         tempChildNode.addChild("identifier").addChild ( tempCopy );
674         theNode.addChild("type").addChild( theTypeNode );
675         ParseNode variableDeclaratorID = new ParseNode("single");
676         String theStr = "this$" + String.valueOf( depth );
677         variableDeclaratorID.addChild( theStr );
678         ParseNode variableDeclarator = new ParseNode( "variable_declarator" );
679         variableDeclarator.addChild( variableDeclaratorID );
680         ParseNode variableDeclaratorList = new ParseNode("variable_declarators_list");
681         variableDeclaratorList.addChild( variableDeclarator );
682         theNode.addChild("variables").addChild( variableDeclaratorList );
683
684         for(Iterator it=cn.getInnerClasses(); it.hasNext(); ) {
685                 ClassDescriptor icd=(ClassDescriptor)it.next();
686                 parseFieldDecl( icd, theNode );         
687                 /*if( true ) {
688                         SymbolTable fieldTable = icd.getFieldTable();
689                         //System.out.println( fieldTable.toString() );
690                 }*/
691                 icd.setInnerDepth( depth + 1 );
692                 addOuterClassReferences( icd, depth + 1 );      
693         }
694 }
695
696   private void parseClassBody(ClassDescriptor cn, ParseNode pn) {
697     ParseNode decls=pn.getChild("class_body_declaration_list");
698     if (decls!=null) {
699       ParseNodeVector pnv=decls.getChildren();
700       for(int i=0; i<pnv.size(); i++) {
701         ParseNode decl=pnv.elementAt(i);
702         if (isNode(decl,"member")) {
703           parseClassMember(cn,decl);
704         } else if (isNode(decl,"constructor")) {
705           parseConstructorDecl(cn,decl.getChild("constructor_declaration"));
706         } else if (isNode(decl, "static_block")) {
707           parseStaticBlockDecl(cn, decl.getChild("static_block_declaration"));
708         } else if (isNode(decl,"block")) {
709         } else throw new Error();
710       }
711     }
712   }
713
714   private void parseClassMember(ClassDescriptor cn, ParseNode pn) {
715     ParseNode fieldnode=pn.getChild("field");
716     if (fieldnode!=null) {
717       //System.out.println( pn.PPrint( 0, true ) );
718       parseFieldDecl(cn,fieldnode.getChild("field_declaration"));
719       return;
720     }
721     ParseNode methodnode=pn.getChild("method");
722     if (methodnode!=null) {
723       parseMethodDecl(cn,methodnode.getChild("method_declaration"));
724       return;
725     }
726     ParseNode innerclassnode=pn.getChild("inner_class_declaration");
727     if (innerclassnode!=null) {
728       parseInnerClassDecl(cn,innerclassnode);
729       return;
730     }
731      ParseNode innerinterfacenode=pn.getChild("interface_declaration");
732     if (innerinterfacenode!=null) {
733       parseInterfaceDecl(innerinterfacenode, cn);
734       return;
735     }
736
737     ParseNode enumnode=pn.getChild("enum_declaration");
738     if (enumnode!=null) {
739       ClassDescriptor ecn=parseEnumDecl(cn,enumnode);
740       return;
741     }
742     ParseNode flagnode=pn.getChild("flag");
743     if (flagnode!=null) {
744       parseFlagDecl(cn, flagnode.getChild("flag_declaration"));
745       return;
746     }
747     // in case there are empty node
748     ParseNode emptynode=pn.getChild("empty");
749     if(emptynode != null) {
750       return;
751     }
752     System.out.println("Unrecognized node:"+pn.PPrint(2,true));
753     throw new Error();
754   }
755
756 //10/9/2011 changed this function to enable creation of default constructor for inner classes.
757 //the change was refactoring this function with the corresponding version for normal classes. sganapat
758   private ClassDescriptor parseInnerClassDecl(ClassDescriptor cn, ParseNode pn) {
759     String basename=pn.getChild("name").getTerminal();
760     String classname=cn.getClassName()+"$"+basename;
761
762     if (cn.getPackage()==null)
763       cn.getSingleImportMappings().put(basename,classname);
764     else
765       cn.getSingleImportMappings().put(basename,cn.getPackage()+"."+classname);
766     
767     ClassDescriptor icn=new ClassDescriptor(cn.getPackage(), classname, false);
768     pushChainMaps();
769     icn.setImports(mandatoryImports, multiimports);
770     icn.setSurroundingClass(cn.getSymbol());
771     icn.setSurrounding(cn);
772     cn.addInnerClass(icn);
773
774      if (!isEmpty(pn.getChild("super").getTerminal())) {
775       /* parse superclass name */
776       ParseNode snn=pn.getChild("super").getChild("type").getChild("class").getChild("name");
777       NameDescriptor nd=parseClassName(snn);
778       icn.setSuper(nd.toString());
779     } else {
780       if (!(icn.getSymbol().equals(TypeUtil.ObjectClass)||
781             icn.getSymbol().equals(TypeUtil.TagClass)))
782         icn.setSuper(TypeUtil.ObjectClass);
783     }
784     // check inherited interfaces
785     if (!isEmpty(pn.getChild("superIF").getTerminal())) {
786       /* parse inherited interface name */
787       ParseNode snlist=pn.getChild("superIF").getChild("interface_type_list");
788       ParseNodeVector pnv=snlist.getChildren();
789       for(int i=0; i<pnv.size(); i++) {
790         ParseNode decl=pnv.elementAt(i);
791         if (isNode(decl,"type")) {
792           NameDescriptor nd=parseClassName(decl.getChild("class").getChild("name"));
793           icn.addSuperInterface(nd.toString());
794         }
795       }
796     }
797     icn.setModifiers(parseModifiersList(pn.getChild("modifiers")));
798
799    if (!icn.isStatic())
800      icn.setAsInnerClass();
801
802     parseClassBody(icn, pn.getChild("classbody"));
803
804     boolean hasConstructor = false;
805     for(Iterator method_it=icn.getMethods(); method_it.hasNext(); ) {
806       MethodDescriptor md=(MethodDescriptor)method_it.next();
807       hasConstructor |= md.isConstructor();
808     }
809 //sganapat adding change to allow proper construction of inner class objects
810     if((!hasConstructor) && (!icn.isEnum())) {
811       // add a default constructor for this class
812       MethodDescriptor md = new MethodDescriptor(new Modifiers(Modifiers.PUBLIC),
813                                                  icn.getSymbol(), false);
814       BlockNode bn=new BlockNode();
815       state.addTreeCode(md,bn);
816       md.setDefaultConstructor();
817       icn.addMethod(md);
818    }
819     popChainMaps();
820
821      if (analyzeset != null)
822       analyzeset.add(icn);
823     icn.setSourceFileName(currsourcefile);
824     state.addClass(icn);
825
826     return icn;
827   }
828
829   private TypeDescriptor parseTypeDescriptor(ParseNode pn) {
830     ParseNode tn=pn.getChild("type");
831     String type_st=tn.getTerminal();
832     if(type_st.equals("byte")) {
833       return state.getTypeDescriptor(TypeDescriptor.BYTE);
834     } else if(type_st.equals("short")) {
835       return state.getTypeDescriptor(TypeDescriptor.SHORT);
836     } else if(type_st.equals("boolean")) {
837       return state.getTypeDescriptor(TypeDescriptor.BOOLEAN);
838     } else if(type_st.equals("int")) {
839       return state.getTypeDescriptor(TypeDescriptor.INT);
840     } else if(type_st.equals("long")) {
841       return state.getTypeDescriptor(TypeDescriptor.LONG);
842     } else if(type_st.equals("char")) {
843       return state.getTypeDescriptor(TypeDescriptor.CHAR);
844     } else if(type_st.equals("float")) {
845       return state.getTypeDescriptor(TypeDescriptor.FLOAT);
846     } else if(type_st.equals("double")) {
847       return state.getTypeDescriptor(TypeDescriptor.DOUBLE);
848     } else if(type_st.equals("class")) {
849       ParseNode nn=tn.getChild("class");
850       return state.getTypeDescriptor(parseClassName(nn.getChild("name")));
851     } else if(type_st.equals("array")) {
852       ParseNode nn=tn.getChild("array");
853       TypeDescriptor td=parseTypeDescriptor(nn.getChild("basetype"));
854       Integer numdims=(Integer)nn.getChild("dims").getLiteral();
855       for(int i=0; i<numdims.intValue(); i++)
856         td=td.makeArray(state);
857       return td;
858     } else {
859       System.out.println(pn.PPrint(2, true));
860       throw new Error();
861     }
862   }
863
864   //Needed to separate out top level call since if a base exists,
865   //we do not want to apply our resolveName function (i.e. deal with imports)
866   //otherwise, if base == null, we do just want to resolve name.
867   private NameDescriptor parseClassName(ParseNode nn) {
868     
869
870     ParseNode base=nn.getChild("base");
871     ParseNode id=nn.getChild("identifier");
872     String classname = id.getTerminal();
873     if (base==null) {
874       return new NameDescriptor(resolveName(classname));
875     }
876     return new NameDescriptor(parseClassNameRecursive(base.getChild("name")),classname);
877   }
878
879   private NameDescriptor parseClassNameRecursive(ParseNode nn) {
880     ParseNode base=nn.getChild("base");
881     ParseNode id=nn.getChild("identifier");
882     String classname = id.getTerminal();
883     if (base==null) {
884       return new NameDescriptor(classname);
885     }
886     return new NameDescriptor(parseClassNameRecursive(base.getChild("name")),classname);
887   }
888
889   //This will get the mapping of a terminal class name
890   //to a canonical classname (with imports/package locations in them)
891   private String resolveName(String terminal) {
892     
893     if(mandatoryImports.containsKey(terminal)) {
894       return (String) mandatoryImports.get(terminal);
895     } else {
896       if(multiimports.containsKey(terminal)) {
897         //Test for error
898         Object o = multiimports.get(terminal);
899         if(o instanceof Error) {
900           throw new Error("Class " + terminal + " is ambiguous. Cause: more than 1 package import contain the same class.");
901         } else {
902           //At this point, if we found a unique class
903           //we can treat it as a single, mandatory import.
904           mandatoryImports.put(terminal, o);
905           return (String) o;
906         }
907       }
908     }
909
910     return terminal;
911   }
912
913   //only function difference between this and parseName() is that this
914   //does not look for a import mapping.
915   private NameDescriptor parseName(ParseNode nn) {
916     ParseNode base=nn.getChild("base");
917     ParseNode id=nn.getChild("identifier");
918     if (base==null) {
919       return new NameDescriptor(id.getTerminal());
920     }
921     return new NameDescriptor(parseName(base.getChild("name")),id.getTerminal());
922   }
923
924   private void parseFlagDecl(ClassDescriptor cn,ParseNode pn) {
925     String name=pn.getChild("name").getTerminal();
926     FlagDescriptor flag=new FlagDescriptor(name);
927     if (pn.getChild("external")!=null)
928       flag.makeExternal();
929     cn.addFlag(flag);
930   }
931
932   private void parseFieldDecl(ClassDescriptor cn,ParseNode pn) {
933     ParseNode mn=pn.getChild("modifier");
934     Modifiers m=parseModifiersList(mn);
935     if(cn.isInterface()) {
936       // TODO add version for normal Java later
937       // Can only be PUBLIC or STATIC or FINAL
938       if((m.isAbstract()) || (m.isAtomic()) || (m.isNative())
939          || (m.isSynchronized())) {
940         throw new Error("Error: field in Interface " + cn.getSymbol() + "can only be PUBLIC or STATIC or FINAL");
941       }
942       m.addModifier(Modifiers.PUBLIC);
943       m.addModifier(Modifiers.STATIC);
944       m.addModifier(Modifiers.FINAL);
945     }
946
947     ParseNode tn=pn.getChild("type");
948     TypeDescriptor t=parseTypeDescriptor(tn);
949     ParseNode vn=pn.getChild("variables").getChild("variable_declarators_list");
950     ParseNodeVector pnv=vn.getChildren();
951     boolean isglobal=pn.getChild("global")!=null;
952
953     for(int i=0; i<pnv.size(); i++) {
954       ParseNode vardecl=pnv.elementAt(i);
955       ParseNode tmp=vardecl;
956       TypeDescriptor arrayt=t;
957        if( this.isRunningRecursiveInnerClass && false )
958         {       
959                 System.out.println( "the length of the list is " + String.valueOf( pnv.size() ) );
960                 System.out.println( "\n the parse node is \n" + tmp.PPrint( 0, true ) );
961         }
962       while (tmp.getChild("single")==null) {
963         arrayt=arrayt.makeArray(state);
964         tmp=tmp.getChild("array");
965       }
966       String identifier=tmp.getChild("single").getTerminal();
967       ParseNode epn=vardecl.getChild("initializer");
968
969       ExpressionNode en=null;
970       
971       if (epn!=null) {
972         en=parseExpression(epn.getFirstChild());
973         en.setNumLine(epn.getFirstChild().getLine());
974         if(m.isStatic()) {
975           // for static field, the initializer should be considered as a
976           // static block
977           boolean isfirst = false;
978           MethodDescriptor md = (MethodDescriptor)cn.getMethodTable().getFromSameScope("staticblocks");
979           if(md == null) {
980             // the first static block for this class
981             Modifiers m_i=new Modifiers();
982             m_i.addModifier(Modifiers.STATIC);
983             md = new MethodDescriptor(m_i, "staticblocks", false);
984             md.setAsStaticBlock();
985             isfirst = true;
986           }
987           if(isfirst) {
988             cn.addMethod(md);
989           }
990           cn.incStaticBlocks();
991           BlockNode bn=new BlockNode();
992           NameNode nn=new NameNode(new NameDescriptor(identifier));
993           nn.setNumLine(en.getNumLine());
994           AssignmentNode an=new AssignmentNode(nn,en,new AssignOperation(1));
995           an.setNumLine(pn.getLine());
996           bn.addBlockStatement(new BlockExpressionNode(an));
997           if(isfirst) {
998             state.addTreeCode(md,bn);
999           } else {
1000             BlockNode obn = state.getMethodBody(md);
1001             for(int ii = 0; ii < bn.size(); ii++) {
1002               BlockStatementNode bsn = bn.get(ii);
1003               obn.addBlockStatement(bsn);
1004             }
1005             state.addTreeCode(md, obn);
1006             bn = null;
1007           }
1008           en = null;
1009         }
1010       }
1011
1012       cn.addField(new FieldDescriptor(m, arrayt, identifier, en, isglobal));
1013       assignAnnotationsToType(m,arrayt);
1014     }
1015   }
1016
1017   private void assignAnnotationsToType(Modifiers modifiers, TypeDescriptor type) {
1018     Vector<AnnotationDescriptor> annotations=modifiers.getAnnotations();
1019     for(int i=0; i<annotations.size(); i++) {
1020       // it only supports a marker annotation
1021       AnnotationDescriptor an=annotations.elementAt(i);
1022       type.addAnnotationMarker(an);
1023     }
1024   }
1025
1026   int innerCount=0;
1027
1028   private ExpressionNode parseExpression(ParseNode pn) {
1029     if (isNode(pn,"assignment"))
1030         {
1031           //System.out.println( "parsing a field decl in my class that has assignment in initialization " + pn.PPrint( 0, true ) + "\n");
1032       return parseAssignmentExpression(pn);
1033         }
1034     else if (isNode(pn,"logical_or")||isNode(pn,"logical_and")||
1035              isNode(pn,"bitwise_or")||isNode(pn,"bitwise_xor")||
1036              isNode(pn,"bitwise_and")||isNode(pn,"equal")||
1037              isNode(pn,"not_equal")||isNode(pn,"comp_lt")||
1038              isNode(pn,"comp_lte")||isNode(pn,"comp_gt")||
1039              isNode(pn,"comp_gte")||isNode(pn,"leftshift")||
1040              isNode(pn,"rightshift")||isNode(pn,"sub")||
1041              isNode(pn,"urightshift")||isNode(pn,"sub")||
1042              isNode(pn,"add")||isNode(pn,"mult")||
1043              isNode(pn,"div")||isNode(pn,"mod")) {
1044       ParseNodeVector pnv=pn.getChildren();
1045       ParseNode left=pnv.elementAt(0);
1046       ParseNode right=pnv.elementAt(1);
1047       Operation op=new Operation(pn.getLabel());
1048       OpNode on=new OpNode(parseExpression(left),parseExpression(right),op);
1049       on.setNumLine(pn.getLine());
1050       return on;
1051     } else if (isNode(pn,"unaryplus")||
1052                isNode(pn,"unaryminus")||
1053                isNode(pn,"not")||
1054                isNode(pn,"comp")) {
1055       ParseNode left=pn.getFirstChild();
1056       Operation op=new Operation(pn.getLabel());
1057       OpNode on=new OpNode(parseExpression(left),op);
1058       on.setNumLine(pn.getLine());
1059       return on;
1060     } else if (isNode(pn,"postinc")||
1061                isNode(pn,"postdec")) {
1062       ParseNode left=pn.getFirstChild();
1063       AssignOperation op=new AssignOperation(pn.getLabel());
1064       AssignmentNode an=new AssignmentNode(parseExpression(left),null,op);
1065       an.setNumLine(pn.getLine());
1066       return an;
1067
1068     } else if (isNode(pn,"preinc")||
1069                isNode(pn,"predec")) {
1070       ParseNode left=pn.getFirstChild();
1071       AssignOperation op=isNode(pn,"preinc")?new AssignOperation(AssignOperation.PLUSEQ):new AssignOperation(AssignOperation.MINUSEQ);
1072       AssignmentNode an=new AssignmentNode(parseExpression(left),
1073                                            new LiteralNode("integer",new Integer(1)),op);
1074       an.setNumLine(pn.getLine());
1075       return an;
1076     } else if (isNode(pn,"literal")) {
1077       String literaltype=pn.getTerminal();
1078       ParseNode literalnode=pn.getChild(literaltype);
1079       Object literal_obj=literalnode.getLiteral();
1080       LiteralNode ln=new LiteralNode(literaltype, literal_obj);
1081       ln.setNumLine(pn.getLine());
1082       return ln;
1083     } else if (isNode(pn, "createobject")) {
1084       TypeDescriptor td = parseTypeDescriptor(pn);
1085
1086       Vector args = parseArgumentList(pn);
1087       boolean isglobal = pn.getChild("global") != null || pn.getChild("scratch") != null;
1088       String disjointId = null;
1089       if (pn.getChild("disjoint") != null) {
1090         disjointId = pn.getChild("disjoint").getTerminal();
1091       }
1092       ParseNode idChild = (pn.getChild( "id" ));
1093       ParseNode baseChild = (pn.getChild( "base" ));
1094       
1095       CreateObjectNode con = new CreateObjectNode(td, isglobal, disjointId);
1096       if( null != idChild && null != idChild.getFirstChild() ) {
1097         idChild = idChild.getFirstChild();
1098         //System.out.println( "\nThe object passed has this expression " + idChild.PPrint( 0, true ) );
1099         ExpressionNode en = parseExpression( idChild ); 
1100         //System.out.println( "\nThe object passed has this expression " + en.printNode( 0 ) );
1101         con.setSurroundingExpression( en );
1102       }
1103       else if( null != baseChild  && null != baseChild.getFirstChild()  ) {
1104         baseChild = baseChild.getFirstChild();
1105         //System.out.println( "\nThe object passed has this expression " + baseChild.PPrint( 0, true ) );
1106         ExpressionNode en = parseExpression( baseChild ); 
1107         //System.out.println( "\nThe object passed has this expression " + en.printNode( 0 ) );
1108         con.setSurroundingExpression( en );     
1109       }
1110       con.setNumLine(pn.getLine());
1111       for (int i = 0; i < args.size(); i++) {
1112         con.addArgument((ExpressionNode) args.get(i));
1113       }
1114       /* Could have flag set or tag added here */
1115       if (pn.getChild("flag_list") != null || pn.getChild("tag_list") != null) {
1116         FlagEffects fe = new FlagEffects(null);
1117         if (pn.getChild("flag_list") != null)
1118           parseFlagEffect(fe, pn.getChild("flag_list"));
1119
1120         if (pn.getChild("tag_list") != null)
1121           parseTagEffect(fe, pn.getChild("tag_list"));
1122         con.addFlagEffects(fe);
1123       }
1124
1125       return con;
1126     } else if (isNode(pn,"createobjectcls")) {
1127       //TODO:::  FIX BUG!!!  static fields in caller context need to become parameters
1128       //TODO::: caller context need to be passed in here
1129       TypeDescriptor td=parseTypeDescriptor(pn);
1130       innerCount++;
1131       ClassDescriptor cnnew=new ClassDescriptor(packageName,td.getSymbol()+"$"+innerCount, false);
1132       pushChainMaps();
1133       cnnew.setImports(mandatoryImports, multiimports);
1134       cnnew.setSuper(td.getSymbol());
1135       cnnew.setInline();
1136       parseClassBody(cnnew, pn.getChild("decl").getChild("classbody"));
1137       TypeDescriptor tdnew=state.getTypeDescriptor(cnnew.getSymbol());
1138
1139       Vector args=parseArgumentList(pn);
1140       ParseNode idChild = pn.getChild( "id" );
1141       ParseNode baseChild = pn.getChild( "base" );
1142       //System.out.println("\n to print idchild and basechild for ");
1143       /*if( null != idChild )
1144         System.out.println( "\n trying to create an inner class and the id child passed is "  + idChild.PPrint( 0, true ) );
1145       if( null != baseChild )
1146         System.out.println( "\n trying to create an inner class and the base child passed is "  + baseChild.PPrint( 0, true ) );*/
1147       CreateObjectNode con=new CreateObjectNode(tdnew, false, null);
1148       con.setNumLine(pn.getLine());
1149       for(int i=0; i<args.size(); i++) {
1150         con.addArgument((ExpressionNode)args.get(i));
1151       }
1152       popChainMaps();
1153
1154       if (analyzeset != null)
1155         analyzeset.add(cnnew);
1156       cnnew.setSourceFileName(currsourcefile);
1157       state.addClass(cnnew);
1158
1159       return con;
1160     } else if (isNode(pn,"createarray")) {
1161       //System.out.println(pn.PPrint(3,true));
1162       boolean isglobal=pn.getChild("global")!=null||
1163                         pn.getChild("scratch")!=null;
1164       String disjointId=null;
1165       if( pn.getChild("disjoint") != null) {
1166         disjointId = pn.getChild("disjoint").getTerminal();
1167       }
1168       TypeDescriptor td=parseTypeDescriptor(pn);
1169       Vector args=parseDimExprs(pn);
1170       int num=0;
1171       if (pn.getChild("dims_opt").getLiteral()!=null)
1172         num=((Integer)pn.getChild("dims_opt").getLiteral()).intValue();
1173       for(int i=0; i<(args.size()+num); i++)
1174         td=td.makeArray(state);
1175       CreateObjectNode con=new CreateObjectNode(td, isglobal, disjointId);
1176       con.setNumLine(pn.getLine());
1177       for(int i=0; i<args.size(); i++) {
1178         con.addArgument((ExpressionNode)args.get(i));
1179       }
1180       return con;
1181     }
1182     if (isNode(pn,"createarray2")) {
1183       TypeDescriptor td=parseTypeDescriptor(pn);
1184       int num=0;
1185       if (pn.getChild("dims_opt").getLiteral()!=null)
1186         num=((Integer)pn.getChild("dims_opt").getLiteral()).intValue();
1187       for(int i=0; i<num; i++)
1188         td=td.makeArray(state);
1189       CreateObjectNode con=new CreateObjectNode(td, false, null);
1190       con.setNumLine(pn.getLine());
1191       ParseNode ipn = pn.getChild("initializer");
1192       Vector initializers=parseVariableInitializerList(ipn);
1193       ArrayInitializerNode ain = new ArrayInitializerNode(initializers);
1194       ain.setNumLine(pn.getLine());
1195       con.addArrayInitializer(ain);
1196       return con;
1197     } else if (isNode(pn,"name")) {
1198       NameDescriptor nd=parseName(pn);
1199       NameNode nn=new NameNode(nd);
1200       nn.setNumLine(pn.getLine());
1201       return nn;
1202     } else if (isNode(pn,"this")) {
1203       NameDescriptor nd=new NameDescriptor("this");
1204       NameNode nn=new NameNode(nd);
1205       nn.setNumLine(pn.getLine());
1206       return nn;
1207     } else if (isNode(pn,"parentclass")) {
1208       NameDescriptor nd=new NameDescriptor(pn.getChild("name").getFirstChild().getFirstChild().getTerminal());
1209       NameNode nn=new NameNode(nd);
1210       nn.setNumLine(pn.getLine());
1211         //because inner classes pass right thru......
1212       FieldAccessNode fan=new FieldAccessNode(nn,"this");
1213       fan.setNumLine(pn.getLine());
1214       return fan;
1215     } else if (isNode(pn,"isavailable")) {
1216       NameDescriptor nd=new NameDescriptor(pn.getTerminal());
1217       NameNode nn=new NameNode(nd);
1218       nn.setNumLine(pn.getLine());
1219       return new OpNode(nn,null,new Operation(Operation.ISAVAILABLE));
1220     } else if (isNode(pn,"methodinvoke1")) {
1221       NameDescriptor nd=parseName(pn.getChild("name"));
1222       Vector args=parseArgumentList(pn);
1223       MethodInvokeNode min=new MethodInvokeNode(nd);
1224       min.setNumLine(pn.getLine());
1225       for(int i=0; i<args.size(); i++) {
1226         min.addArgument((ExpressionNode)args.get(i));
1227       }
1228       return min;
1229     } else if (isNode(pn,"methodinvoke2")) {
1230       String methodid=pn.getChild("id").getTerminal();
1231       ExpressionNode exp=parseExpression(pn.getChild("base").getFirstChild());
1232       Vector args=parseArgumentList(pn);
1233       MethodInvokeNode min=new MethodInvokeNode(methodid,exp);
1234       min.setNumLine(pn.getLine());
1235       for(int i=0; i<args.size(); i++) {
1236         min.addArgument((ExpressionNode)args.get(i));
1237       }
1238       return min;
1239     } else if (isNode(pn,"fieldaccess")) {
1240       ExpressionNode en=parseExpression(pn.getChild("base").getFirstChild());
1241       String fieldname=pn.getChild("field").getTerminal();
1242
1243       FieldAccessNode fan=new FieldAccessNode(en,fieldname);
1244       fan.setNumLine(pn.getLine());
1245       return fan;
1246     } else if (isNode(pn,"superfieldaccess")) {
1247         ExpressionNode en=new NameNode(new NameDescriptor("super"));
1248         String fieldname=pn.getChild("field").getTerminal();
1249
1250         FieldAccessNode fan=new FieldAccessNode(en,fieldname);
1251         fan.setNumLine(pn.getLine());
1252         return fan;
1253     } else if (isNode(pn,"supernamefieldaccess")) {
1254         ExpressionNode en=parseExpression(pn.getChild("base").getFirstChild());
1255         ExpressionNode exp = new FieldAccessNode(en, "super");
1256         exp.setNumLine(pn.getLine());
1257         String fieldname=pn.getChild("field").getTerminal();
1258
1259         FieldAccessNode fan=new FieldAccessNode(exp,fieldname);
1260         fan.setNumLine(pn.getLine());
1261         return fan;
1262     } else if (isNode(pn,"arrayaccess")) {
1263       ExpressionNode en=parseExpression(pn.getChild("base").getFirstChild());
1264       ExpressionNode index=parseExpression(pn.getChild("index").getFirstChild());
1265       ArrayAccessNode aan=new ArrayAccessNode(en,index);
1266       aan.setNumLine(pn.getLine());
1267       return aan;
1268     } else if (isNode(pn,"cast1")) {
1269       try {
1270         CastNode cn=new CastNode(parseTypeDescriptor(pn.getChild("type")),parseExpression(pn.getChild("exp").getFirstChild()));
1271         cn.setNumLine(pn.getLine());
1272         return cn;
1273       } catch (Exception e) {
1274         System.out.println(pn.PPrint(1,true));
1275         e.printStackTrace();
1276         throw new Error();
1277       }
1278     } else if (isNode(pn,"cast2")) {
1279       CastNode cn=new CastNode(parseExpression(pn.getChild("type").getFirstChild()),parseExpression(pn.getChild("exp").getFirstChild()));
1280       cn.setNumLine(pn.getLine());
1281       return cn;
1282     } else if (isNode(pn, "getoffset")) {
1283       TypeDescriptor td=parseTypeDescriptor(pn);
1284       String fieldname = pn.getChild("field").getTerminal();
1285       //System.out.println("Checking the values of: "+ " td.toString()= " + td.toString()+ "  fieldname= " + fieldname);
1286       return new OffsetNode(td, fieldname);
1287     } else if (isNode(pn, "tert")) {
1288
1289       TertiaryNode tn=new TertiaryNode(parseExpression(pn.getChild("cond").getFirstChild()),
1290                                        parseExpression(pn.getChild("trueexpr").getFirstChild()),
1291                                        parseExpression(pn.getChild("falseexpr").getFirstChild()) );
1292       tn.setNumLine(pn.getLine());
1293
1294       return tn;
1295     } else if (isNode(pn, "instanceof")) {
1296       ExpressionNode exp=parseExpression(pn.getChild("exp").getFirstChild());
1297       TypeDescriptor t=parseTypeDescriptor(pn);
1298       InstanceOfNode ion=new InstanceOfNode(exp,t);
1299       ion.setNumLine(pn.getLine());
1300       return ion;
1301     } else if (isNode(pn, "array_initializer")) {
1302       Vector initializers=parseVariableInitializerList(pn);
1303       return new ArrayInitializerNode(initializers);
1304     } else if (isNode(pn, "class_type")) {
1305       TypeDescriptor td=parseTypeDescriptor(pn);
1306       ClassTypeNode ctn=new ClassTypeNode(td);
1307       ctn.setNumLine(pn.getLine());
1308       return ctn;
1309     } else if (isNode(pn, "empty")) {
1310       return null;
1311     } else {
1312       System.out.println("---------------------");
1313       System.out.println(pn.PPrint(3,true));
1314       throw new Error();
1315     }
1316   }
1317
1318   private Vector parseDimExprs(ParseNode pn) {
1319     Vector arglist=new Vector();
1320     ParseNode an=pn.getChild("dim_exprs");
1321     if (an==null)       /* No argument list */
1322       return arglist;
1323     ParseNodeVector anv=an.getChildren();
1324     for(int i=0; i<anv.size(); i++) {
1325       arglist.add(parseExpression(anv.elementAt(i)));
1326     }
1327     return arglist;
1328   }
1329
1330   private Vector parseArgumentList(ParseNode pn) {
1331     Vector arglist=new Vector();
1332     ParseNode an=pn.getChild("argument_list");
1333     if (an==null)       /* No argument list */
1334       return arglist;
1335     ParseNodeVector anv=an.getChildren();
1336     for(int i=0; i<anv.size(); i++) {
1337       arglist.add(parseExpression(anv.elementAt(i)));
1338     }
1339     return arglist;
1340   }
1341
1342   private Vector[] parseConsArgumentList(ParseNode pn) {
1343     Vector arglist=new Vector();
1344     Vector varlist=new Vector();
1345     ParseNode an=pn.getChild("cons_argument_list");
1346     if (an==null)       /* No argument list */
1347       return new Vector[] {varlist, arglist};
1348     ParseNodeVector anv=an.getChildren();
1349     for(int i=0; i<anv.size(); i++) {
1350       ParseNode cpn=anv.elementAt(i);
1351       ParseNode var=cpn.getChild("var");
1352       ParseNode exp=cpn.getChild("exp").getFirstChild();
1353       varlist.add(var.getTerminal());
1354       arglist.add(parseExpression(exp));
1355     }
1356     return new Vector[] {varlist, arglist};
1357   }
1358
1359   private Vector parseVariableInitializerList(ParseNode pn) {
1360     Vector varInitList=new Vector();
1361     ParseNode vin=pn.getChild("var_init_list");
1362     if (vin==null)       /* No argument list */
1363       return varInitList;
1364     ParseNodeVector vinv=vin.getChildren();
1365     for(int i=0; i<vinv.size(); i++) {
1366       varInitList.add(parseExpression(vinv.elementAt(i)));
1367     }
1368     return varInitList;
1369   }
1370
1371   private ExpressionNode parseAssignmentExpression(ParseNode pn) {
1372     AssignOperation ao=new AssignOperation(pn.getChild("op").getTerminal());
1373     ParseNodeVector pnv=pn.getChild("args").getChildren();
1374
1375     AssignmentNode an=new AssignmentNode(parseExpression(pnv.elementAt(0)),parseExpression(pnv.elementAt(1)),ao);
1376     an.setNumLine(pn.getLine());
1377     return an;
1378   }
1379
1380
1381   private void parseMethodDecl(ClassDescriptor cn, ParseNode pn) {
1382     ParseNode headern=pn.getChild("method_header");
1383     ParseNode bodyn=pn.getChild("body");
1384     MethodDescriptor md=parseMethodHeader(headern);
1385     try {
1386       BlockNode bn=parseBlock(bodyn);
1387       bn.setNumLine(pn.getLine()); // assume that method header is located at the beginning of method body
1388       cn.addMethod(md);
1389       state.addTreeCode(md,bn);
1390
1391       // this is a hack for investigating new language features
1392       // at the AST level, someday should evolve into a nice compiler
1393       // option *wink*
1394       //if( cn.getSymbol().equals( ***put a class in here like:     "Test" ) &&
1395       //    md.getSymbol().equals( ***put your method in here like: "main" )
1396       //) {
1397       //  bn.setStyle( BlockNode.NORMAL );
1398       //  System.out.println( bn.printNode( 0 ) );
1399       //}
1400
1401     } catch (Exception e) {
1402       System.out.println("Error with method:"+md.getSymbol());
1403       e.printStackTrace();
1404       throw new Error();
1405     } catch (Error e) {
1406       System.out.println("Error with method:"+md.getSymbol());
1407       e.printStackTrace();
1408       throw new Error();
1409     }
1410   }
1411
1412   private void parseConstructorDecl(ClassDescriptor cn, ParseNode pn) {
1413     ParseNode mn=pn.getChild("modifiers");
1414     Modifiers m=parseModifiersList(mn);
1415     ParseNode cdecl=pn.getChild("constructor_declarator");
1416     boolean isglobal=cdecl.getChild("global")!=null;
1417     String name=resolveName(cn.getSymbol());
1418     MethodDescriptor md=new MethodDescriptor(m, name, isglobal);
1419     ParseNode paramnode=cdecl.getChild("parameters");
1420     parseParameterList(md,paramnode);
1421     ParseNode bodyn0=pn.getChild("body");
1422     ParseNode bodyn=bodyn0.getChild("constructor_body");
1423     cn.addMethod(md);
1424     BlockNode bn=null;
1425     if (bodyn!=null&&bodyn.getChild("block_statement_list")!=null)
1426       bn=parseBlock(bodyn);
1427     else
1428       bn=new BlockNode();
1429     if (bodyn!=null&&bodyn.getChild("superinvoke")!=null) {
1430       ParseNode sin=bodyn.getChild("superinvoke");
1431       NameDescriptor nd=new NameDescriptor("super");
1432       Vector args=parseArgumentList(sin);
1433       MethodInvokeNode min=new MethodInvokeNode(nd);
1434       min.setNumLine(sin.getLine());
1435       for(int i=0; i<args.size(); i++) {
1436         min.addArgument((ExpressionNode)args.get(i));
1437       }
1438       BlockExpressionNode ben=new BlockExpressionNode(min);
1439       bn.addFirstBlockStatement(ben);
1440
1441     } else if (bodyn!=null&&bodyn.getChild("explconstrinv")!=null) {
1442       ParseNode eci=bodyn.getChild("explconstrinv");
1443       NameDescriptor nd=new NameDescriptor(cn.getSymbol());
1444       Vector args=parseArgumentList(eci);
1445       MethodInvokeNode min=new MethodInvokeNode(nd);
1446       min.setNumLine(eci.getLine());
1447       for(int i=0; i<args.size(); i++) {
1448         min.addArgument((ExpressionNode)args.get(i));
1449       }
1450       BlockExpressionNode ben=new BlockExpressionNode(min);
1451       ben.setNumLine(eci.getLine());
1452       bn.addFirstBlockStatement(ben);
1453     }
1454     state.addTreeCode(md,bn);
1455   }
1456
1457   private void parseStaticBlockDecl(ClassDescriptor cn, ParseNode pn) {
1458     // Each class maintains one MethodDecscriptor which combines all its
1459     // static blocks in their declaration order
1460     boolean isfirst = false;
1461     MethodDescriptor md = (MethodDescriptor)cn.getMethodTable().getFromSameScope("staticblocks");
1462     if(md == null) {
1463       // the first static block for this class
1464       Modifiers m_i=new Modifiers();
1465       m_i.addModifier(Modifiers.STATIC);
1466       md = new MethodDescriptor(m_i, "staticblocks", false);
1467       md.setAsStaticBlock();
1468       isfirst = true;
1469     }
1470     ParseNode bodyn=pn.getChild("body");
1471     if(isfirst) {
1472       cn.addMethod(md);
1473     }
1474     cn.incStaticBlocks();
1475     BlockNode bn=null;
1476     if (bodyn!=null&&bodyn.getChild("block_statement_list")!=null)
1477       bn=parseBlock(bodyn);
1478     else
1479       bn=new BlockNode();
1480     if(isfirst) {
1481       state.addTreeCode(md,bn);
1482     } else {
1483       BlockNode obn = state.getMethodBody(md);
1484       for(int i = 0; i < bn.size(); i++) {
1485         BlockStatementNode bsn = bn.get(i);
1486         obn.addBlockStatement(bsn);
1487       }
1488       state.addTreeCode(md, obn);
1489       bn = null;
1490     }
1491   }
1492
1493   public BlockNode parseBlock(ParseNode pn) {
1494     this.m_taskexitnum = 0;
1495     if (pn==null||isEmpty(pn.getTerminal()))
1496       return new BlockNode();
1497     ParseNode bsn=pn.getChild("block_statement_list");
1498     return parseBlockHelper(bsn);
1499   }
1500
1501   private BlockNode parseBlockHelper(ParseNode pn) {
1502     ParseNodeVector pnv=pn.getChildren();
1503     BlockNode bn=new BlockNode();
1504     for(int i=0; i<pnv.size(); i++) {
1505       Vector bsv=parseBlockStatement(pnv.elementAt(i));
1506       for(int j=0; j<bsv.size(); j++) {
1507         bn.addBlockStatement((BlockStatementNode)bsv.get(j));
1508       }
1509     }
1510     return bn;
1511   }
1512
1513   public BlockNode parseSingleBlock(ParseNode pn, String label){
1514     BlockNode bn=new BlockNode();
1515     Vector bsv=parseBlockStatement(pn,label);
1516     for(int j=0; j<bsv.size(); j++) {
1517       bn.addBlockStatement((BlockStatementNode)bsv.get(j));
1518     }
1519     bn.setStyle(BlockNode.NOBRACES);
1520     return bn;
1521   }
1522   
1523   public BlockNode parseSingleBlock(ParseNode pn) {
1524     return parseSingleBlock(pn,null);
1525   }
1526
1527   public Vector parseSESEBlock(Vector parentbs, ParseNode pn) {
1528     ParseNodeVector pnv=pn.getChildren();
1529     Vector bv=new Vector();
1530     for(int i=0; i<pnv.size(); i++) {
1531       bv.addAll(parseBlockStatement(pnv.elementAt(i)));
1532     }
1533     return bv;
1534   }
1535   
1536   public Vector parseBlockStatement(ParseNode pn){
1537     return parseBlockStatement(pn,null);
1538   }
1539
1540   public Vector parseBlockStatement(ParseNode pn, String label) {
1541     Vector blockstatements=new Vector();
1542     if (isNode(pn,"tag_declaration")) {
1543       String name=pn.getChild("single").getTerminal();
1544       String type=pn.getChild("type").getTerminal();
1545
1546       TagDeclarationNode tdn=new TagDeclarationNode(name, type);
1547       tdn.setNumLine(pn.getLine());
1548
1549       blockstatements.add(tdn);
1550     } else if (isNode(pn,"local_variable_declaration")) {
1551
1552       TypeDescriptor t=parseTypeDescriptor(pn);
1553       ParseNode vn=pn.getChild("variable_declarators_list");
1554       ParseNodeVector pnv=vn.getChildren();
1555       for(int i=0; i<pnv.size(); i++) {
1556         ParseNode vardecl=pnv.elementAt(i);
1557
1558
1559         ParseNode tmp=vardecl;
1560         TypeDescriptor arrayt=t;
1561
1562         while (tmp.getChild("single")==null) {
1563           arrayt=arrayt.makeArray(state);
1564           tmp=tmp.getChild("array");
1565         }
1566         String identifier=tmp.getChild("single").getTerminal();
1567
1568         ParseNode epn=vardecl.getChild("initializer");
1569
1570
1571         ExpressionNode en=null;
1572         if (epn!=null)
1573           en=parseExpression(epn.getFirstChild());
1574
1575         DeclarationNode dn=new DeclarationNode(new VarDescriptor(arrayt, identifier),en);
1576         dn.setNumLine(tmp.getLine());
1577         
1578         ParseNode mn=pn.getChild("modifiers");
1579         if(mn!=null) {
1580           // here, modifers parse node has the list of annotations
1581           Modifiers m=parseModifiersList(mn);
1582           assignAnnotationsToType(m, arrayt);
1583         }
1584
1585         blockstatements.add(dn);
1586       }
1587     } else if (isNode(pn,"nop")) {
1588       /* Do Nothing */
1589     } else if (isNode(pn,"expression")) {
1590       BlockExpressionNode ben=new BlockExpressionNode(parseExpression(pn.getFirstChild()));
1591       ben.setNumLine(pn.getLine());
1592       blockstatements.add(ben);
1593     } else if (isNode(pn,"ifstatement")) {
1594       IfStatementNode isn=new IfStatementNode(parseExpression(pn.getChild("condition").getFirstChild()),
1595                                               parseSingleBlock(pn.getChild("statement").getFirstChild()),
1596                                               pn.getChild("else_statement")!=null?parseSingleBlock(pn.getChild("else_statement").getFirstChild()):null);
1597       isn.setNumLine(pn.getLine());
1598
1599       blockstatements.add(isn);
1600     } else if (isNode(pn,"switch_statement")) {
1601       // TODO add version for normal Java later
1602       SwitchStatementNode ssn=new SwitchStatementNode(parseExpression(pn.getChild("condition").getFirstChild()),
1603                                                       parseSingleBlock(pn.getChild("statement").getFirstChild()));
1604       ssn.setNumLine(pn.getLine());
1605       blockstatements.add(ssn);
1606     } else if (isNode(pn,"switch_block_list")) {
1607       // TODO add version for normal Java later
1608       ParseNodeVector pnv=pn.getChildren();
1609       for(int i=0; i<pnv.size(); i++) {
1610         ParseNode sblockdecl=pnv.elementAt(i);
1611
1612         if(isNode(sblockdecl, "switch_block")) {
1613           ParseNode lpn=sblockdecl.getChild("switch_labels").getChild("switch_label_list");
1614           ParseNodeVector labelv=lpn.getChildren();
1615           Vector<SwitchLabelNode> slv = new Vector<SwitchLabelNode>();
1616           for(int j=0; j<labelv.size(); j++) {
1617             ParseNode labeldecl=labelv.elementAt(j);
1618             if(isNode(labeldecl, "switch_label")) {
1619               SwitchLabelNode sln=new SwitchLabelNode(parseExpression(labeldecl.getChild("constant_expression").getFirstChild()), false);
1620               sln.setNumLine(labeldecl.getLine());
1621               slv.addElement(sln);
1622             } else if(isNode(labeldecl, "default_switch_label")) {
1623               SwitchLabelNode sln=new SwitchLabelNode(null, true);
1624               sln.setNumLine(labeldecl.getLine());
1625               slv.addElement(sln);
1626             }
1627           }
1628
1629           SwitchBlockNode sbn=new SwitchBlockNode(slv,
1630                                                   parseSingleBlock(sblockdecl.getChild("switch_statements").getFirstChild()));
1631           sbn.setNumLine(sblockdecl.getLine());
1632
1633           blockstatements.add(sbn);
1634
1635         }
1636       }
1637     } else if (isNode(pn, "trycatchstatement")) {
1638       // TODO add version for normal Java later
1639       // Do not fully support exceptions now. Only make sure that if there are no
1640       // exceptions thrown, the execution is right
1641       ParseNode tpn = pn.getChild("tryblock").getFirstChild();
1642       BlockNode bn=parseBlockHelper(tpn);
1643       blockstatements.add(new SubBlockNode(bn));
1644
1645       ParseNode fbk = pn.getChild("finallyblock");
1646       if(fbk != null) {
1647         ParseNode fpn = fbk.getFirstChild();
1648         BlockNode fbn=parseBlockHelper(fpn);
1649         blockstatements.add(new SubBlockNode(fbn));
1650       }
1651     } else if (isNode(pn, "throwstatement")) {
1652       // TODO Simply return here
1653       //blockstatements.add(new ReturnNode());
1654     } else if (isNode(pn,"taskexit")) {
1655       Vector vfe=null;
1656       if (pn.getChild("flag_effects_list")!=null)
1657         vfe=parseFlags(pn.getChild("flag_effects_list"));
1658       Vector ccs=null;
1659       if (pn.getChild("cons_checks")!=null)
1660         ccs=parseChecks(pn.getChild("cons_checks"));
1661       TaskExitNode ten=new TaskExitNode(vfe, ccs, this.m_taskexitnum++);
1662       ten.setNumLine(pn.getLine());
1663       blockstatements.add(ten);
1664     } else if (isNode(pn,"atomic")) {
1665       BlockNode bn=parseBlockHelper(pn);
1666       AtomicNode an=new AtomicNode(bn);
1667       an.setNumLine(pn.getLine());
1668       blockstatements.add(an);
1669     } else if (isNode(pn,"synchronized")) {
1670       BlockNode bn=parseBlockHelper(pn.getChild("block"));
1671       ExpressionNode en=parseExpression(pn.getChild("expr").getFirstChild());
1672       SynchronizedNode sn=new SynchronizedNode(en, bn);
1673       sn.setNumLine(pn.getLine());
1674       blockstatements.add(sn);
1675     } else if (isNode(pn,"return")) {
1676       if (isEmpty(pn.getTerminal()))
1677         blockstatements.add(new ReturnNode());
1678       else {
1679         ExpressionNode en=parseExpression(pn.getFirstChild());
1680         ReturnNode rn=new ReturnNode(en);
1681         rn.setNumLine(pn.getLine());
1682         blockstatements.add(rn);
1683       }
1684     } else if (isNode(pn,"block_statement_list")) {
1685       BlockNode bn=parseBlockHelper(pn);
1686       blockstatements.add(new SubBlockNode(bn));
1687     } else if (isNode(pn,"empty")) {
1688       /* nop */
1689     } else if (isNode(pn,"statement_expression_list")) {
1690       ParseNodeVector pnv=pn.getChildren();
1691       BlockNode bn=new BlockNode();
1692       for(int i=0; i<pnv.size(); i++) {
1693         ExpressionNode en=parseExpression(pnv.elementAt(i));
1694         blockstatements.add(new BlockExpressionNode(en));
1695       }
1696       bn.setStyle(BlockNode.EXPRLIST);
1697     } else if (isNode(pn,"forstatement")) {
1698       BlockNode init=parseSingleBlock(pn.getChild("initializer").getFirstChild());
1699       BlockNode update=parseSingleBlock(pn.getChild("update").getFirstChild());
1700       ExpressionNode condition=parseExpression(pn.getChild("condition").getFirstChild());
1701       BlockNode body=parseSingleBlock(pn.getChild("statement").getFirstChild());
1702       if(condition == null) {
1703         // no condition clause, make a 'true' expression as the condition
1704         condition = (ExpressionNode) new LiteralNode("boolean", new Boolean(true));
1705       }
1706       LoopNode ln=new LoopNode(init,condition,update,body,label);
1707       ln.setNumLine(pn.getLine());
1708       blockstatements.add(ln);
1709     } else if (isNode(pn,"whilestatement")) {
1710       ExpressionNode condition=parseExpression(pn.getChild("condition").getFirstChild());
1711       BlockNode body=parseSingleBlock(pn.getChild("statement").getFirstChild());
1712       if(condition == null) {
1713         // no condition clause, make a 'true' expression as the condition
1714         condition = (ExpressionNode) new LiteralNode("boolean", new Boolean(true));
1715       }
1716       blockstatements.add(new LoopNode(condition,body,LoopNode.WHILELOOP,label));
1717     } else if (isNode(pn,"dowhilestatement")) {
1718       ExpressionNode condition=parseExpression(pn.getChild("condition").getFirstChild());
1719       BlockNode body=parseSingleBlock(pn.getChild("statement").getFirstChild());
1720       if(condition == null) {
1721         // no condition clause, make a 'true' expression as the condition
1722         condition = (ExpressionNode) new LiteralNode("boolean", new Boolean(true));
1723       }
1724       blockstatements.add(new LoopNode(condition,body,LoopNode.DOWHILELOOP,label));
1725     } else if (isNode(pn,"sese")) {
1726       ParseNode pnID=pn.getChild("identifier");
1727       String stID=null;
1728       if( pnID != null ) {
1729         stID=pnID.getFirstChild().getTerminal();
1730       }
1731       SESENode start=new SESENode(stID);
1732       start.setNumLine(pn.getLine());
1733       SESENode end  =new SESENode(stID);
1734       start.setEnd(end);
1735       end.setStart(start);
1736       blockstatements.add(start);
1737       blockstatements.addAll(parseSESEBlock(blockstatements,pn.getChild("body").getFirstChild()));
1738       blockstatements.add(end);
1739     } else if (isNode(pn,"continue")) {
1740       ContinueBreakNode cbn=new ContinueBreakNode(false);
1741       cbn.setNumLine(pn.getLine());
1742       blockstatements.add(cbn);
1743     } else if (isNode(pn,"break")) {
1744       ContinueBreakNode cbn=new ContinueBreakNode(true);
1745       cbn.setNumLine(pn.getLine());
1746       blockstatements.add(cbn);
1747       ParseNode idopt_pn=pn.getChild("identifier_opt");
1748       ParseNode name_pn=idopt_pn.getChild("name");
1749       // name_pn.getTerminal() gives you the label
1750
1751     } else if (isNode(pn,"genreach")) {
1752       String graphName = pn.getChild("graphName").getTerminal();
1753       blockstatements.add(new GenReachNode(graphName) );
1754
1755     } else if (isNode(pn,"gen_def_reach")) {
1756       String outputName = pn.getChild("outputName").getTerminal();
1757       blockstatements.add(new GenDefReachNode(outputName) );
1758
1759     } else if(isNode(pn,"labeledstatement")) {
1760       String labeledstatement = pn.getChild("name").getTerminal();
1761       BlockNode bn=parseSingleBlock(pn.getChild("statement").getFirstChild(),labeledstatement);
1762       blockstatements.add(new SubBlockNode(bn));
1763     } else {
1764       System.out.println("---------------");
1765       System.out.println(pn.PPrint(3,true));
1766       throw new Error();
1767     }
1768     return blockstatements;
1769   }
1770
1771   public MethodDescriptor parseMethodHeader(ParseNode pn) {
1772     ParseNode mn=pn.getChild("modifiers");
1773     Modifiers m=parseModifiersList(mn);
1774
1775     ParseNode tn=pn.getChild("returntype");
1776     TypeDescriptor returntype;
1777     if (tn!=null)
1778       returntype=parseTypeDescriptor(tn);
1779     else
1780       returntype=new TypeDescriptor(TypeDescriptor.VOID);
1781
1782     ParseNode pmd=pn.getChild("method_declarator");
1783     String name=pmd.getChild("name").getTerminal();
1784     MethodDescriptor md=new MethodDescriptor(m, returntype, name);
1785
1786     ParseNode paramnode=pmd.getChild("parameters");
1787     parseParameterList(md,paramnode);
1788     return md;
1789   }
1790
1791   public void parseParameterList(MethodDescriptor md, ParseNode pn) {
1792     ParseNode paramlist=pn.getChild("formal_parameter_list");
1793     if (paramlist==null)
1794       return;
1795     ParseNodeVector pnv=paramlist.getChildren();
1796     for(int i=0; i<pnv.size(); i++) {
1797       ParseNode paramn=pnv.elementAt(i);
1798
1799       if (isNode(paramn, "tag_parameter")) {
1800         String paramname=paramn.getChild("single").getTerminal();
1801         TypeDescriptor type=new TypeDescriptor(TypeDescriptor.TAG);
1802         md.addTagParameter(type, paramname);
1803       } else  {
1804
1805         TypeDescriptor type=parseTypeDescriptor(paramn);
1806
1807         ParseNode tmp=paramn;
1808         while (tmp.getChild("single")==null) {
1809           type=type.makeArray(state);
1810           tmp=tmp.getChild("array");
1811         }
1812         String paramname=tmp.getChild("single").getTerminal();
1813
1814         md.addParameter(type, paramname);
1815         if(isNode(paramn, "annotation_parameter")) {
1816           ParseNode listnode=paramn.getChild("annotation_list");
1817           parseParameterAnnotation(listnode,type);
1818         }
1819
1820       }
1821     }
1822   }
1823
1824   public Modifiers parseModifiersList(ParseNode pn) {
1825     Modifiers m=new Modifiers();
1826     ParseNode modlist=pn.getChild("modifier_list");
1827     if (modlist!=null) {
1828       ParseNodeVector pnv=modlist.getChildren();
1829       for(int i=0; i<pnv.size(); i++) {
1830         ParseNode modn=pnv.elementAt(i);
1831         if (isNode(modn,"public"))
1832           m.addModifier(Modifiers.PUBLIC);
1833         else if (isNode(modn,"protected"))
1834           m.addModifier(Modifiers.PROTECTED);
1835         else if (isNode(modn,"private"))
1836           m.addModifier(Modifiers.PRIVATE);
1837         else if (isNode(modn,"static"))
1838           m.addModifier(Modifiers.STATIC);
1839         else if (isNode(modn,"final"))
1840           m.addModifier(Modifiers.FINAL);
1841         else if (isNode(modn,"native"))
1842           m.addModifier(Modifiers.NATIVE);
1843         else if (isNode(modn,"synchronized"))
1844           m.addModifier(Modifiers.SYNCHRONIZED);
1845         else if (isNode(modn,"atomic"))
1846           m.addModifier(Modifiers.ATOMIC);
1847         else if (isNode(modn,"abstract"))
1848           m.addModifier(Modifiers.ABSTRACT);
1849         else if (isNode(modn,"volatile"))
1850           m.addModifier(Modifiers.VOLATILE);
1851         else if (isNode(modn,"transient"))
1852           m.addModifier(Modifiers.TRANSIENT);
1853         else if(isNode(modn,"annotation_list"))
1854           parseAnnotationList(modn,m);
1855         else {
1856           throw new Error("Unrecognized Modifier:"+modn.getLabel());
1857         }
1858       }
1859     }
1860     return m;
1861   }
1862
1863   private void parseAnnotationList(ParseNode pn, Modifiers m) {
1864     ParseNodeVector pnv = pn.getChildren();
1865     for (int i = 0; i < pnv.size(); i++) {
1866       ParseNode body_list = pnv.elementAt(i);
1867       if (isNode(body_list, "annotation_body")) {
1868         ParseNode body_node = body_list.getFirstChild();
1869         if (isNode(body_node, "marker_annotation")) {
1870           m.addAnnotation(new AnnotationDescriptor(body_node.getChild("name").getTerminal()));
1871         } else if (isNode(body_node, "single_annotation")) {
1872           m.addAnnotation(new AnnotationDescriptor(body_node.getChild("name").getTerminal(),
1873                                                    body_node.getChild("element_value").getTerminal()));
1874         } else if (isNode(body_node, "normal_annotation")) {
1875           throw new Error("Annotation with multiple data members is not supported yet.");
1876         }
1877       }
1878     }
1879   }
1880
1881   private void parseParameterAnnotation(ParseNode pn,TypeDescriptor type) {
1882     ParseNodeVector pnv = pn.getChildren();
1883     for (int i = 0; i < pnv.size(); i++) {
1884       ParseNode body_list = pnv.elementAt(i);
1885       if (isNode(body_list, "annotation_body")) {
1886         ParseNode body_node = body_list.getFirstChild();
1887         if (isNode(body_node, "marker_annotation")) {
1888           type.addAnnotationMarker(new AnnotationDescriptor(body_node.getChild("name").getTerminal()));
1889         } else if (isNode(body_node, "single_annotation")) {
1890           type.addAnnotationMarker(new AnnotationDescriptor(body_node.getChild("name").getTerminal(),
1891                                                    body_node.getChild("element_value").getTerminal()));
1892         } else if (isNode(body_node, "normal_annotation")) {
1893           throw new Error("Annotation with multiple data members is not supported yet.");
1894         }
1895       }
1896     }
1897   }
1898
1899   private boolean isNode(ParseNode pn, String label) {
1900     if (pn.getLabel().equals(label))
1901       return true;
1902     else return false;
1903   }
1904
1905   private static boolean isEmpty(ParseNode pn) {
1906     if (pn.getLabel().equals("empty"))
1907       return true;
1908     else
1909       return false;
1910   }
1911
1912   private static boolean isEmpty(String s) {
1913     if (s.equals("empty"))
1914       return true;
1915     else
1916       return false;
1917   }
1918
1919   /** Throw an exception if something is unexpected */
1920   private void check(ParseNode pn, String label) {
1921     if (pn == null) {
1922       throw new Error(pn+ "IE: Expected '" + label + "', got null");
1923     }
1924     if (!pn.getLabel().equals(label)) {
1925       throw new Error(pn+ "IE: Expected '" + label + "', got '"+pn.getLabel()+"'");
1926     }
1927   }
1928 }