add load balance module for multicore gc, fix message handling and memory allocation...
[IRC.git] / Robust / src / IR / Flat / BuildCodeMultiCore.java
1 package IR.Flat;
2
3 import java.io.FileOutputStream;
4 import java.io.PrintWriter;
5 import java.util.HashSet;
6 import java.util.Hashtable;
7 import java.util.Iterator;
8 import java.util.LinkedList;
9 import java.util.Queue;
10 import java.util.Set;
11 import java.util.Vector;
12
13 import Analysis.Locality.LocalityBinding;
14 import Analysis.Scheduling.Schedule;
15 import Analysis.TaskStateAnalysis.FEdge;
16 import Analysis.TaskStateAnalysis.FlagState;
17 import Analysis.TaskStateAnalysis.SafetyAnalysis;
18 import Analysis.OwnershipAnalysis.AllocationSite;
19 import Analysis.OwnershipAnalysis.OwnershipAnalysis;
20 import Analysis.OwnershipAnalysis.HeapRegionNode;
21 import Analysis.Prefetch.*;
22 import IR.ClassDescriptor;
23 import IR.Descriptor;
24 import IR.FlagDescriptor;
25 import IR.MethodDescriptor;
26 import IR.State;
27 import IR.TagVarDescriptor;
28 import IR.TaskDescriptor;
29 import IR.TypeDescriptor;
30 import IR.TypeUtil;
31 import IR.VarDescriptor;
32 import IR.Tree.DNFFlag;
33 import IR.Tree.DNFFlagAtom;
34 import IR.Tree.FlagExpressionNode;
35 import IR.Tree.TagExpressionList;
36
37 public class BuildCodeMultiCore extends BuildCode {
38   private Vector<Schedule> scheduling;
39   int coreNum;
40   Schedule currentSchedule;
41   Hashtable[] fsate2qnames;
42   String objqarrayprefix= "objqueuearray4class";
43   String objqueueprefix = "objqueue4parameter_";
44   String paramqarrayprefix = "paramqueuearray4task";
45   String coreqarrayprefix = "paramqueuearrays_core";
46   String taskprefix = "task_";
47   String taskarrayprefix = "taskarray_core";
48   String otqueueprefix = "___otqueue";
49   int startupcorenum;    // record the core containing startup task, suppose only one core can hava startup object
50
51   private OwnershipAnalysis m_oa;
52   private Vector<Vector<Integer>> m_aliasSets;
53   Hashtable<Integer, Vector<FlatNew>> m_aliasFNTbl4Para;
54   Hashtable<FlatNew, Vector<FlatNew>> m_aliasFNTbl;
55   Hashtable<FlatNew, Vector<Integer>> m_aliaslocksTbl4FN;
56
57   public BuildCodeMultiCore(State st, 
58                             Hashtable temptovar, 
59                             TypeUtil typeutil, 
60                             SafetyAnalysis sa, 
61                             Vector<Schedule> scheduling, 
62                             int coreNum, 
63                             PrefetchAnalysis pa) {
64     super(st, temptovar, typeutil, sa, pa);
65     this.scheduling = scheduling;
66     this.coreNum = coreNum;
67     this.currentSchedule = null;
68     this.fsate2qnames = null;
69     this.startupcorenum = 0;
70
71     // sometimes there are extra cores then needed in scheduling
72     // TODO
73     // currently, it is guaranteed that in scheduling, the corenum
74     // is started from 0 and continuous.
75     // MAY need modification here in the future when take hardware
76     // information into account.
77     if(this.scheduling.size() < this.coreNum) {
78       this.coreNum = this.scheduling.size();
79     }
80
81     this.m_oa = null;
82     this.m_aliasSets = null;
83     this.m_aliasFNTbl4Para = null;
84     this.m_aliasFNTbl = null;
85     this.m_aliaslocksTbl4FN = null;
86   }
87
88   public void setOwnershipAnalysis(OwnershipAnalysis m_oa) {
89     this.m_oa = m_oa;
90   }
91
92   public void buildCode() {
93     /* Create output streams to write to */
94     PrintWriter outclassdefs=null;
95     PrintWriter outstructs=null;
96     PrintWriter outmethodheader=null;
97     PrintWriter outmethod=null;
98     PrintWriter outvirtual=null;
99     PrintWriter outtask=null;
100     PrintWriter outtaskdefs=null;
101     //PrintWriter outoptionalarrays=null;
102     //PrintWriter optionalheaders=null;
103
104     try {
105       outstructs=new PrintWriter(new FileOutputStream(PREFIX+"structdefs.h"), true);
106       outmethodheader=new PrintWriter(new FileOutputStream(PREFIX+"methodheaders.h"), true);
107       outclassdefs=new PrintWriter(new FileOutputStream(PREFIX+"classdefs.h"), true);
108       outvirtual=new PrintWriter(new FileOutputStream(PREFIX+"virtualtable.h"), true);
109       outmethod=new PrintWriter(new FileOutputStream(PREFIX+"methods.c"), true);
110       if (state.TASK) {
111         outtask=new PrintWriter(new FileOutputStream(PREFIX+"task.h"), true);
112         outtaskdefs=new PrintWriter(new FileOutputStream(PREFIX+"taskdefs.c"), true);
113         /* optional
114            if (state.OPTIONAL){
115             outoptionalarrays=new PrintWriter(new FileOutputStream(PREFIX+"optionalarrays.c"), true);
116             optionalheaders=new PrintWriter(new FileOutputStream(PREFIX+"optionalstruct.h"), true);
117            } */
118       }
119       /*if (state.structfile!=null) {
120           outrepairstructs=new PrintWriter(new FileOutputStream(PREFIX+state.structfile+".struct"), true);
121          }*/
122     } catch (Exception e) {
123       e.printStackTrace();
124       System.exit(-1);
125     }
126
127     /* Build the virtual dispatch tables */
128     super.buildVirtualTables(outvirtual);
129
130     /* Output includes */
131     outmethodheader.println("#ifndef METHODHEADERS_H");
132     outmethodheader.println("#define METHODHEADERS_H");
133     outmethodheader.println("#include \"structdefs.h\"");
134     /*if (state.DSM)
135         outmethodheader.println("#include \"dstm.h\"");*/
136
137     /* Output Structures */
138     super.outputStructs(outstructs);
139
140     // Output the C class declarations
141     // These could mutually reference each other
142     super.outputClassDeclarations(outclassdefs);
143
144     // Output function prototypes and structures for parameters
145     Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
146     int numclasses = 0;
147     while(it.hasNext()) {
148       ++numclasses;
149       ClassDescriptor cn=(ClassDescriptor)it.next();
150       super.generateCallStructs(cn, outclassdefs, outstructs, outmethodheader);
151     }
152     outclassdefs.close();
153
154     if (state.TASK) {
155       /* Map flags to integers */
156       /* The runtime keeps track of flags using these integers */
157       it=state.getClassSymbolTable().getDescriptorsIterator();
158       while(it.hasNext()) {
159         ClassDescriptor cn=(ClassDescriptor)it.next();
160         super.mapFlags(cn);
161       }
162       /* Generate Tasks */
163       generateTaskStructs(outstructs, outmethodheader);
164
165       /* Outputs generic task structures if this is a task
166          program */
167       outputTaskTypes(outtask);
168     }
169
170     /* Build the actual methods */
171     super.outputMethods(outmethod);
172
173     if (state.TASK) {
174       Iterator[] taskits = new Iterator[this.coreNum];
175       for(int i = 0; i < taskits.length; ++i) {
176         taskits[i] = null;
177       }
178       int[] numtasks = new int[this.coreNum];
179       int[][] numqueues = new int[this.coreNum][numclasses];
180       /* Output code for tasks */
181       for(int i = 0; i < this.scheduling.size(); ++i) {
182         this.currentSchedule = this.scheduling.elementAt(i);
183         outputTaskCode(outtaskdefs, outmethod, outtask, taskits, numtasks, numqueues);
184       }
185
186       // Output task descriptors
187       boolean comma = false;
188       outtaskdefs.println("struct parameterwrapper ** objectqueues[][NUMCLASSES] = {");
189       boolean needcomma = false;
190       for(int i = 0; i < numqueues.length ; ++i) {
191         if(needcomma) {
192           outtaskdefs.println(",");
193         } else {
194           needcomma = true;
195         }
196         outtaskdefs.println("/* object queue array for core " + i + "*/");
197         outtaskdefs.print("{");
198         comma = false;
199         for(int j = 0; j < numclasses; ++j) {
200           if(comma) {
201             outtaskdefs.println(",");
202           } else {
203             comma = true;
204           }
205           outtaskdefs.print(this.objqarrayprefix + j + "_core" + i);
206         }
207         outtaskdefs.print("}");
208       }
209       outtaskdefs.println("};");
210       needcomma = false;
211       outtaskdefs.println("int numqueues[][NUMCLASSES] = {");
212       for(int i = 0; i < numqueues.length; ++i) {
213         if(needcomma) {
214           outtaskdefs.println(",");
215         } else {
216           needcomma = true;
217         }
218         int[] tmparray = numqueues[i];
219         comma = false;
220         outtaskdefs.print("{");
221         for(int j = 0; j < tmparray.length; ++j) {
222           if(comma) {
223             outtaskdefs.print(",");
224           } else {
225             comma = true;
226           }
227           outtaskdefs.print(tmparray[j]);
228         }
229         outtaskdefs.print("}");
230       }
231       outtaskdefs.println("};");
232
233       /* parameter queue arrays for all the tasks*/
234       outtaskdefs.println("struct parameterwrapper *** paramqueues[] = {");
235       needcomma = false;
236       for(int i = 0; i < this.coreNum ; ++i) {
237         if(needcomma) {
238           outtaskdefs.println(",");
239         } else {
240           needcomma = true;
241         }
242         outtaskdefs.println("/* parameter queue array for core " + i + "*/");
243         outtaskdefs.print(this.coreqarrayprefix + i);
244       }
245       outtaskdefs.println("};");
246
247       for(int i = 0; i < taskits.length; ++i) {
248         outtaskdefs.println("struct taskdescriptor * " + this.taskarrayprefix + i + "[]={");
249         Iterator taskit = taskits[i];
250         if(taskit != null) {
251           boolean first=true;
252           while(taskit.hasNext()) {
253             TaskDescriptor td=(TaskDescriptor)taskit.next();
254             if (first)
255               first=false;
256             else
257               outtaskdefs.println(",");
258             outtaskdefs.print("&" + this.taskprefix +td.getCoreSafeSymbol(i));
259           }
260         }
261         outtaskdefs.println();
262         outtaskdefs.println("};");
263       }
264       outtaskdefs.println("struct taskdescriptor ** taskarray[]= {");
265       comma = false;
266       for(int i = 0; i < taskits.length; ++i) {
267         if (comma)
268           outtaskdefs.println(",");
269         else
270           comma = true;
271         outtaskdefs.print(this.taskarrayprefix + i);
272       }
273       outtaskdefs.println("};");
274
275       outtaskdefs.print("int numtasks[]= {");
276       comma = false;
277       for(int i = 0; i < taskits.length; ++i) {
278         if (comma)
279           outtaskdefs.print(",");
280         else
281           comma=true;
282         outtaskdefs.print(numtasks[i]);
283       }
284       outtaskdefs.println("};");
285       outtaskdefs.println("int corenum=0;");
286
287       outtaskdefs.close();
288       outtask.println("#endif");
289       outtask.close();
290       /* Record maximum number of task parameters */
291       outstructs.println("#define MAXTASKPARAMS "+maxtaskparams);
292       /* Record maximum number of all types, i.e. length of classsize[] */
293       outstructs.println("#define NUMTYPES "+(state.numClasses() + state.numArrays()));
294       /* Record number of cores */
295       outstructs.println("#define NUMCORES "+this.coreNum);
296       /* Record number of core containing startup task */
297       outstructs.println("#define STARTUPCORE "+this.startupcorenum);
298     }     //else if (state.main!=null) {
299           /* Generate main method */
300           // outputMainMethod(outmethod);
301           //}
302
303     /* Generate information for task with optional parameters */
304     /*if (state.TASK&&state.OPTIONAL){
305         generateOptionalArrays(outoptionalarrays, optionalheaders, state.getAnalysisResult(), state.getOptionalTaskDescriptors());
306         outoptionalarrays.close();
307        } */
308
309     /* Output structure definitions for repair tool */
310     /*if (state.structfile!=null) {
311         buildRepairStructs(outrepairstructs);
312         outrepairstructs.close();
313        }*/
314
315     /* Close files */
316     outmethodheader.println("#endif");
317     outmethodheader.close();
318     outmethod.close();
319     outstructs.println("#endif");
320     outstructs.close();
321   }
322
323   /** This function outputs (1) structures that parameters are
324    * passed in (when PRECISE GC is enabled) and (2) function
325    * prototypes for the tasks */
326
327   private void generateTaskStructs(PrintWriter output, 
328                                    PrintWriter headersout) {
329     /* Cycle through tasks */
330     for(int i = 0; i < this.scheduling.size(); ++i) {
331       Schedule tmpschedule = this.scheduling.elementAt(i);
332       int num = tmpschedule.getCoreNum();
333       Iterator<TaskDescriptor> taskit = tmpschedule.getTasks().iterator();
334
335       while(taskit.hasNext()) {
336         /* Classify parameters */
337         TaskDescriptor task=taskit.next();
338         FlatMethod fm=state.getMethodFlat(task);
339         super.generateTempStructs(fm, null);
340
341         ParamsObject objectparams=(ParamsObject) paramstable.get(task);
342         TempObject objecttemps=(TempObject) tempstable.get(task);
343
344         /* Output parameter structure */
345         if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
346           output.println("struct "+task.getCoreSafeSymbol(num)+"_params {");
347           output.println("  int size;");
348           output.println("  void * next;");
349           for(int j=0; j<objectparams.numPointers(); j++) {
350             TempDescriptor temp=objectparams.getPointer(j);
351             output.println("  struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
352           }
353
354           output.println("};\n");
355           if ((objectparams.numPointers()+fm.numTags())>maxtaskparams) {
356             maxtaskparams=objectparams.numPointers()+fm.numTags();
357           }
358         }
359
360         /* Output temp structure */
361         if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
362           output.println("struct "+task.getCoreSafeSymbol(num)+"_locals {");
363           output.println("  int size;");
364           output.println("  void * next;");
365           for(int j=0; j<objecttemps.numPointers(); j++) {
366             TempDescriptor temp=objecttemps.getPointer(j);
367             if (temp.getType().isNull())
368               output.println("  void * "+temp.getSafeSymbol()+";");
369             else if(temp.getType().isTag())
370               output.println("  struct "+
371                              (new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
372             else
373               output.println("  struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
374           }
375           output.println("};\n");
376         }
377
378         /* Output task declaration */
379         headersout.print("void " + task.getCoreSafeSymbol(num)+"(");
380
381         if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
382           headersout.print("struct "+task.getCoreSafeSymbol(num)+"_params * "+paramsprefix);
383         } else
384           headersout.print("void * parameterarray[]");
385         headersout.println(");\n");
386       }
387     }
388
389   }
390
391   /* This method outputs code for each task. */
392
393   private void outputTaskCode(PrintWriter outtaskdefs, 
394                                   PrintWriter outmethod, 
395                                   PrintWriter outtask, 
396                                   Iterator[] taskits, 
397                                   int[] numtasks,
398                               int[][] numqueues) {
399     /* Compile task based program */
400     outtaskdefs.println("#include \"task.h\"");
401     outtaskdefs.println("#include \"methodheaders.h\"");
402
403     /* Output object transfer queues into method.c*/
404     generateObjectTransQueues(outmethod);
405
406     //Vector[] qnames = new Vector[2];
407     int numclasses = numqueues[0].length;
408     Vector qnames[]= new Vector[numclasses];
409     for(int i = 0; i < qnames.length; ++i) {
410       qnames[i] = null;
411     }
412     Iterator<TaskDescriptor> taskit=this.currentSchedule.getTasks().iterator();
413     while(taskit.hasNext()) {
414       TaskDescriptor td=taskit.next();
415       FlatMethod fm=state.getMethodFlat(td);
416       generateTaskMethod(fm, null, outmethod);
417       generateTaskDescriptor(outtaskdefs, outtask, fm, td, qnames);
418     }
419
420     // generate queuearray for this core
421     int num = this.currentSchedule.getCoreNum();
422     boolean comma = false;
423     for(int i = 0; i < qnames.length; ++i) {
424       outtaskdefs.println("/* object queue array for class " + i + " on core " + num + "*/");
425       outtaskdefs.println("struct parameterwrapper * " + this.objqarrayprefix + i + "_core" + num + "[] = {");
426       comma = false;
427       Vector tmpvector = qnames[i];
428       if(tmpvector != null) {
429         for(int j = 0; j < tmpvector.size(); ++j) {
430           if(comma) {
431             outtaskdefs.println(",");
432           } else {
433             comma = true;
434           }
435           outtaskdefs.print("&" + tmpvector.elementAt(j));
436         }
437         numqueues[num][i] = tmpvector.size();
438       } else {
439         numqueues[num][i] = 0;
440       }
441       outtaskdefs.println("};");
442     }
443
444     /* All the queues for tasks residing on this core*/
445     comma = false;
446     outtaskdefs.println("/* object queue array for tasks on core " + num + "*/");
447     outtaskdefs.println("struct parameterwrapper ** " + this.coreqarrayprefix + num + "[] = {");
448     taskit=this.currentSchedule.getTasks().iterator();
449     while(taskit.hasNext()) {
450       if (comma) {
451         outtaskdefs.println(",");
452       } else {
453         comma = true;
454       }
455       TaskDescriptor td=taskit.next();
456       outtaskdefs.print(this.paramqarrayprefix + td.getCoreSafeSymbol(num));
457     }
458     outtaskdefs.println("};");
459
460     // record the iterator of tasks on this core
461     taskit=this.currentSchedule.getTasks().iterator();
462     taskits[num] = taskit;
463     numtasks[num] = this.currentSchedule.getTasks().size();
464   }
465
466   /** Prints out definitions for generic task structures */
467   private void outputTaskTypes(PrintWriter outtask) {
468     outtask.println("#ifndef _TASK_H");
469     outtask.println("#define _TASK_H");
470     outtask.println("#include \"ObjectHash.h\"");
471     outtask.println("#include \"structdefs.h\"");
472     outtask.println("#include \"Queue.h\"");
473     outtask.println("#include <string.h>");
474         outtask.println("#include \"runtime_arch.h\"");
475     //outtask.println("#ifdef RAW");
476     //outtask.println("#include <raw.h>");
477     //outtask.println("#endif");
478     outtask.println();
479     outtask.println("struct tagobjectiterator {");
480     outtask.println("  int istag; /* 0 if object iterator, 1 if tag iterator */");
481     outtask.println("  struct ObjectIterator it; /* Object iterator */");
482     outtask.println("  struct ObjectHash * objectset;");
483     outtask.println("#ifdef OPTIONAL");
484     outtask.println("  int failedstate;");
485     outtask.println("#endif");
486     outtask.println("  int slot;");
487     outtask.println("  int tagobjindex; /* Index for tag or object depending on use */");
488     outtask.println("  /*if tag we have an object binding */");
489     outtask.println("  int tagid;");
490     outtask.println("  int tagobjectslot;");
491     outtask.println("  /*if object, we may have one or more tag bindings */");
492     outtask.println("  int numtags;");
493     outtask.println("  int tagbindings[MAXTASKPARAMS-1]; /* list slots */");
494     outtask.println("};");
495     outtask.println();
496     outtask.println("struct parameterwrapper {");
497     outtask.println("  //int type;");
498     outtask.println("  struct ObjectHash * objectset;");
499     outtask.println("  int numberofterms;");
500     outtask.println("  int * intarray;");
501     outtask.println("  int numbertags;");
502     outtask.println("  int * tagarray;");
503     outtask.println("  struct taskdescriptor * task;");
504     outtask.println("  int slot;");
505     outtask.println("  struct tagobjectiterator iterators[MAXTASKPARAMS-1];");
506     outtask.println("};");
507     outtask.println();
508     outtask.println("extern struct parameterwrapper ** objectqueues[][NUMCLASSES];");
509     outtask.println("extern int numqueues[][NUMCLASSES];");
510     outtask.println();
511     outtask.println("struct parameterdescriptor {");
512     outtask.println("  int type;");
513     outtask.println("  int numberterms;");
514     outtask.println("  int *intarray;");
515     outtask.println("  struct parameterwrapper * queue;");
516     outtask.println("  int numbertags;");
517     outtask.println("  int *tagarray;");
518     outtask.println("};");
519     outtask.println();
520     outtask.println("struct taskdescriptor {");
521     outtask.println("  void * taskptr;");
522     outtask.println("  int numParameters;");
523     outtask.println("  int numTotal;");
524     outtask.println("  struct parameterdescriptor **descriptorarray;");
525     outtask.println("  char * name;");
526     outtask.println("};");
527     outtask.println();
528     outtask.println("extern struct taskdescriptor ** taskarray[];");
529     outtask.println("extern int numtasks[];");
530     outtask.println("extern int corenum;");     // define corenum to identify different core
531     outtask.println("extern struct parameterwrapper *** paramqueues[];");
532     outtask.println();
533   }
534
535   private void generateObjectTransQueues(PrintWriter output) {
536     if(this.fsate2qnames == null) {
537       this.fsate2qnames = new Hashtable[this.coreNum];
538       for(int i = 0; i < this.fsate2qnames.length; ++i) {
539         this.fsate2qnames[i] = null;
540       }
541     }
542     int num = this.currentSchedule.getCoreNum();
543     assert(this.fsate2qnames[num] == null);
544     Hashtable<FlagState, String> flag2qname = new Hashtable<FlagState, String>();
545     this.fsate2qnames[num] = flag2qname;
546     Hashtable<FlagState, Queue<Integer>> targetCoreTbl = this.currentSchedule.getTargetCoreTable();
547     if(targetCoreTbl != null) {
548       Object[] keys = targetCoreTbl.keySet().toArray();
549       output.println();
550       output.println("/* Object transfer queues for core" + num + ".*/");
551       for(int i = 0; i < keys.length; ++i) {
552         FlagState tmpfstate = (FlagState)keys[i];
553         Object[] targetcores = targetCoreTbl.get(tmpfstate).toArray();
554         String queuename = this.otqueueprefix + tmpfstate.getClassDescriptor().getCoreSafeSymbol(num) + tmpfstate.getuid() + "___";
555         String queueins = queuename + "ins";
556         flag2qname.put(tmpfstate, queuename);
557         output.println("struct " + queuename + " {");
558         output.println("  int * cores;");
559         output.println("  int index;");
560         output.println("  int length;");
561         output.println("};");
562         output.print("int " + queuename + "cores[] = {");
563         for(int j = 0; j < targetcores.length; ++j) {
564           if(j > 0) {
565             output.print(", ");
566           }
567           output.print(((Integer)targetcores[j]).intValue());
568         }
569         output.println("};");
570         output.println("struct " + queuename + " " + queueins + "= {");
571         output.println(/*".cores = " + */ queuename + "cores,");
572         output.println(/*".index = " + */ "0,");
573         output.println(/*".length = " +*/ targetcores.length + "};");
574       }
575     }
576     output.println();
577   }
578
579   private void generateTaskMethod(FlatMethod fm, 
580                                       LocalityBinding lb, 
581                                       PrintWriter output) {
582     /*if (State.PRINTFLAT)
583         System.out.println(fm.printMethod());*/
584     TaskDescriptor task=fm.getTask();
585     assert(task != null);
586     int num = this.currentSchedule.getCoreNum();
587
588     //ParamsObject objectparams=(ParamsObject)paramstable.get(lb!=null?lb:task);
589     generateTaskHeader(fm, lb, task,output);
590     // output code to check if need to do gc
591     if(state.MULTICOREGC) {
592       output.println("#ifdef MULTICORE_GC");
593       output.println("gc();");
594       output.println("#endif");
595     }
596     TempObject objecttemp=(TempObject) tempstable.get(lb!=null ? lb : task);
597     /*if (state.DSM&&lb.getHasAtomic()) {
598         output.println("transrecord_t * trans;");
599        }*/
600
601     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
602       output.print("   struct "+task.getCoreSafeSymbol(num)+"_locals "+localsprefix+"={");
603
604       output.print(objecttemp.numPointers()+",");
605       output.print(paramsprefix);
606       for(int j=0; j<objecttemp.numPointers(); j++)
607         output.print(", NULL");
608       output.println("};");
609     }
610
611     for(int i=0; i<objecttemp.numPrimitives(); i++) {
612       TempDescriptor td=objecttemp.getPrimitive(i);
613       TypeDescriptor type=td.getType();
614       if (type.isNull())
615         output.println("   void * "+td.getSafeSymbol()+";");
616       else if (type.isClass()||type.isArray())
617         output.println("   struct "+type.getSafeSymbol()+" * "+td.getSafeSymbol()+";");
618       else
619         output.println("   "+type.getSafeSymbol()+" "+td.getSafeSymbol()+";");
620     }
621
622     for(int i = 0; i < fm.numParameters(); ++i) {
623       TempDescriptor temp = fm.getParameter(i);
624       output.println("   int "+generateTempFlagName(fm, temp, lb)+" = "+super.generateTemp(fm, temp, lb)+
625                      "->flag;");
626     }
627
628     /* Assign labels to FlatNode's if necessary.*/
629
630     Hashtable<FlatNode, Integer> nodetolabel=super.assignLabels(fm);
631
632     /* Check to see if we need to do a GC if this is a
633      * multi-threaded program...*/
634
635     /*if ((state.THREAD||state.DSM)&&GENERATEPRECISEGC) {
636         if (state.DSM&&lb.isAtomic())
637             output.println("checkcollect2(&"+localsprefix+",trans);");
638         else
639             output.println("checkcollect(&"+localsprefix+");");
640        }*/
641
642     /* Create queues to store objects need to be transferred to other cores and their destination*/
643     output.println("   struct Queue * totransobjqueue = createQueue();");
644     output.println("   struct transObjInfo * tmpObjInfo = NULL;");
645
646     this.m_aliasSets = null;
647     this.m_aliasFNTbl4Para = null;
648     this.m_aliasFNTbl = null;
649     this.m_aliaslocksTbl4FN = null;
650     outputAliasLockCode(fm, lb, output);
651
652     /* generate print information for RAW version */
653     output.println("#ifdef MULTICORE");
654         if(this.state.RAW) {
655                 output.println("{");
656                 output.println("int tmpsum = 0;");
657                 output.println("char * taskname = \"" + task.getSymbol() + "\";");
658                 output.println("int tmplen = " + task.getSymbol().length() + ";");
659                 output.println("int tmpindex = 1;");
660                 output.println("for(;tmpindex < tmplen; tmpindex++) {");
661                 output.println("   tmpsum = tmpsum * 10 + *(taskname + tmpindex) - '0';");
662                 output.println("}");
663         }
664     output.println("#ifdef RAWPATH");
665         if(this.state.RAW) {
666                 output.println("BAMBOO_DEBUGPRINT(0xAAAA);");
667                 output.println("BAMBOO_DEBUGPRINT_REG(tmpsum);"); 
668         } else {
669                 output.println("BAMBOO_START_CRITICAL_SECTION();");
670                 output.println("tprintf(\"Process %x(%d): task %s\\n\", corenum, corenum, \"" + task.getSymbol() + "\");");
671                 output.println("BAMBOO_CLOSE_CRITICAL_SECTION();");
672         }
673         //output.println("BAMBOO_DEBUGPRINT(BAMBOO_GET_EXE_TIME());");
674     output.println("#endif");
675     output.println("#ifdef DEBUG");
676         if(this.state.RAW) {
677                 output.println("BAMBOO_DEBUGPRINT(0xAAAA);");
678                 output.println("BAMBOO_DEBUGPRINT_REG(tmpsum);");
679         } else {
680                 output.println("BAMBOO_START_CRITICAL_SECTION();");
681                 output.println("tprintf(\"Process %x(%d): task %s\\n\", corenum, corenum, \"" + task.getSymbol() + "\");");
682                 output.println("BAMBOO_CLOSE_CRITICAL_SECTION();");
683         }
684     output.println("#endif");
685         if(this.state.RAW) {
686                 output.println("}");
687         }
688         output.println("#endif");
689
690     for(int i = 0; i < fm.numParameters(); ++i) {
691       TempDescriptor temp = fm.getParameter(i);
692       output.println("   ++" + super.generateTemp(fm, temp, lb)+"->version;");
693     }
694
695     /* Do the actual code generation */
696     FlatNode current_node=null;
697     HashSet tovisit=new HashSet();
698     HashSet visited=new HashSet();
699     tovisit.add(fm.getNext(0));
700     while(current_node!=null||!tovisit.isEmpty()) {
701       if (current_node==null) {
702         current_node=(FlatNode)tovisit.iterator().next();
703         tovisit.remove(current_node);
704       }
705       visited.add(current_node);
706       if (nodetolabel.containsKey(current_node))
707         output.println("L"+nodetolabel.get(current_node)+":");
708       /*if (state.INSTRUCTIONFAILURE) {
709           if (state.THREAD||state.DSM) {
710               output.println("if ((++instructioncount)>failurecount) {instructioncount=0;injectinstructionfailure();}");
711           }
712           else
713               output.println("if ((--instructioncount)==0) injectinstructionfailure();");
714          }*/
715       if (current_node.numNext()==0) {
716         output.print("   ");
717         super.generateFlatNode(fm, lb, current_node, output);
718         if (current_node.kind()!=FKind.FlatReturnNode) {
719           //output.println("   flushAll();");
720           output.println("#ifdef CACHEFLUSH");
721           output.println("BAMBOO_START_CRITICAL_SECTION();");
722           output.println("#ifdef DEBUG");
723           output.println("BAMBOO_DEBUGPRINT(0xec00);");
724           output.println("#endif");
725           output.println("BAMBOO_CACHE_FLUSH_ALL();");
726           output.println("#ifdef DEBUG");
727           output.println("BAMBOO_DEBUGPRINT(0xecff);");
728           output.println("#endif");
729           output.println("BAMBOO_CLOSE_CRITICAL_SECTION();");
730           output.println("#endif");
731           outputTransCode(output);
732           output.println("   return;");
733         }
734         current_node=null;
735       } else if(current_node.numNext()==1) {
736         output.print("   ");
737         super.generateFlatNode(fm, lb, current_node, output);
738         FlatNode nextnode=current_node.getNext(0);
739         if (visited.contains(nextnode)) {
740           output.println("goto L"+nodetolabel.get(nextnode)+";");
741           current_node=null;
742         } else
743           current_node=nextnode;
744       } else if (current_node.numNext()==2) {
745         /* Branch */
746         output.print("   ");
747         super.generateFlatCondBranch(fm, lb, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
748         if (!visited.contains(current_node.getNext(1)))
749           tovisit.add(current_node.getNext(1));
750         if (visited.contains(current_node.getNext(0))) {
751           output.println("goto L"+nodetolabel.get(current_node.getNext(0))+";");
752           current_node=null;
753         } else
754           current_node=current_node.getNext(0);
755       } else throw new Error();
756     }
757
758     output.println("}\n\n");
759   }
760
761   /** This method outputs TaskDescriptor information */
762   private void generateTaskDescriptor(PrintWriter output, 
763                                       PrintWriter outtask, 
764                                       FlatMethod fm, 
765                                       TaskDescriptor task, 
766                                       Vector[] qnames) {
767     int num = this.currentSchedule.getCoreNum();
768
769     output.println("/* TaskDescriptor information for task " + task.getSymbol() + " on core " + num + "*/");
770
771     for (int i=0; i<task.numParameters(); i++) {
772       VarDescriptor param_var=task.getParameter(i);
773       TypeDescriptor param_type=task.getParamType(i);
774       FlagExpressionNode param_flag=task.getFlag(param_var);
775       TagExpressionList param_tag=task.getTag(param_var);
776
777       int dnfterms;
778       if (param_flag==null) {
779         output.println("int parameterdnf_"+i+"_"+task.getCoreSafeSymbol(num)+"[]={");
780         output.println("0x0, 0x0 };");
781         dnfterms=1;
782       } else {
783         DNFFlag dflag=param_flag.getDNF();
784         dnfterms=dflag.size();
785
786         Hashtable flags=(Hashtable)flagorder.get(param_type.getClassDesc());
787         output.println("int parameterdnf_"+i+"_"+task.getCoreSafeSymbol(num)+"[]={");
788         for(int j=0; j<dflag.size(); j++) {
789           if (j!=0)
790             output.println(",");
791           Vector term=dflag.get(j);
792           int andmask=0;
793           int checkmask=0;
794           for(int k=0; k<term.size(); k++) {
795             DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
796             FlagDescriptor fd=dfa.getFlag();
797             boolean negated=dfa.getNegated();
798             int flagid=1<<((Integer)flags.get(fd)).intValue();
799             andmask|=flagid;
800             if (!negated)
801               checkmask|=flagid;
802           }
803           output.print("0x"+Integer.toHexString(andmask)+", 0x"+Integer.toHexString(checkmask));
804         }
805         output.println("};");
806       }
807
808       output.println("int parametertag_"+i+"_"+task.getCoreSafeSymbol(num)+"[]={");
809       //BUG...added next line to fix, test with any task program
810       if (param_tag!=null)
811         for(int j=0; j<param_tag.numTags(); j++) {
812           if (j!=0)
813             output.println(",");
814           /* for each tag we need */
815           /* which slot it is */
816           /* what type it is */
817           TagVarDescriptor tvd=(TagVarDescriptor)task.getParameterTable().get(param_tag.getName(j));
818           TempDescriptor tmp=param_tag.getTemp(j);
819           int slot=fm.getTagInt(tmp);
820           output.println(slot+", "+state.getTagId(tvd.getTag()));
821         }
822       output.println("};");
823
824       // generate object queue for this parameter
825       String qname = this.objqueueprefix+i+"_"+task.getCoreSafeSymbol(num);
826       if(param_type.getClassDesc().getSymbol().equals("StartupObject")) {
827         this.startupcorenum = num;
828       }
829       if(qnames[param_type.getClassDesc().getId()] == null) {
830         qnames[param_type.getClassDesc().getId()] = new Vector();
831       }
832       qnames[param_type.getClassDesc().getId()].addElement(qname);
833       outtask.println("extern struct parameterwrapper " + qname + ";");
834       output.println("struct parameterwrapper " + qname + "={");
835       output.println(".objectset = 0,");      // objectset
836       output.println("/* number of DNF terms */ .numberofterms = "+dnfterms+",");     // numberofterms
837       output.println(".intarray = parameterdnf_"+i+"_"+task.getCoreSafeSymbol(num)+",");    // intarray
838       // numbertags
839       if (param_tag!=null)
840         output.println("/* number of tags */ .numbertags = "+param_tag.numTags()+",");
841       else
842         output.println("/* number of tags */ .numbertags = 0,");
843       output.println(".tagarray = parametertag_"+i+"_"+task.getCoreSafeSymbol(num)+",");    // tagarray
844       output.println(".task = 0,");      // task
845       output.println(".slot = " + i + ",");    // slot
846       // iterators
847       output.println("};");
848
849       output.println("struct parameterdescriptor parameter_"+i+"_"+task.getCoreSafeSymbol(num)+"={");
850       output.println("/* type */"+param_type.getClassDesc().getId()+",");
851       output.println("/* number of DNF terms */"+dnfterms+",");
852       output.println("parameterdnf_"+i+"_"+task.getCoreSafeSymbol(num)+",");    // intarray
853       output.println("&" + qname + ",");     // queue
854       //BUG, added next line to fix and else statement...test
855       //with any task program
856       if (param_tag!=null)
857         output.println("/* number of tags */"+param_tag.numTags()+",");
858       else
859         output.println("/* number of tags */ 0,");
860       output.println("parametertag_"+i+"_"+task.getCoreSafeSymbol(num));     // tagarray
861       output.println("};");
862     }
863
864     /* parameter queues for this task*/
865     output.println("struct parameterwrapper * " + this.paramqarrayprefix + task.getCoreSafeSymbol(num)+"[] = {");
866     for (int i=0; i<task.numParameters(); i++) {
867       if (i!=0)
868         output.println(",");
869       output.print("&" + this.objqueueprefix + i + "_" + task.getCoreSafeSymbol(num));
870     }
871     output.println("};");
872
873     output.println("struct parameterdescriptor * parameterdescriptors_"+task.getCoreSafeSymbol(num)+"[] = {");
874     for (int i=0; i<task.numParameters(); i++) {
875       if (i!=0)
876         output.println(",");
877       output.print("&parameter_"+i+"_"+task.getCoreSafeSymbol(num));
878     }
879     output.println("};");
880
881     output.println("struct taskdescriptor " + this.taskprefix + task.getCoreSafeSymbol(num) + "={");
882     output.println("&"+task.getCoreSafeSymbol(num)+",");
883     output.println("/* number of parameters */" +task.numParameters() + ",");
884     int numtotal=task.numParameters()+fm.numTags();
885     output.println("/* number total parameters */" +numtotal + ",");
886     output.println("parameterdescriptors_"+task.getCoreSafeSymbol(num)+",");
887     output.println("\""+task.getSymbol()+"\"");
888     output.println("};");
889
890     output.println();
891   }
892
893   /** This method generates header information for the task
894    *  referenced by the Descriptor des. */
895
896   private void generateTaskHeader(FlatMethod fm, 
897                                   LocalityBinding lb, 
898                                   Descriptor des, 
899                                   PrintWriter output) {
900     /* Print header */
901     ParamsObject objectparams=(ParamsObject)paramstable.get(lb!=null ? lb : des);
902     TaskDescriptor task=(TaskDescriptor) des;
903
904     int num = this.currentSchedule.getCoreNum();
905     //catch the constructor case
906     output.print("void ");
907     output.print(task.getCoreSafeSymbol(num)+"(");
908
909     boolean printcomma=false;
910     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
911       output.print("struct "+task.getCoreSafeSymbol(num)+"_params * "+paramsprefix);
912       printcomma=true;
913     }
914
915     /*if (state.DSM&&lb.isAtomic()) {
916         if (printcomma)
917             output.print(", ");
918         output.print("transrecord_t * trans");
919         printcomma=true;
920        }*/
921
922     if (!GENERATEPRECISEGC) {
923       /* Imprecise Task */
924       output.println("void * parameterarray[]) {");
925       /* Unpack variables */
926       for(int i=0; i<objectparams.numPrimitives(); i++) {
927         TempDescriptor temp=objectparams.getPrimitive(i);
928         output.println("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+"=parameterarray["+i+"];");
929       }
930       for(int i=0; i<fm.numTags(); i++) {
931         TempDescriptor temp=fm.getTag(i);
932         int offset=i+objectparams.numPrimitives();
933         output.println("struct ___TagDescriptor___ * "+temp.getSafeSymbol()+i+"___=parameterarray["+offset+"];");     // add i to fix bugs of duplicate definition of tags
934       }
935
936       if ((objectparams.numPrimitives()+fm.numTags())>maxtaskparams)
937         maxtaskparams=objectparams.numPrimitives()+fm.numTags();
938     } else output.println(") {");
939   }
940
941   protected void generateFlagOrAnd(FlatFlagActionNode ffan, 
942                                    FlatMethod fm, 
943                                    LocalityBinding lb, 
944                                    TempDescriptor temp,
945                                    PrintWriter output, 
946                                    int ormask, 
947                                    int andmask) {
948     if (ffan.getTaskType()==FlatFlagActionNode.NEWOBJECT) {
949       output.println("flagorandinit("+super.generateTemp(fm, temp, lb)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
950     } else {
951       int num = this.currentSchedule.getCoreNum();
952       ClassDescriptor cd = temp.getType().getClassDesc();
953       Vector<FlagState> initfstates = ffan.getInitFStates(cd);
954       for(int i = 0; i < initfstates.size(); ++i) {
955         FlagState tmpFState = initfstates.elementAt(i);
956         output.println("{");
957         QueueInfo qinfo = outputqueues(tmpFState, num, output, false);
958         output.println("flagorand("+super.generateTemp(fm, temp, lb)+", 0x"+Integer.toHexString(ormask)+
959                        ", 0x"+Integer.toHexString(andmask)+", " + qinfo.qname +
960                        ", " + qinfo.length + ");");
961         output.println("}");
962       }
963       if(ffan.getTaskType()==FlatFlagActionNode.TASKEXIT) {
964           // generate codes for profiling, recording which task exit it is
965           output.println("#ifdef PROFILE");
966           output.println("setTaskExitIndex(" + ffan.getTaskExitIndex() + ");");
967           output.println("#endif");
968       }
969     }
970   }
971
972   protected void generateObjectDistribute(FlatFlagActionNode ffan, 
973                                               FlatMethod fm, 
974                                               LocalityBinding lb, 
975                                               TempDescriptor temp,
976                                           PrintWriter output) {
977     ClassDescriptor cd = temp.getType().getClassDesc();
978     Vector<FlagState> initfstates = null;
979     Vector[] targetFStates = null;
980     if (ffan.getTaskType()==FlatFlagActionNode.NEWOBJECT) {
981       targetFStates = new Vector[1];
982       targetFStates[0] = ffan.getTargetFStates4NewObj(cd);
983     } else {
984       initfstates = ffan.getInitFStates(cd);
985       targetFStates = new Vector[initfstates.size()];
986       for(int i = 0; i < initfstates.size(); ++i) {
987         FlagState fs = initfstates.elementAt(i);
988         targetFStates[i] = ffan.getTargetFStates(fs);
989
990         if(!fs.isSetmask()) {
991           Hashtable flags=(Hashtable)flagorder.get(cd);
992           int andmask=0;
993           int checkmask=0;
994           Iterator it_flags = fs.getFlags();
995           while(it_flags.hasNext()) {
996             FlagDescriptor fd = (FlagDescriptor)it_flags.next();
997             int flagid=1<<((Integer)flags.get(fd)).intValue();
998             andmask|=flagid;
999             checkmask|=flagid;
1000           }
1001           fs.setAndmask(andmask);
1002           fs.setCheckmask(checkmask);
1003           fs.setSetmask(true);
1004         }
1005       }
1006     }
1007     boolean isolate = true;     // check if this flagstate can associate to some task with multiple params which can
1008                                 // reside on multiple cores
1009     if((this.currentSchedule == null) && (fm.getMethod().getClassDesc().getSymbol().equals("ServerSocket"))) {
1010       // ServerSocket object will always reside on current core
1011       for(int j = 0; j < targetFStates.length; ++j) {
1012         if(initfstates != null) {
1013           FlagState fs = initfstates.elementAt(j);
1014           output.println("if(" + generateTempFlagName(fm, temp, lb) + "&(0x" + Integer.toHexString(fs.getAndmask())
1015                          + ")==(0x" + Integer.toHexString(fs.getCheckmask()) + ")) {");
1016         }
1017         Vector<FlagState> tmpfstates = (Vector<FlagState>)targetFStates[j];
1018         for(int i = 0; i < tmpfstates.size(); ++i) {
1019           FlagState tmpFState = tmpfstates.elementAt(i);
1020           // TODO
1021           // may have bugs here
1022           output.println("/* reside on this core*");
1023           output.println("enqueueObject("+super.generateTemp(fm, temp, lb)+", NULL, 0);");
1024         }
1025         if(initfstates != null) {
1026           output.println("}");
1027         }
1028       }
1029       return;
1030     }
1031
1032     int num = this.currentSchedule.getCoreNum();
1033     Hashtable<FlagState, Queue<Integer>> targetCoreTbl = this.currentSchedule.getTargetCoreTable();
1034     for(int j = 0; j < targetFStates.length; ++j) {
1035       FlagState fs = null;
1036       if(initfstates != null) {
1037         fs = initfstates.elementAt(j);
1038         output.println("if((" + generateTempFlagName(fm, temp, lb) + "&(0x" + Integer.toHexString(fs.getAndmask())
1039                        + "))==(0x" + Integer.toHexString(fs.getCheckmask()) + ")) {");
1040       }
1041       Vector<FlagState> tmpfstates = (Vector<FlagState>)targetFStates[j];
1042       for(int i = 0; i < tmpfstates.size(); ++i) {
1043         FlagState tmpFState = tmpfstates.elementAt(i);
1044
1045         if(this.currentSchedule.getAllyCoreTable() == null) {
1046           isolate = true;
1047         } else {
1048           isolate = (this.currentSchedule.getAllyCoreTable().get(tmpFState) == null) ||
1049                     (this.currentSchedule.getAllyCoreTable().get(tmpFState).size() == 0);
1050         }
1051
1052         Vector<Integer> sendto = new Vector<Integer>();
1053         Queue<Integer> queue = null;
1054         if(targetCoreTbl != null) {
1055           queue = targetCoreTbl.get(tmpFState);
1056         }
1057         if((queue != null) &&
1058            ((queue.size() != 1) ||
1059             ((queue.size() == 1) && (queue.element().intValue() != num)))) {
1060           // this object may be transferred to other cores
1061           String queuename = (String) this.fsate2qnames[num].get(tmpFState);
1062           String queueins = queuename + "ins";
1063
1064           Object[] cores = queue.toArray();
1065           String index = "0";
1066           Integer targetcore = (Integer)cores[0];
1067           if(queue.size() > 1) {
1068             index = queueins + ".index";
1069           }
1070           if(queue.size() > 1) {
1071             output.println("switch(" + queueins + ".index % " + queueins + ".length) {");
1072             for(int k = 0; k < cores.length; ++k) {
1073               output.println("case " + k + ":");
1074               targetcore = (Integer)cores[k];
1075               if(targetcore.intValue() == num) {
1076                 output.println("/* reside on this core*/");
1077                 if(isolate) {
1078                   output.println("{");
1079                   QueueInfo qinfo = outputqueues(tmpFState, num, output, true);
1080                   output.println("enqueueObject("+super.generateTemp(fm, temp, lb)+", " + qinfo.qname +
1081                                  ", " + qinfo.length + ");");
1082                   output.println("}");
1083                 } /*else {
1084                   // TODO
1085                   // really needed?
1086                   output.println("/* possibly needed by multi-parameter tasks on this core*//*");
1087                   output.println("enqueueObject("+super.generateTemp(fm, temp, lb)+", NULL, 0);");
1088                 }*/  // deleted 09/07/06, multi-param tasks are pinned to one core now
1089               } else {
1090                 /*if(!isolate) {
1091                   // TODO
1092                   // Is it possible to decide the actual queues?
1093                   output.println("/* possibly needed by multi-parameter tasks on this core*//*");
1094                   output.println("enqueueObject("+super.generateTemp(fm, temp, lb)+", NULL, 0);");
1095                 }*/ // deleted 09/07/06, multi-param tasks are pinned to one core now
1096                 output.println("/* transfer to core " + targetcore.toString() + "*/");
1097                 output.println("{");
1098                 // enqueue this object and its destinations for later process
1099                 // all the possible queues
1100                 QueueInfo qinfo = null;
1101                 TranObjInfo tmpinfo = new TranObjInfo();
1102                 tmpinfo.name = super.generateTemp(fm, temp, lb);
1103                 tmpinfo.targetcore = targetcore;
1104                 FlagState targetFS = this.currentSchedule.getTargetFState(tmpFState);
1105                 if(targetFS != null) {
1106                   tmpinfo.fs = targetFS;
1107                 } else {
1108                   tmpinfo.fs = tmpFState;
1109                 }
1110                   qinfo = outputtransqueues(tmpinfo.fs, targetcore, output);
1111                   output.println("tmpObjInfo = RUNMALLOC(sizeof(struct transObjInfo));");
1112                   output.println("tmpObjInfo->objptr = (void *)" + tmpinfo.name + ";");
1113                   output.println("tmpObjInfo->targetcore = "+targetcore.toString()+";");
1114                   output.println("tmpObjInfo->queues = " + qinfo.qname + ";");
1115                   output.println("tmpObjInfo->length = " + qinfo.length + ";");
1116                   output.println("addNewItem(totransobjqueue, (void*)tmpObjInfo);");
1117                 output.println("}");
1118               }
1119               output.println("break;");
1120             }
1121             output.println("}");
1122           } else {
1123             /*if(!isolate) {
1124               // TODO
1125               // Is it possible to decide the actual queues?
1126               output.println("/* possibly needed by multi-parameter tasks on this core*//*");
1127               output.println("enqueueObject("+super.generateTemp(fm, temp, lb)+", NULL, 0);");
1128             }*/ // deleted 09/07/06, multi-param tasks are pinned to one core now
1129             output.println("/* transfer to core " + targetcore.toString() + "*/");
1130             output.println("{");
1131             // enqueue this object and its destinations for later process
1132             // all the possible queues
1133             QueueInfo qinfo = null;
1134             TranObjInfo tmpinfo = new TranObjInfo();
1135             tmpinfo.name = super.generateTemp(fm, temp, lb);
1136             tmpinfo.targetcore = targetcore;
1137             FlagState targetFS = this.currentSchedule.getTargetFState(tmpFState);
1138             if(targetFS != null) {
1139               tmpinfo.fs = targetFS;
1140             } else {
1141               tmpinfo.fs = tmpFState;
1142             }
1143               qinfo = outputtransqueues(tmpinfo.fs, targetcore, output);
1144               output.println("tmpObjInfo = RUNMALLOC(sizeof(struct transObjInfo));");
1145               output.println("tmpObjInfo->objptr = (void *)" + tmpinfo.name + ";");
1146               output.println("tmpObjInfo->targetcore = "+targetcore.toString()+";");
1147               output.println("tmpObjInfo->queues = " + qinfo.qname + ";");
1148               output.println("tmpObjInfo->length = " + qinfo.length + ";");
1149               output.println("addNewItem(totransobjqueue, (void*)tmpObjInfo);");
1150             output.println("}");
1151           }
1152           output.println("/* increase index*/");
1153           output.println("++" + queueins + ".index;");
1154         } else {
1155           // this object will reside on current core
1156           output.println("/* reside on this core*/");
1157           if(isolate) {
1158             output.println("{");
1159             QueueInfo qinfo = outputqueues(tmpFState, num, output, true);
1160             output.println("enqueueObject("+super.generateTemp(fm, temp, lb)+", " + qinfo.qname +
1161                            ", " + qinfo.length + ");");
1162             output.println("}");
1163           } /*else {
1164             // TODO
1165             // really needed?
1166             output.println("enqueueObject("+super.generateTemp(fm, temp, lb)+", NULL, 0);");
1167           }*/ // deleted 09/07/06, multi-param tasks are pinned to one core now
1168         }
1169
1170         // codes for multi-params tasks
1171         if(!isolate) {
1172           // flagstate associated with some multi-params tasks
1173           // need to be send to other cores
1174           Vector<Integer> targetcores = this.currentSchedule.getAllyCores(tmpFState);
1175           output.println("/* send the shared object to possible queues on other cores*/");
1176           // TODO, temporary solution, send to mostly the first two 
1177           int upperbound = targetcores.size() > 2? 2: targetcores.size();
1178           for(int k = 0; k < upperbound; ++k) {
1179             // TODO
1180             // add the information of exactly which queue
1181             int targetcore = targetcores.elementAt(k).intValue();
1182             if(!sendto.contains(targetcore)) {
1183             // previously not sended to this target core
1184             // enqueue this object and its destinations for later process
1185             output.println("{");
1186             // all the possible queues
1187             QueueInfo qinfo = null;
1188             TranObjInfo tmpinfo = new TranObjInfo();
1189             tmpinfo.name = super.generateTemp(fm, temp, lb);
1190             tmpinfo.targetcore = targetcore;
1191             FlagState targetFS = this.currentSchedule.getTargetFState(tmpFState);
1192             if(targetFS != null) {
1193               tmpinfo.fs = targetFS;
1194             } else {
1195               tmpinfo.fs = tmpFState;
1196             }
1197               qinfo = outputtransqueues(tmpinfo.fs, targetcore, output);
1198               output.println("tmpObjInfo = RUNMALLOC(sizeof(struct transObjInfo));");
1199               output.println("tmpObjInfo->objptr = (void *)" + tmpinfo.name + ";");
1200               output.println("tmpObjInfo->targetcore = "+targetcore+";");
1201               output.println("tmpObjInfo->queues = " + qinfo.qname + ";");
1202               output.println("tmpObjInfo->length = " + qinfo.length + ";");
1203               output.println("addNewItem(totransobjqueue, (void*)tmpObjInfo);");
1204               output.println("}");
1205               sendto.addElement(targetcore);
1206             }
1207           }
1208         }
1209       }
1210
1211       if(initfstates != null) {
1212         output.println("}");
1213       }
1214     }
1215   }
1216
1217   private QueueInfo outputqueues(FlagState tmpFState, 
1218                                  int num, 
1219                                  PrintWriter output, 
1220                                  boolean isEnqueue) {
1221     // queue array
1222     QueueInfo qinfo = new QueueInfo();
1223     qinfo.qname  = "queues_" + tmpFState.getLabel() + "_" + tmpFState.getiuid();
1224     output.println("struct parameterwrapper * " + qinfo.qname + "[] = {");
1225     Iterator it_edges = tmpFState.getEdgeVector().iterator();
1226     Vector<TaskDescriptor> residetasks = this.currentSchedule.getTasks();
1227     Vector<TaskDescriptor> tasks = new Vector<TaskDescriptor>();
1228     Vector<Integer> indexes = new Vector<Integer>();
1229     boolean comma = false;
1230     qinfo.length = 0;
1231     while(it_edges.hasNext()) {
1232       FEdge fe = (FEdge)it_edges.next();
1233       TaskDescriptor td = fe.getTask();
1234       int paraindex = fe.getIndex();
1235       if((!isEnqueue) || (isEnqueue && residetasks.contains(td))) {
1236         if((!tasks.contains(td)) ||
1237            ((tasks.contains(td)) && (paraindex != indexes.elementAt(tasks.indexOf(td)).intValue()))) {
1238           tasks.addElement(td);
1239           indexes.addElement(paraindex);
1240           if(comma) {
1241             output.println(",");
1242           } else {
1243             comma = true;
1244           }
1245           output.print("&" + this.objqueueprefix + paraindex + "_" + td.getCoreSafeSymbol(num));
1246           ++qinfo.length;
1247         }
1248       }
1249     }
1250     output.println("};");
1251     return qinfo;
1252   }
1253
1254   private QueueInfo outputtransqueues(FlagState tmpFState, 
1255                                       int targetcore, 
1256                                       PrintWriter output) {
1257     // queue array
1258     QueueInfo qinfo = new QueueInfo();
1259     qinfo.qname  = "queues_" + tmpFState.getLabel() + "_" + tmpFState.getiuid();
1260     output.println("int " + qinfo.qname + "_clone[] = {");
1261     Iterator it_edges = tmpFState.getEdgeVector().iterator();
1262     Vector<TaskDescriptor> residetasks = this.scheduling.get(targetcore).getTasks();
1263     Vector<TaskDescriptor> tasks = new Vector<TaskDescriptor>();
1264     Vector<Integer> indexes = new Vector<Integer>();
1265     boolean comma = false;
1266     qinfo.length = 0;
1267     while(it_edges.hasNext()) {
1268       FEdge fe = (FEdge)it_edges.next();
1269       TaskDescriptor td = fe.getTask();
1270       int paraindex = fe.getIndex();
1271       if(residetasks.contains(td)) {
1272         if((!tasks.contains(td)) ||
1273            ((tasks.contains(td)) && (paraindex != indexes.elementAt(tasks.indexOf(td)).intValue()))) {
1274           tasks.addElement(td);
1275           indexes.addElement(paraindex);
1276           if(comma) {
1277             output.println(",");
1278           } else {
1279             comma = true;
1280           }
1281           output.print(residetasks.indexOf(td) + ", ");
1282           output.print(paraindex);
1283           ++qinfo.length;
1284         }
1285       }
1286     }
1287     output.println("};");
1288     output.println("int * " + qinfo.qname + " = RUNMALLOC(sizeof(int) * " + qinfo.length * 2 + ");");
1289     output.println("memcpy(" + qinfo.qname + ", (int *)" + qinfo.qname + "_clone, sizeof(int) * " + qinfo.length * 2 + ");");
1290     return qinfo;
1291   }
1292
1293   private class QueueInfo {
1294     public int length;
1295     public String qname;
1296   }
1297
1298   private String generateTempFlagName(FlatMethod fm, 
1299                                       TempDescriptor td, 
1300                                       LocalityBinding lb) {
1301     MethodDescriptor md=fm.getMethod();
1302     TaskDescriptor task=fm.getTask();
1303     TempObject objecttemps=(TempObject) tempstable.get(lb!=null ? lb : md!=null ? md : task);
1304
1305     if (objecttemps.isLocalPrim(td)||objecttemps.isParamPrim(td)) {
1306       return td.getSafeSymbol() + "_oldflag";
1307     }
1308
1309     if (objecttemps.isLocalPtr(td)) {
1310       return localsprefix+"_"+td.getSafeSymbol() + "_oldflag";
1311     }
1312
1313     if (objecttemps.isParamPtr(td)) {
1314       return paramsprefix+"_"+td.getSafeSymbol() + "_oldflag";
1315     }
1316     throw new Error();
1317   }
1318
1319   protected void outputTransCode(PrintWriter output) {
1320     output.println("while(0 == isEmpty(totransobjqueue)) {");
1321     output.println("   struct transObjInfo * totransobj = (struct transObjInfo *)(getItem(totransobjqueue));");
1322     output.println("   transferObject(totransobj);");
1323     output.println("   RUNFREE(totransobj->queues);");
1324     output.println("   RUNFREE(totransobj);");
1325     output.println("}");
1326     output.println("freeQueue(totransobjqueue);");
1327   }
1328
1329   protected void outputAliasLockCode(FlatMethod fm, 
1330                                          LocalityBinding lb, 
1331                                          PrintWriter output) {
1332     if(this.m_oa == null) {
1333       return;
1334     }
1335     TaskDescriptor td = fm.getTask();
1336     Object[] allocSites = this.m_oa.getFlaggedAllocationSitesReachableFromTask(td).toArray();
1337     Vector<Vector<Integer>> aliasSets = new Vector<Vector<Integer>>();
1338     Vector<Vector<FlatNew>> aliasFNSets = new Vector<Vector<FlatNew>>();
1339     Hashtable<Integer, Vector<FlatNew>> aliasFNTbl4Para = new Hashtable<Integer, Vector<FlatNew>>();
1340     Hashtable<FlatNew, Vector<FlatNew>> aliasFNTbl = new Hashtable<FlatNew, Vector<FlatNew>>();
1341     Set<HeapRegionNode> common;
1342     for( int i = 0; i < fm.numParameters(); ++i ) {
1343       // for the ith parameter check for aliases to all
1344       // higher numbered parameters
1345       aliasSets.add(null);
1346       for( int j = i + 1; j < fm.numParameters(); ++j ) {
1347         common = this.m_oa.createsPotentialAliases(td, i, j);
1348         if(!common.isEmpty()) {
1349           // ith parameter and jth parameter has alias, create lock to protect them
1350           if(aliasSets.elementAt(i) == null) {
1351             aliasSets.setElementAt(new Vector<Integer>(), i);
1352           }
1353           aliasSets.elementAt(i).add(j);
1354         }
1355       }
1356
1357       // for the ith parameter, check for aliases against
1358       // the set of allocation sites reachable from this
1359       // task context
1360       aliasFNSets.add(null);
1361       for(int j = 0; j < allocSites.length; j++) {
1362         AllocationSite as = (AllocationSite)allocSites[j];
1363         common = this.m_oa.createsPotentialAliases(td, i, as);
1364         if( !common.isEmpty() ) {
1365           // ith parameter and allocationsite as has alias
1366           if(aliasFNSets.elementAt(i) == null) {
1367             aliasFNSets.setElementAt(new Vector<FlatNew>(), i);
1368           }
1369           aliasFNSets.elementAt(i).add(as.getFlatNew());
1370         }
1371       }
1372     }
1373
1374     // for each allocation site check for aliases with
1375     // other allocation sites in the context of execution
1376     // of this task
1377     for( int i = 0; i < allocSites.length; ++i ) {
1378       AllocationSite as1 = (AllocationSite)allocSites[i];
1379       for(int j = i + 1; j < allocSites.length; j++) {
1380         AllocationSite as2 = (AllocationSite)allocSites[j];
1381
1382         common = this.m_oa.createsPotentialAliases(td, as1, as2);
1383         if( !common.isEmpty() ) {
1384           // as1 and as2 has alias
1385           if(!aliasFNTbl.containsKey(as1.getFlatNew())) {
1386             aliasFNTbl.put(as1.getFlatNew(), new Vector<FlatNew>());
1387           }
1388           if(!aliasFNTbl.get(as1.getFlatNew()).contains(as2.getFlatNew())) {
1389             aliasFNTbl.get(as1.getFlatNew()).add(as2.getFlatNew());
1390           }
1391         }
1392       }
1393     }
1394
1395     // if FlatNew N1->N2->N3, we group N1, N2, N3 together
1396     Iterator<FlatNew> it = aliasFNTbl.keySet().iterator();
1397     Vector<FlatNew> visited = new Vector<FlatNew>();
1398     while(it.hasNext()) {
1399       FlatNew tmpfn = it.next();
1400       if(visited.contains(tmpfn)) {
1401         continue;
1402       }
1403       visited.add(tmpfn);
1404       Queue<FlatNew> tovisit = new LinkedList<FlatNew>();
1405       Vector<FlatNew> tmpv = aliasFNTbl.get(tmpfn);
1406       if(tmpv == null) {
1407         continue;
1408       }
1409
1410       for(int j = 0; j < tmpv.size(); j++) {
1411         tovisit.add(tmpv.elementAt(j));
1412       }
1413
1414       while(!tovisit.isEmpty()) {
1415         FlatNew fn = tovisit.poll();
1416         visited.add(fn);
1417         Vector<FlatNew> tmpset = aliasFNTbl.get(fn);
1418         if(tmpset != null) {
1419           // merge tmpset to the alias set of the ith parameter
1420           for(int j = 0; j < tmpset.size(); j++) {
1421             if(!tmpv.contains(tmpset.elementAt(j))) {
1422               tmpv.add(tmpset.elementAt(j));
1423               tovisit.add(tmpset.elementAt(j));
1424             }
1425           }
1426           aliasFNTbl.remove(fn);
1427         }
1428       }
1429       it = aliasFNTbl.keySet().iterator();
1430     }
1431
1432     // check alias between parameters and between parameter-flatnew
1433     for(int i = 0; i < aliasSets.size(); i++) {
1434       Queue<Integer> tovisit = new LinkedList<Integer>();
1435       Vector<Integer> tmpv = aliasSets.elementAt(i);
1436       if(tmpv == null) {
1437         continue;
1438       }
1439
1440       for(int j = 0; j < tmpv.size(); j++) {
1441         tovisit.add(tmpv.elementAt(j));
1442       }
1443
1444       while(!tovisit.isEmpty()) {
1445         int index = tovisit.poll().intValue();
1446         Vector<Integer> tmpset = aliasSets.elementAt(index);
1447         if(tmpset != null) {
1448           // merge tmpset to the alias set of the ith parameter
1449           for(int j = 0; j < tmpset.size(); j++) {
1450             if(!tmpv.contains(tmpset.elementAt(j))) {
1451               tmpv.add(tmpset.elementAt(j));
1452               tovisit.add(tmpset.elementAt(j));
1453             }
1454           }
1455           aliasSets.setElementAt(null, index);
1456         }
1457
1458         Vector<FlatNew> tmpFNSet = aliasFNSets.elementAt(index);
1459         if(tmpFNSet != null) {
1460           // merge tmpFNSet to the aliasFNSet of the ith parameter
1461           if(aliasFNSets.elementAt(i) == null) {
1462             aliasFNSets.setElementAt(tmpFNSet, i);
1463           } else {
1464             Vector<FlatNew> tmpFNv = aliasFNSets.elementAt(i);
1465             for(int j = 0; j < tmpFNSet.size(); j++) {
1466               if(!tmpFNv.contains(tmpFNSet.elementAt(j))) {
1467                 tmpFNv.add(tmpFNSet.elementAt(j));
1468               }
1469             }
1470           }
1471           aliasFNSets.setElementAt(null, index);
1472         }
1473       }
1474     }
1475
1476     int numlock = 0;
1477     int numparalock = 0;
1478     Vector<Vector<Integer>> tmpaliasSets = new Vector<Vector<Integer>>();
1479     for(int i = 0; i < aliasSets.size(); i++) {
1480       Vector<Integer> tmpv = aliasSets.elementAt(i);
1481       if(tmpv != null) {
1482         tmpv.add(0, i);
1483         tmpaliasSets.add(tmpv);
1484         numlock++;
1485       }
1486
1487       Vector<FlatNew> tmpFNv = aliasFNSets.elementAt(i);
1488       if(tmpFNv != null) {
1489         aliasFNTbl4Para.put(i, tmpFNv);
1490         if(tmpv == null) {
1491           numlock++;
1492         }
1493       }
1494     }
1495     numparalock = numlock;
1496     aliasSets.clear();
1497     aliasSets = null;
1498     this.m_aliasSets = tmpaliasSets;
1499     tmpaliasSets.clear();
1500     tmpaliasSets = null;
1501     aliasFNSets.clear();
1502     aliasFNSets = null;
1503     this.m_aliasFNTbl4Para = aliasFNTbl4Para;
1504     this.m_aliasFNTbl = aliasFNTbl;
1505     numlock += this.m_aliasFNTbl.size();
1506
1507     // create locks
1508     if(numlock > 0) {
1509       output.println("int aliaslocks[" + numlock + "];");
1510       output.println("int tmpi = 0;");      
1511       // associate locks with parameters
1512       int lockindex = 0;
1513       for(int i = 0; i < this.m_aliasSets.size(); i++) {
1514         Vector<Integer> toadd = this.m_aliasSets.elementAt(i);
1515         
1516         output.print("int tmplen_" + lockindex + " = 0;");
1517         output.println("void * tmpptrs_" + lockindex + "[] = {");
1518         for(int j = 0; j < toadd.size(); j++) {
1519             int para = toadd.elementAt(j).intValue();
1520             output.print(super.generateTemp(fm, fm.getParameter(para), lb));
1521             if(j < toadd.size() - 1) {
1522                 output.print(", ");
1523             } else {
1524                 output.println("};");
1525             }
1526         }
1527         output.println("aliaslocks[tmpi++] = getAliasLock(tmpptrs_" + lockindex + ", tmplen_" + lockindex + ", lockRedirectTbl);");
1528         
1529         for(int j = 0; j < toadd.size(); j++) {
1530           int para = toadd.elementAt(j).intValue();
1531           output.println("addAliasLock("  + super.generateTemp(fm, fm.getParameter(para), lb) + ", aliaslocks[" + i + "]);");
1532         }
1533         // check if this lock is also associated with any FlatNew nodes
1534         if(this.m_aliasFNTbl4Para.containsKey(toadd.elementAt(0))) {
1535           if(this.m_aliaslocksTbl4FN == null) {
1536             this.m_aliaslocksTbl4FN = new Hashtable<FlatNew, Vector<Integer>>();
1537           }
1538           Vector<FlatNew> tmpv = this.m_aliasFNTbl4Para.get(toadd.elementAt(0));
1539           for(int j = 0; j < tmpv.size(); j++) {
1540             FlatNew fn = tmpv.elementAt(j);
1541             if(!this.m_aliaslocksTbl4FN.containsKey(fn)) {
1542               this.m_aliaslocksTbl4FN.put(fn, new Vector<Integer>());
1543             }
1544             this.m_aliaslocksTbl4FN.get(fn).add(i);
1545           }
1546           this.m_aliasFNTbl4Para.remove(toadd.elementAt(0));
1547         }
1548         lockindex++;
1549       }
1550       
1551       Object[] key = this.m_aliasFNTbl4Para.keySet().toArray();
1552       for(int i = 0; i < key.length; i++) {
1553         int para = ((Integer)key[i]).intValue();
1554
1555         output.println("void * tmpptrs_" + lockindex + "[] = {" + super.generateTemp(fm, fm.getParameter(para), lb) + "};");
1556         output.println("aliaslocks[tmpi++] = getAliasLock(tmpptrs_" + lockindex + ", 1, lockRedirectTbl);");
1557         
1558         output.println("addAliasLock(" + super.generateTemp(fm, fm.getParameter(para), lb) + ", aliaslocks[" + lockindex + "]);");
1559         Vector<FlatNew> tmpv = this.m_aliasFNTbl4Para.get(para);
1560         for(int j = 0; j < tmpv.size(); j++) {
1561           FlatNew fn = tmpv.elementAt(j);
1562           if(this.m_aliaslocksTbl4FN == null) {
1563             this.m_aliaslocksTbl4FN = new Hashtable<FlatNew, Vector<Integer>>();
1564           }
1565           if(!this.m_aliaslocksTbl4FN.containsKey(fn)) {
1566             this.m_aliaslocksTbl4FN.put(fn, new Vector<Integer>());
1567           }
1568           this.m_aliaslocksTbl4FN.get(fn).add(lockindex);
1569         }
1570         lockindex++;
1571       }
1572       
1573       // check m_aliasFNTbl for locks associated with FlatNew nodes
1574       Object[] FNkey = this.m_aliasFNTbl.keySet().toArray();
1575       for(int i = 0; i < FNkey.length; i++) {
1576         FlatNew fn = (FlatNew)FNkey[i];
1577         Vector<FlatNew> tmpv = this.m_aliasFNTbl.get(fn);
1578         
1579         output.println("aliaslocks[tmpi++] = (int)(RUNMALLOC(sizeof(int)));");
1580         
1581         if(this.m_aliaslocksTbl4FN == null) {
1582           this.m_aliaslocksTbl4FN = new Hashtable<FlatNew, Vector<Integer>>();
1583         }
1584         if(!this.m_aliaslocksTbl4FN.containsKey(fn)) {
1585           this.m_aliaslocksTbl4FN.put(fn, new Vector<Integer>());
1586         }
1587         this.m_aliaslocksTbl4FN.get(fn).add(lockindex);
1588         for(int j = 0; j < tmpv.size(); j++) {
1589           FlatNew tfn = tmpv.elementAt(j);
1590           if(!this.m_aliaslocksTbl4FN.containsKey(tfn)) {
1591             this.m_aliaslocksTbl4FN.put(tfn, new Vector<Integer>());
1592           }
1593           this.m_aliaslocksTbl4FN.get(tfn).add(lockindex);
1594         }
1595         lockindex++;
1596       }
1597     }
1598   }
1599
1600   protected void generateFlatReturnNode(FlatMethod fm, 
1601                                         LocalityBinding lb, 
1602                                         FlatReturnNode frn, 
1603                                         PrintWriter output) {
1604     if (frn.getReturnTemp()!=null) {
1605       if (frn.getReturnTemp().getType().isPtr())
1606         output.println("return (struct "+fm.getMethod().getReturnType().getSafeSymbol()+"*)"+generateTemp(fm, frn.getReturnTemp(), lb)+";");
1607       else
1608         output.println("return "+generateTemp(fm, frn.getReturnTemp(), lb)+";");
1609     } else {
1610       if(fm.getTask() != null) {
1611         output.println("#ifdef CACHEFLUSH");
1612         output.println("BAMBOO_START_CRITICAL_SECTION();");
1613         output.println("#ifdef DEBUG");
1614         output.println("BAMBOO_DEBUGPRINT(0xec00);");
1615         output.println("#endif");
1616         output.println("BAMBOO_CACHE_FLUSH_ALL();");
1617         output.println("#ifdef DEBUG");
1618         output.println("BAMBOO_DEBUGPRINT(0xecff);");
1619         output.println("#endif");
1620         output.println("BAMBOO_CLOSE_CRITICAL_SECTION();");
1621         output.println("#endif");
1622         outputTransCode(output);
1623       }
1624       output.println("return;");
1625     }
1626   }
1627
1628   protected void generateFlatNew(FlatMethod fm, 
1629                                  LocalityBinding lb, 
1630                                  FlatNew fn,
1631                                  PrintWriter output) {
1632     if (state.DSM && locality.getAtomic(lb).get(fn).intValue() > 0
1633         && !fn.isGlobal()) {
1634       // Stash pointer in case of GC
1635       String revertptr = super.generateTemp(fm, reverttable.get(lb), lb);
1636       output.println(revertptr + "=trans->revertlist;");
1637     }
1638     if (fn.getType().isArray()) {
1639       int arrayid = state.getArrayNumber(fn.getType())
1640                     + state.numClasses();
1641       if (fn.isGlobal()) {
1642         output.println(super.generateTemp(fm, fn.getDst(), lb)
1643                        + "=allocate_newarrayglobal(trans, " + arrayid + ", "
1644                        + super.generateTemp(fm, fn.getSize(), lb) + ");");
1645       } else if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
1646         output.println(super.generateTemp(fm, fn.getDst(), lb)
1647                        + "=allocate_newarray(&" + localsprefix + ", "
1648                        + arrayid + ", " + super.generateTemp(fm, fn.getSize(), lb)
1649                        + ");");
1650       } else {
1651         output.println(super.generateTemp(fm, fn.getDst(), lb)
1652                        + "=allocate_newarray(" + arrayid + ", "
1653                        + super.generateTemp(fm, fn.getSize(), lb) + ");");
1654       }
1655     } else {
1656       if (fn.isGlobal()) {
1657         output.println(super.generateTemp(fm, fn.getDst(), lb)
1658                        + "=allocate_newglobal(trans, "
1659                        + fn.getType().getClassDesc().getId() + ");");
1660       } else if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
1661         output.println(super.generateTemp(fm, fn.getDst(), lb)
1662                        + "=allocate_new(&" + localsprefix + ", "
1663                        + fn.getType().getClassDesc().getId() + ");");
1664       } else {
1665         output.println(super.generateTemp(fm, fn.getDst(), lb)
1666                        + "=allocate_new("
1667                        + fn.getType().getClassDesc().getId() + ");");
1668       }
1669     }
1670     if (state.DSM && locality.getAtomic(lb).get(fn).intValue() > 0
1671         && !fn.isGlobal()) {
1672       String revertptr = super.generateTemp(fm, reverttable.get(lb), lb);
1673       output.println("trans->revertlist=" + revertptr + ";");
1674     }
1675     // create alias lock if necessary
1676     if((this.m_aliaslocksTbl4FN != null) && (this.m_aliaslocksTbl4FN.containsKey(fn))) {
1677       Vector<Integer> tmpv = this.m_aliaslocksTbl4FN.get(fn);
1678       for(int i = 0; i < tmpv.size(); i++) {
1679         output.println("addAliasLock(" + super.generateTemp(fm, fn.getDst(), lb) + ", aliaslocks[" + tmpv.elementAt(i).intValue() + "]);");
1680       }
1681     }
1682     // generate codes for profiling, recording how many new objects are created
1683     if(!fn.getType().isArray() && 
1684             (fn.getType().getClassDesc() != null) 
1685             && (fn.getType().getClassDesc().hasFlags())) {
1686         output.println("#ifdef PROFILE");
1687         output.println("addNewObjInfo(\"" + fn.getType().getClassDesc().getSymbol() + "\");");
1688         output.println("#endif");
1689     }
1690   }
1691
1692   class TranObjInfo {
1693     public String name;
1694     public int targetcore;
1695     public FlagState fs;
1696   }
1697
1698   private boolean contains(Vector<TranObjInfo> sendto, 
1699                            TranObjInfo t) {
1700     if(sendto.size() == 0) {
1701       return false;
1702     }
1703     for(int i = 0; i < sendto.size(); i++) {
1704       TranObjInfo tmp = sendto.elementAt(i);
1705       if(!tmp.name.equals(t.name)) {
1706         return false;
1707       }
1708       if(tmp.targetcore != t.targetcore) {
1709         return false;
1710       }
1711       if(tmp.fs != t.fs) {
1712         return false;
1713       }
1714     }
1715     return true;
1716   }
1717 }