2 import IR.Tree.FlagExpressionNode;
3 import IR.Tree.DNFFlag;
4 import IR.Tree.DNFFlagAtom;
5 import IR.Tree.TagExpressionList;
10 import Analysis.TaskStateAnalysis.FlagState;
11 import Analysis.TaskStateAnalysis.FlagComparator;
12 import Analysis.TaskStateAnalysis.OptionalTaskDescriptor;
13 import Analysis.TaskStateAnalysis.Predicate;
14 import Analysis.TaskStateAnalysis.SafetyAnalysis;
15 import Analysis.TaskStateAnalysis.TaskIndex;
16 import Analysis.Locality.LocalityAnalysis;
17 import Analysis.Locality.LocalityBinding;
18 import Analysis.Prefetch.*;
20 public class BuildCode {
23 Hashtable paramstable;
28 String localsprefix="___locals___";
29 String paramsprefix="___params___";
30 String oidstr="___nextobject___";
31 String nextobjstr="___nextobject___";
32 String localcopystr="___localcopy___";
33 public static boolean GENERATEPRECISEGC=false;
34 public static String PREFIX="";
35 public static String arraytype="ArrayObject";
36 public static int count = 0;
39 private int maxtaskparams=0;
40 private int maxcount=0;
41 ClassDescriptor[] cdarray;
42 TypeDescriptor[] arraytable;
43 LocalityAnalysis locality;
44 Hashtable<TempDescriptor, TempDescriptor> backuptable;
45 Hashtable<LocalityBinding, TempDescriptor> reverttable;
48 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, SafetyAnalysis sa) {
49 this(st, temptovar, typeutil, null, sa);
52 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, LocalityAnalysis locality) {
53 this(st, temptovar, typeutil, locality, null);
56 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, LocalityAnalysis locality, SafetyAnalysis sa) {
59 this.temptovar=temptovar;
60 paramstable=new Hashtable();
61 tempstable=new Hashtable();
62 fieldorder=new Hashtable();
63 flagorder=new Hashtable();
64 this.typeutil=typeutil;
65 virtualcalls=new Virtual(state,locality);
67 this.locality=locality;
68 this.backuptable=new Hashtable<TempDescriptor, TempDescriptor>();
69 this.reverttable=new Hashtable<LocalityBinding, TempDescriptor>();
73 /** The buildCode method outputs C code for all the methods. The Flat
74 * versions of the methods must already be generated and stored in
75 * the State object. */
77 public void buildCode() {
78 /* Create output streams to write to */
79 PrintWriter outclassdefs=null;
80 PrintWriter outstructs=null;
81 PrintWriter outrepairstructs=null;
82 PrintWriter outmethodheader=null;
83 PrintWriter outmethod=null;
84 PrintWriter outvirtual=null;
85 PrintWriter outtask=null;
86 PrintWriter outtaskdefs=null;
87 PrintWriter outoptionalarrays=null;
88 PrintWriter optionalheaders=null;
91 outstructs=new PrintWriter(new FileOutputStream(PREFIX+"structdefs.h"), true);
92 outmethodheader=new PrintWriter(new FileOutputStream(PREFIX+"methodheaders.h"), true);
93 outclassdefs=new PrintWriter(new FileOutputStream(PREFIX+"classdefs.h"), true);
94 outmethod=new PrintWriter(new FileOutputStream(PREFIX+"methods.c"), true);
95 outvirtual=new PrintWriter(new FileOutputStream(PREFIX+"virtualtable.h"), true);
97 outtask=new PrintWriter(new FileOutputStream(PREFIX+"task.h"), true);
98 outtaskdefs=new PrintWriter(new FileOutputStream(PREFIX+"taskdefs.c"), true);
100 outoptionalarrays=new PrintWriter(new FileOutputStream(PREFIX+"optionalarrays.c"), true);
101 optionalheaders=new PrintWriter(new FileOutputStream(PREFIX+"optionalstruct.h"), true);
104 if (state.structfile!=null) {
105 outrepairstructs=new PrintWriter(new FileOutputStream(PREFIX+state.structfile+".struct"), true);
107 } catch (Exception e) {
112 /* Build the virtual dispatch tables */
113 buildVirtualTables(outvirtual);
115 /* Output includes */
116 outmethodheader.println("#ifndef METHODHEADERS_H");
117 outmethodheader.println("#define METHODHEADERS_H");
118 outmethodheader.println("#include \"structdefs.h\"");
120 outmethodheader.println("#include \"dstm.h\"");
122 /* Output Structures */
123 outputStructs(outstructs);
125 // Output the C class declarations
126 // These could mutually reference each other
127 outputClassDeclarations(outclassdefs);
129 // Output function prototypes and structures for parameters
130 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
131 while(it.hasNext()) {
132 ClassDescriptor cn=(ClassDescriptor)it.next();
133 generateCallStructs(cn, outclassdefs, outstructs, outmethodheader);
135 outclassdefs.close();
138 /* Map flags to integers */
139 /* The runtime keeps track of flags using these integers */
140 it=state.getClassSymbolTable().getDescriptorsIterator();
141 while(it.hasNext()) {
142 ClassDescriptor cn=(ClassDescriptor)it.next();
146 generateTaskStructs(outstructs, outmethodheader);
148 /* Outputs generic task structures if this is a task
150 outputTaskTypes(outtask);
153 /* Build the actual methods */
154 outputMethods(outmethod);
157 /* Output code for tasks */
158 outputTaskCode(outtaskdefs, outmethod);
160 /* Record maximum number of task parameters */
161 outstructs.println("#define MAXTASKPARAMS "+maxtaskparams);
162 } else if (state.main!=null) {
163 /* Generate main method */
164 outputMainMethod(outmethod);
167 /* Generate information for task with optional parameters */
168 if (state.TASK&&state.OPTIONAL){
169 generateOptionalArrays(outoptionalarrays, optionalheaders, state.getAnalysisResult(), state.getOptionalTaskDescriptors());
170 outoptionalarrays.close();
173 /* Output structure definitions for repair tool */
174 if (state.structfile!=null) {
175 buildRepairStructs(outrepairstructs);
176 outrepairstructs.close();
180 outmethodheader.println("#endif");
181 outmethodheader.close();
183 outstructs.println("#endif");
187 /* This code just generates the main C method for java programs.
188 * The main C method packs up the arguments into a string array
189 * and passes it to the java main method. */
191 private void outputMainMethod(PrintWriter outmethod) {
192 outmethod.println("int main(int argc, const char *argv[]) {");
193 outmethod.println(" int i;");
195 outmethod.println("if (dstmStartup(argv[1])) {");
196 if (GENERATEPRECISEGC) {
197 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(NULL, STRINGARRAYTYPE, argc-2);");
199 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(STRINGARRAYTYPE, argc-2);");
202 if (GENERATEPRECISEGC) {
203 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(NULL, STRINGARRAYTYPE, argc-1);");
205 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(STRINGARRAYTYPE, argc-1);");
209 outmethod.println("initializethreads();");
212 outmethod.println(" for(i=2;i<argc;i++) {");
214 outmethod.println(" for(i=1;i<argc;i++) {");
215 outmethod.println(" int length=strlen(argv[i]);");
216 if (GENERATEPRECISEGC) {
217 outmethod.println(" struct ___String___ *newstring=NewString(NULL, argv[i], length);");
219 outmethod.println(" struct ___String___ *newstring=NewString(argv[i], length);");
222 outmethod.println(" ((void **)(((char *)& stringarray->___length___)+sizeof(int)))[i-2]=newstring;");
224 outmethod.println(" ((void **)(((char *)& stringarray->___length___)+sizeof(int)))[i-1]=newstring;");
225 outmethod.println(" }");
228 MethodDescriptor md=typeutil.getMain();
229 ClassDescriptor cd=typeutil.getMainClass();
231 outmethod.println(" {");
232 if (GENERATEPRECISEGC) {
234 outmethod.print(" struct "+cd.getSafeSymbol()+locality.getMain().getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
236 outmethod.print(" struct "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
237 outmethod.println("1, NULL,"+"stringarray};");
239 outmethod.println(" "+cd.getSafeSymbol()+locality.getMain().getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(& __parameterlist__);");
241 outmethod.println(" "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(& __parameterlist__);");
244 outmethod.println(" "+cd.getSafeSymbol()+locality.getMain().getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(stringarray);");
246 outmethod.println(" "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(stringarray);");
248 outmethod.println(" }");
251 outmethod.println("}");
255 outmethod.println("pthread_mutex_lock(&gclistlock);");
256 outmethod.println("threadcount--;");
257 outmethod.println("pthread_cond_signal(&gccond);");
258 outmethod.println("pthread_mutex_unlock(&gclistlock);");
259 outmethod.println("pthread_exit(NULL);");
263 outmethod.println("}");
266 /* This method outputs code for each task. */
268 private void outputTaskCode(PrintWriter outtaskdefs, PrintWriter outmethod) {
269 /* Compile task based program */
270 outtaskdefs.println("#include \"task.h\"");
271 outtaskdefs.println("#include \"methodheaders.h\"");
272 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
273 while(taskit.hasNext()) {
274 TaskDescriptor td=(TaskDescriptor)taskit.next();
275 FlatMethod fm=state.getMethodFlat(td);
276 generateFlatMethod(fm, null, outmethod);
277 generateTaskDescriptor(outtaskdefs, fm, td);
280 //Output task descriptors
281 taskit=state.getTaskSymbolTable().getDescriptorsIterator();
282 outtaskdefs.println("struct taskdescriptor * taskarray[]= {");
284 while(taskit.hasNext()) {
285 TaskDescriptor td=(TaskDescriptor)taskit.next();
289 outtaskdefs.println(",");
290 outtaskdefs.print("&task_"+td.getSafeSymbol());
292 outtaskdefs.println("};");
294 outtaskdefs.println("int numtasks="+state.getTaskSymbolTable().getValueSet().size()+";");
297 /* This method outputs most of the methods.c file. This includes
298 * some standard includes and then an array with the sizes of
299 * objets and array that stores supertype and then the code for
300 * the Java methods.. */
302 private void outputMethods(PrintWriter outmethod) {
303 outmethod.println("#include \"methodheaders.h\"");
304 outmethod.println("#include \"virtualtable.h\"");
305 outmethod.println("#include <runtime.h>");
307 outmethod.println("#include \"localobjects.h\"");
310 outmethod.println("#include <thread.h>");
311 if (state.main!=null) {
312 outmethod.println("#include <string.h>");
314 if (state.CONSCHECK) {
315 outmethod.println("#include \"checkers.h\"");
317 //Store the sizes of classes & array elements
318 generateSizeArray(outmethod);
320 //Store table of supertypes
321 generateSuperTypeTable(outmethod);
323 //Store the layout of classes
324 generateLayoutStructs(outmethod);
326 /* Generate code for methods */
328 for(Iterator<LocalityBinding> lbit=locality.getLocalityBindings().iterator();lbit.hasNext();) {
329 LocalityBinding lb=lbit.next();
330 MethodDescriptor md=lb.getMethod();
331 FlatMethod fm=state.getMethodFlat(md);
332 if (!md.getModifiers().isNative()) {
333 generateFlatMethod(fm, lb, outmethod);
337 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
338 while(classit.hasNext()) {
339 ClassDescriptor cn=(ClassDescriptor)classit.next();
340 Iterator methodit=cn.getMethods();
341 while(methodit.hasNext()) {
342 /* Classify parameters */
343 MethodDescriptor md=(MethodDescriptor)methodit.next();
344 FlatMethod fm=state.getMethodFlat(md);
345 if (!md.getModifiers().isNative()) {
346 generateFlatMethod(fm, null, outmethod);
353 private void outputStructs(PrintWriter outstructs) {
354 outstructs.println("#ifndef STRUCTDEFS_H");
355 outstructs.println("#define STRUCTDEFS_H");
356 outstructs.println("#include \"classdefs.h\"");
358 /* Output #defines that the runtime uses to determine type
359 * numbers for various objects it needs */
360 outstructs.println("#define MAXCOUNT "+maxcount);
362 LocalityBinding lb=new LocalityBinding(typeutil.getRun(), false);
363 lb.setGlobalThis(LocalityAnalysis.GLOBAL);
364 outstructs.println("#define RUNMETHOD "+virtualcalls.getLocalityNumber(lb));
367 outstructs.println("#define STRINGARRAYTYPE "+
368 (state.getArrayNumber(
369 (new TypeDescriptor(typeutil.getClass(TypeUtil.StringClass))).makeArray(state))+state.numClasses()));
371 outstructs.println("#define OBJECTARRAYTYPE "+
372 (state.getArrayNumber(
373 (new TypeDescriptor(typeutil.getClass(TypeUtil.ObjectClass))).makeArray(state))+state.numClasses()));
376 outstructs.println("#define STRINGTYPE "+typeutil.getClass(TypeUtil.StringClass).getId());
377 outstructs.println("#define CHARARRAYTYPE "+
378 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.CHAR)).makeArray(state))+state.numClasses()));
380 outstructs.println("#define BYTEARRAYTYPE "+
381 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.BYTE)).makeArray(state))+state.numClasses()));
383 outstructs.println("#define BYTEARRAYARRAYTYPE "+
384 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.BYTE)).makeArray(state).makeArray(state))+state.numClasses()));
386 outstructs.println("#define NUMCLASSES "+state.numClasses());
388 outstructs.println("#define STARTUPTYPE "+typeutil.getClass(TypeUtil.StartupClass).getId());
389 outstructs.println("#define TAGTYPE "+typeutil.getClass(TypeUtil.TagClass).getId());
390 outstructs.println("#define TAGARRAYTYPE "+
391 (state.getArrayNumber(new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass)).makeArray(state))+state.numClasses()));
395 private void outputClassDeclarations(PrintWriter outclassdefs) {
397 outclassdefs.println("#include <pthread.h>");
399 outclassdefs.println("#include \"optionalstruct.h\"");
400 outclassdefs.println("struct "+arraytype+";");
401 /* Start by declaring all structs */
402 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
403 while(it.hasNext()) {
404 ClassDescriptor cn=(ClassDescriptor)it.next();
405 outclassdefs.println("struct "+cn.getSafeSymbol()+";");
407 outclassdefs.println("");
408 //Print out definition for array type
409 outclassdefs.println("struct "+arraytype+" {");
410 outclassdefs.println(" int type;");
412 outclassdefs.println(" pthread_t tid;");
413 outclassdefs.println(" void * lockentry;");
414 outclassdefs.println(" int lockcount;");
417 outclassdefs.println(" int flag;");
418 outclassdefs.println(" void * flagptr;");
420 outclassdefs.println(" int numfses;");
421 outclassdefs.println(" int * fses;");
424 printClassStruct(typeutil.getClass(TypeUtil.ObjectClass), outclassdefs);
426 outclassdefs.println(" int ___length___;");
427 outclassdefs.println("};\n");
428 outclassdefs.println("extern int classsize[];");
429 outclassdefs.println("extern int hasflags[];");
430 outclassdefs.println("extern unsigned int * pointerarray[];");
431 outclassdefs.println("extern int supertypes[];");
434 /** Prints out definitions for generic task structures */
436 private void outputTaskTypes(PrintWriter outtask) {
437 outtask.println("#ifndef _TASK_H");
438 outtask.println("#define _TASK_H");
439 outtask.println("struct parameterdescriptor {");
440 outtask.println("int type;");
441 outtask.println("int numberterms;");
442 outtask.println("int *intarray;");
443 outtask.println("void * queue;");
444 outtask.println("int numbertags;");
445 outtask.println("int *tagarray;");
446 outtask.println("};");
448 outtask.println("struct taskdescriptor {");
449 outtask.println("void * taskptr;");
450 outtask.println("int numParameters;");
451 outtask.println("int numTotal;");
452 outtask.println("struct parameterdescriptor **descriptorarray;");
453 outtask.println("char * name;");
454 outtask.println("};");
455 outtask.println("extern struct taskdescriptor * taskarray[];");
456 outtask.println("extern numtasks;");
457 outtask.println("#endif");
461 private void buildRepairStructs(PrintWriter outrepairstructs) {
462 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
463 while(classit.hasNext()) {
464 ClassDescriptor cn=(ClassDescriptor)classit.next();
465 outrepairstructs.println("structure "+cn.getSymbol()+" {");
466 outrepairstructs.println(" int __type__;");
468 outrepairstructs.println(" int __flag__;");
469 outrepairstructs.println(" int __flagptr__;");
471 printRepairStruct(cn, outrepairstructs);
472 outrepairstructs.println("}\n");
475 for(int i=0;i<state.numArrays();i++) {
476 TypeDescriptor tdarray=arraytable[i];
477 TypeDescriptor tdelement=tdarray.dereference();
478 outrepairstructs.println("structure "+arraytype+"_"+state.getArrayNumber(tdarray)+" {");
479 outrepairstructs.println(" int __type__;");
480 printRepairStruct(typeutil.getClass(TypeUtil.ObjectClass), outrepairstructs);
481 outrepairstructs.println(" int length;");
483 // Need to add support to repair tool for this
484 if (tdelement.isClass()||tdelement.isArray())
485 outrepairstructs.println(" "+tdelement.getRepairSymbol()+" * elem[this.length];");
487 outrepairstructs.println(" "+tdelement.getRepairSymbol()+" elem[this.length];");
489 outrepairstructs.println("}\n");
493 private void printRepairStruct(ClassDescriptor cn, PrintWriter output) {
494 ClassDescriptor sp=cn.getSuperDesc();
496 printRepairStruct(sp, output);
498 Vector fields=(Vector)fieldorder.get(cn);
500 for(int i=0;i<fields.size();i++) {
501 FieldDescriptor fd=(FieldDescriptor)fields.get(i);
502 if (fd.getType().isArray()) {
503 output.println(" "+arraytype+"_"+ state.getArrayNumber(fd.getType()) +" * "+fd.getSymbol()+";");
504 } else if (fd.getType().isClass())
505 output.println(" "+fd.getType().getRepairSymbol()+" * "+fd.getSymbol()+";");
506 else if (fd.getType().isFloat())
507 output.println(" int "+fd.getSymbol()+"; /* really float */");
509 output.println(" "+fd.getType().getRepairSymbol()+" "+fd.getSymbol()+";");
513 /** This method outputs TaskDescriptor information */
514 void generateTaskDescriptor(PrintWriter output, FlatMethod fm, TaskDescriptor task) {
515 for (int i=0;i<task.numParameters();i++) {
516 VarDescriptor param_var=task.getParameter(i);
517 TypeDescriptor param_type=task.getParamType(i);
518 FlagExpressionNode param_flag=task.getFlag(param_var);
519 TagExpressionList param_tag=task.getTag(param_var);
522 if (param_flag==null) {
523 output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
524 output.println("0x0, 0x0 };");
527 DNFFlag dflag=param_flag.getDNF();
528 dnfterms=dflag.size();
530 Hashtable flags=(Hashtable)flagorder.get(param_type.getClassDesc());
531 output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
532 for(int j=0;j<dflag.size();j++) {
535 Vector term=dflag.get(j);
538 for(int k=0;k<term.size();k++) {
539 DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
540 FlagDescriptor fd=dfa.getFlag();
541 boolean negated=dfa.getNegated();
542 int flagid=1<<((Integer)flags.get(fd)).intValue();
547 output.print("0x"+Integer.toHexString(andmask)+", 0x"+Integer.toHexString(checkmask));
549 output.println("};");
552 output.println("int parametertag_"+i+"_"+task.getSafeSymbol()+"[]={");
553 //BUG...added next line to fix, test with any task program
555 for(int j=0;j<param_tag.numTags();j++) {
558 /* for each tag we need */
559 /* which slot it is */
560 /* what type it is */
561 TagVarDescriptor tvd=(TagVarDescriptor)task.getParameterTable().get(param_tag.getName(j));
562 TempDescriptor tmp=param_tag.getTemp(j);
563 int slot=fm.getTagInt(tmp);
564 output.println(slot+", "+state.getTagId(tvd.getTag()));
566 output.println("};");
568 output.println("struct parameterdescriptor parameter_"+i+"_"+task.getSafeSymbol()+"={");
569 output.println("/* type */"+param_type.getClassDesc().getId()+",");
570 output.println("/* number of DNF terms */"+dnfterms+",");
571 output.println("parameterdnf_"+i+"_"+task.getSafeSymbol()+",");
572 output.println("0,");
573 //BUG, added next line to fix and else statement...test
574 //with any task program
576 output.println("/* number of tags */"+param_tag.numTags()+",");
578 output.println("/* number of tags */ 0,");
579 output.println("parametertag_"+i+"_"+task.getSafeSymbol());
580 output.println("};");
584 output.println("struct parameterdescriptor * parameterdescriptors_"+task.getSafeSymbol()+"[] = {");
585 for (int i=0;i<task.numParameters();i++) {
588 output.print("¶meter_"+i+"_"+task.getSafeSymbol());
590 output.println("};");
592 output.println("struct taskdescriptor task_"+task.getSafeSymbol()+"={");
593 output.println("&"+task.getSafeSymbol()+",");
594 output.println("/* number of parameters */" +task.numParameters() + ",");
595 int numtotal=task.numParameters()+fm.numTags();
596 output.println("/* number total parameters */" +numtotal + ",");
597 output.println("parameterdescriptors_"+task.getSafeSymbol()+",");
598 output.println("\""+task.getSymbol()+"\"");
599 output.println("};");
603 /** The buildVirtualTables method outputs the virtual dispatch
604 * tables for methods. */
606 private void buildVirtualTables(PrintWriter outvirtual) {
607 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
608 while(classit.hasNext()) {
609 ClassDescriptor cd=(ClassDescriptor)classit.next();
610 if (virtualcalls.getMethodCount(cd)>maxcount)
611 maxcount=virtualcalls.getMethodCount(cd);
613 MethodDescriptor[][] virtualtable=null;
614 LocalityBinding[][] lbvirtualtable=null;
616 lbvirtualtable=new LocalityBinding[state.numClasses()+state.numArrays()][maxcount];
618 virtualtable=new MethodDescriptor[state.numClasses()+state.numArrays()][maxcount];
620 /* Fill in virtual table */
621 classit=state.getClassSymbolTable().getDescriptorsIterator();
622 while(classit.hasNext()) {
623 ClassDescriptor cd=(ClassDescriptor)classit.next();
625 fillinRow(cd, lbvirtualtable, cd.getId());
627 fillinRow(cd, virtualtable, cd.getId());
630 ClassDescriptor objectcd=typeutil.getClass(TypeUtil.ObjectClass);
631 Iterator arrayit=state.getArrayIterator();
632 while(arrayit.hasNext()) {
633 TypeDescriptor td=(TypeDescriptor)arrayit.next();
634 int id=state.getArrayNumber(td);
636 fillinRow(objectcd, lbvirtualtable, id+state.numClasses());
638 fillinRow(objectcd, virtualtable, id+state.numClasses());
641 outvirtual.print("void * virtualtable[]={");
642 boolean needcomma=false;
643 for(int i=0;i<state.numClasses()+state.numArrays();i++) {
644 for(int j=0;j<maxcount;j++) {
646 outvirtual.print(", ");
647 if (state.DSM&&lbvirtualtable[i][j]!=null) {
648 LocalityBinding lb=lbvirtualtable[i][j];
649 MethodDescriptor md=lb.getMethod();
650 outvirtual.print("& "+md.getClassDesc().getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
651 } else if (!state.DSM&&virtualtable[i][j]!=null) {
652 MethodDescriptor md=virtualtable[i][j];
653 outvirtual.print("& "+md.getClassDesc().getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
655 outvirtual.print("0");
659 outvirtual.println("");
661 outvirtual.println("};");
665 private void fillinRow(ClassDescriptor cd, MethodDescriptor[][] virtualtable, int rownum) {
666 /* Get inherited methods */
667 if (cd.getSuperDesc()!=null)
668 fillinRow(cd.getSuperDesc(), virtualtable, rownum);
669 /* Override them with our methods */
670 for(Iterator it=cd.getMethods();it.hasNext();) {
671 MethodDescriptor md=(MethodDescriptor)it.next();
672 if (md.isStatic()||md.getReturnType()==null)
674 int methodnum=virtualcalls.getMethodNumber(md);
675 virtualtable[rownum][methodnum]=md;
679 private void fillinRow(ClassDescriptor cd, LocalityBinding[][] virtualtable, int rownum) {
680 /* Get inherited methods */
681 if (cd.getSuperDesc()!=null)
682 fillinRow(cd.getSuperDesc(), virtualtable, rownum);
683 /* Override them with our methods */
684 if (locality.getClassBindings(cd)!=null)
685 for(Iterator<LocalityBinding> lbit=locality.getClassBindings(cd).iterator();lbit.hasNext();) {
686 LocalityBinding lb=lbit.next();
687 MethodDescriptor md=lb.getMethod();
688 //Is the method static or a constructor
689 if (md.isStatic()||md.getReturnType()==null)
691 int methodnum=virtualcalls.getLocalityNumber(lb);
692 virtualtable[rownum][methodnum]=lb;
697 /** Generate array that contains the sizes of class objects. The
698 * object allocation functions in the runtime use this
701 private void generateSizeArray(PrintWriter outclassdefs) {
702 outclassdefs.print("int classsize[]={");
703 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
704 cdarray=new ClassDescriptor[state.numClasses()];
705 while(it.hasNext()) {
706 ClassDescriptor cd=(ClassDescriptor)it.next();
707 cdarray[cd.getId()]=cd;
709 boolean needcomma=false;
710 for(int i=0;i<state.numClasses();i++) {
712 outclassdefs.print(", ");
713 outclassdefs.print("sizeof(struct "+cdarray[i].getSafeSymbol()+")");
717 arraytable=new TypeDescriptor[state.numArrays()];
719 Iterator arrayit=state.getArrayIterator();
720 while(arrayit.hasNext()) {
721 TypeDescriptor td=(TypeDescriptor)arrayit.next();
722 int id=state.getArrayNumber(td);
726 for(int i=0;i<state.numArrays();i++) {
728 outclassdefs.print(", ");
729 TypeDescriptor tdelement=arraytable[i].dereference();
730 if (tdelement.isArray()||tdelement.isClass())
731 outclassdefs.print("sizeof(void *)");
733 outclassdefs.print("sizeof("+tdelement.getSafeSymbol()+")");
737 outclassdefs.println("};");
740 /** Constructs params and temp objects for each method or task.
741 * These objects tell the compiler which temps need to be
744 private void generateTempStructs(FlatMethod fm, LocalityBinding lb) {
745 MethodDescriptor md=fm.getMethod();
746 TaskDescriptor task=fm.getTask();
747 Set<TempDescriptor> saveset=lb!=null?locality.getTempSet(lb):null;
748 ParamsObject objectparams=md!=null?new ParamsObject(md,tag++):new ParamsObject(task, tag++);
751 paramstable.put(lb, objectparams);
753 paramstable.put(md, objectparams);
755 paramstable.put(task, objectparams);
757 for(int i=0;i<fm.numParameters();i++) {
758 TempDescriptor temp=fm.getParameter(i);
759 TypeDescriptor type=temp.getType();
760 if (type.isPtr()&&GENERATEPRECISEGC)
761 objectparams.addPtr(temp);
763 objectparams.addPrim(temp);
764 if(lb!=null&&saveset.contains(temp)) {
765 backuptable.put(temp, temp.createNew());
769 for(int i=0;i<fm.numTags();i++) {
770 TempDescriptor temp=fm.getTag(i);
771 if (GENERATEPRECISEGC)
772 objectparams.addPtr(temp);
774 objectparams.addPrim(temp);
777 TempObject objecttemps=md!=null?new TempObject(objectparams,md,tag++):new TempObject(objectparams, task, tag++);
779 tempstable.put(lb, objecttemps);
781 tempstable.put(md, objecttemps);
783 tempstable.put(task, objecttemps);
785 for(Iterator nodeit=fm.getNodeSet().iterator();nodeit.hasNext();) {
786 FlatNode fn=(FlatNode)nodeit.next();
787 TempDescriptor[] writes=fn.writesTemps();
788 for(int i=0;i<writes.length;i++) {
789 TempDescriptor temp=writes[i];
790 TypeDescriptor type=temp.getType();
791 if (type.isPtr()&&GENERATEPRECISEGC)
792 objecttemps.addPtr(temp);
794 objecttemps.addPrim(temp);
795 if(lb!=null&&saveset.contains(temp)&&
796 !backuptable.containsKey(temp))
797 backuptable.put(temp, temp.createNew());
801 /* Create backup temps */
803 for(Iterator<TempDescriptor> tmpit=backuptable.values().iterator();tmpit.hasNext();) {
804 TempDescriptor tmp=tmpit.next();
805 TypeDescriptor type=tmp.getType();
806 if (type.isPtr()&&GENERATEPRECISEGC)
807 objecttemps.addPtr(tmp);
809 objecttemps.addPrim(tmp);
811 /* Create temp to hold revert table */
812 if (lb.getHasAtomic()) {
813 TempDescriptor reverttmp=new TempDescriptor("revertlist", typeutil.getClass(TypeUtil.ObjectClass));
814 if (GENERATEPRECISEGC)
815 objecttemps.addPtr(reverttmp);
817 objecttemps.addPrim(reverttmp);
818 reverttable.put(lb, reverttmp);
823 /** This method outputs the following information about classes
825 * (1) For classes, what are the locations of pointers.
826 * (2) For arrays, does the array contain pointers or primitives.
827 * (3) For classes, does the class contain flags.
830 private void generateLayoutStructs(PrintWriter output) {
831 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
832 while(it.hasNext()) {
833 ClassDescriptor cn=(ClassDescriptor)it.next();
834 output.println("unsigned int "+cn.getSafeSymbol()+"_pointers[]={");
835 Iterator allit=cn.getFieldTable().getAllDescriptorsIterator();
837 while(allit.hasNext()) {
838 FieldDescriptor fd=(FieldDescriptor)allit.next();
839 TypeDescriptor type=fd.getType();
840 if (state.DSM&&fd.isGlobal()) //Don't GC the global objects for now
846 allit=cn.getFieldTable().getAllDescriptorsIterator();
847 while(allit.hasNext()) {
848 FieldDescriptor fd=(FieldDescriptor)allit.next();
849 TypeDescriptor type=fd.getType();
850 if (state.DSM&&fd.isGlobal()) //Don't GC the global objects for now
854 output.print("((unsigned int)&(((struct "+cn.getSafeSymbol() +" *)0)->"+fd.getSafeSymbol()+"))");
857 output.println("};");
859 output.println("unsigned int * pointerarray[]={");
860 boolean needcomma=false;
861 for(int i=0;i<state.numClasses();i++) {
862 ClassDescriptor cn=cdarray[i];
866 output.print(cn.getSafeSymbol()+"_pointers");
869 for(int i=0;i<state.numArrays();i++) {
871 output.println(", ");
872 TypeDescriptor tdelement=arraytable[i].dereference();
873 if (tdelement.isArray()||tdelement.isClass())
874 output.print("((unsigned int *)1)");
880 output.println("};");
882 output.println("int hasflags[]={");
883 for(int i=0;i<state.numClasses();i++) {
884 ClassDescriptor cn=cdarray[i];
886 output.println(", ");
893 output.println("};");
896 /** Print out table to give us supertypes */
897 private void generateSuperTypeTable(PrintWriter output) {
898 output.println("int supertypes[]={");
899 boolean needcomma=false;
900 for(int i=0;i<state.numClasses();i++) {
901 ClassDescriptor cn=cdarray[i];
905 if (cn.getSuperDesc()!=null) {
906 ClassDescriptor cdsuper=cn.getSuperDesc();
907 output.print(cdsuper.getId());
911 output.println("};");
914 /** Force consistent field ordering between inherited classes. */
916 private void printClassStruct(ClassDescriptor cn, PrintWriter classdefout) {
918 ClassDescriptor sp=cn.getSuperDesc();
920 printClassStruct(sp, classdefout);
922 if (!fieldorder.containsKey(cn)) {
923 Vector fields=new Vector();
924 fieldorder.put(cn,fields);
925 Iterator fieldit=cn.getFields();
926 while(fieldit.hasNext()) {
927 FieldDescriptor fd=(FieldDescriptor)fieldit.next();
928 if (sp==null||!sp.getFieldTable().contains(fd.getSymbol()))
932 Vector fields=(Vector)fieldorder.get(cn);
934 for(int i=0;i<fields.size();i++) {
935 FieldDescriptor fd=(FieldDescriptor)fields.get(i);
936 if (fd.getType().isClass()||fd.getType().isArray())
937 classdefout.println(" struct "+fd.getType().getSafeSymbol()+" * "+fd.getSafeSymbol()+";");
939 classdefout.println(" "+fd.getType().getSafeSymbol()+" "+fd.getSafeSymbol()+";");
944 /* Map flags to integers consistently between inherited
947 private void mapFlags(ClassDescriptor cn) {
948 ClassDescriptor sp=cn.getSuperDesc();
952 if (!flagorder.containsKey(cn)) {
953 Hashtable flags=new Hashtable();
954 flagorder.put(cn,flags);
956 Hashtable superflags=(Hashtable)flagorder.get(sp);
957 Iterator superflagit=superflags.keySet().iterator();
958 while(superflagit.hasNext()) {
959 FlagDescriptor fd=(FlagDescriptor)superflagit.next();
960 Integer number=(Integer)superflags.get(fd);
961 flags.put(fd, number);
962 if ((number.intValue()+1)>max)
963 max=number.intValue()+1;
967 Iterator flagit=cn.getFlags();
968 while(flagit.hasNext()) {
969 FlagDescriptor fd=(FlagDescriptor)flagit.next();
970 if (sp==null||!sp.getFlagTable().contains(fd.getSymbol()))
971 flags.put(fd, new Integer(max++));
977 /** This function outputs (1) structures that parameters are
978 * passed in (when PRECISE GC is enabled) and (2) function
979 * prototypes for the methods */
981 private void generateCallStructs(ClassDescriptor cn, PrintWriter classdefout, PrintWriter output, PrintWriter headersout) {
982 /* Output class structure */
983 classdefout.println("struct "+cn.getSafeSymbol()+" {");
984 classdefout.println(" int type;");
986 classdefout.println(" pthread_t tid;");
987 classdefout.println(" void * lockentry;");
988 classdefout.println(" int lockcount;");
992 classdefout.println(" int flag;");
993 classdefout.println(" void * flagptr;");
995 classdefout.println(" int numfses;");
996 classdefout.println(" int * fses;");
999 printClassStruct(cn, classdefout);
1000 classdefout.println("};\n");
1003 /* Cycle through LocalityBindings */
1004 HashSet<MethodDescriptor> nativemethods=new HashSet<MethodDescriptor>();
1005 Set<LocalityBinding> lbset=locality.getClassBindings(cn);
1007 for(Iterator<LocalityBinding> lbit=lbset.iterator();lbit.hasNext();) {
1008 LocalityBinding lb=lbit.next();
1009 MethodDescriptor md=lb.getMethod();
1010 if (md.getModifiers().isNative()) {
1011 //make sure we only print a native method once
1012 if (nativemethods.contains(md)) {
1013 FlatMethod fm=state.getMethodFlat(md);
1014 generateTempStructs(fm, lb);
1017 nativemethods.add(md);
1019 generateMethod(cn, md, lb, headersout, output);
1022 for(Iterator methodit=cn.getMethods();methodit.hasNext();) {
1023 MethodDescriptor md=(MethodDescriptor)methodit.next();
1024 if (md.getModifiers().isNative()&&!nativemethods.contains(md)) {
1025 //Need to build param structure for library code
1026 FlatMethod fm=state.getMethodFlat(md);
1027 generateTempStructs(fm, null);
1028 generateMethodParam(cn, md, null, output);
1033 for(Iterator methodit=cn.getMethods();methodit.hasNext();) {
1034 MethodDescriptor md=(MethodDescriptor)methodit.next();
1035 generateMethod(cn, md, null, headersout, output);
1039 private void generateMethodParam(ClassDescriptor cn, MethodDescriptor md, LocalityBinding lb, PrintWriter output) {
1040 /* Output parameter structure */
1041 if (GENERATEPRECISEGC) {
1042 ParamsObject objectparams=(ParamsObject) paramstable.get(lb!=null?lb:md);
1043 if (state.DSM&&lb!=null)
1044 output.println("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params {");
1046 output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params {");
1047 output.println(" int size;");
1048 output.println(" void * next;");
1049 for(int i=0;i<objectparams.numPointers();i++) {
1050 TempDescriptor temp=objectparams.getPointer(i);
1051 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1053 output.println("};\n");
1058 private void generateMethod(ClassDescriptor cn, MethodDescriptor md, LocalityBinding lb, PrintWriter headersout, PrintWriter output) {
1059 FlatMethod fm=state.getMethodFlat(md);
1060 generateTempStructs(fm, lb);
1062 ParamsObject objectparams=(ParamsObject) paramstable.get(lb!=null?lb:md);
1063 TempObject objecttemps=(TempObject) tempstable.get(lb!=null?lb:md);
1065 generateMethodParam(cn, md, lb, output);
1067 /* Output temp structure */
1068 if (GENERATEPRECISEGC) {
1070 output.println("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals {");
1072 output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals {");
1073 output.println(" int size;");
1074 output.println(" void * next;");
1075 for(int i=0;i<objecttemps.numPointers();i++) {
1076 TempDescriptor temp=objecttemps.getPointer(i);
1077 if (temp.getType().isNull())
1078 output.println(" void * "+temp.getSafeSymbol()+";");
1080 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1082 output.println("};\n");
1085 /********* Output method declaration ***********/
1087 /* First the return type */
1088 if (md.getReturnType()!=null) {
1089 if (md.getReturnType().isClass()||md.getReturnType().isArray())
1090 headersout.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
1092 headersout.print(md.getReturnType().getSafeSymbol()+" ");
1094 //catch the constructor case
1095 headersout.print("void ");
1097 /* Next the method name */
1099 headersout.print(cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1101 headersout.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1103 boolean printcomma=false;
1104 if (GENERATEPRECISEGC) {
1106 headersout.print("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1108 headersout.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1112 if (state.DSM&&lb.isAtomic()) {
1114 headersout.print(", ");
1115 headersout.print("transrecord_t * trans");
1119 /* Output parameter list*/
1120 for(int i=0;i<objectparams.numPrimitives();i++) {
1121 TempDescriptor temp=objectparams.getPrimitive(i);
1123 headersout.print(", ");
1125 if (temp.getType().isClass()||temp.getType().isArray())
1126 headersout.print("struct " + temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
1128 headersout.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
1130 headersout.println(");\n");
1134 /** This function outputs (1) structures that parameters are
1135 * passed in (when PRECISE GC is enabled) and (2) function
1136 * prototypes for the tasks */
1138 private void generateTaskStructs(PrintWriter output, PrintWriter headersout) {
1139 /* Cycle through tasks */
1140 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
1142 while(taskit.hasNext()) {
1143 /* Classify parameters */
1144 TaskDescriptor task=(TaskDescriptor)taskit.next();
1145 FlatMethod fm=state.getMethodFlat(task);
1146 generateTempStructs(fm, null);
1148 ParamsObject objectparams=(ParamsObject) paramstable.get(task);
1149 TempObject objecttemps=(TempObject) tempstable.get(task);
1151 /* Output parameter structure */
1152 if (GENERATEPRECISEGC) {
1153 output.println("struct "+task.getSafeSymbol()+"_params {");
1155 output.println(" int size;");
1156 output.println(" void * next;");
1157 for(int i=0;i<objectparams.numPointers();i++) {
1158 TempDescriptor temp=objectparams.getPointer(i);
1159 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1162 output.println("};\n");
1163 if ((objectparams.numPointers()+fm.numTags())>maxtaskparams) {
1164 maxtaskparams=objectparams.numPointers()+fm.numTags();
1168 /* Output temp structure */
1169 if (GENERATEPRECISEGC) {
1170 output.println("struct "+task.getSafeSymbol()+"_locals {");
1171 output.println(" int size;");
1172 output.println(" void * next;");
1173 for(int i=0;i<objecttemps.numPointers();i++) {
1174 TempDescriptor temp=objecttemps.getPointer(i);
1175 if (temp.getType().isNull())
1176 output.println(" void * "+temp.getSafeSymbol()+";");
1177 else if(temp.getType().isTag())
1178 output.println(" struct "+
1179 (new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1181 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1183 output.println("};\n");
1186 /* Output task declaration */
1187 headersout.print("void " + task.getSafeSymbol()+"(");
1189 boolean printcomma=false;
1190 if (GENERATEPRECISEGC) {
1191 headersout.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
1193 headersout.print("void * parameterarray[]");
1194 headersout.println(");\n");
1198 /***** Generate code for FlatMethod fm. *****/
1200 private void generateFlatMethod(FlatMethod fm, LocalityBinding lb, PrintWriter output) {
1201 MethodDescriptor md=fm.getMethod();
1203 TaskDescriptor task=fm.getTask();
1205 ClassDescriptor cn=md!=null?md.getClassDesc():null;
1207 ParamsObject objectparams=(ParamsObject)paramstable.get(lb!=null?lb:md!=null?md:task);
1208 generateHeader(fm, lb, md!=null?md:task,output);
1209 TempObject objecttemp=(TempObject) tempstable.get(lb!=null?lb:md!=null?md:task);
1210 if (state.DSM&&lb.getHasAtomic()) {
1211 output.println("transrecord_t * trans;");
1214 if (GENERATEPRECISEGC) {
1215 if (md!=null&&state.DSM)
1216 output.print(" struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+"={");
1217 else if (md!=null&&!state.DSM)
1218 output.print(" struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+"={");
1220 output.print(" struct "+task.getSafeSymbol()+"_locals "+localsprefix+"={");
1222 output.print(objecttemp.numPointers()+",");
1223 output.print(paramsprefix);
1224 for(int j=0;j<objecttemp.numPointers();j++)
1225 output.print(", NULL");
1226 output.println("};");
1229 for(int i=0;i<objecttemp.numPrimitives();i++) {
1230 TempDescriptor td=objecttemp.getPrimitive(i);
1231 TypeDescriptor type=td.getType();
1233 output.println(" void * "+td.getSafeSymbol()+";");
1234 else if (type.isClass()||type.isArray())
1235 output.println(" struct "+type.getSafeSymbol()+" * "+td.getSafeSymbol()+";");
1237 output.println(" "+type.getSafeSymbol()+" "+td.getSafeSymbol()+";");
1240 /* Assign labels to FlatNode's if necessary.*/
1242 Hashtable<FlatNode, Integer> nodetolabel=assignLabels(fm);
1244 /* Check to see if we need to do a GC if this is a
1245 * multi-threaded program...*/
1247 if (state.THREAD&&GENERATEPRECISEGC) {
1248 output.println("checkcollect(&"+localsprefix+");");
1251 /* Do the actual code generation */
1252 FlatNode current_node=null;
1253 HashSet tovisit=new HashSet();
1254 HashSet visited=new HashSet();
1255 tovisit.add(fm.getNext(0));
1256 while(current_node!=null||!tovisit.isEmpty()) {
1257 if (current_node==null) {
1258 current_node=(FlatNode)tovisit.iterator().next();
1259 tovisit.remove(current_node);
1261 visited.add(current_node);
1262 if (nodetolabel.containsKey(current_node))
1263 output.println("L"+nodetolabel.get(current_node)+":");
1264 if (state.INSTRUCTIONFAILURE) {
1266 output.println("if ((++instructioncount)>failurecount) {instructioncount=0;injectinstructionfailure();}");
1269 output.println("if ((--instructioncount)==0) injectinstructionfailure();");
1271 if (current_node.numNext()==0) {
1273 generateFlatNode(fm, lb, current_node, output);
1274 if (current_node.kind()!=FKind.FlatReturnNode) {
1275 output.println(" return;");
1278 } else if(current_node.numNext()==1) {
1280 generateFlatNode(fm, lb, current_node, output);
1281 FlatNode nextnode=current_node.getNext(0);
1282 if (visited.contains(nextnode)) {
1283 output.println("goto L"+nodetolabel.get(nextnode)+";");
1286 current_node=nextnode;
1287 } else if (current_node.numNext()==2) {
1290 generateFlatCondBranch(fm, lb, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
1291 if (!visited.contains(current_node.getNext(1)))
1292 tovisit.add(current_node.getNext(1));
1293 if (visited.contains(current_node.getNext(0))) {
1294 output.println("goto L"+nodetolabel.get(current_node.getNext(0))+";");
1297 current_node=current_node.getNext(0);
1298 } else throw new Error();
1301 output.println("}\n\n");
1304 /** This method assigns labels to FlatNodes */
1306 private Hashtable<FlatNode, Integer> assignLabels(FlatMethod fm) {
1307 HashSet tovisit=new HashSet();
1308 HashSet visited=new HashSet();
1310 Hashtable<FlatNode, Integer> nodetolabel=new Hashtable<FlatNode, Integer>();
1311 tovisit.add(fm.getNext(0));
1313 /*Assign labels first. A node needs a label if the previous
1314 * node has two exits or this node is a join point. */
1316 while(!tovisit.isEmpty()) {
1317 FlatNode fn=(FlatNode)tovisit.iterator().next();
1320 for(int i=0;i<fn.numNext();i++) {
1321 FlatNode nn=fn.getNext(i);
1323 //1) Edge >1 of node
1324 nodetolabel.put(nn,new Integer(labelindex++));
1326 if (!visited.contains(nn)&&!tovisit.contains(nn)) {
1330 nodetolabel.put(nn,new Integer(labelindex++));
1338 /** Generate text string that corresponds to the TempDescriptor td. */
1339 private String generateTemp(FlatMethod fm, TempDescriptor td, LocalityBinding lb) {
1340 MethodDescriptor md=fm.getMethod();
1341 TaskDescriptor task=fm.getTask();
1342 TempObject objecttemps=(TempObject) tempstable.get(lb!=null?lb:md!=null?md:task);
1344 if (objecttemps.isLocalPrim(td)||objecttemps.isParamPrim(td)) {
1345 return td.getSafeSymbol();
1348 if (objecttemps.isLocalPtr(td)) {
1349 return localsprefix+"."+td.getSafeSymbol();
1352 if (objecttemps.isParamPtr(td)) {
1353 return paramsprefix+"->"+td.getSafeSymbol();
1358 private void generateFlatNode(FlatMethod fm, LocalityBinding lb, FlatNode fn, PrintWriter output) {
1360 case FKind.FlatAtomicEnterNode:
1361 generateFlatAtomicEnterNode(fm, lb, (FlatAtomicEnterNode) fn, output);
1363 case FKind.FlatAtomicExitNode:
1364 generateFlatAtomicExitNode(fm, lb, (FlatAtomicExitNode) fn, output);
1366 case FKind.FlatGlobalConvNode:
1367 generateFlatGlobalConvNode(fm, lb, (FlatGlobalConvNode) fn, output);
1369 case FKind.FlatTagDeclaration:
1370 generateFlatTagDeclaration(fm, lb, (FlatTagDeclaration) fn,output);
1372 case FKind.FlatCall:
1373 generateFlatCall(fm, lb, (FlatCall) fn,output);
1375 case FKind.FlatFieldNode:
1376 generateFlatFieldNode(fm, lb, (FlatFieldNode) fn,output);
1378 case FKind.FlatElementNode:
1379 generateFlatElementNode(fm, lb, (FlatElementNode) fn,output);
1381 case FKind.FlatSetElementNode:
1382 generateFlatSetElementNode(fm, lb, (FlatSetElementNode) fn,output);
1384 case FKind.FlatSetFieldNode:
1385 generateFlatSetFieldNode(fm, lb, (FlatSetFieldNode) fn,output);
1388 generateFlatNew(fm, lb, (FlatNew) fn,output);
1390 case FKind.FlatOpNode:
1391 generateFlatOpNode(fm, lb, (FlatOpNode) fn,output);
1393 case FKind.FlatCastNode:
1394 generateFlatCastNode(fm, lb, (FlatCastNode) fn,output);
1396 case FKind.FlatLiteralNode:
1397 generateFlatLiteralNode(fm, lb, (FlatLiteralNode) fn,output);
1399 case FKind.FlatReturnNode:
1400 generateFlatReturnNode(fm, lb, (FlatReturnNode) fn,output);
1403 output.println("/* nop */");
1405 case FKind.FlatBackEdge:
1406 if ((state.THREAD||state.DSM)&&GENERATEPRECISEGC) {
1407 output.println("checkcollect(&"+localsprefix+");");
1409 output.println("/* nop */");
1411 case FKind.FlatCheckNode:
1412 generateFlatCheckNode(fm, lb, (FlatCheckNode) fn, output);
1414 case FKind.FlatFlagActionNode:
1415 generateFlatFlagActionNode(fm, lb, (FlatFlagActionNode) fn, output);
1417 case FKind.FlatPrefetchNode:
1418 generateFlatPrefetchNode(fm,lb, (FlatPrefetchNode) fn, output);
1424 public void generateFlatPrefetchNode(FlatMethod fm, LocalityBinding lb, FlatPrefetchNode fpn, PrintWriter output) {
1425 short[] arrayfields = null;
1426 Vector fieldoffset = new Vector();
1427 Vector endoffset = new Vector();
1428 Vector oids = new Vector();
1429 short offsetcount = 0;
1433 if (state.PREFETCH) {
1434 Iterator it = fpn.hspp.iterator();
1435 output.println("/* prefetch */");
1436 output.println("; /* empty statement to avoid compiler error */");
1437 /* TODO Add support for arrays, Currently handles only field pointers*/
1438 /* The while loop below removes all prefetch tuples with arrays from the set of prefetches */
1439 while(it.hasNext()) {
1440 PrefetchPair pp = (PrefetchPair) it.next();
1441 for(i = 0; i < pp.desc.size(); i++) {
1442 if(pp.getDescAt(i) instanceof IndexDescriptor) {
1443 fpn.hspp.remove((PrefetchPair) pp);
1444 it = fpn.hspp.iterator();
1449 it = fpn.hspp.iterator();
1450 String oidlist = new String();
1451 while(it.hasNext()) {
1452 PrefetchPair pp = (PrefetchPair) it.next();
1453 Integer statusbase = locality.getNodePreTempInfo(lb,fpn).get(pp.base);
1454 /* Find prefetches that can generate oid */
1455 if(statusbase == LocalityAnalysis.GLOBAL) {
1456 if(locality.getAtomic(lb).get(fpn).intValue()>0) { /* Inside transaction */
1457 generateInsideTransCode(fm,lb,output, pp,oids,fieldoffset,endoffset,tuplecount);
1458 } else {/* Outside Transaction */
1459 generateOutsideTransCode(fm,lb,pp,oids,fieldoffset,endoffset,tuplecount);
1462 } else if(statusbase == LocalityAnalysis.LOCAL) {
1463 generateLocalTransCode(fm,lb,pp,oids,fieldoffset,endoffset,tuplecount);
1469 /*Create C code for numtuples */
1470 output.println(" int numtuples_" + count + " = " + tuplecount + ";");
1472 /*Create C code for oid array */
1473 output.print(" unsigned int oidarray_" + count + "[] = {");
1474 boolean needcomma=false;
1475 it = oids.iterator();
1476 while(it.hasNext()) {
1479 output.print(it.next());
1482 output.println("};");
1484 /*Create C code for endoffset values */
1485 output.print(" unsigned short endoffsetarry_" + count +"[] = {");
1487 it = endoffset.iterator();
1488 while(it.hasNext()) {
1491 output.print(it.next());
1494 output.println("};");
1496 /*Create C code for Field Offset Values */
1497 output.print(" short fieldarry_" + count +"[] = {");
1499 it = fieldoffset.iterator();
1500 while(it.hasNext()) {
1503 output.print(it.next());
1506 output.println("};");
1507 /* make the prefetch call to Runtime */
1508 output.println(" prefetch((int) numtuples_"+count+ ", oidarray_"+count+ ", endoffsetarry_"+
1509 count+", fieldarry_"+count+");");
1514 public void generateInsideTransCode(FlatMethod fm, LocalityBinding lb,PrintWriter output,PrefetchPair pp,Vector oids, Vector fieldoffset,Vector endoffset, int tuplecount){
1516 short offsetcount = 0;
1518 Object newdesc = pp.desc.get(0);
1519 if(newdesc instanceof FieldDescriptor) {
1520 FieldDescriptor fd = (FieldDescriptor)newdesc;
1521 String oid = new String("(unsigned int) (" +
1522 generateTemp(fm, pp.base, lb) + " != NULL ? " +
1523 generateTemp(fm, pp.base, lb) + "->" + ((FieldDescriptor)fd).getSafeSymbol() +
1527 IndexDescriptor id = (IndexDescriptor)newdesc;
1528 String tstlbl = new String();
1529 for(i=0; i<id.tddesc.size(); i++) {
1530 tstlbl += generateTemp(fm, id.getTempDescAt(i), lb) + "+";
1532 tstlbl += id.offset.toString();
1533 output.println("if ("+tstlbl+"< 0 || "+tstlbl+" >= "+
1534 generateTemp(fm, pp.base, lb) + "->___length___) {");
1535 output.println(" failedboundschk();");
1536 output.println("}");
1537 String oid = new String("(unsigned int) (" +
1538 generateTemp(fm, pp.base, lb) + " != NULL ? " +
1539 generateTemp(fm, pp.base, lb) + "[" + tstlbl + "] : NULL)");
1542 for(i = 1; i < pp.desc.size(); i++) {
1543 TypeDescriptor newtd;
1544 String newfieldoffset;
1545 Object desc = pp.getDescAt(i);
1547 if(desc instanceof FieldDescriptor) {
1548 Object prevdesc = pp.getDescAt(i-1);
1549 if(prevdesc instanceof IndexDescriptor){
1551 newtd = pp.base.getType();
1552 //FIXME currently handles one dimensional arrays
1553 newtd = ((FieldDescriptor)pp.getDescAt(i-2)).getType();
1555 newtd = ((FieldDescriptor)pp.getDescAt(i-1)).getType();
1557 newfieldoffset = new String("(short)(&(((struct "+ newtd.getSafeSymbol()+" *)0)->"+
1558 ((FieldDescriptor)desc).getSafeSymbol()+ "))");
1559 fieldoffset.add(newfieldoffset);
1561 String tstlbl = new String();
1562 for(i=0; i<((IndexDescriptor)desc).tddesc.size(); i++) {
1563 tstlbl += generateTemp(fm, ((IndexDescriptor)desc).getTempDescAt(i), lb) + "+";
1565 tstlbl += ((IndexDescriptor)desc).offset.toString();
1566 newfieldoffset = new String("(short)("+tstlbl+")");
1567 fieldoffset.add(newfieldoffset);
1570 if(tuplecount > 0) {
1571 int tmp = (int) ((Short)(endoffset.get(tuplecount-1))).shortValue() + (int) offsetcount;
1572 short endoffsetval = (short) tmp;
1573 endoffset.add(endoffsetval);
1575 endoffset.add(offsetcount);
1579 public void generateOutsideTransCode(FlatMethod fm, LocalityBinding lb,PrefetchPair pp, Vector oids, Vector fieldoffset, Vector endoffset, int tuplecount) {
1581 short offsetcount = 0;
1583 String oid = new String(" (unsigned int) (" + generateTemp(fm, pp.base, lb)+ ")");
1585 for(i = 0; i < pp.desc.size(); i++) {
1586 TypeDescriptor newtd;
1587 String newfieldoffset;
1588 Object desc = pp.getDescAt(i);
1590 if(desc instanceof FieldDescriptor) {
1592 newtd = pp.base.getType();
1594 Object prevdesc = pp.getDescAt(i-1);
1595 if(prevdesc instanceof IndexDescriptor){
1596 //FIXME currently handles one dimensional arrays
1597 newtd = ((FieldDescriptor)pp.getDescAt(i-2)).getType();
1599 newtd = ((FieldDescriptor)pp.getDescAt(i-1)).getType();
1602 newfieldoffset = new String("(short)(&(((struct "+ newtd.getSafeSymbol()+" *)0)->"+
1603 ((FieldDescriptor)desc).getSafeSymbol()+ "))");
1605 String tstlbl = new String();
1606 for(i=0; i<((IndexDescriptor)desc).tddesc.size(); i++) {
1607 tstlbl += generateTemp(fm, ((IndexDescriptor)desc).getTempDescAt(i), lb) + "+";
1609 tstlbl += ((IndexDescriptor)desc).offset.toString();
1610 newfieldoffset = new String("(short)("+tstlbl+")");
1612 fieldoffset.add(newfieldoffset);
1614 if(tuplecount > 0) {
1615 int tmp = (int) ((Short)(endoffset.get(tuplecount-1))).shortValue() + (int) offsetcount;
1616 short endoffsetval = (short) tmp;
1617 endoffset.add(endoffsetval);
1619 endoffset.add(offsetcount);
1624 public void generateLocalTransCode(FlatMethod fm, LocalityBinding lb,PrefetchPair pp,Vector oids, Vector fieldoffset,Vector endoffset, int tuplecount) {
1626 short offsetcount = 0;
1628 Vector prefix = new Vector();
1629 prefix.add(generateTemp(fm,pp.base,lb));
1630 String tstlbl = new String("(" + prefix.get(0) + " != NULL ");
1631 for (i = 0; i < pp.desc.size(); i++) {
1632 Object newdesc = pp.desc.get(i);
1633 if(newdesc instanceof FieldDescriptor) {
1634 FieldDescriptor fd = (FieldDescriptor) newdesc;
1636 /* Field descriptor is global */
1637 String oid = new String(" (unsigned int) (");
1639 for(j = 0; j < prefix.size(); j++) {
1640 tstlbl += prefix.get(j) + "->";
1642 tstlbl += fd.getSafeSymbol() + ": NULL";
1643 oid += tstlbl+ " )";
1645 for(j=i+1; j < pp.desc.size(); j++) {
1646 TypeDescriptor newtd;
1647 String newfieldoffset;
1648 Object desc = pp.getDescAt(j);
1650 if(desc instanceof FieldDescriptor) {
1651 Object prevdesc = pp.getDescAt(j-1);
1652 if(prevdesc instanceof IndexDescriptor){
1653 //FIXME currently handles one dimensional arrays
1654 newtd = ((FieldDescriptor)pp.getDescAt(j-2)).getType();
1656 newtd = ((FieldDescriptor) pp.getDescAt(j-1)).getType();
1658 newfieldoffset = new String("(short)(&(((struct "+ newtd.getSafeSymbol()+" *)0)->"+
1659 ((FieldDescriptor)desc).getSafeSymbol()+ "))");
1661 String indexlbl = new String();
1662 for(i=0; i<((IndexDescriptor)desc).tddesc.size(); i++) {
1663 indexlbl += generateTemp(fm, ((IndexDescriptor)desc).getTempDescAt(i), lb) + "+";
1665 indexlbl += ((IndexDescriptor)desc).offset.toString();
1666 newfieldoffset = new String("(short)("+indexlbl+")");
1668 fieldoffset.add(newfieldoffset);
1670 if(tuplecount > 0) {
1671 int tmp = (int) ((Short)(endoffset.get(tuplecount-1))).shortValue() + (int) offsetcount;
1672 short endoffsetval = (short) tmp;
1673 endoffset.add(endoffsetval);
1675 endoffset.add(offsetcount);
1678 break; //break from outer for loop
1681 for(j = 0; j < prefix.size(); j++) {
1682 tstlbl += prefix.get(j) + "->";
1684 prefix.add(fd.getSafeSymbol());
1685 tstlbl += fd.getSafeSymbol() + " != NULL";
1687 } else { /* if Index descriptor */
1688 String indexstring = new String();
1689 IndexDescriptor id = (IndexDescriptor) newdesc;
1691 indexstring = generateTemp(fm, pp.base, lb);
1693 indexstring = ((FieldDescriptor)pp.getDescAt(i-1)).getSafeSymbol();
1696 for(j = 0; j < prefix.size(); j++) {
1697 tstlbl += prefix.get(j) + "[";
1700 for(j=0; j<id.tddesc.size(); j++) {
1701 tstlbl += generateTemp(fm, id.getTempDescAt(j), lb) + "+";
1702 indexstring += generateTemp(fm,id.getTempDescAt(j), lb) + "+";
1704 tstlbl += id.offset.toString()+ "]";
1705 indexstring += id.offset.toString()+ "]";
1706 prefix. removeElementAt(prefix.size() -1);
1707 prefix.add(indexstring);
1708 tstlbl += " != NULL";
1713 public void generateFlatGlobalConvNode(FlatMethod fm, LocalityBinding lb, FlatGlobalConvNode fgcn, PrintWriter output) {
1714 if (lb!=fgcn.getLocality())
1716 /* Have to generate flat globalconv */
1717 if (fgcn.getMakePtr()) {
1718 output.println(generateTemp(fm, fgcn.getSrc(),lb)+"=(void *)transRead(trans, (unsigned int) "+generateTemp(fm, fgcn.getSrc(),lb)+");");
1720 /* Need to convert to OID */
1721 output.println(generateTemp(fm, fgcn.getSrc(),lb)+"=(void *)COMPOID("+generateTemp(fm, fgcn.getSrc(),lb)+");");
1725 public void generateFlatAtomicEnterNode(FlatMethod fm, LocalityBinding lb, FlatAtomicEnterNode faen, PrintWriter output) {
1726 /* Check to see if we need to generate code for this atomic */
1727 if (locality.getAtomic(lb).get(faen.getPrev(0)).intValue()>0)
1729 /* Backup the temps. */
1730 for(Iterator<TempDescriptor> tmpit=locality.getTemps(lb).get(faen).iterator();tmpit.hasNext();) {
1731 TempDescriptor tmp=tmpit.next();
1732 output.println(generateTemp(fm, backuptable.get(tmp),lb)+"="+generateTemp(fm,tmp,lb)+";");
1734 output.println("goto transstart"+faen.getIdentifier()+";");
1736 /******* Print code to retry aborted transaction *******/
1737 output.println("transretry"+faen.getIdentifier()+":");
1740 for(Iterator<TempDescriptor> tmpit=locality.getTemps(lb).get(faen).iterator();tmpit.hasNext();) {
1741 TempDescriptor tmp=tmpit.next();
1742 output.println(generateTemp(fm, tmp,lb)+"="+generateTemp(fm,backuptable.get(tmp),lb)+";");
1745 /********* Need to revert local object store ********/
1746 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
1748 output.println("while ("+revertptr+") {");
1749 output.println("struct ___Object___ * tmpptr;");
1750 output.println("tmpptr="+revertptr+"->"+nextobjstr+";");
1751 output.println("REVERT_OBJ("+revertptr+");");
1752 output.println(revertptr+"=tmpptr;");
1753 output.println("}");
1755 /******* Tell the runtime to start the transaction *******/
1757 output.println("transstart"+faen.getIdentifier()+":");
1758 output.println("trans=transStart();");
1761 public void generateFlatAtomicExitNode(FlatMethod fm, LocalityBinding lb, FlatAtomicExitNode faen, PrintWriter output) {
1762 /* Check to see if we need to generate code for this atomic */
1763 if (locality.getAtomic(lb).get(faen).intValue()>0)
1765 //store the revert list before we lose the transaction object
1766 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
1767 output.println(revertptr+"=trans->revertlist;");
1768 output.println("if (transCommit(trans)) {");
1769 /* Transaction aborts if it returns true */
1770 output.println("goto transretry"+faen.getAtomicEnter().getIdentifier()+";");
1771 output.println("} else {");
1772 /* Need to commit local object store */
1773 output.println("while ("+revertptr+") {");
1774 output.println("struct ___Object___ * tmpptr;");
1775 output.println("tmpptr="+revertptr+"->"+nextobjstr+";");
1776 output.println("COMMIT_OBJ("+revertptr+");");
1777 output.println(revertptr+"=tmpptr;");
1778 output.println("}");
1779 output.println("}");
1782 private void generateFlatCheckNode(FlatMethod fm, LocalityBinding lb, FlatCheckNode fcn, PrintWriter output) {
1783 if (state.CONSCHECK) {
1784 String specname=fcn.getSpec();
1785 String varname="repairstate___";
1786 output.println("{");
1787 output.println("struct "+specname+"_state * "+varname+"=allocate"+specname+"_state();");
1789 TempDescriptor[] temps=fcn.getTemps();
1790 String[] vars=fcn.getVars();
1791 for(int i=0;i<temps.length;i++) {
1792 output.println(varname+"->"+vars[i]+"=(unsigned int)"+generateTemp(fm, temps[i],lb)+";");
1795 output.println("if (doanalysis"+specname+"("+varname+")) {");
1796 output.println("free"+specname+"_state("+varname+");");
1797 output.println("} else {");
1798 output.println("/* Bad invariant */");
1799 output.println("free"+specname+"_state("+varname+");");
1800 output.println("abort_task();");
1801 output.println("}");
1802 output.println("}");
1806 private void generateFlatCall(FlatMethod fm, LocalityBinding lb, FlatCall fc, PrintWriter output) {
1807 MethodDescriptor md=fc.getMethod();
1808 ParamsObject objectparams=(ParamsObject)paramstable.get(state.DSM?locality.getBinding(lb, fc):md);
1809 ClassDescriptor cn=md.getClassDesc();
1810 output.println("{");
1811 if (GENERATEPRECISEGC) {
1813 LocalityBinding fclb=locality.getBinding(lb, fc);
1814 output.print(" struct "+cn.getSafeSymbol()+fclb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
1816 output.print(" struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
1818 output.print(objectparams.numPointers());
1819 output.print(", & "+localsprefix);
1820 if (fc.getThis()!=null) {
1822 output.print("(struct "+md.getThis().getType().getSafeSymbol() +" *)"+ generateTemp(fm,fc.getThis(),lb));
1824 for(int i=0;i<fc.numArgs();i++) {
1825 Descriptor var=md.getParameter(i);
1826 TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
1827 if (objectparams.isParamPtr(paramtemp)) {
1828 TempDescriptor targ=fc.getArg(i);
1830 TypeDescriptor td=md.getParamType(i);
1832 output.print("(struct "+(new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol() +" *)"+generateTemp(fm, targ,lb));
1834 output.print("(struct "+md.getParamType(i).getSafeSymbol() +" *)"+generateTemp(fm, targ,lb));
1837 output.println("};");
1842 if (fc.getReturnTemp()!=null)
1843 output.print(generateTemp(fm,fc.getReturnTemp(),lb)+"=");
1845 /* Do we need to do virtual dispatch? */
1846 if (md.isStatic()||md.getReturnType()==null||singleCall(fc.getThis().getType().getClassDesc(),md)) {
1849 LocalityBinding fclb=locality.getBinding(lb, fc);
1850 output.print(cn.getSafeSymbol()+fclb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
1852 output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
1857 if (md.getReturnType().isClass()||md.getReturnType().isArray())
1858 output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
1860 output.print(md.getReturnType().getSafeSymbol()+" ");
1861 output.print("(*)(");
1863 boolean printcomma=false;
1864 if (GENERATEPRECISEGC) {
1866 LocalityBinding fclb=locality.getBinding(lb, fc);
1867 output.print("struct "+cn.getSafeSymbol()+fclb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * ");
1869 output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * ");
1873 for(int i=0;i<objectparams.numPrimitives();i++) {
1874 TempDescriptor temp=objectparams.getPrimitive(i);
1878 if (temp.getType().isClass()||temp.getType().isArray())
1879 output.print("struct " + temp.getType().getSafeSymbol()+" * ");
1881 output.print(temp.getType().getSafeSymbol());
1885 LocalityBinding fclb=locality.getBinding(lb, fc);
1886 output.print("))virtualtable["+generateTemp(fm,fc.getThis(),lb)+"->type*"+maxcount+"+"+virtualcalls.getLocalityNumber(fclb)+"])");
1888 output.print("))virtualtable["+generateTemp(fm,fc.getThis(),lb)+"->type*"+maxcount+"+"+virtualcalls.getMethodNumber(md)+"])");
1892 boolean needcomma=false;
1893 if (GENERATEPRECISEGC) {
1894 output.print("&__parameterlist__");
1898 if (state.DSM&&locality.getBinding(lb,fc).isAtomic()) {
1901 output.print("trans");
1905 if (!GENERATEPRECISEGC) {
1906 if (fc.getThis()!=null) {
1907 TypeDescriptor ptd=md.getThis().getType();
1910 if (ptd.isClass()&&!ptd.isArray())
1911 output.print("(struct "+ptd.getSafeSymbol()+" *) ");
1912 output.print(generateTemp(fm,fc.getThis(),lb));
1917 for(int i=0;i<fc.numArgs();i++) {
1918 Descriptor var=md.getParameter(i);
1919 TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
1920 if (objectparams.isParamPrim(paramtemp)) {
1921 TempDescriptor targ=fc.getArg(i);
1925 TypeDescriptor ptd=md.getParamType(i);
1926 if (ptd.isClass()&&!ptd.isArray())
1927 output.print("(struct "+ptd.getSafeSymbol()+" *) ");
1928 output.print(generateTemp(fm, targ,lb));
1932 output.println(");");
1933 output.println(" }");
1936 private boolean singleCall(ClassDescriptor thiscd, MethodDescriptor md) {
1937 Set subclasses=typeutil.getSubClasses(thiscd);
1938 if (subclasses==null)
1940 for(Iterator classit=subclasses.iterator();classit.hasNext();) {
1941 ClassDescriptor cd=(ClassDescriptor)classit.next();
1942 Set possiblematches=cd.getMethodTable().getSet(md.getSymbol());
1943 for(Iterator matchit=possiblematches.iterator();matchit.hasNext();) {
1944 MethodDescriptor matchmd=(MethodDescriptor)matchit.next();
1945 if (md.matches(matchmd))
1952 private void generateFlatFieldNode(FlatMethod fm, LocalityBinding lb, FlatFieldNode ffn, PrintWriter output) {
1954 Integer status=locality.getNodePreTempInfo(lb,ffn).get(ffn.getSrc());
1955 if (status==LocalityAnalysis.GLOBAL) {
1956 String field=ffn.getField().getSafeSymbol();
1957 String src=generateTemp(fm, ffn.getSrc(),lb);
1958 String dst=generateTemp(fm, ffn.getDst(),lb);
1960 if (ffn.getField().getType().isPtr()) {
1962 //TODO: Uncomment this when we have runtime support
1963 //if (ffn.getSrc()==ffn.getDst()) {
1964 //output.println("{");
1965 //output.println("void * temp="+src+";");
1966 //output.println("if (temp&0x1) {");
1967 //output.println("temp=(void *) transRead(trans, (unsigned int) temp);");
1968 //output.println(src+"->"+field+"="+temp+";");
1969 //output.println("}");
1970 //output.println(dst+"=temp;");
1971 //output.println("}");
1973 output.println(dst+"="+ src +"->"+field+ ";");
1974 //output.println("if ("+dst+"&0x1) {");
1975 output.println(dst+"=(void *) transRead(trans, (unsigned int) "+dst+");");
1976 //output.println(src+"->"+field+"="+src+"->"+field+";");
1977 //output.println("}");
1980 output.println(dst+"="+ src+"->"+field+";");
1982 } else if (status==LocalityAnalysis.LOCAL) {
1983 output.println(generateTemp(fm, ffn.getDst(),lb)+"="+ generateTemp(fm,ffn.getSrc(),lb)+"->"+ ffn.getField().getSafeSymbol()+";");
1984 } else if (status==LocalityAnalysis.EITHER) {
1985 //Code is reading from a null pointer
1986 output.println("if ("+generateTemp(fm, ffn.getSrc(),lb)+") {");
1987 output.println("printf(\"BIG ERROR\\n\");exit(-1);}");
1988 //This should throw a suitable null pointer error
1989 output.println(generateTemp(fm, ffn.getDst(),lb)+"="+ generateTemp(fm,ffn.getSrc(),lb)+"->"+ ffn.getField().getSafeSymbol()+";");
1991 throw new Error("Read from non-global/non-local in:"+lb.getExplanation());
1993 output.println(generateTemp(fm, ffn.getDst(),lb)+"="+ generateTemp(fm,ffn.getSrc(),lb)+"->"+ ffn.getField().getSafeSymbol()+";");
1997 private void generateFlatSetFieldNode(FlatMethod fm, LocalityBinding lb, FlatSetFieldNode fsfn, PrintWriter output) {
1998 if (fsfn.getField().getSymbol().equals("length")&&fsfn.getDst().getType().isArray())
1999 throw new Error("Can't set array length");
2000 if (state.DSM && locality.getAtomic(lb).get(fsfn).intValue()>0) {
2001 Integer statussrc=locality.getNodePreTempInfo(lb,fsfn).get(fsfn.getSrc());
2002 Integer statusdst=locality.getNodeTempInfo(lb).get(fsfn).get(fsfn.getDst());
2003 boolean srcglobal=statussrc==LocalityAnalysis.GLOBAL;
2005 String src=generateTemp(fm,fsfn.getSrc(),lb);
2006 String dst=generateTemp(fm,fsfn.getDst(),lb);
2008 output.println("{");
2009 output.println("int srcoid=(int)"+src+"->"+oidstr+";");
2011 if (statusdst.equals(LocalityAnalysis.GLOBAL)) {
2014 output.println("*((unsigned int *)&("+dst+"->___localcopy___))|=DIRTY;");
2016 output.println("*((unsigned int *)&("+glbdst+"->"+ fsfn.getField().getSafeSymbol()+"))=srcoid;");
2018 output.println(glbdst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
2019 } else if (statusdst.equals(LocalityAnalysis.LOCAL)) {
2020 /** Check if we need to copy */
2021 output.println("if(!"+dst+"->"+localcopystr+") {");
2022 /* Link object into list */
2023 output.println(dst+"->"+nextobjstr+"=trans->revertlist;");
2024 output.println("trans->revertlist=(struct ___Object___ *)"+dst+";");
2025 if (GENERATEPRECISEGC)
2026 output.println("COPY_OBJ((struct garbagelist *)&"+localsprefix+",(struct ___Object___ *)"+dst+");");
2028 output.println("COPY_OBJ("+dst+");");
2029 output.println("}");
2031 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"=srcoid;");
2033 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
2034 } else if (statusdst.equals(LocalityAnalysis.EITHER)) {
2035 //writing to a null...bad
2036 output.println("if ("+dst+") {");
2037 output.println("printf(\"BIG ERROR 2\\n\");exit(-1);}");
2039 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"=srcoid;");
2041 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
2044 output.println("}");
2047 output.println(generateTemp(fm, fsfn.getDst(),lb)+"->"+ fsfn.getField().getSafeSymbol()+"="+ generateTemp(fm,fsfn.getSrc(),lb)+";");
2051 private void generateFlatElementNode(FlatMethod fm, LocalityBinding lb, FlatElementNode fen, PrintWriter output) {
2052 TypeDescriptor elementtype=fen.getSrc().getType().dereference();
2055 if (elementtype.isArray()||elementtype.isClass())
2058 type=elementtype.getSafeSymbol()+" ";
2060 if (fen.needsBoundsCheck()) {
2061 output.println("if ("+generateTemp(fm, fen.getIndex(),lb)+"< 0 || "+generateTemp(fm, fen.getIndex(),lb)+" >= "+generateTemp(fm,fen.getSrc(),lb) + "->___length___)");
2062 output.println("failedboundschk();");
2065 Integer status=locality.getNodePreTempInfo(lb,fen).get(fen.getSrc());
2066 if (status==LocalityAnalysis.GLOBAL) {
2067 String dst=generateTemp(fm, fen.getDst(),lb);
2069 if (elementtype.isPtr()) {
2070 output.println(dst +"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
2071 output.println(dst+"=(void *) transRead(trans, (unsigned int) "+dst+");");
2073 output.println(dst +"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
2075 } else if (status==LocalityAnalysis.LOCAL) {
2076 output.println(generateTemp(fm, fen.getDst(),lb)+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
2077 } else if (status==LocalityAnalysis.EITHER) {
2078 //Code is reading from a null pointer
2079 output.println("if ("+generateTemp(fm, fen.getSrc(),lb)+") {");
2080 output.println("printf(\"BIG ERROR\\n\");exit(-1);}");
2081 //This should throw a suitable null pointer error
2082 output.println(generateTemp(fm, fen.getDst(),lb)+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
2084 throw new Error("Read from non-global/non-local in:"+lb.getExplanation());
2086 output.println(generateTemp(fm, fen.getDst(),lb)+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
2090 private void generateFlatSetElementNode(FlatMethod fm, LocalityBinding lb, FlatSetElementNode fsen, PrintWriter output) {
2091 //TODO: need dynamic check to make sure this assignment is actually legal
2092 //Because Object[] could actually be something more specific...ie. Integer[]
2094 TypeDescriptor elementtype=fsen.getDst().getType().dereference();
2097 if (elementtype.isArray()||elementtype.isClass())
2100 type=elementtype.getSafeSymbol()+" ";
2103 if (fsen.needsBoundsCheck()) {
2104 output.println("if ("+generateTemp(fm, fsen.getIndex(),lb)+"< 0 || "+generateTemp(fm, fsen.getIndex(),lb)+" >= "+generateTemp(fm,fsen.getDst(),lb) + "->___length___)");
2105 output.println("failedboundschk();");
2108 if (state.DSM && locality.getAtomic(lb).get(fsen).intValue()>0) {
2109 Integer statussrc=locality.getNodePreTempInfo(lb,fsen).get(fsen.getSrc());
2110 Integer statusdst=locality.getNodePreTempInfo(lb,fsen).get(fsen.getDst());
2111 boolean srcglobal=statussrc==LocalityAnalysis.GLOBAL;
2112 boolean dstglobal=statusdst==LocalityAnalysis.GLOBAL;
2114 output.println("*((unsigned int *)&("+generateTemp(fm,fsen.getDst(),lb)+"->___localcopy___))|=DIRTY;");
2117 output.println("{");
2118 String src=generateTemp(fm, fsen.getSrc(), lb);
2119 output.println("int srcoid=(int)"+src+"->"+oidstr+";");
2120 output.println("((int*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]=srcoid;");
2121 output.println("}");
2123 output.println("(("+type +"*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]="+generateTemp(fm,fsen.getSrc(),lb)+";");
2126 output.println("(("+type +"*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]="+generateTemp(fm,fsen.getSrc(),lb)+";");
2129 private void generateFlatNew(FlatMethod fm, LocalityBinding lb, FlatNew fn, PrintWriter output) {
2130 if (fn.getType().isArray()) {
2131 int arrayid=state.getArrayNumber(fn.getType())+state.numClasses();
2132 if (fn.isGlobal()) {
2133 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarrayglobal(trans, "+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
2134 } else if (GENERATEPRECISEGC) {
2135 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarray(&"+localsprefix+", "+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
2137 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarray("+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
2140 if (fn.isGlobal()) {
2141 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newglobal(trans, "+fn.getType().getClassDesc().getId()+");");
2142 } else if (GENERATEPRECISEGC) {
2143 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_new(&"+localsprefix+", "+fn.getType().getClassDesc().getId()+");");
2145 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_new("+fn.getType().getClassDesc().getId()+");");
2150 private void generateFlatTagDeclaration(FlatMethod fm, LocalityBinding lb, FlatTagDeclaration fn, PrintWriter output) {
2151 if (GENERATEPRECISEGC) {
2152 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_tag(&"+localsprefix+", "+state.getTagId(fn.getType())+");");
2154 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_tag("+state.getTagId(fn.getType())+");");
2158 private void generateFlatOpNode(FlatMethod fm, LocalityBinding lb, FlatOpNode fon, PrintWriter output) {
2159 if (fon.getRight()!=null) {
2160 if (fon.getOp().getOp()==Operation.URIGHTSHIFT) {
2161 if (fon.getLeft().getType().isLong())
2162 output.println(generateTemp(fm, fon.getDest(),lb)+" = ((unsigned long long)"+generateTemp(fm, fon.getLeft(),lb)+")>>"+generateTemp(fm,fon.getRight(),lb)+";");
2164 output.println(generateTemp(fm, fon.getDest(),lb)+" = ((unsigned int)"+generateTemp(fm, fon.getLeft(),lb)+")>>"+generateTemp(fm,fon.getRight(),lb)+";");
2167 output.println(generateTemp(fm, fon.getDest(),lb)+" = "+generateTemp(fm, fon.getLeft(),lb)+fon.getOp().toString()+generateTemp(fm,fon.getRight(),lb)+";");
2168 } else if (fon.getOp().getOp()==Operation.ASSIGN)
2169 output.println(generateTemp(fm, fon.getDest(),lb)+" = "+generateTemp(fm, fon.getLeft(),lb)+";");
2170 else if (fon.getOp().getOp()==Operation.UNARYPLUS)
2171 output.println(generateTemp(fm, fon.getDest(),lb)+" = "+generateTemp(fm, fon.getLeft(),lb)+";");
2172 else if (fon.getOp().getOp()==Operation.UNARYMINUS)
2173 output.println(generateTemp(fm, fon.getDest(),lb)+" = -"+generateTemp(fm, fon.getLeft(),lb)+";");
2174 else if (fon.getOp().getOp()==Operation.LOGIC_NOT)
2175 output.println(generateTemp(fm, fon.getDest(),lb)+" = !"+generateTemp(fm, fon.getLeft(),lb)+";");
2176 else if (fon.getOp().getOp()==Operation.COMP)
2177 output.println(generateTemp(fm, fon.getDest(),lb)+" = ~"+generateTemp(fm, fon.getLeft(),lb)+";");
2178 else if (fon.getOp().getOp()==Operation.ISAVAILABLE) {
2179 output.println(generateTemp(fm, fon.getDest(),lb)+" = "+generateTemp(fm, fon.getLeft(),lb)+"->fses==NULL;");
2181 output.println(generateTemp(fm, fon.getDest(),lb)+fon.getOp().toString()+generateTemp(fm, fon.getLeft(),lb)+";");
2184 private void generateFlatCastNode(FlatMethod fm, LocalityBinding lb, FlatCastNode fcn, PrintWriter output) {
2185 /* TODO: Do type check here */
2186 if (fcn.getType().isArray()) {
2188 } else if (fcn.getType().isClass())
2189 output.println(generateTemp(fm,fcn.getDst(),lb)+"=(struct "+fcn.getType().getSafeSymbol()+" *)"+generateTemp(fm,fcn.getSrc(),lb)+";");
2191 output.println(generateTemp(fm,fcn.getDst(),lb)+"=("+fcn.getType().getSafeSymbol()+")"+generateTemp(fm,fcn.getSrc(),lb)+";");
2194 private void generateFlatLiteralNode(FlatMethod fm, LocalityBinding lb, FlatLiteralNode fln, PrintWriter output) {
2195 if (fln.getValue()==null)
2196 output.println(generateTemp(fm, fln.getDst(),lb)+"=0;");
2197 else if (fln.getType().getSymbol().equals(TypeUtil.StringClass)) {
2198 if (GENERATEPRECISEGC) {
2199 output.println(generateTemp(fm, fln.getDst(),lb)+"=NewString(&"+localsprefix+", \""+FlatLiteralNode.escapeString((String)fln.getValue())+"\","+((String)fln.getValue()).length()+");");
2201 output.println(generateTemp(fm, fln.getDst(),lb)+"=NewString(\""+FlatLiteralNode.escapeString((String)fln.getValue())+"\","+((String)fln.getValue()).length()+");");
2203 } else if (fln.getType().isBoolean()) {
2204 if (((Boolean)fln.getValue()).booleanValue())
2205 output.println(generateTemp(fm, fln.getDst(),lb)+"=1;");
2207 output.println(generateTemp(fm, fln.getDst(),lb)+"=0;");
2208 } else if (fln.getType().isChar()) {
2209 String st=FlatLiteralNode.escapeString(fln.getValue().toString());
2210 output.println(generateTemp(fm, fln.getDst(),lb)+"='"+st+"';");
2211 } else if (fln.getType().isLong()) {
2212 output.println(generateTemp(fm, fln.getDst(),lb)+"="+fln.getValue()+"LL;");
2214 output.println(generateTemp(fm, fln.getDst(),lb)+"="+fln.getValue()+";");
2217 private void generateFlatReturnNode(FlatMethod fm, LocalityBinding lb, FlatReturnNode frn, PrintWriter output) {
2218 if (frn.getReturnTemp()!=null) {
2219 if (frn.getReturnTemp().getType().isPtr())
2220 output.println("return (struct "+fm.getMethod().getReturnType().getSafeSymbol()+"*)"+generateTemp(fm, frn.getReturnTemp(), lb)+";");
2222 output.println("return "+generateTemp(fm, frn.getReturnTemp(), lb)+";");
2224 output.println("return;");
2227 private void generateFlatCondBranch(FlatMethod fm, LocalityBinding lb, FlatCondBranch fcb, String label, PrintWriter output) {
2228 output.println("if (!"+generateTemp(fm, fcb.getTest(),lb)+") goto "+label+";");
2231 /** This method generates header information for the method or
2232 * task referenced by the Descriptor des. */
2234 private void generateHeader(FlatMethod fm, LocalityBinding lb, Descriptor des, PrintWriter output) {
2236 ParamsObject objectparams=(ParamsObject)paramstable.get(lb!=null?lb:des);
2237 MethodDescriptor md=null;
2238 TaskDescriptor task=null;
2239 if (des instanceof MethodDescriptor)
2240 md=(MethodDescriptor) des;
2242 task=(TaskDescriptor) des;
2244 ClassDescriptor cn=md!=null?md.getClassDesc():null;
2246 if (md!=null&&md.getReturnType()!=null) {
2247 if (md.getReturnType().isClass()||md.getReturnType().isArray())
2248 output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
2250 output.print(md.getReturnType().getSafeSymbol()+" ");
2252 //catch the constructor case
2253 output.print("void ");
2256 output.print(cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
2258 output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
2260 output.print(task.getSafeSymbol()+"(");
2262 boolean printcomma=false;
2263 if (GENERATEPRECISEGC) {
2266 output.print("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
2268 output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
2270 output.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
2274 if (state.DSM&&lb.isAtomic()) {
2277 output.print("transrecord_t * trans");
2283 for(int i=0;i<objectparams.numPrimitives();i++) {
2284 TempDescriptor temp=objectparams.getPrimitive(i);
2288 if (temp.getType().isClass()||temp.getType().isArray())
2289 output.print("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
2291 output.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
2293 output.println(") {");
2294 } else if (!GENERATEPRECISEGC) {
2295 /* Imprecise Task */
2296 output.println("void * parameterarray[]) {");
2297 /* Unpack variables */
2298 for(int i=0;i<objectparams.numPrimitives();i++) {
2299 TempDescriptor temp=objectparams.getPrimitive(i);
2300 output.println("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+"=parameterarray["+i+"];");
2302 for(int i=0;i<fm.numTags();i++) {
2303 TempDescriptor temp=fm.getTag(i);
2304 int offset=i+objectparams.numPrimitives();
2305 output.println("struct ___TagDescriptor___ * "+temp.getSafeSymbol()+"=parameterarray["+offset+"];");
2308 if ((objectparams.numPrimitives()+fm.numTags())>maxtaskparams)
2309 maxtaskparams=objectparams.numPrimitives()+fm.numTags();
2310 } else output.println(") {");
2313 public void generateFlatFlagActionNode(FlatMethod fm, LocalityBinding lb, FlatFlagActionNode ffan, PrintWriter output) {
2314 output.println("/* FlatFlagActionNode */");
2317 /* Process tag changes */
2318 Relation tagsettable=new Relation();
2319 Relation tagcleartable=new Relation();
2321 Iterator tagsit=ffan.getTempTagPairs();
2322 while (tagsit.hasNext()) {
2323 TempTagPair ttp=(TempTagPair) tagsit.next();
2324 TempDescriptor objtmp=ttp.getTemp();
2325 TagDescriptor tag=ttp.getTag();
2326 TempDescriptor tagtmp=ttp.getTagTemp();
2327 boolean tagstatus=ffan.getTagChange(ttp);
2329 tagsettable.put(objtmp, tagtmp);
2331 tagcleartable.put(objtmp, tagtmp);
2336 Hashtable flagandtable=new Hashtable();
2337 Hashtable flagortable=new Hashtable();
2339 /* Process flag changes */
2340 Iterator flagsit=ffan.getTempFlagPairs();
2341 while(flagsit.hasNext()) {
2342 TempFlagPair tfp=(TempFlagPair)flagsit.next();
2343 TempDescriptor temp=tfp.getTemp();
2344 Hashtable flagtable=(Hashtable)flagorder.get(temp.getType().getClassDesc());
2345 FlagDescriptor flag=tfp.getFlag();
2347 //Newly allocate objects that don't set any flags case
2348 if (flagortable.containsKey(temp)) {
2352 flagortable.put(temp,new Integer(mask));
2354 int flagid=1<<((Integer)flagtable.get(flag)).intValue();
2355 boolean flagstatus=ffan.getFlagChange(tfp);
2358 if (flagortable.containsKey(temp)) {
2359 mask=((Integer)flagortable.get(temp)).intValue();
2362 flagortable.put(temp,new Integer(mask));
2364 int mask=0xFFFFFFFF;
2365 if (flagandtable.containsKey(temp)) {
2366 mask=((Integer)flagandtable.get(temp)).intValue();
2368 mask&=(0xFFFFFFFF^flagid);
2369 flagandtable.put(temp,new Integer(mask));
2375 HashSet flagtagset=new HashSet();
2376 flagtagset.addAll(flagortable.keySet());
2377 flagtagset.addAll(flagandtable.keySet());
2378 flagtagset.addAll(tagsettable.keySet());
2379 flagtagset.addAll(tagcleartable.keySet());
2381 Iterator ftit=flagtagset.iterator();
2382 while(ftit.hasNext()) {
2383 TempDescriptor temp=(TempDescriptor)ftit.next();
2386 Set tagtmps=tagcleartable.get(temp);
2387 if (tagtmps!=null) {
2388 Iterator tagit=tagtmps.iterator();
2389 while(tagit.hasNext()) {
2390 TempDescriptor tagtmp=(TempDescriptor)tagit.next();
2391 if (GENERATEPRECISEGC)
2392 output.println("tagclear(&"+localsprefix+", (struct ___Object___ *)"+generateTemp(fm, temp,lb)+", "+generateTemp(fm,tagtmp,lb)+");");
2394 output.println("tagclear((struct ___Object___ *)"+generateTemp(fm, temp,lb)+", "+generateTemp(fm,tagtmp,lb)+");");
2398 tagtmps=tagsettable.get(temp);
2399 if (tagtmps!=null) {
2400 Iterator tagit=tagtmps.iterator();
2401 while(tagit.hasNext()) {
2402 TempDescriptor tagtmp=(TempDescriptor)tagit.next();
2403 if (GENERATEPRECISEGC)
2404 output.println("tagset(&"+localsprefix+", (struct ___Object___ *)"+generateTemp(fm, temp,lb)+", "+generateTemp(fm,tagtmp,lb)+");");
2406 output.println("tagset((struct ___Object___ *)"+generateTemp(fm, temp, lb)+", "+generateTemp(fm,tagtmp, lb)+");");
2411 int andmask=0xFFFFFFF;
2413 if (flagortable.containsKey(temp))
2414 ormask=((Integer)flagortable.get(temp)).intValue();
2415 if (flagandtable.containsKey(temp))
2416 andmask=((Integer)flagandtable.get(temp)).intValue();
2417 if (ffan.getTaskType()==FlatFlagActionNode.NEWOBJECT) {
2418 output.println("flagorandinit("+generateTemp(fm, temp, lb)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
2420 output.println("flagorand("+generateTemp(fm, temp, lb)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
2425 void generateOptionalHeader(PrintWriter headers) {
2428 headers.println("#include \"task.h\"\n\n");
2429 headers.println("#ifndef _OPTIONAL_STRUCT_");
2430 headers.println("#define _OPTIONAL_STRUCT_");
2432 //STRUCT PREDICATEMEMBER
2433 headers.println("struct predicatemember{");
2434 headers.println("int type;");
2435 headers.println("int numdnfterms;");
2436 headers.println("int * flags;");
2437 headers.println("int numtags;");
2438 headers.println("int * tags;\n};\n\n");
2440 //STRUCT OPTIONALTASKDESCRIPTOR
2441 headers.println("struct optionaltaskdescriptor{");
2442 headers.println("struct taskdescriptor * task;");
2443 headers.println("int index;");
2444 headers.println("int numenterflags;");
2445 headers.println("int * enterflags;");
2446 headers.println("int numpredicatemembers;");
2447 headers.println("struct predicatemember ** predicatememberarray;");
2448 headers.println("};\n\n");
2450 //STRUCT TASKFAILURE
2451 headers.println("struct taskfailure {");
2452 headers.println("struct taskdescriptor * task;");
2453 headers.println("int index;");
2454 headers.println("int numoptionaltaskdescriptors;");
2455 headers.println("struct optionaltaskdescriptor ** optionaltaskdescriptorarray;\n};\n\n");
2457 //STRUCT FSANALYSISWRAPPER
2458 headers.println("struct fsanalysiswrapper{");
2459 headers.println("int flags;");
2460 headers.println("int numtags;");
2461 headers.println("int * tags;");
2462 headers.println("int numtaskfailures;");
2463 headers.println("struct taskfailure ** taskfailurearray;");
2464 headers.println("int numoptionaltaskdescriptors;");
2465 headers.println("struct optionaltaskdescriptor ** optionaltaskdescriptorarray;\n};\n\n");
2467 //STRUCT CLASSANALYSISWRAPPER
2468 headers.println("struct classanalysiswrapper{");
2469 headers.println("int type;");
2470 headers.println("int numotd;");
2471 headers.println("struct optionaltaskdescriptor ** otdarray;");
2472 headers.println("int numfsanalysiswrappers;");
2473 headers.println("struct fsanalysiswrapper ** fsanalysiswrapperarray;\n};");
2475 headers.println("extern struct classanalysiswrapper * classanalysiswrapperarray[];");
2477 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
2478 while(taskit.hasNext()) {
2479 TaskDescriptor td=(TaskDescriptor)taskit.next();
2480 headers.println("extern struct taskdescriptor task_"+td.getSafeSymbol()+";");
2485 //CHECK OVER THIS -- THERE COULD BE SOME ERRORS HERE
2486 int generateOptionalPredicate(Predicate predicate, OptionalTaskDescriptor otd, ClassDescriptor cdtemp, PrintWriter output) {
2487 int predicateindex = 0;
2488 //iterate through the classes concerned by the predicate
2489 Set c_vard = predicate.vardescriptors;
2490 Hashtable<TempDescriptor, Integer> slotnumber=new Hashtable<TempDescriptor, Integer>();
2493 for(Iterator vard_it = c_vard.iterator(); vard_it.hasNext();){
2494 VarDescriptor vard = (VarDescriptor)vard_it.next();
2495 TypeDescriptor typed = vard.getType();
2497 //generate for flags
2498 HashSet fen_hashset = predicate.flags.get(vard.getSymbol());
2499 output.println("int predicateflags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
2501 if (fen_hashset!=null){
2502 for (Iterator fen_it = fen_hashset.iterator(); fen_it.hasNext();){
2503 FlagExpressionNode fen = (FlagExpressionNode)fen_it.next();
2505 DNFFlag dflag=fen.getDNF();
2506 numberterms+=dflag.size();
2508 Hashtable flags=(Hashtable)flagorder.get(typed.getClassDesc());
2510 for(int j=0;j<dflag.size();j++) {
2512 output.println(",");
2513 Vector term=dflag.get(j);
2516 for(int k=0;k<term.size();k++) {
2517 DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
2518 FlagDescriptor fd=dfa.getFlag();
2519 boolean negated=dfa.getNegated();
2520 int flagid=1<<((Integer)flags.get(fd)).intValue();
2525 output.print("/*andmask*/0x"+Integer.toHexString(andmask)+", /*checkmask*/0x"+Integer.toHexString(checkmask));
2530 output.println("};\n");
2533 TagExpressionList tagel = predicate.tags.get(vard.getSymbol());
2534 output.println("int predicatetags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
2537 for(int j=0;j<tagel.numTags();j++) {
2539 output.println(",");
2540 TempDescriptor tmp=tagel.getTemp(j);
2541 if (!slotnumber.containsKey(tmp)) {
2542 Integer slotint=new Integer(current_slot++);
2543 slotnumber.put(tmp,slotint);
2545 int slot=slotnumber.get(tmp).intValue();
2546 output.println("/* slot */"+ slot+", /*tagid*/"+state.getTagId(tmp.getTag()));
2548 numtags = tagel.numTags();
2550 output.println("};");
2552 //store the result into a predicatemember struct
2553 output.println("struct predicatemember predicatemember_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"={");
2554 output.println("/*type*/"+typed.getClassDesc().getId()+",");
2555 output.println("/* number of dnf terms */"+numberterms+",");
2556 output.println("predicateflags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2557 output.println("/* number of tag */"+numtags+",");
2558 output.println("predicatetags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2559 output.println("};\n");
2564 //generate an array that stores the entire predicate
2565 output.println("struct predicatemember * predicatememberarray_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
2566 for( int j = 0; j<predicateindex; j++){
2567 if( j != predicateindex-1)output.println("&predicatemember_"+j+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2568 else output.println("&predicatemember_"+j+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
2570 output.println("};\n");
2571 return predicateindex;
2575 void generateOptionalArrays(PrintWriter output, PrintWriter headers, Hashtable<ClassDescriptor, Hashtable<FlagState, Set<OptionalTaskDescriptor>>> safeexecution, Hashtable optionaltaskdescriptors) {
2576 generateOptionalHeader(headers);
2578 output.println("#include \"optionalstruct.h\"\n\n");
2579 output.println("#include \"stdlib.h\"\n");
2581 HashSet processedcd = new HashSet();
2583 Enumeration e = safeexecution.keys();
2584 while (e.hasMoreElements()) {
2587 ClassDescriptor cdtemp=(ClassDescriptor)e.nextElement();
2588 Hashtable flaginfo=(Hashtable)flagorder.get(cdtemp);//will be used several times
2590 //Generate the struct of optionals
2591 Collection c_otd = ((Hashtable)optionaltaskdescriptors.get(cdtemp)).values();
2592 numotd = c_otd.size();
2593 if(maxotd<numotd) maxotd = numotd;
2594 if( !c_otd.isEmpty() ){
2595 for(Iterator otd_it = c_otd.iterator(); otd_it.hasNext();){
2596 OptionalTaskDescriptor otd = (OptionalTaskDescriptor)otd_it.next();
2598 //generate the int arrays for the predicate
2599 Predicate predicate = otd.predicate;
2600 int predicateindex = generateOptionalPredicate(predicate, otd, cdtemp, output);
2601 TreeSet<Integer> fsset=new TreeSet<Integer>();
2602 //iterate through possible FSes corresponding to
2603 //the state when entering
2605 for(Iterator fses = otd.enterflagstates.iterator(); fses.hasNext();){
2606 FlagState fs = (FlagState)fses.next();
2608 for(Iterator flags = fs.getFlags(); flags.hasNext();){
2609 FlagDescriptor flagd = (FlagDescriptor)flags.next();
2610 int id=1<<((Integer)flaginfo.get(flagd)).intValue();
2613 fsset.add(new Integer(flagid));
2614 //tag information not needed because tag
2615 //changes are not tolerated.
2618 output.println("int enterflag_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
2619 boolean needcomma=false;
2620 for(Iterator<Integer> it=fsset.iterator();it.hasNext();) {
2623 output.println(it.next());
2626 output.println("};\n");
2629 //generate optionaltaskdescriptor that actually
2630 //includes exit fses, predicate and the task
2632 output.println("struct optionaltaskdescriptor optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"={");
2633 output.println("&task_"+otd.td.getSafeSymbol()+",");
2634 output.println("/*index*/"+otd.getIndex()+",");
2635 output.println("/*number of enter flags*/"+fsset.size()+",");
2636 output.println("enterflag_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2637 output.println("/*number of members */"+predicateindex+",");
2638 output.println("predicatememberarray_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2639 output.println("};\n");
2643 // if there are no optionals, there is no need to build the rest of the struct
2645 output.println("struct optionaltaskdescriptor * otdarray"+cdtemp.getSafeSymbol()+"[]={");
2646 c_otd = ((Hashtable)optionaltaskdescriptors.get(cdtemp)).values();
2647 if( !c_otd.isEmpty() ){
2648 boolean needcomma=false;
2649 for(Iterator otd_it = c_otd.iterator(); otd_it.hasNext();){
2650 OptionalTaskDescriptor otd = (OptionalTaskDescriptor)otd_it.next();
2652 output.println(",");
2654 output.println("&optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
2657 output.println("};\n");
2659 //get all the possible flagstates reachable by an object
2660 Hashtable hashtbtemp = safeexecution.get(cdtemp);
2662 TreeSet fsts=new TreeSet(new FlagComparator(flaginfo));
2663 fsts.addAll(hashtbtemp.keySet());
2664 for(Iterator fsit=fsts.iterator();fsit.hasNext();) {
2665 FlagState fs = (FlagState)fsit.next();
2668 //get the set of OptionalTaskDescriptors corresponding
2669 HashSet<OptionalTaskDescriptor> availabletasks = (HashSet<OptionalTaskDescriptor>)hashtbtemp.get(fs);
2670 //iterate through the OptionalTaskDescriptors and
2671 //store the pointers to the optionals struct (see on
2672 //top) into an array
2674 output.println("struct optionaltaskdescriptor * optionaltaskdescriptorarray_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"[] = {");
2675 for(Iterator<OptionalTaskDescriptor> mos = ordertd(availabletasks).iterator(); mos.hasNext();){
2676 OptionalTaskDescriptor mm = mos.next();
2678 output.println("&optionaltaskdescriptor_"+mm.getuid()+"_"+cdtemp.getSafeSymbol());
2680 output.println("&optionaltaskdescriptor_"+mm.getuid()+"_"+cdtemp.getSafeSymbol()+",");
2683 output.println("};\n");
2685 //process flag information (what the flag after failure is) so we know what optionaltaskdescriptors to choose.
2688 for(Iterator flags = fs.getFlags(); flags.hasNext();){
2689 FlagDescriptor flagd = (FlagDescriptor)flags.next();
2690 int id=1<<((Integer)flaginfo.get(flagd)).intValue();
2694 //process tag information
2697 boolean first = true;
2698 Enumeration tag_enum = fs.getTags();
2699 output.println("int tags_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"[]={");
2700 while(tag_enum.hasMoreElements()){
2702 TagDescriptor tagd = (TagDescriptor)tag_enum.nextElement();
2706 output.println(", ");
2707 output.println("/*tagid*/"+state.getTagId(tagd));
2709 output.println("};");
2711 Set<TaskIndex> tiset=sa.getTaskIndex(fs);
2712 for(Iterator<TaskIndex> itti=tiset.iterator();itti.hasNext();) {
2713 TaskIndex ti=itti.next();
2717 Set<OptionalTaskDescriptor> otdset=sa.getOptions(fs, ti);
2719 output.print("struct optionaltaskdescriptor * optionaltaskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex()+"_array[] = {");
2720 boolean needcomma=false;
2721 for(Iterator<OptionalTaskDescriptor> otdit=ordertd(otdset).iterator();otdit.hasNext();) {
2722 OptionalTaskDescriptor otd=otdit.next();
2726 output.println("&optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
2728 output.println("};");
2730 output.print("struct taskfailure taskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex()+" = {");
2731 output.print("&task_"+ti.getTask().getSafeSymbol()+", ");
2732 output.print(ti.getIndex()+", ");
2733 output.print(otdset.size()+", ");
2734 output.print("optionaltaskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex()+"_array");
2735 output.println("};");
2738 tiset=sa.getTaskIndex(fs);
2739 boolean needcomma=false;
2741 output.println("struct taskfailure * taskfailurearray"+fscounter+"_"+cdtemp.getSafeSymbol()+"[]={");
2742 for(Iterator<TaskIndex> itti=tiset.iterator();itti.hasNext();) {
2743 TaskIndex ti=itti.next();
2744 if (ti.isRuntime()) {
2751 output.print("&taskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex());
2753 output.println("};\n");
2755 //Store the result in fsanalysiswrapper
2757 output.println("struct fsanalysiswrapper fsanalysiswrapper_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"={");
2758 output.println("/*flag*/"+flagid+",");
2759 output.println("/* number of tags*/"+tagcounter+",");
2760 output.println("tags_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+",");
2761 output.println("/* numtask failures */"+(tiset.size()-runtimeti)+",");
2762 output.println("taskfailurearray"+fscounter+"_"+cdtemp.getSafeSymbol()+",");
2763 output.println("/* number of optionaltaskdescriptors */"+availabletasks.size()+",");
2764 output.println("optionaltaskdescriptorarray_FS"+fscounter+"_"+cdtemp.getSafeSymbol());
2765 output.println("};\n");
2769 //Build the array of fsanalysiswrappers
2770 output.println("struct fsanalysiswrapper * fsanalysiswrapperarray_"+cdtemp.getSafeSymbol()+"[] = {");
2771 boolean needcomma=false;
2772 for(int i = 0; i<fscounter; i++){
2773 if (needcomma) output.print(",");
2774 output.println("&fsanalysiswrapper_FS"+(i+1)+"_"+cdtemp.getSafeSymbol());
2777 output.println("};");
2779 //Build the classanalysiswrapper referring to the previous array
2780 output.println("struct classanalysiswrapper classanalysiswrapper_"+cdtemp.getSafeSymbol()+"={");
2781 output.println("/*type*/"+cdtemp.getId()+",");
2782 output.println("/*numotd*/"+numotd+",");
2783 output.println("otdarray"+cdtemp.getSafeSymbol()+",");
2784 output.println("/* number of fsanalysiswrappers */"+fscounter+",");
2785 output.println("fsanalysiswrapperarray_"+cdtemp.getSafeSymbol()+"};\n");
2786 processedcd.add(cdtemp);
2789 //build an array containing every classes for which code has been build
2790 output.println("struct classanalysiswrapper * classanalysiswrapperarray[]={");
2791 for(int i=0;i<state.numClasses();i++) {
2792 ClassDescriptor cn=cdarray[i];
2795 if (processedcd.contains(cn))
2796 output.print("&classanalysiswrapper_"+cn.getSafeSymbol());
2798 output.print("NULL");
2800 output.println("};");
2802 output.println("#define MAXOTD "+maxotd);
2803 headers.println("#endif");
2806 public List<OptionalTaskDescriptor> ordertd(Set<OptionalTaskDescriptor> otdset) {
2807 Relation r=new Relation();
2808 for(Iterator<OptionalTaskDescriptor>otdit=otdset.iterator();otdit.hasNext();) {
2809 OptionalTaskDescriptor otd=otdit.next();
2810 TaskIndex ti=new TaskIndex(otd.td, otd.getIndex());
2814 LinkedList<OptionalTaskDescriptor> l=new LinkedList<OptionalTaskDescriptor>();
2815 for(Iterator it=r.keySet().iterator();it.hasNext();) {
2816 Set s=r.get(it.next());
2817 for(Iterator it2=s.iterator();it2.hasNext();) {
2818 OptionalTaskDescriptor otd=(OptionalTaskDescriptor)it2.next();