2 import IR.Tree.FlagExpressionNode;
3 import IR.Tree.DNFFlag;
4 import IR.Tree.DNFFlagAtom;
9 public class BuildCode {
12 Hashtable paramstable;
17 String localsprefix="___locals___";
18 String paramsprefix="___params___";
19 public static boolean GENERATEPRECISEGC=false;
20 public static String PREFIX="";
21 public static String arraytype="ArrayObject";
24 private int maxtaskparams=0;
25 ClassDescriptor[] cdarray;
26 TypeDescriptor[] arraytable;
28 public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil) {
30 this.temptovar=temptovar;
31 paramstable=new Hashtable();
32 tempstable=new Hashtable();
33 fieldorder=new Hashtable();
34 flagorder=new Hashtable();
35 this.typeutil=typeutil;
36 virtualcalls=new Virtual(state);
39 /** The buildCode method outputs C code for all the methods. The Flat
40 * versions of the methods must already be generated and stored in
41 * the State object. */
43 public void buildCode() {
44 /* Create output streams to write to */
45 PrintWriter outclassdefs=null;
46 PrintWriter outstructs=null;
47 PrintWriter outmethodheader=null;
48 PrintWriter outmethod=null;
49 PrintWriter outvirtual=null;
50 PrintWriter outtask=null;
51 PrintWriter outtaskdefs=null;
54 OutputStream str=new FileOutputStream(PREFIX+"structdefs.h");
55 outstructs=new java.io.PrintWriter(str, true);
56 str=new FileOutputStream(PREFIX+"methodheaders.h");
57 outmethodheader=new java.io.PrintWriter(str, true);
58 str=new FileOutputStream(PREFIX+"classdefs.h");
59 outclassdefs=new java.io.PrintWriter(str, true);
60 str=new FileOutputStream(PREFIX+"methods.c");
61 outmethod=new java.io.PrintWriter(str, true);
62 str=new FileOutputStream(PREFIX+"virtualtable.h");
63 outvirtual=new java.io.PrintWriter(str, true);
65 str=new FileOutputStream(PREFIX+"task.h");
66 outtask=new java.io.PrintWriter(str, true);
67 str=new FileOutputStream(PREFIX+"taskdefs.c");
68 outtaskdefs=new java.io.PrintWriter(str, true);
70 } catch (Exception e) {
75 /* Build the virtual dispatch tables */
77 buildVirtualTables(outvirtual);
80 outstructs.println("#include \"classdefs.h\"");
81 outmethodheader.println("#include \"structdefs.h\"");
83 /* Output types for short array and string */
84 outstructs.println("#define STRINGARRAYTYPE "+
85 (state.getArrayNumber(
86 (new TypeDescriptor(typeutil.getClass(TypeUtil.StringClass))).makeArray(state))+state.numClasses()));
88 outstructs.println("#define STRINGTYPE "+typeutil.getClass(TypeUtil.StringClass).getId());
89 outstructs.println("#define CHARARRAYTYPE "+
90 (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.CHAR)).makeArray(state))+state.numClasses()));
91 outstructs.println("#define NUMCLASSES "+state.numClasses());
93 outstructs.println("#define STARTUPTYPE "+typeutil.getClass(TypeUtil.StartupClass).getId());
95 // Output the C class declarations
96 // These could mutually reference each other
97 outclassdefs.println("struct "+arraytype+";");
99 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
100 while(it.hasNext()) {
101 ClassDescriptor cn=(ClassDescriptor)it.next();
102 outclassdefs.println("struct "+cn.getSafeSymbol()+";");
104 outclassdefs.println("");
106 //Print out definition for array type
107 outclassdefs.println("struct "+arraytype+" {");
108 outclassdefs.println(" int type;");
109 printClassStruct(typeutil.getClass(TypeUtil.ObjectClass), outclassdefs);
110 outclassdefs.println(" int ___length___;");
111 outclassdefs.println("};\n");
114 //Print out definitions for task types
115 outtask.println("struct parameterdescriptor {");
116 outtask.println("int type;");
117 outtask.println("int numberterms;");
118 outtask.println("int *intarray;");
119 outtask.println("void * queue;");
120 outtask.println("};");
122 outtask.println("struct taskdescriptor {");
123 outtask.println("void * taskptr;");
124 outtask.println("int numParameters;");
125 outtask.println("struct parameterdescriptor **descriptorarray;");
126 outtask.println("};");
127 outtask.println("extern struct taskdescriptor * taskarray[];");
128 outtask.println("extern numtasks;");
132 // Output function prototypes and structures for parameters
133 it=state.getClassSymbolTable().getDescriptorsIterator();
134 while(it.hasNext()) {
135 ClassDescriptor cn=(ClassDescriptor)it.next();
136 generateCallStructs(cn, outclassdefs, outstructs, outmethodheader);
141 /* Map flags to integers */
142 it=state.getClassSymbolTable().getDescriptorsIterator();
143 while(it.hasNext()) {
144 ClassDescriptor cn=(ClassDescriptor)it.next();
148 generateTaskStructs(outstructs, outmethodheader);
151 outmethodheader.close();
153 /* Build the actual methods */
154 outmethod.println("#include \"methodheaders.h\"");
155 outmethod.println("#include \"virtualtable.h\"");
156 outmethod.println("#include <runtime.h>");
157 outclassdefs.println("extern int classsize[];");
158 outclassdefs.println("extern int * pointerarray[];");
160 //Store the sizes of classes & array elements
161 generateSizeArray(outmethod);
163 //Store the layout of classes
164 generateLayoutStructs(outmethod);
166 /* Generate code for methods */
167 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
168 while(classit.hasNext()) {
169 ClassDescriptor cn=(ClassDescriptor)classit.next();
170 Iterator methodit=cn.getMethods();
171 while(methodit.hasNext()) {
172 /* Classify parameters */
173 MethodDescriptor md=(MethodDescriptor)methodit.next();
174 FlatMethod fm=state.getMethodFlat(md);
175 if (!md.getModifiers().isNative())
176 generateFlatMethod(fm,outmethod);
181 /* Compile task based program */
182 outtaskdefs.println("#include \"task.h\"");
183 outtaskdefs.println("#include \"methodheaders.h\"");
184 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
185 while(taskit.hasNext()) {
186 TaskDescriptor td=(TaskDescriptor)taskit.next();
187 FlatMethod fm=state.getMethodFlat(td);
188 generateFlatMethod(fm, outmethod);
189 generateTaskDescriptor(outtaskdefs, td);
192 taskit=state.getTaskSymbolTable().getDescriptorsIterator();
193 outtaskdefs.println("struct taskdescriptor * taskarray[]= {");
195 while(taskit.hasNext()) {
196 TaskDescriptor td=(TaskDescriptor)taskit.next();
200 outtaskdefs.println(",");
201 outtaskdefs.print("&task_"+td.getSafeSymbol());
203 outtaskdefs.println("};");
204 outtaskdefs.println("int numtasks="+state.getTaskSymbolTable().getValueSet().size()+";");
206 } else if (state.main!=null) {
207 /* Generate main method */
208 outmethod.println("int main(int argc, const char *argv[]) {");
209 ClassDescriptor cd=typeutil.getClass(state.main);
210 Set mainset=cd.getMethodTable().getSet("main");
211 for(Iterator mainit=mainset.iterator();mainit.hasNext();) {
212 MethodDescriptor md=(MethodDescriptor)mainit.next();
213 if (md.numParameters()!=0)
215 if (!md.getModifiers().isStatic())
216 throw new Error("Error: Non static main");
217 outmethod.println(" "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"();");
220 outmethod.println("}");
223 outstructs.println("#define MAXTASKPARAMS "+maxtaskparams);
228 private int maxcount=0;
230 /** This method outputs TaskDescriptor information */
231 void generateTaskDescriptor(PrintWriter output, TaskDescriptor task) {
232 for (int i=0;i<task.numParameters();i++) {
233 VarDescriptor param_var=task.getParameter(i);
234 TypeDescriptor param_type=task.getParamType(i);
235 FlagExpressionNode param_flag=task.getFlag(param_var);
236 DNFFlag dflag=param_flag.getDNF();
238 Hashtable flags=(Hashtable)flagorder.get(param_type.getClassDesc());
240 output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
241 for(int j=0;j<dflag.size();j++) {
244 Vector term=dflag.get(j);
247 for(int k=0;k<term.size();k++) {
248 DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
249 FlagDescriptor fd=dfa.getFlag();
250 boolean negated=dfa.getNegated();
251 int flagid=1<<((Integer)flags.get(fd)).intValue();
256 output.print("0x"+Integer.toHexString(andmask)+", 0x"+Integer.toHexString(checkmask));
258 output.println("};");
260 output.println("struct parameterdescriptor parameter_"+i+"_"+task.getSafeSymbol()+"={");
261 output.println("/* type */"+param_type.getClassDesc().getId()+",");
262 output.println("/* number of DNF terms */"+dflag.size()+",");
263 output.println("parameterdnf_"+i+"_"+task.getSafeSymbol()+",");
265 output.println("};");
269 output.println("struct parameterdescriptor * parameterdescriptors_"+task.getSafeSymbol()+"[] = {");
270 for (int i=0;i<task.numParameters();i++) {
273 output.print("¶meter_"+i+"_"+task.getSafeSymbol());
275 output.println("};");
277 output.println("struct taskdescriptor task_"+task.getSafeSymbol()+"={");
278 output.println("&"+task.getSafeSymbol()+",");
279 output.println("/* number of parameters */" +task.numParameters() + ",");
280 output.println("parameterdescriptors_"+task.getSafeSymbol());
281 output.println("};");
285 /** The buildVirtualTables method outputs the virtual dispatch
286 * tables for methods. */
288 private void buildVirtualTables(PrintWriter outvirtual) {
289 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
290 while(classit.hasNext()) {
291 ClassDescriptor cd=(ClassDescriptor)classit.next();
292 if (virtualcalls.getMethodCount(cd)>maxcount)
293 maxcount=virtualcalls.getMethodCount(cd);
295 MethodDescriptor[][] virtualtable=new MethodDescriptor[state.numClasses()+state.numArrays()][maxcount];
297 /* Fill in virtual table */
298 classit=state.getClassSymbolTable().getDescriptorsIterator();
299 while(classit.hasNext()) {
300 ClassDescriptor cd=(ClassDescriptor)classit.next();
301 fillinRow(cd, virtualtable, cd.getId());
304 ClassDescriptor objectcd=typeutil.getClass(TypeUtil.ObjectClass);
305 Iterator arrayit=state.getArrayIterator();
306 while(arrayit.hasNext()) {
307 TypeDescriptor td=(TypeDescriptor)arrayit.next();
308 int id=state.getArrayNumber(td);
309 fillinRow(objectcd, virtualtable, id+state.numClasses());
312 outvirtual.print("void * virtualtable[]={");
313 boolean needcomma=false;
314 for(int i=0;i<state.numClasses()+state.numArrays();i++) {
315 for(int j=0;j<maxcount;j++) {
317 outvirtual.print(", ");
318 if (virtualtable[i][j]!=null) {
319 MethodDescriptor md=virtualtable[i][j];
320 outvirtual.print("& "+md.getClassDesc().getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
322 outvirtual.print("0");
326 outvirtual.println("");
328 outvirtual.println("};");
332 private void fillinRow(ClassDescriptor cd, MethodDescriptor[][] virtualtable, int rownum) {
333 /* Get inherited methods */
334 if (cd.getSuperDesc()!=null)
335 fillinRow(cd.getSuperDesc(), virtualtable, rownum);
336 /* Override them with our methods */
337 for(Iterator it=cd.getMethods();it.hasNext();) {
338 MethodDescriptor md=(MethodDescriptor)it.next();
339 if (md.isStatic()||md.getReturnType()==null)
341 int methodnum=virtualcalls.getMethodNumber(md);
342 virtualtable[rownum][methodnum]=md;
346 /** Generate array that contains the sizes of class objects. The
347 * object allocation functions in the runtime use this
350 private void generateSizeArray(PrintWriter outclassdefs) {
351 outclassdefs.print("int classsize[]={");
352 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
353 cdarray=new ClassDescriptor[state.numClasses()];
354 while(it.hasNext()) {
355 ClassDescriptor cd=(ClassDescriptor)it.next();
356 cdarray[cd.getId()]=cd;
358 boolean needcomma=false;
359 for(int i=0;i<state.numClasses();i++) {
361 outclassdefs.print(", ");
362 outclassdefs.print("sizeof(struct "+cdarray[i].getSafeSymbol()+")");
366 arraytable=new TypeDescriptor[state.numArrays()];
368 Iterator arrayit=state.getArrayIterator();
369 while(arrayit.hasNext()) {
370 TypeDescriptor td=(TypeDescriptor)arrayit.next();
371 int id=state.getArrayNumber(td);
375 for(int i=0;i<state.numArrays();i++) {
377 outclassdefs.print(", ");
378 TypeDescriptor tdelement=arraytable[i].dereference();
379 if (tdelement.isArray()||tdelement.isClass())
380 outclassdefs.print("sizeof(void *)");
382 outclassdefs.print("sizeof("+tdelement.getSafeSymbol()+")");
386 outclassdefs.println("};");
389 /** Constructs params and temp objects for each method or task.
390 * These objects tell the compiler which temps need to be
393 private void generateTempStructs(FlatMethod fm) {
394 MethodDescriptor md=fm.getMethod();
395 TaskDescriptor task=fm.getTask();
397 ParamsObject objectparams=md!=null?new ParamsObject(md,tag++):new ParamsObject(task, tag++);
399 paramstable.put(md, objectparams);
401 paramstable.put(task, objectparams);
403 for(int i=0;i<fm.numParameters();i++) {
404 TempDescriptor temp=fm.getParameter(i);
405 TypeDescriptor type=temp.getType();
406 if ((type.isPtr()||type.isArray())&&GENERATEPRECISEGC)
407 objectparams.addPtr(temp);
409 objectparams.addPrim(temp);
412 TempObject objecttemps=md!=null?new TempObject(objectparams,md,tag++):new TempObject(objectparams, task, tag++);
414 tempstable.put(md, objecttemps);
416 tempstable.put(task, objecttemps);
418 for(Iterator nodeit=fm.getNodeSet().iterator();nodeit.hasNext();) {
419 FlatNode fn=(FlatNode)nodeit.next();
420 TempDescriptor[] writes=fn.writesTemps();
421 for(int i=0;i<writes.length;i++) {
422 TempDescriptor temp=writes[i];
423 TypeDescriptor type=temp.getType();
424 if ((type.isPtr()||type.isArray())&&GENERATEPRECISEGC)
425 objecttemps.addPtr(temp);
427 objecttemps.addPrim(temp);
432 private void generateLayoutStructs(PrintWriter output) {
433 Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
434 while(it.hasNext()) {
435 ClassDescriptor cn=(ClassDescriptor)it.next();
436 output.println("int "+cn.getSafeSymbol()+"_pointers[]={");
437 Iterator allit=cn.getFieldTable().getAllDescriptorsIterator();
439 while(allit.hasNext()) {
440 FieldDescriptor fd=(FieldDescriptor)allit.next();
441 TypeDescriptor type=fd.getType();
442 if (type.isPtr()||type.isArray())
446 allit=cn.getFieldTable().getAllDescriptorsIterator();
447 while(allit.hasNext()) {
448 FieldDescriptor fd=(FieldDescriptor)allit.next();
449 TypeDescriptor type=fd.getType();
450 if (type.isPtr()||type.isArray()) {
452 output.print("((int)&(((struct "+cn.getSafeSymbol() +" *)0)->"+fd.getSafeSymbol()+"))");
455 output.println("};");
457 output.println("int * pointerarray[]={");
458 boolean needcomma=false;
459 for(int i=0;i<state.numClasses();i++) {
460 ClassDescriptor cn=cdarray[i];
464 output.print(cn.getSafeSymbol()+"_pointers");
467 for(int i=0;i<state.numArrays();i++) {
470 TypeDescriptor tdelement=arraytable[i].dereference();
471 if (tdelement.isArray()||tdelement.isClass())
472 output.print("((int *)1)");
478 output.println("};");
481 /* Force consistent field ordering between inherited classes. */
483 private void printClassStruct(ClassDescriptor cn, PrintWriter classdefout) {
484 ClassDescriptor sp=cn.getSuperDesc();
486 printClassStruct(sp, classdefout);
488 if (!fieldorder.containsKey(cn)) {
489 Vector fields=new Vector();
490 fieldorder.put(cn,fields);
491 Iterator fieldit=cn.getFields();
492 while(fieldit.hasNext()) {
493 FieldDescriptor fd=(FieldDescriptor)fieldit.next();
494 if (sp==null||!sp.getFieldTable().contains(fd.getSymbol()))
498 Vector fields=(Vector)fieldorder.get(cn);
500 for(int i=0;i<fields.size();i++) {
501 FieldDescriptor fd=(FieldDescriptor)fields.get(i);
502 if (fd.getType().isClass()||fd.getType().isArray())
503 classdefout.println(" struct "+fd.getType().getSafeSymbol()+" * "+fd.getSafeSymbol()+";");
505 classdefout.println(" "+fd.getType().getSafeSymbol()+" "+fd.getSafeSymbol()+";");
510 /* Map flags to integers consistently between inherited
513 private void mapFlags(ClassDescriptor cn) {
514 ClassDescriptor sp=cn.getSuperDesc();
518 if (!flagorder.containsKey(cn)) {
519 Hashtable flags=new Hashtable();
520 flagorder.put(cn,flags);
522 Hashtable superflags=(Hashtable)flagorder.get(sp);
523 Iterator superflagit=superflags.keySet().iterator();
524 while(superflagit.hasNext()) {
525 FlagDescriptor fd=(FlagDescriptor)superflagit.next();
526 Integer number=(Integer)superflags.get(fd);
527 flags.put(fd, number);
528 if ((number.intValue()+1)>max)
529 max=number.intValue()+1;
533 Iterator flagit=cn.getFlags();
534 while(flagit.hasNext()) {
535 FlagDescriptor fd=(FlagDescriptor)flagit.next();
536 if (sp==null||!sp.getFlagTable().contains(fd.getSymbol()))
537 flags.put(fd, new Integer(max++));
543 /** This function outputs (1) structures that parameters are
544 * passed in (when PRECISE GC is enabled) and (2) function
545 * prototypes for the methods */
547 private void generateCallStructs(ClassDescriptor cn, PrintWriter classdefout, PrintWriter output, PrintWriter headersout) {
548 /* Output class structure */
549 classdefout.println("struct "+cn.getSafeSymbol()+" {");
550 classdefout.println(" int type;");
552 classdefout.println(" int flag;");
553 classdefout.println(" void * flagptr;");
555 printClassStruct(cn, classdefout);
556 classdefout.println("};\n");
558 /* Cycle through methods */
559 Iterator methodit=cn.getMethods();
560 while(methodit.hasNext()) {
561 /* Classify parameters */
562 MethodDescriptor md=(MethodDescriptor)methodit.next();
563 FlatMethod fm=state.getMethodFlat(md);
564 generateTempStructs(fm);
566 ParamsObject objectparams=(ParamsObject) paramstable.get(md);
567 TempObject objecttemps=(TempObject) tempstable.get(md);
569 /* Output parameter structure */
570 if (GENERATEPRECISEGC) {
571 output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params {");
572 output.println(" int type;");
573 output.println(" void * next;");
574 for(int i=0;i<objectparams.numPointers();i++) {
575 TempDescriptor temp=objectparams.getPointer(i);
576 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
578 output.println("};\n");
581 /* Output temp structure */
582 if (GENERATEPRECISEGC) {
583 output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals {");
584 output.println(" int type;");
585 output.println(" void * next;");
586 for(int i=0;i<objecttemps.numPointers();i++) {
587 TempDescriptor temp=objecttemps.getPointer(i);
588 if (temp.getType().isNull())
589 output.println(" void * "+temp.getSafeSymbol()+";");
591 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
593 output.println("};\n");
596 /* Output method declaration */
597 if (md.getReturnType()!=null) {
598 if (md.getReturnType().isClass()||md.getReturnType().isArray())
599 headersout.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
601 headersout.print(md.getReturnType().getSafeSymbol()+" ");
603 //catch the constructor case
604 headersout.print("void ");
605 headersout.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
607 boolean printcomma=false;
608 if (GENERATEPRECISEGC) {
609 headersout.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
613 //output parameter list
614 for(int i=0;i<objectparams.numPrimitives();i++) {
615 TempDescriptor temp=objectparams.getPrimitive(i);
617 headersout.print(", ");
619 if (temp.getType().isClass()||temp.getType().isArray())
620 headersout.print("struct " + temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
622 headersout.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
624 headersout.println(");\n");
629 /** This function outputs (1) structures that parameters are
630 * passed in (when PRECISE GC is enabled) and (2) function
631 * prototypes for the tasks */
633 private void generateTaskStructs(PrintWriter output, PrintWriter headersout) {
634 /* Cycle through tasks */
635 Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
637 while(taskit.hasNext()) {
638 /* Classify parameters */
639 TaskDescriptor task=(TaskDescriptor)taskit.next();
640 FlatMethod fm=state.getMethodFlat(task);
641 generateTempStructs(fm);
643 ParamsObject objectparams=(ParamsObject) paramstable.get(task);
644 TempObject objecttemps=(TempObject) tempstable.get(task);
646 /* Output parameter structure */
647 if (GENERATEPRECISEGC) {
648 output.println("struct "+task.getSafeSymbol()+"_params {");
650 output.println(" int type;");
651 output.println(" void * next;");
652 for(int i=0;i<objectparams.numPointers();i++) {
653 TempDescriptor temp=objectparams.getPointer(i);
654 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
656 output.println("};\n");
657 if (objectparams.numPointers()>maxtaskparams)
658 maxtaskparams=objectparams.numPointers();
661 /* Output temp structure */
662 if (GENERATEPRECISEGC) {
663 output.println("struct "+task.getSafeSymbol()+"_locals {");
664 output.println(" int type;");
665 output.println(" void * next;");
666 for(int i=0;i<objecttemps.numPointers();i++) {
667 TempDescriptor temp=objecttemps.getPointer(i);
668 if (temp.getType().isNull())
669 output.println(" void * "+temp.getSafeSymbol()+";");
671 output.println(" struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
673 output.println("};\n");
676 /* Output task declaration */
677 headersout.print("void " + task.getSafeSymbol()+"(");
679 boolean printcomma=false;
680 if (GENERATEPRECISEGC) {
681 headersout.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
683 headersout.print("void * parameterarray[]");
684 headersout.println(");\n");
688 /** Generate code for flatmethod fm. */
690 private void generateFlatMethod(FlatMethod fm, PrintWriter output) {
691 MethodDescriptor md=fm.getMethod();
692 TaskDescriptor task=fm.getTask();
694 ClassDescriptor cn=md!=null?md.getClassDesc():null;
696 ParamsObject objectparams=(ParamsObject)paramstable.get(md!=null?md:task);
698 generateHeader(md!=null?md:task,output);
702 if (GENERATEPRECISEGC) {
704 output.println(" struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+";");
706 output.println(" struct "+task.getSafeSymbol()+"_locals "+localsprefix+";");
708 TempObject objecttemp=(TempObject) tempstable.get(md!=null?md:task);
709 for(int i=0;i<objecttemp.numPrimitives();i++) {
710 TempDescriptor td=objecttemp.getPrimitive(i);
711 TypeDescriptor type=td.getType();
713 output.println(" void * "+td.getSafeSymbol()+";");
714 else if (type.isClass()||type.isArray())
715 output.println(" struct "+type.getSafeSymbol()+" * "+td.getSafeSymbol()+";");
717 output.println(" "+type.getSafeSymbol()+" "+td.getSafeSymbol()+";");
721 /* Generate labels first */
722 HashSet tovisit=new HashSet();
723 HashSet visited=new HashSet();
725 Hashtable nodetolabel=new Hashtable();
726 tovisit.add(fm.methodEntryNode());
727 FlatNode current_node=null;
730 //Node needs a label if it is
731 while(!tovisit.isEmpty()) {
732 FlatNode fn=(FlatNode)tovisit.iterator().next();
735 for(int i=0;i<fn.numNext();i++) {
736 FlatNode nn=fn.getNext(i);
739 nodetolabel.put(nn,new Integer(labelindex++));
741 if (!visited.contains(nn)&&!tovisit.contains(nn)) {
745 nodetolabel.put(nn,new Integer(labelindex++));
750 //Do the actual code generation
751 tovisit=new HashSet();
752 visited=new HashSet();
753 tovisit.add(fm.methodEntryNode());
754 while(current_node!=null||!tovisit.isEmpty()) {
755 if (current_node==null) {
756 current_node=(FlatNode)tovisit.iterator().next();
757 tovisit.remove(current_node);
759 visited.add(current_node);
760 if (nodetolabel.containsKey(current_node))
761 output.println("L"+nodetolabel.get(current_node)+":");
762 if (current_node.numNext()==0) {
764 generateFlatNode(fm, current_node, output);
765 if (current_node.kind()!=FKind.FlatReturnNode) {
766 output.println(" return;");
769 } else if(current_node.numNext()==1) {
771 generateFlatNode(fm, current_node, output);
772 FlatNode nextnode=current_node.getNext(0);
773 if (visited.contains(nextnode)) {
774 output.println("goto L"+nodetolabel.get(nextnode)+";");
777 current_node=nextnode;
778 } else if (current_node.numNext()==2) {
781 generateFlatCondBranch(fm, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
782 if (!visited.contains(current_node.getNext(1)))
783 tovisit.add(current_node.getNext(1));
784 if (visited.contains(current_node.getNext(0))) {
785 output.println("goto L"+nodetolabel.get(current_node.getNext(0))+";");
788 current_node=current_node.getNext(0);
789 } else throw new Error();
791 output.println("}\n\n");
794 /** Generate text string that corresponds to the Temp td. */
795 private String generateTemp(FlatMethod fm, TempDescriptor td) {
796 MethodDescriptor md=fm.getMethod();
797 TaskDescriptor task=fm.getTask();
798 TempObject objecttemps=(TempObject) tempstable.get(md!=null?md:task);
799 if (objecttemps.isLocalPrim(td)||objecttemps.isParamPrim(td)) {
800 return td.getSafeSymbol();
803 if (objecttemps.isLocalPtr(td)) {
804 return localsprefix+"."+td.getSafeSymbol();
807 if (objecttemps.isParamPtr(td)) {
808 return paramsprefix+"->"+td.getSafeSymbol();
813 private void generateFlatNode(FlatMethod fm, FlatNode fn, PrintWriter output) {
816 generateFlatCall(fm, (FlatCall) fn,output);
818 case FKind.FlatFieldNode:
819 generateFlatFieldNode(fm, (FlatFieldNode) fn,output);
821 case FKind.FlatElementNode:
822 generateFlatElementNode(fm, (FlatElementNode) fn,output);
824 case FKind.FlatSetElementNode:
825 generateFlatSetElementNode(fm, (FlatSetElementNode) fn,output);
827 case FKind.FlatSetFieldNode:
828 generateFlatSetFieldNode(fm, (FlatSetFieldNode) fn,output);
831 generateFlatNew(fm, (FlatNew) fn,output);
833 case FKind.FlatOpNode:
834 generateFlatOpNode(fm, (FlatOpNode) fn,output);
836 case FKind.FlatCastNode:
837 generateFlatCastNode(fm, (FlatCastNode) fn,output);
839 case FKind.FlatLiteralNode:
840 generateFlatLiteralNode(fm, (FlatLiteralNode) fn,output);
842 case FKind.FlatReturnNode:
843 generateFlatReturnNode(fm, (FlatReturnNode) fn,output);
846 output.println("/* nop */");
848 case FKind.FlatFlagActionNode:
849 generateFlatFlagActionNode(fm, (FlatFlagActionNode) fn, output);
856 private void generateFlatCall(FlatMethod fm, FlatCall fc, PrintWriter output) {
857 MethodDescriptor md=fc.getMethod();
858 ParamsObject objectparams=(ParamsObject) paramstable.get(md);
859 ClassDescriptor cn=md.getClassDesc();
861 if (GENERATEPRECISEGC) {
862 output.print(" struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
864 output.print(objectparams.getUID());
865 output.print(", & "+localsprefix);
866 if (fc.getThis()!=null) {
868 output.print(generateTemp(fm,fc.getThis()));
870 for(int i=0;i<fc.numArgs();i++) {
871 VarDescriptor var=md.getParameter(i);
872 TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
873 if (objectparams.isParamPtr(paramtemp)) {
874 TempDescriptor targ=fc.getArg(i);
876 output.print(generateTemp(fm, targ));
879 output.println("};");
884 if (fc.getReturnTemp()!=null)
885 output.print(generateTemp(fm,fc.getReturnTemp())+"=");
886 if (md.isStatic()||md.getReturnType()==null||singleCall(fc.getThis().getType().getClassDesc(),md)) {
887 output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
891 if (md.getReturnType().isClass()||md.getReturnType().isArray())
892 output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
894 output.print(md.getReturnType().getSafeSymbol()+" ");
895 output.print("(*)(");
897 boolean printcomma=false;
898 if (GENERATEPRECISEGC) {
899 output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * ");
904 for(int i=0;i<objectparams.numPrimitives();i++) {
905 TempDescriptor temp=objectparams.getPrimitive(i);
909 if (temp.getType().isClass()||temp.getType().isArray())
910 output.print("struct " + temp.getType().getSafeSymbol()+" * ");
912 output.print(temp.getType().getSafeSymbol());
915 output.print("))virtualtable["+generateTemp(fm,fc.getThis())+"->type*"+maxcount+"+"+virtualcalls.getMethodNumber(md)+"])");
919 boolean needcomma=false;
920 if (GENERATEPRECISEGC) {
921 output.print("&__parameterlist__");
924 if (fc.getThis()!=null) {
925 output.print(generateTemp(fm,fc.getThis()));
929 for(int i=0;i<fc.numArgs();i++) {
930 VarDescriptor var=md.getParameter(i);
931 TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
932 if (objectparams.isParamPrim(paramtemp)) {
933 TempDescriptor targ=fc.getArg(i);
936 output.print(generateTemp(fm, targ));
940 output.println(");");
941 output.println(" }");
944 private boolean singleCall(ClassDescriptor thiscd, MethodDescriptor md) {
945 Set subclasses=typeutil.getSubClasses(thiscd);
946 if (subclasses==null)
948 for(Iterator classit=subclasses.iterator();classit.hasNext();) {
949 ClassDescriptor cd=(ClassDescriptor)classit.next();
950 Set possiblematches=cd.getMethodTable().getSet(md.getSymbol());
951 for(Iterator matchit=possiblematches.iterator();matchit.hasNext();) {
952 MethodDescriptor matchmd=(MethodDescriptor)matchit.next();
953 if (md.matches(matchmd))
960 private void generateFlatFieldNode(FlatMethod fm, FlatFieldNode ffn, PrintWriter output) {
961 output.println(generateTemp(fm, ffn.getDst())+"="+ generateTemp(fm,ffn.getSrc())+"->"+ ffn.getField().getSafeSymbol()+";");
964 private void generateFlatSetFieldNode(FlatMethod fm, FlatSetFieldNode fsfn, PrintWriter output) {
965 if (fsfn.getField().getSymbol().equals("length")&&fsfn.getDst().getType().isArray())
966 throw new Error("Can't set array length");
967 output.println(generateTemp(fm, fsfn.getDst())+"->"+ fsfn.getField().getSafeSymbol()+"="+ generateTemp(fm,fsfn.getSrc())+";");
970 private void generateFlatElementNode(FlatMethod fm, FlatElementNode fen, PrintWriter output) {
971 TypeDescriptor elementtype=fen.getSrc().getType().dereference();
974 if (elementtype.isArray()||elementtype.isClass())
977 type=elementtype.getSafeSymbol()+" ";
979 if (fen.needsBoundsCheck()) {
980 output.println("if ("+generateTemp(fm, fen.getIndex())+"< 0 || "+generateTemp(fm, fen.getIndex())+" >= "+generateTemp(fm,fen.getSrc()) + "->___length___)");
981 output.println("failedboundschk();");
984 output.println(generateTemp(fm, fen.getDst())+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc())+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex())+"];");
987 private void generateFlatSetElementNode(FlatMethod fm, FlatSetElementNode fsen, PrintWriter output) {
988 //TODO: need dynamic check to make sure this assignment is actually legal
989 //Because Object[] could actually be something more specific...ie. Integer[]
991 TypeDescriptor elementtype=fsen.getDst().getType().dereference();
994 if (elementtype.isArray()||elementtype.isClass())
997 type=elementtype.getSafeSymbol()+" ";
999 if (fsen.needsBoundsCheck()) {
1000 output.println("if ("+generateTemp(fm, fsen.getIndex())+"< 0 || "+generateTemp(fm, fsen.getIndex())+" >= "+generateTemp(fm,fsen.getDst()) + "->___length___)");
1001 output.println("failedboundschk();");
1004 output.println("(("+type +"*)(((char *) &("+ generateTemp(fm,fsen.getDst())+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex())+"]="+generateTemp(fm,fsen.getSrc())+";");
1007 private void generateFlatNew(FlatMethod fm, FlatNew fn, PrintWriter output) {
1008 if (fn.getType().isArray()) {
1009 int arrayid=state.getArrayNumber(fn.getType())+state.numClasses();
1010 output.println(generateTemp(fm,fn.getDst())+"=allocate_newarray("+arrayid+", "+generateTemp(fm, fn.getSize())+");");
1012 output.println(generateTemp(fm,fn.getDst())+"=allocate_new("+fn.getType().getClassDesc().getId()+");");
1015 private void generateFlatOpNode(FlatMethod fm, FlatOpNode fon, PrintWriter output) {
1017 if (fon.getRight()!=null)
1018 output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+fon.getOp().toString()+generateTemp(fm,fon.getRight())+";");
1019 else if (fon.getOp().getOp()==Operation.ASSIGN)
1020 output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+";");
1021 else if (fon.getOp().getOp()==Operation.UNARYPLUS)
1022 output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+";");
1023 else if (fon.getOp().getOp()==Operation.UNARYMINUS)
1024 output.println(generateTemp(fm, fon.getDest())+" = -"+generateTemp(fm, fon.getLeft())+";");
1025 else if (fon.getOp().getOp()==Operation.LOGIC_NOT)
1026 output.println(generateTemp(fm, fon.getDest())+" = !"+generateTemp(fm, fon.getLeft())+";");
1028 output.println(generateTemp(fm, fon.getDest())+fon.getOp().toString()+generateTemp(fm, fon.getLeft())+";");
1031 private void generateFlatCastNode(FlatMethod fm, FlatCastNode fcn, PrintWriter output) {
1032 /* TODO: Do type check here */
1033 output.println(generateTemp(fm,fcn.getDst())+"=("+fcn.getType().getSafeSymbol()+")"+generateTemp(fm,fcn.getSrc())+";");
1036 private void generateFlatLiteralNode(FlatMethod fm, FlatLiteralNode fln, PrintWriter output) {
1037 if (fln.getValue()==null)
1038 output.println(generateTemp(fm, fln.getDst())+"=0;");
1039 else if (fln.getType().getSymbol().equals(TypeUtil.StringClass))
1040 output.println(generateTemp(fm, fln.getDst())+"=NewString(\""+FlatLiteralNode.escapeString((String)fln.getValue())+"\","+((String)fln.getValue()).length()+");");
1041 else if (fln.getType().isBoolean()) {
1042 if (((Boolean)fln.getValue()).booleanValue())
1043 output.println(generateTemp(fm, fln.getDst())+"=1;");
1045 output.println(generateTemp(fm, fln.getDst())+"=0;");
1046 } else if (fln.getType().isChar()) {
1047 output.println(generateTemp(fm, fln.getDst())+"='"+fln.getValue()+"';");
1049 output.println(generateTemp(fm, fln.getDst())+"="+fln.getValue()+";");
1052 private void generateFlatReturnNode(FlatMethod fm, FlatReturnNode frn, PrintWriter output) {
1053 if (frn.getReturnTemp()!=null)
1054 output.println("return "+generateTemp(fm, frn.getReturnTemp())+";");
1056 output.println("return;");
1059 private void generateFlatCondBranch(FlatMethod fm, FlatCondBranch fcb, String label, PrintWriter output) {
1060 output.println("if (!"+generateTemp(fm, fcb.getTest())+") goto "+label+";");
1063 private void generateHeader(Descriptor des, PrintWriter output) {
1065 ParamsObject objectparams=(ParamsObject)paramstable.get(des);
1066 MethodDescriptor md=null;
1067 TaskDescriptor task=null;
1068 if (des instanceof MethodDescriptor)
1069 md=(MethodDescriptor) des;
1071 task=(TaskDescriptor) des;
1073 ClassDescriptor cn=md!=null?md.getClassDesc():null;
1075 if (md!=null&&md.getReturnType()!=null) {
1076 if (md.getReturnType().isClass()||md.getReturnType().isArray())
1077 output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
1079 output.print(md.getReturnType().getSafeSymbol()+" ");
1081 //catch the constructor case
1082 output.print("void ");
1084 output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1086 output.print(task.getSafeSymbol()+"(");
1088 boolean printcomma=false;
1089 if (GENERATEPRECISEGC) {
1091 output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1093 output.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
1098 for(int i=0;i<objectparams.numPrimitives();i++) {
1099 TempDescriptor temp=objectparams.getPrimitive(i);
1103 if (temp.getType().isClass()||temp.getType().isArray())
1104 output.print("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
1106 output.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
1108 output.println(") {");
1109 } else if (!GENERATEPRECISEGC) {
1110 output.println("void * parameterarray[]) {");
1111 for(int i=0;i<objectparams.numPrimitives();i++) {
1112 TempDescriptor temp=objectparams.getPrimitive(i);
1113 output.println("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+"=parameterarray["+i+"];");
1115 if (objectparams.numPrimitives()>maxtaskparams)
1116 maxtaskparams=objectparams.numPrimitives();
1117 } else output.println(" {");
1120 public void generateFlatFlagActionNode(FlatMethod fm, FlatFlagActionNode ffan, PrintWriter output) {
1121 output.println("/* FlatFlagActionNode */");
1122 Hashtable flagandtable=new Hashtable();
1123 Hashtable flagortable=new Hashtable();
1126 Iterator flagsit=ffan.getTempFlagPairs();
1127 while(flagsit.hasNext()) {
1128 TempFlagPair tfp=(TempFlagPair)flagsit.next();
1129 TempDescriptor temp=tfp.getTemp();
1130 Hashtable flagtable=(Hashtable)flagorder.get(temp.getType().getClassDesc());
1131 FlagDescriptor flag=tfp.getFlag();
1132 int flagid=1<<((Integer)flagtable.get(flag)).intValue();
1133 boolean flagstatus=ffan.getFlagChange(tfp);
1136 if (flagortable.containsKey(temp)) {
1137 mask=((Integer)flagortable.get(temp)).intValue();
1140 flagortable.put(temp,new Integer(mask));
1142 int mask=0xFFFFFFFF;
1143 if (flagandtable.containsKey(temp)) {
1144 mask=((Integer)flagandtable.get(temp)).intValue();
1146 mask&=(0xFFFFFFFF^flagid);
1147 flagandtable.put(temp,new Integer(mask));
1150 Iterator orit=flagortable.keySet().iterator();
1151 while(orit.hasNext()) {
1152 TempDescriptor temp=(TempDescriptor)orit.next();
1153 int ormask=((Integer)flagortable.get(temp)).intValue();
1154 int andmask=0xFFFFFFF;
1155 if (flagandtable.containsKey(temp))
1156 andmask=((Integer)flagandtable.get(temp)).intValue();
1157 output.println("flagorand("+generateTemp(fm, temp)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
1159 Iterator andit=flagandtable.keySet().iterator();
1160 while(andit.hasNext()) {
1161 TempDescriptor temp=(TempDescriptor)andit.next();
1162 int andmask=((Integer)flagandtable.get(temp)).intValue();
1163 if (!flagortable.containsKey(temp))
1164 output.println("flagorand("+generateTemp(fm, temp)+", 0, 0x"+Integer.toHexString(andmask)+");");