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 Hashtable<FlatSESEEnterNode, FlatMethod> sese2bogusFlatMeth;
69 boolean nonSESEpass=true;
72 DiscoverConflicts recorddc;
73 DelayComputation delaycomp;
76 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, SafetyAnalysis sa, PrefetchAnalysis pa) {
77 this(st, temptovar, typeutil, null, sa, pa, null);
80 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, SafetyAnalysis sa, PrefetchAnalysis pa, MLPAnalysis mlpa) {
81 this(st, temptovar, typeutil, null, sa, pa, mlpa);
84 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, LocalityAnalysis locality, PrefetchAnalysis pa, MLPAnalysis mlpa) {
85 this(st, temptovar, typeutil, locality, null, pa, mlpa);
88 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, LocalityAnalysis locality, SafetyAnalysis sa, PrefetchAnalysis pa, MLPAnalysis mlpa) {
93 callgraph=new CallGraph(state);
95 oidstr="___objlocation___";
96 this.temptovar=temptovar;
97 paramstable=new Hashtable();
98 tempstable=new Hashtable();
99 fieldorder=new Hashtable();
100 flagorder=new Hashtable();
101 this.typeutil=typeutil;
102 virtualcalls=new Virtual(state,locality);
103 if (locality!=null) {
104 this.locality=locality;
105 this.reverttable=new Hashtable<LocalityBinding, TempDescriptor>();
106 this.backuptable=new Hashtable<LocalityBinding, Hashtable<TempDescriptor, TempDescriptor>>();
107 this.wb=new WriteBarrier(locality, st);
109 if (state.SINGLETM&&state.DCOPTS) {
110 TypeAnalysis typeanalysis=new TypeAnalysis(locality, st, typeutil,callgraph);
111 this.dc=new DiscoverConflicts(locality, st, typeanalysis, null);
114 if (state.DELAYCOMP) {
115 //TypeAnalysis typeanalysis=new TypeAnalysis(locality, st, typeutil,callgraph);
116 TypeAnalysis typeanalysis=new TypeAnalysis(locality, st, typeutil,callgraph);
117 GlobalFieldType gft=new GlobalFieldType(callgraph, st, typeutil.getMain());
118 delaycomp=new DelayComputation(locality, st, typeanalysis, gft);
119 delaycomp.doAnalysis();
120 dc=delaycomp.getConflicts();
121 recorddc=new DiscoverConflicts(locality, st, typeanalysis, delaycomp.getCannotDelayMap(), true, true, null);
122 recorddc.doAnalysis();
126 sese2bogusFlatMeth = new Hashtable<FlatSESEEnterNode, FlatMethod>();
130 /** The buildCode method outputs C code for all the methods. The Flat
131 * versions of the methods must already be generated and stored in
132 * the State object. */
134 public void buildCode() {
135 /* Create output streams to write to */
136 PrintWriter outclassdefs=null;
137 PrintWriter outstructs=null;
138 PrintWriter outrepairstructs=null;
139 PrintWriter outmethodheader=null;
140 PrintWriter outmethod=null;
141 PrintWriter outvirtual=null;
142 PrintWriter outtask=null;
143 PrintWriter outtaskdefs=null;
144 PrintWriter outoptionalarrays=null;
145 PrintWriter optionalheaders=null;
148 outstructs=new PrintWriter(new FileOutputStream(PREFIX+"structdefs.h"), true);
149 outmethodheader=new PrintWriter(new FileOutputStream(PREFIX+"methodheaders.h"), true);
150 outclassdefs=new PrintWriter(new FileOutputStream(PREFIX+"classdefs.h"), true);
151 outmethod=new PrintWriter(new FileOutputStream(PREFIX+"methods.c"), true);
152 outvirtual=new PrintWriter(new FileOutputStream(PREFIX+"virtualtable.h"), true);
154 outtask=new PrintWriter(new FileOutputStream(PREFIX+"task.h"), true);
155 outtaskdefs=new PrintWriter(new FileOutputStream(PREFIX+"taskdefs.c"), true);
156 if (state.OPTIONAL) {
157 outoptionalarrays=new PrintWriter(new FileOutputStream(PREFIX+"optionalarrays.c"), true);
158 optionalheaders=new PrintWriter(new FileOutputStream(PREFIX+"optionalstruct.h"), true);
161 if (state.structfile!=null) {
162 outrepairstructs=new PrintWriter(new FileOutputStream(PREFIX+state.structfile+".struct"), true);
164 } catch (Exception e) {
169 /* Build the virtual dispatch tables */
170 buildVirtualTables(outvirtual);
172 /* Output includes */
173 outmethodheader.println("#ifndef METHODHEADERS_H");
174 outmethodheader.println("#define METHODHEADERS_H");
175 outmethodheader.println("#include \"structdefs.h\"");
177 outmethodheader.println("#include \"dstm.h\"");
178 if (state.SINGLETM) {
179 outmethodheader.println("#include \"tm.h\"");
180 outmethodheader.println("#include \"delaycomp.h\"");
182 if (state.ABORTREADERS) {
183 outmethodheader.println("#include \"abortreaders.h\"");
184 outmethodheader.println("#include <setjmp.h>");
187 outmethodheader.println("#include <stdlib.h>");
188 outmethodheader.println("#include <stdio.h>");
189 outmethodheader.println("#include \"mlp_runtime.h\"");
192 /* Output Structures */
193 outputStructs(outstructs);
195 // Output the C class declarations
196 // These could mutually reference each other
197 outputClassDeclarations(outclassdefs);
199 // Output function prototypes and structures for parameters
200 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
201 while(it.hasNext()) {
202 ClassDescriptor cn=(ClassDescriptor)it.next();
203 generateCallStructs(cn, outclassdefs, outstructs, outmethodheader);
205 outclassdefs.close();
208 /* Map flags to integers */
209 /* The runtime keeps track of flags using these integers */
210 it=state.getClassSymbolTable().getDescriptorsIterator();
211 while(it.hasNext()) {
212 ClassDescriptor cn=(ClassDescriptor)it.next();
216 generateTaskStructs(outstructs, outmethodheader);
218 /* Outputs generic task structures if this is a task
220 outputTaskTypes(outtask);
223 /* Build the actual methods */
224 outputMethods(outmethod);
226 // Output function prototypes and structures for SESE's and code
230 // first generate code for each sese's internals
231 for(Iterator<FlatSESEEnterNode> seseit=mlpa.getAllSESEs().iterator();seseit.hasNext();) {
232 FlatSESEEnterNode fsen = seseit.next();
233 generateMethodSESE(fsen, null, outstructs, outmethodheader, outmethod);
236 // then write the invokeSESE switch to decouple scheduler
237 // from having to do unique details of sese invocation
238 generateSESEinvocationMethod(outmethodheader, outmethod);
242 /* Output code for tasks */
243 outputTaskCode(outtaskdefs, outmethod);
245 /* Record maximum number of task parameters */
246 outstructs.println("#define MAXTASKPARAMS "+maxtaskparams);
247 } else if (state.main!=null) {
248 /* Generate main method */
249 outputMainMethod(outmethod);
252 /* Generate information for task with optional parameters */
253 if (state.TASK&&state.OPTIONAL) {
254 generateOptionalArrays(outoptionalarrays, optionalheaders, state.getAnalysisResult(), state.getOptionalTaskDescriptors());
255 outoptionalarrays.close();
258 /* Output structure definitions for repair tool */
259 if (state.structfile!=null) {
260 buildRepairStructs(outrepairstructs);
261 outrepairstructs.close();
265 outmethodheader.println("#endif");
266 outmethodheader.close();
268 outstructs.println("#endif");
273 /* This code just generates the main C method for java programs.
274 * The main C method packs up the arguments into a string array
275 * and passes it to the java main method. */
277 private void outputMainMethod(PrintWriter outmethod) {
278 outmethod.println("int main(int argc, const char *argv[]) {");
279 outmethod.println(" int i;");
281 outmethod.println(" mlpInit( "+mlpa.getAllSESEs().size()+", "+mlpa.getMaxSESEage()+" );");
284 outmethod.println("#ifdef TRANSSTATS \n");
285 outmethod.println("handle();\n");
286 outmethod.println("#endif\n");
288 if (state.THREAD||state.DSM||state.SINGLETM) {
289 outmethod.println("initializethreads();");
292 outmethod.println("if (dstmStartup(argv[1])) {");
293 if (GENERATEPRECISEGC) {
294 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(NULL, STRINGARRAYTYPE, argc-2);");
296 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(STRINGARRAYTYPE, argc-2);");
299 if (GENERATEPRECISEGC) {
300 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(NULL, STRINGARRAYTYPE, argc-1);");
302 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(STRINGARRAYTYPE, argc-1);");
306 outmethod.println(" for(i=2;i<argc;i++) {");
308 outmethod.println(" for(i=1;i<argc;i++) {");
309 outmethod.println(" int length=strlen(argv[i]);");
310 if (GENERATEPRECISEGC) {
311 outmethod.println(" struct ___String___ *newstring=NewString(NULL, argv[i], length);");
313 outmethod.println(" struct ___String___ *newstring=NewString(argv[i], length);");
316 outmethod.println(" ((void **)(((char *)& stringarray->___length___)+sizeof(int)))[i-2]=newstring;");
318 outmethod.println(" ((void **)(((char *)& stringarray->___length___)+sizeof(int)))[i-1]=newstring;");
319 outmethod.println(" }");
321 MethodDescriptor md=typeutil.getMain();
322 ClassDescriptor cd=typeutil.getMainClass();
324 outmethod.println(" {");
325 if (GENERATEPRECISEGC) {
326 if (state.DSM||state.SINGLETM) {
327 outmethod.print(" struct "+cd.getSafeSymbol()+locality.getMain().getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
329 outmethod.print(" struct "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
330 outmethod.println("1, NULL,"+"stringarray};");
331 if (state.DSM||state.SINGLETM)
332 outmethod.println(" "+cd.getSafeSymbol()+locality.getMain().getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(& __parameterlist__);");
334 outmethod.println(" "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(& __parameterlist__);");
336 if (state.DSM||state.SINGLETM)
337 outmethod.println(" "+cd.getSafeSymbol()+locality.getMain().getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(stringarray);");
339 outmethod.println(" "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(stringarray);");
341 outmethod.println(" }");
344 outmethod.println("}");
347 if (state.THREAD||state.DSM||state.SINGLETM) {
348 outmethod.println("pthread_mutex_lock(&gclistlock);");
349 outmethod.println("threadcount--;");
350 outmethod.println("pthread_cond_signal(&gccond);");
351 outmethod.println("pthread_mutex_unlock(&gclistlock);");
354 if (state.DSM||state.SINGLETM) {
355 outmethod.println("#ifdef TRANSSTATS \n");
356 outmethod.println("printf(\"****** Transaction Stats ******\\n\");");
357 outmethod.println("printf(\"numTransAbort= %d\\n\", numTransAbort);");
358 outmethod.println("printf(\"numTransCommit= %d\\n\", numTransCommit);");
359 outmethod.println("printf(\"nSoftAbort= %d\\n\", nSoftAbort);");
361 outmethod.println("printf(\"nchashSearch= %d\\n\", nchashSearch);");
362 outmethod.println("printf(\"nmhashSearch= %d\\n\", nmhashSearch);");
363 outmethod.println("printf(\"nprehashSearch= %d\\n\", nprehashSearch);");
364 outmethod.println("printf(\"nRemoteReadSend= %d\\n\", nRemoteSend);");
365 outmethod.println("printf(\"bytesSent= %d\\n\", bytesSent);");
366 outmethod.println("printf(\"bytesRecv= %d\\n\", bytesRecv);");
367 } else if (state.SINGLETM) {
368 outmethod.println("printf(\"nSoftAbortAbort= %d\\n\", nSoftAbortAbort);");
369 outmethod.println("printf(\"nSoftAbortCommit= %d\\n\", nSoftAbortCommit);");
370 outmethod.println("#ifdef STMSTATS\n");
371 outmethod.println("for(i=0; i<TOTALNUMCLASSANDARRAY; i++) {\n");
372 outmethod.println(" printf(\"typesCausingAbort[%d]= %d\\n\", i, typesCausingAbort[i]);\n");
373 outmethod.println("}\n");
374 outmethod.println("#endif\n");
375 outmethod.println("fflush(stdout);");
377 outmethod.println("#endif\n");
380 if (state.THREAD||state.SINGLETM)
381 outmethod.println("pthread_exit(NULL);");
383 outmethod.println("}");
386 /* This method outputs code for each task. */
388 private void outputTaskCode(PrintWriter outtaskdefs, PrintWriter outmethod) {
389 /* Compile task based program */
390 outtaskdefs.println("#include \"task.h\"");
391 outtaskdefs.println("#include \"methodheaders.h\"");
392 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
393 while(taskit.hasNext()) {
394 TaskDescriptor td=(TaskDescriptor)taskit.next();
395 FlatMethod fm=state.getMethodFlat(td);
396 generateFlatMethod(fm, null, outmethod);
397 generateTaskDescriptor(outtaskdefs, fm, td);
400 //Output task descriptors
401 taskit=state.getTaskSymbolTable().getDescriptorsIterator();
402 outtaskdefs.println("struct taskdescriptor * taskarray[]= {");
404 while(taskit.hasNext()) {
405 TaskDescriptor td=(TaskDescriptor)taskit.next();
409 outtaskdefs.println(",");
410 outtaskdefs.print("&task_"+td.getSafeSymbol());
412 outtaskdefs.println("};");
414 outtaskdefs.println("int numtasks="+state.getTaskSymbolTable().getValueSet().size()+";");
417 /* This method outputs most of the methods.c file. This includes
418 * some standard includes and then an array with the sizes of
419 * objets and array that stores supertype and then the code for
420 * the Java methods.. */
422 protected void outputMethods(PrintWriter outmethod) {
423 outmethod.println("#include \"methodheaders.h\"");
424 outmethod.println("#include \"virtualtable.h\"");
425 outmethod.println("#include \"runtime.h\"");
427 outmethod.println("#include \"addPrefetchEnhance.h\"");
428 outmethod.println("#include \"localobjects.h\"");
430 if (state.FASTCHECK) {
431 outmethod.println("#include \"localobjects.h\"");
433 if(state.MULTICORE) {
434 outmethod.println("#include \"task.h\"");
435 outmethod.println("#include \"multicoreruntime.h\"");
436 outmethod.println("#include \"runtime_arch.h\"");
438 if (state.THREAD||state.DSM||state.SINGLETM)
439 outmethod.println("#include <thread.h>");
440 if (state.main!=null) {
441 outmethod.println("#include <string.h>");
443 if (state.CONSCHECK) {
444 outmethod.println("#include \"checkers.h\"");
447 outmethod.println("#include <stdlib.h>");
448 outmethod.println("#include <stdio.h>");
449 outmethod.println("#include \"mlp_runtime.h\"");
453 //Store the sizes of classes & array elements
454 generateSizeArray(outmethod);
456 //Store table of supertypes
457 generateSuperTypeTable(outmethod);
459 //Store the layout of classes
460 generateLayoutStructs(outmethod);
462 /* Generate code for methods */
463 if (state.DSM||state.SINGLETM) {
464 for(Iterator<LocalityBinding> lbit=locality.getLocalityBindings().iterator(); lbit.hasNext();) {
465 LocalityBinding lb=lbit.next();
466 MethodDescriptor md=lb.getMethod();
467 FlatMethod fm=state.getMethodFlat(md);
469 if (!md.getModifiers().isNative()) {
470 generateFlatMethod(fm, lb, outmethod);
474 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
475 while(classit.hasNext()) {
476 ClassDescriptor cn=(ClassDescriptor)classit.next();
477 Iterator methodit=cn.getMethods();
478 while(methodit.hasNext()) {
479 /* Classify parameters */
480 MethodDescriptor md=(MethodDescriptor)methodit.next();
481 FlatMethod fm=state.getMethodFlat(md);
482 if (!md.getModifiers().isNative()) {
483 generateFlatMethod(fm, null, outmethod);
490 protected void outputStructs(PrintWriter outstructs) {
491 outstructs.println("#ifndef STRUCTDEFS_H");
492 outstructs.println("#define STRUCTDEFS_H");
493 outstructs.println("#include \"classdefs.h\"");
494 outstructs.println("#ifndef INTPTR");
495 outstructs.println("#ifdef BIT64");
496 outstructs.println("#define INTPTR long");
497 outstructs.println("#else");
498 outstructs.println("#define INTPTR int");
499 outstructs.println("#endif");
500 outstructs.println("#endif");
502 /* Output #defines that the runtime uses to determine type
503 * numbers for various objects it needs */
504 outstructs.println("#define MAXCOUNT "+maxcount);
505 if (state.DSM||state.SINGLETM) {
506 LocalityBinding lb=new LocalityBinding(typeutil.getRun(), false);
508 lb.setGlobalThis(LocalityAnalysis.GLOBAL);
509 else if (state.SINGLETM)
510 lb.setGlobalThis(LocalityAnalysis.NORMAL);
511 outstructs.println("#define RUNMETHOD "+virtualcalls.getLocalityNumber(lb));
514 outstructs.println("#define STRINGARRAYTYPE "+
515 (state.getArrayNumber(
516 (new TypeDescriptor(typeutil.getClass(TypeUtil.StringClass))).makeArray(state))+state.numClasses()));
518 outstructs.println("#define OBJECTARRAYTYPE "+
519 (state.getArrayNumber(
520 (new TypeDescriptor(typeutil.getClass(TypeUtil.ObjectClass))).makeArray(state))+state.numClasses()));
523 outstructs.println("#define STRINGTYPE "+typeutil.getClass(TypeUtil.StringClass).getId());
524 outstructs.println("#define CHARARRAYTYPE "+
525 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.CHAR)).makeArray(state))+state.numClasses()));
527 outstructs.println("#define BYTEARRAYTYPE "+
528 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.BYTE)).makeArray(state))+state.numClasses()));
530 outstructs.println("#define BYTEARRAYARRAYTYPE "+
531 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.BYTE)).makeArray(state).makeArray(state))+state.numClasses()));
533 outstructs.println("#define NUMCLASSES "+state.numClasses());
534 int totalClassSize = state.numClasses() + state.numArrays();
535 outstructs.println("#define TOTALNUMCLASSANDARRAY "+ totalClassSize);
537 outstructs.println("#define STARTUPTYPE "+typeutil.getClass(TypeUtil.StartupClass).getId());
538 outstructs.println("#define TAGTYPE "+typeutil.getClass(TypeUtil.TagClass).getId());
539 outstructs.println("#define TAGARRAYTYPE "+
540 (state.getArrayNumber(new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass)).makeArray(state))+state.numClasses()));
544 protected void outputClassDeclarations(PrintWriter outclassdefs) {
545 if (state.THREAD||state.DSM||state.SINGLETM)
546 outclassdefs.println("#include <pthread.h>");
547 outclassdefs.println("#ifndef INTPTR");
548 outclassdefs.println("#ifdef BIT64");
549 outclassdefs.println("#define INTPTR long");
550 outclassdefs.println("#else");
551 outclassdefs.println("#define INTPTR int");
552 outclassdefs.println("#endif");
553 outclassdefs.println("#endif");
555 outclassdefs.println("#include \"optionalstruct.h\"");
556 outclassdefs.println("struct "+arraytype+";");
557 /* Start by declaring all structs */
558 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
559 while(it.hasNext()) {
560 ClassDescriptor cn=(ClassDescriptor)it.next();
561 outclassdefs.println("struct "+cn.getSafeSymbol()+";");
563 outclassdefs.println("");
564 //Print out definition for array type
565 outclassdefs.println("struct "+arraytype+" {");
566 outclassdefs.println(" int type;");
568 outclassdefs.println(" pthread_t tid;");
569 outclassdefs.println(" void * lockentry;");
570 outclassdefs.println(" int lockcount;");
573 outclassdefs.println(" int flag;");
574 if(!state.MULTICORE) {
575 outclassdefs.println(" void * flagptr;");
577 outclassdefs.println(" int version;");
578 outclassdefs.println(" struct ___Object___ * original;");
579 //outclassdefs.println(" int numlocks;"); // array for locks
580 outclassdefs.println(" int * lock;");
583 outclassdefs.println(" int numfses;");
584 outclassdefs.println(" int * fses;");
587 printClassStruct(typeutil.getClass(TypeUtil.ObjectClass), outclassdefs);
590 outclassdefs.println(" int paddingforarray;");
592 outclassdefs.println(" int ___length___;");
593 outclassdefs.println("};\n");
594 outclassdefs.println("extern int classsize[];");
595 outclassdefs.println("extern int hasflags[];");
596 outclassdefs.println("extern unsigned INTPTR * pointerarray[];");
597 outclassdefs.println("extern int supertypes[];");
600 /** Prints out definitions for generic task structures */
602 private void outputTaskTypes(PrintWriter outtask) {
603 outtask.println("#ifndef _TASK_H");
604 outtask.println("#define _TASK_H");
605 outtask.println("struct parameterdescriptor {");
606 outtask.println("int type;");
607 outtask.println("int numberterms;");
608 outtask.println("int *intarray;");
609 outtask.println("void * queue;");
610 outtask.println("int numbertags;");
611 outtask.println("int *tagarray;");
612 outtask.println("};");
614 outtask.println("struct taskdescriptor {");
615 outtask.println("void * taskptr;");
616 outtask.println("int numParameters;");
617 outtask.println(" int numTotal;");
618 outtask.println("struct parameterdescriptor **descriptorarray;");
619 outtask.println("char * name;");
620 outtask.println("};");
621 outtask.println("extern struct taskdescriptor * taskarray[];");
622 outtask.println("extern numtasks;");
623 outtask.println("#endif");
627 private void buildRepairStructs(PrintWriter outrepairstructs) {
628 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
629 while(classit.hasNext()) {
630 ClassDescriptor cn=(ClassDescriptor)classit.next();
631 outrepairstructs.println("structure "+cn.getSymbol()+" {");
632 outrepairstructs.println(" int __type__;");
634 outrepairstructs.println(" int __flag__;");
635 if(!state.MULTICORE) {
636 outrepairstructs.println(" int __flagptr__;");
639 printRepairStruct(cn, outrepairstructs);
640 outrepairstructs.println("}\n");
643 for(int i=0; i<state.numArrays(); i++) {
644 TypeDescriptor tdarray=arraytable[i];
645 TypeDescriptor tdelement=tdarray.dereference();
646 outrepairstructs.println("structure "+arraytype+"_"+state.getArrayNumber(tdarray)+" {");
647 outrepairstructs.println(" int __type__;");
648 printRepairStruct(typeutil.getClass(TypeUtil.ObjectClass), outrepairstructs);
649 outrepairstructs.println(" int length;");
651 // Need to add support to repair tool for this
652 if (tdelement.isClass()||tdelement.isArray())
653 outrepairstructs.println(" "+tdelement.getRepairSymbol()+" * elem[this.length];");
655 outrepairstructs.println(" "+tdelement.getRepairSymbol()+" elem[this.length];");
657 outrepairstructs.println("}\n");
661 private void printRepairStruct(ClassDescriptor cn, PrintWriter output) {
662 ClassDescriptor sp=cn.getSuperDesc();
664 printRepairStruct(sp, output);
666 Vector fields=(Vector)fieldorder.get(cn);
668 for(int i=0; i<fields.size(); i++) {
669 FieldDescriptor fd=(FieldDescriptor)fields.get(i);
670 if (fd.getType().isArray()) {
671 output.println(" "+arraytype+"_"+ state.getArrayNumber(fd.getType()) +" * "+fd.getSymbol()+";");
672 } else if (fd.getType().isClass())
673 output.println(" "+fd.getType().getRepairSymbol()+" * "+fd.getSymbol()+";");
674 else if (fd.getType().isFloat())
675 output.println(" int "+fd.getSymbol()+"; /* really float */");
677 output.println(" "+fd.getType().getRepairSymbol()+" "+fd.getSymbol()+";");
681 /** This method outputs TaskDescriptor information */
682 private void generateTaskDescriptor(PrintWriter output, FlatMethod fm, TaskDescriptor task) {
683 for (int i=0; i<task.numParameters(); i++) {
684 VarDescriptor param_var=task.getParameter(i);
685 TypeDescriptor param_type=task.getParamType(i);
686 FlagExpressionNode param_flag=task.getFlag(param_var);
687 TagExpressionList param_tag=task.getTag(param_var);
690 if (param_flag==null) {
691 output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
692 output.println("0x0, 0x0 };");
695 DNFFlag dflag=param_flag.getDNF();
696 dnfterms=dflag.size();
698 Hashtable flags=(Hashtable)flagorder.get(param_type.getClassDesc());
699 output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
700 for(int j=0; j<dflag.size(); j++) {
703 Vector term=dflag.get(j);
706 for(int k=0; k<term.size(); k++) {
707 DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
708 FlagDescriptor fd=dfa.getFlag();
709 boolean negated=dfa.getNegated();
710 int flagid=1<<((Integer)flags.get(fd)).intValue();
715 output.print("0x"+Integer.toHexString(andmask)+", 0x"+Integer.toHexString(checkmask));
717 output.println("};");
720 output.println("int parametertag_"+i+"_"+task.getSafeSymbol()+"[]={");
721 //BUG...added next line to fix, test with any task program
723 for(int j=0; j<param_tag.numTags(); j++) {
726 /* for each tag we need */
727 /* which slot it is */
728 /* what type it is */
729 TagVarDescriptor tvd=(TagVarDescriptor)task.getParameterTable().get(param_tag.getName(j));
730 TempDescriptor tmp=param_tag.getTemp(j);
731 int slot=fm.getTagInt(tmp);
732 output.println(slot+", "+state.getTagId(tvd.getTag()));
734 output.println("};");
736 output.println("struct parameterdescriptor parameter_"+i+"_"+task.getSafeSymbol()+"={");
737 output.println("/* type */"+param_type.getClassDesc().getId()+",");
738 output.println("/* number of DNF terms */"+dnfterms+",");
739 output.println("parameterdnf_"+i+"_"+task.getSafeSymbol()+",");
740 output.println("0,");
741 //BUG, added next line to fix and else statement...test
742 //with any task program
744 output.println("/* number of tags */"+param_tag.numTags()+",");
746 output.println("/* number of tags */ 0,");
747 output.println("parametertag_"+i+"_"+task.getSafeSymbol());
748 output.println("};");
752 output.println("struct parameterdescriptor * parameterdescriptors_"+task.getSafeSymbol()+"[] = {");
753 for (int i=0; i<task.numParameters(); i++) {
756 output.print("¶meter_"+i+"_"+task.getSafeSymbol());
758 output.println("};");
760 output.println("struct taskdescriptor task_"+task.getSafeSymbol()+"={");
761 output.println("&"+task.getSafeSymbol()+",");
762 output.println("/* number of parameters */" +task.numParameters() + ",");
763 int numtotal=task.numParameters()+fm.numTags();
764 output.println("/* number total parameters */" +numtotal + ",");
765 output.println("parameterdescriptors_"+task.getSafeSymbol()+",");
766 output.println("\""+task.getSymbol()+"\"");
767 output.println("};");
771 /** The buildVirtualTables method outputs the virtual dispatch
772 * tables for methods. */
774 protected void buildVirtualTables(PrintWriter outvirtual) {
775 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
776 while(classit.hasNext()) {
777 ClassDescriptor cd=(ClassDescriptor)classit.next();
778 if (virtualcalls.getMethodCount(cd)>maxcount)
779 maxcount=virtualcalls.getMethodCount(cd);
781 MethodDescriptor[][] virtualtable=null;
782 LocalityBinding[][] lbvirtualtable=null;
783 if (state.DSM||state.SINGLETM)
784 lbvirtualtable=new LocalityBinding[state.numClasses()+state.numArrays()][maxcount];
786 virtualtable=new MethodDescriptor[state.numClasses()+state.numArrays()][maxcount];
788 /* Fill in virtual table */
789 classit=state.getClassSymbolTable().getDescriptorsIterator();
790 while(classit.hasNext()) {
791 ClassDescriptor cd=(ClassDescriptor)classit.next();
792 if (state.DSM||state.SINGLETM)
793 fillinRow(cd, lbvirtualtable, cd.getId());
795 fillinRow(cd, virtualtable, cd.getId());
798 ClassDescriptor objectcd=typeutil.getClass(TypeUtil.ObjectClass);
799 Iterator arrayit=state.getArrayIterator();
800 while(arrayit.hasNext()) {
801 TypeDescriptor td=(TypeDescriptor)arrayit.next();
802 int id=state.getArrayNumber(td);
803 if (state.DSM||state.SINGLETM)
804 fillinRow(objectcd, lbvirtualtable, id+state.numClasses());
806 fillinRow(objectcd, virtualtable, id+state.numClasses());
809 outvirtual.print("void * virtualtable[]={");
810 boolean needcomma=false;
811 for(int i=0; i<state.numClasses()+state.numArrays(); i++) {
812 for(int j=0; j<maxcount; j++) {
814 outvirtual.print(", ");
815 if ((state.DSM||state.SINGLETM)&&lbvirtualtable[i][j]!=null) {
816 LocalityBinding lb=lbvirtualtable[i][j];
817 MethodDescriptor md=lb.getMethod();
818 outvirtual.print("& "+md.getClassDesc().getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
819 } else if (!(state.DSM||state.SINGLETM)&&virtualtable[i][j]!=null) {
820 MethodDescriptor md=virtualtable[i][j];
821 outvirtual.print("& "+md.getClassDesc().getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
823 outvirtual.print("0");
827 outvirtual.println("");
829 outvirtual.println("};");
833 private void fillinRow(ClassDescriptor cd, MethodDescriptor[][] virtualtable, int rownum) {
834 /* Get inherited methods */
835 if (cd.getSuperDesc()!=null)
836 fillinRow(cd.getSuperDesc(), virtualtable, rownum);
837 /* Override them with our methods */
838 for(Iterator it=cd.getMethods(); it.hasNext();) {
839 MethodDescriptor md=(MethodDescriptor)it.next();
840 if (md.isStatic()||md.getReturnType()==null)
842 int methodnum=virtualcalls.getMethodNumber(md);
843 virtualtable[rownum][methodnum]=md;
847 private void fillinRow(ClassDescriptor cd, LocalityBinding[][] virtualtable, int rownum) {
848 /* Get inherited methods */
849 if (cd.getSuperDesc()!=null)
850 fillinRow(cd.getSuperDesc(), virtualtable, rownum);
851 /* Override them with our methods */
852 if (locality.getClassBindings(cd)!=null)
853 for(Iterator<LocalityBinding> lbit=locality.getClassBindings(cd).iterator(); lbit.hasNext();) {
854 LocalityBinding lb=lbit.next();
855 MethodDescriptor md=lb.getMethod();
856 //Is the method static or a constructor
857 if (md.isStatic()||md.getReturnType()==null)
859 int methodnum=virtualcalls.getLocalityNumber(lb);
860 virtualtable[rownum][methodnum]=lb;
864 /** Generate array that contains the sizes of class objects. The
865 * object allocation functions in the runtime use this
868 private void generateSizeArray(PrintWriter outclassdefs) {
869 outclassdefs.print("extern struct prefetchCountStats * evalPrefetch;\n");
870 outclassdefs.print("#ifdef TRANSSTATS \n");
871 outclassdefs.print("extern int numTransAbort;\n");
872 outclassdefs.print("extern int numTransCommit;\n");
873 outclassdefs.print("extern int nSoftAbort;\n");
875 outclassdefs.print("extern int nchashSearch;\n");
876 outclassdefs.print("extern int nmhashSearch;\n");
877 outclassdefs.print("extern int nprehashSearch;\n");
878 outclassdefs.print("extern int nRemoteSend;\n");
879 outclassdefs.print("extern int bytesSent;\n");
880 outclassdefs.print("extern int bytesRecv;\n");
881 outclassdefs.print("extern void handle();\n");
882 } else if (state.SINGLETM) {
883 outclassdefs.println("extern int nSoftAbortAbort;");
884 outclassdefs.println("extern int nSoftAbortCommit;");
885 outclassdefs.println("#ifdef STMSTATS\n");
886 outclassdefs.println("extern int typesCausingAbort[];");
887 outclassdefs.println("#endif\n");
889 outclassdefs.print("#endif\n");
890 outclassdefs.print("int numprefetchsites = " + pa.prefetchsiteid + ";\n");
892 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
893 cdarray=new ClassDescriptor[state.numClasses()];
894 while(it.hasNext()) {
895 ClassDescriptor cd=(ClassDescriptor)it.next();
896 cdarray[cd.getId()]=cd;
899 arraytable=new TypeDescriptor[state.numArrays()];
901 Iterator arrayit=state.getArrayIterator();
902 while(arrayit.hasNext()) {
903 TypeDescriptor td=(TypeDescriptor)arrayit.next();
904 int id=state.getArrayNumber(td);
910 /* Print out types */
911 outclassdefs.println("/* ");
912 for(int i=0; i<state.numClasses(); i++) {
913 ClassDescriptor cd=cdarray[i];
914 outclassdefs.println(cd +" "+i);
917 for(int i=0; i<state.numArrays(); i++) {
918 TypeDescriptor arraytd=arraytable[i];
919 outclassdefs.println(arraytd.toPrettyString() +" "+(i+state.numClasses()));
922 outclassdefs.println("*/");
925 outclassdefs.print("int classsize[]={");
927 boolean needcomma=false;
928 for(int i=0; i<state.numClasses(); i++) {
930 outclassdefs.print(", ");
931 outclassdefs.print("sizeof(struct "+cdarray[i].getSafeSymbol()+")");
936 for(int i=0; i<state.numArrays(); i++) {
938 outclassdefs.print(", ");
939 TypeDescriptor tdelement=arraytable[i].dereference();
940 if (tdelement.isArray()||tdelement.isClass())
941 outclassdefs.print("sizeof(void *)");
943 outclassdefs.print("sizeof("+tdelement.getSafeSymbol()+")");
947 outclassdefs.println("};");
949 ClassDescriptor objectclass=typeutil.getClass(TypeUtil.ObjectClass);
951 outclassdefs.print("int typearray[]={");
952 for(int i=0; i<state.numClasses(); i++) {
953 ClassDescriptor cd=cdarray[i];
954 ClassDescriptor supercd=cd.getSuperDesc();
956 outclassdefs.print(", ");
958 outclassdefs.print("-1");
960 outclassdefs.print(supercd.getId());
964 for(int i=0; i<state.numArrays(); i++) {
965 TypeDescriptor arraytd=arraytable[i];
966 ClassDescriptor arraycd=arraytd.getClassDesc();
969 outclassdefs.print(", ");
970 outclassdefs.print(objectclass.getId());
974 ClassDescriptor cd=arraycd.getSuperDesc();
977 TypeDescriptor supertd=new TypeDescriptor(cd);
978 supertd.setArrayCount(arraytd.getArrayCount());
979 type=state.getArrayNumber(supertd);
981 type+=state.numClasses();
984 cd=cd.getSuperDesc();
987 outclassdefs.print(", ");
988 outclassdefs.print(type);
992 outclassdefs.println("};");
997 outclassdefs.print("int typearray2[]={");
998 for(int i=0; i<state.numArrays(); i++) {
999 TypeDescriptor arraytd=arraytable[i];
1000 ClassDescriptor arraycd=arraytd.getClassDesc();
1001 if (arraycd==null) {
1003 outclassdefs.print(", ");
1004 outclassdefs.print("-1");
1008 ClassDescriptor cd=arraycd.getSuperDesc();
1009 int level=arraytd.getArrayCount()-1;
1011 for(; level>0; level--) {
1012 TypeDescriptor supertd=new TypeDescriptor(objectclass);
1013 supertd.setArrayCount(level);
1014 type=state.getArrayNumber(supertd);
1016 type+=state.numClasses();
1021 outclassdefs.print(", ");
1022 outclassdefs.print(type);
1026 outclassdefs.println("};");
1029 /** Constructs params and temp objects for each method or task.
1030 * These objects tell the compiler which temps need to be
1033 protected void generateTempStructs(FlatMethod fm, LocalityBinding lb) {
1034 MethodDescriptor md=fm.getMethod();
1035 TaskDescriptor task=fm.getTask();
1036 Set<TempDescriptor> saveset=lb!=null ? locality.getTempSet(lb) : null;
1037 ParamsObject objectparams=md!=null ? new ParamsObject(md,tag++) : new ParamsObject(task, tag++);
1039 paramstable.put(lb, objectparams);
1040 backuptable.put(lb, new Hashtable<TempDescriptor, TempDescriptor>());
1041 } else if (md!=null)
1042 paramstable.put(md, objectparams);
1044 paramstable.put(task, objectparams);
1046 for(int i=0; i<fm.numParameters(); i++) {
1047 TempDescriptor temp=fm.getParameter(i);
1048 TypeDescriptor type=temp.getType();
1049 if (type.isPtr()&&GENERATEPRECISEGC)
1050 objectparams.addPtr(temp);
1052 objectparams.addPrim(temp);
1053 if(lb!=null&&saveset.contains(temp)) {
1054 backuptable.get(lb).put(temp, temp.createNew());
1058 for(int i=0; i<fm.numTags(); i++) {
1059 TempDescriptor temp=fm.getTag(i);
1060 if (GENERATEPRECISEGC)
1061 objectparams.addPtr(temp);
1063 objectparams.addPrim(temp);
1066 TempObject objecttemps=md!=null ? new TempObject(objectparams,md,tag++) : new TempObject(objectparams, task, tag++);
1068 tempstable.put(lb, objecttemps);
1070 tempstable.put(md, objecttemps);
1072 tempstable.put(task, objecttemps);
1074 for(Iterator nodeit=fm.getNodeSet().iterator(); nodeit.hasNext();) {
1075 FlatNode fn=(FlatNode)nodeit.next();
1076 TempDescriptor[] writes=fn.writesTemps();
1077 for(int i=0; i<writes.length; i++) {
1078 TempDescriptor temp=writes[i];
1079 TypeDescriptor type=temp.getType();
1080 if (type.isPtr()&&GENERATEPRECISEGC)
1081 objecttemps.addPtr(temp);
1083 objecttemps.addPrim(temp);
1084 if(lb!=null&&saveset.contains(temp)&&
1085 !backuptable.get(lb).containsKey(temp))
1086 backuptable.get(lb).put(temp, temp.createNew());
1090 /* Create backup temps */
1092 for(Iterator<TempDescriptor> tmpit=backuptable.get(lb).values().iterator(); tmpit.hasNext();) {
1093 TempDescriptor tmp=tmpit.next();
1094 TypeDescriptor type=tmp.getType();
1095 if (type.isPtr()&&GENERATEPRECISEGC)
1096 objecttemps.addPtr(tmp);
1098 objecttemps.addPrim(tmp);
1100 /* Create temp to hold revert table */
1101 if (state.DSM&&(lb.getHasAtomic()||lb.isAtomic())) {
1102 TempDescriptor reverttmp=new TempDescriptor("revertlist", typeutil.getClass(TypeUtil.ObjectClass));
1103 if (GENERATEPRECISEGC)
1104 objecttemps.addPtr(reverttmp);
1106 objecttemps.addPrim(reverttmp);
1107 reverttable.put(lb, reverttmp);
1112 /** This method outputs the following information about classes
1114 * (1) For classes, what are the locations of pointers.
1115 * (2) For arrays, does the array contain pointers or primitives.
1116 * (3) For classes, does the class contain flags.
1119 private void generateLayoutStructs(PrintWriter output) {
1120 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
1121 while(it.hasNext()) {
1122 ClassDescriptor cn=(ClassDescriptor)it.next();
1123 output.println("unsigned INTPTR "+cn.getSafeSymbol()+"_pointers[]={");
1124 Iterator allit=cn.getFieldTable().getAllDescriptorsIterator();
1126 while(allit.hasNext()) {
1127 FieldDescriptor fd=(FieldDescriptor)allit.next();
1128 TypeDescriptor type=fd.getType();
1129 if (state.DSM&&fd.isGlobal()) //Don't GC the global objects for now
1134 output.print(count);
1135 allit=cn.getFieldTable().getAllDescriptorsIterator();
1136 while(allit.hasNext()) {
1137 FieldDescriptor fd=(FieldDescriptor)allit.next();
1138 TypeDescriptor type=fd.getType();
1139 if (state.DSM&&fd.isGlobal()) //Don't GC the global objects for now
1142 output.println(",");
1143 output.print("((unsigned INTPTR)&(((struct "+cn.getSafeSymbol() +" *)0)->"+fd.getSafeSymbol()+"))");
1146 output.println("};");
1148 output.println("unsigned INTPTR * pointerarray[]={");
1149 boolean needcomma=false;
1150 for(int i=0; i<state.numClasses(); i++) {
1151 ClassDescriptor cn=cdarray[i];
1153 output.println(",");
1155 output.print(cn.getSafeSymbol()+"_pointers");
1158 for(int i=0; i<state.numArrays(); i++) {
1160 output.println(", ");
1161 TypeDescriptor tdelement=arraytable[i].dereference();
1162 if (tdelement.isArray()||tdelement.isClass())
1163 output.print("((unsigned INTPTR *)1)");
1169 output.println("};");
1171 output.println("int hasflags[]={");
1172 for(int i=0; i<state.numClasses(); i++) {
1173 ClassDescriptor cn=cdarray[i];
1175 output.println(", ");
1182 output.println("};");
1185 /** Print out table to give us supertypes */
1186 private void generateSuperTypeTable(PrintWriter output) {
1187 output.println("int supertypes[]={");
1188 boolean needcomma=false;
1189 for(int i=0; i<state.numClasses(); i++) {
1190 ClassDescriptor cn=cdarray[i];
1192 output.println(",");
1194 if (cn.getSuperDesc()!=null) {
1195 ClassDescriptor cdsuper=cn.getSuperDesc();
1196 output.print(cdsuper.getId());
1200 output.println("};");
1203 /** Force consistent field ordering between inherited classes. */
1205 private void printClassStruct(ClassDescriptor cn, PrintWriter classdefout) {
1207 ClassDescriptor sp=cn.getSuperDesc();
1209 printClassStruct(sp, classdefout);
1211 if (!fieldorder.containsKey(cn)) {
1212 Vector fields=new Vector();
1213 fieldorder.put(cn,fields);
1214 Vector fieldvec=cn.getFieldVec();
1215 for(int i=0;i<fieldvec.size();i++) {
1216 FieldDescriptor fd=(FieldDescriptor)fieldvec.get(i);
1217 if ((sp==null||!sp.getFieldTable().contains(fd.getSymbol())))
1221 Vector fields=(Vector)fieldorder.get(cn);
1223 for(int i=0; i<fields.size(); i++) {
1224 FieldDescriptor fd=(FieldDescriptor)fields.get(i);
1225 if (fd.getType().isClass()||fd.getType().isArray())
1226 classdefout.println(" struct "+fd.getType().getSafeSymbol()+" * "+fd.getSafeSymbol()+";");
1228 classdefout.println(" "+fd.getType().getSafeSymbol()+" "+fd.getSafeSymbol()+";");
1233 /* Map flags to integers consistently between inherited
1236 protected void mapFlags(ClassDescriptor cn) {
1237 ClassDescriptor sp=cn.getSuperDesc();
1241 if (!flagorder.containsKey(cn)) {
1242 Hashtable flags=new Hashtable();
1243 flagorder.put(cn,flags);
1245 Hashtable superflags=(Hashtable)flagorder.get(sp);
1246 Iterator superflagit=superflags.keySet().iterator();
1247 while(superflagit.hasNext()) {
1248 FlagDescriptor fd=(FlagDescriptor)superflagit.next();
1249 Integer number=(Integer)superflags.get(fd);
1250 flags.put(fd, number);
1251 if ((number.intValue()+1)>max)
1252 max=number.intValue()+1;
1256 Iterator flagit=cn.getFlags();
1257 while(flagit.hasNext()) {
1258 FlagDescriptor fd=(FlagDescriptor)flagit.next();
1259 if (sp==null||!sp.getFlagTable().contains(fd.getSymbol()))
1260 flags.put(fd, new Integer(max++));
1266 /** This function outputs (1) structures that parameters are
1267 * passed in (when PRECISE GC is enabled) and (2) function
1268 * prototypes for the methods */
1270 protected void generateCallStructs(ClassDescriptor cn, PrintWriter classdefout, PrintWriter output, PrintWriter headersout) {
1271 /* Output class structure */
1272 classdefout.println("struct "+cn.getSafeSymbol()+" {");
1273 classdefout.println(" int type;");
1275 classdefout.println(" pthread_t tid;");
1276 classdefout.println(" void * lockentry;");
1277 classdefout.println(" int lockcount;");
1281 classdefout.println(" int flag;");
1282 if((!state.MULTICORE) || (cn.getSymbol().equals("TagDescriptor"))) {
1283 classdefout.println(" void * flagptr;");
1284 } else if (state.MULTICORE) {
1285 classdefout.println(" int version;");
1286 classdefout.println(" struct ___Object___ * original;");
1287 //classdefout.println(" int numlocks;"); // array for locks
1288 classdefout.println(" int * lock;");
1290 if (state.OPTIONAL) {
1291 classdefout.println(" int numfses;");
1292 classdefout.println(" int * fses;");
1295 printClassStruct(cn, classdefout);
1296 classdefout.println("};\n");
1298 if (state.DSM||state.SINGLETM) {
1299 /* Cycle through LocalityBindings */
1300 HashSet<MethodDescriptor> nativemethods=new HashSet<MethodDescriptor>();
1301 Set<LocalityBinding> lbset=locality.getClassBindings(cn);
1303 for(Iterator<LocalityBinding> lbit=lbset.iterator(); lbit.hasNext();) {
1304 LocalityBinding lb=lbit.next();
1305 MethodDescriptor md=lb.getMethod();
1306 if (md.getModifiers().isNative()) {
1307 //make sure we only print a native method once
1308 if (nativemethods.contains(md)) {
1309 FlatMethod fm=state.getMethodFlat(md);
1310 generateTempStructs(fm, lb);
1313 nativemethods.add(md);
1315 generateMethod(cn, md, lb, headersout, output);
1318 for(Iterator methodit=cn.getMethods(); methodit.hasNext();) {
1319 MethodDescriptor md=(MethodDescriptor)methodit.next();
1320 if (md.getModifiers().isNative()&&!nativemethods.contains(md)) {
1321 //Need to build param structure for library code
1322 FlatMethod fm=state.getMethodFlat(md);
1323 generateTempStructs(fm, null);
1324 generateMethodParam(cn, md, null, output);
1329 for(Iterator methodit=cn.getMethods(); methodit.hasNext();) {
1330 MethodDescriptor md=(MethodDescriptor)methodit.next();
1331 generateMethod(cn, md, null, headersout, output);
1335 private void generateMethodParam(ClassDescriptor cn, MethodDescriptor md, LocalityBinding lb, PrintWriter output) {
1336 /* Output parameter structure */
1337 if (GENERATEPRECISEGC) {
1338 ParamsObject objectparams=(ParamsObject) paramstable.get(lb!=null ? lb : md);
1339 if ((state.DSM||state.SINGLETM)&&lb!=null)
1340 output.println("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params {");
1342 output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params {");
1343 output.println(" INTPTR size;");
1344 output.println(" void * next;");
1345 for(int i=0; i<objectparams.numPointers(); i++) {
1346 TempDescriptor temp=objectparams.getPointer(i);
1347 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1349 output.println("};\n");
1353 private void generateMethod(ClassDescriptor cn, MethodDescriptor md, LocalityBinding lb, PrintWriter headersout, PrintWriter output) {
1354 FlatMethod fm=state.getMethodFlat(md);
1355 generateTempStructs(fm, lb);
1357 ParamsObject objectparams=(ParamsObject) paramstable.get(lb!=null ? lb : md);
1358 TempObject objecttemps=(TempObject) tempstable.get(lb!=null ? lb : md);
1360 generateMethodParam(cn, md, lb, output);
1362 /* Output temp structure */
1363 if (GENERATEPRECISEGC) {
1364 if (state.DSM||state.SINGLETM)
1365 output.println("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals {");
1367 output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals {");
1368 output.println(" INTPTR size;");
1369 output.println(" void * next;");
1370 for(int i=0; i<objecttemps.numPointers(); i++) {
1371 TempDescriptor temp=objecttemps.getPointer(i);
1372 if (temp.getType().isNull())
1373 output.println(" void * "+temp.getSafeSymbol()+";");
1375 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1377 output.println("};\n");
1380 /********* Output method declaration ***********/
1381 if (state.DSM||state.SINGLETM) {
1382 headersout.println("#define D"+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+" 1");
1384 headersout.println("#define D"+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+" 1");
1386 /* First the return type */
1387 if (md.getReturnType()!=null) {
1388 if (md.getReturnType().isClass()||md.getReturnType().isArray())
1389 headersout.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
1391 headersout.print(md.getReturnType().getSafeSymbol()+" ");
1393 //catch the constructor case
1394 headersout.print("void ");
1396 /* Next the method name */
1397 if (state.DSM||state.SINGLETM) {
1398 headersout.print(cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1400 headersout.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1402 boolean printcomma=false;
1403 if (GENERATEPRECISEGC) {
1404 if (state.DSM||state.SINGLETM) {
1405 headersout.print("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1407 headersout.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1411 /* Output parameter list*/
1412 for(int i=0; i<objectparams.numPrimitives(); i++) {
1413 TempDescriptor temp=objectparams.getPrimitive(i);
1415 headersout.print(", ");
1417 if (temp.getType().isClass()||temp.getType().isArray())
1418 headersout.print("struct " + temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
1420 headersout.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
1422 headersout.println(");\n");
1426 /** This function outputs (1) structures that parameters are
1427 * passed in (when PRECISE GC is enabled) and (2) function
1428 * prototypes for the tasks */
1430 private void generateTaskStructs(PrintWriter output, PrintWriter headersout) {
1431 /* Cycle through tasks */
1432 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
1434 while(taskit.hasNext()) {
1435 /* Classify parameters */
1436 TaskDescriptor task=(TaskDescriptor)taskit.next();
1437 FlatMethod fm=state.getMethodFlat(task);
1438 generateTempStructs(fm, null);
1440 ParamsObject objectparams=(ParamsObject) paramstable.get(task);
1441 TempObject objecttemps=(TempObject) tempstable.get(task);
1443 /* Output parameter structure */
1444 if (GENERATEPRECISEGC) {
1445 output.println("struct "+task.getSafeSymbol()+"_params {");
1447 output.println(" INTPTR size;");
1448 output.println(" void * next;");
1449 for(int i=0; i<objectparams.numPointers(); i++) {
1450 TempDescriptor temp=objectparams.getPointer(i);
1451 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1454 output.println("};\n");
1455 if ((objectparams.numPointers()+fm.numTags())>maxtaskparams) {
1456 maxtaskparams=objectparams.numPointers()+fm.numTags();
1460 /* Output temp structure */
1461 if (GENERATEPRECISEGC) {
1462 output.println("struct "+task.getSafeSymbol()+"_locals {");
1463 output.println(" INTPTR size;");
1464 output.println(" void * next;");
1465 for(int i=0; i<objecttemps.numPointers(); i++) {
1466 TempDescriptor temp=objecttemps.getPointer(i);
1467 if (temp.getType().isNull())
1468 output.println(" void * "+temp.getSafeSymbol()+";");
1469 else if(temp.getType().isTag())
1470 output.println(" struct "+
1471 (new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1473 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1475 output.println("};\n");
1478 /* Output task declaration */
1479 headersout.print("void " + task.getSafeSymbol()+"(");
1481 boolean printcomma=false;
1482 if (GENERATEPRECISEGC) {
1483 headersout.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
1485 headersout.print("void * parameterarray[]");
1486 headersout.println(");\n");
1490 /***** Generate code for FlatMethod fm. *****/
1492 Hashtable<FlatAtomicEnterNode, AtomicRecord> atomicmethodmap;
1493 static int atomicmethodcount=0;
1495 private void generateFlatMethod(FlatMethod fm, LocalityBinding lb, PrintWriter output) {
1496 if (State.PRINTFLAT)
1497 System.out.println(fm.printMethod());
1498 MethodDescriptor md=fm.getMethod();
1499 TaskDescriptor task=fm.getTask();
1500 ClassDescriptor cn=md!=null ? md.getClassDesc() : null;
1501 ParamsObject objectparams=(ParamsObject)paramstable.get(lb!=null ? lb : md!=null ? md : task);
1503 HashSet<AtomicRecord> arset=null;
1505 if (state.DELAYCOMP&&!lb.isAtomic()&&lb.getHasAtomic()) {
1507 if (atomicmethodmap==null)
1508 atomicmethodmap=new Hashtable<FlatAtomicEnterNode, AtomicRecord>();
1510 //fix these so we get right strings for local variables
1511 localsprefixaddr=localsprefix;
1512 localsprefixderef=localsprefix+"->";
1513 arset=new HashSet<AtomicRecord>();
1515 //Generate commit methods here
1516 for(Iterator<FlatNode> fnit=fm.getNodeSet().iterator();fnit.hasNext();) {
1517 FlatNode fn=fnit.next();
1518 if (fn.kind()==FKind.FlatAtomicEnterNode&&
1519 locality.getAtomic(lb).get(fn.getPrev(0)).intValue()==0) {
1520 //We have an atomic enter
1521 FlatAtomicEnterNode faen=(FlatAtomicEnterNode) fn;
1522 Set<FlatNode> exitset=faen.getExits();
1524 String methodname=md.getSymbol()+(atomicmethodcount++);
1525 AtomicRecord ar=new AtomicRecord();
1529 atomicmethodmap.put(faen, ar);
1531 //build data structure declaration
1532 output.println("struct atomicprimitives_"+methodname+" {");
1534 Set<FlatNode> recordset=delaycomp.livecode(lb);
1535 Set<TempDescriptor> liveinto=delaycomp.liveinto(lb, faen, recordset);
1536 Set<TempDescriptor> liveout=delaycomp.liveout(lb, faen);
1537 Set<TempDescriptor> liveoutvirtualread=delaycomp.liveoutvirtualread(lb, faen);
1539 ar.reallivein=new HashSet(liveinto);
1541 ar.liveoutvirtualread=liveoutvirtualread;
1543 for(Iterator<TempDescriptor> it=liveinto.iterator(); it.hasNext();) {
1544 TempDescriptor tmp=it.next();
1545 //remove the pointers
1546 if (tmp.getType().isPtr()) {
1549 //let's print it here
1550 output.println(tmp.getType().getSafeSymbol()+" "+tmp.getSafeSymbol()+";");
1553 for(Iterator<TempDescriptor> it=liveout.iterator(); it.hasNext();) {
1554 TempDescriptor tmp=it.next();
1555 //remove the pointers
1556 if (tmp.getType().isPtr()) {
1558 } else if (!liveinto.contains(tmp)) {
1559 //let's print it here
1560 output.println(tmp.getType().getSafeSymbol()+" "+tmp.getSafeSymbol()+";");
1563 output.println("};");
1565 //print out method name
1566 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) {");
1567 //build code for commit method
1569 //first define local primitives
1570 Set<TempDescriptor> alltemps=delaycomp.alltemps(lb, faen, recordset);
1571 for(Iterator<TempDescriptor> tmpit=alltemps.iterator();tmpit.hasNext();) {
1572 TempDescriptor tmp=tmpit.next();
1573 if (!tmp.getType().isPtr()) {
1574 if (liveinto.contains(tmp)||liveoutvirtualread.contains(tmp)) {
1575 //read from live into set
1576 output.println(tmp.getType().getSafeSymbol()+" "+tmp.getSafeSymbol()+"=primitives->"+tmp.getSafeSymbol()+";");
1579 output.println(tmp.getType().getSafeSymbol()+" "+tmp.getSafeSymbol()+";");
1583 //turn off write barrier generation
1585 state.SINGLETM=false;
1586 generateCode(faen, fm, lb, exitset, output, false);
1587 state.SINGLETM=true;
1588 //turn on write barrier generation
1590 output.println("}\n\n");
1594 //redefine these back to normal
1596 localsprefixaddr="&"+localsprefix;
1597 localsprefixderef=localsprefix+".";
1599 generateHeader(fm, lb, md!=null ? md : task,output);
1600 TempObject objecttemp=(TempObject) tempstable.get(lb!=null ? lb : md!=null ? md : task);
1602 if (state.DELAYCOMP&&!lb.isAtomic()&&lb.getHasAtomic()) {
1603 for(Iterator<AtomicRecord> arit=arset.iterator();arit.hasNext();) {
1604 AtomicRecord ar=arit.next();
1605 output.println("struct atomicprimitives_"+ar.name+" primitives_"+ar.name+";");
1609 if (GENERATEPRECISEGC) {
1610 if (md!=null&&(state.DSM||state.SINGLETM))
1611 output.print(" struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+"={");
1612 else if (md!=null&&!(state.DSM||state.SINGLETM))
1613 output.print(" struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+"={");
1615 output.print(" struct "+task.getSafeSymbol()+"_locals "+localsprefix+"={");
1617 output.print(objecttemp.numPointers()+",");
1618 output.print(paramsprefix);
1619 for(int j=0; j<objecttemp.numPointers(); j++)
1620 output.print(", NULL");
1621 output.println("};");
1624 for(int i=0; i<objecttemp.numPrimitives(); i++) {
1625 TempDescriptor td=objecttemp.getPrimitive(i);
1626 TypeDescriptor type=td.getType();
1628 output.println(" void * "+td.getSafeSymbol()+";");
1629 else if (type.isClass()||type.isArray())
1630 output.println(" struct "+type.getSafeSymbol()+" * "+td.getSafeSymbol()+";");
1632 output.println(" "+type.getSafeSymbol()+" "+td.getSafeSymbol()+";");
1635 /* Check to see if we need to do a GC if this is a
1636 * multi-threaded program...*/
1638 if ((state.THREAD||state.DSM||state.SINGLETM)&&GENERATEPRECISEGC) {
1639 //Don't bother if we aren't in recursive methods...The loops case will catch it
1640 if (callgraph.getAllMethods(md).contains(md)) {
1641 if (state.DSM&&lb.isAtomic())
1642 output.println("if (needtocollect) checkcollect2("+localsprefixaddr+");");
1644 output.println("if (needtocollect) checkcollect("+localsprefixaddr+");");
1648 generateCode(fm.getNext(0), fm, lb, null, output, true);
1650 output.println("}\n\n");
1653 // when a new mlp thread is created for an issued SESE, it is started
1654 // by running this method which blocks on a cond variable until
1655 // it is allowed to transition to execute. Then a case statement
1656 // allows it to invoke the method with the proper SESE body, and after
1657 // exiting the SESE method, executes proper SESE exit code before the
1658 // thread can be destroyed
1659 private void generateSESEinvocationMethod(PrintWriter outmethodheader,
1660 PrintWriter outmethod
1663 outmethodheader.println("void invokeSESEmethod( void* vargs );");
1664 outmethod.println( "void invokeSESEmethod( void* vargs ) {");
1665 outmethod.println( " int status;");
1666 outmethod.println( " char errmsg[128];");
1667 outmethod.println( " invokeSESEargs* args = (invokeSESEargs*) vargs;");
1670 // wait on a condition variable that dispatcher will signal
1671 // then this SESE instance's dependencies are resolved
1672 outmethod.println( " status = pthread_mutex_lock( args->invokee->startCondVarLock );");
1673 outmethod.println( " "+mlperrstr);
1674 outmethod.println( " while( !(args->invokee->startedExecuting) ){");
1675 outmethod.println( " status = pthread_cond_wait( args->invokee->startCondVar, args->invokee->startCondVarLock );");
1676 outmethod.println( " "+mlperrstr);
1677 outmethod.println( " }");
1680 // generate a case for each SESE class that can be invoked
1681 outmethod.println( " switch( args->classID ) {");
1682 outmethod.println( " ");
1683 for(Iterator<FlatSESEEnterNode> seseit=mlpa.getAllSESEs().iterator();seseit.hasNext();) {
1684 FlatSESEEnterNode fsen = seseit.next();
1685 outmethod.println( " /* "+fsen.getPrettyIdentifier()+" */");
1686 outmethod.println( " case "+fsen.getIdentifier()+":");
1687 generateSESEinvocation(fsen, outmethod);
1688 outmethod.println( " break;");
1689 outmethod.println( "");
1692 // default case should never be taken, error out
1693 outmethod.println( " default:");
1694 outmethod.println( " printf(\"Error: unknown SESE class ID in invoke method.\\n\");");
1695 outmethod.println( " exit(-30);");
1696 outmethod.println( " break;");
1697 outmethod.println( " }");
1698 outmethod.println( "}\n\n");
1701 private void generateSESEinvocation(FlatSESEEnterNode fsen,
1705 FlatMethod fm = fsen.getEnclosingFlatMeth();
1706 MethodDescriptor md = fm.getMethod();
1707 ClassDescriptor cn = md.getClassDesc();
1709 FlatMethod bogusfm = sese2bogusFlatMeth.get(fsen);
1710 MethodDescriptor bogusmd = bogusfm.getMethod();
1711 ParamsObject objectparams = (ParamsObject)paramstable.get(bogusmd);
1713 // first copy SESE record into param structure
1716 // then invoke the sese's method
1717 output.print(" "+cn.getSafeSymbol()+bogusmd.getSafeSymbol()+"_"+bogusmd.getSafeMethodDescriptor());
1718 output.print("( args->invokee, ");
1720 // first argument is parameter structure
1721 output.print("(struct "+cn.getSafeSymbol()+bogusmd.getSafeSymbol()+"__params*)");
1722 output.print("&(args->invokee->paramStruct)");
1724 // other arguments are primitive parameters
1725 for(int i=0; i<objectparams.numPrimitives(); i++) {
1726 TempDescriptor td=objectparams.getPrimitive(i);
1727 TypeDescriptor type=td.getType();
1728 assert type.isPrimitive();
1729 output.print( ", (("+fsen.namespaceStructNameString()+
1730 "*)args->invokee->namespace)->"+td );
1733 output.println(");");
1736 protected void generateMethodSESE(FlatSESEEnterNode fsen,
1738 PrintWriter outputStructs,
1739 PrintWriter outputMethHead,
1740 PrintWriter outputMethods
1744 FlatMethod fm = fsen.getEnclosingFlatMeth();
1745 MethodDescriptor md = fm.getMethod();
1746 ClassDescriptor cn = md.getClassDesc();
1749 //Creates bogus method descriptor to index into tables
1750 Modifiers bogusmod=new Modifiers();
1751 MethodDescriptor bogusmd=new MethodDescriptor(bogusmod,
1752 new TypeDescriptor(TypeDescriptor.VOID),
1753 "sese_"+fsen.getPrettyIdentifier()+fsen.getIdentifier());
1754 bogusmd.setClassDesc(cn);
1755 FlatMethod bogusfm=new FlatMethod(bogusmd, null);
1756 sese2bogusFlatMeth.put(fsen, bogusfm);
1759 //Build paramsobj for bogus method descriptor
1760 ParamsObject objectparams=new ParamsObject(bogusmd, tag++);
1761 paramstable.put(bogusmd, objectparams);
1763 for(int i=0; i<fsen.numParameters(); i++) {
1764 TempDescriptor temp=fsen.getParameter(i);
1765 TypeDescriptor type=temp.getType();
1766 if (type.isPtr()&&GENERATEPRECISEGC) {
1767 objectparams.addPtr(temp);
1769 objectparams.addPrim(temp);
1774 //Build normal temp object for bogus method descriptor
1775 TempObject objecttemps=new TempObject(objectparams,bogusmd,tag++);
1776 tempstable.put(bogusmd, objecttemps);
1778 for(Iterator nodeit=fsen.getNodeSet().iterator(); nodeit.hasNext();) {
1779 FlatNode fn=(FlatNode)nodeit.next();
1780 TempDescriptor[] writes=fn.writesTemps();
1781 for(int i=0; i<writes.length; i++) {
1782 TempDescriptor temp=writes[i];
1783 TypeDescriptor type=temp.getType();
1784 if (type.isPtr()&&GENERATEPRECISEGC)
1785 objecttemps.addPtr(temp);
1787 objecttemps.addPrim(temp);
1791 // declare namespace struct
1792 outputStructs.println(fsen.namespaceStructDeclarationString());
1794 //Generate code for parameters structure
1795 generateMethodParam(cn, bogusmd, null, outputStructs);
1797 //Generate code for locals structure
1798 outputStructs.println("struct "+cn.getSafeSymbol()+bogusmd.getSafeSymbol()+"_"+bogusmd.getSafeMethodDescriptor()+"_locals {");
1799 outputStructs.println(" INTPTR size;");
1800 outputStructs.println(" void * next;");
1801 for(int i=0; i<objecttemps.numPointers(); i++) {
1802 TempDescriptor temp=objecttemps.getPointer(i);
1803 if (temp.getType().isNull())
1804 outputStructs.println(" void * "+temp.getSafeSymbol()+";");
1806 outputStructs.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1808 outputStructs.println("};\n");
1811 // write method declaration to header file
1812 outputMethHead.print("void ");
1813 outputMethHead.print(cn.getSafeSymbol()+bogusmd.getSafeSymbol()+"_"+bogusmd.getSafeMethodDescriptor()+"(");
1814 outputMethHead.print("SESErecord* currentSESE, ");
1815 boolean printcomma=false;
1816 if (GENERATEPRECISEGC) {
1817 outputMethHead.print("struct "+cn.getSafeSymbol()+
1818 bogusmd.getSafeSymbol()+"_"+
1819 bogusmd.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1822 // Output parameter list
1823 for(int i=0; i<objectparams.numPrimitives(); i++) {
1824 TempDescriptor temp=objectparams.getPrimitive(i);
1826 outputMethHead.print(", ");
1828 if (temp.getType().isClass()||temp.getType().isArray())
1829 outputMethHead.print("struct " + temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
1831 outputMethHead.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
1833 outputMethHead.println(");\n");
1836 generateFlatMethodSESE(bogusfm, cn, fsen, fsen.getFlatExit(), outputMethods);
1839 private void generateFlatMethodSESE(FlatMethod fm,
1841 FlatSESEEnterNode seseEnter,
1842 FlatSESEExitNode seseExit,
1846 MethodDescriptor md=fm.getMethod();
1847 ParamsObject objectparams=(ParamsObject)paramstable.get(md);
1848 generateHeader(fm, null, md, output, true);
1849 TempObject objecttemp=(TempObject) tempstable.get(md);
1852 if (GENERATEPRECISEGC) {
1853 output.print(" struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+"={");
1854 output.print(objecttemp.numPointers()+",");
1855 output.print(paramsprefix);
1856 for(int j=0; j<objecttemp.numPointers(); j++)
1857 output.print(", NULL");
1858 output.println("};");
1861 for(int i=0; i<objecttemp.numPrimitives(); i++) {
1862 TempDescriptor td=objecttemp.getPrimitive(i);
1863 TypeDescriptor type=td.getType();
1865 output.println(" void * "+td.getSafeSymbol()+";");
1866 else if (type.isClass()||type.isArray())
1867 output.println(" struct "+type.getSafeSymbol()+" * "+td.getSafeSymbol()+";");
1869 output.println(" "+type.getSafeSymbol()+" "+td.getSafeSymbol()+";");
1873 // declare variables for naming SESE's
1874 Iterator<SESEandAgePair> pItr = seseEnter.getNeededStaticNames().iterator();
1875 while( pItr.hasNext() ) {
1876 SESEandAgePair p = pItr.next();
1877 output.println(" SESErecord* "+p+";");
1881 // Check to see if we need to do a GC if this is a
1882 // multi-threaded program...
1883 if (GENERATEPRECISEGC) {
1884 //Don't bother if we aren't in recursive methods...The loops case will catch it
1885 if (callgraph.getAllMethods(md).contains(md)) {
1886 output.println("if (needtocollect) checkcollect("+localsprefixaddr+");");
1890 HashSet<FlatNode> exitset=new HashSet<FlatNode>();
1891 exitset.add(seseExit);
1892 generateCode(seseEnter.getNext(0), fm, null, exitset, output, true);
1895 output.println("}\n\n");
1898 protected void generateCode(FlatNode first,
1901 Set<FlatNode> stopset,
1902 PrintWriter output, boolean firstpass) {
1904 // for any method, allocate temps to use when
1905 // issuing a new SESE sometime during the execution
1906 // of that method, whether it be a user-defined method
1907 // or a method representing the body of an SESE
1908 // TODO: only do this if we know the method actually
1909 // contains an SESE issue, not currently an annotation
1911 output.println(" SESErecord* tempSESE;");
1912 output.println(" invokeSESEargs* tempSESEargs;");
1915 /* Assign labels to FlatNode's if necessary.*/
1916 Hashtable<FlatNode, Integer> nodetolabel=assignLabels(first, stopset);
1918 Set<FlatNode> storeset=null;
1919 HashSet<FlatNode> genset=null;
1920 Set<FlatNode> unionset=null;
1922 if (state.DELAYCOMP&&!lb.isAtomic()&&lb.getHasAtomic()) {
1923 storeset=delaycomp.livecode(lb);
1924 genset=new HashSet<FlatNode>();
1926 genset.addAll(delaycomp.getCannotDelay(lb));
1927 genset.addAll(delaycomp.getOther(lb));
1929 genset.addAll(delaycomp.getNotReady(lb));
1931 unionset=new HashSet<FlatNode>();
1932 unionset.addAll(storeset);
1933 unionset.addAll(genset);
1936 /* Do the actual code generation */
1937 FlatNode current_node=null;
1938 HashSet tovisit=new HashSet();
1939 HashSet visited=new HashSet();
1941 tovisit.add(first.getNext(0));
1944 while(current_node!=null||!tovisit.isEmpty()) {
1945 if (current_node==null) {
1946 current_node=(FlatNode)tovisit.iterator().next();
1947 tovisit.remove(current_node);
1948 } else if (tovisit.contains(current_node)) {
1949 tovisit.remove(current_node);
1951 visited.add(current_node);
1952 if (nodetolabel.containsKey(current_node)) {
1953 output.println("L"+nodetolabel.get(current_node)+":");
1955 if (state.INSTRUCTIONFAILURE) {
1956 if (state.THREAD||state.DSM||state.SINGLETM) {
1957 output.println("if ((++instructioncount)>failurecount) {instructioncount=0;injectinstructionfailure();}");
1959 output.println("if ((--instructioncount)==0) injectinstructionfailure();");
1961 if (current_node.numNext()==0||stopset!=null&&stopset.contains(current_node)) {
1963 if (!state.DELAYCOMP||firstpass) {
1964 generateFlatNode(fm, lb, current_node, output);
1966 //store primitive variables in out set
1967 AtomicRecord ar=atomicmethodmap.get((FlatAtomicEnterNode)first);
1968 Set<TempDescriptor> liveout=ar.liveout;
1969 for(Iterator<TempDescriptor> tmpit=liveout.iterator();tmpit.hasNext();) {
1970 TempDescriptor tmp=tmpit.next();
1971 output.println("primitives->"+tmp.getSafeSymbol()+"="+tmp.getSafeSymbol()+";");
1974 if (current_node.kind()!=FKind.FlatReturnNode) {
1975 output.println(" return;");
1978 } else if(current_node.numNext()==1) {
1980 if (state.MLP && current_node.kind()==FKind.FlatSESEEnterNode) {
1981 FlatSESEEnterNode fsen = (FlatSESEEnterNode)current_node;
1982 generateFlatNode(fm, lb, current_node, output);
1983 nextnode=fsen.getFlatExit().getNext(0);
1984 } else if (state.DELAYCOMP) {
1985 boolean specialprimitive=false;
1986 //skip literals...no need to add extra overhead
1987 if (storeset!=null&&storeset.contains(current_node)&¤t_node.kind()==FKind.FlatLiteralNode) {
1988 TypeDescriptor typedesc=((FlatLiteralNode)current_node).getType();
1989 if (!typedesc.isClass()&&!typedesc.isArray()) {
1990 specialprimitive=true;
1994 if (genset==null||genset.contains(current_node)||specialprimitive)
1995 generateFlatNode(fm, lb, current_node, output);
1996 if (storeset!=null&&storeset.contains(current_node)&&!specialprimitive) {
1997 TempDescriptor wrtmp=current_node.writesTemps()[0];
1999 //need to store value written by previous node
2000 if (wrtmp.getType().isPtr()) {
2001 //only lock the objects that may actually need locking
2002 if (recorddc.getNeedTrans(lb, current_node)) {
2003 output.println("STOREPTR("+generateTemp(fm, wrtmp,lb)+");");
2005 output.println("STOREPTRNOLOCK("+generateTemp(fm, wrtmp,lb)+");");
2008 output.println("STORE"+wrtmp.getType().getSafeDescriptor()+"("+generateTemp(fm, wrtmp, lb)+");");
2011 //need to read value read by previous node
2012 if (wrtmp.getType().isPtr()) {
2013 output.println("RESTOREPTR("+generateTemp(fm, wrtmp,lb)+");");
2015 output.println("RESTORE"+wrtmp.getType().getSafeDescriptor()+"("+generateTemp(fm, wrtmp, lb)+");");
2019 nextnode=current_node.getNext(0);
2022 generateFlatNode(fm, lb, current_node, output);
2023 nextnode=current_node.getNext(0);
2025 if (visited.contains(nextnode)) {
2026 output.println("goto L"+nodetolabel.get(nextnode)+";");
2029 current_node=nextnode;
2030 } else if (current_node.numNext()==2) {
2032 if (state.DELAYCOMP) {
2033 boolean computeside=false;
2035 //need to record which way it should go
2036 if (genset==null||genset.contains(current_node)) {
2037 if (storeset!=null&&storeset.contains(current_node)) {
2038 //need to store which way branch goes
2039 generateStoreFlatCondBranch(fm, lb, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
2041 generateFlatCondBranch(fm, lb, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
2043 //which side to execute
2047 if (genset.contains(current_node)) {
2048 generateFlatCondBranch(fm, lb, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
2049 } else if (storeset.contains(current_node)) {
2051 output.println("RESTOREANDBRANCH(L"+nodetolabel.get(current_node.getNext(1))+");");
2053 //which side to execute
2058 Set<FlatNode> leftset=DelayComputation.getNext(current_node, 0, unionset, lb,locality, true);
2060 if (leftset.size()==0)
2062 if (visited.contains(current_node.getNext(branch))) {
2063 //already visited -- build jump
2064 output.println("goto L"+nodetolabel.get(current_node.getNext(branch))+";");
2067 current_node=current_node.getNext(branch);
2070 if (!visited.contains(current_node.getNext(1)))
2071 tovisit.add(current_node.getNext(1));
2072 if (visited.contains(current_node.getNext(0))) {
2073 output.println("goto L"+nodetolabel.get(current_node.getNext(0))+";");
2076 current_node=current_node.getNext(0);
2080 generateFlatCondBranch(fm, lb, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
2081 if (!visited.contains(current_node.getNext(1)))
2082 tovisit.add(current_node.getNext(1));
2083 if (visited.contains(current_node.getNext(0))) {
2084 output.println("goto L"+nodetolabel.get(current_node.getNext(0))+";");
2087 current_node=current_node.getNext(0);
2089 } else throw new Error();
2093 /** This method assigns labels to FlatNodes */
2094 protected Hashtable<FlatNode, Integer> assignLabels(FlatNode first) {
2095 return assignLabels(first, null);
2098 protected Hashtable<FlatNode, Integer> assignLabels(FlatNode first, Set<FlatNode> lastset) {
2099 HashSet tovisit=new HashSet();
2100 HashSet visited=new HashSet();
2102 Hashtable<FlatNode, Integer> nodetolabel=new Hashtable<FlatNode, Integer>();
2105 /*Assign labels first. A node needs a label if the previous
2106 * node has two exits or this node is a join point. */
2108 while(!tovisit.isEmpty()) {
2109 FlatNode fn=(FlatNode)tovisit.iterator().next();
2114 if(lastset!=null&&lastset.contains(fn)) {
2115 // if last is not null and matches, don't go
2116 // any further for assigning labels
2120 for(int i=0; i<fn.numNext(); i++) {
2121 FlatNode nn=fn.getNext(i);
2124 //1) Edge >1 of node
2125 nodetolabel.put(nn,new Integer(labelindex++));
2127 if (!visited.contains(nn)&&!tovisit.contains(nn)) {
2131 nodetolabel.put(nn,new Integer(labelindex++));
2139 /** Generate text string that corresponds to the TempDescriptor td. */
2140 protected String generateTemp(FlatMethod fm, TempDescriptor td, LocalityBinding lb) {
2141 MethodDescriptor md=fm.getMethod();
2142 TaskDescriptor task=fm.getTask();
2143 TempObject objecttemps=(TempObject) tempstable.get(lb!=null ? lb : md!=null ? md : task);
2145 if (objecttemps.isLocalPrim(td)||objecttemps.isParamPrim(td)) {
2146 //System.out.println("generateTemp returns " + td.getSafeSymbol());
2147 return td.getSafeSymbol();
2150 if (objecttemps.isLocalPtr(td)) {
2151 return localsprefixderef+td.getSafeSymbol();
2154 if (objecttemps.isParamPtr(td)) {
2155 return paramsprefix+"->"+td.getSafeSymbol();
2161 protected void generateFlatNode(FlatMethod fm, LocalityBinding lb, FlatNode fn, PrintWriter output) {
2163 case FKind.FlatAtomicEnterNode:
2164 generateFlatAtomicEnterNode(fm, lb, (FlatAtomicEnterNode) fn, output);
2167 case FKind.FlatAtomicExitNode:
2168 generateFlatAtomicExitNode(fm, lb, (FlatAtomicExitNode) fn, output);
2171 case FKind.FlatInstanceOfNode:
2172 generateFlatInstanceOfNode(fm, lb, (FlatInstanceOfNode)fn, output);
2175 case FKind.FlatSESEEnterNode:
2176 generateFlatSESEEnterNode(fm, lb, (FlatSESEEnterNode)fn, output);
2179 case FKind.FlatSESEExitNode:
2180 generateFlatSESEExitNode(fm, lb, (FlatSESEExitNode)fn, output);
2183 case FKind.FlatGlobalConvNode:
2184 generateFlatGlobalConvNode(fm, lb, (FlatGlobalConvNode) fn, output);
2187 case FKind.FlatTagDeclaration:
2188 generateFlatTagDeclaration(fm, lb, (FlatTagDeclaration) fn,output);
2191 case FKind.FlatCall:
2192 generateFlatCall(fm, lb, (FlatCall) fn,output);
2195 case FKind.FlatFieldNode:
2196 generateFlatFieldNode(fm, lb, (FlatFieldNode) fn,output);
2199 case FKind.FlatElementNode:
2200 generateFlatElementNode(fm, lb, (FlatElementNode) fn,output);
2203 case FKind.FlatSetElementNode:
2204 generateFlatSetElementNode(fm, lb, (FlatSetElementNode) fn,output);
2207 case FKind.FlatSetFieldNode:
2208 generateFlatSetFieldNode(fm, lb, (FlatSetFieldNode) fn,output);
2212 generateFlatNew(fm, lb, (FlatNew) fn,output);
2215 case FKind.FlatOpNode:
2216 generateFlatOpNode(fm, lb, (FlatOpNode) fn,output);
2219 case FKind.FlatCastNode:
2220 generateFlatCastNode(fm, lb, (FlatCastNode) fn,output);
2223 case FKind.FlatLiteralNode:
2224 generateFlatLiteralNode(fm, lb, (FlatLiteralNode) fn,output);
2227 case FKind.FlatReturnNode:
2228 generateFlatReturnNode(fm, lb, (FlatReturnNode) fn,output);
2232 output.println("/* nop */");
2235 case FKind.FlatExit:
2236 output.println("/* exit */");
2239 case FKind.FlatBackEdge:
2240 if ((state.THREAD||state.DSM||state.SINGLETM)&&GENERATEPRECISEGC) {
2241 if(state.DSM&&locality.getAtomic(lb).get(fn).intValue()>0) {
2242 output.println("if (needtocollect) checkcollect2("+localsprefixaddr+");");
2244 output.println("if (needtocollect) checkcollect("+localsprefixaddr+");");
2246 output.println("/* nop */");
2249 case FKind.FlatCheckNode:
2250 generateFlatCheckNode(fm, lb, (FlatCheckNode) fn, output);
2253 case FKind.FlatFlagActionNode:
2254 generateFlatFlagActionNode(fm, lb, (FlatFlagActionNode) fn, output);
2257 case FKind.FlatPrefetchNode:
2258 generateFlatPrefetchNode(fm,lb, (FlatPrefetchNode) fn, output);
2261 case FKind.FlatOffsetNode:
2262 generateFlatOffsetNode(fm, lb, (FlatOffsetNode)fn, output);
2271 CodePlan cp = mlpa.getCodePlan( fn );
2274 Set<VariableSourceToken> writeDynamic = cp.getWriteToDynamicSrc();
2275 if( writeDynamic != null ) {
2282 public void generateFlatOffsetNode(FlatMethod fm, LocalityBinding lb, FlatOffsetNode fofn, PrintWriter output) {
2283 output.println("/* FlatOffsetNode */");
2284 FieldDescriptor fd=fofn.getField();
2285 output.println(generateTemp(fm, fofn.getDst(),lb)+ " = (short)(int) (&((struct "+fofn.getClassType().getSafeSymbol() +" *)0)->"+ fd.getSafeSymbol()+");");
2286 output.println("/* offset */");
2289 public void generateFlatPrefetchNode(FlatMethod fm, LocalityBinding lb, FlatPrefetchNode fpn, PrintWriter output) {
2290 if (state.PREFETCH) {
2291 Vector oids = new Vector();
2292 Vector fieldoffset = new Vector();
2293 Vector endoffset = new Vector();
2294 int tuplecount = 0; //Keeps track of number of prefetch tuples that need to be generated
2295 for(Iterator it = fpn.hspp.iterator(); it.hasNext();) {
2296 PrefetchPair pp = (PrefetchPair) it.next();
2297 Integer statusbase = locality.getNodePreTempInfo(lb,fpn).get(pp.base);
2298 /* Find prefetches that can generate oid */
2299 if(statusbase == LocalityAnalysis.GLOBAL) {
2300 generateTransCode(fm, lb, pp, oids, fieldoffset, endoffset, tuplecount, locality.getAtomic(lb).get(fpn).intValue()>0, false);
2302 } else if (statusbase == LocalityAnalysis.LOCAL) {
2303 generateTransCode(fm,lb,pp,oids,fieldoffset,endoffset,tuplecount,false,true);
2310 System.out.println("Adding prefetch "+fpn+ " to method:" +fm);
2311 output.println("{");
2312 output.println("/* prefetch */");
2313 output.println("/* prefetchid_" + fpn.siteid + " */");
2314 output.println("void * prefptr;");
2315 output.println("int tmpindex;");
2317 output.println("if((evalPrefetch["+fpn.siteid+"].operMode) || (evalPrefetch["+fpn.siteid+"].retrycount <= 0)) {");
2318 /*Create C code for oid array */
2319 output.print(" unsigned int oidarray_[] = {");
2320 boolean needcomma=false;
2321 for (Iterator it = oids.iterator(); it.hasNext();) {
2324 output.print(it.next());
2327 output.println("};");
2329 /*Create C code for endoffset values */
2330 output.print(" unsigned short endoffsetarry_[] = {");
2332 for (Iterator it = endoffset.iterator(); it.hasNext();) {
2335 output.print(it.next());
2338 output.println("};");
2340 /*Create C code for Field Offset Values */
2341 output.print(" short fieldarry_[] = {");
2343 for (Iterator it = fieldoffset.iterator(); it.hasNext();) {
2346 output.print(it.next());
2349 output.println("};");
2350 /* make the prefetch call to Runtime */
2351 output.println(" if(!evalPrefetch["+fpn.siteid+"].operMode) {");
2352 output.println(" evalPrefetch["+fpn.siteid+"].retrycount = RETRYINTERVAL;");
2353 output.println(" }");
2354 output.println(" prefetch("+fpn.siteid+" ,"+tuplecount+", oidarray_, endoffsetarry_, fieldarry_);");
2355 output.println(" } else {");
2356 output.println(" evalPrefetch["+fpn.siteid+"].retrycount--;");
2357 output.println(" }");
2358 output.println("}");
2362 public void generateTransCode(FlatMethod fm, LocalityBinding lb,PrefetchPair pp, Vector oids, Vector fieldoffset, Vector endoffset, int tuplecount, boolean inside, boolean localbase) {
2363 short offsetcount = 0;
2367 } else if (localbase) {
2368 for(; breakindex<pp.desc.size(); breakindex++) {
2369 Descriptor desc=pp.getDescAt(breakindex);
2370 if (desc instanceof FieldDescriptor) {
2371 FieldDescriptor fd=(FieldDescriptor)desc;
2372 if (fd.isGlobal()) {
2380 if (breakindex>pp.desc.size()) //all local
2383 TypeDescriptor lasttype=pp.base.getType();
2384 String basestr=generateTemp(fm, pp.base, lb);
2386 boolean maybenull=fm.getMethod().isStatic()||
2387 !pp.base.equals(fm.getParameter(0));
2389 for(int i=0; i<breakindex; i++) {
2390 String indexcheck="";
2392 Descriptor desc=pp.getDescAt(i);
2393 if (desc instanceof FieldDescriptor) {
2394 FieldDescriptor fd=(FieldDescriptor)desc;
2396 if (!teststr.equals(""))
2398 teststr+="((prefptr="+basestr+")!=NULL)";
2399 basestr="((struct "+lasttype.getSafeSymbol()+" *)prefptr)->"+fd.getSafeSymbol();
2401 basestr=basestr+"->"+fd.getSafeSymbol();
2404 lasttype=fd.getType();
2406 IndexDescriptor id=(IndexDescriptor)desc;
2407 indexcheck="((tmpindex=";
2408 for(int j=0; j<id.tddesc.size(); j++) {
2409 indexcheck+=generateTemp(fm, id.getTempDescAt(j), lb)+"+";
2411 indexcheck+=id.offset+")>=0)&(tmpindex<((struct ArrayObject *)prefptr)->___length___)";
2413 if (!teststr.equals(""))
2415 teststr+="((prefptr="+basestr+")!= NULL) &&"+indexcheck;
2416 basestr="((void **)(((char *) &(((struct ArrayObject *)prefptr)->___length___))+sizeof(int)))[tmpindex]";
2418 lasttype=lasttype.dereference();
2423 if (teststr.equals("")) {
2424 oid="((unsigned int)"+basestr+")";
2426 oid="((unsigned int)(("+teststr+")?"+basestr+":NULL))";
2430 for(int i = breakindex; i < pp.desc.size(); i++) {
2431 String newfieldoffset;
2432 Object desc = pp.getDescAt(i);
2433 if(desc instanceof FieldDescriptor) {
2434 FieldDescriptor fd=(FieldDescriptor)desc;
2435 newfieldoffset = new String("(unsigned int)(&(((struct "+ lasttype.getSafeSymbol()+" *)0)->"+ fd.getSafeSymbol()+ "))");
2436 lasttype=fd.getType();
2438 newfieldoffset = "";
2439 IndexDescriptor id=(IndexDescriptor)desc;
2440 for(int j = 0; j < id.tddesc.size(); j++) {
2441 newfieldoffset += generateTemp(fm, id.getTempDescAt(j), lb) + "+";
2443 newfieldoffset += id.offset.toString();
2444 lasttype=lasttype.dereference();
2446 fieldoffset.add(newfieldoffset);
2449 int base=(tuplecount>0) ? ((Short)endoffset.get(tuplecount-1)).intValue() : 0;
2450 base+=pp.desc.size()-breakindex;
2451 endoffset.add(new Short((short)base));
2456 public void generateFlatGlobalConvNode(FlatMethod fm, LocalityBinding lb, FlatGlobalConvNode fgcn, PrintWriter output) {
2457 if (lb!=fgcn.getLocality())
2459 /* Have to generate flat globalconv */
2460 if (fgcn.getMakePtr()) {
2462 output.println("TRANSREAD("+generateTemp(fm, fgcn.getSrc(),lb)+", (unsigned int) "+generateTemp(fm, fgcn.getSrc(),lb)+");");
2464 if ((dc==null)||!state.READSET&&dc.getNeedTrans(lb, fgcn)||state.READSET&&dc.getNeedWriteTrans(lb, fgcn)) {
2465 //need to do translation
2466 output.println("TRANSREAD("+generateTemp(fm, fgcn.getSrc(),lb)+", "+generateTemp(fm, fgcn.getSrc(),lb)+", (void *)("+localsprefixaddr+"));");
2467 } else if (state.READSET&&dc.getNeedTrans(lb, fgcn)) {
2468 output.println("TRANSREADRD("+generateTemp(fm, fgcn.getSrc(),lb)+", "+generateTemp(fm, fgcn.getSrc(),lb)+");");
2472 /* Need to convert to OID */
2473 if ((dc==null)||dc.getNeedSrcTrans(lb,fgcn)) {
2474 if (fgcn.doConvert()||(delaycomp!=null&&atomicmethodmap.get(fgcn.getAtomicEnter()).reallivein.contains(fgcn.getSrc()))) {
2475 output.println(generateTemp(fm, fgcn.getSrc(),lb)+"=(void *)COMPOID("+generateTemp(fm, fgcn.getSrc(),lb)+");");
2477 output.println(generateTemp(fm, fgcn.getSrc(),lb)+"=NULL;");
2483 public void generateFlatInstanceOfNode(FlatMethod fm, LocalityBinding lb, FlatInstanceOfNode fion, PrintWriter output) {
2485 if (fion.getType().isArray()) {
2486 type=state.getArrayNumber(fion.getType())+state.numClasses();
2488 type=fion.getType().getClassDesc().getId();
2491 if (fion.getType().getSymbol().equals(TypeUtil.ObjectClass))
2492 output.println(generateTemp(fm, fion.getDst(), lb)+"=1;");
2494 output.println(generateTemp(fm, fion.getDst(), lb)+"=instanceof("+generateTemp(fm,fion.getSrc(),lb)+","+type+");");
2497 public void generateFlatAtomicEnterNode(FlatMethod fm, LocalityBinding lb, FlatAtomicEnterNode faen, PrintWriter output) {
2498 /* Check to see if we need to generate code for this atomic */
2499 if (locality==null) {
2500 output.println("pthread_mutex_lock(&atomiclock);");
2504 if (locality.getAtomic(lb).get(faen.getPrev(0)).intValue()>0)
2508 if (state.DELAYCOMP) {
2509 AtomicRecord ar=atomicmethodmap.get(faen);
2511 for(Iterator<TempDescriptor> tmpit=ar.livein.iterator();tmpit.hasNext();) {
2512 TempDescriptor tmp=tmpit.next();
2513 output.println("primitives_"+ar.name+"."+tmp.getSafeSymbol()+"="+tmp.getSafeSymbol()+";");
2516 //copy outs that depend on path
2517 for(Iterator<TempDescriptor> tmpit=ar.liveoutvirtualread.iterator();tmpit.hasNext();) {
2518 TempDescriptor tmp=tmpit.next();
2519 if (!ar.livein.contains(tmp))
2520 output.println("primitives_"+ar.name+"."+tmp.getSafeSymbol()+"="+tmp.getSafeSymbol()+";");
2524 /* Backup the temps. */
2525 for(Iterator<TempDescriptor> tmpit=locality.getTemps(lb).get(faen).iterator(); tmpit.hasNext();) {
2526 TempDescriptor tmp=tmpit.next();
2527 output.println(generateTemp(fm, backuptable.get(lb).get(tmp),lb)+"="+generateTemp(fm,tmp,lb)+";");
2530 output.println("goto transstart"+faen.getIdentifier()+";");
2532 /******* Print code to retry aborted transaction *******/
2533 output.println("transretry"+faen.getIdentifier()+":");
2536 for(Iterator<TempDescriptor> tmpit=locality.getTemps(lb).get(faen).iterator(); tmpit.hasNext();) {
2537 TempDescriptor tmp=tmpit.next();
2538 output.println(generateTemp(fm, tmp,lb)+"="+generateTemp(fm,backuptable.get(lb).get(tmp),lb)+";");
2542 /********* Need to revert local object store ********/
2543 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
2545 output.println("while ("+revertptr+") {");
2546 output.println("struct ___Object___ * tmpptr;");
2547 output.println("tmpptr="+revertptr+"->"+nextobjstr+";");
2548 output.println("REVERT_OBJ("+revertptr+");");
2549 output.println(revertptr+"=tmpptr;");
2550 output.println("}");
2552 /******* Tell the runtime to start the transaction *******/
2554 output.println("transstart"+faen.getIdentifier()+":");
2555 output.println("transStart();");
2557 if (state.ABORTREADERS) {
2558 output.println("if (_setjmp(aborttrans)) {");
2559 output.println(" goto transretry"+faen.getIdentifier()+"; }");
2563 public void generateFlatAtomicExitNode(FlatMethod fm, LocalityBinding lb, FlatAtomicExitNode faen, PrintWriter output) {
2564 /* Check to see if we need to generate code for this atomic */
2565 if (locality==null) {
2566 output.println("pthread_mutex_unlock(&atomiclock);");
2569 if (locality.getAtomic(lb).get(faen).intValue()>0)
2571 //store the revert list before we lose the transaction object
2572 String revertptr=null;
2574 revertptr=generateTemp(fm, reverttable.get(lb),lb);
2575 output.println(revertptr+"=revertlist;");
2577 if (state.DELAYCOMP) {
2578 AtomicRecord ar=atomicmethodmap.get(faen.getAtomicEnter());
2581 output.println("if (transCommit((void (*)(void *, void *, void *))&"+ar.name+", &primitives_"+ar.name+", &"+localsprefix+", "+paramsprefix+")) {");
2583 output.println("if (transCommit()) {");
2584 /* Transaction aborts if it returns true */
2585 output.println("goto transretry"+faen.getAtomicEnter().getIdentifier()+";");
2587 output.println("} else {");
2588 /* Need to commit local object store */
2589 output.println("while ("+revertptr+") {");
2590 output.println("struct ___Object___ * tmpptr;");
2591 output.println("tmpptr="+revertptr+"->"+nextobjstr+";");
2592 output.println("COMMIT_OBJ("+revertptr+");");
2593 output.println(revertptr+"=tmpptr;");
2594 output.println("}");
2596 output.println("}");
2597 if (state.DELAYCOMP) {
2599 AtomicRecord ar=atomicmethodmap.get(faen.getAtomicEnter());
2600 output.println("else {");
2601 for(Iterator<TempDescriptor> tmpit=ar.liveout.iterator();tmpit.hasNext();) {
2602 TempDescriptor tmp=tmpit.next();
2603 output.println(tmp.getSafeSymbol()+"=primitives_"+ar.name+"."+tmp.getSafeSymbol()+";");
2605 output.println("}");
2609 public void generateFlatSESEEnterNode(FlatMethod fm, LocalityBinding lb, FlatSESEEnterNode fsen, PrintWriter output) {
2611 // SESE nodes can be parsed for normal compilation, just skip over them
2615 output.println("\n /* SESE "+fsen.getPrettyIdentifier()+" issue */");
2616 output.println(" tempSESE = mlpCreateSESErecord( "+
2617 fsen.getIdentifier()+", "+
2618 "malloc( sizeof( "+fsen.namespaceStructNameString()+") ), "+
2621 for( int i = 0; i < fsen.numParameters(); ++i ) {
2622 TempDescriptor td = fsen.getParameter( i );
2623 output.println(" (("+fsen.namespaceStructNameString()+
2624 "*)tempSESE->namespace)->"+td+" = "+td+";");
2627 output.println(" mlpIssue( tempSESE );");
2628 //output.println(" tempSESE = mlpSchedule();");
2630 // do a pthread_create wit invokeSESE as the argument
2631 // and pack all args into a single void*
2632 output.println(" tempSESEargs = malloc( sizeof( invokeSESEargs ) );");
2633 output.println(" tempSESEargs->classID = "+fsen.getIdentifier()+";");
2634 output.println(" tempSESEargs->invokee = mlpSchedule();");
2636 if( fsen.getParent() == null ) {
2637 output.println(" tempSESEargs->parent = NULL;");
2639 output.println(" tempSESEargs->parent = currentSESE;");
2642 output.println(" invokeSESEmethod( (void*) tempSESEargs );");
2643 output.println("\n");
2646 public void generateFlatSESEExitNode(FlatMethod fm, LocalityBinding lb, FlatSESEExitNode fsen, PrintWriter output) {
2648 // SESE nodes can be parsed for normal compilation, just skip over them
2653 private void generateFlatCheckNode(FlatMethod fm, LocalityBinding lb, FlatCheckNode fcn, PrintWriter output) {
2654 if (state.CONSCHECK) {
2655 String specname=fcn.getSpec();
2656 String varname="repairstate___";
2657 output.println("{");
2658 output.println("struct "+specname+"_state * "+varname+"=allocate"+specname+"_state();");
2660 TempDescriptor[] temps=fcn.getTemps();
2661 String[] vars=fcn.getVars();
2662 for(int i=0; i<temps.length; i++) {
2663 output.println(varname+"->"+vars[i]+"=(unsigned int)"+generateTemp(fm, temps[i],lb)+";");
2666 output.println("if (doanalysis"+specname+"("+varname+")) {");
2667 output.println("free"+specname+"_state("+varname+");");
2668 output.println("} else {");
2669 output.println("/* Bad invariant */");
2670 output.println("free"+specname+"_state("+varname+");");
2671 output.println("abort_task();");
2672 output.println("}");
2673 output.println("}");
2677 private void generateFlatCall(FlatMethod fm, LocalityBinding lb, FlatCall fc, PrintWriter output) {
2678 MethodDescriptor md=fc.getMethod();
2679 ParamsObject objectparams=(ParamsObject)paramstable.get(lb!=null ? locality.getBinding(lb, fc) : md);
2680 ClassDescriptor cn=md.getClassDesc();
2681 output.println("{");
2682 if (GENERATEPRECISEGC) {
2684 LocalityBinding fclb=locality.getBinding(lb, fc);
2685 output.print(" struct "+cn.getSafeSymbol()+fclb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
2687 output.print(" struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
2689 output.print(objectparams.numPointers());
2690 output.print(", "+localsprefixaddr);
2691 if (md.getThis()!=null) {
2693 output.print("(struct "+md.getThis().getType().getSafeSymbol() +" *)"+ generateTemp(fm,fc.getThis(),lb));
2695 if (fc.getThis()!=null&&md.getThis()==null) {
2696 System.out.println("WARNING!!!!!!!!!!!!");
2697 System.out.println("Source code calls static method "+md+" on an object in "+fm.getMethod()+"!");
2701 for(int i=0; i<fc.numArgs(); i++) {
2702 Descriptor var=md.getParameter(i);
2703 TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
2704 if (objectparams.isParamPtr(paramtemp)) {
2705 TempDescriptor targ=fc.getArg(i);
2707 TypeDescriptor td=md.getParamType(i);
2709 output.print("(struct "+(new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol() +" *)"+generateTemp(fm, targ,lb));
2711 output.print("(struct "+md.getParamType(i).getSafeSymbol() +" *)"+generateTemp(fm, targ,lb));
2714 output.println("};");
2719 if (fc.getReturnTemp()!=null)
2720 output.print(generateTemp(fm,fc.getReturnTemp(),lb)+"=");
2722 /* Do we need to do virtual dispatch? */
2723 if (md.isStatic()||md.getReturnType()==null||singleCall(fc.getThis().getType().getClassDesc(),md)) {
2726 LocalityBinding fclb=locality.getBinding(lb, fc);
2727 output.print(cn.getSafeSymbol()+fclb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
2729 output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
2734 if (md.getReturnType().isClass()||md.getReturnType().isArray())
2735 output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
2737 output.print(md.getReturnType().getSafeSymbol()+" ");
2738 output.print("(*)(");
2740 boolean printcomma=false;
2741 if (GENERATEPRECISEGC) {
2743 LocalityBinding fclb=locality.getBinding(lb, fc);
2744 output.print("struct "+cn.getSafeSymbol()+fclb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * ");
2746 output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * ");
2750 for(int i=0; i<objectparams.numPrimitives(); i++) {
2751 TempDescriptor temp=objectparams.getPrimitive(i);
2755 if (temp.getType().isClass()||temp.getType().isArray())
2756 output.print("struct " + temp.getType().getSafeSymbol()+" * ");
2758 output.print(temp.getType().getSafeSymbol());
2763 LocalityBinding fclb=locality.getBinding(lb, fc);
2764 output.print("))virtualtable["+generateTemp(fm,fc.getThis(),lb)+"->type*"+maxcount+"+"+virtualcalls.getLocalityNumber(fclb)+"])");
2766 output.print("))virtualtable["+generateTemp(fm,fc.getThis(),lb)+"->type*"+maxcount+"+"+virtualcalls.getMethodNumber(md)+"])");
2770 boolean needcomma=false;
2771 if (GENERATEPRECISEGC) {
2772 output.print("&__parameterlist__");
2776 if (!GENERATEPRECISEGC) {
2777 if (fc.getThis()!=null) {
2778 TypeDescriptor ptd=md.getThis().getType();
2781 if (ptd.isClass()&&!ptd.isArray())
2782 output.print("(struct "+ptd.getSafeSymbol()+" *) ");
2783 output.print(generateTemp(fm,fc.getThis(),lb));
2788 for(int i=0; i<fc.numArgs(); i++) {
2789 Descriptor var=md.getParameter(i);
2790 TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
2791 if (objectparams.isParamPrim(paramtemp)) {
2792 TempDescriptor targ=fc.getArg(i);
2796 TypeDescriptor ptd=md.getParamType(i);
2797 if (ptd.isClass()&&!ptd.isArray())
2798 output.print("(struct "+ptd.getSafeSymbol()+" *) ");
2799 output.print(generateTemp(fm, targ,lb));
2803 output.println(");");
2804 output.println(" }");
2807 private boolean singleCall(ClassDescriptor thiscd, MethodDescriptor md) {
2808 Set subclasses=typeutil.getSubClasses(thiscd);
2809 if (subclasses==null)
2811 for(Iterator classit=subclasses.iterator(); classit.hasNext();) {
2812 ClassDescriptor cd=(ClassDescriptor)classit.next();
2813 Set possiblematches=cd.getMethodTable().getSet(md.getSymbol());
2814 for(Iterator matchit=possiblematches.iterator(); matchit.hasNext();) {
2815 MethodDescriptor matchmd=(MethodDescriptor)matchit.next();
2816 if (md.matches(matchmd))
2823 private void generateFlatFieldNode(FlatMethod fm, LocalityBinding lb, FlatFieldNode ffn, PrintWriter output) {
2824 if (state.SINGLETM) {
2825 //single machine transactional memory case
2826 String field=ffn.getField().getSafeSymbol();
2827 String src=generateTemp(fm, ffn.getSrc(),lb);
2828 String dst=generateTemp(fm, ffn.getDst(),lb);
2830 output.println(dst+"="+ src +"->"+field+ ";");
2831 if (ffn.getField().getType().isPtr()&&locality.getAtomic(lb).get(ffn).intValue()>0&&
2832 locality.getNodePreTempInfo(lb, ffn).get(ffn.getSrc())!=LocalityAnalysis.SCRATCH) {
2833 if ((dc==null)||(!state.READSET&&dc.getNeedTrans(lb, ffn))||
2834 (state.READSET&&dc.getNeedWriteTrans(lb, ffn))) {
2835 output.println("TRANSREAD("+dst+", "+dst+", (void *) (" + localsprefixaddr + "));");
2836 } else if (state.READSET&&dc.getNeedTrans(lb, ffn)) {
2837 output.println("TRANSREADRD("+dst+", "+dst+");");
2840 } else if (state.DSM) {
2841 Integer status=locality.getNodePreTempInfo(lb,ffn).get(ffn.getSrc());
2842 if (status==LocalityAnalysis.GLOBAL) {
2843 String field=ffn.getField().getSafeSymbol();
2844 String src=generateTemp(fm, ffn.getSrc(),lb);
2845 String dst=generateTemp(fm, ffn.getDst(),lb);
2847 if (ffn.getField().getType().isPtr()) {
2849 //TODO: Uncomment this when we have runtime support
2850 //if (ffn.getSrc()==ffn.getDst()) {
2851 //output.println("{");
2852 //output.println("void * temp="+src+";");
2853 //output.println("if (temp&0x1) {");
2854 //output.println("temp=(void *) transRead(trans, (unsigned int) temp);");
2855 //output.println(src+"->"+field+"="+temp+";");
2856 //output.println("}");
2857 //output.println(dst+"=temp;");
2858 //output.println("}");
2860 output.println(dst+"="+ src +"->"+field+ ";");
2861 //output.println("if ("+dst+"&0x1) {");
2862 output.println("TRANSREAD("+dst+", (unsigned int) "+dst+");");
2863 //output.println(src+"->"+field+"="+src+"->"+field+";");
2864 //output.println("}");
2867 output.println(dst+"="+ src+"->"+field+";");
2869 } else if (status==LocalityAnalysis.LOCAL) {
2870 if (ffn.getField().getType().isPtr()&&
2871 ffn.getField().isGlobal()) {
2872 String field=ffn.getField().getSafeSymbol();
2873 String src=generateTemp(fm, ffn.getSrc(),lb);
2874 String dst=generateTemp(fm, ffn.getDst(),lb);
2875 output.println(dst+"="+ src +"->"+field+ ";");
2876 if (locality.getAtomic(lb).get(ffn).intValue()>0)
2877 output.println("TRANSREAD("+dst+", (unsigned int) "+dst+");");
2879 output.println(generateTemp(fm, ffn.getDst(),lb)+"="+ generateTemp(fm,ffn.getSrc(),lb)+"->"+ ffn.getField().getSafeSymbol()+";");
2880 } else if (status==LocalityAnalysis.EITHER) {
2881 //Code is reading from a null pointer
2882 output.println("if ("+generateTemp(fm, ffn.getSrc(),lb)+") {");
2883 output.println("#ifndef RAW");
2884 output.println("printf(\"BIG ERROR\\n\");exit(-1);}");
2885 output.println("#endif");
2886 //This should throw a suitable null pointer error
2887 output.println(generateTemp(fm, ffn.getDst(),lb)+"="+ generateTemp(fm,ffn.getSrc(),lb)+"->"+ ffn.getField().getSafeSymbol()+";");
2889 throw new Error("Read from non-global/non-local in:"+lb.getExplanation());
2891 output.println(generateTemp(fm, ffn.getDst(),lb)+"="+ generateTemp(fm,ffn.getSrc(),lb)+"->"+ ffn.getField().getSafeSymbol()+";");
2895 private void generateFlatSetFieldNode(FlatMethod fm, LocalityBinding lb, FlatSetFieldNode fsfn, PrintWriter output) {
2896 if (fsfn.getField().getSymbol().equals("length")&&fsfn.getDst().getType().isArray())
2897 throw new Error("Can't set array length");
2898 if (state.SINGLETM && locality.getAtomic(lb).get(fsfn).intValue()>0) {
2899 //Single Machine Transaction Case
2900 boolean srcptr=fsfn.getSrc().getType().isPtr();
2901 String src=generateTemp(fm,fsfn.getSrc(),lb);
2902 String dst=generateTemp(fm,fsfn.getDst(),lb);
2903 output.println("//"+srcptr+" "+fsfn.getSrc().getType().isNull());
2904 if (srcptr&&!fsfn.getSrc().getType().isNull()) {
2905 output.println("{");
2906 if ((dc==null)||dc.getNeedSrcTrans(lb, fsfn)&&
2907 locality.getNodePreTempInfo(lb, fsfn).get(fsfn.getSrc())!=LocalityAnalysis.SCRATCH) {
2908 output.println("INTPTR srcoid=("+src+"!=NULL?((INTPTR)"+src+"->"+oidstr+"):0);");
2910 output.println("INTPTR srcoid=(INTPTR)"+src+";");
2913 if (wb.needBarrier(fsfn)&&
2914 locality.getNodePreTempInfo(lb, fsfn).get(fsfn.getDst())!=LocalityAnalysis.SCRATCH) {
2915 output.println("*((unsigned int *)&("+dst+"->___objstatus___))|=DIRTY;");
2917 if (srcptr&!fsfn.getSrc().getType().isNull()) {
2918 output.println("*((unsigned INTPTR *)&("+dst+"->"+ fsfn.getField().getSafeSymbol()+"))=srcoid;");
2919 output.println("}");
2921 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
2923 } else if (state.DSM && locality.getAtomic(lb).get(fsfn).intValue()>0) {
2924 Integer statussrc=locality.getNodePreTempInfo(lb,fsfn).get(fsfn.getSrc());
2925 Integer statusdst=locality.getNodeTempInfo(lb).get(fsfn).get(fsfn.getDst());
2926 boolean srcglobal=statussrc==LocalityAnalysis.GLOBAL;
2928 String src=generateTemp(fm,fsfn.getSrc(),lb);
2929 String dst=generateTemp(fm,fsfn.getDst(),lb);
2931 output.println("{");
2932 output.println("INTPTR srcoid=("+src+"!=NULL?((INTPTR)"+src+"->"+oidstr+"):0);");
2934 if (statusdst.equals(LocalityAnalysis.GLOBAL)) {
2937 if (wb.needBarrier(fsfn))
2938 output.println("*((unsigned int *)&("+dst+"->___localcopy___))|=DIRTY;");
2940 output.println("*((unsigned INTPTR *)&("+glbdst+"->"+ fsfn.getField().getSafeSymbol()+"))=srcoid;");
2942 output.println(glbdst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
2943 } else if (statusdst.equals(LocalityAnalysis.LOCAL)) {
2944 /** Check if we need to copy */
2945 output.println("if(!"+dst+"->"+localcopystr+") {");
2946 /* Link object into list */
2947 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
2948 output.println(revertptr+"=revertlist;");
2949 if (GENERATEPRECISEGC)
2950 output.println("COPY_OBJ((struct garbagelist *)"+localsprefixaddr+",(struct ___Object___ *)"+dst+");");
2952 output.println("COPY_OBJ("+dst+");");
2953 output.println(dst+"->"+nextobjstr+"="+revertptr+";");
2954 output.println("revertlist=(struct ___Object___ *)"+dst+";");
2955 output.println("}");
2957 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"=(void *) srcoid;");
2959 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
2960 } else if (statusdst.equals(LocalityAnalysis.EITHER)) {
2961 //writing to a null...bad
2962 output.println("if ("+dst+") {");
2963 output.println("printf(\"BIG ERROR 2\\n\");exit(-1);}");
2965 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"=(void *) srcoid;");
2967 output.println(dst+"->"+ fsfn.getField().getSafeSymbol()+"="+ src+";");
2970 output.println("}");
2973 if (state.FASTCHECK) {
2974 String dst=generateTemp(fm, fsfn.getDst(),lb);
2975 output.println("if(!"+dst+"->"+localcopystr+") {");
2976 /* Link object into list */
2977 if (GENERATEPRECISEGC)
2978 output.println("COPY_OBJ((struct garbagelist *)"+localsprefixaddr+",(struct ___Object___ *)"+dst+");");
2980 output.println("COPY_OBJ("+dst+");");
2981 output.println(dst+"->"+nextobjstr+"="+fcrevert+";");
2982 output.println(fcrevert+"=(struct ___Object___ *)"+dst+";");
2983 output.println("}");
2985 output.println(generateTemp(fm, fsfn.getDst(),lb)+"->"+ fsfn.getField().getSafeSymbol()+"="+ generateTemp(fm,fsfn.getSrc(),lb)+";");
2989 private void generateFlatElementNode(FlatMethod fm, LocalityBinding lb, FlatElementNode fen, PrintWriter output) {
2990 TypeDescriptor elementtype=fen.getSrc().getType().dereference();
2993 if (elementtype.isArray()||elementtype.isClass())
2996 type=elementtype.getSafeSymbol()+" ";
2998 if (this.state.ARRAYBOUNDARYCHECK && fen.needsBoundsCheck()) {
2999 output.println("if ("+generateTemp(fm, fen.getIndex(),lb)+"< 0 | "+generateTemp(fm, fen.getIndex(),lb)+" >= "+generateTemp(fm,fen.getSrc(),lb) + "->___length___)");
3000 output.println("failedboundschk();");
3002 if (state.SINGLETM) {
3003 //Single machine transaction case
3004 String dst=generateTemp(fm, fen.getDst(),lb);
3005 output.println(dst +"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
3007 if (elementtype.isPtr()&&locality.getAtomic(lb).get(fen).intValue()>0&&
3008 locality.getNodePreTempInfo(lb, fen).get(fen.getSrc())!=LocalityAnalysis.SCRATCH) {
3009 if ((dc==null)||!state.READSET&&dc.getNeedTrans(lb, fen)||state.READSET&&dc.getNeedWriteTrans(lb, fen)) {
3010 output.println("TRANSREAD("+dst+", "+dst+", (void *)(" + localsprefixaddr+"));");
3011 } else if (state.READSET&&dc.getNeedTrans(lb, fen)) {
3012 output.println("TRANSREADRD("+dst+", "+dst+");");
3015 } else if (state.DSM) {
3016 Integer status=locality.getNodePreTempInfo(lb,fen).get(fen.getSrc());
3017 if (status==LocalityAnalysis.GLOBAL) {
3018 String dst=generateTemp(fm, fen.getDst(),lb);
3020 if (elementtype.isPtr()) {
3021 output.println(dst +"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
3022 output.println("TRANSREAD("+dst+", "+dst+");");
3024 output.println(dst +"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
3026 } else if (status==LocalityAnalysis.LOCAL) {
3027 output.println(generateTemp(fm, fen.getDst(),lb)+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
3028 } else if (status==LocalityAnalysis.EITHER) {
3029 //Code is reading from a null pointer
3030 output.println("if ("+generateTemp(fm, fen.getSrc(),lb)+") {");
3031 output.println("#ifndef RAW");
3032 output.println("printf(\"BIG ERROR\\n\");exit(-1);}");
3033 output.println("#endif");
3034 //This should throw a suitable null pointer error
3035 output.println(generateTemp(fm, fen.getDst(),lb)+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
3037 throw new Error("Read from non-global/non-local in:"+lb.getExplanation());
3039 output.println(generateTemp(fm, fen.getDst(),lb)+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex(),lb)+"];");
3043 private void generateFlatSetElementNode(FlatMethod fm, LocalityBinding lb, FlatSetElementNode fsen, PrintWriter output) {
3044 //TODO: need dynamic check to make sure this assignment is actually legal
3045 //Because Object[] could actually be something more specific...ie. Integer[]
3047 TypeDescriptor elementtype=fsen.getDst().getType().dereference();
3050 if (elementtype.isArray()||elementtype.isClass())
3053 type=elementtype.getSafeSymbol()+" ";
3055 if (this.state.ARRAYBOUNDARYCHECK && fsen.needsBoundsCheck()) {
3056 output.println("if ("+generateTemp(fm, fsen.getIndex(),lb)+"< 0 | "+generateTemp(fm, fsen.getIndex(),lb)+" >= "+generateTemp(fm,fsen.getDst(),lb) + "->___length___)");
3057 output.println("failedboundschk();");
3060 if (state.SINGLETM && locality.getAtomic(lb).get(fsen).intValue()>0) {
3061 //Transaction set element case
3062 if (wb.needBarrier(fsen)&&
3063 locality.getNodePreTempInfo(lb, fsen).get(fsen.getDst())!=LocalityAnalysis.SCRATCH) {
3064 output.println("*((unsigned int *)&("+generateTemp(fm,fsen.getDst(),lb)+"->___objstatus___))|=DIRTY;");
3066 if (fsen.getSrc().getType().isPtr()&&!fsen.getSrc().getType().isNull()) {
3067 output.println("{");
3068 String src=generateTemp(fm, fsen.getSrc(), lb);
3069 if ((dc==null)||dc.getNeedSrcTrans(lb, fsen)&&
3070 locality.getNodePreTempInfo(lb, fsen).get(fsen.getSrc())!=LocalityAnalysis.SCRATCH) {
3071 output.println("INTPTR srcoid=("+src+"!=NULL?((INTPTR)"+src+"->"+oidstr+"):0);");
3073 output.println("INTPTR srcoid=(INTPTR)"+src+";");
3075 output.println("((INTPTR*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]=srcoid;");
3076 output.println("}");
3078 output.println("(("+type +"*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]="+generateTemp(fm,fsen.getSrc(),lb)+";");
3080 } else if (state.DSM && locality.getAtomic(lb).get(fsen).intValue()>0) {
3081 Integer statussrc=locality.getNodePreTempInfo(lb,fsen).get(fsen.getSrc());
3082 Integer statusdst=locality.getNodePreTempInfo(lb,fsen).get(fsen.getDst());
3083 boolean srcglobal=statussrc==LocalityAnalysis.GLOBAL;
3084 boolean dstglobal=statusdst==LocalityAnalysis.GLOBAL;
3085 boolean dstlocal=statusdst==LocalityAnalysis.LOCAL;
3088 if (wb.needBarrier(fsen))
3089 output.println("*((unsigned int *)&("+generateTemp(fm,fsen.getDst(),lb)+"->___localcopy___))|=DIRTY;");
3090 } else if (dstlocal) {
3091 /** Check if we need to copy */
3092 String dst=generateTemp(fm, fsen.getDst(),lb);
3093 output.println("if(!"+dst+"->"+localcopystr+") {");
3094 /* Link object into list */
3095 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
3096 output.println(revertptr+"=revertlist;");
3097 if (GENERATEPRECISEGC)
3098 output.println("COPY_OBJ((struct garbagelist *)"+localsprefixaddr+",(struct ___Object___ *)"+dst+");");
3100 output.println("COPY_OBJ("+dst+");");
3101 output.println(dst+"->"+nextobjstr+"="+revertptr+";");
3102 output.println("revertlist=(struct ___Object___ *)"+dst+";");
3103 output.println("}");
3104 } else throw new Error("Unknown array type");
3106 output.println("{");
3107 String src=generateTemp(fm, fsen.getSrc(), lb);
3108 output.println("INTPTR srcoid=("+src+"!=NULL?((INTPTR)"+src+"->"+oidstr+"):0);");
3109 output.println("((INTPTR*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]=srcoid;");
3110 output.println("}");
3112 output.println("(("+type +"*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]="+generateTemp(fm,fsen.getSrc(),lb)+";");
3115 if (state.FASTCHECK) {
3116 String dst=generateTemp(fm, fsen.getDst(),lb);
3117 output.println("if(!"+dst+"->"+localcopystr+") {");
3118 /* Link object into list */
3119 if (GENERATEPRECISEGC)
3120 output.println("COPY_OBJ((struct garbagelist *)"+localsprefixaddr+",(struct ___Object___ *)"+dst+");");
3122 output.println("COPY_OBJ("+dst+");");
3123 output.println(dst+"->"+nextobjstr+"="+fcrevert+";");
3124 output.println(fcrevert+"=(struct ___Object___ *)"+dst+";");
3125 output.println("}");
3127 output.println("(("+type +"*)(((char *) &("+ generateTemp(fm,fsen.getDst(),lb)+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex(),lb)+"]="+generateTemp(fm,fsen.getSrc(),lb)+";");
3131 protected void generateFlatNew(FlatMethod fm, LocalityBinding lb, FlatNew fn, PrintWriter output) {
3132 if (state.DSM && locality.getAtomic(lb).get(fn).intValue()>0&&!fn.isGlobal()) {
3133 //Stash pointer in case of GC
3134 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
3135 output.println(revertptr+"=revertlist;");
3137 if (state.SINGLETM) {
3138 if (fn.getType().isArray()) {
3139 int arrayid=state.getArrayNumber(fn.getType())+state.numClasses();
3140 if (locality.getAtomic(lb).get(fn).intValue()>0) {
3141 //inside transaction
3142 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarraytrans("+localsprefixaddr+", "+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
3144 //outside transaction
3145 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarray("+localsprefixaddr+", "+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
3148 if (locality.getAtomic(lb).get(fn).intValue()>0) {
3149 //inside transaction
3150 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newtrans("+localsprefixaddr+", "+fn.getType().getClassDesc().getId()+");");
3152 //outside transaction
3153 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_new("+localsprefixaddr+", "+fn.getType().getClassDesc().getId()+");");
3156 } else if (fn.getType().isArray()) {
3157 int arrayid=state.getArrayNumber(fn.getType())+state.numClasses();
3158 if (fn.isGlobal()&&(state.DSM||state.SINGLETM)) {
3159 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarrayglobal("+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
3160 } else if (GENERATEPRECISEGC) {
3161 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarray("+localsprefixaddr+", "+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
3163 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newarray("+arrayid+", "+generateTemp(fm, fn.getSize(),lb)+");");
3166 if (fn.isGlobal()&&(state.DSM||state.SINGLETM)) {
3167 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_newglobal("+fn.getType().getClassDesc().getId()+");");
3168 } else if (GENERATEPRECISEGC) {
3169 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_new("+localsprefixaddr+", "+fn.getType().getClassDesc().getId()+");");
3171 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_new("+fn.getType().getClassDesc().getId()+");");
3174 if (state.DSM && locality.getAtomic(lb).get(fn).intValue()>0&&!fn.isGlobal()) {
3175 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
3176 String dst=generateTemp(fm,fn.getDst(),lb);
3177 output.println(dst+"->___localcopy___=(struct ___Object___*)1;");
3178 output.println(dst+"->"+nextobjstr+"="+revertptr+";");
3179 output.println("revertlist=(struct ___Object___ *)"+dst+";");
3181 if (state.FASTCHECK) {
3182 String dst=generateTemp(fm,fn.getDst(),lb);
3183 output.println(dst+"->___localcopy___=(struct ___Object___*)1;");
3184 output.println(dst+"->"+nextobjstr+"="+fcrevert+";");
3185 output.println(fcrevert+"=(struct ___Object___ *)"+dst+";");
3189 private void generateFlatTagDeclaration(FlatMethod fm, LocalityBinding lb, FlatTagDeclaration fn, PrintWriter output) {
3190 if (GENERATEPRECISEGC) {
3191 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_tag("+localsprefixaddr+", "+state.getTagId(fn.getType())+");");
3193 output.println(generateTemp(fm,fn.getDst(),lb)+"=allocate_tag("+state.getTagId(fn.getType())+");");
3197 private void generateFlatOpNode(FlatMethod fm, LocalityBinding lb, FlatOpNode fon, PrintWriter output) {
3198 if (fon.getRight()!=null) {
3199 if (fon.getOp().getOp()==Operation.URIGHTSHIFT) {
3200 if (fon.getLeft().getType().isLong())
3201 output.println(generateTemp(fm, fon.getDest(),lb)+" = ((unsigned long long)"+generateTemp(fm, fon.getLeft(),lb)+")>>"+generateTemp(fm,fon.getRight(),lb)+";");
3203 output.println(generateTemp(fm, fon.getDest(),lb)+" = ((unsigned int)"+generateTemp(fm, fon.getLeft(),lb)+")>>"+generateTemp(fm,fon.getRight(),lb)+";");
3205 } else if (dc!=null) {
3206 output.print(generateTemp(fm, fon.getDest(),lb)+" = ");
3207 if (dc.getNeedLeftSrcTrans(lb, fon))
3208 output.print("("+generateTemp(fm, fon.getLeft(),lb)+"!=NULL?"+generateTemp(fm, fon.getLeft(),lb)+"->"+oidstr+":NULL)");
3210 output.print(generateTemp(fm, fon.getLeft(),lb));
3211 output.print(fon.getOp().toString());
3212 if (dc.getNeedRightSrcTrans(lb, fon))
3213 output.println("("+generateTemp(fm, fon.getRight(),lb)+"!=NULL?"+generateTemp(fm, fon.getRight(),lb)+"->"+oidstr+":NULL);");
3215 output.println(generateTemp(fm,fon.getRight(),lb)+";");
3217 output.println(generateTemp(fm, fon.getDest(),lb)+" = "+generateTemp(fm, fon.getLeft(),lb)+fon.getOp().toString()+generateTemp(fm,fon.getRight(),lb)+";");
3218 } else if (fon.getOp().getOp()==Operation.ASSIGN)
3219 output.println(generateTemp(fm, fon.getDest(),lb)+" = "+generateTemp(fm, fon.getLeft(),lb)+";");
3220 else if (fon.getOp().getOp()==Operation.UNARYPLUS)
3221 output.println(generateTemp(fm, fon.getDest(),lb)+" = "+generateTemp(fm, fon.getLeft(),lb)+";");
3222 else if (fon.getOp().getOp()==Operation.UNARYMINUS)
3223 output.println(generateTemp(fm, fon.getDest(),lb)+" = -"+generateTemp(fm, fon.getLeft(),lb)+";");
3224 else if (fon.getOp().getOp()==Operation.LOGIC_NOT)
3225 output.println(generateTemp(fm, fon.getDest(),lb)+" = !"+generateTemp(fm, fon.getLeft(),lb)+";");
3226 else if (fon.getOp().getOp()==Operation.COMP)
3227 output.println(generateTemp(fm, fon.getDest(),lb)+" = ~"+generateTemp(fm, fon.getLeft(),lb)+";");
3228 else if (fon.getOp().getOp()==Operation.ISAVAILABLE) {
3229 output.println(generateTemp(fm, fon.getDest(),lb)+" = "+generateTemp(fm, fon.getLeft(),lb)+"->fses==NULL;");
3231 output.println(generateTemp(fm, fon.getDest(),lb)+fon.getOp().toString()+generateTemp(fm, fon.getLeft(),lb)+";");
3234 private void generateFlatCastNode(FlatMethod fm, LocalityBinding lb, FlatCastNode fcn, PrintWriter output) {
3235 /* TODO: Do type check here */
3236 if (fcn.getType().isArray()) {
3237 output.println(generateTemp(fm,fcn.getDst(),lb)+"=(struct ArrayObject *)"+generateTemp(fm,fcn.getSrc(),lb)+";");
3238 } else if (fcn.getType().isClass())
3239 output.println(generateTemp(fm,fcn.getDst(),lb)+"=(struct "+fcn.getType().getSafeSymbol()+" *)"+generateTemp(fm,fcn.getSrc(),lb)+";");
3241 output.println(generateTemp(fm,fcn.getDst(),lb)+"=("+fcn.getType().getSafeSymbol()+")"+generateTemp(fm,fcn.getSrc(),lb)+";");
3244 private void generateFlatLiteralNode(FlatMethod fm, LocalityBinding lb, FlatLiteralNode fln, PrintWriter output) {
3245 if (fln.getValue()==null)
3246 output.println(generateTemp(fm, fln.getDst(),lb)+"=0;");
3247 else if (fln.getType().getSymbol().equals(TypeUtil.StringClass)) {
3248 if (GENERATEPRECISEGC) {
3249 if (state.DSM && locality.getAtomic(lb).get(fln).intValue()>0) {
3250 //Stash pointer in case of GC
3251 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
3252 output.println(revertptr+"=revertlist;");
3254 output.println(generateTemp(fm, fln.getDst(),lb)+"=NewString("+localsprefixaddr+", \""+FlatLiteralNode.escapeString((String)fln.getValue())+"\","+((String)fln.getValue()).length()+");");
3255 if (state.DSM && locality.getAtomic(lb).get(fln).intValue()>0) {
3256 //Stash pointer in case of GC
3257 String revertptr=generateTemp(fm, reverttable.get(lb),lb);
3258 output.println("revertlist="+revertptr+";");
3261 output.println(generateTemp(fm, fln.getDst(),lb)+"=NewString(\""+FlatLiteralNode.escapeString((String)fln.getValue())+"\","+((String)fln.getValue()).length()+");");
3263 } else if (fln.getType().isBoolean()) {
3264 if (((Boolean)fln.getValue()).booleanValue())
3265 output.println(generateTemp(fm, fln.getDst(),lb)+"=1;");
3267 output.println(generateTemp(fm, fln.getDst(),lb)+"=0;");
3268 } else if (fln.getType().isChar()) {
3269 String st=FlatLiteralNode.escapeString(fln.getValue().toString());
3270 output.println(generateTemp(fm, fln.getDst(),lb)+"='"+st+"';");
3271 } else if (fln.getType().isLong()) {
3272 output.println(generateTemp(fm, fln.getDst(),lb)+"="+fln.getValue()+"LL;");
3274 output.println(generateTemp(fm, fln.getDst(),lb)+"="+fln.getValue()+";");
3277 protected void generateFlatReturnNode(FlatMethod fm, LocalityBinding lb, FlatReturnNode frn, PrintWriter output) {
3278 if (frn.getReturnTemp()!=null) {
3279 if (frn.getReturnTemp().getType().isPtr())
3280 output.println("return (struct "+fm.getMethod().getReturnType().getSafeSymbol()+"*)"+generateTemp(fm, frn.getReturnTemp(), lb)+";");
3282 output.println("return "+generateTemp(fm, frn.getReturnTemp(), lb)+";");
3284 output.println("return;");
3288 protected void generateStoreFlatCondBranch(FlatMethod fm, LocalityBinding lb, FlatCondBranch fcb, String label, PrintWriter output) {
3289 output.println("STOREANDBRANCH(!"+generateTemp(fm, fcb.getTest(),lb)+", "+label+");");
3292 protected void generateFlatCondBranch(FlatMethod fm, LocalityBinding lb, FlatCondBranch fcb, String label, PrintWriter output) {
3293 output.println("if (!"+generateTemp(fm, fcb.getTest(),lb)+") goto "+label+";");
3296 /** This method generates header information for the method or
3297 * task referenced by the Descriptor des. */
3298 private void generateHeader(FlatMethod fm, LocalityBinding lb, Descriptor des, PrintWriter output) {
3299 generateHeader(fm, lb, des, output, false);
3302 private void generateHeader(FlatMethod fm, LocalityBinding lb, Descriptor des, PrintWriter output, boolean addSESErecord) {
3304 ParamsObject objectparams=(ParamsObject)paramstable.get(lb!=null ? lb : des);
3305 MethodDescriptor md=null;
3306 TaskDescriptor task=null;
3307 if (des instanceof MethodDescriptor)
3308 md=(MethodDescriptor) des;
3310 task=(TaskDescriptor) des;
3312 ClassDescriptor cn=md!=null ? md.getClassDesc() : null;
3314 if (md!=null&&md.getReturnType()!=null) {
3315 if (md.getReturnType().isClass()||md.getReturnType().isArray())
3316 output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
3318 output.print(md.getReturnType().getSafeSymbol()+" ");
3320 //catch the constructor case
3321 output.print("void ");
3323 if (state.DSM||state.SINGLETM) {
3324 output.print(cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
3326 output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
3328 output.print(task.getSafeSymbol()+"(");
3330 if (addSESErecord) {
3331 output.print("SESErecord* currentSESE, ");
3334 boolean printcomma=false;
3335 if (GENERATEPRECISEGC) {
3337 if (state.DSM||state.SINGLETM) {
3338 output.print("struct "+cn.getSafeSymbol()+lb.getSignature()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
3340 output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
3342 output.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
3348 for(int i=0; i<objectparams.numPrimitives(); i++) {
3349 TempDescriptor temp=objectparams.getPrimitive(i);
3353 if (temp.getType().isClass()||temp.getType().isArray())
3354 output.print("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
3356 output.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
3358 output.println(") {");
3359 } else if (!GENERATEPRECISEGC) {
3360 /* Imprecise Task */
3361 output.println("void * parameterarray[]) {");
3362 /* Unpack variables */
3363 for(int i=0; i<objectparams.numPrimitives(); i++) {
3364 TempDescriptor temp=objectparams.getPrimitive(i);
3365 output.println("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+"=parameterarray["+i+"];");
3367 for(int i=0; i<fm.numTags(); i++) {
3368 TempDescriptor temp=fm.getTag(i);
3369 int offset=i+objectparams.numPrimitives();
3370 output.println("struct ___TagDescriptor___ * "+temp.getSafeSymbol()+"=parameterarray["+offset+"];");
3373 if ((objectparams.numPrimitives()+fm.numTags())>maxtaskparams)
3374 maxtaskparams=objectparams.numPrimitives()+fm.numTags();
3375 } else output.println(") {");
3378 public void generateFlatFlagActionNode(FlatMethod fm, LocalityBinding lb, FlatFlagActionNode ffan, PrintWriter output) {
3379 output.println("/* FlatFlagActionNode */");
3382 /* Process tag changes */
3383 Relation tagsettable=new Relation();
3384 Relation tagcleartable=new Relation();
3386 Iterator tagsit=ffan.getTempTagPairs();
3387 while (tagsit.hasNext()) {
3388 TempTagPair ttp=(TempTagPair) tagsit.next();
3389 TempDescriptor objtmp=ttp.getTemp();
3390 TagDescriptor tag=ttp.getTag();
3391 TempDescriptor tagtmp=ttp.getTagTemp();
3392 boolean tagstatus=ffan.getTagChange(ttp);
3394 tagsettable.put(objtmp, tagtmp);
3396 tagcleartable.put(objtmp, tagtmp);
3401 Hashtable flagandtable=new Hashtable();
3402 Hashtable flagortable=new Hashtable();
3404 /* Process flag changes */
3405 Iterator flagsit=ffan.getTempFlagPairs();
3406 while(flagsit.hasNext()) {
3407 TempFlagPair tfp=(TempFlagPair)flagsit.next();
3408 TempDescriptor temp=tfp.getTemp();
3409 Hashtable flagtable=(Hashtable)flagorder.get(temp.getType().getClassDesc());
3410 FlagDescriptor flag=tfp.getFlag();
3412 //Newly allocate objects that don't set any flags case
3413 if (flagortable.containsKey(temp)) {
3417 flagortable.put(temp,new Integer(mask));
3419 int flagid=1<<((Integer)flagtable.get(flag)).intValue();
3420 boolean flagstatus=ffan.getFlagChange(tfp);
3423 if (flagortable.containsKey(temp)) {
3424 mask=((Integer)flagortable.get(temp)).intValue();
3427 flagortable.put(temp,new Integer(mask));
3429 int mask=0xFFFFFFFF;
3430 if (flagandtable.containsKey(temp)) {
3431 mask=((Integer)flagandtable.get(temp)).intValue();
3433 mask&=(0xFFFFFFFF^flagid);
3434 flagandtable.put(temp,new Integer(mask));
3440 HashSet flagtagset=new HashSet();
3441 flagtagset.addAll(flagortable.keySet());
3442 flagtagset.addAll(flagandtable.keySet());
3443 flagtagset.addAll(tagsettable.keySet());
3444 flagtagset.addAll(tagcleartable.keySet());
3446 Iterator ftit=flagtagset.iterator();
3447 while(ftit.hasNext()) {
3448 TempDescriptor temp=(TempDescriptor)ftit.next();
3451 Set tagtmps=tagcleartable.get(temp);
3452 if (tagtmps!=null) {
3453 Iterator tagit=tagtmps.iterator();
3454 while(tagit.hasNext()) {
3455 TempDescriptor tagtmp=(TempDescriptor)tagit.next();
3456 if (GENERATEPRECISEGC)
3457 output.println("tagclear("+localsprefixaddr+", (struct ___Object___ *)"+generateTemp(fm, temp,lb)+", "+generateTemp(fm,tagtmp,lb)+");");
3459 output.println("tagclear((struct ___Object___ *)"+generateTemp(fm, temp,lb)+", "+generateTemp(fm,tagtmp,lb)+");");
3463 tagtmps=tagsettable.get(temp);
3464 if (tagtmps!=null) {
3465 Iterator tagit=tagtmps.iterator();
3466 while(tagit.hasNext()) {
3467 TempDescriptor tagtmp=(TempDescriptor)tagit.next();
3468 if (GENERATEPRECISEGC)
3469 output.println("tagset("+localsprefixaddr+", (struct ___Object___ *)"+generateTemp(fm, temp,lb)+", "+generateTemp(fm,tagtmp,lb)+");");
3471 output.println("tagset((struct ___Object___ *)"+generateTemp(fm, temp, lb)+", "+generateTemp(fm,tagtmp, lb)+");");
3476 int andmask=0xFFFFFFF;
3478 if (flagortable.containsKey(temp))
3479 ormask=((Integer)flagortable.get(temp)).intValue();
3480 if (flagandtable.containsKey(temp))
3481 andmask=((Integer)flagandtable.get(temp)).intValue();
3482 generateFlagOrAnd(ffan, fm, lb, temp, output, ormask, andmask);
3483 generateObjectDistribute(ffan, fm, lb, temp, output);
3487 protected void generateFlagOrAnd(FlatFlagActionNode ffan, FlatMethod fm, LocalityBinding lb, TempDescriptor temp,
3488 PrintWriter output, int ormask, int andmask) {
3489 if (ffan.getTaskType()==FlatFlagActionNode.NEWOBJECT) {
3490 output.println("flagorandinit("+generateTemp(fm, temp, lb)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
3492 output.println("flagorand("+generateTemp(fm, temp, lb)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
3496 protected void generateObjectDistribute(FlatFlagActionNode ffan, FlatMethod fm, LocalityBinding lb, TempDescriptor temp, PrintWriter output) {
3497 output.println("enqueueObject("+generateTemp(fm, temp, lb)+");");
3500 void generateOptionalHeader(PrintWriter headers) {
3503 headers.println("#include \"task.h\"\n\n");
3504 headers.println("#ifndef _OPTIONAL_STRUCT_");
3505 headers.println("#define _OPTIONAL_STRUCT_");
3507 //STRUCT PREDICATEMEMBER
3508 headers.println("struct predicatemember{");
3509 headers.println("int type;");
3510 headers.println("int numdnfterms;");
3511 headers.println("int * flags;");
3512 headers.println("int numtags;");
3513 headers.println("int * tags;\n};\n\n");
3515 //STRUCT OPTIONALTASKDESCRIPTOR
3516 headers.println("struct optionaltaskdescriptor{");
3517 headers.println("struct taskdescriptor * task;");
3518 headers.println("int index;");
3519 headers.println("int numenterflags;");
3520 headers.println("int * enterflags;");
3521 headers.println("int numpredicatemembers;");
3522 headers.println("struct predicatemember ** predicatememberarray;");
3523 headers.println("};\n\n");
3525 //STRUCT TASKFAILURE
3526 headers.println("struct taskfailure {");
3527 headers.println("struct taskdescriptor * task;");
3528 headers.println("int index;");
3529 headers.println("int numoptionaltaskdescriptors;");
3530 headers.println("struct optionaltaskdescriptor ** optionaltaskdescriptorarray;\n};\n\n");
3532 //STRUCT FSANALYSISWRAPPER
3533 headers.println("struct fsanalysiswrapper{");
3534 headers.println("int flags;");
3535 headers.println("int numtags;");
3536 headers.println("int * tags;");
3537 headers.println("int numtaskfailures;");
3538 headers.println("struct taskfailure ** taskfailurearray;");
3539 headers.println("int numoptionaltaskdescriptors;");
3540 headers.println("struct optionaltaskdescriptor ** optionaltaskdescriptorarray;\n};\n\n");
3542 //STRUCT CLASSANALYSISWRAPPER
3543 headers.println("struct classanalysiswrapper{");
3544 headers.println("int type;");
3545 headers.println("int numotd;");
3546 headers.println("struct optionaltaskdescriptor ** otdarray;");
3547 headers.println("int numfsanalysiswrappers;");
3548 headers.println("struct fsanalysiswrapper ** fsanalysiswrapperarray;\n};");
3550 headers.println("extern struct classanalysiswrapper * classanalysiswrapperarray[];");
3552 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
3553 while(taskit.hasNext()) {
3554 TaskDescriptor td=(TaskDescriptor)taskit.next();
3555 headers.println("extern struct taskdescriptor task_"+td.getSafeSymbol()+";");
3560 //CHECK OVER THIS -- THERE COULD BE SOME ERRORS HERE
3561 int generateOptionalPredicate(Predicate predicate, OptionalTaskDescriptor otd, ClassDescriptor cdtemp, PrintWriter output) {
3562 int predicateindex = 0;
3563 //iterate through the classes concerned by the predicate
3564 Set c_vard = predicate.vardescriptors;
3565 Hashtable<TempDescriptor, Integer> slotnumber=new Hashtable<TempDescriptor, Integer>();
3568 for(Iterator vard_it = c_vard.iterator(); vard_it.hasNext();) {
3569 VarDescriptor vard = (VarDescriptor)vard_it.next();
3570 TypeDescriptor typed = vard.getType();
3572 //generate for flags
3573 HashSet fen_hashset = predicate.flags.get(vard.getSymbol());
3574 output.println("int predicateflags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
3576 if (fen_hashset!=null) {
3577 for (Iterator fen_it = fen_hashset.iterator(); fen_it.hasNext();) {
3578 FlagExpressionNode fen = (FlagExpressionNode)fen_it.next();
3580 DNFFlag dflag=fen.getDNF();
3581 numberterms+=dflag.size();
3583 Hashtable flags=(Hashtable)flagorder.get(typed.getClassDesc());
3585 for(int j=0; j<dflag.size(); j++) {
3587 output.println(",");
3588 Vector term=dflag.get(j);
3591 for(int k=0; k<term.size(); k++) {
3592 DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
3593 FlagDescriptor fd=dfa.getFlag();
3594 boolean negated=dfa.getNegated();
3595 int flagid=1<<((Integer)flags.get(fd)).intValue();
3600 output.print("/*andmask*/0x"+Integer.toHexString(andmask)+", /*checkmask*/0x"+Integer.toHexString(checkmask));
3605 output.println("};\n");
3608 TagExpressionList tagel = predicate.tags.get(vard.getSymbol());
3609 output.println("int predicatetags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
3612 for(int j=0; j<tagel.numTags(); j++) {
3614 output.println(",");
3615 TempDescriptor tmp=tagel.getTemp(j);
3616 if (!slotnumber.containsKey(tmp)) {
3617 Integer slotint=new Integer(current_slot++);
3618 slotnumber.put(tmp,slotint);
3620 int slot=slotnumber.get(tmp).intValue();
3621 output.println("/* slot */"+ slot+", /*tagid*/"+state.getTagId(tmp.getTag()));
3623 numtags = tagel.numTags();
3625 output.println("};");
3627 //store the result into a predicatemember struct
3628 output.println("struct predicatemember predicatemember_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"={");
3629 output.println("/*type*/"+typed.getClassDesc().getId()+",");
3630 output.println("/* number of dnf terms */"+numberterms+",");
3631 output.println("predicateflags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3632 output.println("/* number of tag */"+numtags+",");
3633 output.println("predicatetags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3634 output.println("};\n");
3639 //generate an array that stores the entire predicate
3640 output.println("struct predicatemember * predicatememberarray_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
3641 for( int j = 0; j<predicateindex; j++) {
3642 if( j != predicateindex-1) output.println("&predicatemember_"+j+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3643 else output.println("&predicatemember_"+j+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
3645 output.println("};\n");
3646 return predicateindex;
3650 void generateOptionalArrays(PrintWriter output, PrintWriter headers, Hashtable<ClassDescriptor, Hashtable<FlagState, Set<OptionalTaskDescriptor>>> safeexecution, Hashtable optionaltaskdescriptors) {
3651 generateOptionalHeader(headers);
3653 output.println("#include \"optionalstruct.h\"\n\n");
3654 output.println("#include \"stdlib.h\"\n");
3656 HashSet processedcd = new HashSet();
3658 Enumeration e = safeexecution.keys();
3659 while (e.hasMoreElements()) {
3662 ClassDescriptor cdtemp=(ClassDescriptor)e.nextElement();
3663 Hashtable flaginfo=(Hashtable)flagorder.get(cdtemp); //will be used several times
3665 //Generate the struct of optionals
3666 Collection c_otd = ((Hashtable)optionaltaskdescriptors.get(cdtemp)).values();
3667 numotd = c_otd.size();
3668 if(maxotd<numotd) maxotd = numotd;
3669 if( !c_otd.isEmpty() ) {
3670 for(Iterator otd_it = c_otd.iterator(); otd_it.hasNext();) {
3671 OptionalTaskDescriptor otd = (OptionalTaskDescriptor)otd_it.next();
3673 //generate the int arrays for the predicate
3674 Predicate predicate = otd.predicate;
3675 int predicateindex = generateOptionalPredicate(predicate, otd, cdtemp, output);
3676 TreeSet<Integer> fsset=new TreeSet<Integer>();
3677 //iterate through possible FSes corresponding to
3678 //the state when entering
3680 for(Iterator fses = otd.enterflagstates.iterator(); fses.hasNext();) {
3681 FlagState fs = (FlagState)fses.next();
3683 for(Iterator flags = fs.getFlags(); flags.hasNext();) {
3684 FlagDescriptor flagd = (FlagDescriptor)flags.next();
3685 int id=1<<((Integer)flaginfo.get(flagd)).intValue();
3688 fsset.add(new Integer(flagid));
3689 //tag information not needed because tag
3690 //changes are not tolerated.
3693 output.println("int enterflag_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
3694 boolean needcomma=false;
3695 for(Iterator<Integer> it=fsset.iterator(); it.hasNext();) {
3698 output.println(it.next());
3701 output.println("};\n");
3704 //generate optionaltaskdescriptor that actually
3705 //includes exit fses, predicate and the task
3707 output.println("struct optionaltaskdescriptor optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"={");
3708 output.println("&task_"+otd.td.getSafeSymbol()+",");
3709 output.println("/*index*/"+otd.getIndex()+",");
3710 output.println("/*number of enter flags*/"+fsset.size()+",");
3711 output.println("enterflag_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3712 output.println("/*number of members */"+predicateindex+",");
3713 output.println("predicatememberarray_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3714 output.println("};\n");
3718 // if there are no optionals, there is no need to build the rest of the struct
3720 output.println("struct optionaltaskdescriptor * otdarray"+cdtemp.getSafeSymbol()+"[]={");
3721 c_otd = ((Hashtable)optionaltaskdescriptors.get(cdtemp)).values();
3722 if( !c_otd.isEmpty() ) {
3723 boolean needcomma=false;
3724 for(Iterator otd_it = c_otd.iterator(); otd_it.hasNext();) {
3725 OptionalTaskDescriptor otd = (OptionalTaskDescriptor)otd_it.next();
3727 output.println(",");
3729 output.println("&optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
3732 output.println("};\n");
3734 //get all the possible flagstates reachable by an object
3735 Hashtable hashtbtemp = safeexecution.get(cdtemp);
3737 TreeSet fsts=new TreeSet(new FlagComparator(flaginfo));
3738 fsts.addAll(hashtbtemp.keySet());
3739 for(Iterator fsit=fsts.iterator(); fsit.hasNext();) {
3740 FlagState fs = (FlagState)fsit.next();
3743 //get the set of OptionalTaskDescriptors corresponding
3744 HashSet<OptionalTaskDescriptor> availabletasks = (HashSet<OptionalTaskDescriptor>)hashtbtemp.get(fs);
3745 //iterate through the OptionalTaskDescriptors and
3746 //store the pointers to the optionals struct (see on
3747 //top) into an array
3749 output.println("struct optionaltaskdescriptor * optionaltaskdescriptorarray_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"[] = {");
3750 for(Iterator<OptionalTaskDescriptor> mos = ordertd(availabletasks).iterator(); mos.hasNext();) {
3751 OptionalTaskDescriptor mm = mos.next();
3753 output.println("&optionaltaskdescriptor_"+mm.getuid()+"_"+cdtemp.getSafeSymbol());
3755 output.println("&optionaltaskdescriptor_"+mm.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3758 output.println("};\n");
3760 //process flag information (what the flag after failure is) so we know what optionaltaskdescriptors to choose.
3763 for(Iterator flags = fs.getFlags(); flags.hasNext();) {
3764 FlagDescriptor flagd = (FlagDescriptor)flags.next();
3765 int id=1<<((Integer)flaginfo.get(flagd)).intValue();
3769 //process tag information
3772 boolean first = true;
3773 Enumeration tag_enum = fs.getTags();
3774 output.println("int tags_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"[]={");
3775 while(tag_enum.hasMoreElements()) {
3777 TagDescriptor tagd = (TagDescriptor)tag_enum.nextElement();
3781 output.println(", ");
3782 output.println("/*tagid*/"+state.getTagId(tagd));
3784 output.println("};");
3786 Set<TaskIndex> tiset=sa.getTaskIndex(fs);
3787 for(Iterator<TaskIndex> itti=tiset.iterator(); itti.hasNext();) {
3788 TaskIndex ti=itti.next();
3792 Set<OptionalTaskDescriptor> otdset=sa.getOptions(fs, ti);
3794 output.print("struct optionaltaskdescriptor * optionaltaskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex()+"_array[] = {");
3795 boolean needcomma=false;
3796 for(Iterator<OptionalTaskDescriptor> otdit=ordertd(otdset).iterator(); otdit.hasNext();) {
3797 OptionalTaskDescriptor otd=otdit.next();
3801 output.println("&optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
3803 output.println("};");
3805 output.print("struct taskfailure taskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex()+" = {");
3806 output.print("&task_"+ti.getTask().getSafeSymbol()+", ");
3807 output.print(ti.getIndex()+", ");
3808 output.print(otdset.size()+", ");
3809 output.print("optionaltaskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex()+"_array");
3810 output.println("};");
3813 tiset=sa.getTaskIndex(fs);
3814 boolean needcomma=false;
3816 output.println("struct taskfailure * taskfailurearray"+fscounter+"_"+cdtemp.getSafeSymbol()+"[]={");
3817 for(Iterator<TaskIndex> itti=tiset.iterator(); itti.hasNext();) {
3818 TaskIndex ti=itti.next();
3819 if (ti.isRuntime()) {
3826 output.print("&taskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex());
3828 output.println("};\n");
3830 //Store the result in fsanalysiswrapper
3832 output.println("struct fsanalysiswrapper fsanalysiswrapper_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"={");
3833 output.println("/*flag*/"+flagid+",");
3834 output.println("/* number of tags*/"+tagcounter+",");
3835 output.println("tags_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+",");
3836 output.println("/* numtask failures */"+(tiset.size()-runtimeti)+",");
3837 output.println("taskfailurearray"+fscounter+"_"+cdtemp.getSafeSymbol()+",");
3838 output.println("/* number of optionaltaskdescriptors */"+availabletasks.size()+",");
3839 output.println("optionaltaskdescriptorarray_FS"+fscounter+"_"+cdtemp.getSafeSymbol());
3840 output.println("};\n");
3844 //Build the array of fsanalysiswrappers
3845 output.println("struct fsanalysiswrapper * fsanalysiswrapperarray_"+cdtemp.getSafeSymbol()+"[] = {");
3846 boolean needcomma=false;
3847 for(int i = 0; i<fscounter; i++) {
3848 if (needcomma) output.print(",");
3849 output.println("&fsanalysiswrapper_FS"+(i+1)+"_"+cdtemp.getSafeSymbol());
3852 output.println("};");
3854 //Build the classanalysiswrapper referring to the previous array
3855 output.println("struct classanalysiswrapper classanalysiswrapper_"+cdtemp.getSafeSymbol()+"={");
3856 output.println("/*type*/"+cdtemp.getId()+",");
3857 output.println("/*numotd*/"+numotd+",");
3858 output.println("otdarray"+cdtemp.getSafeSymbol()+",");
3859 output.println("/* number of fsanalysiswrappers */"+fscounter+",");
3860 output.println("fsanalysiswrapperarray_"+cdtemp.getSafeSymbol()+"};\n");
3861 processedcd.add(cdtemp);
3864 //build an array containing every classes for which code has been build
3865 output.println("struct classanalysiswrapper * classanalysiswrapperarray[]={");
3866 for(int i=0; i<state.numClasses(); i++) {
3867 ClassDescriptor cn=cdarray[i];
3870 if (processedcd.contains(cn))
3871 output.print("&classanalysiswrapper_"+cn.getSafeSymbol());
3873 output.print("NULL");
3875 output.println("};");
3877 output.println("#define MAXOTD "+maxotd);
3878 headers.println("#endif");
3881 public List<OptionalTaskDescriptor> ordertd(Set<OptionalTaskDescriptor> otdset) {
3882 Relation r=new Relation();
3883 for(Iterator<OptionalTaskDescriptor>otdit=otdset.iterator(); otdit.hasNext();) {
3884 OptionalTaskDescriptor otd=otdit.next();
3885 TaskIndex ti=new TaskIndex(otd.td, otd.getIndex());
3889 LinkedList<OptionalTaskDescriptor> l=new LinkedList<OptionalTaskDescriptor>();
3890 for(Iterator it=r.keySet().iterator(); it.hasNext();) {
3891 Set s=r.get(it.next());
3892 for(Iterator it2=s.iterator(); it2.hasNext();) {
3893 OptionalTaskDescriptor otd=(OptionalTaskDescriptor)it2.next();
3901 protected void outputTransCode(PrintWriter output) {