code checked in
[IRC.git] / Robust / src / IR / Flat / BuildCode.java
1 package IR.Flat;
2 import IR.Tree.FlagExpressionNode;
3 import IR.Tree.DNFFlag;
4 import IR.Tree.DNFFlagAtom;
5 import IR.Tree.TagExpressionList;
6 import IR.*;
7 import java.util.*;
8 import java.io.*;
9 import Util.Relation;
10 import Analysis.TaskStateAnalysis.FlagState;
11 import Analysis.TaskStateAnalysis.OptionalTaskDescriptor;
12 import Analysis.TaskStateAnalysis.Predicate;
13 import Analysis.Locality.LocalityAnalysis;
14 import Analysis.Locality.LocalityBinding;
15
16 public class BuildCode {
17     State state;
18     Hashtable temptovar;
19     Hashtable paramstable;
20     Hashtable tempstable;
21     Hashtable fieldorder;
22     Hashtable flagorder;
23     int tag=0;
24     String localsprefix="___locals___";
25     String paramsprefix="___params___";
26     String oidstr="___nextobject___";
27     String nextobjstr="___nextobject___";
28     String localcopystr="___localcopy___";
29     public static boolean GENERATEPRECISEGC=false;
30     public static String PREFIX="";
31     public static String arraytype="ArrayObject";
32     Virtual virtualcalls;
33     TypeUtil typeutil;
34     private int maxtaskparams=0;
35     private int maxcount=0;
36     ClassDescriptor[] cdarray;
37     TypeDescriptor[] arraytable;
38     LocalityAnalysis locality;
39     Hashtable<TempDescriptor, TempDescriptor> backuptable;
40     Hashtable<LocalityBinding, TempDescriptor> reverttable;
41
42     public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil) {
43         this(st, temptovar, typeutil, null);
44     }
45
46     public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, LocalityAnalysis locality) {
47         state=st;
48         this.temptovar=temptovar;
49         paramstable=new Hashtable();
50         tempstable=new Hashtable();
51         fieldorder=new Hashtable();
52         flagorder=new Hashtable();
53         this.typeutil=typeutil;
54         virtualcalls=new Virtual(state,locality);
55         if (locality!=null) {
56             this.locality=locality;
57             this.backuptable=new Hashtable<TempDescriptor, TempDescriptor>();
58             this.reverttable=new Hashtable<LocalityBinding, TempDescriptor>();
59         }
60     }
61
62     /** The buildCode method outputs C code for all the methods.  The Flat
63      * versions of the methods must already be generated and stored in
64      * the State object. */
65
66     public void buildCode() {
67         /* Create output streams to write to */
68         PrintWriter outclassdefs=null;
69         PrintWriter outstructs=null;
70         PrintWriter outrepairstructs=null;
71         PrintWriter outmethodheader=null;
72         PrintWriter outmethod=null;
73         PrintWriter outvirtual=null;
74         PrintWriter outtask=null;
75         PrintWriter outtaskdefs=null;
76         PrintWriter outoptionalarrays=null;
77         PrintWriter optionalheaders=null;
78
79         try {
80             outstructs=new PrintWriter(new FileOutputStream(PREFIX+"structdefs.h"), true);
81             outmethodheader=new PrintWriter(new FileOutputStream(PREFIX+"methodheaders.h"), true);
82             outclassdefs=new PrintWriter(new FileOutputStream(PREFIX+"classdefs.h"), true);
83             outmethod=new PrintWriter(new FileOutputStream(PREFIX+"methods.c"), true);
84             outvirtual=new PrintWriter(new FileOutputStream(PREFIX+"virtualtable.h"), true);
85             if (state.TASK) {
86                 outtask=new PrintWriter(new FileOutputStream(PREFIX+"task.h"), true);
87                 outtaskdefs=new PrintWriter(new FileOutputStream(PREFIX+"taskdefs.c"), true);
88                 if (state.OPTIONAL){
89                     outoptionalarrays=new PrintWriter(new FileOutputStream(PREFIX+"optionalarrays.c"), true);
90                     optionalheaders=new PrintWriter(new FileOutputStream(PREFIX+"optionalstruct.h"), true);
91                 } 
92             }
93             if (state.structfile!=null) {
94                 outrepairstructs=new PrintWriter(new FileOutputStream(PREFIX+state.structfile+".struct"), true);
95             }
96         } catch (Exception e) {
97             e.printStackTrace();
98             System.exit(-1);
99         }
100
101         /* Build the virtual dispatch tables */
102         buildVirtualTables(outvirtual);
103
104         /* Output includes */
105         outmethodheader.println("#ifndef METHODHEADERS_H");
106         outmethodheader.println("#define METHODHEADERS_H");
107         outmethodheader.println("#include \"structdefs.h\"");
108
109         /* Output Structures */
110         outputStructs(outstructs);
111
112         // Output the C class declarations
113         // These could mutually reference each other
114         outputClassDeclarations(outclassdefs);
115
116         // Output function prototypes and structures for parameters
117         Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
118         while(it.hasNext()) {
119             ClassDescriptor cn=(ClassDescriptor)it.next();
120             generateCallStructs(cn, outclassdefs, outstructs, outmethodheader);
121         }
122         outclassdefs.close();
123
124         if (state.TASK) {
125             /* Map flags to integers */
126             /* The runtime keeps track of flags using these integers */
127             it=state.getClassSymbolTable().getDescriptorsIterator();
128             while(it.hasNext()) {
129                 ClassDescriptor cn=(ClassDescriptor)it.next();
130                 mapFlags(cn);
131             }
132             /* Generate Tasks */
133             generateTaskStructs(outstructs, outmethodheader);
134
135             /* Outputs generic task structures if this is a task
136                program */
137             outputTaskTypes(outtask);
138         }
139
140         /* Build the actual methods */
141         outputMethods(outmethod);
142
143         if (state.TASK) {
144             /* Output code for tasks */
145             outputTaskCode(outtaskdefs, outmethod);
146             outtaskdefs.close();
147             /* Record maximum number of task parameters */
148             outstructs.println("#define MAXTASKPARAMS "+maxtaskparams);
149         } else if (state.main!=null) {
150             /* Generate main method */
151             outputMainMethod(outmethod);
152         }
153         
154         /* Generate information for task with optional parameters */
155         if (state.TASK&&state.OPTIONAL){
156             generateOptionalArrays(outoptionalarrays, optionalheaders, state.getAnalysisResult(), state.getOptionalTaskDescriptors());
157             outoptionalarrays.close();
158         } 
159
160         /* Output structure definitions for repair tool */
161         if (state.structfile!=null) {
162             buildRepairStructs(outrepairstructs);
163             outrepairstructs.close();
164         }
165
166         /* Close files */
167         outmethodheader.println("#endif");
168         outmethodheader.close();
169         outmethod.close();
170         outstructs.println("#endif");
171         outstructs.close();
172     }
173
174     /* This code just generates the main C method for java programs.
175      * The main C method packs up the arguments into a string array
176      * and passes it to the java main method. */
177
178     private void outputMainMethod(PrintWriter outmethod) {
179         outmethod.println("int main(int argc, const char *argv[]) {");
180         outmethod.println("  int i;");
181         if (state.DSM) {
182             outmethod.println("if (dstmStart(argv[0])) {");
183             if (GENERATEPRECISEGC) {
184                 outmethod.println("  struct ArrayObject * stringarray=allocate_newarray(NULL, STRINGARRAYTYPE, argc-2);");
185             } else {
186                 outmethod.println("  struct ArrayObject * stringarray=allocate_newarray(STRINGARRAYTYPE, argc-2);");
187             }
188         } else {
189             if (GENERATEPRECISEGC) {
190                 outmethod.println("  struct ArrayObject * stringarray=allocate_newarray(NULL, STRINGARRAYTYPE, argc-1);");
191             } else {
192                 outmethod.println("  struct ArrayObject * stringarray=allocate_newarray(STRINGARRAYTYPE, argc-1);");
193             }
194         }
195         if (state.THREAD) {
196             outmethod.println("initializethreads();");
197         }
198         if (state.DSM) {
199             outmethod.println("  for(i=2;i<argc;i++) {");
200         } else 
201             outmethod.println("  for(i=1;i<argc;i++) {");
202         outmethod.println("    int length=strlen(argv[i]);");
203         if (GENERATEPRECISEGC) {
204             outmethod.println("    struct ___String___ *newstring=NewString(NULL, argv[i], length);");
205         } else {
206             outmethod.println("    struct ___String___ *newstring=NewString(argv[i], length);");
207         }
208         if (state.DSM)
209             outmethod.println("    ((void **)(((char *)& stringarray->___length___)+sizeof(int)))[i-2]=newstring;");
210         else
211             outmethod.println("    ((void **)(((char *)& stringarray->___length___)+sizeof(int)))[i-1]=newstring;");
212         outmethod.println("  }");
213         
214         
215         MethodDescriptor md=typeutil.getMain();
216         ClassDescriptor cd=typeutil.getMainClass();
217         
218         outmethod.println("   {");
219         if (GENERATEPRECISEGC) {
220             if (state.DSM) {
221                 outmethod.print("       struct "+cd.getSafeSymbol()+locality.getMain().getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
222             } else
223                 outmethod.print("       struct "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
224             outmethod.println("1, NULL,"+"stringarray};");
225             if (state.DSM)
226                 outmethod.println("     "+cd.getSafeSymbol()+locality.getMain().getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(& __parameterlist__);");
227             else
228                 outmethod.println("     "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(& __parameterlist__);");
229         } else {
230             if (state.DSM)
231                 outmethod.println("     "+cd.getSafeSymbol()+locality.getMain().getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(stringarray);");
232             else
233                 outmethod.println("     "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(stringarray);");
234         }
235         outmethod.println("   }");
236
237         if (state.DSM) {
238             outmethod.println("}");
239         }
240
241         if (state.THREAD) {
242             outmethod.println("pthread_mutex_lock(&gclistlock);");
243             outmethod.println("threadcount--;");
244             outmethod.println("pthread_cond_signal(&gccond);");
245             outmethod.println("pthread_mutex_unlock(&gclistlock);");
246             outmethod.println("pthread_exit(NULL);");
247         }
248
249
250         outmethod.println("}");
251     }
252
253     /* This method outputs code for each task. */
254
255     private void outputTaskCode(PrintWriter outtaskdefs, PrintWriter outmethod) {
256         /* Compile task based program */
257         outtaskdefs.println("#include \"task.h\"");
258         outtaskdefs.println("#include \"methodheaders.h\"");
259         Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
260         while(taskit.hasNext()) {
261             TaskDescriptor td=(TaskDescriptor)taskit.next();
262             FlatMethod fm=state.getMethodFlat(td);
263             generateFlatMethod(fm, null, outmethod);
264             generateTaskDescriptor(outtaskdefs, fm, td);
265         }
266         
267         //Output task descriptors
268         taskit=state.getTaskSymbolTable().getDescriptorsIterator();
269         outtaskdefs.println("struct taskdescriptor * taskarray[]= {");
270         boolean first=true;
271         while(taskit.hasNext()) {
272             TaskDescriptor td=(TaskDescriptor)taskit.next();
273             if (first)
274                 first=false;
275             else
276                 outtaskdefs.println(",");
277             outtaskdefs.print("&task_"+td.getSafeSymbol());
278         }
279         outtaskdefs.println("};");
280
281         outtaskdefs.println("int numtasks="+state.getTaskSymbolTable().getValueSet().size()+";");
282     }
283
284     /* This method outputs most of the methods.c file.  This includes
285      * some standard includes and then an array with the sizes of
286      * objets and array that stores supertype and then the code for
287      * the Java methods.. */
288
289     private void outputMethods(PrintWriter outmethod) {
290         outmethod.println("#include \"methodheaders.h\"");
291         outmethod.println("#include \"virtualtable.h\"");
292         outmethod.println("#include <runtime.h>");
293         if (state.DSM)
294             outmethod.println("#include \"localobjects.h\"");
295         if (state.THREAD)
296             outmethod.println("#include <thread.h>");
297         if (state.main!=null) {
298             outmethod.println("#include <string.h>");       
299         }
300         if (state.CONSCHECK) {
301             outmethod.println("#include \"checkers.h\"");
302         }
303         //Store the sizes of classes & array elements
304         generateSizeArray(outmethod);
305         
306         //Store table of supertypes
307         generateSuperTypeTable(outmethod);
308
309         //Store the layout of classes
310         generateLayoutStructs(outmethod);
311
312         /* Generate code for methods */
313         if (state.DSM) {
314             for(Iterator<LocalityBinding> lbit=locality.getLocalityBindings().iterator();lbit.hasNext();) {
315                 LocalityBinding lb=lbit.next();
316                 MethodDescriptor md=lb.getMethod();
317                 FlatMethod fm=state.getMethodFlat(md);
318                 if (!md.getModifiers().isNative()) {
319                     generateFlatMethod(fm, lb, outmethod);
320                 }
321             }
322         } else {
323             Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
324             while(classit.hasNext()) {
325                 ClassDescriptor cn=(ClassDescriptor)classit.next();
326                 Iterator methodit=cn.getMethods();
327                 while(methodit.hasNext()) {
328                     /* Classify parameters */
329                     MethodDescriptor md=(MethodDescriptor)methodit.next();
330                     FlatMethod fm=state.getMethodFlat(md);
331                     if (!md.getModifiers().isNative())
332                         generateFlatMethod(fm, null, outmethod);
333                 }
334             }
335         } 
336     }
337
338     private void outputStructs(PrintWriter outstructs) {
339         outstructs.println("#ifndef STRUCTDEFS_H");
340         outstructs.println("#define STRUCTDEFS_H");
341         outstructs.println("#include \"classdefs.h\"");
342
343         /* Output #defines that the runtime uses to determine type
344          * numbers for various objects it needs */
345
346         outstructs.println("#define STRINGARRAYTYPE "+
347                            (state.getArrayNumber(
348                                                  (new TypeDescriptor(typeutil.getClass(TypeUtil.StringClass))).makeArray(state))+state.numClasses()));
349
350         outstructs.println("#define OBJECTARRAYTYPE "+
351                            (state.getArrayNumber(
352                                                  (new TypeDescriptor(typeutil.getClass(TypeUtil.ObjectClass))).makeArray(state))+state.numClasses()));
353
354
355         outstructs.println("#define STRINGTYPE "+typeutil.getClass(TypeUtil.StringClass).getId());
356         outstructs.println("#define CHARARRAYTYPE "+
357                            (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.CHAR)).makeArray(state))+state.numClasses()));
358
359         outstructs.println("#define BYTEARRAYTYPE "+
360                            (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.BYTE)).makeArray(state))+state.numClasses()));
361
362         outstructs.println("#define BYTEARRAYARRAYTYPE "+
363                            (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.BYTE)).makeArray(state).makeArray(state))+state.numClasses()));
364         
365         outstructs.println("#define NUMCLASSES "+state.numClasses());
366         if (state.TASK) {
367             outstructs.println("#define STARTUPTYPE "+typeutil.getClass(TypeUtil.StartupClass).getId());
368             outstructs.println("#define TAGTYPE "+typeutil.getClass(TypeUtil.TagClass).getId());
369             outstructs.println("#define TAGARRAYTYPE "+
370                                (state.getArrayNumber(new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass)).makeArray(state))+state.numClasses()));
371         }
372     }
373
374     private void outputClassDeclarations(PrintWriter outclassdefs) {
375         if (state.THREAD)
376             outclassdefs.println("#include <pthread.h>");
377         if(state.OPTIONAL)
378             outclassdefs.println("#include \"optionalstruct.h\"");
379         outclassdefs.println("struct "+arraytype+";");
380         /* Start by declaring all structs */
381         Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
382         while(it.hasNext()) {
383             ClassDescriptor cn=(ClassDescriptor)it.next();
384             outclassdefs.println("struct "+cn.getSafeSymbol()+";");
385         }
386         outclassdefs.println("");
387         //Print out definition for array type
388         outclassdefs.println("struct "+arraytype+" {");
389         outclassdefs.println("  int type;");
390         if (state.THREAD) {
391             outclassdefs.println("  pthread_t tid;");
392             outclassdefs.println("  void * lockentry;");
393             outclassdefs.println("  int lockcount;");
394         }
395         if (state.TASK) {
396             outclassdefs.println("  int flag;");
397             outclassdefs.println("  void * flagptr;");
398             if(state.OPTIONAL){
399                 outclassdefs.println("  int failedstatus;");
400                 outclassdefs.println("  int hashcode;");
401                 outclassdefs.println("  int numexitfses;");
402                 outclassdefs.println("  int * exitfses;");
403                 outclassdefs.println("  int numotds;");
404                 outclassdefs.println("  struct optionaltaskdescriptor ** otds;");
405             }
406         }
407         printClassStruct(typeutil.getClass(TypeUtil.ObjectClass), outclassdefs);
408         
409         outclassdefs.println("  int ___length___;");
410         outclassdefs.println("};\n");
411         outclassdefs.println("extern int classsize[];");
412         outclassdefs.println("extern int hasflags[];");
413         outclassdefs.println("extern unsigned int * pointerarray[];");
414         outclassdefs.println("extern int supertypes[];");
415     }
416
417     /** Prints out definitions for generic task structures */
418
419     private void outputTaskTypes(PrintWriter outtask) {
420         outtask.println("#ifndef _TASK_H");
421         outtask.println("#define _TASK_H");
422         outtask.println("struct parameterdescriptor {");
423         outtask.println("int type;");
424         outtask.println("int numberterms;");
425         outtask.println("int *intarray;");
426         outtask.println("void * queue;");
427         outtask.println("int numbertags;");
428         outtask.println("int *tagarray;");
429         outtask.println("};");
430         
431         outtask.println("struct taskdescriptor {");
432         outtask.println("void * taskptr;");
433         outtask.println("int numParameters;");
434         outtask.println("int numTotal;");
435         outtask.println("struct parameterdescriptor **descriptorarray;");
436         outtask.println("char * name;");
437         outtask.println("};");
438         outtask.println("extern struct taskdescriptor * taskarray[];");
439         outtask.println("extern numtasks;");
440         outtask.println("#endif");
441     }
442
443
444     private void buildRepairStructs(PrintWriter outrepairstructs) {
445         Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
446         while(classit.hasNext()) {
447             ClassDescriptor cn=(ClassDescriptor)classit.next();
448             outrepairstructs.println("structure "+cn.getSymbol()+" {");
449             outrepairstructs.println("  int __type__;");
450             if (state.TASK) {
451                 outrepairstructs.println("  int __flag__;");
452                 outrepairstructs.println("  int __flagptr__;");
453             }
454             printRepairStruct(cn, outrepairstructs);
455             outrepairstructs.println("}\n");
456         }
457         
458         for(int i=0;i<state.numArrays();i++) {
459             TypeDescriptor tdarray=arraytable[i];
460             TypeDescriptor tdelement=tdarray.dereference();
461             outrepairstructs.println("structure "+arraytype+"_"+state.getArrayNumber(tdarray)+" {");
462             outrepairstructs.println("  int __type__;");
463             printRepairStruct(typeutil.getClass(TypeUtil.ObjectClass), outrepairstructs);
464             outrepairstructs.println("  int length;");
465             /*
466               // Need to add support to repair tool for this
467               if (tdelement.isClass()||tdelement.isArray())
468                 outrepairstructs.println("  "+tdelement.getRepairSymbol()+" * elem[this.length];");
469             else
470                 outrepairstructs.println("  "+tdelement.getRepairSymbol()+" elem[this.length];");
471             */
472             outrepairstructs.println("}\n");
473         }
474     }
475
476     private void printRepairStruct(ClassDescriptor cn, PrintWriter output) {
477         ClassDescriptor sp=cn.getSuperDesc();
478         if (sp!=null)
479             printRepairStruct(sp, output);
480         
481         Vector fields=(Vector)fieldorder.get(cn);
482
483         for(int i=0;i<fields.size();i++) {
484             FieldDescriptor fd=(FieldDescriptor)fields.get(i);
485             if (fd.getType().isArray()) {
486                 output.println("  "+arraytype+"_"+ state.getArrayNumber(fd.getType()) +" * "+fd.getSymbol()+";");
487             } else if (fd.getType().isClass())
488                 output.println("  "+fd.getType().getRepairSymbol()+" * "+fd.getSymbol()+";");
489             else if (fd.getType().isFloat())
490                 output.println("  int "+fd.getSymbol()+"; /* really float */");
491             else 
492                 output.println("  "+fd.getType().getRepairSymbol()+" "+fd.getSymbol()+";");
493         }
494     }
495
496     /** This method outputs TaskDescriptor information */
497     void generateTaskDescriptor(PrintWriter output, FlatMethod fm, TaskDescriptor task) {
498         for (int i=0;i<task.numParameters();i++) {
499             VarDescriptor param_var=task.getParameter(i);
500             TypeDescriptor param_type=task.getParamType(i);
501             FlagExpressionNode param_flag=task.getFlag(param_var);
502             TagExpressionList param_tag=task.getTag(param_var);
503
504             int dnfterms;
505             if (param_flag==null) {
506                 output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
507                 output.println("0x0, 0x0 };");
508                 dnfterms=1;
509             } else {
510                 DNFFlag dflag=param_flag.getDNF();
511                 dnfterms=dflag.size();
512                 
513                 Hashtable flags=(Hashtable)flagorder.get(param_type.getClassDesc());
514                 output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
515                 for(int j=0;j<dflag.size();j++) {
516                     if (j!=0)
517                         output.println(",");
518                     Vector term=dflag.get(j);
519                     int andmask=0;
520                     int checkmask=0;
521                     for(int k=0;k<term.size();k++) {
522                         DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
523                         FlagDescriptor fd=dfa.getFlag();
524                         boolean negated=dfa.getNegated();
525                         int flagid=1<<((Integer)flags.get(fd)).intValue();
526                         andmask|=flagid;
527                         if (!negated)
528                             checkmask|=flagid;
529                     }
530                     output.print("0x"+Integer.toHexString(andmask)+", 0x"+Integer.toHexString(checkmask));
531                 }
532                 output.println("};");
533             }
534
535             output.println("int parametertag_"+i+"_"+task.getSafeSymbol()+"[]={");
536             //BUG...added next line to fix, test with any task program
537             if (param_tag!=null)
538                 for(int j=0;j<param_tag.numTags();j++) {
539                     if (j!=0)
540                         output.println(",");
541                     /* for each tag we need */
542                     /* which slot it is */
543                     /* what type it is */
544                     TagVarDescriptor tvd=(TagVarDescriptor)task.getParameterTable().get(param_tag.getName(j));
545                     TempDescriptor tmp=param_tag.getTemp(j);
546                     int slot=fm.getTagInt(tmp);
547                     output.println(slot+", "+state.getTagId(tvd.getTag()));
548                 }
549             output.println("};");
550
551             output.println("struct parameterdescriptor parameter_"+i+"_"+task.getSafeSymbol()+"={");
552             output.println("/* type */"+param_type.getClassDesc().getId()+",");
553             output.println("/* number of DNF terms */"+dnfterms+",");
554             output.println("parameterdnf_"+i+"_"+task.getSafeSymbol()+",");
555             output.println("0,");
556             //BUG, added next line to fix and else statement...test
557             //with any task program
558             if (param_tag!=null)
559                 output.println("/* number of tags */"+param_tag.numTags()+",");
560             else
561                 output.println("/* number of tags */ 0,");
562             output.println("parametertag_"+i+"_"+task.getSafeSymbol());
563             output.println("};");
564         }
565
566
567         output.println("struct parameterdescriptor * parameterdescriptors_"+task.getSafeSymbol()+"[] = {");
568         for (int i=0;i<task.numParameters();i++) {
569             if (i!=0)
570                 output.println(",");
571             output.print("&parameter_"+i+"_"+task.getSafeSymbol());
572         }
573         output.println("};");
574
575         output.println("struct taskdescriptor task_"+task.getSafeSymbol()+"={");
576         output.println("&"+task.getSafeSymbol()+",");
577         output.println("/* number of parameters */" +task.numParameters() + ",");
578         int numtotal=task.numParameters()+fm.numTags();
579         output.println("/* number total parameters */" +numtotal + ",");
580         output.println("parameterdescriptors_"+task.getSafeSymbol()+",");
581         output.println("\""+task.getSymbol()+"\"");
582         output.println("};");
583     }
584
585
586     /** The buildVirtualTables method outputs the virtual dispatch
587      * tables for methods. */
588
589     private void buildVirtualTables(PrintWriter outvirtual) {
590         Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
591         while(classit.hasNext()) {
592             ClassDescriptor cd=(ClassDescriptor)classit.next();
593             if (virtualcalls.getMethodCount(cd)>maxcount)
594                 maxcount=virtualcalls.getMethodCount(cd);
595         }
596         MethodDescriptor[][] virtualtable=null;
597         LocalityBinding[][] lbvirtualtable=null;
598         if (state.DSM)
599             lbvirtualtable=new LocalityBinding[state.numClasses()+state.numArrays()][maxcount];
600         else
601             virtualtable=new MethodDescriptor[state.numClasses()+state.numArrays()][maxcount];
602
603         /* Fill in virtual table */
604         classit=state.getClassSymbolTable().getDescriptorsIterator();
605         while(classit.hasNext()) {
606             ClassDescriptor cd=(ClassDescriptor)classit.next();
607             if (state.DSM)
608                 fillinRow(cd, lbvirtualtable, cd.getId());
609             else
610                 fillinRow(cd, virtualtable, cd.getId());
611         }
612
613         ClassDescriptor objectcd=typeutil.getClass(TypeUtil.ObjectClass);
614         Iterator arrayit=state.getArrayIterator();
615         while(arrayit.hasNext()) {
616             TypeDescriptor td=(TypeDescriptor)arrayit.next();
617             int id=state.getArrayNumber(td);
618             if (state.DSM)
619                 fillinRow(objectcd, lbvirtualtable, id+state.numClasses());
620             else
621                 fillinRow(objectcd, virtualtable, id+state.numClasses());
622         }
623         
624         outvirtual.print("void * virtualtable[]={");
625         boolean needcomma=false;
626         for(int i=0;i<state.numClasses()+state.numArrays();i++) {
627             for(int j=0;j<maxcount;j++) {
628                 if (needcomma)
629                     outvirtual.print(", ");
630                 if (state.DSM&&lbvirtualtable[i][j]!=null) {
631                     LocalityBinding lb=lbvirtualtable[i][j];
632                     MethodDescriptor md=lb.getMethod();
633                     outvirtual.print("& "+md.getClassDesc().getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
634                 } else if (!state.DSM&&virtualtable[i][j]!=null) {
635                     MethodDescriptor md=virtualtable[i][j];
636                     outvirtual.print("& "+md.getClassDesc().getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
637                 } else {
638                     outvirtual.print("0");
639                 }
640                 needcomma=true;
641             }
642             outvirtual.println("");
643         }
644         outvirtual.println("};");
645         outvirtual.close();
646     }
647
648     private void fillinRow(ClassDescriptor cd, MethodDescriptor[][] virtualtable, int rownum) {
649         /* Get inherited methods */
650         if (cd.getSuperDesc()!=null)
651             fillinRow(cd.getSuperDesc(), virtualtable, rownum);
652         /* Override them with our methods */
653         for(Iterator it=cd.getMethods();it.hasNext();) {
654             MethodDescriptor md=(MethodDescriptor)it.next();
655             if (md.isStatic()||md.getReturnType()==null)
656                 continue;
657             int methodnum=virtualcalls.getMethodNumber(md);
658             virtualtable[rownum][methodnum]=md;
659         }
660     }
661
662     private void fillinRow(ClassDescriptor cd, LocalityBinding[][] virtualtable, int rownum) {
663         /* Get inherited methods */
664         if (cd.getSuperDesc()!=null)
665             fillinRow(cd.getSuperDesc(), virtualtable, rownum);
666         /* Override them with our methods */
667         if (locality.getClassBindings(cd)!=null)
668             for(Iterator<LocalityBinding> lbit=locality.getClassBindings(cd).iterator();lbit.hasNext();) {
669                 LocalityBinding lb=lbit.next();
670                 MethodDescriptor md=lb.getMethod();
671                 //Is the method static or a constructor
672                 if (md.isStatic()||md.getReturnType()==null)
673                     continue;
674                 int methodnum=virtualcalls.getLocalityNumber(lb);
675                 virtualtable[rownum][methodnum]=lb;
676             }
677     }
678
679
680     /** Generate array that contains the sizes of class objects.  The
681      * object allocation functions in the runtime use this
682      * information. */
683
684     private void generateSizeArray(PrintWriter outclassdefs) {
685         outclassdefs.print("int classsize[]={");
686         Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
687         cdarray=new ClassDescriptor[state.numClasses()];
688         while(it.hasNext()) {
689             ClassDescriptor cd=(ClassDescriptor)it.next();
690             cdarray[cd.getId()]=cd;
691         }
692         boolean needcomma=false;
693         for(int i=0;i<state.numClasses();i++) {
694             if (needcomma)
695                 outclassdefs.print(", ");
696             outclassdefs.print("sizeof(struct "+cdarray[i].getSafeSymbol()+")");            
697             needcomma=true;
698         }
699
700         arraytable=new TypeDescriptor[state.numArrays()];
701
702         Iterator arrayit=state.getArrayIterator();
703         while(arrayit.hasNext()) {
704             TypeDescriptor td=(TypeDescriptor)arrayit.next();
705             int id=state.getArrayNumber(td);
706             arraytable[id]=td;
707         }
708         
709         for(int i=0;i<state.numArrays();i++) {
710             if (needcomma)
711                 outclassdefs.print(", ");
712             TypeDescriptor tdelement=arraytable[i].dereference();
713             if (tdelement.isArray()||tdelement.isClass())
714                 outclassdefs.print("sizeof(void *)");
715             else
716                 outclassdefs.print("sizeof("+tdelement.getSafeSymbol()+")");
717             needcomma=true;
718         }
719
720         outclassdefs.println("};");
721     }
722
723     /** Constructs params and temp objects for each method or task.
724      * These objects tell the compiler which temps need to be
725      * allocated.  */
726
727     private void generateTempStructs(FlatMethod fm, LocalityBinding lb) {
728         MethodDescriptor md=fm.getMethod();
729         TaskDescriptor task=fm.getTask();
730         Set<TempDescriptor> saveset=lb!=null?locality.getTempSet(lb):null;
731         ParamsObject objectparams=md!=null?new ParamsObject(md,tag++):new ParamsObject(task, tag++);
732
733         if (md!=null)
734             paramstable.put(md, objectparams);
735         else
736             paramstable.put(task, objectparams);
737
738         for(int i=0;i<fm.numParameters();i++) {
739             TempDescriptor temp=fm.getParameter(i);
740             TypeDescriptor type=temp.getType();
741             if ((type.isPtr()||type.isArray())&&GENERATEPRECISEGC)
742                 objectparams.addPtr(temp);
743             else
744                 objectparams.addPrim(temp);
745             if(lb!=null&&saveset.contains(temp)) {
746                 backuptable.put(temp, temp.createNew());
747             }
748         }
749
750         for(int i=0;i<fm.numTags();i++) {
751             TempDescriptor temp=fm.getTag(i);
752             if (GENERATEPRECISEGC)
753                 objectparams.addPtr(temp);
754             else
755                 objectparams.addPrim(temp);
756         }
757
758         TempObject objecttemps=md!=null?new TempObject(objectparams,md,tag++):new TempObject(objectparams, task, tag++);
759         if (md!=null)
760             tempstable.put(md, objecttemps);
761         else
762             tempstable.put(task, objecttemps);
763
764         for(Iterator nodeit=fm.getNodeSet().iterator();nodeit.hasNext();) {
765             FlatNode fn=(FlatNode)nodeit.next();
766             TempDescriptor[] writes=fn.writesTemps();
767             for(int i=0;i<writes.length;i++) {
768                 TempDescriptor temp=writes[i];
769                 TypeDescriptor type=temp.getType();
770                 if ((type.isPtr()||type.isArray())&&GENERATEPRECISEGC)
771                     objecttemps.addPtr(temp);
772                 else
773                     objecttemps.addPrim(temp);
774                 if(lb!=null&&saveset.contains(temp)&&
775                    !backuptable.containsKey(temp))
776                     backuptable.put(temp, temp.createNew());
777             }
778         }
779
780         /* Create backup temps */
781         if (lb!=null) {
782             for(Iterator<TempDescriptor> tmpit=backuptable.values().iterator();tmpit.hasNext();) {
783                 TempDescriptor tmp=tmpit.next();
784                 TypeDescriptor type=tmp.getType();
785                 if ((type.isPtr()||type.isArray())&&GENERATEPRECISEGC)
786                     objecttemps.addPtr(tmp);
787                 else
788                     objecttemps.addPrim(tmp);
789             }
790             /* Create temp to hold revert table */
791             if (lb.getHasAtomic()) {
792                 TempDescriptor reverttmp=new TempDescriptor("revertlist", typeutil.getClass(TypeUtil.ObjectClass));
793                 reverttable.put(lb, reverttmp);
794             }
795         }
796     }
797
798     /** This method outputs the following information about classes
799      * and arrays:
800      * (1) For classes, what are the locations of pointers.
801      * (2) For arrays, does the array contain pointers or primitives.
802      * (3) For classes, does the class contain flags.
803      */
804
805     private void generateLayoutStructs(PrintWriter output) {
806         Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
807         while(it.hasNext()) {
808             ClassDescriptor cn=(ClassDescriptor)it.next();
809             output.println("unsigned int "+cn.getSafeSymbol()+"_pointers[]={");
810             Iterator allit=cn.getFieldTable().getAllDescriptorsIterator();
811             int count=0;
812             while(allit.hasNext()) {
813                 FieldDescriptor fd=(FieldDescriptor)allit.next();
814                 TypeDescriptor type=fd.getType();
815                 if (type.isPtr()||type.isArray())
816                     count++;
817             }
818             output.print(count);
819             allit=cn.getFieldTable().getAllDescriptorsIterator();
820             while(allit.hasNext()) {
821                 FieldDescriptor fd=(FieldDescriptor)allit.next();
822                 TypeDescriptor type=fd.getType();
823                 if (type.isPtr()||type.isArray()) {
824                     output.println(",");
825                     output.print("((unsigned int)&(((struct "+cn.getSafeSymbol() +" *)0)->"+fd.getSafeSymbol()+"))");
826                 }
827             }
828             output.println("};");
829         }
830         output.println("unsigned int * pointerarray[]={");
831         boolean needcomma=false;
832         for(int i=0;i<state.numClasses();i++) {
833             ClassDescriptor cn=cdarray[i];
834             if (needcomma)
835                 output.println(",");
836             needcomma=true;
837             output.print(cn.getSafeSymbol()+"_pointers");
838         }
839
840         for(int i=0;i<state.numArrays();i++) {
841             if (needcomma)
842                 output.println(", ");
843             TypeDescriptor tdelement=arraytable[i].dereference();
844             if (tdelement.isArray()||tdelement.isClass())
845                 output.print("((unsigned int *)1)");
846             else
847                 output.print("0");
848             needcomma=true;
849         }
850         
851         output.println("};");
852         needcomma=false;
853         output.println("int hasflags[]={");
854         for(int i=0;i<state.numClasses();i++) {
855             ClassDescriptor cn=cdarray[i];
856             if (needcomma)
857                 output.println(", ");
858             needcomma=true;
859             if (cn.hasFlags())
860                 output.print("1");
861             else
862                 output.print("0");
863         }
864         output.println("};");
865     }
866
867     /** Print out table to give us supertypes */
868     private void generateSuperTypeTable(PrintWriter output) {
869         output.println("int supertypes[]={");
870         boolean needcomma=false;
871         for(int i=0;i<state.numClasses();i++) {
872             ClassDescriptor cn=cdarray[i];
873             if (needcomma)
874                 output.println(",");
875             needcomma=true;
876             if (cn.getSuperDesc()!=null) {
877                 ClassDescriptor cdsuper=cn.getSuperDesc();
878                 output.print(cdsuper.getId());
879             } else
880                 output.print("-1");
881         }
882         output.println("};");
883     }
884
885     /** Force consistent field ordering between inherited classes. */
886
887     private void printClassStruct(ClassDescriptor cn, PrintWriter classdefout) {
888         
889         ClassDescriptor sp=cn.getSuperDesc();
890         if (sp!=null)
891             printClassStruct(sp, classdefout);
892         
893         if (!fieldorder.containsKey(cn)) {
894             Vector fields=new Vector();
895             fieldorder.put(cn,fields);
896             Iterator fieldit=cn.getFields();
897             while(fieldit.hasNext()) {
898                 FieldDescriptor fd=(FieldDescriptor)fieldit.next();
899                 if (sp==null||!sp.getFieldTable().contains(fd.getSymbol()))
900                     fields.add(fd);
901             }
902         }
903         Vector fields=(Vector)fieldorder.get(cn);
904
905         for(int i=0;i<fields.size();i++) {
906             FieldDescriptor fd=(FieldDescriptor)fields.get(i);
907             if (fd.getType().isClass()||fd.getType().isArray())
908                 classdefout.println("  struct "+fd.getType().getSafeSymbol()+" * "+fd.getSafeSymbol()+";");
909             else 
910                 classdefout.println("  "+fd.getType().getSafeSymbol()+" "+fd.getSafeSymbol()+";");
911         }
912     }
913
914
915     /* Map flags to integers consistently between inherited
916      * classes. */
917
918     private void mapFlags(ClassDescriptor cn) {
919         ClassDescriptor sp=cn.getSuperDesc();
920         if (sp!=null)
921             mapFlags(sp);
922         int max=0;
923         if (!flagorder.containsKey(cn)) {
924             Hashtable flags=new Hashtable();
925             flagorder.put(cn,flags);
926             if (sp!=null) {
927                 Hashtable superflags=(Hashtable)flagorder.get(sp);
928                 Iterator superflagit=superflags.keySet().iterator();
929                 while(superflagit.hasNext()) {
930                     FlagDescriptor fd=(FlagDescriptor)superflagit.next();
931                     Integer number=(Integer)superflags.get(fd);
932                     flags.put(fd, number);
933                     if ((number.intValue()+1)>max)
934                         max=number.intValue()+1;
935                 }
936             }
937             
938             Iterator flagit=cn.getFlags();
939             while(flagit.hasNext()) {
940                 FlagDescriptor fd=(FlagDescriptor)flagit.next();
941                 if (sp==null||!sp.getFlagTable().contains(fd.getSymbol()))
942                     flags.put(fd, new Integer(max++));
943             }
944         }
945     }
946
947
948     /** This function outputs (1) structures that parameters are
949      * passed in (when PRECISE GC is enabled) and (2) function
950      * prototypes for the methods */
951
952     private void generateCallStructs(ClassDescriptor cn, PrintWriter classdefout, PrintWriter output, PrintWriter headersout) {
953         /* Output class structure */
954         classdefout.println("struct "+cn.getSafeSymbol()+" {");
955         classdefout.println("  int type;");
956         if (state.THREAD) {
957             classdefout.println("  pthread_t tid;");
958             classdefout.println("  void * lockentry;");
959             classdefout.println("  int lockcount;");
960         }
961
962         if (state.TASK) {
963             classdefout.println("  int flag;");
964             classdefout.println("  void * flagptr;");
965             if (state.OPTIONAL){
966                 classdefout.println("  int failedstatus;");
967                 classdefout.println("  int hashcode;");
968                 classdefout.println("  int numexitfses;");
969                 classdefout.println("  int * exitfses;");
970                 classdefout.println("  int numotds;");
971                 classdefout.println("  struct optionaltaskdescriptor ** otds;");
972             }
973         }
974         printClassStruct(cn, classdefout);
975         classdefout.println("};\n");
976
977         if (state.DSM) {
978             /* Cycle through LocalityBindings */
979             HashSet<MethodDescriptor> nativemethods=new HashSet<MethodDescriptor>();
980             Set<LocalityBinding> lbset=locality.getClassBindings(cn);
981             if (lbset!=null) {
982                 for(Iterator<LocalityBinding> lbit=lbset.iterator();lbit.hasNext();) {
983                     LocalityBinding lb=lbit.next();
984                     MethodDescriptor md=lb.getMethod();
985                     if (md.getModifiers().isNative()) {
986                         //make sure we only print a native method once
987                         if (nativemethods.contains(md))
988                             continue;
989                         else
990                             nativemethods.add(md);
991                     }
992                     generateMethod(cn, md, lb, headersout, output);
993                 }
994             }
995             for(Iterator methodit=cn.getMethods();methodit.hasNext();) {
996                 MethodDescriptor md=(MethodDescriptor)methodit.next();
997                 if (md.getModifiers().isNative()&&!nativemethods.contains(md)) {
998                     //Need to build param structure for library code
999                     FlatMethod fm=state.getMethodFlat(md);
1000                     generateTempStructs(fm, null);
1001                     generateMethodParam(cn, md, null, output);
1002                 }
1003             }
1004
1005         } else
1006             for(Iterator methodit=cn.getMethods();methodit.hasNext();) {
1007                 MethodDescriptor md=(MethodDescriptor)methodit.next();
1008                 generateMethod(cn, md, null, headersout, output);
1009             }
1010     }
1011
1012     private void generateMethodParam(ClassDescriptor cn, MethodDescriptor md, LocalityBinding lb, PrintWriter output) {
1013         /* Output parameter structure */
1014         if (GENERATEPRECISEGC) {
1015             ParamsObject objectparams=(ParamsObject) paramstable.get(md);
1016             if (state.DSM&&lb!=null)
1017                 output.println("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params {");
1018             else
1019                 output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params {");
1020             output.println("  int size;");
1021             output.println("  void * next;");
1022             for(int i=0;i<objectparams.numPointers();i++) {
1023                 TempDescriptor temp=objectparams.getPointer(i);
1024                 output.println("  struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1025             }
1026             output.println("};\n");
1027         }
1028     }
1029
1030
1031     private void generateMethod(ClassDescriptor cn, MethodDescriptor md, LocalityBinding lb, PrintWriter headersout, PrintWriter output) {
1032         FlatMethod fm=state.getMethodFlat(md);
1033         generateTempStructs(fm, lb);
1034         
1035         ParamsObject objectparams=(ParamsObject) paramstable.get(md);
1036         TempObject objecttemps=(TempObject) tempstable.get(md);
1037         
1038         generateMethodParam(cn, md, lb, output);
1039         
1040         /* Output temp structure */
1041         if (GENERATEPRECISEGC) {
1042             if (state.DSM)
1043                 output.println("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals {");
1044             else
1045                 output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals {");
1046             output.println("  int size;");
1047             output.println("  void * next;");
1048             for(int i=0;i<objecttemps.numPointers();i++) {
1049                 TempDescriptor temp=objecttemps.getPointer(i);
1050                 if (temp.getType().isNull())
1051                     output.println("  void * "+temp.getSafeSymbol()+";");
1052                 else
1053                     output.println("  struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1054             }
1055             output.println("};\n");
1056         }
1057         
1058         /********* Output method declaration ***********/
1059
1060         /* First the return type */
1061         if (md.getReturnType()!=null) {
1062             if (md.getReturnType().isClass()||md.getReturnType().isArray())
1063                 headersout.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
1064             else
1065                 headersout.print(md.getReturnType().getSafeSymbol()+" ");
1066         } else 
1067             //catch the constructor case
1068             headersout.print("void ");
1069
1070         /* Next the method name */
1071         if (state.DSM) {
1072             headersout.print(cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1073         } else
1074             headersout.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1075         
1076         boolean printcomma=false;
1077         if (GENERATEPRECISEGC) {
1078             if (state.DSM) {
1079                 headersout.print("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1080             } else
1081                 headersout.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1082             printcomma=true;
1083         }
1084         
1085         if (state.DSM&&lb.isAtomic()) {
1086             if (printcomma)
1087                 headersout.print(", ");
1088             headersout.print("transrecord_t * trans");
1089             printcomma=true;
1090         }
1091
1092         /*  Output parameter list*/
1093         for(int i=0;i<objectparams.numPrimitives();i++) {
1094             TempDescriptor temp=objectparams.getPrimitive(i);
1095             if (printcomma)
1096                 headersout.print(", ");
1097             printcomma=true;
1098             if (temp.getType().isClass()||temp.getType().isArray())
1099                 headersout.print("struct " + temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
1100             else
1101                 headersout.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
1102         }
1103         headersout.println(");\n");
1104     }
1105
1106
1107     /** This function outputs (1) structures that parameters are
1108      * passed in (when PRECISE GC is enabled) and (2) function
1109      * prototypes for the tasks */
1110
1111     private void generateTaskStructs(PrintWriter output, PrintWriter headersout) {
1112         /* Cycle through tasks */
1113         Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
1114
1115         while(taskit.hasNext()) {
1116             /* Classify parameters */
1117             TaskDescriptor task=(TaskDescriptor)taskit.next();
1118             FlatMethod fm=state.getMethodFlat(task);
1119             generateTempStructs(fm, null);
1120
1121             ParamsObject objectparams=(ParamsObject) paramstable.get(task);
1122             TempObject objecttemps=(TempObject) tempstable.get(task);
1123
1124             /* Output parameter structure */
1125             if (GENERATEPRECISEGC) {
1126                 output.println("struct "+task.getSafeSymbol()+"_params {");
1127
1128                 output.println("  int size;");
1129                 output.println("  void * next;");
1130                 for(int i=0;i<objectparams.numPointers();i++) {
1131                     TempDescriptor temp=objectparams.getPointer(i);
1132                     output.println("  struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1133                 }
1134
1135                 output.println("};\n");
1136                 if ((objectparams.numPointers()+fm.numTags())>maxtaskparams) {
1137                     maxtaskparams=objectparams.numPointers()+fm.numTags();
1138                 }
1139             }
1140
1141             /* Output temp structure */
1142             if (GENERATEPRECISEGC) {
1143                 output.println("struct "+task.getSafeSymbol()+"_locals {");
1144                 output.println("  int size;");
1145                 output.println("  void * next;");
1146                 for(int i=0;i<objecttemps.numPointers();i++) {
1147                     TempDescriptor temp=objecttemps.getPointer(i);
1148                     if (temp.getType().isNull())
1149                         output.println("  void * "+temp.getSafeSymbol()+";");
1150                     else if(temp.getType().isTag())
1151                         output.println("  struct "+
1152                                        (new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1153                     else
1154                         output.println("  struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1155                 }
1156                 output.println("};\n");
1157             }
1158             
1159             /* Output task declaration */
1160             headersout.print("void " + task.getSafeSymbol()+"(");
1161             
1162             boolean printcomma=false;
1163             if (GENERATEPRECISEGC) {
1164                 headersout.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
1165             } else
1166                 headersout.print("void * parameterarray[]");
1167             headersout.println(");\n");
1168         }
1169     }
1170
1171     /***** Generate code for FlatMethod fm. *****/
1172
1173     private void generateFlatMethod(FlatMethod fm, LocalityBinding lb, PrintWriter output) {
1174         MethodDescriptor md=fm.getMethod();
1175         TaskDescriptor task=fm.getTask();
1176
1177         ClassDescriptor cn=md!=null?md.getClassDesc():null;
1178
1179         ParamsObject objectparams=(ParamsObject)paramstable.get(md!=null?md:task);
1180         generateHeader(fm, lb, md!=null?md:task,output);
1181         TempObject objecttemp=(TempObject) tempstable.get(md!=null?md:task);
1182         if (state.DSM&&lb.getHasAtomic()) {
1183             output.println("transrecord_t * trans;");
1184         }
1185
1186         if (GENERATEPRECISEGC) {
1187             if (md!=null&&state.DSM)
1188                 output.print("   struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+"={");
1189             else if (md!=null&&!state.DSM)
1190                 output.print("   struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+"={");
1191             else
1192                 output.print("   struct "+task.getSafeSymbol()+"_locals "+localsprefix+"={");
1193
1194             output.print(objecttemp.numPointers()+",");
1195             output.print(paramsprefix);
1196             for(int j=0;j<objecttemp.numPointers();j++)
1197                 output.print(", NULL");
1198             output.println("};");
1199         }
1200
1201         for(int i=0;i<objecttemp.numPrimitives();i++) {
1202             TempDescriptor td=objecttemp.getPrimitive(i);
1203             TypeDescriptor type=td.getType();
1204             if (type.isNull())
1205                 output.println("   void * "+td.getSafeSymbol()+";");
1206             else if (type.isClass()||type.isArray())
1207                 output.println("   struct "+type.getSafeSymbol()+" * "+td.getSafeSymbol()+";");
1208             else
1209                 output.println("   "+type.getSafeSymbol()+" "+td.getSafeSymbol()+";");
1210         }
1211
1212         /* Assign labels to FlatNode's if necessary.*/
1213
1214         Hashtable<FlatNode, Integer> nodetolabel=assignLabels(fm);
1215
1216         /* Check to see if we need to do a GC if this is a
1217          * multi-threaded program...*/
1218
1219         if (state.THREAD&&GENERATEPRECISEGC) {
1220             output.println("checkcollect(&"+localsprefix+");");
1221         }
1222         
1223         /* Do the actual code generation */
1224         FlatNode current_node=null;
1225         HashSet tovisit=new HashSet();
1226         HashSet visited=new HashSet();
1227         tovisit.add(fm.getNext(0));
1228         while(current_node!=null||!tovisit.isEmpty()) {
1229             if (current_node==null) {
1230                 current_node=(FlatNode)tovisit.iterator().next();
1231                 tovisit.remove(current_node);
1232             }
1233             visited.add(current_node);
1234             if (nodetolabel.containsKey(current_node))
1235                 output.println("L"+nodetolabel.get(current_node)+":");
1236             if (state.INSTRUCTIONFAILURE) {
1237                 if (state.THREAD) {
1238                     output.println("if ((++instructioncount)>failurecount) {instructioncount=0;injectinstructionfailure();}");
1239                 }
1240                 else
1241                     output.println("if ((--instructioncount)==0) injectinstructionfailure();");
1242             }
1243             if (current_node.numNext()==0) {
1244                 output.print("   ");
1245                 generateFlatNode(fm, lb, current_node, output);
1246                 if (current_node.kind()!=FKind.FlatReturnNode) {
1247                     output.println("   return;");
1248                 }
1249                 current_node=null;
1250             } else if(current_node.numNext()==1) {
1251                 output.print("   ");
1252                 generateFlatNode(fm, lb, current_node, output);
1253                 FlatNode nextnode=current_node.getNext(0);
1254                 if (visited.contains(nextnode)) {
1255                     output.println("goto L"+nodetolabel.get(nextnode)+";");
1256                     current_node=null;
1257                 } else
1258                     current_node=nextnode;
1259             } else if (current_node.numNext()==2) {
1260                 /* Branch */
1261                 output.print("   ");
1262                 generateFlatCondBranch(fm, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
1263                 if (!visited.contains(current_node.getNext(1)))
1264                     tovisit.add(current_node.getNext(1));
1265                 if (visited.contains(current_node.getNext(0))) {
1266                     output.println("goto L"+nodetolabel.get(current_node.getNext(0))+";");
1267                     current_node=null;
1268                 } else
1269                     current_node=current_node.getNext(0);
1270             } else throw new Error();
1271         }
1272
1273         output.println("}\n\n");
1274     }
1275
1276     /** This method assigns labels to FlatNodes */
1277
1278     private Hashtable<FlatNode, Integer> assignLabels(FlatMethod fm) {
1279         HashSet tovisit=new HashSet();
1280         HashSet visited=new HashSet();
1281         int labelindex=0;
1282         Hashtable<FlatNode, Integer> nodetolabel=new Hashtable<FlatNode, Integer>();
1283         tovisit.add(fm.getNext(0));
1284
1285         /*Assign labels first.  A node needs a label if the previous
1286          * node has two exits or this node is a join point. */
1287
1288         while(!tovisit.isEmpty()) {
1289             FlatNode fn=(FlatNode)tovisit.iterator().next();
1290             tovisit.remove(fn);
1291             visited.add(fn);
1292             for(int i=0;i<fn.numNext();i++) {
1293                 FlatNode nn=fn.getNext(i);
1294                 if(i>0) {
1295                     //1) Edge >1 of node
1296                     nodetolabel.put(nn,new Integer(labelindex++));
1297                 }
1298                 if (!visited.contains(nn)&&!tovisit.contains(nn)) {
1299                     tovisit.add(nn);
1300                 } else {
1301                     //2) Join point
1302                     nodetolabel.put(nn,new Integer(labelindex++));
1303                 }
1304             }
1305         }
1306         return nodetolabel;
1307     }
1308
1309
1310     /** Generate text string that corresponds to the TempDescriptor td. */
1311     private String generateTemp(FlatMethod fm, TempDescriptor td) {
1312         MethodDescriptor md=fm.getMethod();
1313         TaskDescriptor task=fm.getTask();
1314         TempObject objecttemps=(TempObject) tempstable.get(md!=null?md:task);
1315
1316         if (objecttemps.isLocalPrim(td)||objecttemps.isParamPrim(td)) {
1317             return td.getSafeSymbol();
1318         }
1319
1320         if (objecttemps.isLocalPtr(td)) {
1321             return localsprefix+"."+td.getSafeSymbol();
1322         }
1323
1324         if (objecttemps.isParamPtr(td)) {
1325             return paramsprefix+"->"+td.getSafeSymbol();
1326         }
1327         throw new Error();
1328     }
1329
1330     private void generateFlatNode(FlatMethod fm, LocalityBinding lb, FlatNode fn, PrintWriter output) {
1331         switch(fn.kind()) {
1332         case FKind.FlatAtomicEnterNode:
1333             generateFlatAtomicEnterNode(fm, lb, (FlatAtomicEnterNode) fn, output);
1334             return;
1335         case FKind.FlatAtomicExitNode:
1336             generateFlatAtomicExitNode(fm, lb, (FlatAtomicExitNode) fn, output);
1337             return;
1338         case FKind.FlatGlobalConvNode:
1339             generateFlatGlobalConvNode(fm, lb, (FlatGlobalConvNode) fn, output);
1340             return;
1341         case FKind.FlatTagDeclaration:
1342             generateFlatTagDeclaration(fm, (FlatTagDeclaration) fn,output);
1343             return;
1344         case FKind.FlatCall:
1345             generateFlatCall(fm, lb, (FlatCall) fn,output);
1346             return;
1347         case FKind.FlatFieldNode:
1348             generateFlatFieldNode(fm, lb, (FlatFieldNode) fn,output);
1349             return;
1350         case FKind.FlatElementNode:
1351             generateFlatElementNode(fm, (FlatElementNode) fn,output);
1352             return;
1353         case FKind.FlatSetElementNode:
1354             generateFlatSetElementNode(fm, (FlatSetElementNode) fn,output);
1355             return;
1356         case FKind.FlatSetFieldNode:
1357             generateFlatSetFieldNode(fm, lb, (FlatSetFieldNode) fn,output);
1358             return;
1359         case FKind.FlatNew:
1360             generateFlatNew(fm, (FlatNew) fn,output);
1361             return;
1362         case FKind.FlatOpNode:
1363             generateFlatOpNode(fm, (FlatOpNode) fn,output);
1364             return;
1365         case FKind.FlatCastNode:
1366             generateFlatCastNode(fm, (FlatCastNode) fn,output);
1367             return;
1368         case FKind.FlatLiteralNode:
1369             generateFlatLiteralNode(fm, (FlatLiteralNode) fn,output);
1370             return;
1371         case FKind.FlatReturnNode:
1372             generateFlatReturnNode(fm, (FlatReturnNode) fn,output);
1373             return;
1374         case FKind.FlatNop:
1375             output.println("/* nop */");
1376             return;
1377         case FKind.FlatBackEdge:
1378             if (state.THREAD&&GENERATEPRECISEGC) {
1379                 output.println("checkcollect(&"+localsprefix+");");
1380             } else
1381                 output.println("/* nop */");
1382             return;
1383         case FKind.FlatCheckNode:
1384             generateFlatCheckNode(fm, (FlatCheckNode) fn, output);
1385             return;
1386         case FKind.FlatFlagActionNode:
1387             generateFlatFlagActionNode(fm, (FlatFlagActionNode) fn, output);
1388             return;
1389         }
1390         throw new Error();
1391
1392     }
1393     
1394     public void generateFlatGlobalConvNode(FlatMethod fm, LocalityBinding lb, FlatGlobalConvNode fgcn, PrintWriter output) {
1395         if (lb!=fgcn.getLocality())
1396             return;
1397         /* Have to generate flat globalconv */
1398         if (fgcn.getMakePtr()) {
1399             output.println(generateTemp(fm, fgcn.getSrc())+"=transRead(trans,"+generateTemp(fm, fgcn.getSrc())+");");
1400         } else {
1401             /* Need to convert to OID */
1402             output.println(generateTemp(fm, fgcn.getSrc())+"=OID("+generateTemp(fm, fgcn.getSrc())+");");
1403         }
1404     }
1405
1406     public void generateFlatAtomicEnterNode(FlatMethod fm,  LocalityBinding lb, FlatAtomicEnterNode faen, PrintWriter output) {
1407         /* Check to see if we need to generate code for this atomic */
1408         if (locality.getAtomic(lb).get(faen.getPrev(0)).intValue()>0)
1409             return;
1410         /* Backup the temps. */
1411         for(Iterator<TempDescriptor> tmpit=locality.getTemps(lb).get(faen).iterator();tmpit.hasNext();) {
1412             TempDescriptor tmp=tmpit.next();
1413             output.println(generateTemp(fm, backuptable.get(tmp))+"="+generateTemp(fm,tmp)+";");
1414         }
1415         output.println("goto transstart"+faen.getIdentifier()+";");
1416
1417         /******* Print code to retry aborted transaction *******/
1418         output.println("transretry"+faen.getIdentifier()+":");
1419
1420         /* Restore temps */
1421         for(Iterator<TempDescriptor> tmpit=locality.getTemps(lb).get(faen).iterator();tmpit.hasNext();) {
1422             TempDescriptor tmp=tmpit.next();
1423             output.println(generateTemp(fm, tmp)+"="+generateTemp(fm,backuptable.get(tmp))+";");
1424         }
1425
1426         /********* Need to revert local object store ********/
1427         String revertptr=generateTemp(fm, reverttable.get(lb));
1428         
1429         output.println("while ("+revertptr+") {");
1430         output.println("struct ___Object___ * tmpptr;");
1431         output.println("tmpptr="+revertptr+"->"+nextobjstr+";");
1432         output.println("REVERT_OBJ("+revertptr+");");
1433         output.println(revertptr+"=tmpptr;");
1434         output.println("}");
1435
1436         /******* Tell the runtime to start the transaction *******/
1437         
1438         output.println("transstart"+faen.getIdentifier()+":");
1439         output.println("trans=transStart();");
1440     }
1441
1442     public void generateFlatAtomicExitNode(FlatMethod fm,  LocalityBinding lb, FlatAtomicExitNode faen, PrintWriter output) {
1443         /* Check to see if we need to generate code for this atomic */
1444         if (locality.getAtomic(lb).get(faen).intValue()>0)
1445             return;
1446         //store the revert list before we lose the transaction object
1447         String revertptr=generateTemp(fm, reverttable.get(lb));
1448         output.println(revertptr+"=trans->revertlist;");
1449         output.println("if (transCommit(trans)) {");
1450         /* Transaction aborts if it returns true */
1451         output.println("goto transretry"+faen.getAtomicEnter().getIdentifier()+";");
1452         output.println("} else {");
1453         /* Need to commit local object store */
1454         output.println("while ("+revertptr+") {");
1455         output.println("struct ___Object___ * tmpptr;");
1456         output.println("tmpptr="+revertptr+"->"+nextobjstr+";");
1457         output.println("COMMIT_OBJ("+revertptr+");");
1458         output.println(revertptr+"=tmpptr;");
1459         output.println("}");
1460         output.println("}");
1461     }
1462
1463     private void generateFlatCheckNode(FlatMethod fm,  FlatCheckNode fcn, PrintWriter output) {
1464         if (state.CONSCHECK) {
1465             String specname=fcn.getSpec();
1466             String varname="repairstate___";
1467             output.println("{");
1468             output.println("struct "+specname+"_state * "+varname+"=allocate"+specname+"_state();");
1469
1470             TempDescriptor[] temps=fcn.getTemps();
1471             String[] vars=fcn.getVars();
1472             for(int i=0;i<temps.length;i++) {
1473                 output.println(varname+"->"+vars[i]+"=(unsigned int)"+generateTemp(fm, temps[i])+";");
1474             }
1475
1476             output.println("if (doanalysis"+specname+"("+varname+")) {");
1477             output.println("free"+specname+"_state("+varname+");");
1478             output.println("} else {");
1479             output.println("/* Bad invariant */");
1480             output.println("free"+specname+"_state("+varname+");");
1481             output.println("abort_task();");
1482             output.println("}");
1483             output.println("}");
1484         }
1485     }
1486
1487     private void generateFlatCall(FlatMethod fm, LocalityBinding lb, FlatCall fc, PrintWriter output) {
1488         MethodDescriptor md=fc.getMethod();
1489         ParamsObject objectparams=(ParamsObject) paramstable.get(md);
1490         ClassDescriptor cn=md.getClassDesc();
1491         output.println("{");
1492         if (GENERATEPRECISEGC) {
1493             if (state.DSM) {
1494                 LocalityBinding fclb=locality.getBinding(lb, fc);
1495                 output.print("       struct "+cn.getSafeSymbol()+fclb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
1496             } else
1497                 output.print("       struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
1498             
1499             output.print(objectparams.numPointers());
1500             //      output.print(objectparams.getUID());
1501             output.print(", & "+localsprefix);
1502             if (fc.getThis()!=null) {
1503                 output.print(", ");
1504                 output.print("(struct "+md.getThis().getType().getSafeSymbol() +" *)"+ generateTemp(fm,fc.getThis()));
1505             }
1506             for(int i=0;i<fc.numArgs();i++) {
1507                 Descriptor var=md.getParameter(i);
1508                 TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
1509                 if (objectparams.isParamPtr(paramtemp)) {
1510                     TempDescriptor targ=fc.getArg(i);
1511                     output.print(", ");
1512                     TypeDescriptor td=md.getParamType(i);
1513                     if (td.isTag())
1514                         output.print("(struct "+(new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol()  +" *)"+generateTemp(fm, targ));
1515                     else
1516                         output.print("(struct "+md.getParamType(i).getSafeSymbol()  +" *)"+generateTemp(fm, targ));
1517                 }
1518             }
1519             output.println("};");
1520         }
1521         output.print("       ");
1522
1523
1524         if (fc.getReturnTemp()!=null)
1525             output.print(generateTemp(fm,fc.getReturnTemp())+"=");
1526
1527         /* Do we need to do virtual dispatch? */
1528         if (md.isStatic()||md.getReturnType()==null||singleCall(fc.getThis().getType().getClassDesc(),md)) {
1529             //no
1530             if (state.DSM) {
1531                 LocalityBinding fclb=locality.getBinding(lb, fc);
1532                 output.print(cn.getSafeSymbol()+fclb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
1533             } else {
1534                 output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
1535             }
1536         } else {
1537             //yes
1538             output.print("((");
1539             if (md.getReturnType().isClass()||md.getReturnType().isArray())
1540                 output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
1541             else
1542                 output.print(md.getReturnType().getSafeSymbol()+" ");
1543             output.print("(*)(");
1544
1545             boolean printcomma=false;
1546             if (GENERATEPRECISEGC) {
1547                 if (state.DSM) {
1548                     LocalityBinding fclb=locality.getBinding(lb, fc);
1549                     output.print("struct "+cn.getSafeSymbol()+fclb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * ");
1550                 } else
1551                     output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * ");
1552                 printcomma=true;
1553             }
1554
1555             for(int i=0;i<objectparams.numPrimitives();i++) {
1556                 TempDescriptor temp=objectparams.getPrimitive(i);
1557                 if (printcomma)
1558                     output.print(", ");
1559                 printcomma=true;
1560                 if (temp.getType().isClass()||temp.getType().isArray())
1561                     output.print("struct " + temp.getType().getSafeSymbol()+" * ");
1562                 else
1563                     output.print(temp.getType().getSafeSymbol());
1564             }
1565
1566             if (state.DSM) {
1567                 LocalityBinding fclb=locality.getBinding(lb, fc);
1568                 output.print("))virtualtable["+generateTemp(fm,fc.getThis())+"->type*"+maxcount+"+"+virtualcalls.getLocalityNumber(fclb)+"])");
1569             } else
1570                 output.print("))virtualtable["+generateTemp(fm,fc.getThis())+"->type*"+maxcount+"+"+virtualcalls.getMethodNumber(md)+"])");
1571         }
1572
1573         output.print("(");
1574         boolean needcomma=false;
1575         if (GENERATEPRECISEGC) {
1576             output.print("&__parameterlist__");
1577             needcomma=true;
1578         } else {
1579             if (fc.getThis()!=null) {
1580                 TypeDescriptor ptd=md.getThis().getType();
1581                 if (ptd.isClass()&&!ptd.isArray())
1582                     output.print("(struct "+ptd.getSafeSymbol()+" *) ");
1583                 output.print(generateTemp(fm,fc.getThis()));
1584                 needcomma=true;
1585             }
1586         }
1587         for(int i=0;i<fc.numArgs();i++) {
1588             Descriptor var=md.getParameter(i);
1589             TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
1590             if (objectparams.isParamPrim(paramtemp)) {
1591                 TempDescriptor targ=fc.getArg(i);
1592                 if (needcomma)
1593                     output.print(", ");
1594
1595                 TypeDescriptor ptd=md.getParamType(i);
1596                 if (ptd.isClass()&&!ptd.isArray())
1597                     output.print("(struct "+ptd.getSafeSymbol()+" *) ");
1598                 output.print(generateTemp(fm, targ));
1599                 needcomma=true;
1600             }
1601         }
1602         output.println(");");
1603         output.println("   }");
1604     }
1605
1606     private boolean singleCall(ClassDescriptor thiscd, MethodDescriptor md) {
1607         Set subclasses=typeutil.getSubClasses(thiscd);
1608         if (subclasses==null)
1609             return true;
1610         for(Iterator classit=subclasses.iterator();classit.hasNext();) {
1611             ClassDescriptor cd=(ClassDescriptor)classit.next();
1612             Set possiblematches=cd.getMethodTable().getSet(md.getSymbol());
1613             for(Iterator matchit=possiblematches.iterator();matchit.hasNext();) {
1614                 MethodDescriptor matchmd=(MethodDescriptor)matchit.next();
1615                 if (md.matches(matchmd))
1616                     return false;
1617             }
1618         }
1619         return true;
1620     }
1621
1622     private void generateFlatFieldNode(FlatMethod fm, LocalityBinding lb, FlatFieldNode ffn, PrintWriter output) {
1623         if (state.DSM) {
1624             Integer status=locality.getNodeTempInfo(lb).get(ffn).get(ffn.getSrc());
1625             if (status==LocalityAnalysis.GLOBAL) {
1626                 String field=ffn.getField().getSafeSymbol();
1627                 String src="((struct "+ffn.getSrc().getType().getSafeSymbol()+" *)((unsigned int)"+generateTemp(fm, ffn.getSrc())+"+sizeof(objheader_t)))";
1628                 String dst=generateTemp(fm, ffn.getDst());
1629                     
1630                 if (ffn.getField().getType().isPtr()||
1631                     ffn.getField().getType().isArray()) {
1632
1633                     //TODO: Uncomment this when we have runtime support
1634                     //if (ffn.getSrc()==ffn.getDst()) {
1635                     //output.println("{");
1636                     //output.println("void * temp="+src+";");
1637                     //output.println("if (temp&0x1) {");
1638                     //output.println("temp=transRead(trans, temp);");
1639                     //output.println(src+"->"+field+"="+temp+";");
1640                     //output.println("}");
1641                     //output.println(dst+"=temp;");
1642                     //output.println("}");
1643                     //} else {
1644                     output.println(dst+"="+ src +"->"+field+ ";");
1645                     //output.println("if ("+dst+"&0x1) {");
1646                     output.println(dst+"=transRead(trans,"+dst+");");
1647                     //output.println(src+"->"+field+"="+src+"->"+field+";");
1648                     //output.println("}");
1649                     //}
1650                 } else {
1651                     output.println(dst+"="+ src+"->"+field+";");
1652                 }
1653             } else if (status==LocalityAnalysis.LOCAL) {
1654                 output.println(generateTemp(fm, ffn.getDst())+"="+ generateTemp(fm,ffn.getSrc())+"->"+ ffn.getField().getSafeSymbol()+";");
1655             } else if (status==LocalityAnalysis.EITHER) {
1656                 //Code is reading from a null pointer
1657                 output.println("if ("+generateTemp(fm, ffn.getSrc())+") {");
1658                 output.println("printf(\"BIG ERROR\n\");exit(-1);}");
1659                 //This should throw a suitable null pointer error
1660                 output.println(generateTemp(fm, ffn.getDst())+"="+ generateTemp(fm,ffn.getSrc())+"->"+ ffn.getField().getSafeSymbol()+";");
1661             } else
1662                 throw new Error("Read from non-global/non-local in:"+lb.getExplanation());
1663         } else
1664             output.println(generateTemp(fm, ffn.getDst())+"="+ generateTemp(fm,ffn.getSrc())+"->"+ ffn.getField().getSafeSymbol()+";");
1665     }
1666
1667     private void generateFlatSetFieldNode(FlatMethod fm, LocalityBinding lb, FlatSetFieldNode fsfn, PrintWriter output) {
1668         if (fsfn.getField().getSymbol().equals("length")&&fsfn.getDst().getType().isArray())
1669             throw new Error("Can't set array length");
1670         if (state.DSM && locality.getAtomic(lb).get(fsfn).intValue()>0) {
1671             Integer statussrc=locality.getNodeTempInfo(lb).get(fsfn).get(fsfn.getDst());
1672             Integer statusdst=locality.getNodeTempInfo(lb).get(fsfn).get(fsfn.getDst());
1673             boolean srcglobal=statusdst==LocalityAnalysis.GLOBAL;
1674
1675             String src=generateTemp(fm,fsfn.getSrc());
1676             String dst=generateTemp(fm,fsfn.getDst());
1677             if (srcglobal) {
1678                 output.println("{");
1679                 output.println("int srcoid="+src+"->"+oidstr+";");
1680             }
1681             if (statusdst.equals(LocalityAnalysis.GLOBAL)) {
1682                 String glbdst="(struct "+fsfn.getDst().getType().getSafeSymbol()+" *)((unsigned int)"+dst+" +sizeof(objheader_t)))";
1683                 //mark it dirty
1684                 output.println("((objheader_t *)"+dst+")->status|=DIRTY;");
1685                 if (srcglobal)
1686                     output.println(glbdst+"->"+ fsfn.getField().getSafeSymbol()+"=srcoid;");
1687                 else
1688                     output.println(glbdst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");          
1689             } else if (statusdst.equals(LocalityAnalysis.LOCAL)) {
1690                 /** Check if we need to copy */
1691                 output.println("if(!"+dst+"->"+localcopystr+") {");
1692                 /* Link object into list */
1693                 output.println(dst+"->"+nextobjstr+"=trans->localtrans;");
1694                 output.println("trans->localtrans="+dst+";");
1695                 if (GENERATEPRECISEGC)
1696                     output.println("COPY_OBJ((struct garbagelist *)&"+localsprefix+",(struct ___Object___ *)"+dst+");");
1697                 else
1698                     output.println("COPY_OBJ("+dst+");");
1699                 output.println("}");
1700                 if (srcglobal)
1701                     output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"=srcoid;");
1702                 else
1703                     output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
1704             } else if (statusdst.equals(LocalityAnalysis.EITHER)) {
1705                 //writing to a null...bad
1706                 output.println("if ("+dst+") {");
1707                 output.println("printf(\"BIG ERROR 2\n\");exit(-1);}");
1708                 if (srcglobal)
1709                     output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"=srcoid;");
1710                 else
1711                     output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
1712             }
1713             if (srcglobal) {
1714                 output.println("}");
1715             }
1716         } else {
1717             output.println(generateTemp(fm, fsfn.getDst())+"->"+ fsfn.getField().getSafeSymbol()+"="+ generateTemp(fm,fsfn.getSrc())+";");
1718         }
1719     }
1720
1721     private void generateFlatElementNode(FlatMethod fm, FlatElementNode fen, PrintWriter output) {
1722         TypeDescriptor elementtype=fen.getSrc().getType().dereference();
1723         String type="";
1724
1725         if (elementtype.isArray()||elementtype.isClass())
1726             type="void *";
1727         else 
1728             type=elementtype.getSafeSymbol()+" ";
1729
1730         if (fen.needsBoundsCheck()) {
1731             output.println("if ("+generateTemp(fm, fen.getIndex())+"< 0 || "+generateTemp(fm, fen.getIndex())+" >= "+generateTemp(fm,fen.getSrc()) + "->___length___)");
1732             output.println("failedboundschk();");
1733         }
1734
1735         output.println(generateTemp(fm, fen.getDst())+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc())+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex())+"];");
1736     }
1737
1738     private void generateFlatSetElementNode(FlatMethod fm, FlatSetElementNode fsen, PrintWriter output) {
1739         //TODO: need dynamic check to make sure this assignment is actually legal
1740         //Because Object[] could actually be something more specific...ie. Integer[]
1741
1742         TypeDescriptor elementtype=fsen.getDst().getType().dereference();
1743         String type="";
1744
1745         if (elementtype.isArray()||elementtype.isClass())
1746             type="void *";
1747         else 
1748             type=elementtype.getSafeSymbol()+" ";
1749
1750         if (fsen.needsBoundsCheck()) {
1751             output.println("if ("+generateTemp(fm, fsen.getIndex())+"< 0 || "+generateTemp(fm, fsen.getIndex())+" >= "+generateTemp(fm,fsen.getDst()) + "->___length___)");
1752             output.println("failedboundschk();");
1753         }
1754
1755         output.println("(("+type +"*)(((char *) &("+ generateTemp(fm,fsen.getDst())+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex())+"]="+generateTemp(fm,fsen.getSrc())+";");
1756     }
1757
1758     private void generateFlatNew(FlatMethod fm, FlatNew fn, PrintWriter output) {
1759         if (fn.getType().isArray()) {
1760             int arrayid=state.getArrayNumber(fn.getType())+state.numClasses();
1761             if (GENERATEPRECISEGC) {
1762                 output.println(generateTemp(fm,fn.getDst())+"=allocate_newarray(&"+localsprefix+", "+arrayid+", "+generateTemp(fm, fn.getSize())+");");
1763             } else {
1764                 output.println(generateTemp(fm,fn.getDst())+"=allocate_newarray("+arrayid+", "+generateTemp(fm, fn.getSize())+");");
1765             }
1766         } else {
1767             if (GENERATEPRECISEGC) {
1768                 output.println(generateTemp(fm,fn.getDst())+"=allocate_new(&"+localsprefix+", "+fn.getType().getClassDesc().getId()+");");
1769             } else {
1770                 output.println(generateTemp(fm,fn.getDst())+"=allocate_new("+fn.getType().getClassDesc().getId()+");");
1771             }
1772         }
1773     }
1774
1775     private void generateFlatTagDeclaration(FlatMethod fm, FlatTagDeclaration fn, PrintWriter output) {
1776         if (GENERATEPRECISEGC) {
1777             output.println(generateTemp(fm,fn.getDst())+"=allocate_tag(&"+localsprefix+", "+state.getTagId(fn.getType())+");");
1778         } else {
1779             output.println(generateTemp(fm,fn.getDst())+"=allocate_tag("+state.getTagId(fn.getType())+");");
1780         }
1781     }
1782
1783     private void generateFlatOpNode(FlatMethod fm, FlatOpNode fon, PrintWriter output) {
1784         if (fon.getRight()!=null)
1785             output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+fon.getOp().toString()+generateTemp(fm,fon.getRight())+";");
1786         else if (fon.getOp().getOp()==Operation.ASSIGN)
1787             output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+";");
1788         else if (fon.getOp().getOp()==Operation.UNARYPLUS)
1789             output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+";");
1790         else if (fon.getOp().getOp()==Operation.UNARYMINUS)
1791             output.println(generateTemp(fm, fon.getDest())+" = -"+generateTemp(fm, fon.getLeft())+";");
1792         else if (fon.getOp().getOp()==Operation.LOGIC_NOT)
1793             output.println(generateTemp(fm, fon.getDest())+" = !"+generateTemp(fm, fon.getLeft())+";");
1794         else
1795             output.println(generateTemp(fm, fon.getDest())+fon.getOp().toString()+generateTemp(fm, fon.getLeft())+";");
1796     }
1797
1798     private void generateFlatCastNode(FlatMethod fm, FlatCastNode fcn, PrintWriter output) {
1799         /* TODO: Do type check here */
1800         if (fcn.getType().isArray()) {
1801             throw new Error();
1802         } else if (fcn.getType().isClass())
1803             output.println(generateTemp(fm,fcn.getDst())+"=(struct "+fcn.getType().getSafeSymbol()+" *)"+generateTemp(fm,fcn.getSrc())+";");
1804         else
1805             output.println(generateTemp(fm,fcn.getDst())+"=("+fcn.getType().getSafeSymbol()+")"+generateTemp(fm,fcn.getSrc())+";");
1806     }
1807
1808     private void generateFlatLiteralNode(FlatMethod fm, FlatLiteralNode fln, PrintWriter output) {
1809         if (fln.getValue()==null)
1810             output.println(generateTemp(fm, fln.getDst())+"=0;");
1811         else if (fln.getType().getSymbol().equals(TypeUtil.StringClass)) {
1812             if (GENERATEPRECISEGC) {
1813                 output.println(generateTemp(fm, fln.getDst())+"=NewString(&"+localsprefix+", \""+FlatLiteralNode.escapeString((String)fln.getValue())+"\","+((String)fln.getValue()).length()+");");
1814             } else {
1815                 output.println(generateTemp(fm, fln.getDst())+"=NewString(\""+FlatLiteralNode.escapeString((String)fln.getValue())+"\","+((String)fln.getValue()).length()+");");
1816             }
1817         } else if (fln.getType().isBoolean()) {
1818             if (((Boolean)fln.getValue()).booleanValue())
1819                 output.println(generateTemp(fm, fln.getDst())+"=1;");
1820             else
1821                 output.println(generateTemp(fm, fln.getDst())+"=0;");
1822         } else if (fln.getType().isChar()) {
1823             String st=FlatLiteralNode.escapeString(fln.getValue().toString());
1824             output.println(generateTemp(fm, fln.getDst())+"='"+st+"';");
1825         } else
1826             output.println(generateTemp(fm, fln.getDst())+"="+fln.getValue()+";");
1827     }
1828
1829     private void generateFlatReturnNode(FlatMethod fm, FlatReturnNode frn, PrintWriter output) {
1830         if (frn.getReturnTemp()!=null)
1831             output.println("return "+generateTemp(fm, frn.getReturnTemp())+";");
1832         else
1833             output.println("return;");
1834     }
1835
1836     private void generateFlatCondBranch(FlatMethod fm, FlatCondBranch fcb, String label, PrintWriter output) {
1837         output.println("if (!"+generateTemp(fm, fcb.getTest())+") goto "+label+";");
1838     }
1839
1840     /** This method generates header information for the method or
1841      * task referenced by the Descriptor des. */
1842
1843     private void generateHeader(FlatMethod fm, LocalityBinding lb, Descriptor des, PrintWriter output) {
1844         /* Print header */
1845         ParamsObject objectparams=(ParamsObject)paramstable.get(des);
1846         MethodDescriptor md=null;
1847         TaskDescriptor task=null;
1848         if (des instanceof MethodDescriptor)
1849             md=(MethodDescriptor) des;
1850         else
1851             task=(TaskDescriptor) des;
1852
1853         ClassDescriptor cn=md!=null?md.getClassDesc():null;
1854         
1855         if (md!=null&&md.getReturnType()!=null) {
1856             if (md.getReturnType().isClass()||md.getReturnType().isArray())
1857                 output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
1858             else
1859                 output.print(md.getReturnType().getSafeSymbol()+" ");
1860         } else 
1861             //catch the constructor case
1862             output.print("void ");
1863         if (md!=null) {
1864             if (state.DSM) {
1865                 output.print(cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1866             } else
1867                 output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1868         } else
1869             output.print(task.getSafeSymbol()+"(");
1870         
1871         boolean printcomma=false;
1872         if (GENERATEPRECISEGC) {
1873             if (md!=null) {
1874                 if (state.DSM) {
1875                     output.print("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1876                 } else
1877                     output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1878             } else
1879                 output.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
1880             printcomma=true;
1881         }
1882
1883         if (state.DSM&&lb.isAtomic()) {
1884             if (printcomma)
1885                 output.print(", ");
1886             output.print("transrecord_t * trans");
1887             printcomma=true;
1888         }
1889
1890         if (md!=null) {
1891             /* Method */
1892             for(int i=0;i<objectparams.numPrimitives();i++) {
1893                 TempDescriptor temp=objectparams.getPrimitive(i);
1894                 if (printcomma)
1895                     output.print(", ");
1896                 printcomma=true;
1897                 if (temp.getType().isClass()||temp.getType().isArray())
1898                     output.print("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
1899                 else
1900                     output.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
1901             }
1902             output.println(") {");
1903         } else if (!GENERATEPRECISEGC) {
1904             /* Imprecise Task */
1905             output.println("void * parameterarray[]) {");
1906             /* Unpack variables */
1907             for(int i=0;i<objectparams.numPrimitives();i++) {
1908                 TempDescriptor temp=objectparams.getPrimitive(i);
1909                 output.println("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+"=parameterarray["+i+"];");
1910             }
1911             for(int i=0;i<fm.numTags();i++) {
1912                 TempDescriptor temp=fm.getTag(i);
1913                 int offset=i+objectparams.numPrimitives();
1914                 output.println("struct ___TagDescriptor___ * "+temp.getSafeSymbol()+"=parameterarray["+offset+"];");
1915             }
1916
1917             if ((objectparams.numPrimitives()+fm.numTags())>maxtaskparams)
1918                 maxtaskparams=objectparams.numPrimitives()+fm.numTags();
1919         } else output.println(") {");
1920     }
1921     
1922     public void generateFlatFlagActionNode(FlatMethod fm, FlatFlagActionNode ffan, PrintWriter output) {
1923         output.println("/* FlatFlagActionNode */");
1924
1925
1926         /* Process tag changes */
1927         Relation tagsettable=new Relation();
1928         Relation tagcleartable=new Relation();
1929
1930         Iterator tagsit=ffan.getTempTagPairs(); 
1931         while (tagsit.hasNext()) {
1932             TempTagPair ttp=(TempTagPair) tagsit.next();
1933             TempDescriptor objtmp=ttp.getTemp();
1934             TagDescriptor tag=ttp.getTag();
1935             TempDescriptor tagtmp=ttp.getTagTemp();
1936             boolean tagstatus=ffan.getTagChange(ttp);
1937             if (tagstatus) {
1938                 tagsettable.put(objtmp, tagtmp);
1939             } else {
1940                 tagcleartable.put(objtmp, tagtmp);
1941             }
1942         }
1943
1944
1945         Hashtable flagandtable=new Hashtable();
1946         Hashtable flagortable=new Hashtable();
1947
1948         /* Process flag changes */
1949         Iterator flagsit=ffan.getTempFlagPairs();
1950         while(flagsit.hasNext()) {
1951             TempFlagPair tfp=(TempFlagPair)flagsit.next();
1952             TempDescriptor temp=tfp.getTemp();
1953             Hashtable flagtable=(Hashtable)flagorder.get(temp.getType().getClassDesc());
1954             FlagDescriptor flag=tfp.getFlag();
1955             if (flag==null) {
1956                 //Newly allocate objects that don't set any flags case
1957                 if (flagortable.containsKey(temp)) {
1958                     throw new Error();
1959                 }
1960                 int mask=0;
1961                 flagortable.put(temp,new Integer(mask));
1962             } else {
1963                 int flagid=1<<((Integer)flagtable.get(flag)).intValue();
1964                 boolean flagstatus=ffan.getFlagChange(tfp);
1965                 if (flagstatus) {
1966                     int mask=0;
1967                     if (flagortable.containsKey(temp)) {
1968                         mask=((Integer)flagortable.get(temp)).intValue();
1969                     }
1970                     mask|=flagid;
1971                     flagortable.put(temp,new Integer(mask));
1972                 } else {
1973                     int mask=0xFFFFFFFF;
1974                     if (flagandtable.containsKey(temp)) {
1975                         mask=((Integer)flagandtable.get(temp)).intValue();
1976                     }
1977                     mask&=(0xFFFFFFFF^flagid);
1978                     flagandtable.put(temp,new Integer(mask));
1979                 }
1980             }
1981         }
1982
1983
1984         HashSet flagtagset=new HashSet();
1985         flagtagset.addAll(flagortable.keySet());
1986         flagtagset.addAll(flagandtable.keySet());
1987         flagtagset.addAll(tagsettable.keySet());
1988         flagtagset.addAll(tagcleartable.keySet());
1989
1990         Iterator ftit=flagtagset.iterator();
1991         while(ftit.hasNext()) {
1992             TempDescriptor temp=(TempDescriptor)ftit.next();
1993             
1994             
1995             Set tagtmps=tagcleartable.get(temp);
1996             if (tagtmps!=null) {
1997                 Iterator tagit=tagtmps.iterator();
1998                 while(tagit.hasNext()) {
1999                     TempDescriptor tagtmp=(TempDescriptor)tagit.next();
2000                     if (GENERATEPRECISEGC) 
2001                         output.println("tagclear(&"+localsprefix+", (struct ___Object___ *)"+generateTemp(fm, temp)+", "+generateTemp(fm,tagtmp)+");");
2002                     else
2003                         output.println("tagclear((struct ___Object___ *)"+generateTemp(fm, temp)+", "+generateTemp(fm,tagtmp)+");");
2004                 }
2005             }
2006
2007             tagtmps=tagsettable.get(temp);
2008             if (tagtmps!=null) {
2009                 Iterator tagit=tagtmps.iterator();
2010                 while(tagit.hasNext()) {
2011                     TempDescriptor tagtmp=(TempDescriptor)tagit.next();
2012                     if (GENERATEPRECISEGC)
2013                         output.println("tagset(&"+localsprefix+", (struct ___Object___ *)"+generateTemp(fm, temp)+", "+generateTemp(fm,tagtmp)+");");
2014                     else
2015                         output.println("tagset((struct ___Object___ *)"+generateTemp(fm, temp)+", "+generateTemp(fm,tagtmp)+");");
2016                 }
2017             }
2018
2019             int ormask=0;
2020             int andmask=0xFFFFFFF;
2021             
2022             if (flagortable.containsKey(temp))
2023                 ormask=((Integer)flagortable.get(temp)).intValue();
2024             if (flagandtable.containsKey(temp))
2025                 andmask=((Integer)flagandtable.get(temp)).intValue();
2026             if (ffan.getTaskType()==FlatFlagActionNode.NEWOBJECT) {
2027                 output.println("flagorandinit("+generateTemp(fm, temp)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
2028             } else {
2029                 output.println("flagorand("+generateTemp(fm, temp)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
2030             }
2031         }
2032     }
2033
2034      void generateOptionalArrays(PrintWriter output, PrintWriter headers, Hashtable<ClassDescriptor, Hashtable<FlagState, HashSet>> safeexecution, Hashtable optionaltaskdescriptors) {
2035          
2036          //GENERATE HEADERS
2037          headers.println("#include \"task.h\"\n\n");
2038          headers.println("#ifndef _OPTIONAL_STRUCT_");
2039          headers.println("#define _OPTIONAL_STRUCT_");
2040          
2041          
2042          
2043          
2044          //STRUCT PREDICATEMEMBER
2045          headers.println("struct predicatemember{");
2046          headers.println("int type;");
2047          headers.println("int numdnfterms;");
2048          headers.println("int * flags;");
2049          headers.println("int numtags;");
2050          headers.println("int * tags;\n};\n\n");
2051
2052          /*//STRUCT EXITSTATES
2053          headers.println("struct exitstates{");
2054          headers.println("int numflagstates;");
2055          headers.println("int * flagstatearray;\n};\n\n");*///appeared to be useless
2056
2057          //STRUCT OPTIONALTASKDESCRIPTOR
2058          headers.println("struct optionaltaskdescriptor{");
2059          headers.println("struct taskdescriptor * task;");
2060          headers.println("int numenterflags;");
2061          headers.println("int * enterflags;");
2062          headers.println("int numpredicatemembers;");
2063          headers.println("struct predicatemember ** predicatememberarray;");
2064          //headers.println("int numexitstates;");
2065          //headers.println("int numTotal;");
2066          //headers.println("struct exitstates ** exitstatesarray;\n};\n\n");
2067          headers.println("\n};\n\n");
2068                  
2069          //STRUCT FSANALYSISWRAPPER
2070          headers.println("struct fsanalysiswrapper{");
2071          headers.println("int  flags;");
2072          headers.println("int numtags;");
2073          headers.println("int * tags;");
2074          headers.println("int numoptionaltaskdescriptors;");
2075          headers.println("struct optionaltaskdescriptor ** optionaltaskdescriptorarray;\n};\n\n");
2076
2077          //STRUCT CLASSANALYSISWRAPPER
2078          headers.println("struct classanalysiswrapper{");
2079          headers.println("int type;");
2080          headers.println("int numotd;");
2081          headers.println("struct optionaltaskdescriptor ** otdarray;");
2082          headers.println("int numfsanalysiswrappers;");
2083          headers.println("struct fsanalysiswrapper ** fsanalysiswrapperarray;\n};\n\n");
2084          
2085          headers.println("struct classanalysiswrapper * classanalysiswrapperarray[];\n");
2086
2087         
2088
2089          Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
2090          while(taskit.hasNext()) {
2091              TaskDescriptor td=(TaskDescriptor)taskit.next();
2092              headers.println("extern struct taskdescriptor task_"+td.getSafeSymbol()+";");
2093          }
2094          
2095          
2096          
2097          //GENERATE STRUCTS
2098          output.println("#include \"optionalstruct.h\"\n\n");    
2099          HashSet processedcd = new HashSet();
2100         
2101          int maxotd=0;
2102          Enumeration e = safeexecution.keys();
2103          while (e.hasMoreElements()) {
2104              int numotd=0;
2105              //get the class
2106              ClassDescriptor cdtemp=(ClassDescriptor)e.nextElement();
2107              Hashtable flaginfo=(Hashtable)flagorder.get(cdtemp);//will be used several times
2108              
2109              //////////////////////////DEBUG
2110              System.out.println(cdtemp.getSymbol()+" "+cdtemp.getId());
2111              for(Iterator flags = cdtemp.getFlags(); flags.hasNext();){
2112                  FlagDescriptor flagd = (FlagDescriptor)flags.next();
2113                  int flagid=1<<((Integer)flaginfo.get(flagd)).intValue();
2114                  System.out.println(" Flag "+flagd.getSymbol()+" 0x"+Integer.toHexString(flagid)+" int "+flagid);
2115              }
2116              ///////////////////////////
2117              
2118              //Generate the struct of optionals
2119              if((Hashtable)optionaltaskdescriptors.get(cdtemp)==null) System.out.println("Was in cd :"+cdtemp.getSymbol());
2120              Collection c_otd = ((Hashtable)optionaltaskdescriptors.get(cdtemp)).values();
2121              numotd = c_otd.size();
2122              if(maxotd<numotd) maxotd = numotd; 
2123              if( !c_otd.isEmpty() ){
2124                  for(Iterator otd_it = c_otd.iterator(); otd_it.hasNext();){
2125                      OptionalTaskDescriptor otd = (OptionalTaskDescriptor)otd_it.next();
2126                      
2127                      //generate the int arrays for the predicate
2128                      Predicate predicate = otd.predicate;
2129                      int predicateindex = 0;
2130                      //iterate through the classes concerned by the predicate
2131                      Collection c_vard = predicate.vardescriptors.values();
2132                      for(Iterator vard_it = c_vard.iterator(); vard_it.hasNext();){
2133                          VarDescriptor vard = (VarDescriptor)vard_it.next();
2134                          TypeDescriptor typed = vard.getType();
2135                          
2136                          //generate for flags
2137                          HashSet fen_hashset = predicate.flags.get(vard.getSymbol());
2138                          output.println("int predicateflags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
2139                          int numberterms=0;
2140                          if (fen_hashset!=null){
2141                              for (Iterator fen_it = fen_hashset.iterator(); fen_it.hasNext();){
2142                                  FlagExpressionNode fen = (FlagExpressionNode)fen_it.next();
2143                                  if (fen==null) {
2144                                  }    
2145                                  else {
2146                                      
2147                                      DNFFlag dflag=fen.getDNF();
2148                                      numberterms+=dflag.size();
2149                                      
2150                                      Hashtable flags=(Hashtable)flagorder.get(typed.getClassDesc());
2151                                      
2152                                      for(int j=0;j<dflag.size();j++) {
2153                                          if (j!=0)
2154                                              output.println(",");
2155                                          Vector term=dflag.get(j);
2156                                          int andmask=0;
2157                                          int checkmask=0;
2158                                          for(int k=0;k<term.size();k++) {
2159                                              DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
2160                                              FlagDescriptor fd=dfa.getFlag();
2161                                              boolean negated=dfa.getNegated();
2162                                              int flagid=1<<((Integer)flags.get(fd)).intValue();
2163                                              andmask|=flagid;
2164                                              if (!negated)
2165                                                  checkmask|=flagid;
2166                                          }
2167                                          output.print("/*andmask*/0x"+Integer.toHexString(andmask)+", /*checkmask*/0x"+Integer.toHexString(checkmask));
2168                                      }
2169                                  }
2170                              }
2171                          }
2172                          output.println("};\n");
2173                          
2174                          //generate for tags
2175                          TagExpressionList tagel = predicate.tags.get(vard.getSymbol()); 
2176                          output.println("int predicatetags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
2177                          //BUG...added next line to fix, test with any task program
2178                          int numtags = 0;
2179                          if (tagel!=null){
2180                              for(int j=0;j<tagel.numTags();j++) {
2181                                  if (j!=0)
2182                                      output.println(",");
2183                                  TempDescriptor tmp=tagel.getTemp(j);
2184                                  //got rid of slot, maybe some improvments to do ???
2185                                  output.println("/*tagid*/"+state.getTagId(tmp.getTag()));
2186                              }
2187                              numtags = tagel.numTags();
2188                          }
2189                          output.println("};");
2190                          
2191                          //store the result into a predicatemember struct
2192                          output.println("struct predicatemember predicatemember_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"={");
2193                          output.println("/*type*/"+typed.getClassDesc().getId()+",");
2194                          output.println("/* number of dnf terms */"+numberterms+",");
2195                          output.println("predicateflags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2196                          output.println("/* number of tag */"+numtags+",");
2197                          output.println("predicatetags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2198                          output.println("};\n");
2199                          predicateindex++;
2200                      }
2201                      
2202
2203                      //generate an array that stores the entire predicate
2204                      output.println("struct predicatemember * predicatememberarray_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
2205                      for( int j = 0; j<predicateindex; j++){
2206                          if( j != predicateindex-1)output.println("&predicatemember_"+j+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2207                          else output.println("&predicatemember_"+j+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
2208                      }
2209                      output.println("};\n");
2210
2211                      //generate the struct for possible exitfses, appeared to be useless
2212                      /*HashSet<HashSet> exitfses = otd.exitfses;
2213                      int exitindex = 0;
2214                      int nbexit = exitfses.size();
2215                      int fsnumber;
2216                      
2217                      //iterate through possible exits
2218                      int nbtotal=0;
2219                      for(Iterator exitfseshash = exitfses.iterator(); exitfseshash.hasNext();){
2220                          HashSet temp_hashset = (HashSet)exitfseshash.next();
2221                          fsnumber = 0 ;
2222                          output.println("int flag_EXIT"+exitindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
2223                          //iterate through possible FSes corresponding to the exit
2224                          for(Iterator exfses = temp_hashset.iterator(); exfses.hasNext();){
2225                              FlagState fs = (FlagState)exfses.next();
2226                              fsnumber++;
2227                              nbtotal++;
2228                              int flagid=0;
2229                              for(Iterator flags = fs.getFlags(); flags.hasNext();){
2230                                  FlagDescriptor flagd = (FlagDescriptor)flags.next();
2231                                  int id=1<<((Integer)flaginfo.get(flagd)).intValue();
2232                                  flagid+=id;
2233                              }
2234                              if(fsnumber!=1) output.print(",");
2235                              output.print(flagid);
2236                              //do the same for tags.
2237                              //maybe not needed because no tag changes tolerated.
2238                          }
2239                          output.println("};\n");
2240                          
2241                          
2242                          //store that information in a struct
2243                          output.println("struct exitstates exitstates"+exitindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"={");
2244                          output.println(fsnumber+",");
2245                          output.println("flag_EXIT"+exitindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
2246                          output.println("};\n");
2247
2248                          exitindex++;
2249                      }
2250                      
2251                      //store the information concerning all exits into an array
2252                      output.println("struct exitstates * exitstatesarray_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
2253                      for( int j = 0; j<nbexit; j++){
2254                          if( j != nbexit-1)output.println("&exitstates"+j+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2255                          else output.println("&exitstates"+j+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"};\n");
2256                      }*/
2257
2258                      int fsnumber = 0 ;
2259                      output.println("int enterflag_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
2260                          //iterate through possible FSes corresponding to the state when entering
2261                      for(Iterator fses = otd.flagstates.iterator(); fses.hasNext();){
2262                          FlagState fs = (FlagState)fses.next();
2263                          fsnumber++;
2264                          int flagid=0;
2265                          for(Iterator flags = fs.getFlags(); flags.hasNext();){
2266                              FlagDescriptor flagd = (FlagDescriptor)flags.next();
2267                              int id=1<<((Integer)flaginfo.get(flagd)).intValue();
2268                              flagid+=id;
2269                          }
2270                          if(fsnumber!=1) output.print(",");
2271                          output.print(flagid);
2272                          //tag information not needed because tag changes are not tolerated.
2273                      }
2274                      output.println("};\n");
2275                      
2276                      
2277                      //generate optionaltaskdescriptor that actually includes exit fses, predicate and the task concerned
2278                      output.println("struct optionaltaskdescriptor optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"={");
2279                      output.println("&task_"+otd.td.getSafeSymbol()+",");
2280                      output.println("/*number of enter flags*/"+fsnumber+",");
2281                      output.println("enterflag_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2282                      output.println("/*number of members */"+predicateindex+",");
2283                      output.println("predicatememberarray_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2284                      //output.println("/*number of exitstates */"+nbexit+",");
2285                      //output.println("/*total number of fses*/"+nbtotal+",");
2286                      //output.println("exitstatesarray_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
2287                      output.println("};\n");
2288                  }      
2289              }
2290              else continue; // if there is no optionals, there is no need to build the rest of the struct 
2291              
2292              output.println("struct optionaltaskdescriptor * otdarray"+cdtemp.getSafeSymbol()+"[]={");
2293              c_otd = ((Hashtable)optionaltaskdescriptors.get(cdtemp)).values();
2294              int x=0;
2295              if( !c_otd.isEmpty() ){
2296                  for(Iterator otd_it = c_otd.iterator(); otd_it.hasNext();){
2297                      OptionalTaskDescriptor otd = (OptionalTaskDescriptor)otd_it.next();
2298                      if(x!=0) output.println(",");
2299                      x++;
2300                      output.println("&optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
2301                  }
2302              }
2303              output.println("};\n");
2304              
2305              //get all the possible falgstates reachable by an object
2306              Hashtable hashtbtemp = safeexecution.get(cdtemp);
2307              Enumeration fses = hashtbtemp.keys();
2308              int fscounter = 0;
2309              while(fses.hasMoreElements()){
2310                  FlagState fs = (FlagState)fses.nextElement();
2311                  fscounter++;
2312                  
2313                  //get the set of OptionalTaskDescriptors corresponding
2314                  HashSet availabletasks = (HashSet)hashtbtemp.get(fs);
2315                  //iterate through the OptionalTaskDescriptors and store the pointers to the optionals struct (see on top) into an array
2316                  
2317                  output.println("struct optionaltaskdescriptor * optionaltaskdescriptorarray_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"[] = {");
2318                  for(Iterator mos = availabletasks.iterator(); mos.hasNext();){
2319                      OptionalTaskDescriptor mm = (OptionalTaskDescriptor)mos.next();
2320                      if(!mos.hasNext()) output.println("&optionaltaskdescriptor_"+mm.getuid()+"_"+cdtemp.getSafeSymbol());
2321                      
2322                      else output.println("&optionaltaskdescriptor_"+mm.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2323                  }
2324
2325                  output.println("};\n");
2326                  
2327                  //process flag information (what the flag after failure is) so we know what optionaltaskdescriptors to choose.
2328                  
2329                  int flagid=0;
2330                  for(Iterator flags = fs.getFlags(); flags.hasNext();){
2331                      FlagDescriptor flagd = (FlagDescriptor)flags.next();
2332                      int id=1<<((Integer)flaginfo.get(flagd)).intValue();
2333                      flagid+=id;
2334                  }
2335                  
2336                  
2337                  //process tag information
2338                  
2339                  int tagcounter = 0;
2340                  boolean first = true;
2341                  Enumeration tag_enum = fs.getTags(); 
2342                  output.println("int tags_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"[]={");
2343                  while(tag_enum.hasMoreElements()){
2344                      tagcounter++;
2345                      TagDescriptor tagd = (TagDescriptor)tag_enum.nextElement(); 
2346                      if(first==true)
2347                          first = false;
2348                      else
2349                          output.println(", ");
2350                      output.println("/*tagid*/"+state.getTagId(tagd));
2351                  }
2352                  output.println("};");
2353                  
2354                  
2355                  //Store the result in fsanalysiswrapper
2356                  
2357                  output.println("struct fsanalysiswrapper fsanalysiswrapper_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"={");
2358                  output.println("/*flag*/"+flagid+",");
2359                  output.println("/* number of tags*/"+tagcounter+",");
2360                  output.println("tags_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+",");
2361                  output.println("/* number of optionaltaskdescriptors */"+availabletasks.size()+",");
2362                  output.println("optionaltaskdescriptorarray_FS"+fscounter+"_"+cdtemp.getSafeSymbol());
2363                  output.println("};\n");
2364                  
2365              }
2366
2367              //Build the array of fsanalysiswrappers
2368              output.println("struct fsanalysiswrapper * fsanalysiswrapperarray_"+cdtemp.getSafeSymbol()+"[] = {");
2369              for(int i = 0; i<fscounter; i++){
2370                  if(i==fscounter-1) output.println("&fsanalysiswrapper_FS"+(i+1)+"_"+cdtemp.getSafeSymbol()+"};\n");
2371                          
2372                      else output.println("&fsanalysiswrapper_FS"+(i+1)+"_"+cdtemp.getSafeSymbol()+",");
2373              }
2374
2375              //Build the classanalysiswrapper referring to the previous array
2376              output.println("struct classanalysiswrapper classanalysiswrapper_"+cdtemp.getSafeSymbol()+"={");
2377              output.println("/*type*/"+cdtemp.getId()+",");
2378              output.println("/*numotd*/"+numotd+",");
2379              output.println("otdarray"+cdtemp.getSafeSymbol()+",");
2380              output.println("/* number of fsanalysiswrappers */"+fscounter+",");
2381              output.println("fsanalysiswrapperarray_"+cdtemp.getSafeSymbol()+"};\n");
2382              fscounter = 0;
2383              processedcd.add(cdtemp);
2384          }
2385          
2386          //build an array containing every classes for which code has been build
2387          output.println("struct classanalysiswrapper * classanalysiswrapperarray[]={");
2388          for(Iterator classit = processedcd.iterator(); classit.hasNext();){
2389              ClassDescriptor cdtemp=(ClassDescriptor)classit.next();
2390              if(!classit.hasNext()) output.println("&classanalysiswrapper_"+cdtemp.getSafeSymbol()+"};\n");
2391              else output.println("&classanalysiswrapper_"+cdtemp.getSafeSymbol()+",");
2392          }
2393          
2394          output.println("int numclasses="+processedcd.size()+";");
2395          headers.println("extern numclasses;");
2396          output.println("int maxotd="+maxotd+";");
2397          headers.println("extern maxotd;");
2398          headers.println("#endif");
2399         
2400          
2401      }
2402     
2403 }
2404          
2405
2406
2407
2408
2409