2 import IR.Tree.Modifiers;
3 import IR.Tree.FlagExpressionNode;
4 import IR.Tree.DNFFlag;
5 import IR.Tree.DNFFlagAtom;
6 import IR.Tree.TagExpressionList;
7 import IR.Tree.OffsetNode;
13 import Analysis.TaskStateAnalysis.FlagState;
14 import Analysis.TaskStateAnalysis.FlagComparator;
15 import Analysis.TaskStateAnalysis.OptionalTaskDescriptor;
16 import Analysis.TaskStateAnalysis.Predicate;
17 import Analysis.TaskStateAnalysis.SafetyAnalysis;
18 import Analysis.TaskStateAnalysis.TaskIndex;
19 import Analysis.Locality.LocalityAnalysis;
20 import Analysis.Locality.LocalityBinding;
21 import Analysis.Locality.DiscoverConflicts;
22 import Analysis.Locality.DelayComputation;
23 import Analysis.CallGraph.CallGraph;
24 import Analysis.Prefetch.*;
25 import Analysis.Loops.WriteBarrier;
26 import Analysis.Loops.GlobalFieldType;
27 import Analysis.Locality.TypeAnalysis;
28 import Analysis.MLP.MLPAnalysis;
29 import Analysis.MLP.VariableSourceToken;
30 import Analysis.MLP.CodePlan;
31 import Analysis.MLP.SESEandAgePair;
33 public class BuildCode {
36 Hashtable paramstable;
41 String localsprefix="___locals___";
42 String localsprefixaddr="&"+localsprefix;
43 String localsprefixderef=localsprefix+".";
44 String fcrevert="___fcrevert___";
45 String paramsprefix="___params___";
46 String oidstr="___nextobject___";
47 String nextobjstr="___nextobject___";
48 String localcopystr="___localcopy___";
49 public static boolean GENERATEPRECISEGC=false;
50 public static String PREFIX="";
51 public static String arraytype="ArrayObject";
52 public static int flagcount = 0;
55 protected int maxtaskparams=0;
56 private int maxcount=0;
57 ClassDescriptor[] cdarray;
58 TypeDescriptor[] arraytable;
59 LocalityAnalysis locality;
60 Hashtable<LocalityBinding, TempDescriptor> reverttable;
61 Hashtable<LocalityBinding, Hashtable<TempDescriptor, TempDescriptor>> backuptable;
65 String mlperrstr = "if(status != 0) { "+
66 "sprintf(errmsg, \"MLP error at %s:%d\", __FILE__, __LINE__); "+
67 "perror(errmsg); exit(-1); }";
68 boolean nonSESEpass=true;
71 DiscoverConflicts recorddc;
72 DelayComputation delaycomp;
75 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, SafetyAnalysis sa, PrefetchAnalysis pa) {
76 this(st, temptovar, typeutil, null, sa, pa, null);
79 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, SafetyAnalysis sa, PrefetchAnalysis pa, MLPAnalysis mlpa) {
80 this(st, temptovar, typeutil, null, sa, pa, mlpa);
83 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, LocalityAnalysis locality, PrefetchAnalysis pa, MLPAnalysis mlpa) {
84 this(st, temptovar, typeutil, locality, null, pa, mlpa);
87 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, LocalityAnalysis locality, SafetyAnalysis sa, PrefetchAnalysis pa, MLPAnalysis mlpa) {
92 callgraph=new CallGraph(state);
94 oidstr="___objlocation___";
95 this.temptovar=temptovar;
96 paramstable=new Hashtable();
97 tempstable=new Hashtable();
98 fieldorder=new Hashtable();
99 flagorder=new Hashtable();
100 this.typeutil=typeutil;
101 virtualcalls=new Virtual(state,locality);
102 if (locality!=null) {
103 this.locality=locality;
104 this.reverttable=new Hashtable<LocalityBinding, TempDescriptor>();
105 this.backuptable=new Hashtable<LocalityBinding, Hashtable<TempDescriptor, TempDescriptor>>();
106 this.wb=new WriteBarrier(locality, st);
108 if (state.SINGLETM&&state.DCOPTS) {
109 TypeAnalysis typeanalysis=new TypeAnalysis(locality, st, typeutil,callgraph);
110 this.dc=new DiscoverConflicts(locality, st, typeanalysis, null);
113 if (state.DELAYCOMP) {
114 //TypeAnalysis typeanalysis=new TypeAnalysis(locality, st, typeutil,callgraph);
115 TypeAnalysis typeanalysis=new TypeAnalysis(locality, st, typeutil,callgraph);
116 GlobalFieldType gft=new GlobalFieldType(callgraph, st, typeutil.getMain());
117 delaycomp=new DelayComputation(locality, st, typeanalysis, gft);
118 delaycomp.doAnalysis();
119 dc=delaycomp.getConflicts();
120 recorddc=new DiscoverConflicts(locality, st, typeanalysis, delaycomp.getCannotDelayMap(), true, true, null);
121 recorddc.doAnalysis();
125 /** The buildCode method outputs C code for all the methods. The Flat
126 * versions of the methods must already be generated and stored in
127 * the State object. */
129 public void buildCode() {
130 /* Create output streams to write to */
131 PrintWriter outclassdefs=null;
132 PrintWriter outstructs=null;
133 PrintWriter outrepairstructs=null;
134 PrintWriter outmethodheader=null;
135 PrintWriter outmethod=null;
136 PrintWriter outvirtual=null;
137 PrintWriter outtask=null;
138 PrintWriter outtaskdefs=null;
139 PrintWriter outoptionalarrays=null;
140 PrintWriter optionalheaders=null;
143 outstructs=new PrintWriter(new FileOutputStream(PREFIX+"structdefs.h"), true);
144 outmethodheader=new PrintWriter(new FileOutputStream(PREFIX+"methodheaders.h"), true);
145 outclassdefs=new PrintWriter(new FileOutputStream(PREFIX+"classdefs.h"), true);
146 outmethod=new PrintWriter(new FileOutputStream(PREFIX+"methods.c"), true);
147 outvirtual=new PrintWriter(new FileOutputStream(PREFIX+"virtualtable.h"), true);
149 outtask=new PrintWriter(new FileOutputStream(PREFIX+"task.h"), true);
150 outtaskdefs=new PrintWriter(new FileOutputStream(PREFIX+"taskdefs.c"), true);
151 if (state.OPTIONAL) {
152 outoptionalarrays=new PrintWriter(new FileOutputStream(PREFIX+"optionalarrays.c"), true);
153 optionalheaders=new PrintWriter(new FileOutputStream(PREFIX+"optionalstruct.h"), true);
156 if (state.structfile!=null) {
157 outrepairstructs=new PrintWriter(new FileOutputStream(PREFIX+state.structfile+".struct"), true);
159 } catch (Exception e) {
164 /* Build the virtual dispatch tables */
165 buildVirtualTables(outvirtual);
167 /* Output includes */
168 outmethodheader.println("#ifndef METHODHEADERS_H");
169 outmethodheader.println("#define METHODHEADERS_H");
170 outmethodheader.println("#include \"structdefs.h\"");
172 outmethodheader.println("#include \"dstm.h\"");
173 if (state.SINGLETM) {
174 outmethodheader.println("#include \"tm.h\"");
175 outmethodheader.println("#include \"delaycomp.h\"");
177 if (state.ABORTREADERS) {
178 outmethodheader.println("#include \"abortreaders.h\"");
179 outmethodheader.println("#include <setjmp.h>");
182 outmethodheader.println("#include <stdlib.h>");
183 outmethodheader.println("#include <stdio.h>");
184 outmethodheader.println("#include <string.h>");
185 outmethodheader.println("#include \"mlp_runtime.h\"");
188 /* Output Structures */
189 outputStructs(outstructs);
191 // Output the C class declarations
192 // These could mutually reference each other
193 outputClassDeclarations(outclassdefs);
195 // Output function prototypes and structures for parameters
196 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
197 while(it.hasNext()) {
198 ClassDescriptor cn=(ClassDescriptor)it.next();
199 generateCallStructs(cn, outclassdefs, outstructs, outmethodheader);
201 outclassdefs.close();
204 /* Map flags to integers */
205 /* The runtime keeps track of flags using these integers */
206 it=state.getClassSymbolTable().getDescriptorsIterator();
207 while(it.hasNext()) {
208 ClassDescriptor cn=(ClassDescriptor)it.next();
212 generateTaskStructs(outstructs, outmethodheader);
214 /* Outputs generic task structures if this is a task
216 outputTaskTypes(outtask);
220 // have to initialize some SESE compiler data before
221 // analyzing normal methods, which must happen before
222 // generating SESE internal code
223 for(Iterator<FlatSESEEnterNode> seseit=mlpa.getAllSESEs().iterator();seseit.hasNext();) {
224 FlatSESEEnterNode fsen = seseit.next();
225 initializeSESE( fsen );
229 /* Build the actual methods */
230 outputMethods(outmethod);
232 // Output function prototypes and structures for SESE's and code
236 // first generate code for each sese's internals
237 for(Iterator<FlatSESEEnterNode> seseit=mlpa.getAllSESEs().iterator();seseit.hasNext();) {
238 FlatSESEEnterNode fsen = seseit.next();
239 generateMethodSESE(fsen, null, outstructs, outmethodheader, outmethod);
242 // then write the invokeSESE switch to decouple scheduler
243 // from having to do unique details of sese invocation
244 generateSESEinvocationMethod(outmethodheader, outmethod);
248 /* Output code for tasks */
249 outputTaskCode(outtaskdefs, outmethod);
251 /* Record maximum number of task parameters */
252 outstructs.println("#define MAXTASKPARAMS "+maxtaskparams);
253 } else if (state.main!=null) {
254 /* Generate main method */
255 outputMainMethod(outmethod);
258 /* Generate information for task with optional parameters */
259 if (state.TASK&&state.OPTIONAL) {
260 generateOptionalArrays(outoptionalarrays, optionalheaders, state.getAnalysisResult(), state.getOptionalTaskDescriptors());
261 outoptionalarrays.close();
264 /* Output structure definitions for repair tool */
265 if (state.structfile!=null) {
266 buildRepairStructs(outrepairstructs);
267 outrepairstructs.close();
271 outmethodheader.println("#endif");
272 outmethodheader.close();
274 outstructs.println("#endif");
279 /* This code just generates the main C method for java programs.
280 * The main C method packs up the arguments into a string array
281 * and passes it to the java main method. */
283 private void outputMainMethod(PrintWriter outmethod) {
284 outmethod.println("int main(int argc, const char *argv[]) {");
285 outmethod.println(" int i;");
288 outmethod.println(" workScheduleInit( "+state.MLP_NUMCORES+", invokeSESEmethod );");
292 outmethod.println("#ifdef TRANSSTATS \n");
293 outmethod.println("handle();\n");
294 outmethod.println("#endif\n");
296 if (state.THREAD||state.DSM||state.SINGLETM) {
297 outmethod.println("initializethreads();");
300 outmethod.println("if (dstmStartup(argv[1])) {");
301 if (GENERATEPRECISEGC) {
302 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(NULL, STRINGARRAYTYPE, argc-2);");
304 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(STRINGARRAYTYPE, argc-2);");
307 if (GENERATEPRECISEGC) {
308 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(NULL, STRINGARRAYTYPE, argc-1);");
310 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(STRINGARRAYTYPE, argc-1);");
314 outmethod.println(" for(i=2;i<argc;i++) {");
316 outmethod.println(" for(i=1;i<argc;i++) {");
317 outmethod.println(" int length=strlen(argv[i]);");
318 if (GENERATEPRECISEGC) {
319 outmethod.println(" struct ___String___ *newstring=NewString(NULL, argv[i], length);");
321 outmethod.println(" struct ___String___ *newstring=NewString(argv[i], length);");
324 outmethod.println(" ((void **)(((char *)& stringarray->___length___)+sizeof(int)))[i-2]=newstring;");
326 outmethod.println(" ((void **)(((char *)& stringarray->___length___)+sizeof(int)))[i-1]=newstring;");
327 outmethod.println(" }");
329 MethodDescriptor md=typeutil.getMain();
330 ClassDescriptor cd=typeutil.getMainClass();
332 outmethod.println(" {");
333 if (GENERATEPRECISEGC) {
334 if (state.DSM||state.SINGLETM) {
335 outmethod.print(" struct "+cd.getSafeSymbol()+locality.getMain().getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
337 outmethod.print(" struct "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
338 outmethod.println("1, NULL,"+"stringarray};");
339 if (state.DSM||state.SINGLETM)
340 outmethod.println(" "+cd.getSafeSymbol()+locality.getMain().getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(& __parameterlist__);");
342 outmethod.println(" "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(& __parameterlist__);");
344 if (state.DSM||state.SINGLETM)
345 outmethod.println(" "+cd.getSafeSymbol()+locality.getMain().getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(stringarray);");
347 outmethod.println(" "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(stringarray);");
349 outmethod.println(" }");
352 outmethod.println("}");
355 if (state.THREAD||state.DSM||state.SINGLETM) {
356 outmethod.println("pthread_mutex_lock(&gclistlock);");
357 outmethod.println("threadcount--;");
358 outmethod.println("pthread_cond_signal(&gccond);");
359 outmethod.println("pthread_mutex_unlock(&gclistlock);");
362 if (state.DSM||state.SINGLETM) {
363 outmethod.println("#ifdef TRANSSTATS \n");
364 outmethod.println("printf(\"****** Transaction Stats ******\\n\");");
365 outmethod.println("printf(\"numTransAbort= %d\\n\", numTransAbort);");
366 outmethod.println("printf(\"numTransCommit= %d\\n\", numTransCommit);");
367 outmethod.println("printf(\"nSoftAbort= %d\\n\", nSoftAbort);");
369 outmethod.println("printf(\"nchashSearch= %d\\n\", nchashSearch);");
370 outmethod.println("printf(\"nmhashSearch= %d\\n\", nmhashSearch);");
371 outmethod.println("printf(\"nprehashSearch= %d\\n\", nprehashSearch);");
372 outmethod.println("printf(\"nRemoteReadSend= %d\\n\", nRemoteSend);");
373 outmethod.println("printf(\"bytesSent= %d\\n\", bytesSent);");
374 outmethod.println("printf(\"bytesRecv= %d\\n\", bytesRecv);");
375 } else if (state.SINGLETM) {
376 outmethod.println("printf(\"nSoftAbortAbort= %d\\n\", nSoftAbortAbort);");
377 outmethod.println("printf(\"nSoftAbortCommit= %d\\n\", nSoftAbortCommit);");
378 outmethod.println("#ifdef STMSTATS\n");
379 outmethod.println("for(i=0; i<TOTALNUMCLASSANDARRAY; i++) {\n");
380 outmethod.println(" printf(\"typesCausingAbort[%d]= %d\\n\", i, typesCausingAbort[i]);\n");
381 outmethod.println("}\n");
382 outmethod.println("#endif\n");
383 outmethod.println("fflush(stdout);");
385 outmethod.println("#endif\n");
388 if (state.THREAD||state.SINGLETM)
389 outmethod.println("pthread_exit(NULL);");
392 outmethod.println(" workScheduleBegin();");
395 outmethod.println("}");
398 /* This method outputs code for each task. */
400 private void outputTaskCode(PrintWriter outtaskdefs, PrintWriter outmethod) {
401 /* Compile task based program */
402 outtaskdefs.println("#include \"task.h\"");
403 outtaskdefs.println("#include \"methodheaders.h\"");
404 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
405 while(taskit.hasNext()) {
406 TaskDescriptor td=(TaskDescriptor)taskit.next();
407 FlatMethod fm=state.getMethodFlat(td);
408 generateFlatMethod(fm, null, outmethod);
409 generateTaskDescriptor(outtaskdefs, fm, td);
412 //Output task descriptors
413 taskit=state.getTaskSymbolTable().getDescriptorsIterator();
414 outtaskdefs.println("struct taskdescriptor * taskarray[]= {");
416 while(taskit.hasNext()) {
417 TaskDescriptor td=(TaskDescriptor)taskit.next();
421 outtaskdefs.println(",");
422 outtaskdefs.print("&task_"+td.getSafeSymbol());
424 outtaskdefs.println("};");
426 outtaskdefs.println("int numtasks="+state.getTaskSymbolTable().getValueSet().size()+";");
429 /* This method outputs most of the methods.c file. This includes
430 * some standard includes and then an array with the sizes of
431 * objets and array that stores supertype and then the code for
432 * the Java methods.. */
434 protected void outputMethods(PrintWriter outmethod) {
435 outmethod.println("#include \"methodheaders.h\"");
436 outmethod.println("#include \"virtualtable.h\"");
437 outmethod.println("#include \"runtime.h\"");
439 outmethod.println("#include \"addPrefetchEnhance.h\"");
440 outmethod.println("#include \"localobjects.h\"");
442 if (state.FASTCHECK) {
443 outmethod.println("#include \"localobjects.h\"");
445 if(state.MULTICORE) {
446 outmethod.println("#include \"task.h\"");
447 outmethod.println("#include \"multicoreruntime.h\"");
448 outmethod.println("#include \"runtime_arch.h\"");
450 if (state.THREAD||state.DSM||state.SINGLETM)
451 outmethod.println("#include <thread.h>");
452 if (state.main!=null) {
453 outmethod.println("#include <string.h>");
455 if (state.CONSCHECK) {
456 outmethod.println("#include \"checkers.h\"");
459 outmethod.println("#include <stdlib.h>");
460 outmethod.println("#include <stdio.h>");
461 outmethod.println("#include \"mlp_runtime.h\"");
465 //Store the sizes of classes & array elements
466 generateSizeArray(outmethod);
468 //Store table of supertypes
469 generateSuperTypeTable(outmethod);
471 //Store the layout of classes
472 generateLayoutStructs(outmethod);
474 /* Generate code for methods */
475 if (state.DSM||state.SINGLETM) {
476 for(Iterator<LocalityBinding> lbit=locality.getLocalityBindings().iterator(); lbit.hasNext();) {
477 LocalityBinding lb=lbit.next();
478 MethodDescriptor md=lb.getMethod();
479 FlatMethod fm=state.getMethodFlat(md);
481 if (!md.getModifiers().isNative()) {
482 generateFlatMethod(fm, lb, outmethod);
486 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
487 while(classit.hasNext()) {
488 ClassDescriptor cn=(ClassDescriptor)classit.next();
489 Iterator methodit=cn.getMethods();
490 while(methodit.hasNext()) {
491 /* Classify parameters */
492 MethodDescriptor md=(MethodDescriptor)methodit.next();
493 FlatMethod fm=state.getMethodFlat(md);
494 if (!md.getModifiers().isNative()) {
495 generateFlatMethod(fm, null, outmethod);
502 protected void outputStructs(PrintWriter outstructs) {
503 outstructs.println("#ifndef STRUCTDEFS_H");
504 outstructs.println("#define STRUCTDEFS_H");
505 outstructs.println("#include \"classdefs.h\"");
506 outstructs.println("#ifndef INTPTR");
507 outstructs.println("#ifdef BIT64");
508 outstructs.println("#define INTPTR long");
509 outstructs.println("#else");
510 outstructs.println("#define INTPTR int");
511 outstructs.println("#endif");
512 outstructs.println("#endif");
514 /* Output #defines that the runtime uses to determine type
515 * numbers for various objects it needs */
516 outstructs.println("#define MAXCOUNT "+maxcount);
517 if (state.DSM||state.SINGLETM) {
518 LocalityBinding lb=new LocalityBinding(typeutil.getRun(), false);
520 lb.setGlobalThis(LocalityAnalysis.GLOBAL);
521 else if (state.SINGLETM)
522 lb.setGlobalThis(LocalityAnalysis.NORMAL);
523 outstructs.println("#define RUNMETHOD "+virtualcalls.getLocalityNumber(lb));
526 outstructs.println("#define STRINGARRAYTYPE "+
527 (state.getArrayNumber(
528 (new TypeDescriptor(typeutil.getClass(TypeUtil.StringClass))).makeArray(state))+state.numClasses()));
530 outstructs.println("#define OBJECTARRAYTYPE "+
531 (state.getArrayNumber(
532 (new TypeDescriptor(typeutil.getClass(TypeUtil.ObjectClass))).makeArray(state))+state.numClasses()));
535 outstructs.println("#define STRINGTYPE "+typeutil.getClass(TypeUtil.StringClass).getId());
536 outstructs.println("#define CHARARRAYTYPE "+
537 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.CHAR)).makeArray(state))+state.numClasses()));
539 outstructs.println("#define BYTEARRAYTYPE "+
540 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.BYTE)).makeArray(state))+state.numClasses()));
542 outstructs.println("#define BYTEARRAYARRAYTYPE "+
543 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.BYTE)).makeArray(state).makeArray(state))+state.numClasses()));
545 outstructs.println("#define NUMCLASSES "+state.numClasses());
546 int totalClassSize = state.numClasses() + state.numArrays();
547 outstructs.println("#define TOTALNUMCLASSANDARRAY "+ totalClassSize);
549 outstructs.println("#define STARTUPTYPE "+typeutil.getClass(TypeUtil.StartupClass).getId());
550 outstructs.println("#define TAGTYPE "+typeutil.getClass(TypeUtil.TagClass).getId());
551 outstructs.println("#define TAGARRAYTYPE "+
552 (state.getArrayNumber(new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass)).makeArray(state))+state.numClasses()));
556 protected void outputClassDeclarations(PrintWriter outclassdefs) {
557 if (state.THREAD||state.DSM||state.SINGLETM)
558 outclassdefs.println("#include <pthread.h>");
559 outclassdefs.println("#ifndef INTPTR");
560 outclassdefs.println("#ifdef BIT64");
561 outclassdefs.println("#define INTPTR long");
562 outclassdefs.println("#else");
563 outclassdefs.println("#define INTPTR int");
564 outclassdefs.println("#endif");
565 outclassdefs.println("#endif");
567 outclassdefs.println("#include \"optionalstruct.h\"");
568 outclassdefs.println("struct "+arraytype+";");
569 /* Start by declaring all structs */
570 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
571 while(it.hasNext()) {
572 ClassDescriptor cn=(ClassDescriptor)it.next();
573 outclassdefs.println("struct "+cn.getSafeSymbol()+";");
575 outclassdefs.println("");
576 //Print out definition for array type
577 outclassdefs.println("struct "+arraytype+" {");
578 outclassdefs.println(" int type;");
580 outclassdefs.println(" pthread_t tid;");
581 outclassdefs.println(" void * lockentry;");
582 outclassdefs.println(" int lockcount;");
585 outclassdefs.println(" int flag;");
586 if(!state.MULTICORE) {
587 outclassdefs.println(" void * flagptr;");
589 outclassdefs.println(" int version;");
590 outclassdefs.println(" struct ___Object___ * original;");
591 //outclassdefs.println(" int numlocks;"); // array for locks
592 outclassdefs.println(" int * lock;");
595 outclassdefs.println(" int numfses;");
596 outclassdefs.println(" int * fses;");
599 printClassStruct(typeutil.getClass(TypeUtil.ObjectClass), outclassdefs);
602 outclassdefs.println(" int paddingforarray;");
604 outclassdefs.println(" int ___length___;");
605 outclassdefs.println("};\n");
606 outclassdefs.println("extern int classsize[];");
607 outclassdefs.println("extern int hasflags[];");
608 outclassdefs.println("extern unsigned INTPTR * pointerarray[];");
609 outclassdefs.println("extern int supertypes[];");
612 /** Prints out definitions for generic task structures */
614 private void outputTaskTypes(PrintWriter outtask) {
615 outtask.println("#ifndef _TASK_H");
616 outtask.println("#define _TASK_H");
617 outtask.println("struct parameterdescriptor {");
618 outtask.println("int type;");
619 outtask.println("int numberterms;");
620 outtask.println("int *intarray;");
621 outtask.println("void * queue;");
622 outtask.println("int numbertags;");
623 outtask.println("int *tagarray;");
624 outtask.println("};");
626 outtask.println("struct taskdescriptor {");
627 outtask.println("void * taskptr;");
628 outtask.println("int numParameters;");
629 outtask.println(" int numTotal;");
630 outtask.println("struct parameterdescriptor **descriptorarray;");
631 outtask.println("char * name;");
632 outtask.println("};");
633 outtask.println("extern struct taskdescriptor * taskarray[];");
634 outtask.println("extern numtasks;");
635 outtask.println("#endif");
639 private void buildRepairStructs(PrintWriter outrepairstructs) {
640 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
641 while(classit.hasNext()) {
642 ClassDescriptor cn=(ClassDescriptor)classit.next();
643 outrepairstructs.println("structure "+cn.getSymbol()+" {");
644 outrepairstructs.println(" int __type__;");
646 outrepairstructs.println(" int __flag__;");
647 if(!state.MULTICORE) {
648 outrepairstructs.println(" int __flagptr__;");
651 printRepairStruct(cn, outrepairstructs);
652 outrepairstructs.println("}\n");
655 for(int i=0; i<state.numArrays(); i++) {
656 TypeDescriptor tdarray=arraytable[i];
657 TypeDescriptor tdelement=tdarray.dereference();
658 outrepairstructs.println("structure "+arraytype+"_"+state.getArrayNumber(tdarray)+" {");
659 outrepairstructs.println(" int __type__;");
660 printRepairStruct(typeutil.getClass(TypeUtil.ObjectClass), outrepairstructs);
661 outrepairstructs.println(" int length;");
663 // Need to add support to repair tool for this
664 if (tdelement.isClass()||tdelement.isArray())
665 outrepairstructs.println(" "+tdelement.getRepairSymbol()+" * elem[this.length];");
667 outrepairstructs.println(" "+tdelement.getRepairSymbol()+" elem[this.length];");
669 outrepairstructs.println("}\n");
673 private void printRepairStruct(ClassDescriptor cn, PrintWriter output) {
674 ClassDescriptor sp=cn.getSuperDesc();
676 printRepairStruct(sp, output);
678 Vector fields=(Vector)fieldorder.get(cn);
680 for(int i=0; i<fields.size(); i++) {
681 FieldDescriptor fd=(FieldDescriptor)fields.get(i);
682 if (fd.getType().isArray()) {
683 output.println(" "+arraytype+"_"+ state.getArrayNumber(fd.getType()) +" * "+fd.getSymbol()+";");
684 } else if (fd.getType().isClass())
685 output.println(" "+fd.getType().getRepairSymbol()+" * "+fd.getSymbol()+";");
686 else if (fd.getType().isFloat())
687 output.println(" int "+fd.getSymbol()+"; /* really float */");
689 output.println(" "+fd.getType().getRepairSymbol()+" "+fd.getSymbol()+";");
693 /** This method outputs TaskDescriptor information */
694 private void generateTaskDescriptor(PrintWriter output, FlatMethod fm, TaskDescriptor task) {
695 for (int i=0; i<task.numParameters(); i++) {
696 VarDescriptor param_var=task.getParameter(i);
697 TypeDescriptor param_type=task.getParamType(i);
698 FlagExpressionNode param_flag=task.getFlag(param_var);
699 TagExpressionList param_tag=task.getTag(param_var);
702 if (param_flag==null) {
703 output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
704 output.println("0x0, 0x0 };");
707 DNFFlag dflag=param_flag.getDNF();
708 dnfterms=dflag.size();
710 Hashtable flags=(Hashtable)flagorder.get(param_type.getClassDesc());
711 output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
712 for(int j=0; j<dflag.size(); j++) {
715 Vector term=dflag.get(j);
718 for(int k=0; k<term.size(); k++) {
719 DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
720 FlagDescriptor fd=dfa.getFlag();
721 boolean negated=dfa.getNegated();
722 int flagid=1<<((Integer)flags.get(fd)).intValue();
727 output.print("0x"+Integer.toHexString(andmask)+", 0x"+Integer.toHexString(checkmask));
729 output.println("};");
732 output.println("int parametertag_"+i+"_"+task.getSafeSymbol()+"[]={");
733 //BUG...added next line to fix, test with any task program
735 for(int j=0; j<param_tag.numTags(); j++) {
738 /* for each tag we need */
739 /* which slot it is */
740 /* what type it is */
741 TagVarDescriptor tvd=(TagVarDescriptor)task.getParameterTable().get(param_tag.getName(j));
742 TempDescriptor tmp=param_tag.getTemp(j);
743 int slot=fm.getTagInt(tmp);
744 output.println(slot+", "+state.getTagId(tvd.getTag()));
746 output.println("};");
748 output.println("struct parameterdescriptor parameter_"+i+"_"+task.getSafeSymbol()+"={");
749 output.println("/* type */"+param_type.getClassDesc().getId()+",");
750 output.println("/* number of DNF terms */"+dnfterms+",");
751 output.println("parameterdnf_"+i+"_"+task.getSafeSymbol()+",");
752 output.println("0,");
753 //BUG, added next line to fix and else statement...test
754 //with any task program
756 output.println("/* number of tags */"+param_tag.numTags()+",");
758 output.println("/* number of tags */ 0,");
759 output.println("parametertag_"+i+"_"+task.getSafeSymbol());
760 output.println("};");
764 output.println("struct parameterdescriptor * parameterdescriptors_"+task.getSafeSymbol()+"[] = {");
765 for (int i=0; i<task.numParameters(); i++) {
768 output.print("¶meter_"+i+"_"+task.getSafeSymbol());
770 output.println("};");
772 output.println("struct taskdescriptor task_"+task.getSafeSymbol()+"={");
773 output.println("&"+task.getSafeSymbol()+",");
774 output.println("/* number of parameters */" +task.numParameters() + ",");
775 int numtotal=task.numParameters()+fm.numTags();
776 output.println("/* number total parameters */" +numtotal + ",");
777 output.println("parameterdescriptors_"+task.getSafeSymbol()+",");
778 output.println("\""+task.getSymbol()+"\"");
779 output.println("};");
783 /** The buildVirtualTables method outputs the virtual dispatch
784 * tables for methods. */
786 protected void buildVirtualTables(PrintWriter outvirtual) {
787 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
788 while(classit.hasNext()) {
789 ClassDescriptor cd=(ClassDescriptor)classit.next();
790 if (virtualcalls.getMethodCount(cd)>maxcount)
791 maxcount=virtualcalls.getMethodCount(cd);
793 MethodDescriptor[][] virtualtable=null;
794 LocalityBinding[][] lbvirtualtable=null;
795 if (state.DSM||state.SINGLETM)
796 lbvirtualtable=new LocalityBinding[state.numClasses()+state.numArrays()][maxcount];
798 virtualtable=new MethodDescriptor[state.numClasses()+state.numArrays()][maxcount];
800 /* Fill in virtual table */
801 classit=state.getClassSymbolTable().getDescriptorsIterator();
802 while(classit.hasNext()) {
803 ClassDescriptor cd=(ClassDescriptor)classit.next();
804 if (state.DSM||state.SINGLETM)
805 fillinRow(cd, lbvirtualtable, cd.getId());
807 fillinRow(cd, virtualtable, cd.getId());
810 ClassDescriptor objectcd=typeutil.getClass(TypeUtil.ObjectClass);
811 Iterator arrayit=state.getArrayIterator();
812 while(arrayit.hasNext()) {
813 TypeDescriptor td=(TypeDescriptor)arrayit.next();
814 int id=state.getArrayNumber(td);
815 if (state.DSM||state.SINGLETM)
816 fillinRow(objectcd, lbvirtualtable, id+state.numClasses());
818 fillinRow(objectcd, virtualtable, id+state.numClasses());
821 outvirtual.print("void * virtualtable[]={");
822 boolean needcomma=false;
823 for(int i=0; i<state.numClasses()+state.numArrays(); i++) {
824 for(int j=0; j<maxcount; j++) {
826 outvirtual.print(", ");
827 if ((state.DSM||state.SINGLETM)&&lbvirtualtable[i][j]!=null) {
828 LocalityBinding lb=lbvirtualtable[i][j];
829 MethodDescriptor md=lb.getMethod();
830 outvirtual.print("& "+md.getClassDesc().getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
831 } else if (!(state.DSM||state.SINGLETM)&&virtualtable[i][j]!=null) {
832 MethodDescriptor md=virtualtable[i][j];
833 outvirtual.print("& "+md.getClassDesc().getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
835 outvirtual.print("0");
839 outvirtual.println("");
841 outvirtual.println("};");
845 private void fillinRow(ClassDescriptor cd, MethodDescriptor[][] virtualtable, int rownum) {
846 /* Get inherited methods */
847 if (cd.getSuperDesc()!=null)
848 fillinRow(cd.getSuperDesc(), virtualtable, rownum);
849 /* Override them with our methods */
850 for(Iterator it=cd.getMethods(); it.hasNext();) {
851 MethodDescriptor md=(MethodDescriptor)it.next();
852 if (md.isStatic()||md.getReturnType()==null)
854 int methodnum=virtualcalls.getMethodNumber(md);
855 virtualtable[rownum][methodnum]=md;
859 private void fillinRow(ClassDescriptor cd, LocalityBinding[][] virtualtable, int rownum) {
860 /* Get inherited methods */
861 if (cd.getSuperDesc()!=null)
862 fillinRow(cd.getSuperDesc(), virtualtable, rownum);
863 /* Override them with our methods */
864 if (locality.getClassBindings(cd)!=null)
865 for(Iterator<LocalityBinding> lbit=locality.getClassBindings(cd).iterator(); lbit.hasNext();) {
866 LocalityBinding lb=lbit.next();
867 MethodDescriptor md=lb.getMethod();
868 //Is the method static or a constructor
869 if (md.isStatic()||md.getReturnType()==null)
871 int methodnum=virtualcalls.getLocalityNumber(lb);
872 virtualtable[rownum][methodnum]=lb;
876 /** Generate array that contains the sizes of class objects. The
877 * object allocation functions in the runtime use this
880 private void generateSizeArray(PrintWriter outclassdefs) {
881 outclassdefs.print("extern struct prefetchCountStats * evalPrefetch;\n");
882 outclassdefs.print("#ifdef TRANSSTATS \n");
883 outclassdefs.print("extern int numTransAbort;\n");
884 outclassdefs.print("extern int numTransCommit;\n");
885 outclassdefs.print("extern int nSoftAbort;\n");
887 outclassdefs.print("extern int nchashSearch;\n");
888 outclassdefs.print("extern int nmhashSearch;\n");
889 outclassdefs.print("extern int nprehashSearch;\n");
890 outclassdefs.print("extern int nRemoteSend;\n");
891 outclassdefs.print("extern int bytesSent;\n");
892 outclassdefs.print("extern int bytesRecv;\n");
893 outclassdefs.print("extern void handle();\n");
894 } else if (state.SINGLETM) {
895 outclassdefs.println("extern int nSoftAbortAbort;");
896 outclassdefs.println("extern int nSoftAbortCommit;");
897 outclassdefs.println("#ifdef STMSTATS\n");
898 outclassdefs.println("extern int typesCausingAbort[];");
899 outclassdefs.println("#endif\n");
901 outclassdefs.print("#endif\n");
902 outclassdefs.print("int numprefetchsites = " + pa.prefetchsiteid + ";\n");
904 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
905 cdarray=new ClassDescriptor[state.numClasses()];
906 while(it.hasNext()) {
907 ClassDescriptor cd=(ClassDescriptor)it.next();
908 cdarray[cd.getId()]=cd;
911 arraytable=new TypeDescriptor[state.numArrays()];
913 Iterator arrayit=state.getArrayIterator();
914 while(arrayit.hasNext()) {
915 TypeDescriptor td=(TypeDescriptor)arrayit.next();
916 int id=state.getArrayNumber(td);
922 /* Print out types */
923 outclassdefs.println("/* ");
924 for(int i=0; i<state.numClasses(); i++) {
925 ClassDescriptor cd=cdarray[i];
926 outclassdefs.println(cd +" "+i);
929 for(int i=0; i<state.numArrays(); i++) {
930 TypeDescriptor arraytd=arraytable[i];
931 outclassdefs.println(arraytd.toPrettyString() +" "+(i+state.numClasses()));
934 outclassdefs.println("*/");
937 outclassdefs.print("int classsize[]={");
939 boolean needcomma=false;
940 for(int i=0; i<state.numClasses(); i++) {
942 outclassdefs.print(", ");
943 outclassdefs.print("sizeof(struct "+cdarray[i].getSafeSymbol()+")");
948 for(int i=0; i<state.numArrays(); i++) {
950 outclassdefs.print(", ");
951 TypeDescriptor tdelement=arraytable[i].dereference();
952 if (tdelement.isArray()||tdelement.isClass())
953 outclassdefs.print("sizeof(void *)");
955 outclassdefs.print("sizeof("+tdelement.getSafeSymbol()+")");
959 outclassdefs.println("};");
961 ClassDescriptor objectclass=typeutil.getClass(TypeUtil.ObjectClass);
963 outclassdefs.print("int typearray[]={");
964 for(int i=0; i<state.numClasses(); i++) {
965 ClassDescriptor cd=cdarray[i];
966 ClassDescriptor supercd=cd.getSuperDesc();
968 outclassdefs.print(", ");
970 outclassdefs.print("-1");
972 outclassdefs.print(supercd.getId());
976 for(int i=0; i<state.numArrays(); i++) {
977 TypeDescriptor arraytd=arraytable[i];
978 ClassDescriptor arraycd=arraytd.getClassDesc();
981 outclassdefs.print(", ");
982 outclassdefs.print(objectclass.getId());
986 ClassDescriptor cd=arraycd.getSuperDesc();
989 TypeDescriptor supertd=new TypeDescriptor(cd);
990 supertd.setArrayCount(arraytd.getArrayCount());
991 type=state.getArrayNumber(supertd);
993 type+=state.numClasses();
996 cd=cd.getSuperDesc();
999 outclassdefs.print(", ");
1000 outclassdefs.print(type);
1004 outclassdefs.println("};");
1009 outclassdefs.print("int typearray2[]={");
1010 for(int i=0; i<state.numArrays(); i++) {
1011 TypeDescriptor arraytd=arraytable[i];
1012 ClassDescriptor arraycd=arraytd.getClassDesc();
1013 if (arraycd==null) {
1015 outclassdefs.print(", ");
1016 outclassdefs.print("-1");
1020 ClassDescriptor cd=arraycd.getSuperDesc();
1021 int level=arraytd.getArrayCount()-1;
1023 for(; level>0; level--) {
1024 TypeDescriptor supertd=new TypeDescriptor(objectclass);
1025 supertd.setArrayCount(level);
1026 type=state.getArrayNumber(supertd);
1028 type+=state.numClasses();
1033 outclassdefs.print(", ");
1034 outclassdefs.print(type);
1038 outclassdefs.println("};");
1041 /** Constructs params and temp objects for each method or task.
1042 * These objects tell the compiler which temps need to be
1045 protected void generateTempStructs(FlatMethod fm, LocalityBinding lb) {
1046 MethodDescriptor md=fm.getMethod();
1047 TaskDescriptor task=fm.getTask();
1048 Set<TempDescriptor> saveset=lb!=null ? locality.getTempSet(lb) : null;
1049 ParamsObject objectparams=md!=null ? new ParamsObject(md,tag++) : new ParamsObject(task, tag++);
1051 paramstable.put(lb, objectparams);
1052 backuptable.put(lb, new Hashtable<TempDescriptor, TempDescriptor>());
1053 } else if (md!=null)
1054 paramstable.put(md, objectparams);
1056 paramstable.put(task, objectparams);
1058 for(int i=0; i<fm.numParameters(); i++) {
1059 TempDescriptor temp=fm.getParameter(i);
1060 TypeDescriptor type=temp.getType();
1061 if (type.isPtr()&&GENERATEPRECISEGC)
1062 objectparams.addPtr(temp);
1064 objectparams.addPrim(temp);
1065 if(lb!=null&&saveset.contains(temp)) {
1066 backuptable.get(lb).put(temp, temp.createNew());
1070 for(int i=0; i<fm.numTags(); i++) {
1071 TempDescriptor temp=fm.getTag(i);
1072 if (GENERATEPRECISEGC)
1073 objectparams.addPtr(temp);
1075 objectparams.addPrim(temp);
1078 TempObject objecttemps=md!=null ? new TempObject(objectparams,md,tag++) : new TempObject(objectparams, task, tag++);
1080 tempstable.put(lb, objecttemps);
1082 tempstable.put(md, objecttemps);
1084 tempstable.put(task, objecttemps);
1086 for(Iterator nodeit=fm.getNodeSet().iterator(); nodeit.hasNext();) {
1087 FlatNode fn=(FlatNode)nodeit.next();
1088 TempDescriptor[] writes=fn.writesTemps();
1089 for(int i=0; i<writes.length; i++) {
1090 TempDescriptor temp=writes[i];
1091 TypeDescriptor type=temp.getType();
1092 if (type.isPtr()&&GENERATEPRECISEGC)
1093 objecttemps.addPtr(temp);
1095 objecttemps.addPrim(temp);
1096 if(lb!=null&&saveset.contains(temp)&&
1097 !backuptable.get(lb).containsKey(temp))
1098 backuptable.get(lb).put(temp, temp.createNew());
1102 /* Create backup temps */
1104 for(Iterator<TempDescriptor> tmpit=backuptable.get(lb).values().iterator(); tmpit.hasNext();) {
1105 TempDescriptor tmp=tmpit.next();
1106 TypeDescriptor type=tmp.getType();
1107 if (type.isPtr()&&GENERATEPRECISEGC)
1108 objecttemps.addPtr(tmp);
1110 objecttemps.addPrim(tmp);
1112 /* Create temp to hold revert table */
1113 if (state.DSM&&(lb.getHasAtomic()||lb.isAtomic())) {
1114 TempDescriptor reverttmp=new TempDescriptor("revertlist", typeutil.getClass(TypeUtil.ObjectClass));
1115 if (GENERATEPRECISEGC)
1116 objecttemps.addPtr(reverttmp);
1118 objecttemps.addPrim(reverttmp);
1119 reverttable.put(lb, reverttmp);
1124 /** This method outputs the following information about classes
1126 * (1) For classes, what are the locations of pointers.
1127 * (2) For arrays, does the array contain pointers or primitives.
1128 * (3) For classes, does the class contain flags.
1131 private void generateLayoutStructs(PrintWriter output) {
1132 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
1133 while(it.hasNext()) {
1134 ClassDescriptor cn=(ClassDescriptor)it.next();
1135 output.println("unsigned INTPTR "+cn.getSafeSymbol()+"_pointers[]={");
1136 Iterator allit=cn.getFieldTable().getAllDescriptorsIterator();
1138 while(allit.hasNext()) {
1139 FieldDescriptor fd=(FieldDescriptor)allit.next();
1140 TypeDescriptor type=fd.getType();
1141 if (state.DSM&&fd.isGlobal()) //Don't GC the global objects for now
1146 output.print(count);
1147 allit=cn.getFieldTable().getAllDescriptorsIterator();
1148 while(allit.hasNext()) {
1149 FieldDescriptor fd=(FieldDescriptor)allit.next();
1150 TypeDescriptor type=fd.getType();
1151 if (state.DSM&&fd.isGlobal()) //Don't GC the global objects for now
1154 output.println(",");
1155 output.print("((unsigned INTPTR)&(((struct "+cn.getSafeSymbol() +" *)0)->"+fd.getSafeSymbol()+"))");
1158 output.println("};");
1160 output.println("unsigned INTPTR * pointerarray[]={");
1161 boolean needcomma=false;
1162 for(int i=0; i<state.numClasses(); i++) {
1163 ClassDescriptor cn=cdarray[i];
1165 output.println(",");
1167 output.print(cn.getSafeSymbol()+"_pointers");
1170 for(int i=0; i<state.numArrays(); i++) {
1172 output.println(", ");
1173 TypeDescriptor tdelement=arraytable[i].dereference();
1174 if (tdelement.isArray()||tdelement.isClass())
1175 output.print("((unsigned INTPTR *)1)");
1181 output.println("};");
1183 output.println("int hasflags[]={");
1184 for(int i=0; i<state.numClasses(); i++) {
1185 ClassDescriptor cn=cdarray[i];
1187 output.println(", ");
1194 output.println("};");
1197 /** Print out table to give us supertypes */
1198 private void generateSuperTypeTable(PrintWriter output) {
1199 output.println("int supertypes[]={");
1200 boolean needcomma=false;
1201 for(int i=0; i<state.numClasses(); i++) {
1202 ClassDescriptor cn=cdarray[i];
1204 output.println(",");
1206 if (cn.getSuperDesc()!=null) {
1207 ClassDescriptor cdsuper=cn.getSuperDesc();
1208 output.print(cdsuper.getId());
1212 output.println("};");
1215 /** Force consistent field ordering between inherited classes. */
1217 private void printClassStruct(ClassDescriptor cn, PrintWriter classdefout) {
1219 ClassDescriptor sp=cn.getSuperDesc();
1221 printClassStruct(sp, classdefout);
1223 if (!fieldorder.containsKey(cn)) {
1224 Vector fields=new Vector();
1225 fieldorder.put(cn,fields);
1226 Vector fieldvec=cn.getFieldVec();
1227 for(int i=0;i<fieldvec.size();i++) {
1228 FieldDescriptor fd=(FieldDescriptor)fieldvec.get(i);
1229 if ((sp==null||!sp.getFieldTable().contains(fd.getSymbol())))
1233 Vector fields=(Vector)fieldorder.get(cn);
1235 for(int i=0; i<fields.size(); i++) {
1236 FieldDescriptor fd=(FieldDescriptor)fields.get(i);
1237 if (fd.getType().isClass()||fd.getType().isArray())
1238 classdefout.println(" struct "+fd.getType().getSafeSymbol()+" * "+fd.getSafeSymbol()+";");
1240 classdefout.println(" "+fd.getType().getSafeSymbol()+" "+fd.getSafeSymbol()+";");
1245 /* Map flags to integers consistently between inherited
1248 protected void mapFlags(ClassDescriptor cn) {
1249 ClassDescriptor sp=cn.getSuperDesc();
1253 if (!flagorder.containsKey(cn)) {
1254 Hashtable flags=new Hashtable();
1255 flagorder.put(cn,flags);
1257 Hashtable superflags=(Hashtable)flagorder.get(sp);
1258 Iterator superflagit=superflags.keySet().iterator();
1259 while(superflagit.hasNext()) {
1260 FlagDescriptor fd=(FlagDescriptor)superflagit.next();
1261 Integer number=(Integer)superflags.get(fd);
1262 flags.put(fd, number);
1263 if ((number.intValue()+1)>max)
1264 max=number.intValue()+1;
1268 Iterator flagit=cn.getFlags();
1269 while(flagit.hasNext()) {
1270 FlagDescriptor fd=(FlagDescriptor)flagit.next();
1271 if (sp==null||!sp.getFlagTable().contains(fd.getSymbol()))
1272 flags.put(fd, new Integer(max++));
1278 /** This function outputs (1) structures that parameters are
1279 * passed in (when PRECISE GC is enabled) and (2) function
1280 * prototypes for the methods */
1282 protected void generateCallStructs(ClassDescriptor cn, PrintWriter classdefout, PrintWriter output, PrintWriter headersout) {
1283 /* Output class structure */
1284 classdefout.println("struct "+cn.getSafeSymbol()+" {");
1285 classdefout.println(" int type;");
1287 classdefout.println(" pthread_t tid;");
1288 classdefout.println(" void * lockentry;");
1289 classdefout.println(" int lockcount;");
1293 classdefout.println(" int flag;");
1294 if((!state.MULTICORE) || (cn.getSymbol().equals("TagDescriptor"))) {
1295 classdefout.println(" void * flagptr;");
1296 } else if (state.MULTICORE) {
1297 classdefout.println(" int version;");
1298 classdefout.println(" struct ___Object___ * original;");
1299 //classdefout.println(" int numlocks;"); // array for locks
1300 classdefout.println(" int * lock;");
1302 if (state.OPTIONAL) {
1303 classdefout.println(" int numfses;");
1304 classdefout.println(" int * fses;");
1307 printClassStruct(cn, classdefout);
1308 classdefout.println("};\n");
1310 if (state.DSM||state.SINGLETM) {
1311 /* Cycle through LocalityBindings */
1312 HashSet<MethodDescriptor> nativemethods=new HashSet<MethodDescriptor>();
1313 Set<LocalityBinding> lbset=locality.getClassBindings(cn);
1315 for(Iterator<LocalityBinding> lbit=lbset.iterator(); lbit.hasNext();) {
1316 LocalityBinding lb=lbit.next();
1317 MethodDescriptor md=lb.getMethod();
1318 if (md.getModifiers().isNative()) {
1319 //make sure we only print a native method once
1320 if (nativemethods.contains(md)) {
1321 FlatMethod fm=state.getMethodFlat(md);
1322 generateTempStructs(fm, lb);
1325 nativemethods.add(md);
1327 generateMethod(cn, md, lb, headersout, output);
1330 for(Iterator methodit=cn.getMethods(); methodit.hasNext();) {
1331 MethodDescriptor md=(MethodDescriptor)methodit.next();
1332 if (md.getModifiers().isNative()&&!nativemethods.contains(md)) {
1333 //Need to build param structure for library code
1334 FlatMethod fm=state.getMethodFlat(md);
1335 generateTempStructs(fm, null);
1336 generateMethodParam(cn, md, null, output);
1341 for(Iterator methodit=cn.getMethods(); methodit.hasNext();) {
1342 MethodDescriptor md=(MethodDescriptor)methodit.next();
1343 generateMethod(cn, md, null, headersout, output);
1347 private void generateMethodParam(ClassDescriptor cn, MethodDescriptor md, LocalityBinding lb, PrintWriter output) {
1348 /* Output parameter structure */
1349 if (GENERATEPRECISEGC) {
1350 ParamsObject objectparams=(ParamsObject) paramstable.get(lb!=null ? lb : md);
1351 if ((state.DSM||state.SINGLETM)&&lb!=null)
1352 output.println("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params {");
1354 output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params {");
1355 output.println(" INTPTR size;");
1356 output.println(" void * next;");
1357 for(int i=0; i<objectparams.numPointers(); i++) {
1358 TempDescriptor temp=objectparams.getPointer(i);
1359 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1361 output.println("};\n");
1365 private void generateMethod(ClassDescriptor cn, MethodDescriptor md, LocalityBinding lb, PrintWriter headersout, PrintWriter output) {
1366 FlatMethod fm=state.getMethodFlat(md);
1367 generateTempStructs(fm, lb);
1369 ParamsObject objectparams=(ParamsObject) paramstable.get(lb!=null ? lb : md);
1370 TempObject objecttemps=(TempObject) tempstable.get(lb!=null ? lb : md);
1372 generateMethodParam(cn, md, lb, output);
1374 /* Output temp structure */
1375 if (GENERATEPRECISEGC) {
1376 if (state.DSM||state.SINGLETM)
1377 output.println("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals {");
1379 output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals {");
1380 output.println(" INTPTR size;");
1381 output.println(" void * next;");
1382 for(int i=0; i<objecttemps.numPointers(); i++) {
1383 TempDescriptor temp=objecttemps.getPointer(i);
1384 if (temp.getType().isNull())
1385 output.println(" void * "+temp.getSafeSymbol()+";");
1387 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1389 output.println("};\n");
1392 /********* Output method declaration ***********/
1393 if (state.DSM||state.SINGLETM) {
1394 headersout.println("#define D"+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+" 1");
1396 headersout.println("#define D"+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+" 1");
1398 /* First the return type */
1399 if (md.getReturnType()!=null) {
1400 if (md.getReturnType().isClass()||md.getReturnType().isArray())
1401 headersout.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
1403 headersout.print(md.getReturnType().getSafeSymbol()+" ");
1405 //catch the constructor case
1406 headersout.print("void ");
1408 /* Next the method name */
1409 if (state.DSM||state.SINGLETM) {
1410 headersout.print(cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1412 headersout.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1414 boolean printcomma=false;
1415 if (GENERATEPRECISEGC) {
1416 if (state.DSM||state.SINGLETM) {
1417 headersout.print("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1419 headersout.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1423 /* Output parameter list*/
1424 for(int i=0; i<objectparams.numPrimitives(); i++) {
1425 TempDescriptor temp=objectparams.getPrimitive(i);
1427 headersout.print(", ");
1429 if (temp.getType().isClass()||temp.getType().isArray())
1430 headersout.print("struct " + temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
1432 headersout.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
1434 headersout.println(");\n");
1438 /** This function outputs (1) structures that parameters are
1439 * passed in (when PRECISE GC is enabled) and (2) function
1440 * prototypes for the tasks */
1442 private void generateTaskStructs(PrintWriter output, PrintWriter headersout) {
1443 /* Cycle through tasks */
1444 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
1446 while(taskit.hasNext()) {
1447 /* Classify parameters */
1448 TaskDescriptor task=(TaskDescriptor)taskit.next();
1449 FlatMethod fm=state.getMethodFlat(task);
1450 generateTempStructs(fm, null);
1452 ParamsObject objectparams=(ParamsObject) paramstable.get(task);
1453 TempObject objecttemps=(TempObject) tempstable.get(task);
1455 /* Output parameter structure */
1456 if (GENERATEPRECISEGC) {
1457 output.println("struct "+task.getSafeSymbol()+"_params {");
1459 output.println(" INTPTR size;");
1460 output.println(" void * next;");
1461 for(int i=0; i<objectparams.numPointers(); i++) {
1462 TempDescriptor temp=objectparams.getPointer(i);
1463 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1466 output.println("};\n");
1467 if ((objectparams.numPointers()+fm.numTags())>maxtaskparams) {
1468 maxtaskparams=objectparams.numPointers()+fm.numTags();
1472 /* Output temp structure */
1473 if (GENERATEPRECISEGC) {
1474 output.println("struct "+task.getSafeSymbol()+"_locals {");
1475 output.println(" INTPTR size;");
1476 output.println(" void * next;");
1477 for(int i=0; i<objecttemps.numPointers(); i++) {
1478 TempDescriptor temp=objecttemps.getPointer(i);
1479 if (temp.getType().isNull())
1480 output.println(" void * "+temp.getSafeSymbol()+";");
1481 else if(temp.getType().isTag())
1482 output.println(" struct "+
1483 (new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1485 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1487 output.println("};\n");
1490 /* Output task declaration */
1491 headersout.print("void " + task.getSafeSymbol()+"(");
1493 boolean printcomma=false;
1494 if (GENERATEPRECISEGC) {
1495 headersout.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
1497 headersout.print("void * parameterarray[]");
1498 headersout.println(");\n");
1502 /***** Generate code for FlatMethod fm. *****/
1504 Hashtable<FlatAtomicEnterNode, AtomicRecord> atomicmethodmap;
1505 static int atomicmethodcount=0;
1507 private void generateFlatMethod(FlatMethod fm, LocalityBinding lb, PrintWriter output) {
1508 if (State.PRINTFLAT)
1509 System.out.println(fm.printMethod());
1510 MethodDescriptor md=fm.getMethod();
1511 TaskDescriptor task=fm.getTask();
1512 ClassDescriptor cn=md!=null ? md.getClassDesc() : null;
1513 ParamsObject objectparams=(ParamsObject)paramstable.get(lb!=null ? lb : md!=null ? md : task);
1515 HashSet<AtomicRecord> arset=null;
1517 if (state.DELAYCOMP&&!lb.isAtomic()&&lb.getHasAtomic()) {
1519 if (atomicmethodmap==null)
1520 atomicmethodmap=new Hashtable<FlatAtomicEnterNode, AtomicRecord>();
1522 //fix these so we get right strings for local variables
1523 localsprefixaddr=localsprefix;
1524 localsprefixderef=localsprefix+"->";
1525 arset=new HashSet<AtomicRecord>();
1527 //Generate commit methods here
1528 for(Iterator<FlatNode> fnit=fm.getNodeSet().iterator();fnit.hasNext();) {
1529 FlatNode fn=fnit.next();
1530 if (fn.kind()==FKind.FlatAtomicEnterNode&&
1531 locality.getAtomic(lb).get(fn.getPrev(0)).intValue()==0) {
1532 //We have an atomic enter
1533 FlatAtomicEnterNode faen=(FlatAtomicEnterNode) fn;
1534 Set<FlatNode> exitset=faen.getExits();
1536 String methodname=md.getSymbol()+(atomicmethodcount++);
1537 AtomicRecord ar=new AtomicRecord();
1541 atomicmethodmap.put(faen, ar);
1543 //build data structure declaration
1544 output.println("struct atomicprimitives_"+methodname+" {");
1546 Set<FlatNode> recordset=delaycomp.livecode(lb);
1547 Set<TempDescriptor> liveinto=delaycomp.liveinto(lb, faen, recordset);
1548 Set<TempDescriptor> liveout=delaycomp.liveout(lb, faen);
1549 Set<TempDescriptor> liveoutvirtualread=delaycomp.liveoutvirtualread(lb, faen);
1551 ar.reallivein=new HashSet(liveinto);
1553 ar.liveoutvirtualread=liveoutvirtualread;
1555 for(Iterator<TempDescriptor> it=liveinto.iterator(); it.hasNext();) {
1556 TempDescriptor tmp=it.next();
1557 //remove the pointers
1558 if (tmp.getType().isPtr()) {
1561 //let's print it here
1562 output.println(tmp.getType().getSafeSymbol()+" "+tmp.getSafeSymbol()+";");
1565 for(Iterator<TempDescriptor> it=liveout.iterator(); it.hasNext();) {
1566 TempDescriptor tmp=it.next();
1567 //remove the pointers
1568 if (tmp.getType().isPtr()) {
1570 } else if (!liveinto.contains(tmp)) {
1571 //let's print it here
1572 output.println(tmp.getType().getSafeSymbol()+" "+tmp.getSafeSymbol()+";");
1575 output.println("};");
1577 //print out method name
1578 output.println("void "+methodname+"(struct "+ cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix+", struct "+ cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals *"+localsprefix+", struct atomicprimitives_"+methodname+" * primitives) {");
1579 //build code for commit method
1581 //first define local primitives
1582 Set<TempDescriptor> alltemps=delaycomp.alltemps(lb, faen, recordset);
1583 for(Iterator<TempDescriptor> tmpit=alltemps.iterator();tmpit.hasNext();) {
1584 TempDescriptor tmp=tmpit.next();
1585 if (!tmp.getType().isPtr()) {
1586 if (liveinto.contains(tmp)||liveoutvirtualread.contains(tmp)) {
1587 //read from live into set
1588 output.println(tmp.getType().getSafeSymbol()+" "+tmp.getSafeSymbol()+"=primitives->"+tmp.getSafeSymbol()+";");
1591 output.println(tmp.getType().getSafeSymbol()+" "+tmp.getSafeSymbol()+";");
1595 //turn off write barrier generation
1597 state.SINGLETM=false;
1598 generateCode(faen, fm, lb, exitset, output, false);
1599 state.SINGLETM=true;
1600 //turn on write barrier generation
1602 output.println("}\n\n");
1606 //redefine these back to normal
1608 localsprefixaddr="&"+localsprefix;
1609 localsprefixderef=localsprefix+".";
1611 generateHeader(fm, lb, md!=null ? md : task,output);
1612 TempObject objecttemp=(TempObject) tempstable.get(lb!=null ? lb : md!=null ? md : task);
1614 if (state.DELAYCOMP&&!lb.isAtomic()&&lb.getHasAtomic()) {
1615 for(Iterator<AtomicRecord> arit=arset.iterator();arit.hasNext();) {
1616 AtomicRecord ar=arit.next();
1617 output.println("struct atomicprimitives_"+ar.name+" primitives_"+ar.name+";");
1621 if (GENERATEPRECISEGC) {
1622 if (md!=null&&(state.DSM||state.SINGLETM))
1623 output.print(" struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+"={");
1624 else if (md!=null&&!(state.DSM||state.SINGLETM))
1625 output.print(" struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+"={");
1627 output.print(" struct "+task.getSafeSymbol()+"_locals "+localsprefix+"={");
1629 output.print(objecttemp.numPointers()+",");
1630 output.print(paramsprefix);
1631 for(int j=0; j<objecttemp.numPointers(); j++)
1632 output.print(", NULL");
1633 output.println("};");
1636 for(int i=0; i<objecttemp.numPrimitives(); i++) {
1637 TempDescriptor td=objecttemp.getPrimitive(i);
1638 TypeDescriptor type=td.getType();
1640 output.println(" void * "+td.getSafeSymbol()+";");
1641 else if (type.isClass()||type.isArray())
1642 output.println(" struct "+type.getSafeSymbol()+" * "+td.getSafeSymbol()+";");
1644 output.println(" "+type.getSafeSymbol()+" "+td.getSafeSymbol()+";");
1647 /* Check to see if we need to do a GC if this is a
1648 * multi-threaded program...*/
1650 if ((state.THREAD||state.DSM||state.SINGLETM)&&GENERATEPRECISEGC) {
1651 //Don't bother if we aren't in recursive methods...The loops case will catch it
1652 if (callgraph.getAllMethods(md).contains(md)) {
1653 if (state.DSM&&lb.isAtomic())
1654 output.println("if (needtocollect) checkcollect2("+localsprefixaddr+");");
1656 output.println("if (needtocollect) checkcollect("+localsprefixaddr+");");
1660 generateCode(fm.getNext(0), fm, lb, null, output, true);
1662 output.println("}\n\n");
1666 protected void initializeSESE( FlatSESEEnterNode fsen ) {
1668 FlatMethod fm = fsen.getfmEnclosing();
1669 MethodDescriptor md = fm.getMethod();
1670 ClassDescriptor cn = md.getClassDesc();
1673 // Creates bogus method descriptor to index into tables
1674 Modifiers modBogus = new Modifiers();
1675 MethodDescriptor mdBogus =
1676 new MethodDescriptor( modBogus,
1677 new TypeDescriptor( TypeDescriptor.VOID ),
1678 "sese_"+fsen.getPrettyIdentifier()+fsen.getIdentifier()
1681 mdBogus.setClassDesc( fsen.getcdEnclosing() );
1682 FlatMethod fmBogus = new FlatMethod( mdBogus, null );
1683 fsen.setfmBogus( fmBogus );
1684 fsen.setmdBogus( mdBogus );
1686 Set<TempDescriptor> inSetAndOutSet = new HashSet<TempDescriptor>();
1687 inSetAndOutSet.addAll( fsen.getInVarSet() );
1688 inSetAndOutSet.addAll( fsen.getOutVarSet() );
1690 // Build paramsobj for bogus method descriptor
1691 ParamsObject objectparams = new ParamsObject( mdBogus, tag++ );
1692 paramstable.put( mdBogus, objectparams );
1694 Iterator<TempDescriptor> itr = inSetAndOutSet.iterator();
1695 while( itr.hasNext() ) {
1696 TempDescriptor temp = itr.next();
1697 TypeDescriptor type = temp.getType();
1698 if( type.isPtr() ) {
1699 objectparams.addPtr( temp );
1703 // Build normal temp object for bogus method descriptor
1704 TempObject objecttemps = new TempObject( objectparams, mdBogus, tag++ );
1705 tempstable.put( mdBogus, objecttemps );
1707 for(Iterator nodeit=fsen.getNodeSet().iterator(); nodeit.hasNext();) {
1708 FlatNode fn=(FlatNode)nodeit.next();
1709 TempDescriptor[] writes=fn.writesTemps();
1710 for(int i=0; i<writes.length; i++) {
1711 TempDescriptor temp=writes[i];
1712 TypeDescriptor type=temp.getType();
1713 if (type.isPtr()&&GENERATEPRECISEGC)
1714 objecttemps.addPtr(temp);
1716 objecttemps.addPrim(temp);
1721 protected void generateMethodSESE(FlatSESEEnterNode fsen,
1723 PrintWriter outputStructs,
1724 PrintWriter outputMethHead,
1725 PrintWriter outputMethods
1728 ParamsObject objectparams = (ParamsObject) paramstable.get( fsen.getmdBogus() );
1730 Set<TempDescriptor> inSetAndOutSet = new HashSet<TempDescriptor>();
1731 inSetAndOutSet.addAll( fsen.getInVarSet() );
1732 inSetAndOutSet.addAll( fsen.getOutVarSet() );
1734 Set<TempDescriptor> inSetAndOutSetPrims = new HashSet<TempDescriptor>();
1736 Iterator<TempDescriptor> itr = inSetAndOutSet.iterator();
1737 while( itr.hasNext() ) {
1738 TempDescriptor temp = itr.next();
1739 TypeDescriptor type = temp.getType();
1740 if( !type.isPtr() ) {
1741 inSetAndOutSetPrims.add( temp );
1745 TempObject objecttemps = (TempObject) tempstable.get( fsen.getmdBogus() );
1748 // generate the SESE record structure
1749 outputStructs.println(fsen.getSESErecordName()+" {");
1751 // class ID comes first
1752 outputStructs.println(" int classID;");
1754 // then garbage list stuff
1755 outputStructs.println(" INTPTR size;");
1756 outputStructs.println(" void * next;");
1758 // in-set source pointers
1759 Iterator<TempDescriptor> itrInSet = fsen.getInVarSet().iterator();
1760 while( itrInSet.hasNext() ) {
1761 TempDescriptor temp = itrInSet.next();
1762 outputStructs.println(" INTPTR "+temp.getSafeSymbol()+"__srcAddr_;");
1765 // all in and out set primitives
1766 Iterator<TempDescriptor> itrPrims = inSetAndOutSetPrims.iterator();
1767 while( itrPrims.hasNext() ) {
1768 TempDescriptor temp = itrPrims.next();
1769 TypeDescriptor type = temp.getType();
1770 outputStructs.println(" "+temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol()+";");
1773 for(int i=0; i<objectparams.numPointers(); i++) {
1774 TempDescriptor temp=objectparams.getPointer(i);
1775 if (temp.getType().isNull())
1776 outputStructs.println(" void * "+temp.getSafeSymbol()+";");
1778 outputStructs.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1781 outputStructs.println("};\n");
1783 // generate locals structure
1784 outputStructs.println("struct "+fsen.getcdEnclosing().getSafeSymbol()+fsen.getmdBogus().getSafeSymbol()+"_"+fsen.getmdBogus().getSafeMethodDescriptor()+"_locals {");
1785 outputStructs.println(" INTPTR size;");
1786 outputStructs.println(" void * next;");
1787 for(int i=0; i<objecttemps.numPointers(); i++) {
1788 TempDescriptor temp=objecttemps.getPointer(i);
1789 if (temp.getType().isNull())
1790 outputStructs.println(" void * "+temp.getSafeSymbol()+";");
1792 outputStructs.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1794 outputStructs.println("};\n");
1797 // write method declaration to header file
1798 outputMethHead.print("void ");
1799 outputMethHead.print(fsen.getSESEmethodName()+"(");
1800 outputMethHead.print(fsen.getSESErecordName()+"* "+paramsprefix);
1803 boolean printcomma=false;
1804 if (GENERATEPRECISEGC) {
1805 outputMethHead.print("struct "+cn.getSafeSymbol()+
1806 bogusmd.getSafeSymbol()+"_"+
1807 bogusmd.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1810 // Output parameter list
1811 for(int i=0; i<objectparams.numPrimitives(); i++) {
1812 TempDescriptor temp=objectparams.getPrimitive(i);
1814 outputMethHead.print(", ");
1816 if (temp.getType().isClass()||temp.getType().isArray())
1817 outputMethHead.print("struct " + temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
1819 outputMethHead.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
1823 outputMethHead.println(");\n");
1825 generateFlatMethodSESE( fsen.getfmBogus(),
1826 fsen.getcdEnclosing(),
1832 private void generateFlatMethodSESE(FlatMethod fm,
1834 FlatSESEEnterNode fsen,
1835 FlatSESEExitNode seseExit,
1839 MethodDescriptor md=fm.getMethod();
1841 //generateHeader(fm, null, md, output, true);
1843 output.print("void ");
1844 output.print(fsen.getSESEmethodName()+"(");
1845 output.print(fsen.getSESErecordName()+"* "+paramsprefix);
1846 output.println("){\n");
1848 TempObject objecttemp=(TempObject) tempstable.get(md);
1850 if (GENERATEPRECISEGC) {
1851 output.print(" struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+"={");
1852 output.print(objecttemp.numPointers()+",");
1853 output.print("(void*) &("+paramsprefix+"->size)");
1854 for(int j=0; j<objecttemp.numPointers(); j++)
1855 output.print(", NULL");
1856 output.println("};");
1859 for(int i=0; i<objecttemp.numPrimitives(); i++) {
1860 TempDescriptor td=objecttemp.getPrimitive(i);
1861 TypeDescriptor type=td.getType();
1863 output.println(" void * "+td.getSafeSymbol()+";");
1864 else if (type.isClass()||type.isArray())
1865 output.println(" struct "+type.getSafeSymbol()+" * "+td.getSafeSymbol()+";");
1867 output.println(" "+type.getSafeSymbol()+" "+td.getSafeSymbol()+";");
1871 // declare variables for naming SESE's
1873 Iterator<SESEandAgePair> pItr = fsen.getNeededStaticNames().iterator();
1874 while( pItr.hasNext() ) {
1875 SESEandAgePair p = pItr.next();
1876 output.println(" SESErecord* "+p+";");
1880 // copy in-set into place
1881 Iterator<TempDescriptor> itrInSet = fsen.getInVarSet().iterator();
1882 while( itrInSet.hasNext() ) {
1883 TempDescriptor temp = itrInSet.next();
1884 TypeDescriptor type = temp.getType();
1886 String sizeofStr = "";
1887 if( type.isPtr() ) {
1888 sizeofStr = "struct ";
1890 sizeofStr += type.getSafeSymbol();
1892 output.println(" memcpy( "+
1893 "(void*) &("+paramsprefix+"->"+temp.getSafeSymbol()+"), "+ // to
1894 "(void*) ("+paramsprefix+"->"+temp.getSafeSymbol()+"__srcAddr_),"+ // from
1895 " sizeof( "+sizeofStr+" ) );"); // size
1897 // make a deep copy of objects
1898 //if( type.isPtr() ) {
1905 // Check to see if we need to do a GC if this is a
1906 // multi-threaded program...
1907 if (GENERATEPRECISEGC) {
1908 //Don't bother if we aren't in recursive methods...The loops case will catch it
1909 if (callgraph.getAllMethods(md).contains(md)) {
1910 output.println("if (needtocollect) checkcollect("+localsprefixaddr+");");
1914 HashSet<FlatNode> exitset=new HashSet<FlatNode>();
1915 exitset.add(seseExit);
1916 generateCode(fsen.getNext(0), fm, null, exitset, output, true);
1918 output.println("}\n\n");
1922 // when a new mlp thread is created for an issued SESE, it is started
1923 // by running this method which blocks on a cond variable until
1924 // it is allowed to transition to execute. Then a case statement
1925 // allows it to invoke the method with the proper SESE body, and after
1926 // exiting the SESE method, executes proper SESE exit code before the
1927 // thread can be destroyed
1928 private void generateSESEinvocationMethod(PrintWriter outmethodheader,
1929 PrintWriter outmethod
1932 outmethodheader.println("void* invokeSESEmethod( void* seseRecord );");
1933 outmethod.println( "void* invokeSESEmethod( void* seseRecord ) {");
1934 outmethod.println( " int status;");
1935 outmethod.println( " char errmsg[128];");
1937 // generate a case for each SESE class that can be invoked
1938 outmethod.println( " switch( *((int*)seseRecord) ) {");
1939 outmethod.println( " ");
1940 for(Iterator<FlatSESEEnterNode> seseit=mlpa.getAllSESEs().iterator();seseit.hasNext();) {
1941 FlatSESEEnterNode fsen = seseit.next();
1943 outmethod.println( " /* "+fsen.getPrettyIdentifier()+" */");
1944 outmethod.println( " case "+fsen.getIdentifier()+":");
1945 outmethod.println( " "+fsen.getSESEmethodName()+"( seseRecord );");
1946 outmethod.println( " break;");
1947 outmethod.println( "");
1950 // default case should never be taken, error out
1951 outmethod.println( " default:");
1952 outmethod.println( " printf(\"Error: unknown SESE class ID in invoke method.\\n\");");
1953 outmethod.println( " exit(-30);");
1954 outmethod.println( " break;");
1955 outmethod.println( " }");
1956 outmethod.println( " return NULL;");
1957 outmethod.println( "}\n\n");
1961 protected void generateCode(FlatNode first,
1964 Set<FlatNode> stopset,
1965 PrintWriter output, boolean firstpass) {
1967 /* Assign labels to FlatNode's if necessary.*/
1968 Hashtable<FlatNode, Integer> nodetolabel=assignLabels(first, stopset);
1970 Set<FlatNode> storeset=null;
1971 HashSet<FlatNode> genset=null;
1972 Set<FlatNode> unionset=null;
1974 if (state.DELAYCOMP&&!lb.isAtomic()&&lb.getHasAtomic()) {
1975 storeset=delaycomp.livecode(lb);
1976 genset=new HashSet<FlatNode>();
1978 genset.addAll(delaycomp.getCannotDelay(lb));
1979 genset.addAll(delaycomp.getOther(lb));
1981 genset.addAll(delaycomp.getNotReady(lb));
1983 unionset=new HashSet<FlatNode>();
1984 unionset.addAll(storeset);
1985 unionset.addAll(genset);
1988 /* Do the actual code generation */
1989 FlatNode current_node=null;
1990 HashSet tovisit=new HashSet();
1991 HashSet visited=new HashSet();
1993 tovisit.add(first.getNext(0));
1996 while(current_node!=null||!tovisit.isEmpty()) {
1997 if (current_node==null) {
1998 current_node=(FlatNode)tovisit.iterator().next();
1999 tovisit.remove(current_node);
2000 } else if (tovisit.contains(current_node)) {
2001 tovisit.remove(current_node);
2003 visited.add(current_node);
2004 if (nodetolabel.containsKey(current_node)) {
2005 output.println("L"+nodetolabel.get(current_node)+":");
2007 if (state.INSTRUCTIONFAILURE) {
2008 if (state.THREAD||state.DSM||state.SINGLETM) {
2009 output.println("if ((++instructioncount)>failurecount) {instructioncount=0;injectinstructionfailure();}");
2011 output.println("if ((--instructioncount)==0) injectinstructionfailure();");
2013 if (current_node.numNext()==0||stopset!=null&&stopset.contains(current_node)) {
2015 if (!state.DELAYCOMP||firstpass) {
2016 generateFlatNode(fm, lb, current_node, output);
2018 //store primitive variables in out set
2019 AtomicRecord ar=atomicmethodmap.get((FlatAtomicEnterNode)first);
2020 Set<TempDescriptor> liveout=ar.liveout;
2021 for(Iterator<TempDescriptor> tmpit=liveout.iterator();tmpit.hasNext();) {
2022 TempDescriptor tmp=tmpit.next();
2023 output.println("primitives->"+tmp.getSafeSymbol()+"="+tmp.getSafeSymbol()+";");
2026 if (current_node.kind()!=FKind.FlatReturnNode) {
2027 output.println(" return;");
2030 } else if(current_node.numNext()==1) {
2032 if (state.MLP && current_node.kind()==FKind.FlatSESEEnterNode) {
2033 FlatSESEEnterNode fsen = (FlatSESEEnterNode)current_node;
2034 generateFlatNode(fm, lb, current_node, output);
2035 nextnode=fsen.getFlatExit().getNext(0);
2036 } else if (state.DELAYCOMP) {
2037 boolean specialprimitive=false;
2038 //skip literals...no need to add extra overhead
2039 if (storeset!=null&&storeset.contains(current_node)&¤t_node.kind()==FKind.FlatLiteralNode) {
2040 TypeDescriptor typedesc=((FlatLiteralNode)current_node).getType();
2041 if (!typedesc.isClass()&&!typedesc.isArray()) {
2042 specialprimitive=true;
2046 if (genset==null||genset.contains(current_node)||specialprimitive)
2047 generateFlatNode(fm, lb, current_node, output);
2048 if (storeset!=null&&storeset.contains(current_node)&&!specialprimitive) {
2049 TempDescriptor wrtmp=current_node.writesTemps()[0];
2051 //need to store value written by previous node
2052 if (wrtmp.getType().isPtr()) {
2053 //only lock the objects that may actually need locking
2054 if (recorddc.getNeedTrans(lb, current_node)) {
2055 output.println("STOREPTR("+generateTemp(fm, wrtmp,lb)+");");
2057 output.println("STOREPTRNOLOCK("+generateTemp(fm, wrtmp,lb)+");");
2060 output.println("STORE"+wrtmp.getType().getSafeDescriptor()+"("+generateTemp(fm, wrtmp, lb)+");");
2063 //need to read value read by previous node
2064 if (wrtmp.getType().isPtr()) {
2065 output.println("RESTOREPTR("+generateTemp(fm, wrtmp,lb)+");");
2067 output.println("RESTORE"+wrtmp.getType().getSafeDescriptor()+"("+generateTemp(fm, wrtmp, lb)+");");
2071 nextnode=current_node.getNext(0);
2074 generateFlatNode(fm, lb, current_node, output);
2075 nextnode=current_node.getNext(0);
2077 if (visited.contains(nextnode)) {
2078 output.println("goto L"+nodetolabel.get(nextnode)+";");
2081 current_node=nextnode;
2082 } else if (current_node.numNext()==2) {
2084 if (state.DELAYCOMP) {
2085 boolean computeside=false;
2087 //need to record which way it should go
2088 if (genset==null||genset.contains(current_node)) {
2089 if (storeset!=null&&storeset.contains(current_node)) {
2090 //need to store which way branch goes
2091 generateStoreFlatCondBranch(fm, lb, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
2093 generateFlatCondBranch(fm, lb, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
2095 //which side to execute
2099 if (genset.contains(current_node)) {
2100 generateFlatCondBranch(fm, lb, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
2101 } else if (storeset.contains(current_node)) {
2103 output.println("RESTOREANDBRANCH(L"+nodetolabel.get(current_node.getNext(1))+");");
2105 //which side to execute
2110 Set<FlatNode> leftset=DelayComputation.getNext(current_node, 0, unionset, lb,locality, true);
2112 if (leftset.size()==0)
2114 if (visited.contains(current_node.getNext(branch))) {
2115 //already visited -- build jump
2116 output.println("goto L"+nodetolabel.get(current_node.getNext(branch))+";");
2119 current_node=current_node.getNext(branch);
2122 if (!visited.contains(current_node.getNext(1)))
2123 tovisit.add(current_node.getNext(1));
2124 if (visited.contains(current_node.getNext(0))) {
2125 output.println("goto L"+nodetolabel.get(current_node.getNext(0))+";");
2128 current_node=current_node.getNext(0);
2132 generateFlatCondBranch(fm, lb, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
2133 if (!visited.contains(current_node.getNext(1)))
2134 tovisit.add(current_node.getNext(1));
2135 if (visited.contains(current_node.getNext(0))) {
2136 output.println("goto L"+nodetolabel.get(current_node.getNext(0))+";");
2139 current_node=current_node.getNext(0);
2141 } else throw new Error();
2145 /** This method assigns labels to FlatNodes */
2146 protected Hashtable<FlatNode, Integer> assignLabels(FlatNode first) {
2147 return assignLabels(first, null);
2150 protected Hashtable<FlatNode, Integer> assignLabels(FlatNode first, Set<FlatNode> lastset) {
2151 HashSet tovisit=new HashSet();
2152 HashSet visited=new HashSet();
2154 Hashtable<FlatNode, Integer> nodetolabel=new Hashtable<FlatNode, Integer>();
2157 /*Assign labels first. A node needs a label if the previous
2158 * node has two exits or this node is a join point. */
2160 while(!tovisit.isEmpty()) {
2161 FlatNode fn=(FlatNode)tovisit.iterator().next();
2166 if(lastset!=null&&lastset.contains(fn)) {
2167 // if last is not null and matches, don't go
2168 // any further for assigning labels
2172 for(int i=0; i<fn.numNext(); i++) {
2173 FlatNode nn=fn.getNext(i);
2176 //1) Edge >1 of node
2177 nodetolabel.put(nn,new Integer(labelindex++));
2179 if (!visited.contains(nn)&&!tovisit.contains(nn)) {
2183 nodetolabel.put(nn,new Integer(labelindex++));
2191 /** Generate text string that corresponds to the TempDescriptor td. */
2192 protected String generateTemp(FlatMethod fm, TempDescriptor td, LocalityBinding lb) {
2193 MethodDescriptor md=fm.getMethod();
2194 TaskDescriptor task=fm.getTask();
2195 TempObject objecttemps=(TempObject) tempstable.get(lb!=null ? lb : md!=null ? md : task);
2197 if (objecttemps.isLocalPrim(td)||objecttemps.isParamPrim(td)) {
2198 //System.out.println("generateTemp returns " + td.getSafeSymbol());
2199 return td.getSafeSymbol();
2202 if (objecttemps.isLocalPtr(td)) {
2203 return localsprefixderef+td.getSafeSymbol();
2206 if (objecttemps.isParamPtr(td)) {
2207 return paramsprefix+"->"+td.getSafeSymbol();
2213 protected void generateFlatNode(FlatMethod fm, LocalityBinding lb, FlatNode fn, PrintWriter output) {
2215 case FKind.FlatAtomicEnterNode:
2216 generateFlatAtomicEnterNode(fm, lb, (FlatAtomicEnterNode) fn, output);
2219 case FKind.FlatAtomicExitNode:
2220 generateFlatAtomicExitNode(fm, lb, (FlatAtomicExitNode) fn, output);
2223 case FKind.FlatInstanceOfNode:
2224 generateFlatInstanceOfNode(fm, lb, (FlatInstanceOfNode)fn, output);
2227 case FKind.FlatSESEEnterNode:
2228 generateFlatSESEEnterNode(fm, lb, (FlatSESEEnterNode)fn, output);
2231 case FKind.FlatSESEExitNode:
2232 generateFlatSESEExitNode(fm, lb, (FlatSESEExitNode)fn, output);
2235 case FKind.FlatGlobalConvNode:
2236 generateFlatGlobalConvNode(fm, lb, (FlatGlobalConvNode) fn, output);
2239 case FKind.FlatTagDeclaration:
2240 generateFlatTagDeclaration(fm, lb, (FlatTagDeclaration) fn,output);
2243 case FKind.FlatCall:
2244 generateFlatCall(fm, lb, (FlatCall) fn,output);
2247 case FKind.FlatFieldNode:
2248 generateFlatFieldNode(fm, lb, (FlatFieldNode) fn,output);
2251 case FKind.FlatElementNode:
2252 generateFlatElementNode(fm, lb, (FlatElementNode) fn,output);
2255 case FKind.FlatSetElementNode:
2256 generateFlatSetElementNode(fm, lb, (FlatSetElementNode) fn,output);
2259 case FKind.FlatSetFieldNode:
2260 generateFlatSetFieldNode(fm, lb, (FlatSetFieldNode) fn,output);
2264 generateFlatNew(fm, lb, (FlatNew) fn,output);
2267 case FKind.FlatOpNode:
2268 generateFlatOpNode(fm, lb, (FlatOpNode) fn,output);
2271 case FKind.FlatCastNode:
2272 generateFlatCastNode(fm, lb, (FlatCastNode) fn,output);
2275 case FKind.FlatLiteralNode:
2276 generateFlatLiteralNode(fm, lb, (FlatLiteralNode) fn,output);
2279 case FKind.FlatReturnNode:
2280 generateFlatReturnNode(fm, lb, (FlatReturnNode) fn,output);
2284 output.println("/* nop */");
2287 case FKind.FlatExit:
2288 output.println("/* exit */");
2291 case FKind.FlatBackEdge:
2292 if ((state.THREAD||state.DSM||state.SINGLETM)&&GENERATEPRECISEGC) {
2293 if(state.DSM&&locality.getAtomic(lb).get(fn).intValue()>0) {
2294 output.println("if (needtocollect) checkcollect2("+localsprefixaddr+");");
2296 output.println("if (needtocollect) checkcollect("+localsprefixaddr+");");
2298 output.println("/* nop */");
2301 case FKind.FlatCheckNode:
2302 generateFlatCheckNode(fm, lb, (FlatCheckNode) fn, output);
2305 case FKind.FlatFlagActionNode:
2306 generateFlatFlagActionNode(fm, lb, (FlatFlagActionNode) fn, output);
2309 case FKind.FlatPrefetchNode:
2310 generateFlatPrefetchNode(fm,lb, (FlatPrefetchNode) fn, output);
2313 case FKind.FlatOffsetNode:
2314 generateFlatOffsetNode(fm, lb, (FlatOffsetNode)fn, output);
2323 CodePlan cp = mlpa.getCodePlan( fn );
2326 Set<VariableSourceToken> writeDynamic = cp.getWriteToDynamicSrc();
2327 if( writeDynamic != null ) {
2335 public void generateFlatOffsetNode(FlatMethod fm, LocalityBinding lb, FlatOffsetNode fofn, PrintWriter output) {
2336 output.println("/* FlatOffsetNode */");
2337 FieldDescriptor fd=fofn.getField();
2338 output.println(generateTemp(fm, fofn.getDst(),lb)+ " = (short)(int) (&((struct "+fofn.getClassType().getSafeSymbol() +" *)0)->"+ fd.getSafeSymbol()+");");
2339 output.println("/* offset */");
2342 public void generateFlatPrefetchNode(FlatMethod fm, LocalityBinding lb, FlatPrefetchNode fpn, PrintWriter output) {
2343 if (state.PREFETCH) {
2344 Vector oids = new Vector();
2345 Vector fieldoffset = new Vector();
2346 Vector endoffset = new Vector();
2347 int tuplecount = 0; //Keeps track of number of prefetch tuples that need to be generated
2348 for(Iterator it = fpn.hspp.iterator(); it.hasNext();) {
2349 PrefetchPair pp = (PrefetchPair) it.next();
2350 Integer statusbase = locality.getNodePreTempInfo(lb,fpn).get(pp.base);
2351 /* Find prefetches that can generate oid */
2352 if(statusbase == LocalityAnalysis.GLOBAL) {
2353 generateTransCode(fm, lb, pp, oids, fieldoffset, endoffset, tuplecount, locality.getAtomic(lb).get(fpn).intValue()>0, false);
2355 } else if (statusbase == LocalityAnalysis.LOCAL) {
2356 generateTransCode(fm,lb,pp,oids,fieldoffset,endoffset,tuplecount,false,true);
2363 System.out.println("Adding prefetch "+fpn+ " to method:" +fm);
2364 output.println("{");
2365 output.println("/* prefetch */");
2366 output.println("/* prefetchid_" + fpn.siteid + " */");
2367 output.println("void * prefptr;");
2368 output.println("int tmpindex;");
2370 output.println("if((evalPrefetch["+fpn.siteid+"].operMode) || (evalPrefetch["+fpn.siteid+"].retrycount <= 0)) {");
2371 /*Create C code for oid array */
2372 output.print(" unsigned int oidarray_[] = {");
2373 boolean needcomma=false;
2374 for (Iterator it = oids.iterator(); it.hasNext();) {
2377 output.print(it.next());
2380 output.println("};");
2382 /*Create C code for endoffset values */
2383 output.print(" unsigned short endoffsetarry_[] = {");
2385 for (Iterator it = endoffset.iterator(); it.hasNext();) {
2388 output.print(it.next());
2391 output.println("};");
2393 /*Create C code for Field Offset Values */
2394 output.print(" short fieldarry_[] = {");
2396 for (Iterator it = fieldoffset.iterator(); it.hasNext();) {
2399 output.print(it.next());
2402 output.println("};");
2403 /* make the prefetch call to Runtime */
2404 output.println(" if(!evalPrefetch["+fpn.siteid+"].operMode) {");
2405 output.println(" evalPrefetch["+fpn.siteid+"].retrycount = RETRYINTERVAL;");
2406 output.println(" }");
2407 output.println(" prefetch("+fpn.siteid+" ,"+tuplecount+", oidarray_, endoffsetarry_, fieldarry_);");
2408 output.println(" } else {");
2409 output.println(" evalPrefetch["+fpn.siteid+"].retrycount--;");
2410 output.println(" }");
2411 output.println("}");
2415 public void generateTransCode(FlatMethod fm, LocalityBinding lb,PrefetchPair pp, Vector oids, Vector fieldoffset, Vector endoffset, int tuplecount, boolean inside, boolean localbase) {
2416 short offsetcount = 0;
2420 } else if (localbase) {
2421 for(; breakindex<pp.desc.size(); breakindex++) {
2422 Descriptor desc=pp.getDescAt(breakindex);
2423 if (desc instanceof FieldDescriptor) {
2424 FieldDescriptor fd=(FieldDescriptor)desc;
2425 if (fd.isGlobal()) {
2433 if (breakindex>pp.desc.size()) //all local
2436 TypeDescriptor lasttype=pp.base.getType();
2437 String basestr=generateTemp(fm, pp.base, lb);
2439 boolean maybenull=fm.getMethod().isStatic()||
2440 !pp.base.equals(fm.getParameter(0));
2442 for(int i=0; i<breakindex; i++) {
2443 String indexcheck="";
2445 Descriptor desc=pp.getDescAt(i);
2446 if (desc instanceof FieldDescriptor) {
2447 FieldDescriptor fd=(FieldDescriptor)desc;
2449 if (!teststr.equals(""))
2451 teststr+="((prefptr="+basestr+")!=NULL)";
2452 basestr="((struct "+lasttype.getSafeSymbol()+" *)prefptr)->"+fd.getSafeSymbol();
2454 basestr=basestr+"->"+fd.getSafeSymbol();
2457 lasttype=fd.getType();
2459 IndexDescriptor id=(IndexDescriptor)desc;
2460 indexcheck="((tmpindex=";
2461 for(int j=0; j<id.tddesc.size(); j++) {
2462 indexcheck+=generateTemp(fm, id.getTempDescAt(j), lb)+"+";
2464 indexcheck+=id.offset+")>=0)&(tmpindex<((struct ArrayObject *)prefptr)->___length___)";
2466 if (!teststr.equals(""))
2468 teststr+="((prefptr="+basestr+")!= NULL) &&"+indexcheck;
2469 basestr="((void **)(((char *) &(((struct ArrayObject *)prefptr)->___length___))+sizeof(int)))[tmpindex]";
2471 lasttype=lasttype.dereference();
2476 if (teststr.equals("")) {
2477 oid="((unsigned int)"+basestr+")";
2479 oid="((unsigned int)(("+teststr+")?"+basestr+":NULL))";
2483 for(int i = breakindex; i < pp.desc.size(); i++) {
2484 String newfieldoffset;
2485 Object desc = pp.getDescAt(i);
2486 if(desc instanceof FieldDescriptor) {
2487 FieldDescriptor fd=(FieldDescriptor)desc;
2488 newfieldoffset = new String("(unsigned int)(&(((struct "+ lasttype.getSafeSymbol()+" *)0)->"+ fd.getSafeSymbol()+ "))");
2489 lasttype=fd.getType();
2491 newfieldoffset = "";
2492 IndexDescriptor id=(IndexDescriptor)desc;
2493 for(int j = 0; j < id.tddesc.size(); j++) {
2494 newfieldoffset += generateTemp(fm, id.getTempDescAt(j), lb) + "+";
2496 newfieldoffset += id.offset.toString();
2497 lasttype=lasttype.dereference();
2499 fieldoffset.add(newfieldoffset);
2502 int base=(tuplecount>0) ? ((Short)endoffset.get(tuplecount-1)).intValue() : 0;
2503 base+=pp.desc.size()-breakindex;
2504 endoffset.add(new Short((short)base));
2509 public void generateFlatGlobalConvNode(FlatMethod fm, LocalityBinding lb, FlatGlobalConvNode fgcn, PrintWriter output) {
2510 if (lb!=fgcn.getLocality())
2512 /* Have to generate flat globalconv */
2513 if (fgcn.getMakePtr()) {
2515 output.println("TRANSREAD("+generateTemp(fm, fgcn.getSrc(),lb)+", (unsigned int) "+generateTemp(fm, fgcn.getSrc(),lb)+");");
2517 if ((dc==null)||!state.READSET&&dc.getNeedTrans(lb, fgcn)||state.READSET&&dc.getNeedWriteTrans(lb, fgcn)) {
2518 //need to do translation
2519 output.println("TRANSREAD("+generateTemp(fm, fgcn.getSrc(),lb)+", "+generateTemp(fm, fgcn.getSrc(),lb)+", (void *)("+localsprefixaddr+"));");
2520 } else if (state.READSET&&dc.getNeedTrans(lb, fgcn)) {
2521 output.println("TRANSREADRD("+generateTemp(fm, fgcn.getSrc(),lb)+", "+generateTemp(fm, fgcn.getSrc(),lb)+");");
2525 /* Need to convert to OID */
2526 if ((dc==null)||dc.getNeedSrcTrans(lb,fgcn)) {
2527 if (fgcn.doConvert()||(delaycomp!=null&&atomicmethodmap.get(fgcn.getAtomicEnter()).reallivein.contains(fgcn.getSrc()))) {
2528 output.println(generateTemp(fm, fgcn.getSrc(),lb)+"=(void *)COMPOID("+generateTemp(fm, fgcn.getSrc(),lb)+");");
2530 output.println(generateTemp(fm, fgcn.getSrc(),lb)+"=NULL;");
2536 public void generateFlatInstanceOfNode(FlatMethod fm, LocalityBinding lb, FlatInstanceOfNode fion, PrintWriter output) {
2538 if (fion.getType().isArray()) {
2539 type=state.getArrayNumber(fion.getType())+state.numClasses();
2541 type=fion.getType().getClassDesc().getId();
2544 if (fion.getType().getSymbol().equals(TypeUtil.ObjectClass))
2545 output.println(generateTemp(fm, fion.getDst(), lb)+"=1;");
2547 output.println(generateTemp(fm, fion.getDst(), lb)+"=instanceof("+generateTemp(fm,fion.getSrc(),lb)+","+type+");");
2550 public void generateFlatAtomicEnterNode(FlatMethod fm, LocalityBinding lb, FlatAtomicEnterNode faen, PrintWriter output) {
2551 /* Check to see if we need to generate code for this atomic */
2552 if (locality==null) {
2553 output.println("pthread_mutex_lock(&atomiclock);");
2557 if (locality.getAtomic(lb).get(faen.getPrev(0)).intValue()>0)
2561 if (state.DELAYCOMP) {
2562 AtomicRecord ar=atomicmethodmap.get(faen);
2564 for(Iterator<TempDescriptor> tmpit=ar.livein.iterator();tmpit.hasNext();) {
2565 TempDescriptor tmp=tmpit.next();
2566 output.println("primitives_"+ar.name+"."+tmp.getSafeSymbol()+"="+tmp.getSafeSymbol()+";");
2569 //copy outs that depend on path
2570 for(Iterator<TempDescriptor> tmpit=ar.liveoutvirtualread.iterator();tmpit.hasNext();) {
2571 TempDescriptor tmp=tmpit.next();
2572 if (!ar.livein.contains(tmp))
2573 output.println("primitives_"+ar.name+"."+tmp.getSafeSymbol()+"="+tmp.getSafeSymbol()+";");
2577 /* Backup the temps. */
2578 for(Iterator<TempDescriptor> tmpit=locality.getTemps(lb).get(faen).iterator(); tmpit.hasNext();) {
2579 TempDescriptor tmp=tmpit.next();
2580 output.println(generateTemp(fm, backuptable.get(lb).get(tmp),lb)+"="+generateTemp(fm,tmp,lb)+";");
2583 output.println("goto transstart"+faen.getIdentifier()+";");
2585 /******* Print code to retry aborted transaction *******/
2586 output.println("transretry"+faen.getIdentifier()+":");
2589 for(Iterator<TempDescriptor> tmpit=locality.getTemps(lb).get(faen).iterator(); tmpit.hasNext();) {
2590 TempDescriptor tmp=tmpit.next();
2591 output.println(generateTemp(fm, tmp,lb)+"="+generateTemp(fm,backuptable.get(lb).get(tmp),lb)+";");
2595 /********* Need to revert local object store ********/
2596 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
2598 output.println("while ("+revertptr+") {");
2599 output.println("struct ___Object___ * tmpptr;");
2600 output.println("tmpptr="+revertptr+"->"+nextobjstr+";");
2601 output.println("REVERT_OBJ("+revertptr+");");
2602 output.println(revertptr+"=tmpptr;");
2603 output.println("}");
2605 /******* Tell the runtime to start the transaction *******/
2607 output.println("transstart"+faen.getIdentifier()+":");
2608 output.println("transStart();");
2610 if (state.ABORTREADERS) {
2611 output.println("if (_setjmp(aborttrans)) {");
2612 output.println(" goto transretry"+faen.getIdentifier()+"; }");
2616 public void generateFlatAtomicExitNode(FlatMethod fm, LocalityBinding lb, FlatAtomicExitNode faen, PrintWriter output) {
2617 /* Check to see if we need to generate code for this atomic */
2618 if (locality==null) {
2619 output.println("pthread_mutex_unlock(&atomiclock);");
2622 if (locality.getAtomic(lb).get(faen).intValue()>0)
2624 //store the revert list before we lose the transaction object
2625 String revertptr=null;
2627 revertptr=generateTemp(fm, reverttable.get(lb),lb);
2628 output.println(revertptr+"=revertlist;");
2630 if (state.DELAYCOMP) {
2631 AtomicRecord ar=atomicmethodmap.get(faen.getAtomicEnter());
2634 output.println("if (transCommit((void (*)(void *, void *, void *))&"+ar.name+", &primitives_"+ar.name+", &"+localsprefix+", "+paramsprefix+")) {");
2636 output.println("if (transCommit()) {");
2637 /* Transaction aborts if it returns true */
2638 output.println("goto transretry"+faen.getAtomicEnter().getIdentifier()+";");
2640 output.println("} else {");
2641 /* Need to commit local object store */
2642 output.println("while ("+revertptr+") {");
2643 output.println("struct ___Object___ * tmpptr;");
2644 output.println("tmpptr="+revertptr+"->"+nextobjstr+";");
2645 output.println("COMMIT_OBJ("+revertptr+");");
2646 output.println(revertptr+"=tmpptr;");
2647 output.println("}");
2649 output.println("}");
2650 if (state.DELAYCOMP) {
2652 AtomicRecord ar=atomicmethodmap.get(faen.getAtomicEnter());
2653 output.println("else {");
2654 for(Iterator<TempDescriptor> tmpit=ar.liveout.iterator();tmpit.hasNext();) {
2655 TempDescriptor tmp=tmpit.next();
2656 output.println(tmp.getSafeSymbol()+"=primitives_"+ar.name+"."+tmp.getSafeSymbol()+";");
2658 output.println("}");
2662 public void generateFlatSESEEnterNode(FlatMethod fm, LocalityBinding lb, FlatSESEEnterNode fsen, PrintWriter output) {
2664 // SESE nodes can be parsed for normal compilation, just skip over them
2667 output.println(" {");
2668 output.println(" "+fsen.getSESErecordName()+"* seseToIssue = ("+
2669 fsen.getSESErecordName()+"*) mlpAllocSESErecord( sizeof( "+
2670 fsen.getSESErecordName()+" ) );");
2671 output.println(" seseToIssue->classID = "+fsen.getIdentifier()+";");
2673 // give pointers to in-set variables, when this SESE is ready to
2674 // execute it should copy values from the pointers because they
2675 // will be guaranteed to be ready for consumption then
2676 Iterator<TempDescriptor> itr = fsen.getInVarSet().iterator();
2677 while( itr.hasNext() ) {
2678 TempDescriptor temp = itr.next();
2679 output.println(" seseToIssue->"+temp.getSafeSymbol()+
2680 "__srcAddr_ = (INTPTR) &("+paramsprefix+"->"+
2681 temp.getSafeSymbol()+");");
2684 output.println(" workScheduleSubmit( (void*) seseToIssue );");
2685 output.println(" }");
2688 public void generateFlatSESEExitNode(FlatMethod fm, LocalityBinding lb, FlatSESEExitNode fsen, PrintWriter output) {
2690 // SESE nodes can be parsed for normal compilation, just skip over them
2695 private void generateFlatCheckNode(FlatMethod fm, LocalityBinding lb, FlatCheckNode fcn, PrintWriter output) {
2696 if (state.CONSCHECK) {
2697 String specname=fcn.getSpec();
2698 String varname="repairstate___";
2699 output.println("{");
2700 output.println("struct "+specname+"_state * "+varname+"=allocate"+specname+"_state();");
2702 TempDescriptor[] temps=fcn.getTemps();
2703 String[] vars=fcn.getVars();
2704 for(int i=0; i<temps.length; i++) {
2705 output.println(varname+"->"+vars[i]+"=(unsigned int)"+generateTemp(fm, temps[i],lb)+";");
2708 output.println("if (doanalysis"+specname+"("+varname+")) {");
2709 output.println("free"+specname+"_state("+varname+");");
2710 output.println("} else {");
2711 output.println("/* Bad invariant */");
2712 output.println("free"+specname+"_state("+varname+");");
2713 output.println("abort_task();");
2714 output.println("}");
2715 output.println("}");
2719 private void generateFlatCall(FlatMethod fm, LocalityBinding lb, FlatCall fc, PrintWriter output) {
2720 MethodDescriptor md=fc.getMethod();
2721 ParamsObject objectparams=(ParamsObject)paramstable.get(lb!=null ? locality.getBinding(lb, fc) : md);
2722 ClassDescriptor cn=md.getClassDesc();
2723 output.println("{");
2724 if (GENERATEPRECISEGC) {
2726 LocalityBinding fclb=locality.getBinding(lb, fc);
2727 output.print(" struct "+cn.getSafeSymbol()+fclb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
2729 output.print(" struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
2731 output.print(objectparams.numPointers());
2732 output.print(", "+localsprefixaddr);
2733 if (md.getThis()!=null) {
2735 output.print("(struct "+md.getThis().getType().getSafeSymbol() +" *)"+ generateTemp(fm,fc.getThis(),lb));
2737 if (fc.getThis()!=null&&md.getThis()==null) {
2738 System.out.println("WARNING!!!!!!!!!!!!");
2739 System.out.println("Source code calls static method "+md+" on an object in "+fm.getMethod()+"!");
2743 for(int i=0; i<fc.numArgs(); i++) {
2744 Descriptor var=md.getParameter(i);
2745 TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
2746 if (objectparams.isParamPtr(paramtemp)) {
2747 TempDescriptor targ=fc.getArg(i);
2749 TypeDescriptor td=md.getParamType(i);
2751 output.print("(struct "+(new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol() +" *)"+generateTemp(fm, targ,lb));
2753 output.print("(struct "+md.getParamType(i).getSafeSymbol() +" *)"+generateTemp(fm, targ,lb));
2756 output.println("};");
2761 if (fc.getReturnTemp()!=null)
2762 output.print(generateTemp(fm,fc.getReturnTemp(),lb)+"=");
2764 /* Do we need to do virtual dispatch? */
2765 if (md.isStatic()||md.getReturnType()==null||singleCall(fc.getThis().getType().getClassDesc(),md)) {
2768 LocalityBinding fclb=locality.getBinding(lb, fc);
2769 output.print(cn.getSafeSymbol()+fclb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
2771 output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
2776 if (md.getReturnType().isClass()||md.getReturnType().isArray())
2777 output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
2779 output.print(md.getReturnType().getSafeSymbol()+" ");
2780 output.print("(*)(");
2782 boolean printcomma=false;
2783 if (GENERATEPRECISEGC) {
2785 LocalityBinding fclb=locality.getBinding(lb, fc);
2786 output.print("struct "+cn.getSafeSymbol()+fclb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * ");
2788 output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * ");
2792 for(int i=0; i<objectparams.numPrimitives(); i++) {
2793 TempDescriptor temp=objectparams.getPrimitive(i);
2797 if (temp.getType().isClass()||temp.getType().isArray())
2798 output.print("struct " + temp.getType().getSafeSymbol()+" * ");
2800 output.print(temp.getType().getSafeSymbol());
2805 LocalityBinding fclb=locality.getBinding(lb, fc);
2806 output.print("))virtualtable["+generateTemp(fm,fc.getThis(),lb)+"->type*"+maxcount+"+"+virtualcalls.getLocalityNumber(fclb)+"])");
2808 output.print("))virtualtable["+generateTemp(fm,fc.getThis(),lb)+"->type*"+maxcount+"+"+virtualcalls.getMethodNumber(md)+"])");
2812 boolean needcomma=false;
2813 if (GENERATEPRECISEGC) {
2814 output.print("&__parameterlist__");
2818 if (!GENERATEPRECISEGC) {
2819 if (fc.getThis()!=null) {
2820 TypeDescriptor ptd=md.getThis().getType();
2823 if (ptd.isClass()&&!ptd.isArray())
2824 output.print("(struct "+ptd.getSafeSymbol()+" *) ");
2825 output.print(generateTemp(fm,fc.getThis(),lb));
2830 for(int i=0; i<fc.numArgs(); i++) {
2831 Descriptor var=md.getParameter(i);
2832 TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
2833 if (objectparams.isParamPrim(paramtemp)) {
2834 TempDescriptor targ=fc.getArg(i);
2838 TypeDescriptor ptd=md.getParamType(i);
2839 if (ptd.isClass()&&!ptd.isArray())
2840 output.print("(struct "+ptd.getSafeSymbol()+" *) ");
2841 output.print(generateTemp(fm, targ,lb));
2845 output.println(");");
2846 output.println(" }");
2849 private boolean singleCall(ClassDescriptor thiscd, MethodDescriptor md) {
2850 Set subclasses=typeutil.getSubClasses(thiscd);
2851 if (subclasses==null)
2853 for(Iterator classit=subclasses.iterator(); classit.hasNext();) {
2854 ClassDescriptor cd=(ClassDescriptor)classit.next();
2855 Set possiblematches=cd.getMethodTable().getSet(md.getSymbol());
2856 for(Iterator matchit=possiblematches.iterator(); matchit.hasNext();) {
2857 MethodDescriptor matchmd=(MethodDescriptor)matchit.next();
2858 if (md.matches(matchmd))
2865 private void generateFlatFieldNode(FlatMethod fm, LocalityBinding lb, FlatFieldNode ffn, PrintWriter output) {
2866 if (state.SINGLETM) {
2867 //single machine transactional memory case
2868 String field=ffn.getField().getSafeSymbol();
2869 String src=generateTemp(fm, ffn.getSrc(),lb);
2870 String dst=generateTemp(fm, ffn.getDst(),lb);
2872 output.println(dst+"="+ src +"->"+field+ ";");
2873 if (ffn.getField().getType().isPtr()&&locality.getAtomic(lb).get(ffn).intValue()>0&&
2874 locality.getNodePreTempInfo(lb, ffn).get(ffn.getSrc())!=LocalityAnalysis.SCRATCH) {
2875 if ((dc==null)||(!state.READSET&&dc.getNeedTrans(lb, ffn))||
2876 (state.READSET&&dc.getNeedWriteTrans(lb, ffn))) {
2877 output.println("TRANSREAD("+dst+", "+dst+", (void *) (" + localsprefixaddr + "));");
2878 } else if (state.READSET&&dc.getNeedTrans(lb, ffn)) {
2879 output.println("TRANSREADRD("+dst+", "+dst+");");
2882 } else if (state.DSM) {
2883 Integer status=locality.getNodePreTempInfo(lb,ffn).get(ffn.getSrc());
2884 if (status==LocalityAnalysis.GLOBAL) {
2885 String field=ffn.getField().getSafeSymbol();
2886 String src=generateTemp(fm, ffn.getSrc(),lb);
2887 String dst=generateTemp(fm, ffn.getDst(),lb);
2889 if (ffn.getField().getType().isPtr()) {
2891 //TODO: Uncomment this when we have runtime support
2892 //if (ffn.getSrc()==ffn.getDst()) {
2893 //output.println("{");
2894 //output.println("void * temp="+src+";");
2895 //output.println("if (temp&0x1) {");
2896 //output.println("temp=(void *) transRead(trans, (unsigned int) temp);");
2897 //output.println(src+"->"+field+"="+temp+";");
2898 //output.println("}");
2899 //output.println(dst+"=temp;");
2900 //output.println("}");
2902 output.println(dst+"="+ src +"->"+field+ ";");
2903 //output.println("if ("+dst+"&0x1) {");
2904 output.println("TRANSREAD("+dst+", (unsigned int) "+dst+");");
2905 //output.println(src+"->"+field+"="+src+"->"+field+";");
2906 //output.println("}");
2909 output.println(dst+"="+ src+"->"+field+";");
2911 } else if (status==LocalityAnalysis.LOCAL) {
2912 if (ffn.getField().getType().isPtr()&&
2913 ffn.getField().isGlobal()) {
2914 String field=ffn.getField().getSafeSymbol();
2915 String src=generateTemp(fm, ffn.getSrc(),lb);
2916 String dst=generateTemp(fm, ffn.getDst(),lb);
2917 output.println(dst+"="+ src +"->"+field+ ";");
2918 if (locality.getAtomic(lb).get(ffn).intValue()>0)
2919 output.println("TRANSREAD("+dst+", (unsigned int) "+dst+");");
2921 output.println(generateTemp(fm, ffn.getDst(),lb)+"="+ generateTemp(fm,ffn.getSrc(),lb)+"->"+ ffn.getField().getSafeSymbol()+";");
2922 } else if (status==LocalityAnalysis.EITHER) {
2923 //Code is reading from a null pointer
2924 output.println("if ("+generateTemp(fm, ffn.getSrc(),lb)+") {");
2925 output.println("#ifndef RAW");
2926 output.println("printf(\"BIG ERROR\\n\");exit(-1);}");
2927 output.println("#endif");
2928 //This should throw a suitable null pointer error
2929 output.println(generateTemp(fm, ffn.getDst(),lb)+"="+ generateTemp(fm,ffn.getSrc(),lb)+"->"+ ffn.getField().getSafeSymbol()+";");
2931 throw new Error("Read from non-global/non-local in:"+lb.getExplanation());
2933 output.println(generateTemp(fm, ffn.getDst(),lb)+"="+ generateTemp(fm,ffn.getSrc(),lb)+"->"+ ffn.getField().getSafeSymbol()+";");
2937 private void generateFlatSetFieldNode(FlatMethod fm, LocalityBinding lb, FlatSetFieldNode fsfn, PrintWriter output) {
2938 if (fsfn.getField().getSymbol().equals("length")&&fsfn.getDst().getType().isArray())
2939 throw new Error("Can't set array length");
2940 if (state.SINGLETM && locality.getAtomic(lb).get(fsfn).intValue()>0) {
2941 //Single Machine Transaction Case
2942 boolean srcptr=fsfn.getSrc().getType().isPtr();
2943 String src=generateTemp(fm,fsfn.getSrc(),lb);
2944 String dst=generateTemp(fm,fsfn.getDst(),lb);
2945 output.println("//"+srcptr+" "+fsfn.getSrc().getType().isNull());
2946 if (srcptr&&!fsfn.getSrc().getType().isNull()) {
2947 output.println("{");
2948 if ((dc==null)||dc.getNeedSrcTrans(lb, fsfn)&&
2949 locality.getNodePreTempInfo(lb, fsfn).get(fsfn.getSrc())!=LocalityAnalysis.SCRATCH) {
2950 output.println("INTPTR srcoid=("+src+"!=NULL?((INTPTR)"+src+"->"+oidstr+"):0);");
2952 output.println("INTPTR srcoid=(INTPTR)"+src+";");
2955 if (wb.needBarrier(fsfn)&&
2956 locality.getNodePreTempInfo(lb, fsfn).get(fsfn.getDst())!=LocalityAnalysis.SCRATCH) {
2957 output.println("*((unsigned int *)&("+dst+"->___objstatus___))|=DIRTY;");
2959 if (srcptr&!fsfn.getSrc().getType().isNull()) {
2960 output.println("*((unsigned INTPTR *)&("+dst+"->"+ fsfn.getField().getSafeSymbol()+"))=srcoid;");
2961 output.println("}");
2963 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
2965 } else if (state.DSM && locality.getAtomic(lb).get(fsfn).intValue()>0) {
2966 Integer statussrc=locality.getNodePreTempInfo(lb,fsfn).get(fsfn.getSrc());
2967 Integer statusdst=locality.getNodeTempInfo(lb).get(fsfn).get(fsfn.getDst());
2968 boolean srcglobal=statussrc==LocalityAnalysis.GLOBAL;
2970 String src=generateTemp(fm,fsfn.getSrc(),lb);
2971 String dst=generateTemp(fm,fsfn.getDst(),lb);
2973 output.println("{");
2974 output.println("INTPTR srcoid=("+src+"!=NULL?((INTPTR)"+src+"->"+oidstr+"):0);");
2976 if (statusdst.equals(LocalityAnalysis.GLOBAL)) {
2979 if (wb.needBarrier(fsfn))
2980 output.println("*((unsigned int *)&("+dst+"->___localcopy___))|=DIRTY;");
2982 output.println("*((unsigned INTPTR *)&("+glbdst+"->"+ fsfn.getField().getSafeSymbol()+"))=srcoid;");
2984 output.println(glbdst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
2985 } else if (statusdst.equals(LocalityAnalysis.LOCAL)) {
2986 /** Check if we need to copy */
2987 output.println("if(!"+dst+"->"+localcopystr+") {");
2988 /* Link object into list */
2989 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
2990 output.println(revertptr+"=revertlist;");
2991 if (GENERATEPRECISEGC)
2992 output.println("COPY_OBJ((struct garbagelist *)"+localsprefixaddr+",(struct ___Object___ *)"+dst+");");
2994 output.println("COPY_OBJ("+dst+");");
2995 output.println(dst+"->"+nextobjstr+"="+revertptr+";");
2996 output.println("revertlist=(struct ___Object___ *)"+dst+";");
2997 output.println("}");
2999 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"=(void *) srcoid;");
3001 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
3002 } else if (statusdst.equals(LocalityAnalysis.EITHER)) {
3003 //writing to a null...bad
3004 output.println("if ("+dst+") {");
3005 output.println("printf(\"BIG ERROR 2\\n\");exit(-1);}");
3007 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"=(void *) srcoid;");
3009 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
3012 output.println("}");
3015 if (state.FASTCHECK) {
3016 String dst=generateTemp(fm, fsfn.getDst(),lb);
3017 output.println("if(!"+dst+"->"+localcopystr+") {");
3018 /* Link object into list */
3019 if (GENERATEPRECISEGC)
3020 output.println("COPY_OBJ((struct garbagelist *)"+localsprefixaddr+",(struct ___Object___ *)"+dst+");");
3022 output.println("COPY_OBJ("+dst+");");
3023 output.println(dst+"->"+nextobjstr+"="+fcrevert+";");
3024 output.println(fcrevert+"=(struct ___Object___ *)"+dst+";");
3025 output.println("}");
3027 output.println(generateTemp(fm, fsfn.getDst(),lb)+"->"+ fsfn.getField().getSafeSymbol()+"="+ generateTemp(fm,fsfn.getSrc(),lb)+";");
3031 private void generateFlatElementNode(FlatMethod fm, LocalityBinding lb, FlatElementNode fen, PrintWriter output) {
3032 TypeDescriptor elementtype=fen.getSrc().getType().dereference();
3035 if (elementtype.isArray()||elementtype.isClass())
3038 type=elementtype.getSafeSymbol()+" ";
3040 if (this.state.ARRAYBOUNDARYCHECK && fen.needsBoundsCheck()) {
3041 output.println("if ("+generateTemp(fm, fen.getIndex(),lb)+"< 0 | "+generateTemp(fm, fen.getIndex(),lb)+" >= "+generateTemp(fm,fen.getSrc(),lb) + "->___length___)");
3042 output.println("failedboundschk();");
3044 if (state.SINGLETM) {
3045 //Single machine transaction case
3046 String dst=generateTemp(fm, fen.getDst(),lb);
3047 output.println(dst +"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
3049 if (elementtype.isPtr()&&locality.getAtomic(lb).get(fen).intValue()>0&&
3050 locality.getNodePreTempInfo(lb, fen).get(fen.getSrc())!=LocalityAnalysis.SCRATCH) {
3051 if ((dc==null)||!state.READSET&&dc.getNeedTrans(lb, fen)||state.READSET&&dc.getNeedWriteTrans(lb, fen)) {
3052 output.println("TRANSREAD("+dst+", "+dst+", (void *)(" + localsprefixaddr+"));");
3053 } else if (state.READSET&&dc.getNeedTrans(lb, fen)) {
3054 output.println("TRANSREADRD("+dst+", "+dst+");");
3057 } else if (state.DSM) {
3058 Integer status=locality.getNodePreTempInfo(lb,fen).get(fen.getSrc());
3059 if (status==LocalityAnalysis.GLOBAL) {
3060 String dst=generateTemp(fm, fen.getDst(),lb);
3062 if (elementtype.isPtr()) {
3063 output.println(dst +"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
3064 output.println("TRANSREAD("+dst+", "+dst+");");
3066 output.println(dst +"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
3068 } else if (status==LocalityAnalysis.LOCAL) {
3069 output.println(generateTemp(fm, fen.getDst(),lb)+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
3070 } else if (status==LocalityAnalysis.EITHER) {
3071 //Code is reading from a null pointer
3072 output.println("if ("+generateTemp(fm, fen.getSrc(),lb)+") {");
3073 output.println("#ifndef RAW");
3074 output.println("printf(\"BIG ERROR\\n\");exit(-1);}");
3075 output.println("#endif");
3076 //This should throw a suitable null pointer error
3077 output.println(generateTemp(fm, fen.getDst(),lb)+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
3079 throw new Error("Read from non-global/non-local in:"+lb.getExplanation());
3081 output.println(generateTemp(fm, fen.getDst(),lb)+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
3085 private void generateFlatSetElementNode(FlatMethod fm, LocalityBinding lb, FlatSetElementNode fsen, PrintWriter output) {
3086 //TODO: need dynamic check to make sure this assignment is actually legal
3087 //Because Object[] could actually be something more specific...ie. Integer[]
3089 TypeDescriptor elementtype=fsen.getDst().getType().dereference();
3092 if (elementtype.isArray()||elementtype.isClass())
3095 type=elementtype.getSafeSymbol()+" ";
3097 if (this.state.ARRAYBOUNDARYCHECK && fsen.needsBoundsCheck()) {
3098 output.println("if ("+generateTemp(fm, fsen.getIndex(),lb)+"< 0 | "+generateTemp(fm, fsen.getIndex(),lb)+" >= "+generateTemp(fm,fsen.getDst(),lb) + "->___length___)");
3099 output.println("failedboundschk();");
3102 if (state.SINGLETM && locality.getAtomic(lb).get(fsen).intValue()>0) {
3103 //Transaction set element case
3104 if (wb.needBarrier(fsen)&&
3105 locality.getNodePreTempInfo(lb, fsen).get(fsen.getDst())!=LocalityAnalysis.SCRATCH) {
3106 output.println("*((unsigned int *)&("+generateTemp(fm,fsen.getDst(),lb)+"->___objstatus___))|=DIRTY;");
3108 if (fsen.getSrc().getType().isPtr()&&!fsen.getSrc().getType().isNull()) {
3109 output.println("{");
3110 String src=generateTemp(fm, fsen.getSrc(), lb);
3111 if ((dc==null)||dc.getNeedSrcTrans(lb, fsen)&&
3112 locality.getNodePreTempInfo(lb, fsen).get(fsen.getSrc())!=LocalityAnalysis.SCRATCH) {
3113 output.println("INTPTR srcoid=("+src+"!=NULL?((INTPTR)"+src+"->"+oidstr+"):0);");
3115 output.println("INTPTR srcoid=(INTPTR)"+src+";");
3117 output.println("((INTPTR*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]=srcoid;");
3118 output.println("}");
3120 output.println("(("+type +"*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]="+generateTemp(fm,fsen.getSrc(),lb)+";");
3122 } else if (state.DSM && locality.getAtomic(lb).get(fsen).intValue()>0) {
3123 Integer statussrc=locality.getNodePreTempInfo(lb,fsen).get(fsen.getSrc());
3124 Integer statusdst=locality.getNodePreTempInfo(lb,fsen).get(fsen.getDst());
3125 boolean srcglobal=statussrc==LocalityAnalysis.GLOBAL;
3126 boolean dstglobal=statusdst==LocalityAnalysis.GLOBAL;
3127 boolean dstlocal=statusdst==LocalityAnalysis.LOCAL;
3130 if (wb.needBarrier(fsen))
3131 output.println("*((unsigned int *)&("+generateTemp(fm,fsen.getDst(),lb)+"->___localcopy___))|=DIRTY;");
3132 } else if (dstlocal) {
3133 /** Check if we need to copy */
3134 String dst=generateTemp(fm, fsen.getDst(),lb);
3135 output.println("if(!"+dst+"->"+localcopystr+") {");
3136 /* Link object into list */
3137 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
3138 output.println(revertptr+"=revertlist;");
3139 if (GENERATEPRECISEGC)
3140 output.println("COPY_OBJ((struct garbagelist *)"+localsprefixaddr+",(struct ___Object___ *)"+dst+");");
3142 output.println("COPY_OBJ("+dst+");");
3143 output.println(dst+"->"+nextobjstr+"="+revertptr+";");
3144 output.println("revertlist=(struct ___Object___ *)"+dst+";");
3145 output.println("}");
3146 } else throw new Error("Unknown array type");
3148 output.println("{");
3149 String src=generateTemp(fm, fsen.getSrc(), lb);
3150 output.println("INTPTR srcoid=("+src+"!=NULL?((INTPTR)"+src+"->"+oidstr+"):0);");
3151 output.println("((INTPTR*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]=srcoid;");
3152 output.println("}");
3154 output.println("(("+type +"*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]="+generateTemp(fm,fsen.getSrc(),lb)+";");
3157 if (state.FASTCHECK) {
3158 String dst=generateTemp(fm, fsen.getDst(),lb);
3159 output.println("if(!"+dst+"->"+localcopystr+") {");
3160 /* Link object into list */
3161 if (GENERATEPRECISEGC)
3162 output.println("COPY_OBJ((struct garbagelist *)"+localsprefixaddr+",(struct ___Object___ *)"+dst+");");
3164 output.println("COPY_OBJ("+dst+");");
3165 output.println(dst+"->"+nextobjstr+"="+fcrevert+";");
3166 output.println(fcrevert+"=(struct ___Object___ *)"+dst+";");
3167 output.println("}");
3169 output.println("(("+type +"*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]="+generateTemp(fm,fsen.getSrc(),lb)+";");
3173 protected void generateFlatNew(FlatMethod fm, LocalityBinding lb, FlatNew fn, PrintWriter output) {
3174 if (state.DSM && locality.getAtomic(lb).get(fn).intValue()>0&&!fn.isGlobal()) {
3175 //Stash pointer in case of GC
3176 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
3177 output.println(revertptr+"=revertlist;");
3179 if (state.SINGLETM) {
3180 if (fn.getType().isArray()) {
3181 int arrayid=state.getArrayNumber(fn.getType())+state.numClasses();
3182 if (locality.getAtomic(lb).get(fn).intValue()>0) {
3183 //inside transaction
3184 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarraytrans("+localsprefixaddr+", "+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
3186 //outside transaction
3187 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarray("+localsprefixaddr+", "+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
3190 if (locality.getAtomic(lb).get(fn).intValue()>0) {
3191 //inside transaction
3192 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newtrans("+localsprefixaddr+", "+fn.getType().getClassDesc().getId()+");");
3194 //outside transaction
3195 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_new("+localsprefixaddr+", "+fn.getType().getClassDesc().getId()+");");
3198 } else if (fn.getType().isArray()) {
3199 int arrayid=state.getArrayNumber(fn.getType())+state.numClasses();
3200 if (fn.isGlobal()&&(state.DSM||state.SINGLETM)) {
3201 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarrayglobal("+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
3202 } else if (GENERATEPRECISEGC) {
3203 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarray("+localsprefixaddr+", "+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
3205 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarray("+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
3208 if (fn.isGlobal()&&(state.DSM||state.SINGLETM)) {
3209 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newglobal("+fn.getType().getClassDesc().getId()+");");
3210 } else if (GENERATEPRECISEGC) {
3211 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_new("+localsprefixaddr+", "+fn.getType().getClassDesc().getId()+");");
3213 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_new("+fn.getType().getClassDesc().getId()+");");
3216 if (state.DSM && locality.getAtomic(lb).get(fn).intValue()>0&&!fn.isGlobal()) {
3217 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
3218 String dst=generateTemp(fm,fn.getDst(),lb);
3219 output.println(dst+"->___localcopy___=(struct ___Object___*)1;");
3220 output.println(dst+"->"+nextobjstr+"="+revertptr+";");
3221 output.println("revertlist=(struct ___Object___ *)"+dst+";");
3223 if (state.FASTCHECK) {
3224 String dst=generateTemp(fm,fn.getDst(),lb);
3225 output.println(dst+"->___localcopy___=(struct ___Object___*)1;");
3226 output.println(dst+"->"+nextobjstr+"="+fcrevert+";");
3227 output.println(fcrevert+"=(struct ___Object___ *)"+dst+";");
3231 private void generateFlatTagDeclaration(FlatMethod fm, LocalityBinding lb, FlatTagDeclaration fn, PrintWriter output) {
3232 if (GENERATEPRECISEGC) {
3233 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_tag("+localsprefixaddr+", "+state.getTagId(fn.getType())+");");
3235 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_tag("+state.getTagId(fn.getType())+");");
3239 private void generateFlatOpNode(FlatMethod fm, LocalityBinding lb, FlatOpNode fon, PrintWriter output) {
3240 if (fon.getRight()!=null) {
3241 if (fon.getOp().getOp()==Operation.URIGHTSHIFT) {
3242 if (fon.getLeft().getType().isLong())
3243 output.println(generateTemp(fm, fon.getDest(),lb)+" = ((unsigned long long)"+generateTemp(fm, fon.getLeft(),lb)+")>>"+generateTemp(fm,fon.getRight(),lb)+";");
3245 output.println(generateTemp(fm, fon.getDest(),lb)+" = ((unsigned int)"+generateTemp(fm, fon.getLeft(),lb)+")>>"+generateTemp(fm,fon.getRight(),lb)+";");
3247 } else if (dc!=null) {
3248 output.print(generateTemp(fm, fon.getDest(),lb)+" = ");
3249 if (dc.getNeedLeftSrcTrans(lb, fon))
3250 output.print("("+generateTemp(fm, fon.getLeft(),lb)+"!=NULL?"+generateTemp(fm, fon.getLeft(),lb)+"->"+oidstr+":NULL)");
3252 output.print(generateTemp(fm, fon.getLeft(),lb));
3253 output.print(fon.getOp().toString());
3254 if (dc.getNeedRightSrcTrans(lb, fon))
3255 output.println("("+generateTemp(fm, fon.getRight(),lb)+"!=NULL?"+generateTemp(fm, fon.getRight(),lb)+"->"+oidstr+":NULL);");
3257 output.println(generateTemp(fm,fon.getRight(),lb)+";");
3259 output.println(generateTemp(fm, fon.getDest(),lb)+" = "+generateTemp(fm, fon.getLeft(),lb)+fon.getOp().toString()+generateTemp(fm,fon.getRight(),lb)+";");
3260 } else if (fon.getOp().getOp()==Operation.ASSIGN)
3261 output.println(generateTemp(fm, fon.getDest(),lb)+" = "+generateTemp(fm, fon.getLeft(),lb)+";");
3262 else if (fon.getOp().getOp()==Operation.UNARYPLUS)
3263 output.println(generateTemp(fm, fon.getDest(),lb)+" = "+generateTemp(fm, fon.getLeft(),lb)+";");
3264 else if (fon.getOp().getOp()==Operation.UNARYMINUS)
3265 output.println(generateTemp(fm, fon.getDest(),lb)+" = -"+generateTemp(fm, fon.getLeft(),lb)+";");
3266 else if (fon.getOp().getOp()==Operation.LOGIC_NOT)
3267 output.println(generateTemp(fm, fon.getDest(),lb)+" = !"+generateTemp(fm, fon.getLeft(),lb)+";");
3268 else if (fon.getOp().getOp()==Operation.COMP)
3269 output.println(generateTemp(fm, fon.getDest(),lb)+" = ~"+generateTemp(fm, fon.getLeft(),lb)+";");
3270 else if (fon.getOp().getOp()==Operation.ISAVAILABLE) {
3271 output.println(generateTemp(fm, fon.getDest(),lb)+" = "+generateTemp(fm, fon.getLeft(),lb)+"->fses==NULL;");
3273 output.println(generateTemp(fm, fon.getDest(),lb)+fon.getOp().toString()+generateTemp(fm, fon.getLeft(),lb)+";");
3276 private void generateFlatCastNode(FlatMethod fm, LocalityBinding lb, FlatCastNode fcn, PrintWriter output) {
3277 /* TODO: Do type check here */
3278 if (fcn.getType().isArray()) {
3279 output.println(generateTemp(fm,fcn.getDst(),lb)+"=(struct ArrayObject *)"+generateTemp(fm,fcn.getSrc(),lb)+";");
3280 } else if (fcn.getType().isClass())
3281 output.println(generateTemp(fm,fcn.getDst(),lb)+"=(struct "+fcn.getType().getSafeSymbol()+" *)"+generateTemp(fm,fcn.getSrc(),lb)+";");
3283 output.println(generateTemp(fm,fcn.getDst(),lb)+"=("+fcn.getType().getSafeSymbol()+")"+generateTemp(fm,fcn.getSrc(),lb)+";");
3286 private void generateFlatLiteralNode(FlatMethod fm, LocalityBinding lb, FlatLiteralNode fln, PrintWriter output) {
3287 if (fln.getValue()==null)
3288 output.println(generateTemp(fm, fln.getDst(),lb)+"=0;");
3289 else if (fln.getType().getSymbol().equals(TypeUtil.StringClass)) {
3290 if (GENERATEPRECISEGC) {
3291 if (state.DSM && locality.getAtomic(lb).get(fln).intValue()>0) {
3292 //Stash pointer in case of GC
3293 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
3294 output.println(revertptr+"=revertlist;");
3296 output.println(generateTemp(fm, fln.getDst(),lb)+"=NewString("+localsprefixaddr+", \""+FlatLiteralNode.escapeString((String)fln.getValue())+"\","+((String)fln.getValue()).length()+");");
3297 if (state.DSM && locality.getAtomic(lb).get(fln).intValue()>0) {
3298 //Stash pointer in case of GC
3299 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
3300 output.println("revertlist="+revertptr+";");
3303 output.println(generateTemp(fm, fln.getDst(),lb)+"=NewString(\""+FlatLiteralNode.escapeString((String)fln.getValue())+"\","+((String)fln.getValue()).length()+");");
3305 } else if (fln.getType().isBoolean()) {
3306 if (((Boolean)fln.getValue()).booleanValue())
3307 output.println(generateTemp(fm, fln.getDst(),lb)+"=1;");
3309 output.println(generateTemp(fm, fln.getDst(),lb)+"=0;");
3310 } else if (fln.getType().isChar()) {
3311 String st=FlatLiteralNode.escapeString(fln.getValue().toString());
3312 output.println(generateTemp(fm, fln.getDst(),lb)+"='"+st+"';");
3313 } else if (fln.getType().isLong()) {
3314 output.println(generateTemp(fm, fln.getDst(),lb)+"="+fln.getValue()+"LL;");
3316 output.println(generateTemp(fm, fln.getDst(),lb)+"="+fln.getValue()+";");
3319 protected void generateFlatReturnNode(FlatMethod fm, LocalityBinding lb, FlatReturnNode frn, PrintWriter output) {
3320 if (frn.getReturnTemp()!=null) {
3321 if (frn.getReturnTemp().getType().isPtr())
3322 output.println("return (struct "+fm.getMethod().getReturnType().getSafeSymbol()+"*)"+generateTemp(fm, frn.getReturnTemp(), lb)+";");
3324 output.println("return "+generateTemp(fm, frn.getReturnTemp(), lb)+";");
3326 output.println("return;");
3330 protected void generateStoreFlatCondBranch(FlatMethod fm, LocalityBinding lb, FlatCondBranch fcb, String label, PrintWriter output) {
3331 output.println("STOREANDBRANCH(!"+generateTemp(fm, fcb.getTest(),lb)+", "+label+");");
3334 protected void generateFlatCondBranch(FlatMethod fm, LocalityBinding lb, FlatCondBranch fcb, String label, PrintWriter output) {
3335 output.println("if (!"+generateTemp(fm, fcb.getTest(),lb)+") goto "+label+";");
3338 /** This method generates header information for the method or
3339 * task referenced by the Descriptor des. */
3340 private void generateHeader(FlatMethod fm, LocalityBinding lb, Descriptor des, PrintWriter output) {
3341 generateHeader(fm, lb, des, output, false);
3344 private void generateHeader(FlatMethod fm, LocalityBinding lb, Descriptor des, PrintWriter output, boolean addSESErecord) {
3346 ParamsObject objectparams=(ParamsObject)paramstable.get(lb!=null ? lb : des);
3347 MethodDescriptor md=null;
3348 TaskDescriptor task=null;
3349 if (des instanceof MethodDescriptor)
3350 md=(MethodDescriptor) des;
3352 task=(TaskDescriptor) des;
3354 ClassDescriptor cn=md!=null ? md.getClassDesc() : null;
3356 if (md!=null&&md.getReturnType()!=null) {
3357 if (md.getReturnType().isClass()||md.getReturnType().isArray())
3358 output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
3360 output.print(md.getReturnType().getSafeSymbol()+" ");
3362 //catch the constructor case
3363 output.print("void ");
3365 if (state.DSM||state.SINGLETM) {
3366 output.print(cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
3368 output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
3370 output.print(task.getSafeSymbol()+"(");
3373 if (addSESErecord) {
3374 output.print("SESErecord* currentSESE, ");
3378 boolean printcomma=false;
3379 if (GENERATEPRECISEGC) {
3381 if (state.DSM||state.SINGLETM) {
3382 output.print("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
3384 output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
3386 output.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
3392 for(int i=0; i<objectparams.numPrimitives(); i++) {
3393 TempDescriptor temp=objectparams.getPrimitive(i);
3397 if (temp.getType().isClass()||temp.getType().isArray())
3398 output.print("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
3400 output.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
3402 output.println(") {");
3403 } else if (!GENERATEPRECISEGC) {
3404 /* Imprecise Task */
3405 output.println("void * parameterarray[]) {");
3406 /* Unpack variables */
3407 for(int i=0; i<objectparams.numPrimitives(); i++) {
3408 TempDescriptor temp=objectparams.getPrimitive(i);
3409 output.println("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+"=parameterarray["+i+"];");
3411 for(int i=0; i<fm.numTags(); i++) {
3412 TempDescriptor temp=fm.getTag(i);
3413 int offset=i+objectparams.numPrimitives();
3414 output.println("struct ___TagDescriptor___ * "+temp.getSafeSymbol()+"=parameterarray["+offset+"];");
3417 if ((objectparams.numPrimitives()+fm.numTags())>maxtaskparams)
3418 maxtaskparams=objectparams.numPrimitives()+fm.numTags();
3419 } else output.println(") {");
3422 public void generateFlatFlagActionNode(FlatMethod fm, LocalityBinding lb, FlatFlagActionNode ffan, PrintWriter output) {
3423 output.println("/* FlatFlagActionNode */");
3426 /* Process tag changes */
3427 Relation tagsettable=new Relation();
3428 Relation tagcleartable=new Relation();
3430 Iterator tagsit=ffan.getTempTagPairs();
3431 while (tagsit.hasNext()) {
3432 TempTagPair ttp=(TempTagPair) tagsit.next();
3433 TempDescriptor objtmp=ttp.getTemp();
3434 TagDescriptor tag=ttp.getTag();
3435 TempDescriptor tagtmp=ttp.getTagTemp();
3436 boolean tagstatus=ffan.getTagChange(ttp);
3438 tagsettable.put(objtmp, tagtmp);
3440 tagcleartable.put(objtmp, tagtmp);
3445 Hashtable flagandtable=new Hashtable();
3446 Hashtable flagortable=new Hashtable();
3448 /* Process flag changes */
3449 Iterator flagsit=ffan.getTempFlagPairs();
3450 while(flagsit.hasNext()) {
3451 TempFlagPair tfp=(TempFlagPair)flagsit.next();
3452 TempDescriptor temp=tfp.getTemp();
3453 Hashtable flagtable=(Hashtable)flagorder.get(temp.getType().getClassDesc());
3454 FlagDescriptor flag=tfp.getFlag();
3456 //Newly allocate objects that don't set any flags case
3457 if (flagortable.containsKey(temp)) {
3461 flagortable.put(temp,new Integer(mask));
3463 int flagid=1<<((Integer)flagtable.get(flag)).intValue();
3464 boolean flagstatus=ffan.getFlagChange(tfp);
3467 if (flagortable.containsKey(temp)) {
3468 mask=((Integer)flagortable.get(temp)).intValue();
3471 flagortable.put(temp,new Integer(mask));
3473 int mask=0xFFFFFFFF;
3474 if (flagandtable.containsKey(temp)) {
3475 mask=((Integer)flagandtable.get(temp)).intValue();
3477 mask&=(0xFFFFFFFF^flagid);
3478 flagandtable.put(temp,new Integer(mask));
3484 HashSet flagtagset=new HashSet();
3485 flagtagset.addAll(flagortable.keySet());
3486 flagtagset.addAll(flagandtable.keySet());
3487 flagtagset.addAll(tagsettable.keySet());
3488 flagtagset.addAll(tagcleartable.keySet());
3490 Iterator ftit=flagtagset.iterator();
3491 while(ftit.hasNext()) {
3492 TempDescriptor temp=(TempDescriptor)ftit.next();
3495 Set tagtmps=tagcleartable.get(temp);
3496 if (tagtmps!=null) {
3497 Iterator tagit=tagtmps.iterator();
3498 while(tagit.hasNext()) {
3499 TempDescriptor tagtmp=(TempDescriptor)tagit.next();
3500 if (GENERATEPRECISEGC)
3501 output.println("tagclear("+localsprefixaddr+", (struct ___Object___ *)"+generateTemp(fm, temp,lb)+", "+generateTemp(fm,tagtmp,lb)+");");
3503 output.println("tagclear((struct ___Object___ *)"+generateTemp(fm, temp,lb)+", "+generateTemp(fm,tagtmp,lb)+");");
3507 tagtmps=tagsettable.get(temp);
3508 if (tagtmps!=null) {
3509 Iterator tagit=tagtmps.iterator();
3510 while(tagit.hasNext()) {
3511 TempDescriptor tagtmp=(TempDescriptor)tagit.next();
3512 if (GENERATEPRECISEGC)
3513 output.println("tagset("+localsprefixaddr+", (struct ___Object___ *)"+generateTemp(fm, temp,lb)+", "+generateTemp(fm,tagtmp,lb)+");");
3515 output.println("tagset((struct ___Object___ *)"+generateTemp(fm, temp, lb)+", "+generateTemp(fm,tagtmp, lb)+");");
3520 int andmask=0xFFFFFFF;
3522 if (flagortable.containsKey(temp))
3523 ormask=((Integer)flagortable.get(temp)).intValue();
3524 if (flagandtable.containsKey(temp))
3525 andmask=((Integer)flagandtable.get(temp)).intValue();
3526 generateFlagOrAnd(ffan, fm, lb, temp, output, ormask, andmask);
3527 generateObjectDistribute(ffan, fm, lb, temp, output);
3531 protected void generateFlagOrAnd(FlatFlagActionNode ffan, FlatMethod fm, LocalityBinding lb, TempDescriptor temp,
3532 PrintWriter output, int ormask, int andmask) {
3533 if (ffan.getTaskType()==FlatFlagActionNode.NEWOBJECT) {
3534 output.println("flagorandinit("+generateTemp(fm, temp, lb)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
3536 output.println("flagorand("+generateTemp(fm, temp, lb)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
3540 protected void generateObjectDistribute(FlatFlagActionNode ffan, FlatMethod fm, LocalityBinding lb, TempDescriptor temp, PrintWriter output) {
3541 output.println("enqueueObject("+generateTemp(fm, temp, lb)+");");
3544 void generateOptionalHeader(PrintWriter headers) {
3547 headers.println("#include \"task.h\"\n\n");
3548 headers.println("#ifndef _OPTIONAL_STRUCT_");
3549 headers.println("#define _OPTIONAL_STRUCT_");
3551 //STRUCT PREDICATEMEMBER
3552 headers.println("struct predicatemember{");
3553 headers.println("int type;");
3554 headers.println("int numdnfterms;");
3555 headers.println("int * flags;");
3556 headers.println("int numtags;");
3557 headers.println("int * tags;\n};\n\n");
3559 //STRUCT OPTIONALTASKDESCRIPTOR
3560 headers.println("struct optionaltaskdescriptor{");
3561 headers.println("struct taskdescriptor * task;");
3562 headers.println("int index;");
3563 headers.println("int numenterflags;");
3564 headers.println("int * enterflags;");
3565 headers.println("int numpredicatemembers;");
3566 headers.println("struct predicatemember ** predicatememberarray;");
3567 headers.println("};\n\n");
3569 //STRUCT TASKFAILURE
3570 headers.println("struct taskfailure {");
3571 headers.println("struct taskdescriptor * task;");
3572 headers.println("int index;");
3573 headers.println("int numoptionaltaskdescriptors;");
3574 headers.println("struct optionaltaskdescriptor ** optionaltaskdescriptorarray;\n};\n\n");
3576 //STRUCT FSANALYSISWRAPPER
3577 headers.println("struct fsanalysiswrapper{");
3578 headers.println("int flags;");
3579 headers.println("int numtags;");
3580 headers.println("int * tags;");
3581 headers.println("int numtaskfailures;");
3582 headers.println("struct taskfailure ** taskfailurearray;");
3583 headers.println("int numoptionaltaskdescriptors;");
3584 headers.println("struct optionaltaskdescriptor ** optionaltaskdescriptorarray;\n};\n\n");
3586 //STRUCT CLASSANALYSISWRAPPER
3587 headers.println("struct classanalysiswrapper{");
3588 headers.println("int type;");
3589 headers.println("int numotd;");
3590 headers.println("struct optionaltaskdescriptor ** otdarray;");
3591 headers.println("int numfsanalysiswrappers;");
3592 headers.println("struct fsanalysiswrapper ** fsanalysiswrapperarray;\n};");
3594 headers.println("extern struct classanalysiswrapper * classanalysiswrapperarray[];");
3596 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
3597 while(taskit.hasNext()) {
3598 TaskDescriptor td=(TaskDescriptor)taskit.next();
3599 headers.println("extern struct taskdescriptor task_"+td.getSafeSymbol()+";");
3604 //CHECK OVER THIS -- THERE COULD BE SOME ERRORS HERE
3605 int generateOptionalPredicate(Predicate predicate, OptionalTaskDescriptor otd, ClassDescriptor cdtemp, PrintWriter output) {
3606 int predicateindex = 0;
3607 //iterate through the classes concerned by the predicate
3608 Set c_vard = predicate.vardescriptors;
3609 Hashtable<TempDescriptor, Integer> slotnumber=new Hashtable<TempDescriptor, Integer>();
3612 for(Iterator vard_it = c_vard.iterator(); vard_it.hasNext();) {
3613 VarDescriptor vard = (VarDescriptor)vard_it.next();
3614 TypeDescriptor typed = vard.getType();
3616 //generate for flags
3617 HashSet fen_hashset = predicate.flags.get(vard.getSymbol());
3618 output.println("int predicateflags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
3620 if (fen_hashset!=null) {
3621 for (Iterator fen_it = fen_hashset.iterator(); fen_it.hasNext();) {
3622 FlagExpressionNode fen = (FlagExpressionNode)fen_it.next();
3624 DNFFlag dflag=fen.getDNF();
3625 numberterms+=dflag.size();
3627 Hashtable flags=(Hashtable)flagorder.get(typed.getClassDesc());
3629 for(int j=0; j<dflag.size(); j++) {
3631 output.println(",");
3632 Vector term=dflag.get(j);
3635 for(int k=0; k<term.size(); k++) {
3636 DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
3637 FlagDescriptor fd=dfa.getFlag();
3638 boolean negated=dfa.getNegated();
3639 int flagid=1<<((Integer)flags.get(fd)).intValue();
3644 output.print("/*andmask*/0x"+Integer.toHexString(andmask)+", /*checkmask*/0x"+Integer.toHexString(checkmask));
3649 output.println("};\n");
3652 TagExpressionList tagel = predicate.tags.get(vard.getSymbol());
3653 output.println("int predicatetags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
3656 for(int j=0; j<tagel.numTags(); j++) {
3658 output.println(",");
3659 TempDescriptor tmp=tagel.getTemp(j);
3660 if (!slotnumber.containsKey(tmp)) {
3661 Integer slotint=new Integer(current_slot++);
3662 slotnumber.put(tmp,slotint);
3664 int slot=slotnumber.get(tmp).intValue();
3665 output.println("/* slot */"+ slot+", /*tagid*/"+state.getTagId(tmp.getTag()));
3667 numtags = tagel.numTags();
3669 output.println("};");
3671 //store the result into a predicatemember struct
3672 output.println("struct predicatemember predicatemember_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"={");
3673 output.println("/*type*/"+typed.getClassDesc().getId()+",");
3674 output.println("/* number of dnf terms */"+numberterms+",");
3675 output.println("predicateflags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3676 output.println("/* number of tag */"+numtags+",");
3677 output.println("predicatetags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3678 output.println("};\n");
3683 //generate an array that stores the entire predicate
3684 output.println("struct predicatemember * predicatememberarray_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
3685 for( int j = 0; j<predicateindex; j++) {
3686 if( j != predicateindex-1) output.println("&predicatemember_"+j+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3687 else output.println("&predicatemember_"+j+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
3689 output.println("};\n");
3690 return predicateindex;
3694 void generateOptionalArrays(PrintWriter output, PrintWriter headers, Hashtable<ClassDescriptor, Hashtable<FlagState, Set<OptionalTaskDescriptor>>> safeexecution, Hashtable optionaltaskdescriptors) {
3695 generateOptionalHeader(headers);
3697 output.println("#include \"optionalstruct.h\"\n\n");
3698 output.println("#include \"stdlib.h\"\n");
3700 HashSet processedcd = new HashSet();
3702 Enumeration e = safeexecution.keys();
3703 while (e.hasMoreElements()) {
3706 ClassDescriptor cdtemp=(ClassDescriptor)e.nextElement();
3707 Hashtable flaginfo=(Hashtable)flagorder.get(cdtemp); //will be used several times
3709 //Generate the struct of optionals
3710 Collection c_otd = ((Hashtable)optionaltaskdescriptors.get(cdtemp)).values();
3711 numotd = c_otd.size();
3712 if(maxotd<numotd) maxotd = numotd;
3713 if( !c_otd.isEmpty() ) {
3714 for(Iterator otd_it = c_otd.iterator(); otd_it.hasNext();) {
3715 OptionalTaskDescriptor otd = (OptionalTaskDescriptor)otd_it.next();
3717 //generate the int arrays for the predicate
3718 Predicate predicate = otd.predicate;
3719 int predicateindex = generateOptionalPredicate(predicate, otd, cdtemp, output);
3720 TreeSet<Integer> fsset=new TreeSet<Integer>();
3721 //iterate through possible FSes corresponding to
3722 //the state when entering
3724 for(Iterator fses = otd.enterflagstates.iterator(); fses.hasNext();) {
3725 FlagState fs = (FlagState)fses.next();
3727 for(Iterator flags = fs.getFlags(); flags.hasNext();) {
3728 FlagDescriptor flagd = (FlagDescriptor)flags.next();
3729 int id=1<<((Integer)flaginfo.get(flagd)).intValue();
3732 fsset.add(new Integer(flagid));
3733 //tag information not needed because tag
3734 //changes are not tolerated.
3737 output.println("int enterflag_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
3738 boolean needcomma=false;
3739 for(Iterator<Integer> it=fsset.iterator(); it.hasNext();) {
3742 output.println(it.next());
3745 output.println("};\n");
3748 //generate optionaltaskdescriptor that actually
3749 //includes exit fses, predicate and the task
3751 output.println("struct optionaltaskdescriptor optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"={");
3752 output.println("&task_"+otd.td.getSafeSymbol()+",");
3753 output.println("/*index*/"+otd.getIndex()+",");
3754 output.println("/*number of enter flags*/"+fsset.size()+",");
3755 output.println("enterflag_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3756 output.println("/*number of members */"+predicateindex+",");
3757 output.println("predicatememberarray_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3758 output.println("};\n");
3762 // if there are no optionals, there is no need to build the rest of the struct
3764 output.println("struct optionaltaskdescriptor * otdarray"+cdtemp.getSafeSymbol()+"[]={");
3765 c_otd = ((Hashtable)optionaltaskdescriptors.get(cdtemp)).values();
3766 if( !c_otd.isEmpty() ) {
3767 boolean needcomma=false;
3768 for(Iterator otd_it = c_otd.iterator(); otd_it.hasNext();) {
3769 OptionalTaskDescriptor otd = (OptionalTaskDescriptor)otd_it.next();
3771 output.println(",");
3773 output.println("&optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
3776 output.println("};\n");
3778 //get all the possible flagstates reachable by an object
3779 Hashtable hashtbtemp = safeexecution.get(cdtemp);
3781 TreeSet fsts=new TreeSet(new FlagComparator(flaginfo));
3782 fsts.addAll(hashtbtemp.keySet());
3783 for(Iterator fsit=fsts.iterator(); fsit.hasNext();) {
3784 FlagState fs = (FlagState)fsit.next();
3787 //get the set of OptionalTaskDescriptors corresponding
3788 HashSet<OptionalTaskDescriptor> availabletasks = (HashSet<OptionalTaskDescriptor>)hashtbtemp.get(fs);
3789 //iterate through the OptionalTaskDescriptors and
3790 //store the pointers to the optionals struct (see on
3791 //top) into an array
3793 output.println("struct optionaltaskdescriptor * optionaltaskdescriptorarray_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"[] = {");
3794 for(Iterator<OptionalTaskDescriptor> mos = ordertd(availabletasks).iterator(); mos.hasNext();) {
3795 OptionalTaskDescriptor mm = mos.next();
3797 output.println("&optionaltaskdescriptor_"+mm.getuid()+"_"+cdtemp.getSafeSymbol());
3799 output.println("&optionaltaskdescriptor_"+mm.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3802 output.println("};\n");
3804 //process flag information (what the flag after failure is) so we know what optionaltaskdescriptors to choose.
3807 for(Iterator flags = fs.getFlags(); flags.hasNext();) {
3808 FlagDescriptor flagd = (FlagDescriptor)flags.next();
3809 int id=1<<((Integer)flaginfo.get(flagd)).intValue();
3813 //process tag information
3816 boolean first = true;
3817 Enumeration tag_enum = fs.getTags();
3818 output.println("int tags_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"[]={");
3819 while(tag_enum.hasMoreElements()) {
3821 TagDescriptor tagd = (TagDescriptor)tag_enum.nextElement();
3825 output.println(", ");
3826 output.println("/*tagid*/"+state.getTagId(tagd));
3828 output.println("};");
3830 Set<TaskIndex> tiset=sa.getTaskIndex(fs);
3831 for(Iterator<TaskIndex> itti=tiset.iterator(); itti.hasNext();) {
3832 TaskIndex ti=itti.next();
3836 Set<OptionalTaskDescriptor> otdset=sa.getOptions(fs, ti);
3838 output.print("struct optionaltaskdescriptor * optionaltaskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex()+"_array[] = {");
3839 boolean needcomma=false;
3840 for(Iterator<OptionalTaskDescriptor> otdit=ordertd(otdset).iterator(); otdit.hasNext();) {
3841 OptionalTaskDescriptor otd=otdit.next();
3845 output.println("&optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
3847 output.println("};");
3849 output.print("struct taskfailure taskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex()+" = {");
3850 output.print("&task_"+ti.getTask().getSafeSymbol()+", ");
3851 output.print(ti.getIndex()+", ");
3852 output.print(otdset.size()+", ");
3853 output.print("optionaltaskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex()+"_array");
3854 output.println("};");
3857 tiset=sa.getTaskIndex(fs);
3858 boolean needcomma=false;
3860 output.println("struct taskfailure * taskfailurearray"+fscounter+"_"+cdtemp.getSafeSymbol()+"[]={");
3861 for(Iterator<TaskIndex> itti=tiset.iterator(); itti.hasNext();) {
3862 TaskIndex ti=itti.next();
3863 if (ti.isRuntime()) {
3870 output.print("&taskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex());
3872 output.println("};\n");
3874 //Store the result in fsanalysiswrapper
3876 output.println("struct fsanalysiswrapper fsanalysiswrapper_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"={");
3877 output.println("/*flag*/"+flagid+",");
3878 output.println("/* number of tags*/"+tagcounter+",");
3879 output.println("tags_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+",");
3880 output.println("/* numtask failures */"+(tiset.size()-runtimeti)+",");
3881 output.println("taskfailurearray"+fscounter+"_"+cdtemp.getSafeSymbol()+",");
3882 output.println("/* number of optionaltaskdescriptors */"+availabletasks.size()+",");
3883 output.println("optionaltaskdescriptorarray_FS"+fscounter+"_"+cdtemp.getSafeSymbol());
3884 output.println("};\n");
3888 //Build the array of fsanalysiswrappers
3889 output.println("struct fsanalysiswrapper * fsanalysiswrapperarray_"+cdtemp.getSafeSymbol()+"[] = {");
3890 boolean needcomma=false;
3891 for(int i = 0; i<fscounter; i++) {
3892 if (needcomma) output.print(",");
3893 output.println("&fsanalysiswrapper_FS"+(i+1)+"_"+cdtemp.getSafeSymbol());
3896 output.println("};");
3898 //Build the classanalysiswrapper referring to the previous array
3899 output.println("struct classanalysiswrapper classanalysiswrapper_"+cdtemp.getSafeSymbol()+"={");
3900 output.println("/*type*/"+cdtemp.getId()+",");
3901 output.println("/*numotd*/"+numotd+",");
3902 output.println("otdarray"+cdtemp.getSafeSymbol()+",");
3903 output.println("/* number of fsanalysiswrappers */"+fscounter+",");
3904 output.println("fsanalysiswrapperarray_"+cdtemp.getSafeSymbol()+"};\n");
3905 processedcd.add(cdtemp);
3908 //build an array containing every classes for which code has been build
3909 output.println("struct classanalysiswrapper * classanalysiswrapperarray[]={");
3910 for(int i=0; i<state.numClasses(); i++) {
3911 ClassDescriptor cn=cdarray[i];
3914 if (processedcd.contains(cn))
3915 output.print("&classanalysiswrapper_"+cn.getSafeSymbol());
3917 output.print("NULL");
3919 output.println("};");
3921 output.println("#define MAXOTD "+maxotd);
3922 headers.println("#endif");
3925 public List<OptionalTaskDescriptor> ordertd(Set<OptionalTaskDescriptor> otdset) {
3926 Relation r=new Relation();
3927 for(Iterator<OptionalTaskDescriptor>otdit=otdset.iterator(); otdit.hasNext();) {
3928 OptionalTaskDescriptor otd=otdit.next();
3929 TaskIndex ti=new TaskIndex(otd.td, otd.getIndex());
3933 LinkedList<OptionalTaskDescriptor> l=new LinkedList<OptionalTaskDescriptor>();
3934 for(Iterator it=r.keySet().iterator(); it.hasNext();) {
3935 Set s=r.get(it.next());
3936 for(Iterator it2=s.iterator(); it2.hasNext();) {
3937 OptionalTaskDescriptor otd=(OptionalTaskDescriptor)it2.next();
3945 protected void outputTransCode(PrintWriter output) {