2 import IR.Tree.FlagExpressionNode;
3 import IR.Tree.DNFFlag;
4 import IR.Tree.DNFFlagAtom;
5 import IR.Tree.TagExpressionList;
11 public class BuildCode {
14 Hashtable paramstable;
19 String localsprefix="___locals___";
20 String paramsprefix="___params___";
21 public static boolean GENERATEPRECISEGC=false;
22 public static String PREFIX="";
23 public static String arraytype="ArrayObject";
26 private int maxtaskparams=0;
27 ClassDescriptor[] cdarray;
28 TypeDescriptor[] arraytable;
30 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil) {
32 this.temptovar=temptovar;
33 paramstable=new Hashtable();
34 tempstable=new Hashtable();
35 fieldorder=new Hashtable();
36 flagorder=new Hashtable();
37 this.typeutil=typeutil;
38 virtualcalls=new Virtual(state);
41 /** The buildCode method outputs C code for all the methods. The Flat
42 * versions of the methods must already be generated and stored in
43 * the State object. */
45 public void buildCode() {
46 /* Create output streams to write to */
47 PrintWriter outclassdefs=null;
48 PrintWriter outstructs=null;
49 PrintWriter outrepairstructs=null;
50 PrintWriter outmethodheader=null;
51 PrintWriter outmethod=null;
52 PrintWriter outvirtual=null;
53 PrintWriter outtask=null;
54 PrintWriter outtaskdefs=null;
55 PrintWriter outoptionalarrays=null;
58 OutputStream str=new FileOutputStream(PREFIX+"structdefs.h");
59 outstructs=new java.io.PrintWriter(str, true);
60 str=new FileOutputStream(PREFIX+"methodheaders.h");
61 outmethodheader=new java.io.PrintWriter(str, true);
62 str=new FileOutputStream(PREFIX+"classdefs.h");
63 outclassdefs=new java.io.PrintWriter(str, true);
64 str=new FileOutputStream(PREFIX+"methods.c");
65 outmethod=new java.io.PrintWriter(str, true);
66 str=new FileOutputStream(PREFIX+"virtualtable.h");
67 outvirtual=new java.io.PrintWriter(str, true);
69 str=new FileOutputStream(PREFIX+"task.h");
70 outtask=new java.io.PrintWriter(str, true);
71 str=new FileOutputStream(PREFIX+"taskdefs.c");
72 outtaskdefs=new java.io.PrintWriter(str, true);
74 str=new FileOutputStream(PREFIX+"optionnalarrays.c");
75 outoptionalarrays=new java.io.PrintWriter(str, true);
78 if (state.structfile!=null) {
79 str=new FileOutputStream(PREFIX+state.structfile+".struct");
80 outrepairstructs=new java.io.PrintWriter(str, true);
82 } catch (Exception e) {
87 /* Build the virtual dispatch tables */
88 buildVirtualTables(outvirtual);
93 outmethodheader.println("#ifndef METHODHEADERS_H");
94 outmethodheader.println("#define METHODHEADERS_H");
95 outmethodheader.println("#include \"structdefs.h\"");
97 outstructs.println("#ifndef STRUCTDEFS_H");
98 outstructs.println("#define STRUCTDEFS_H");
99 outstructs.println("#include \"classdefs.h\"");
103 /* Output types for short array and string */
104 outstructs.println("#define STRINGARRAYTYPE "+
105 (state.getArrayNumber(
106 (new TypeDescriptor(typeutil.getClass(TypeUtil.StringClass))).makeArray(state))+state.numClasses()));
108 outstructs.println("#define OBJECTARRAYTYPE "+
109 (state.getArrayNumber(
110 (new TypeDescriptor(typeutil.getClass(TypeUtil.ObjectClass))).makeArray(state))+state.numClasses()));
113 outstructs.println("#define STRINGTYPE "+typeutil.getClass(TypeUtil.StringClass).getId());
114 outstructs.println("#define CHARARRAYTYPE "+
115 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.CHAR)).makeArray(state))+state.numClasses()));
117 outstructs.println("#define BYTEARRAYTYPE "+
118 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.BYTE)).makeArray(state))+state.numClasses()));
120 outstructs.println("#define BYTEARRAYARRAYTYPE "+
121 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.BYTE)).makeArray(state).makeArray(state))+state.numClasses()));
123 outstructs.println("#define NUMCLASSES "+state.numClasses());
125 outstructs.println("#define STARTUPTYPE "+typeutil.getClass(TypeUtil.StartupClass).getId());
126 outstructs.println("#define TAGTYPE "+typeutil.getClass(TypeUtil.TagClass).getId());
127 outstructs.println("#define TAGARRAYTYPE "+
128 (state.getArrayNumber(new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass)).makeArray(state))+state.numClasses()));
131 // Output the C class declarations
132 // These could mutually reference each other
134 outclassdefs.println("#include <pthread.h>");
136 outclassdefs.println("struct "+arraytype+";");
138 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
139 while(it.hasNext()) {
140 ClassDescriptor cn=(ClassDescriptor)it.next();
141 outclassdefs.println("struct "+cn.getSafeSymbol()+";");
143 outclassdefs.println("");
145 //Print out definition for array type
146 outclassdefs.println("struct "+arraytype+" {");
147 outclassdefs.println(" int type;");
149 outclassdefs.println(" pthread_t tid;");
150 outclassdefs.println(" void * lockentry;");
151 outclassdefs.println(" int lockcount;");
155 outclassdefs.println(" int flag;");
156 outclassdefs.println(" void * flagptr;");
157 outclassdefs.println(" int failedstatus;");
158 outclassdefs.println(" int * flagset;");
160 printClassStruct(typeutil.getClass(TypeUtil.ObjectClass), outclassdefs);
161 outclassdefs.println(" int ___length___;");
162 outclassdefs.println("};\n");
165 //Print out definitions for task types
166 outtask.println("struct parameterdescriptor {");
167 outtask.println("int type;");
168 outtask.println("int numberterms;");
169 outtask.println("int *intarray;");
170 outtask.println("void * queue;");
171 outtask.println("int numbertags;");
172 outtask.println("int *tagarray;");
173 outtask.println("};");
175 outtask.println("struct taskdescriptor {");
176 outtask.println("void * taskptr;");
177 outtask.println("int numParameters;");
178 outtask.println("int numTotal;");
179 outtask.println("struct parameterdescriptor **descriptorarray;");
180 outtask.println("char * name;");
181 outtask.println("};");
182 outtask.println("extern struct taskdescriptor * taskarray[];");
183 outtask.println("extern numtasks;");
187 // Output function prototypes and structures for parameters
188 it=state.getClassSymbolTable().getDescriptorsIterator();
189 while(it.hasNext()) {
190 ClassDescriptor cn=(ClassDescriptor)it.next();
191 generateCallStructs(cn, outclassdefs, outstructs, outmethodheader);
195 /* Map flags to integers */
196 it=state.getClassSymbolTable().getDescriptorsIterator();
197 while(it.hasNext()) {
198 ClassDescriptor cn=(ClassDescriptor)it.next();
202 generateTaskStructs(outstructs, outmethodheader);
205 outmethodheader.println("#endif");
207 outmethodheader.close();
209 /* Build the actual methods */
210 outmethod.println("#include \"methodheaders.h\"");
211 outmethod.println("#include \"virtualtable.h\"");
212 outmethod.println("#include <runtime.h>");
214 outmethod.println("#include <thread.h>");
215 if (state.main!=null) {
216 outmethod.println("#include <string.h>");
219 if (state.CONSCHECK) {
220 outmethod.println("#include \"checkers.h\"");
222 outclassdefs.println("extern int classsize[];");
223 outclassdefs.println("extern int hasflags[];");
224 outclassdefs.println("extern int * pointerarray[];");
225 outclassdefs.println("extern int supertypes[];");
227 //Store the sizes of classes & array elements
228 generateSizeArray(outmethod);
230 //Store table of supertypes
231 generateSuperTypeTable(outmethod);
233 //Store the layout of classes
234 generateLayoutStructs(outmethod);
236 /* Generate code for methods */
237 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
238 while(classit.hasNext()) {
239 ClassDescriptor cn=(ClassDescriptor)classit.next();
240 Iterator methodit=cn.getMethods();
241 while(methodit.hasNext()) {
242 /* Classify parameters */
243 MethodDescriptor md=(MethodDescriptor)methodit.next();
244 FlatMethod fm=state.getMethodFlat(md);
245 if (!md.getModifiers().isNative())
246 generateFlatMethod(fm,outmethod);
251 /* Compile task based program */
252 outtaskdefs.println("#include \"task.h\"");
253 outtaskdefs.println("#include \"methodheaders.h\"");
254 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
255 while(taskit.hasNext()) {
256 TaskDescriptor td=(TaskDescriptor)taskit.next();
257 FlatMethod fm=state.getMethodFlat(td);
258 generateFlatMethod(fm, outmethod);
259 generateTaskDescriptor(outtaskdefs, fm, td);
263 //Output task descriptors
264 taskit=state.getTaskSymbolTable().getDescriptorsIterator();
265 outtaskdefs.println("struct taskdescriptor * taskarray[]= {");
267 while(taskit.hasNext()) {
268 TaskDescriptor td=(TaskDescriptor)taskit.next();
272 outtaskdefs.println(",");
273 outtaskdefs.print("&task_"+td.getSafeSymbol());
275 outtaskdefs.println("};");
278 outtaskdefs.println("int numtasks="+state.getTaskSymbolTable().getValueSet().size()+";");
280 } else if (state.main!=null) {
281 /* Generate main method */
282 outmethod.println("int main(int argc, const char *argv[]) {");
283 outmethod.println(" int i;");
284 if (GENERATEPRECISEGC) {
285 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(NULL, STRINGARRAYTYPE, argc-1);");
287 outmethod.println(" struct ArrayObject * stringarray=allocate_newarray(STRINGARRAYTYPE, argc-1);");
290 outmethod.println("initializethreads();");
292 outmethod.println(" for(i=1;i<argc;i++) {");
293 outmethod.println(" int length=strlen(argv[i]);");
294 if (GENERATEPRECISEGC) {
295 outmethod.println(" struct ___String___ *newstring=NewString(NULL, argv[i], length);");
297 outmethod.println(" struct ___String___ *newstring=NewString(argv[i], length);");
299 outmethod.println(" ((void **)(((char *)& stringarray->___length___)+sizeof(int)))[i-1]=newstring;");
300 outmethod.println(" }");
303 MethodDescriptor md=typeutil.getMain();
304 ClassDescriptor cd=typeutil.getMainClass();
306 outmethod.println(" {");
307 if (GENERATEPRECISEGC) {
308 outmethod.print(" struct "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
309 outmethod.println("1, NULL,"+"stringarray};");
310 outmethod.println(" "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(& __parameterlist__);");
312 outmethod.println(" "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(stringarray);");
313 outmethod.println(" }");
316 outmethod.println("pthread_mutex_lock(&gclistlock);");
317 outmethod.println("threadcount--;");
318 outmethod.println("pthread_cond_signal(&gccond);");
319 outmethod.println("pthread_mutex_unlock(&gclistlock);");
320 outmethod.println("pthread_exit(NULL);");
322 outmethod.println("}");
325 outstructs.println("#define MAXTASKPARAMS "+maxtaskparams);
328 /* Output structure definitions for repair tool */
329 if (state.structfile!=null) {
330 buildRepairStructs(outrepairstructs);
331 outrepairstructs.close();
333 outstructs.println("#endif");
338 if (state.TASK&&state.OPTIONAL) {
339 generateOptionalArrays(outoptionalarrays);
340 outoptionalarrays.close();
344 private int maxcount=0;
346 private void buildRepairStructs(PrintWriter outrepairstructs) {
347 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
348 while(classit.hasNext()) {
349 ClassDescriptor cn=(ClassDescriptor)classit.next();
350 outrepairstructs.println("structure "+cn.getSymbol()+" {");
351 outrepairstructs.println(" int __type__;");
353 outrepairstructs.println(" int __flag__;");
354 outrepairstructs.println(" int __flagptr__;");
356 printRepairStruct(cn, outrepairstructs);
357 outrepairstructs.println("}\n");
360 for(int i=0;i<state.numArrays();i++) {
361 TypeDescriptor tdarray=arraytable[i];
362 TypeDescriptor tdelement=tdarray.dereference();
363 outrepairstructs.println("structure "+arraytype+"_"+state.getArrayNumber(tdarray)+" {");
364 outrepairstructs.println(" int __type__;");
365 printRepairStruct(typeutil.getClass(TypeUtil.ObjectClass), outrepairstructs);
366 outrepairstructs.println(" int length;");
368 // Need to add support to repair tool for this
369 if (tdelement.isClass()||tdelement.isArray())
370 outrepairstructs.println(" "+tdelement.getRepairSymbol()+" * elem[this.length];");
372 outrepairstructs.println(" "+tdelement.getRepairSymbol()+" elem[this.length];");
374 outrepairstructs.println("}\n");
379 private void printRepairStruct(ClassDescriptor cn, PrintWriter output) {
380 ClassDescriptor sp=cn.getSuperDesc();
382 printRepairStruct(sp, output);
384 Vector fields=(Vector)fieldorder.get(cn);
386 for(int i=0;i<fields.size();i++) {
387 FieldDescriptor fd=(FieldDescriptor)fields.get(i);
388 if (fd.getType().isArray()) {
389 output.println(" "+arraytype+"_"+ state.getArrayNumber(fd.getType()) +" * "+fd.getSymbol()+";");
390 } else if (fd.getType().isClass())
391 output.println(" "+fd.getType().getRepairSymbol()+" * "+fd.getSymbol()+";");
392 else if (fd.getType().isFloat())
393 output.println(" int "+fd.getSymbol()+"; /* really float */");
395 output.println(" "+fd.getType().getRepairSymbol()+" "+fd.getSymbol()+";");
399 /** This method outputs TaskDescriptor information */
400 void generateTaskDescriptor(PrintWriter output, FlatMethod fm, TaskDescriptor task) {
401 for (int i=0;i<task.numParameters();i++) {
402 VarDescriptor param_var=task.getParameter(i);
403 TypeDescriptor param_type=task.getParamType(i);
404 FlagExpressionNode param_flag=task.getFlag(param_var);
405 TagExpressionList param_tag=task.getTag(param_var);
408 if (param_flag==null) {
409 output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
410 output.println("0x0, 0x0 };");
414 DNFFlag dflag=param_flag.getDNF();
415 dnfterms=dflag.size();
417 Hashtable flags=(Hashtable)flagorder.get(param_type.getClassDesc());
418 output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
419 for(int j=0;j<dflag.size();j++) {
422 Vector term=dflag.get(j);
425 for(int k=0;k<term.size();k++) {
426 DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
427 FlagDescriptor fd=dfa.getFlag();
428 boolean negated=dfa.getNegated();
429 int flagid=1<<((Integer)flags.get(fd)).intValue();
434 output.print("0x"+Integer.toHexString(andmask)+", 0x"+Integer.toHexString(checkmask));
436 output.println("};");
439 output.println("int parametertag_"+i+"_"+task.getSafeSymbol()+"[]={");
440 //BUG...added next line to fix, test with any task program
442 for(int j=0;j<param_tag.numTags();j++) {
445 /* for each tag we need */
446 /* which slot it is */
447 /* what type it is */
448 TagVarDescriptor tvd=(TagVarDescriptor)task.getParameterTable().get(param_tag.getName(j));
449 TempDescriptor tmp=param_tag.getTemp(j);
450 int slot=fm.getTagInt(tmp);
451 output.println(slot+", "+state.getTagId(tvd.getTag()));
453 output.println("};");
455 output.println("struct parameterdescriptor parameter_"+i+"_"+task.getSafeSymbol()+"={");
456 output.println("/* type */"+param_type.getClassDesc().getId()+",");
457 output.println("/* number of DNF terms */"+dnfterms+",");
458 output.println("parameterdnf_"+i+"_"+task.getSafeSymbol()+",");
459 output.println("0,");
460 //BUG, added next line to fix and else statement...test
461 //with any task program
463 output.println("/* number of tags */"+param_tag.numTags()+",");
465 output.println("/* number of tags */ 0,");
466 output.println("parametertag_"+i+"_"+task.getSafeSymbol());
467 output.println("};");
471 output.println("struct parameterdescriptor * parameterdescriptors_"+task.getSafeSymbol()+"[] = {");
472 for (int i=0;i<task.numParameters();i++) {
475 output.print("¶meter_"+i+"_"+task.getSafeSymbol());
477 output.println("};");
479 output.println("struct taskdescriptor task_"+task.getSafeSymbol()+"={");
480 output.println("&"+task.getSafeSymbol()+",");
481 output.println("/* number of parameters */" +task.numParameters() + ",");
482 int numtotal=task.numParameters()+fm.numTags();
483 output.println("/* number total parameters */" +numtotal + ",");
484 output.println("parameterdescriptors_"+task.getSafeSymbol()+",");
485 output.println("\""+task.getSymbol()+"\"");
486 output.println("};");
490 /** The buildVirtualTables method outputs the virtual dispatch
491 * tables for methods. */
493 private void buildVirtualTables(PrintWriter outvirtual) {
494 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
495 while(classit.hasNext()) {
496 ClassDescriptor cd=(ClassDescriptor)classit.next();
497 if (virtualcalls.getMethodCount(cd)>maxcount)
498 maxcount=virtualcalls.getMethodCount(cd);
500 MethodDescriptor[][] virtualtable=new MethodDescriptor[state.numClasses()+state.numArrays()][maxcount];
502 /* Fill in virtual table */
503 classit=state.getClassSymbolTable().getDescriptorsIterator();
504 while(classit.hasNext()) {
505 ClassDescriptor cd=(ClassDescriptor)classit.next();
506 fillinRow(cd, virtualtable, cd.getId());
509 ClassDescriptor objectcd=typeutil.getClass(TypeUtil.ObjectClass);
510 Iterator arrayit=state.getArrayIterator();
511 while(arrayit.hasNext()) {
512 TypeDescriptor td=(TypeDescriptor)arrayit.next();
513 int id=state.getArrayNumber(td);
514 fillinRow(objectcd, virtualtable, id+state.numClasses());
517 outvirtual.print("void * virtualtable[]={");
518 boolean needcomma=false;
519 for(int i=0;i<state.numClasses()+state.numArrays();i++) {
520 for(int j=0;j<maxcount;j++) {
522 outvirtual.print(", ");
523 if (virtualtable[i][j]!=null) {
524 MethodDescriptor md=virtualtable[i][j];
525 outvirtual.print("& "+md.getClassDesc().getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
527 outvirtual.print("0");
531 outvirtual.println("");
533 outvirtual.println("};");
537 private void fillinRow(ClassDescriptor cd, MethodDescriptor[][] virtualtable, int rownum) {
538 /* Get inherited methods */
539 if (cd.getSuperDesc()!=null)
540 fillinRow(cd.getSuperDesc(), virtualtable, rownum);
541 /* Override them with our methods */
542 for(Iterator it=cd.getMethods();it.hasNext();) {
543 MethodDescriptor md=(MethodDescriptor)it.next();
544 if (md.isStatic()||md.getReturnType()==null)
546 int methodnum=virtualcalls.getMethodNumber(md);
547 virtualtable[rownum][methodnum]=md;
551 /** Generate array that contains the sizes of class objects. The
552 * object allocation functions in the runtime use this
555 private void generateSizeArray(PrintWriter outclassdefs) {
556 outclassdefs.print("int classsize[]={");
557 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
558 cdarray=new ClassDescriptor[state.numClasses()];
559 while(it.hasNext()) {
560 ClassDescriptor cd=(ClassDescriptor)it.next();
561 cdarray[cd.getId()]=cd;
563 boolean needcomma=false;
564 for(int i=0;i<state.numClasses();i++) {
566 outclassdefs.print(", ");
567 outclassdefs.print("sizeof(struct "+cdarray[i].getSafeSymbol()+")");
571 arraytable=new TypeDescriptor[state.numArrays()];
573 Iterator arrayit=state.getArrayIterator();
574 while(arrayit.hasNext()) {
575 TypeDescriptor td=(TypeDescriptor)arrayit.next();
576 int id=state.getArrayNumber(td);
580 for(int i=0;i<state.numArrays();i++) {
582 outclassdefs.print(", ");
583 TypeDescriptor tdelement=arraytable[i].dereference();
584 if (tdelement.isArray()||tdelement.isClass())
585 outclassdefs.print("sizeof(void *)");
587 outclassdefs.print("sizeof("+tdelement.getSafeSymbol()+")");
591 outclassdefs.println("};");
594 /** Constructs params and temp objects for each method or task.
595 * These objects tell the compiler which temps need to be
598 private void generateTempStructs(FlatMethod fm) {
599 MethodDescriptor md=fm.getMethod();
600 TaskDescriptor task=fm.getTask();
602 ParamsObject objectparams=md!=null?new ParamsObject(md,tag++):new ParamsObject(task, tag++);
604 paramstable.put(md, objectparams);
606 paramstable.put(task, objectparams);
608 for(int i=0;i<fm.numParameters();i++) {
609 TempDescriptor temp=fm.getParameter(i);
610 TypeDescriptor type=temp.getType();
611 if ((type.isPtr()||type.isArray())&&GENERATEPRECISEGC)
612 objectparams.addPtr(temp);
614 objectparams.addPrim(temp);
617 for(int i=0;i<fm.numTags();i++) {
618 TempDescriptor temp=fm.getTag(i);
619 if (GENERATEPRECISEGC)
620 objectparams.addPtr(temp);
622 objectparams.addPrim(temp);
625 TempObject objecttemps=md!=null?new TempObject(objectparams,md,tag++):new TempObject(objectparams, task, tag++);
627 tempstable.put(md, objecttemps);
629 tempstable.put(task, objecttemps);
631 for(Iterator nodeit=fm.getNodeSet().iterator();nodeit.hasNext();) {
632 FlatNode fn=(FlatNode)nodeit.next();
633 TempDescriptor[] writes=fn.writesTemps();
634 for(int i=0;i<writes.length;i++) {
635 TempDescriptor temp=writes[i];
636 TypeDescriptor type=temp.getType();
637 if ((type.isPtr()||type.isArray())&&GENERATEPRECISEGC)
638 objecttemps.addPtr(temp);
640 objecttemps.addPrim(temp);
645 private void generateLayoutStructs(PrintWriter output) {
646 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
647 while(it.hasNext()) {
648 ClassDescriptor cn=(ClassDescriptor)it.next();
649 output.println("int "+cn.getSafeSymbol()+"_pointers[]={");
650 Iterator allit=cn.getFieldTable().getAllDescriptorsIterator();
652 while(allit.hasNext()) {
653 FieldDescriptor fd=(FieldDescriptor)allit.next();
654 TypeDescriptor type=fd.getType();
655 if (type.isPtr()||type.isArray())
659 allit=cn.getFieldTable().getAllDescriptorsIterator();
660 while(allit.hasNext()) {
661 FieldDescriptor fd=(FieldDescriptor)allit.next();
662 TypeDescriptor type=fd.getType();
663 if (type.isPtr()||type.isArray()) {
665 output.print("((int)&(((struct "+cn.getSafeSymbol() +" *)0)->"+fd.getSafeSymbol()+"))");
668 output.println("};");
670 output.println("int * pointerarray[]={");
671 boolean needcomma=false;
672 for(int i=0;i<state.numClasses();i++) {
673 ClassDescriptor cn=cdarray[i];
677 output.print(cn.getSafeSymbol()+"_pointers");
680 for(int i=0;i<state.numArrays();i++) {
682 output.println(", ");
683 TypeDescriptor tdelement=arraytable[i].dereference();
684 if (tdelement.isArray()||tdelement.isClass())
685 output.print("((int *)1)");
691 output.println("};");
693 output.println("int hasflags[]={");
694 for(int i=0;i<state.numClasses();i++) {
695 ClassDescriptor cn=cdarray[i];
697 output.println(", ");
704 output.println("};");
707 /** Print out table to give us supertypes */
708 private void generateSuperTypeTable(PrintWriter output) {
709 output.println("int supertypes[]={");
710 boolean needcomma=false;
711 for(int i=0;i<state.numClasses();i++) {
712 ClassDescriptor cn=cdarray[i];
716 if (cn.getSuperDesc()!=null) {
717 ClassDescriptor cdsuper=cn.getSuperDesc();
718 output.print(cdsuper.getId());
722 output.println("};");
725 /** Force consistent field ordering between inherited classes. */
727 private void printClassStruct(ClassDescriptor cn, PrintWriter classdefout) {
728 ClassDescriptor sp=cn.getSuperDesc();
730 printClassStruct(sp, classdefout);
732 if (!fieldorder.containsKey(cn)) {
733 Vector fields=new Vector();
734 fieldorder.put(cn,fields);
735 Iterator fieldit=cn.getFields();
736 while(fieldit.hasNext()) {
737 FieldDescriptor fd=(FieldDescriptor)fieldit.next();
738 if (sp==null||!sp.getFieldTable().contains(fd.getSymbol()))
742 Vector fields=(Vector)fieldorder.get(cn);
744 for(int i=0;i<fields.size();i++) {
745 FieldDescriptor fd=(FieldDescriptor)fields.get(i);
746 if (fd.getType().isClass()||fd.getType().isArray())
747 classdefout.println(" struct "+fd.getType().getSafeSymbol()+" * "+fd.getSafeSymbol()+";");
749 classdefout.println(" "+fd.getType().getSafeSymbol()+" "+fd.getSafeSymbol()+";");
754 /* Map flags to integers consistently between inherited
757 private void mapFlags(ClassDescriptor cn) {
758 ClassDescriptor sp=cn.getSuperDesc();
762 if (!flagorder.containsKey(cn)) {
763 Hashtable flags=new Hashtable();
764 flagorder.put(cn,flags);
766 Hashtable superflags=(Hashtable)flagorder.get(sp);
767 Iterator superflagit=superflags.keySet().iterator();
768 while(superflagit.hasNext()) {
769 FlagDescriptor fd=(FlagDescriptor)superflagit.next();
770 Integer number=(Integer)superflags.get(fd);
771 flags.put(fd, number);
772 if ((number.intValue()+1)>max)
773 max=number.intValue()+1;
777 Iterator flagit=cn.getFlags();
778 while(flagit.hasNext()) {
779 FlagDescriptor fd=(FlagDescriptor)flagit.next();
780 if (sp==null||!sp.getFlagTable().contains(fd.getSymbol()))
781 flags.put(fd, new Integer(max++));
787 /** This function outputs (1) structures that parameters are
788 * passed in (when PRECISE GC is enabled) and (2) function
789 * prototypes for the methods */
791 private void generateCallStructs(ClassDescriptor cn, PrintWriter classdefout, PrintWriter output, PrintWriter headersout) {
792 /* Output class structure */
793 classdefout.println("struct "+cn.getSafeSymbol()+" {");
794 classdefout.println(" int type;");
796 classdefout.println(" pthread_t tid;");
797 classdefout.println(" void * lockentry;");
798 classdefout.println(" int lockcount;");
802 classdefout.println(" int flag;");
803 classdefout.println(" void * flagptr;");
804 classdefout.println(" int failedstatus;");
805 classdefout.println(" int * flagset;");
807 printClassStruct(cn, classdefout);
808 classdefout.println("};\n");
810 /* Cycle through methods */
811 Iterator methodit=cn.getMethods();
812 while(methodit.hasNext()) {
813 /* Classify parameters */
814 MethodDescriptor md=(MethodDescriptor)methodit.next();
815 FlatMethod fm=state.getMethodFlat(md);
816 generateTempStructs(fm);
818 ParamsObject objectparams=(ParamsObject) paramstable.get(md);
819 TempObject objecttemps=(TempObject) tempstable.get(md);
821 /* Output parameter structure */
822 if (GENERATEPRECISEGC) {
823 output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params {");
824 output.println(" int size;");
825 output.println(" void * next;");
826 for(int i=0;i<objectparams.numPointers();i++) {
827 TempDescriptor temp=objectparams.getPointer(i);
828 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
830 output.println("};\n");
833 /* Output temp structure */
834 if (GENERATEPRECISEGC) {
835 output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals {");
836 output.println(" int size;");
837 output.println(" void * next;");
838 for(int i=0;i<objecttemps.numPointers();i++) {
839 TempDescriptor temp=objecttemps.getPointer(i);
840 if (temp.getType().isNull())
841 output.println(" void * "+temp.getSafeSymbol()+";");
843 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
845 output.println("};\n");
848 /* Output method declaration */
849 if (md.getReturnType()!=null) {
850 if (md.getReturnType().isClass()||md.getReturnType().isArray())
851 headersout.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
853 headersout.print(md.getReturnType().getSafeSymbol()+" ");
855 //catch the constructor case
856 headersout.print("void ");
857 headersout.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
859 boolean printcomma=false;
860 if (GENERATEPRECISEGC) {
861 headersout.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
865 //output parameter list
866 for(int i=0;i<objectparams.numPrimitives();i++) {
867 TempDescriptor temp=objectparams.getPrimitive(i);
869 headersout.print(", ");
871 if (temp.getType().isClass()||temp.getType().isArray())
872 headersout.print("struct " + temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
874 headersout.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
876 headersout.println(");\n");
881 /** This function outputs (1) structures that parameters are
882 * passed in (when PRECISE GC is enabled) and (2) function
883 * prototypes for the tasks */
885 private void generateTaskStructs(PrintWriter output, PrintWriter headersout) {
886 /* Cycle through tasks */
887 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
889 while(taskit.hasNext()) {
890 /* Classify parameters */
891 TaskDescriptor task=(TaskDescriptor)taskit.next();
892 FlatMethod fm=state.getMethodFlat(task);
893 generateTempStructs(fm);
895 ParamsObject objectparams=(ParamsObject) paramstable.get(task);
896 TempObject objecttemps=(TempObject) tempstable.get(task);
898 /* Output parameter structure */
899 if (GENERATEPRECISEGC) {
900 output.println("struct "+task.getSafeSymbol()+"_params {");
902 output.println(" int size;");
903 output.println(" void * next;");
904 for(int i=0;i<objectparams.numPointers();i++) {
905 TempDescriptor temp=objectparams.getPointer(i);
906 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
909 output.println("};\n");
910 if ((objectparams.numPointers()+fm.numTags())>maxtaskparams) {
911 maxtaskparams=objectparams.numPointers()+fm.numTags();
915 /* Output temp structure */
916 if (GENERATEPRECISEGC) {
917 output.println("struct "+task.getSafeSymbol()+"_locals {");
918 output.println(" int size;");
919 output.println(" void * next;");
920 for(int i=0;i<objecttemps.numPointers();i++) {
921 TempDescriptor temp=objecttemps.getPointer(i);
922 if (temp.getType().isNull())
923 output.println(" void * "+temp.getSafeSymbol()+";");
924 else if(temp.getType().isTag())
925 output.println(" struct "+
926 (new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
928 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
930 output.println("};\n");
933 /* Output task declaration */
934 headersout.print("void " + task.getSafeSymbol()+"(");
936 boolean printcomma=false;
937 if (GENERATEPRECISEGC) {
938 headersout.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
940 headersout.print("void * parameterarray[]");
941 headersout.println(");\n");
945 /** Generate code for flatmethod fm. */
947 private void generateFlatMethod(FlatMethod fm, PrintWriter output) {
948 MethodDescriptor md=fm.getMethod();
949 TaskDescriptor task=fm.getTask();
951 ClassDescriptor cn=md!=null?md.getClassDesc():null;
953 ParamsObject objectparams=(ParamsObject)paramstable.get(md!=null?md:task);
955 generateHeader(fm, md!=null?md:task,output);
957 TempObject objecttemp=(TempObject) tempstable.get(md!=null?md:task);
960 if (GENERATEPRECISEGC) {
962 output.print(" struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+"={");
964 output.print(" struct "+task.getSafeSymbol()+"_locals "+localsprefix+"={");
966 output.print(objecttemp.numPointers()+",");
967 output.print(paramsprefix);
968 for(int j=0;j<objecttemp.numPointers();j++)
969 output.print(", NULL");
970 output.println("};");
973 for(int i=0;i<objecttemp.numPrimitives();i++) {
974 TempDescriptor td=objecttemp.getPrimitive(i);
975 TypeDescriptor type=td.getType();
977 output.println(" void * "+td.getSafeSymbol()+";");
978 else if (type.isClass()||type.isArray())
979 output.println(" struct "+type.getSafeSymbol()+" * "+td.getSafeSymbol()+";");
981 output.println(" "+type.getSafeSymbol()+" "+td.getSafeSymbol()+";");
984 /* Generate labels first */
985 HashSet tovisit=new HashSet();
986 HashSet visited=new HashSet();
988 Hashtable nodetolabel=new Hashtable();
989 tovisit.add(fm.getNext(0));
990 FlatNode current_node=null;
993 //Node needs a label if it is
994 while(!tovisit.isEmpty()) {
995 FlatNode fn=(FlatNode)tovisit.iterator().next();
998 for(int i=0;i<fn.numNext();i++) {
999 FlatNode nn=fn.getNext(i);
1001 //1) Edge >1 of node
1002 nodetolabel.put(nn,new Integer(labelindex++));
1004 if (!visited.contains(nn)&&!tovisit.contains(nn)) {
1008 nodetolabel.put(nn,new Integer(labelindex++));
1013 if (state.THREAD&&GENERATEPRECISEGC) {
1014 output.println("checkcollect(&"+localsprefix+");");
1017 //Do the actual code generation
1018 tovisit=new HashSet();
1019 visited=new HashSet();
1020 tovisit.add(fm.getNext(0));
1021 while(current_node!=null||!tovisit.isEmpty()) {
1022 if (current_node==null) {
1023 current_node=(FlatNode)tovisit.iterator().next();
1024 tovisit.remove(current_node);
1026 visited.add(current_node);
1027 if (nodetolabel.containsKey(current_node))
1028 output.println("L"+nodetolabel.get(current_node)+":");
1029 if (state.INSTRUCTIONFAILURE) {
1031 output.println("if ((++instructioncount)>failurecount) {instructioncount=0;injectinstructionfailure();}");
1034 output.println("if ((--instructioncount)==0) injectinstructionfailure();");
1036 if (current_node.numNext()==0) {
1038 generateFlatNode(fm, current_node, output);
1039 if (current_node.kind()!=FKind.FlatReturnNode) {
1040 output.println(" return;");
1043 } else if(current_node.numNext()==1) {
1045 generateFlatNode(fm, current_node, output);
1046 FlatNode nextnode=current_node.getNext(0);
1047 if (visited.contains(nextnode)) {
1048 output.println("goto L"+nodetolabel.get(nextnode)+";");
1051 current_node=nextnode;
1052 } else if (current_node.numNext()==2) {
1055 generateFlatCondBranch(fm, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
1056 if (!visited.contains(current_node.getNext(1)))
1057 tovisit.add(current_node.getNext(1));
1058 if (visited.contains(current_node.getNext(0))) {
1059 output.println("goto L"+nodetolabel.get(current_node.getNext(0))+";");
1062 current_node=current_node.getNext(0);
1063 } else throw new Error();
1067 output.println("}\n\n");
1070 /** Generate text string that corresponds to the Temp td. */
1071 private String generateTemp(FlatMethod fm, TempDescriptor td) {
1072 MethodDescriptor md=fm.getMethod();
1073 TaskDescriptor task=fm.getTask();
1074 TempObject objecttemps=(TempObject) tempstable.get(md!=null?md:task);
1076 if (objecttemps.isLocalPrim(td)||objecttemps.isParamPrim(td)) {
1077 return td.getSafeSymbol();
1080 if (objecttemps.isLocalPtr(td)) {
1081 return localsprefix+"."+td.getSafeSymbol();
1084 if (objecttemps.isParamPtr(td)) {
1085 return paramsprefix+"->"+td.getSafeSymbol();
1090 private void generateFlatNode(FlatMethod fm, FlatNode fn, PrintWriter output) {
1092 case FKind.FlatTagDeclaration:
1093 generateFlatTagDeclaration(fm, (FlatTagDeclaration) fn,output);
1095 case FKind.FlatCall:
1096 generateFlatCall(fm, (FlatCall) fn,output);
1098 case FKind.FlatFieldNode:
1099 generateFlatFieldNode(fm, (FlatFieldNode) fn,output);
1101 case FKind.FlatElementNode:
1102 generateFlatElementNode(fm, (FlatElementNode) fn,output);
1104 case FKind.FlatSetElementNode:
1105 generateFlatSetElementNode(fm, (FlatSetElementNode) fn,output);
1107 case FKind.FlatSetFieldNode:
1108 generateFlatSetFieldNode(fm, (FlatSetFieldNode) fn,output);
1111 generateFlatNew(fm, (FlatNew) fn,output);
1113 case FKind.FlatOpNode:
1114 generateFlatOpNode(fm, (FlatOpNode) fn,output);
1116 case FKind.FlatCastNode:
1117 generateFlatCastNode(fm, (FlatCastNode) fn,output);
1119 case FKind.FlatLiteralNode:
1120 generateFlatLiteralNode(fm, (FlatLiteralNode) fn,output);
1122 case FKind.FlatReturnNode:
1123 generateFlatReturnNode(fm, (FlatReturnNode) fn,output);
1126 output.println("/* nop */");
1128 case FKind.FlatBackEdge:
1129 if (state.THREAD&&GENERATEPRECISEGC) {
1130 output.println("checkcollect(&"+localsprefix+");");
1132 output.println("/* nop */");
1134 case FKind.FlatCheckNode:
1135 generateFlatCheckNode(fm, (FlatCheckNode) fn, output);
1137 case FKind.FlatFlagActionNode:
1138 generateFlatFlagActionNode(fm, (FlatFlagActionNode) fn, output);
1145 private void generateFlatCheckNode(FlatMethod fm, FlatCheckNode fcn, PrintWriter output) {
1147 if (state.CONSCHECK) {
1148 String specname=fcn.getSpec();
1149 String varname="repairstate___";
1150 output.println("{");
1151 output.println("struct "+specname+"_state * "+varname+"=allocate"+specname+"_state();");
1153 TempDescriptor[] temps=fcn.getTemps();
1154 String[] vars=fcn.getVars();
1155 for(int i=0;i<temps.length;i++) {
1156 output.println(varname+"->"+vars[i]+"=(int)"+generateTemp(fm, temps[i])+";");
1159 output.println("if (doanalysis"+specname+"("+varname+")) {");
1160 output.println("free"+specname+"_state("+varname+");");
1161 output.println("} else {");
1162 output.println("/* Bad invariant */");
1163 output.println("free"+specname+"_state("+varname+");");
1164 output.println("abort_task();");
1165 output.println("}");
1167 output.println("}");
1171 private void generateFlatCall(FlatMethod fm, FlatCall fc, PrintWriter output) {
1172 MethodDescriptor md=fc.getMethod();
1173 ParamsObject objectparams=(ParamsObject) paramstable.get(md);
1174 ClassDescriptor cn=md.getClassDesc();
1175 output.println("{");
1176 if (GENERATEPRECISEGC) {
1177 output.print(" struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
1179 output.print(objectparams.numPointers());
1180 // output.print(objectparams.getUID());
1181 output.print(", & "+localsprefix);
1182 if (fc.getThis()!=null) {
1184 output.print("(struct "+md.getThis().getType().getSafeSymbol() +" *)"+ generateTemp(fm,fc.getThis()));
1186 for(int i=0;i<fc.numArgs();i++) {
1187 Descriptor var=md.getParameter(i);
1188 TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
1189 if (objectparams.isParamPtr(paramtemp)) {
1190 TempDescriptor targ=fc.getArg(i);
1192 TypeDescriptor td=md.getParamType(i);
1194 output.print("(struct "+(new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol() +" *)"+generateTemp(fm, targ));
1196 output.print("(struct "+md.getParamType(i).getSafeSymbol() +" *)"+generateTemp(fm, targ));
1199 output.println("};");
1204 if (fc.getReturnTemp()!=null)
1205 output.print(generateTemp(fm,fc.getReturnTemp())+"=");
1207 /* Do we need to do virtual dispatch? */
1208 if (md.isStatic()||md.getReturnType()==null||singleCall(fc.getThis().getType().getClassDesc(),md)) {
1209 output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
1213 if (md.getReturnType().isClass()||md.getReturnType().isArray())
1214 output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
1216 output.print(md.getReturnType().getSafeSymbol()+" ");
1217 output.print("(*)(");
1219 boolean printcomma=false;
1220 if (GENERATEPRECISEGC) {
1221 output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * ");
1226 for(int i=0;i<objectparams.numPrimitives();i++) {
1227 TempDescriptor temp=objectparams.getPrimitive(i);
1231 if (temp.getType().isClass()||temp.getType().isArray())
1232 output.print("struct " + temp.getType().getSafeSymbol()+" * ");
1234 output.print(temp.getType().getSafeSymbol());
1237 output.print("))virtualtable["+generateTemp(fm,fc.getThis())+"->type*"+maxcount+"+"+virtualcalls.getMethodNumber(md)+"])");
1241 boolean needcomma=false;
1242 if (GENERATEPRECISEGC) {
1243 output.print("&__parameterlist__");
1246 if (fc.getThis()!=null) {
1247 TypeDescriptor ptd=md.getThis().getType();
1248 if (ptd.isClass()&&!ptd.isArray())
1249 output.print("(struct "+ptd.getSafeSymbol()+" *) ");
1250 output.print(generateTemp(fm,fc.getThis()));
1254 for(int i=0;i<fc.numArgs();i++) {
1255 Descriptor var=md.getParameter(i);
1256 TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
1257 if (objectparams.isParamPrim(paramtemp)) {
1258 TempDescriptor targ=fc.getArg(i);
1262 TypeDescriptor ptd=md.getParamType(i);
1263 if (ptd.isClass()&&!ptd.isArray())
1264 output.print("(struct "+ptd.getSafeSymbol()+" *) ");
1265 output.print(generateTemp(fm, targ));
1269 output.println(");");
1270 output.println(" }");
1273 private boolean singleCall(ClassDescriptor thiscd, MethodDescriptor md) {
1274 Set subclasses=typeutil.getSubClasses(thiscd);
1275 if (subclasses==null)
1277 for(Iterator classit=subclasses.iterator();classit.hasNext();) {
1278 ClassDescriptor cd=(ClassDescriptor)classit.next();
1279 Set possiblematches=cd.getMethodTable().getSet(md.getSymbol());
1280 for(Iterator matchit=possiblematches.iterator();matchit.hasNext();) {
1281 MethodDescriptor matchmd=(MethodDescriptor)matchit.next();
1282 if (md.matches(matchmd))
1289 private void generateFlatFieldNode(FlatMethod fm, FlatFieldNode ffn, PrintWriter output) {
1290 output.println(generateTemp(fm, ffn.getDst())+"="+ generateTemp(fm,ffn.getSrc())+"->"+ ffn.getField().getSafeSymbol()+";");
1293 private void generateFlatSetFieldNode(FlatMethod fm, FlatSetFieldNode fsfn, PrintWriter output) {
1294 if (fsfn.getField().getSymbol().equals("length")&&fsfn.getDst().getType().isArray())
1295 throw new Error("Can't set array length");
1296 output.println(generateTemp(fm, fsfn.getDst())+"->"+ fsfn.getField().getSafeSymbol()+"="+ generateTemp(fm,fsfn.getSrc())+";");
1299 private void generateFlatElementNode(FlatMethod fm, FlatElementNode fen, PrintWriter output) {
1300 TypeDescriptor elementtype=fen.getSrc().getType().dereference();
1303 if (elementtype.isArray()||elementtype.isClass())
1306 type=elementtype.getSafeSymbol()+" ";
1308 if (fen.needsBoundsCheck()) {
1309 output.println("if ("+generateTemp(fm, fen.getIndex())+"< 0 || "+generateTemp(fm, fen.getIndex())+" >= "+generateTemp(fm,fen.getSrc()) + "->___length___)");
1310 output.println("failedboundschk();");
1313 output.println(generateTemp(fm, fen.getDst())+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc())+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex())+"];");
1316 private void generateFlatSetElementNode(FlatMethod fm, FlatSetElementNode fsen, PrintWriter output) {
1317 //TODO: need dynamic check to make sure this assignment is actually legal
1318 //Because Object[] could actually be something more specific...ie. Integer[]
1320 TypeDescriptor elementtype=fsen.getDst().getType().dereference();
1323 if (elementtype.isArray()||elementtype.isClass())
1326 type=elementtype.getSafeSymbol()+" ";
1328 if (fsen.needsBoundsCheck()) {
1329 output.println("if ("+generateTemp(fm, fsen.getIndex())+"< 0 || "+generateTemp(fm, fsen.getIndex())+" >= "+generateTemp(fm,fsen.getDst()) + "->___length___)");
1330 output.println("failedboundschk();");
1333 output.println("(("+type +"*)(((char *) &("+ generateTemp(fm,fsen.getDst())+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex())+"]="+generateTemp(fm,fsen.getSrc())+";");
1336 private void generateFlatNew(FlatMethod fm, FlatNew fn, PrintWriter output) {
1337 if (fn.getType().isArray()) {
1338 int arrayid=state.getArrayNumber(fn.getType())+state.numClasses();
1339 if (GENERATEPRECISEGC) {
1340 output.println(generateTemp(fm,fn.getDst())+"=allocate_newarray(&"+localsprefix+", "+arrayid+", "+generateTemp(fm, fn.getSize())+");");
1342 output.println(generateTemp(fm,fn.getDst())+"=allocate_newarray("+arrayid+", "+generateTemp(fm, fn.getSize())+");");
1345 if (GENERATEPRECISEGC) {
1346 output.println(generateTemp(fm,fn.getDst())+"=allocate_new(&"+localsprefix+", "+fn.getType().getClassDesc().getId()+");");
1348 output.println(generateTemp(fm,fn.getDst())+"=allocate_new("+fn.getType().getClassDesc().getId()+");");
1354 private void generateFlatTagDeclaration(FlatMethod fm, FlatTagDeclaration fn, PrintWriter output) {
1355 if (GENERATEPRECISEGC) {
1356 output.println(generateTemp(fm,fn.getDst())+"=allocate_tag(&"+localsprefix+", "+state.getTagId(fn.getType())+");");
1358 output.println(generateTemp(fm,fn.getDst())+"=allocate_tag("+state.getTagId(fn.getType())+");");
1362 private void generateFlatOpNode(FlatMethod fm, FlatOpNode fon, PrintWriter output) {
1364 if (fon.getRight()!=null)
1365 output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+fon.getOp().toString()+generateTemp(fm,fon.getRight())+";");
1366 else if (fon.getOp().getOp()==Operation.ASSIGN)
1367 output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+";");
1368 else if (fon.getOp().getOp()==Operation.UNARYPLUS)
1369 output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+";");
1370 else if (fon.getOp().getOp()==Operation.UNARYMINUS)
1371 output.println(generateTemp(fm, fon.getDest())+" = -"+generateTemp(fm, fon.getLeft())+";");
1372 else if (fon.getOp().getOp()==Operation.LOGIC_NOT)
1373 output.println(generateTemp(fm, fon.getDest())+" = !"+generateTemp(fm, fon.getLeft())+";");
1375 output.println(generateTemp(fm, fon.getDest())+fon.getOp().toString()+generateTemp(fm, fon.getLeft())+";");
1378 private void generateFlatCastNode(FlatMethod fm, FlatCastNode fcn, PrintWriter output) {
1379 /* TODO: Do type check here */
1380 if (fcn.getType().isArray()) {
1382 } else if (fcn.getType().isClass())
1383 output.println(generateTemp(fm,fcn.getDst())+"=(struct "+fcn.getType().getSafeSymbol()+" *)"+generateTemp(fm,fcn.getSrc())+";");
1385 output.println(generateTemp(fm,fcn.getDst())+"=("+fcn.getType().getSafeSymbol()+")"+generateTemp(fm,fcn.getSrc())+";");
1388 private void generateFlatLiteralNode(FlatMethod fm, FlatLiteralNode fln, PrintWriter output) {
1389 if (fln.getValue()==null)
1390 output.println(generateTemp(fm, fln.getDst())+"=0;");
1391 else if (fln.getType().getSymbol().equals(TypeUtil.StringClass)) {
1392 if (GENERATEPRECISEGC) {
1393 output.println(generateTemp(fm, fln.getDst())+"=NewString(&"+localsprefix+", \""+FlatLiteralNode.escapeString((String)fln.getValue())+"\","+((String)fln.getValue()).length()+");");
1395 output.println(generateTemp(fm, fln.getDst())+"=NewString(\""+FlatLiteralNode.escapeString((String)fln.getValue())+"\","+((String)fln.getValue()).length()+");");
1397 } else if (fln.getType().isBoolean()) {
1398 if (((Boolean)fln.getValue()).booleanValue())
1399 output.println(generateTemp(fm, fln.getDst())+"=1;");
1401 output.println(generateTemp(fm, fln.getDst())+"=0;");
1402 } else if (fln.getType().isChar()) {
1403 String st=FlatLiteralNode.escapeString(fln.getValue().toString());
1404 output.println(generateTemp(fm, fln.getDst())+"='"+st+"';");
1406 output.println(generateTemp(fm, fln.getDst())+"="+fln.getValue()+";");
1409 private void generateFlatReturnNode(FlatMethod fm, FlatReturnNode frn, PrintWriter output) {
1411 if (frn.getReturnTemp()!=null)
1412 output.println("return "+generateTemp(fm, frn.getReturnTemp())+";");
1414 output.println("return;");
1417 private void generateFlatCondBranch(FlatMethod fm, FlatCondBranch fcb, String label, PrintWriter output) {
1418 output.println("if (!"+generateTemp(fm, fcb.getTest())+") goto "+label+";");
1421 private void generateHeader(FlatMethod fm, Descriptor des, PrintWriter output) {
1423 ParamsObject objectparams=(ParamsObject)paramstable.get(des);
1424 MethodDescriptor md=null;
1425 TaskDescriptor task=null;
1426 if (des instanceof MethodDescriptor)
1427 md=(MethodDescriptor) des;
1429 task=(TaskDescriptor) des;
1431 ClassDescriptor cn=md!=null?md.getClassDesc():null;
1433 if (md!=null&&md.getReturnType()!=null) {
1434 if (md.getReturnType().isClass()||md.getReturnType().isArray())
1435 output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
1437 output.print(md.getReturnType().getSafeSymbol()+" ");
1439 //catch the constructor case
1440 output.print("void ");
1442 output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1444 output.print(task.getSafeSymbol()+"(");
1446 boolean printcomma=false;
1447 if (GENERATEPRECISEGC) {
1449 output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1451 output.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
1457 for(int i=0;i<objectparams.numPrimitives();i++) {
1458 TempDescriptor temp=objectparams.getPrimitive(i);
1462 if (temp.getType().isClass()||temp.getType().isArray())
1463 output.print("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
1465 output.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
1467 output.println(") {");
1468 } else if (!GENERATEPRECISEGC) {
1469 /* Imprecise Task */
1470 output.println("void * parameterarray[]) {");
1471 /* Unpack variables */
1472 for(int i=0;i<objectparams.numPrimitives();i++) {
1473 TempDescriptor temp=objectparams.getPrimitive(i);
1474 output.println("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+"=parameterarray["+i+"];");
1476 for(int i=0;i<fm.numTags();i++) {
1477 TempDescriptor temp=fm.getTag(i);
1478 int offset=i+objectparams.numPrimitives();
1479 output.println("struct ___TagDescriptor___ * "+temp.getSafeSymbol()+"=parameterarray["+offset+"];");
1482 if ((objectparams.numPrimitives()+fm.numTags())>maxtaskparams)
1483 maxtaskparams=objectparams.numPrimitives()+fm.numTags();
1484 } else output.println(") {");
1487 public void generateFlatFlagActionNode(FlatMethod fm, FlatFlagActionNode ffan, PrintWriter output) {
1488 output.println("/* FlatFlagActionNode */");
1491 /* Process tag changes */
1492 Relation tagsettable=new Relation();
1493 Relation tagcleartable=new Relation();
1495 Iterator tagsit=ffan.getTempTagPairs();
1496 while (tagsit.hasNext()) {
1497 TempTagPair ttp=(TempTagPair) tagsit.next();
1498 TempDescriptor objtmp=ttp.getTemp();
1499 TagDescriptor tag=ttp.getTag();
1500 TempDescriptor tagtmp=ttp.getTagTemp();
1501 boolean tagstatus=ffan.getTagChange(ttp);
1503 tagsettable.put(objtmp, tagtmp);
1505 tagcleartable.put(objtmp, tagtmp);
1510 Hashtable flagandtable=new Hashtable();
1511 Hashtable flagortable=new Hashtable();
1513 /* Process flag changes */
1514 Iterator flagsit=ffan.getTempFlagPairs();
1515 while(flagsit.hasNext()) {
1516 TempFlagPair tfp=(TempFlagPair)flagsit.next();
1517 TempDescriptor temp=tfp.getTemp();
1518 Hashtable flagtable=(Hashtable)flagorder.get(temp.getType().getClassDesc());
1519 FlagDescriptor flag=tfp.getFlag();
1521 //Newly allocate objects that don't set any flags case
1522 if (flagortable.containsKey(temp)) {
1526 flagortable.put(temp,new Integer(mask));
1528 int flagid=1<<((Integer)flagtable.get(flag)).intValue();
1529 boolean flagstatus=ffan.getFlagChange(tfp);
1532 if (flagortable.containsKey(temp)) {
1533 mask=((Integer)flagortable.get(temp)).intValue();
1536 flagortable.put(temp,new Integer(mask));
1538 int mask=0xFFFFFFFF;
1539 if (flagandtable.containsKey(temp)) {
1540 mask=((Integer)flagandtable.get(temp)).intValue();
1542 mask&=(0xFFFFFFFF^flagid);
1543 flagandtable.put(temp,new Integer(mask));
1549 HashSet flagtagset=new HashSet();
1550 flagtagset.addAll(flagortable.keySet());
1551 flagtagset.addAll(flagandtable.keySet());
1552 flagtagset.addAll(tagsettable.keySet());
1553 flagtagset.addAll(tagcleartable.keySet());
1555 Iterator ftit=flagtagset.iterator();
1556 while(ftit.hasNext()) {
1557 TempDescriptor temp=(TempDescriptor)ftit.next();
1560 Set tagtmps=tagcleartable.get(temp);
1561 if (tagtmps!=null) {
1562 Iterator tagit=tagtmps.iterator();
1563 while(tagit.hasNext()) {
1564 TempDescriptor tagtmp=(TempDescriptor)tagit.next();
1565 if (GENERATEPRECISEGC)
1566 output.println("tagclear(&"+localsprefix+", (struct ___Object___ *)"+generateTemp(fm, temp)+", "+generateTemp(fm,tagtmp)+");");
1568 output.println("tagclear((struct ___Object___ *)"+generateTemp(fm, temp)+", "+generateTemp(fm,tagtmp)+");");
1572 tagtmps=tagsettable.get(temp);
1573 if (tagtmps!=null) {
1574 Iterator tagit=tagtmps.iterator();
1575 while(tagit.hasNext()) {
1576 TempDescriptor tagtmp=(TempDescriptor)tagit.next();
1577 if (GENERATEPRECISEGC)
1578 output.println("tagset(&"+localsprefix+", (struct ___Object___ *)"+generateTemp(fm, temp)+", "+generateTemp(fm,tagtmp)+");");
1580 output.println("tagset((struct ___Object___ *)"+generateTemp(fm, temp)+", "+generateTemp(fm,tagtmp)+");");
1585 int andmask=0xFFFFFFF;
1587 if (flagortable.containsKey(temp))
1588 ormask=((Integer)flagortable.get(temp)).intValue();
1589 if (flagandtable.containsKey(temp))
1590 andmask=((Integer)flagandtable.get(temp)).intValue();
1591 if (ffan.getTaskType()==FlatFlagActionNode.NEWOBJECT) {
1592 output.println("flagorandinit("+generateTemp(fm, temp)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
1594 output.println("flagorand("+generateTemp(fm, temp)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
1599 void generateOptionalArrays(PrintWriter output) {
1601 SymbolTable classes = state.getClassSymbolTable();
1602 for( Iterator it = classes.getAllDescriptorsIterator(); it.hasNext();){
1603 ClassDescriptor cd = (ClassDescriptor)it.next();
1604 output.println("Class "+cd.getSymbol());
1605 Hashtable flags=(Hashtable)flagorder.get(cd);
1606 for (Iterator fit = cd.getFlags(); fit.hasNext();){
1607 FlagDescriptor fd = (FlagDescriptor)fit.next();
1608 int flagid=1<<((Integer)flags.get(fd)).intValue();
1609 output.println("\tFlag associated with "+fd.getSymbol()+" : 0x"+Integer.toHexString(flagid)+" bx"+Integer.toBinaryString(flagid));