Robust/src/IR/Flat/BuildCode.java

   1 package IR.Flat;
   2 import IR.Tree.Modifiers;
   3 import IR.Tree.FlagExpressionNode;
   4 import IR.Tree.DNFFlag;
   5 import IR.Tree.DNFFlagAtom;
   6 import IR.Tree.TagExpressionList;
   7 import IR.Tree.OffsetNode;
   8 import IR.*;
   9
  10 import java.util.*;
  11 import java.io.*;
  12
  13 import Util.Relation;
  14 import Analysis.TaskStateAnalysis.FlagState;
  15 import Analysis.TaskStateAnalysis.FlagComparator;
  16 import Analysis.TaskStateAnalysis.OptionalTaskDescriptor;
  17 import Analysis.TaskStateAnalysis.Predicate;
  18 import Analysis.TaskStateAnalysis.SafetyAnalysis;
  19 import Analysis.TaskStateAnalysis.TaskIndex;
  20 import Analysis.CallGraph.CallGraph;
  21 import Analysis.Loops.GlobalFieldType;
  22 import Util.CodePrinter;
  23
  24 public class BuildCode {
  25   State state;
  26   Hashtable temptovar;
  27   Hashtable paramstable;
  28   Hashtable tempstable;
  29   Hashtable fieldorder;
  30   Hashtable flagorder;
  31   int tag=0;
  32   String localsprefix="___locals___";
  33   String localsprefixaddr="&"+localsprefix;
  34   String localsprefixderef=localsprefix+".";
  35   String fcrevert="___fcrevert___";
  36   String paramsprefix="___params___";
  37   String nextobjstr="___nextobject___";
  38   String localcopystr="___localcopy___";
  39   public static boolean GENERATEPRECISEGC=false;
  40   public static String PREFIX="";
  41   public static String arraytype="ArrayObject";
  42   public static int flagcount = 0;
  43   Virtual virtualcalls;
  44   TypeUtil typeutil;
  45   protected int maxtaskparams=0;
  46   protected int maxcount=0;
  47   ClassDescriptor[] cdarray;
  48   ClassDescriptor[] ifarray;
  49   TypeDescriptor[] arraytable;
  50   SafetyAnalysis sa;
  51   CallGraph callgraph;
  52   Hashtable<String, ClassDescriptor> printedfieldstbl;
  53   int globaldefscount=0;
  54   boolean mgcstaticinit = false;
  55
  56   int boundschknum = 0;
  57
  58   public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, CallGraph callgraph) {
  59     this(st, temptovar, typeutil, null, callgraph);
  60   }
  61
  62   public BuildCode(State st, Hashtable temptovar, TypeUtil typeutil, SafetyAnalysis sa, CallGraph callgraph) {
  63     this.sa=sa;
  64     state=st;
  65     this.callgraph=callgraph;
  66     this.temptovar=temptovar;
  67     paramstable=new Hashtable();
  68     tempstable=new Hashtable();
  69     fieldorder=new Hashtable();
  70     flagorder=new Hashtable();
  71     this.typeutil=typeutil;
  72     State.logEvent("Virtual");
  73     virtualcalls=new Virtual(state, null, callgraph);
  74     printedfieldstbl = new Hashtable<String, ClassDescriptor>();
  75   }
  76
  77   /** The buildCode method outputs C code for all the methods.  The Flat
  78    * versions of the methods must already be generated and stored in
  79    * the State object. */
  80
  81
  82   public void buildCode() {
  83     /* Create output streams to write to */
  84     PrintWriter outclassdefs=null;
  85     PrintWriter outstructs=null;
  86     PrintWriter outrepairstructs=null;
  87     PrintWriter outmethodheader=null;
  88     PrintWriter outmethod=null;
  89     PrintWriter outvirtual=null;
  90     PrintWriter outtask=null;
  91     PrintWriter outtaskdefs=null;
  92     PrintWriter outoptionalarrays=null;
  93     PrintWriter optionalheaders=null;
  94     PrintWriter outglobaldefs=null;
  95     PrintWriter outglobaldefsprim=null;
  96     State.logEvent("Beginning of buildCode");
  97
  98     try {
  99       buildCodeSetup(); //EXTENSION POINT
 100       outstructs=new CodePrinter(new FileOutputStream(PREFIX+"structdefs.h"), true);
 101       outmethodheader=new CodePrinter(new FileOutputStream(PREFIX+"methodheaders.h"), true);
 102       outclassdefs=new CodePrinter(new FileOutputStream(PREFIX+"classdefs.h"), true);
 103       outglobaldefs=new CodePrinter(new FileOutputStream(PREFIX+"globaldefs.h"), true);
 104       outglobaldefsprim=new CodePrinter(new FileOutputStream(PREFIX+"globaldefsprim.h"), true);
 105       outmethod=new CodePrinter(new FileOutputStream(PREFIX+"methods.c"), true);
 106       outvirtual=new CodePrinter(new FileOutputStream(PREFIX+"virtualtable.h"), true);
 107       if (state.TASK) {
 108         outtask=new CodePrinter(new FileOutputStream(PREFIX+"task.h"), true);
 109         outtaskdefs=new CodePrinter(new FileOutputStream(PREFIX+"taskdefs.c"), true);
 110         if (state.OPTIONAL) {
 111           outoptionalarrays=new CodePrinter(new FileOutputStream(PREFIX+"optionalarrays.c"), true);
 112           optionalheaders=new CodePrinter(new FileOutputStream(PREFIX+"optionalstruct.h"), true);
 113         }
 114       }
 115       if (state.structfile!=null) {
 116         outrepairstructs=new CodePrinter(new FileOutputStream(PREFIX+state.structfile+".struct"), true);
 117       }
 118     } catch (Exception e) {
 119       e.printStackTrace();
 120       System.exit(-1);
 121     }
 122
 123     /* Fix field safe symbols due to shadowing */
 124     FieldShadow.handleFieldShadow(state);
 125
 126     /* Build the virtual dispatch tables */
 127     buildVirtualTables(outvirtual);
 128
 129     /* Tag the methods that are invoked by static blocks */
 130     tagMethodInvokedByStaticBlock();
 131
 132     /* Output includes */
 133     outmethodheader.println("#ifndef METHODHEADERS_H");
 134     outmethodheader.println("#define METHODHEADERS_H");
 135     outmethodheader.println("#include \"structdefs.h\"");
 136
 137     if (state.EVENTMONITOR) {
 138       outmethodheader.println("#include \"monitor.h\"");
 139     }
 140
 141     additionalIncludesMethodsHeader(outmethodheader);
 142
 143     /* Output Structures */
 144     outputStructs(outstructs);
 145
 146     // Output the C class declarations
 147     // These could mutually reference each other
 148
 149     outglobaldefs.println("#ifndef __GLOBALDEF_H_");
 150     outglobaldefs.println("#define __GLOBALDEF_H_");
 151     outglobaldefs.println("");
 152     outglobaldefs.println("struct global_defs_t {");
 153     outglobaldefs.println("  int size;");
 154     outglobaldefs.println("  void * next;");
 155     outglobaldefsprim.println("#ifndef __GLOBALDEFPRIM_H_");
 156     outglobaldefsprim.println("#define __GLOBALDEFPRIM_H_");
 157     outglobaldefsprim.println("");
 158     outglobaldefsprim.println("struct global_defsprim_t {");
 159
 160     outclassdefs.println("#ifndef __CLASSDEF_H_");
 161     outclassdefs.println("#define __CLASSDEF_H_");
 162     outputClassDeclarations(outclassdefs, outglobaldefs, outglobaldefsprim);
 163
 164     // Output function prototypes and structures for parameters
 165     Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
 166     while(it.hasNext()) {
 167       ClassDescriptor cn=(ClassDescriptor)it.next();
 168       generateCallStructs(cn, outclassdefs, outstructs, outmethodheader, outglobaldefs, outglobaldefsprim);
 169     }
 170     outclassdefs.println("#include \"globaldefs.h\"");
 171     outclassdefs.println("#include \"globaldefsprim.h\"");
 172     outclassdefs.println("#endif");
 173     outclassdefs.close();
 174
 175     outglobaldefs.println("};");
 176     outglobaldefs.println("");
 177     outglobaldefs.println("extern struct global_defs_t * global_defs_p;");
 178     outglobaldefs.println("#endif");
 179     outglobaldefs.flush();
 180     outglobaldefs.close();
 181
 182     outglobaldefsprim.println("};");
 183     outglobaldefsprim.println("");
 184     outglobaldefsprim.println("extern struct global_defsprim_t * global_defsprim_p;");
 185     outglobaldefsprim.println("#endif");
 186     outglobaldefsprim.flush();
 187     outglobaldefsprim.close();
 188
 189     if (state.TASK) {
 190       /* Map flags to integers */
 191       /* The runtime keeps track of flags using these integers */
 192       it=state.getClassSymbolTable().getDescriptorsIterator();
 193       while(it.hasNext()) {
 194         ClassDescriptor cn=(ClassDescriptor)it.next();
 195         mapFlags(cn);
 196       }
 197       /* Generate Tasks */
 198       generateTaskStructs(outstructs, outmethodheader);
 199
 200       /* Outputs generic task structures if this is a task
 201          program */
 202       outputTaskTypes(outtask);
 203     }
 204
 205
 206     // an opportunity for subclasses to do extra
 207     // initialization
 208     preCodeGenInitialization();
 209
 210     State.logEvent("Start outputMethods");
 211     /* Build the actual methods */
 212     outputMethods(outmethod);
 213     State.logEvent("End outputMethods");
 214
 215     // opportunity for subclasses to gen extra code
 216     additionalCodeGen(outmethodheader,
 217                       outstructs,
 218                       outmethod);
 219
 220
 221     if (state.TASK) {
 222       /* Output code for tasks */
 223       outputTaskCode(outtaskdefs, outmethod);
 224       outtaskdefs.close();
 225       /* Record maximum number of task parameters */
 226       outstructs.println("#define MAXTASKPARAMS "+maxtaskparams);
 227     } else if (state.main!=null) {
 228       /* Generate main method */
 229       outputMainMethod(outmethod);
 230     }
 231
 232     /* Generate information for task with optional parameters */
 233     if (state.TASK&&state.OPTIONAL) {
 234       generateOptionalArrays(outoptionalarrays, optionalheaders, state.getAnalysisResult(), state.getOptionalTaskDescriptors());
 235       outoptionalarrays.close();
 236     }
 237
 238     /* Output structure definitions for repair tool */
 239     if (state.structfile!=null) {
 240       buildRepairStructs(outrepairstructs);
 241       outrepairstructs.close();
 242     }
 243
 244     /* Close files */
 245     outmethodheader.println("#endif");
 246     outmethodheader.close();
 247     outmethod.close();
 248     outstructs.println("#endif");
 249     outstructs.close();
 250
 251
 252
 253     postCodeGenCleanUp();
 254     State.logEvent("End of buildCode");
 255   }
 256
 257   /* This method goes though the call graph and tag those methods that are
 258    * invoked inside static blocks
 259    */
 260   protected void tagMethodInvokedByStaticBlock() {
 261     Iterator it_sclasses = this.state.getSClassSymbolTable().getDescriptorsIterator();
 262     MethodDescriptor current_md=null;
 263     HashSet tovisit=new HashSet();
 264     HashSet visited=new HashSet();
 265
 266     while(it_sclasses.hasNext()) {
 267       ClassDescriptor cd = (ClassDescriptor)it_sclasses.next();
 268       MethodDescriptor md = (MethodDescriptor)cd.getMethodTable().get("staticblocks");
 269       if(md != null) {
 270         tovisit.add(md);
 271       }
 272     }
 273
 274     while(!tovisit.isEmpty()) {
 275       current_md=(MethodDescriptor)tovisit.iterator().next();
 276       tovisit.remove(current_md);
 277       visited.add(current_md);
 278       Iterator it_callee = this.callgraph.getCalleeSet(current_md).iterator();
 279       while(it_callee.hasNext()) {
 280         Descriptor d = (Descriptor)it_callee.next();
 281         if(d instanceof MethodDescriptor) {
 282           if(!visited.contains(d)) {
 283             ((MethodDescriptor)d).setIsInvokedByStatic(true);
 284             tovisit.add(d);
 285           }
 286         }
 287       }
 288     }
 289   }
 290
 291   /* This code generates code for each static block and static field
 292    * initialization.*/
 293   protected void outputStaticBlocks(PrintWriter outmethod) {
 294     //  execute all the static blocks and all the static field initializations
 295     // execute all the static blocks and all the static field initializations
 296     SymbolTable sctbl = this.state.getSClassSymbolTable();
 297     Iterator it_sclasses = sctbl.getDescriptorsIterator();
 298     if(it_sclasses.hasNext()) {
 299       while(it_sclasses.hasNext()) {
 300         ClassDescriptor t_cd = (ClassDescriptor)it_sclasses.next();
 301         MethodDescriptor t_md = (MethodDescriptor)t_cd.getMethodTable().get("staticblocks");
 302         if(t_md != null) {
 303           outmethod.println("   {");
 304           if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
 305             outmethod.print("       struct "+t_cd.getSafeSymbol()+t_md.getSafeSymbol()+"_"+t_md.getSafeMethodDescriptor()+"_params __parameterlist__={");
 306             outmethod.println("0, NULL};");
 307             outmethod.println("     "+t_cd.getSafeSymbol()+t_md.getSafeSymbol()+"_"+t_md.getSafeMethodDescriptor()+"(& __parameterlist__);");
 308           } else {
 309             outmethod.println("     "+t_cd.getSafeSymbol()+t_md.getSafeSymbol()+"_"+t_md.getSafeMethodDescriptor()+"();");
 310           }
 311           outmethod.println("   }");
 312         }
 313       }
 314     }
 315   }
 316
 317   /* This code generates code to create a Class object for each class for
 318    * getClass() method.
 319    * */
 320   protected void outputClassObjects(PrintWriter outmethod) {
 321     // for each class, initialize its Class object
 322     SymbolTable ctbl = this.state.getClassSymbolTable();
 323     for(Iterator it_classes = ctbl.getDescriptorsIterator();it_classes.hasNext();) {
 324       ClassDescriptor t_cd = (ClassDescriptor)it_classes.next();
 325       outmethod.println(" {");
 326       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
 327         outmethod.println("    struct garbagelist dummy={0,NULL};");
 328         outmethod.println("    global_defs_p->"+t_cd.getSafeSymbol()+"classobj = allocate_new(&dummy, " + typeutil.getClass(TypeUtil.ObjectClass).getId() + ");");
 329       } else
 330         outmethod.println("    global_defs_p->"+t_cd.getSafeSymbol()+"classobj = allocate_new("+typeutil.getClass(TypeUtil.ObjectClass).getId() + ");");
 331       outmethod.println(" }");
 332     }
 333   }
 334
 335   /* This code just generates the main C method for java programs.
 336    * The main C method packs up the arguments into a string array
 337    * and passes it to the java main method. */
 338
 339   protected void outputMainMethod(PrintWriter outmethod) {
 340     outmethod.println("int main(int argc, const char *argv[]) {");
 341     outmethod.println("  int i;");
 342     outmethod.println("  global_defs_p=calloc(1, sizeof(struct global_defs_t));");
 343     outmethod.println("  global_defsprim_p=calloc(1, sizeof(struct global_defsprim_t));");
 344     if (GENERATEPRECISEGC) {
 345       outmethod.println("  global_defs_p->size="+globaldefscount+";");
 346       outmethod.println("  for(i=0;i<"+globaldefscount+";i++) {");
 347       outmethod.println("    ((struct garbagelist *)global_defs_p)->array[i]=NULL;");
 348       outmethod.println("  }");
 349     }
 350     outputStaticBlocks(outmethod);
 351     outputClassObjects(outmethod);
 352
 353
 354     additionalCodeAtTopOfMain(outmethod);
 355
 356     if (state.THREAD) {
 357       outmethod.println("initializethreads();");
 358     }
 359
 360     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
 361       outmethod.println("  struct ArrayObject * stringarray=allocate_newarray(NULL, STRINGARRAYTYPE, argc-1);");
 362     } else {
 363       outmethod.println("  struct ArrayObject * stringarray=allocate_newarray(STRINGARRAYTYPE, argc-1);");
 364     }
 365     outmethod.println("  for(i=1;i<argc;i++) {");
 366     outmethod.println("    int length=strlen(argv[i]);");
 367
 368     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
 369       outmethod.println("    struct ___String___ *newstring=NewString(NULL, argv[i], length);");
 370     } else {
 371       outmethod.println("    struct ___String___ *newstring=NewString(argv[i], length);");
 372     }
 373     outmethod.println("    ((void **)(((char *)& stringarray->___length___)+sizeof(int)))[i-1]=newstring;");
 374     outmethod.println("  }");
 375
 376     MethodDescriptor md=typeutil.getMain();
 377     ClassDescriptor cd=typeutil.getMainClass();
 378
 379     outmethod.println("   {");
 380     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
 381       outmethod.print("       struct "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
 382       outmethod.println("1, NULL,"+"stringarray};");
 383       outmethod.println("     "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(& __parameterlist__);");
 384     } else {
 385       outmethod.println("     "+cd.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(stringarray);");
 386     }
 387     outmethod.println("   }");
 388
 389     if (state.THREAD) {
 390       outmethod.println("pthread_mutex_lock(&gclistlock);");
 391       outmethod.println("threadcount--;");
 392       outmethod.println("pthread_cond_signal(&gccond);");
 393       outmethod.println("pthread_mutex_unlock(&gclistlock);");
 394     }
 395
 396     if (state.EVENTMONITOR) {
 397       outmethod.println("dumpdata();");
 398     }
 399
 400     if (state.THREAD)
 401       outmethod.println("pthread_exit(NULL);");
 402
 403
 404     additionalCodeAtBottomOfMain(outmethod);
 405
 406     outmethod.println("}");
 407   }
 408
 409   /* This method outputs code for each task. */
 410
 411   protected void outputTaskCode(PrintWriter outtaskdefs, PrintWriter outmethod) {
 412     /* Compile task based program */
 413     outtaskdefs.println("#include \"task.h\"");
 414     outtaskdefs.println("#include \"methodheaders.h\"");
 415     Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
 416     while(taskit.hasNext()) {
 417       TaskDescriptor td=(TaskDescriptor)taskit.next();
 418       FlatMethod fm=state.getMethodFlat(td);
 419
 420       generateFlatMethod(fm, outmethod);
 421       generateTaskDescriptor(outtaskdefs, fm, td);
 422     }
 423
 424     //Output task descriptors
 425     taskit=state.getTaskSymbolTable().getDescriptorsIterator();
 426     outtaskdefs.println("struct taskdescriptor * taskarray[]= {");
 427     boolean first=true;
 428     while(taskit.hasNext()) {
 429       TaskDescriptor td=(TaskDescriptor)taskit.next();
 430       if (first)
 431         first=false;
 432       else
 433         outtaskdefs.println(",");
 434       outtaskdefs.print("&task_"+td.getSafeSymbol());
 435     }
 436     outtaskdefs.println("};");
 437
 438     outtaskdefs.println("int numtasks="+state.getTaskSymbolTable().getValueSet().size()+";");
 439   }
 440
 441
 442   /* This method outputs most of the methods.c file.  This includes
 443    * some standard includes and then an array with the sizes of
 444    * objets and array that stores supertype and then the code for
 445    * the Java methods.. */
 446   protected void outputMethods(PrintWriter outmethod) {
 447     outmethod.println("#include \"methodheaders.h\"");
 448     outmethod.println("#include \"virtualtable.h\"");
 449     outmethod.println("#include \"runtime.h\"");
 450
 451     // always include: compiler directives will leave out
 452     // instrumentation when option is not set
 453         if(!state.MULTICORE) {
 454     outmethod.println("#include \"coreprof/coreprof.h\"");
 455         }
 456
 457     if (state.FASTCHECK) {
 458       outmethod.println("#include \"localobjects.h\"");
 459     }
 460     if(state.MULTICORE) {
 461       if(state.TASK) {
 462         outmethod.println("#include \"task.h\"");
 463       }
 464       outmethod.println("#include \"multicoreruntime.h\"");
 465       outmethod.println("#include \"runtime_arch.h\"");
 466     }
 467     if (state.THREAD||state.DSM||state.SINGLETM) {
 468       outmethod.println("#include <thread.h>");
 469     }
 470     if(state.MGC) {
 471       outmethod.println("#include \"thread.h\"");
 472     }
 473     if (state.main!=null) {
 474       outmethod.println("#include <string.h>");
 475     }
 476     if (state.CONSCHECK) {
 477       outmethod.println("#include \"checkers.h\"");
 478     }
 479
 480
 481     additionalIncludesMethodsImplementation(outmethod);
 482
 483     outmethod.println("struct global_defs_t * global_defs_p;");
 484     outmethod.println("struct global_defsprim_t * global_defsprim_p;");
 485     //Store the sizes of classes & array elements
 486     generateSizeArray(outmethod);
 487
 488     //Store table of supertypes
 489     generateSuperTypeTable(outmethod);
 490
 491     //Store the layout of classes
 492     generateLayoutStructs(outmethod);
 493
 494
 495     additionalCodeAtTopMethodsImplementation(outmethod);
 496
 497     generateMethods(outmethod);
 498   }
 499
 500   protected void generateMethods(PrintWriter outmethod) {
 501     /* Generate code for methods */
 502     Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
 503     while(classit.hasNext()) {
 504       ClassDescriptor cn=(ClassDescriptor)classit.next();
 505       Iterator methodit=cn.getMethods();
 506       while(methodit.hasNext()) {
 507         /* Classify parameters */
 508         MethodDescriptor md=(MethodDescriptor)methodit.next();
 509         if (!callgraph.isCallable(md)) {
 510           continue;
 511         }
 512
 513         FlatMethod fm=state.getMethodFlat(md);
 514         if (!md.getModifiers().isNative()) {
 515           generateFlatMethod(fm, outmethod);
 516         }
 517       }
 518     }
 519   }
 520
 521   protected void outputStructs(PrintWriter outstructs) {
 522     outstructs.println("#ifndef STRUCTDEFS_H");
 523     outstructs.println("#define STRUCTDEFS_H");
 524     outstructs.println("#include \"classdefs.h\"");
 525     outstructs.println("#ifndef INTPTR");
 526     outstructs.println("#ifdef BIT64");
 527     outstructs.println("#define INTPTR long");
 528     outstructs.println("#else");
 529     outstructs.println("#define INTPTR int");
 530     outstructs.println("#endif");
 531     outstructs.println("#endif");
 532
 533
 534     additionalIncludesStructsHeader(outstructs);
 535
 536
 537     /* Output #defines that the runtime uses to determine type
 538      * numbers for various objects it needs */
 539     outstructs.println("#define MAXCOUNT "+maxcount);
 540
 541     outstructs.println("#define STRINGARRAYTYPE "+
 542                        (state.getArrayNumber(
 543                           (new TypeDescriptor(typeutil.getClass(TypeUtil.StringClass))).makeArray(state))+state.numClasses()));
 544
 545     outstructs.println("#define OBJECTARRAYTYPE "+
 546                        (state.getArrayNumber(
 547                           (new TypeDescriptor(typeutil.getClass(TypeUtil.ObjectClass))).makeArray(state))+state.numClasses()));
 548
 549
 550     outstructs.println("#define STRINGTYPE "+typeutil.getClass(TypeUtil.StringClass).getId());
 551     outstructs.println("#define OBJECTTYPE "+typeutil.getClass(TypeUtil.ObjectClass).getId());
 552     outstructs.println("#define CHARARRAYTYPE "+
 553                        (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.CHAR)).makeArray(state))+state.numClasses()));
 554
 555     outstructs.println("#define BYTEARRAYTYPE "+
 556                        (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.BYTE)).makeArray(state))+state.numClasses()));
 557
 558     outstructs.println("#define BYTEARRAYARRAYTYPE "+
 559                        (state.getArrayNumber((new TypeDescriptor(TypeDescriptor.BYTE)).makeArray(state).makeArray(state))+state.numClasses()));
 560
 561     outstructs.println("#define NUMCLASSES "+state.numClasses());
 562     int totalClassSize = state.numClasses() + state.numArrays() + state.numInterfaces();
 563     outstructs.println("#define TOTALNUMCLASSANDARRAY "+ totalClassSize);
 564     if (state.TASK) {
 565       outstructs.println("#define STARTUPTYPE "+typeutil.getClass(TypeUtil.StartupClass).getId());
 566       outstructs.println("#define TAGTYPE "+typeutil.getClass(TypeUtil.TagClass).getId());
 567       outstructs.println("#define TAGARRAYTYPE "+
 568                          (state.getArrayNumber(new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass)).makeArray(state))+state.numClasses()));
 569     }
 570   }
 571
 572   protected void outputClassDeclarations(PrintWriter outclassdefs, PrintWriter outglobaldefs, PrintWriter outglobaldefsprim) {
 573     if (state.THREAD||state.DSM||state.SINGLETM)
 574       outclassdefs.println("#include <pthread.h>");
 575     outclassdefs.println("#ifndef INTPTR");
 576     outclassdefs.println("#ifdef BIT64");
 577     outclassdefs.println("#define INTPTR long");
 578     outclassdefs.println("#else");
 579     outclassdefs.println("#define INTPTR int");
 580     outclassdefs.println("#endif");
 581     outclassdefs.println("#endif");
 582     if(state.OPTIONAL)
 583       outclassdefs.println("#include \"optionalstruct.h\"");
 584     outclassdefs.println("struct "+arraytype+";");
 585     /* Start by declaring all structs */
 586     Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
 587     while(it.hasNext()) {
 588       ClassDescriptor cn=(ClassDescriptor)it.next();
 589       outclassdefs.println("struct "+cn.getSafeSymbol()+";");
 590
 591       if((cn.getNumStaticFields() != 0) || (cn.getNumStaticBlocks() != 0)) {
 592         // this class has static fields/blocks, need to add a global flag to
 593         // indicate if its static fields have been initialized and/or if its
 594         // static blocks have been executed
 595         outglobaldefsprim.println("  int "+cn.getSafeSymbol()+"static_block_exe_flag;");
 596       }
 597
 598       // for each class, create a global object
 599       outglobaldefs.println("  struct ___Object___ *"+cn.getSafeSymbol()+"classobj;");
 600       globaldefscount++;
 601     }
 602     outclassdefs.println("");
 603     //Print out definition for array type
 604     outclassdefs.println("struct "+arraytype+" {");
 605     outclassdefs.println("  int type;");
 606
 607
 608     additionalClassObjectFields(outclassdefs);
 609
 610
 611     if (state.EVENTMONITOR) {
 612       outclassdefs.println("  int objuid;");
 613     }
 614     if (state.THREAD) {
 615       outclassdefs.println("  pthread_t tid;");
 616       outclassdefs.println("  volatile int lockcount;");
 617       outclassdefs.println("  volatile int notifycount;");
 618     }
 619     if(state.MGC) {
 620       outclassdefs.println("  int mutex;");
 621       outclassdefs.println("  volatile int notifycount;");
 622       outclassdefs.println("  volatile int objlock;");
 623       if(state.MULTICOREGC) {
 624         outclassdefs.println("  int marked;");
 625       }
 626     }
 627     if (state.TASK) {
 628       outclassdefs.println("  int flag;");
 629       if(!state.MULTICORE) {
 630         outclassdefs.println("  void * flagptr;");
 631       } else {
 632         outclassdefs.println("  int version;");
 633         outclassdefs.println("  int * lock;");  // lock entry for this obj
 634         outclassdefs.println("  int mutex;");
 635         outclassdefs.println("  volatile int lockcount;");
 636         outclassdefs.println("  volatile int notifycount;");
 637         if(state.MULTICOREGC) {
 638           outclassdefs.println("  int marked;");
 639         }
 640       }
 641       if(state.OPTIONAL) {
 642         outclassdefs.println("  int numfses;");
 643         outclassdefs.println("  int * fses;");
 644       }
 645     }
 646
 647     printClassStruct(typeutil.getClass(TypeUtil.ObjectClass), outclassdefs, outglobaldefs, outglobaldefsprim);
 648     printedfieldstbl.clear();
 649     printExtraArrayFields(outclassdefs);
 650     if (state.ARRAYPAD) {
 651       outclassdefs.println("  int paddingforarray;");
 652     }
 653
 654     outclassdefs.println("  int ___length___;");
 655     outclassdefs.println("};\n");
 656
 657     outclassdefs.println("");
 658     outclassdefs.println("extern int classsize[];");
 659     outclassdefs.println("extern int hasflags[];");
 660     outclassdefs.println("extern unsigned INTPTR * pointerarray[];");
 661     outclassdefs.println("extern int* supertypes[];");
 662     outclassdefs.println("");
 663   }
 664
 665   /** Prints out definitions for generic task structures */
 666
 667   protected void outputTaskTypes(PrintWriter outtask) {
 668     outtask.println("#ifndef _TASK_H");
 669     outtask.println("#define _TASK_H");
 670     outtask.println("struct parameterdescriptor {");
 671     outtask.println("int type;");
 672     outtask.println("int numberterms;");
 673     outtask.println("int *intarray;");
 674     outtask.println("void * queue;");
 675     outtask.println("int numbertags;");
 676     outtask.println("int *tagarray;");
 677     outtask.println("};");
 678
 679     outtask.println("struct taskdescriptor {");
 680     outtask.println("void * taskptr;");
 681     outtask.println("int numParameters;");
 682     outtask.println("  int numTotal;");
 683     outtask.println("struct parameterdescriptor **descriptorarray;");
 684     outtask.println("char * name;");
 685     outtask.println("};");
 686     outtask.println("extern struct taskdescriptor * taskarray[];");
 687     outtask.println("extern numtasks;");
 688     outtask.println("#endif");
 689   }
 690
 691
 692   protected void buildRepairStructs(PrintWriter outrepairstructs) {
 693     Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
 694     while(classit.hasNext()) {
 695       ClassDescriptor cn=(ClassDescriptor)classit.next();
 696       outrepairstructs.println("structure "+cn.getSymbol()+" {");
 697       outrepairstructs.println("  int __type__;");
 698       if (state.TASK) {
 699         outrepairstructs.println("  int __flag__;");
 700         if(!state.MULTICORE) {
 701           outrepairstructs.println("  int __flagptr__;");
 702         }
 703       }
 704       printRepairStruct(cn, outrepairstructs);
 705       outrepairstructs.println("}\n");
 706     }
 707
 708     for(int i=0; i<state.numArrays(); i++) {
 709       TypeDescriptor tdarray=arraytable[i];
 710       TypeDescriptor tdelement=tdarray.dereference();
 711       outrepairstructs.println("structure "+arraytype+"_"+state.getArrayNumber(tdarray)+" {");
 712       outrepairstructs.println("  int __type__;");
 713       printRepairStruct(typeutil.getClass(TypeUtil.ObjectClass), outrepairstructs);
 714       outrepairstructs.println("  int length;");
 715       outrepairstructs.println("}\n");
 716     }
 717   }
 718
 719   protected void printRepairStruct(ClassDescriptor cn, PrintWriter output) {
 720     ClassDescriptor sp=cn.getSuperDesc();
 721     if (sp!=null)
 722       printRepairStruct(sp, output);
 723
 724     Vector fields=(Vector)fieldorder.get(cn);
 725
 726     for(int i=0; i<fields.size(); i++) {
 727       FieldDescriptor fd=(FieldDescriptor)fields.get(i);
 728       if (fd.getType().isArray()) {
 729         output.println("  "+arraytype+"_"+ state.getArrayNumber(fd.getType()) +" * "+fd.getSymbol()+";");
 730       } else if (fd.getType().isClass())
 731         output.println("  "+fd.getType().getRepairSymbol()+" * "+fd.getSymbol()+";");
 732       else if (fd.getType().isFloat())
 733         output.println("  int "+fd.getSymbol()+"; /* really float */");
 734       else
 735         output.println("  "+fd.getType().getRepairSymbol()+" "+fd.getSymbol()+";");
 736     }
 737   }
 738
 739   /** This method outputs TaskDescriptor information */
 740   protected void generateTaskDescriptor(PrintWriter output, FlatMethod fm, TaskDescriptor task) {
 741     for (int i=0; i<task.numParameters(); i++) {
 742       VarDescriptor param_var=task.getParameter(i);
 743       TypeDescriptor param_type=task.getParamType(i);
 744       FlagExpressionNode param_flag=task.getFlag(param_var);
 745       TagExpressionList param_tag=task.getTag(param_var);
 746
 747       int dnfterms;
 748       if (param_flag==null) {
 749         output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
 750         output.println("0x0, 0x0 };");
 751         dnfterms=1;
 752       } else {
 753         DNFFlag dflag=param_flag.getDNF();
 754         dnfterms=dflag.size();
 755
 756         Hashtable flags=(Hashtable)flagorder.get(param_type.getClassDesc());
 757         output.println("int parameterdnf_"+i+"_"+task.getSafeSymbol()+"[]={");
 758         for(int j=0; j<dflag.size(); j++) {
 759           if (j!=0)
 760             output.println(",");
 761           Vector term=dflag.get(j);
 762           int andmask=0;
 763           int checkmask=0;
 764           for(int k=0; k<term.size(); k++) {
 765             DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
 766             FlagDescriptor fd=dfa.getFlag();
 767             boolean negated=dfa.getNegated();
 768             int flagid=1<<((Integer)flags.get(fd)).intValue();
 769             andmask|=flagid;
 770             if (!negated)
 771               checkmask|=flagid;
 772           }
 773           output.print("0x"+Integer.toHexString(andmask)+", 0x"+Integer.toHexString(checkmask));
 774         }
 775         output.println("};");
 776       }
 777
 778       output.println("int parametertag_"+i+"_"+task.getSafeSymbol()+"[]={");
 779       if (param_tag!=null)
 780         for(int j=0; j<param_tag.numTags(); j++) {
 781           if (j!=0)
 782             output.println(",");
 783           /* for each tag we need */
 784           /* which slot it is */
 785           /* what type it is */
 786           TagVarDescriptor tvd=(TagVarDescriptor)task.getParameterTable().get(param_tag.getName(j));
 787           TempDescriptor tmp=param_tag.getTemp(j);
 788           int slot=fm.getTagInt(tmp);
 789           output.println(slot+", "+state.getTagId(tvd.getTag()));
 790         }
 791       output.println("};");
 792
 793       output.println("struct parameterdescriptor parameter_"+i+"_"+task.getSafeSymbol()+"={");
 794       output.println("/* type */"+param_type.getClassDesc().getId()+",");
 795       output.println("/* number of DNF terms */"+dnfterms+",");
 796       output.println("parameterdnf_"+i+"_"+task.getSafeSymbol()+",");
 797       output.println("0,");
 798       if (param_tag!=null)
 799         output.println("/* number of tags */"+param_tag.numTags()+",");
 800       else
 801         output.println("/* number of tags */ 0,");
 802       output.println("parametertag_"+i+"_"+task.getSafeSymbol());
 803       output.println("};");
 804     }
 805
 806
 807     output.println("struct parameterdescriptor * parameterdescriptors_"+task.getSafeSymbol()+"[] = {");
 808     for (int i=0; i<task.numParameters(); i++) {
 809       if (i!=0)
 810         output.println(",");
 811       output.print("&parameter_"+i+"_"+task.getSafeSymbol());
 812     }
 813     output.println("};");
 814
 815     output.println("struct taskdescriptor task_"+task.getSafeSymbol()+"={");
 816     output.println("&"+task.getSafeSymbol()+",");
 817     output.println("/* number of parameters */" +task.numParameters() + ",");
 818     int numtotal=task.numParameters()+fm.numTags();
 819     output.println("/* number total parameters */" +numtotal + ",");
 820     output.println("parameterdescriptors_"+task.getSafeSymbol()+",");
 821     output.println("\""+task.getSymbol()+"\"");
 822     output.println("};");
 823   }
 824
 825
 826   /** The buildVirtualTables method outputs the virtual dispatch
 827    * tables for methods. */
 828
 829   protected void buildVirtualTables(PrintWriter outvirtual) {
 830     Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
 831     while(classit.hasNext()) {
 832       ClassDescriptor cd=(ClassDescriptor)classit.next();
 833       if (virtualcalls.getMethodCount(cd)>maxcount)
 834         maxcount=virtualcalls.getMethodCount(cd);
 835     }
 836     MethodDescriptor[][] virtualtable=null;
 837     virtualtable=new MethodDescriptor[state.numClasses()+state.numArrays()][maxcount];
 838
 839     /* Fill in virtual table */
 840     classit=state.getClassSymbolTable().getDescriptorsIterator();
 841     while(classit.hasNext()) {
 842       ClassDescriptor cd=(ClassDescriptor)classit.next();
 843       if(cd.isInterface()) {
 844         continue;
 845       }
 846       fillinRow(cd, virtualtable, cd.getId());
 847     }
 848
 849     ClassDescriptor objectcd=typeutil.getClass(TypeUtil.ObjectClass);
 850     Iterator arrayit=state.getArrayIterator();
 851     while(arrayit.hasNext()) {
 852       TypeDescriptor td=(TypeDescriptor)arrayit.next();
 853       int id=state.getArrayNumber(td);
 854       fillinRow(objectcd, virtualtable, id+state.numClasses());
 855     }
 856
 857     outvirtual.print("void * virtualtable[]={");
 858     boolean needcomma=false;
 859     for(int i=0; i<state.numClasses()+state.numArrays(); i++) {
 860       for(int j=0; j<maxcount; j++) {
 861         if (needcomma)
 862           outvirtual.print(", ");
 863         if (virtualtable[i][j]!=null) {
 864           MethodDescriptor md=virtualtable[i][j];
 865           outvirtual.print("& "+md.getClassDesc().getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor());
 866         } else {
 867           outvirtual.print("0");
 868         }
 869         needcomma=true;
 870       }
 871       outvirtual.println("");
 872     }
 873     outvirtual.println("};");
 874     outvirtual.close();
 875   }
 876
 877   protected void fillinRow(ClassDescriptor cd, MethodDescriptor[][] virtualtable, int rownum) {
 878     /* Get inherited methods */
 879     Iterator it_sifs = cd.getSuperInterfaces();
 880     while(it_sifs.hasNext()) {
 881       ClassDescriptor superif = (ClassDescriptor)it_sifs.next();
 882       fillinRow(superif, virtualtable, rownum);
 883     }
 884     if (cd.getSuperDesc()!=null)
 885       fillinRow(cd.getSuperDesc(), virtualtable, rownum);
 886     /* Override them with our methods */
 887     for(Iterator it=cd.getMethods(); it.hasNext(); ) {
 888       MethodDescriptor md=(MethodDescriptor)it.next();
 889       if (md.isStatic()||md.getReturnType()==null)
 890         continue;
 891
 892       if (!callgraph.isCallable(md)) {
 893         continue;
 894       }
 895
 896       int methodnum = virtualcalls.getMethodNumber(md);
 897       virtualtable[rownum][methodnum]=md;
 898     }
 899   }
 900
 901   /** Generate array that contains the sizes of class objects.  The
 902    * object allocation functions in the runtime use this
 903    * information. */
 904
 905   protected void generateSizeArray(PrintWriter outclassdefs) {
 906     outclassdefs.print("extern struct prefetchCountStats * evalPrefetch;\n");
 907     generateSizeArrayExtensions(outclassdefs);
 908
 909     Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
 910     cdarray=new ClassDescriptor[state.numClasses()];
 911     ifarray = new ClassDescriptor[state.numInterfaces()];
 912     cdarray[0] = null;
 913     int interfaceid = 0;
 914     while(it.hasNext()) {
 915       ClassDescriptor cd=(ClassDescriptor)it.next();
 916       if(cd.isInterface()) {
 917         ifarray[cd.getId()] = cd;
 918       } else {
 919         cdarray[cd.getId()] = cd;
 920       }
 921     }
 922
 923     arraytable=new TypeDescriptor[state.numArrays()];
 924
 925     Iterator arrayit=state.getArrayIterator();
 926     while(arrayit.hasNext()) {
 927       TypeDescriptor td=(TypeDescriptor)arrayit.next();
 928       int id=state.getArrayNumber(td);
 929       arraytable[id]=td;
 930     }
 931
 932     /* Print out types */
 933     outclassdefs.println("/* ");
 934     for(int i=0; i<state.numClasses(); i++) {
 935       ClassDescriptor cd=cdarray[i];
 936       if(cd == null) {
 937         outclassdefs.println("NULL " + i);
 938       } else {
 939         outclassdefs.println(cd +"  "+i);
 940       }
 941     }
 942
 943     for(int i=0; i<state.numArrays(); i++) {
 944       TypeDescriptor arraytd=arraytable[i];
 945       outclassdefs.println(arraytd.toPrettyString() +"  "+(i+state.numClasses()));
 946     }
 947
 948     for(int i=0; i<state.numInterfaces(); i++) {
 949       ClassDescriptor ifcd = ifarray[i];
 950       outclassdefs.println(ifcd +"  "+(i+state.numClasses()+state.numArrays()));
 951     }
 952
 953     outclassdefs.println("*/");
 954
 955
 956     outclassdefs.print("int classsize[]={");
 957
 958     boolean needcomma=false;
 959     for(int i=0; i<state.numClasses(); i++) {
 960       if (needcomma)
 961         outclassdefs.print(", ");
 962       if(i>0) {
 963         outclassdefs.print("sizeof(struct "+cdarray[i].getSafeSymbol()+")");
 964       } else {
 965         outclassdefs.print("0");
 966       }
 967       needcomma=true;
 968     }
 969
 970
 971     for(int i=0; i<state.numArrays(); i++) {
 972       if (needcomma)
 973         outclassdefs.print(", ");
 974       TypeDescriptor tdelement=arraytable[i].dereference();
 975       if (tdelement.isArray()||tdelement.isClass()||tdelement.isNull())
 976         outclassdefs.print("sizeof(void *)");
 977       else
 978         outclassdefs.print("sizeof("+tdelement.getSafeSymbol()+")");
 979       needcomma=true;
 980     }
 981
 982     for(int i=0; i<state.numInterfaces(); i++) {
 983       if (needcomma)
 984         outclassdefs.print(", ");
 985       outclassdefs.print("sizeof(struct "+ifarray[i].getSafeSymbol()+")");
 986       needcomma=true;
 987     }
 988
 989     outclassdefs.println("};");
 990
 991     ClassDescriptor objectclass=typeutil.getClass(TypeUtil.ObjectClass);
 992     needcomma=false;
 993     outclassdefs.print("int typearray[]={");
 994     for(int i=0; i<state.numClasses(); i++) {
 995       ClassDescriptor cd=cdarray[i];
 996       ClassDescriptor supercd=i>0 ? cd.getSuperDesc() : null;
 997       if(supercd != null && supercd.isInterface()) {
 998         throw new Error("Super class can not be interfaces");
 999       }
1000       if (needcomma)
1001         outclassdefs.print(", ");
1002       if (supercd==null)
1003         outclassdefs.print("-1");
1004       else
1005         outclassdefs.print(supercd.getId());
1006       needcomma=true;
1007     }
1008
1009     for(int i=0; i<state.numArrays(); i++) {
1010       TypeDescriptor arraytd=arraytable[i];
1011       ClassDescriptor arraycd=arraytd.getClassDesc();
1012       if (arraycd==null) {
1013         if (needcomma)
1014           outclassdefs.print(", ");
1015         outclassdefs.print(objectclass.getId());
1016         needcomma=true;
1017         continue;
1018       }
1019       ClassDescriptor cd=arraycd.getSuperDesc();
1020       int type=-1;
1021       while(cd!=null) {
1022         TypeDescriptor supertd=new TypeDescriptor(cd);
1023         supertd.setArrayCount(arraytd.getArrayCount());
1024         type=state.getArrayNumber(supertd);
1025         if (type!=-1) {
1026           type+=state.numClasses();
1027           break;
1028         }
1029         cd=cd.getSuperDesc();
1030       }
1031       if (needcomma)
1032         outclassdefs.print(", ");
1033       outclassdefs.print(type);
1034       needcomma=true;
1035     }
1036
1037     for(int i=0; i<state.numInterfaces(); i++) {
1038       ClassDescriptor cd=ifarray[i];
1039       ClassDescriptor supercd=cd.getSuperDesc();
1040       if(supercd != null && supercd.isInterface()) {
1041         throw new Error("Super class can not be interfaces");
1042       }
1043       if (needcomma)
1044     outclassdefs.print(", ");
1045       if (supercd==null)
1046     outclassdefs.print("-1");
1047       else
1048     outclassdefs.print(supercd.getId());
1049       needcomma=true;
1050     }
1051
1052     outclassdefs.println("};");
1053
1054     needcomma=false;
1055
1056
1057     outclassdefs.print("int typearray2[]={");
1058     for(int i=0; i<state.numArrays(); i++) {
1059       TypeDescriptor arraytd=arraytable[i];
1060       ClassDescriptor arraycd=arraytd.getClassDesc();
1061       if (arraycd==null) {
1062         if (needcomma)
1063           outclassdefs.print(", ");
1064         outclassdefs.print("-1");
1065         needcomma=true;
1066         continue;
1067       }
1068       ClassDescriptor cd=arraycd.getSuperDesc();
1069       int level=arraytd.getArrayCount()-1;
1070       int type=-1;
1071       for(; level>0; level--) {
1072         TypeDescriptor supertd=new TypeDescriptor(objectclass);
1073         supertd.setArrayCount(level);
1074         type=state.getArrayNumber(supertd);
1075         if (type!=-1) {
1076           type+=state.numClasses();
1077           break;
1078         }
1079       }
1080       if (needcomma)
1081         outclassdefs.print(", ");
1082       outclassdefs.print(type);
1083       needcomma=true;
1084     }
1085
1086     outclassdefs.println("};");
1087   }
1088
1089   /** Constructs params and temp objects for each method or task.
1090    * These objects tell the compiler which temps need to be
1091    * allocated.  */
1092
1093   protected void generateTempStructs(FlatMethod fm) {
1094     MethodDescriptor md=fm.getMethod();
1095     TaskDescriptor task=fm.getTask();
1096     ParamsObject objectparams=md!=null ? new ParamsObject(md,tag++) : new ParamsObject(task, tag++);
1097     if (md!=null)
1098       paramstable.put(md, objectparams);
1099     else
1100       paramstable.put(task, objectparams);
1101
1102     for(int i=0; i<fm.numParameters(); i++) {
1103       TempDescriptor temp=fm.getParameter(i);
1104       TypeDescriptor type=temp.getType();
1105       if (type.isPtr()&&((GENERATEPRECISEGC) || (this.state.MULTICOREGC)))
1106         objectparams.addPtr(temp);
1107       else
1108         objectparams.addPrim(temp);
1109     }
1110
1111     for(int i=0; i<fm.numTags(); i++) {
1112       TempDescriptor temp=fm.getTag(i);
1113       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC))
1114         objectparams.addPtr(temp);
1115       else
1116         objectparams.addPrim(temp);
1117     }
1118
1119     TempObject objecttemps=md!=null ? new TempObject(objectparams,md,tag++) : new TempObject(objectparams, task, tag++);
1120     if (md!=null)
1121       tempstable.put(md, objecttemps);
1122     else
1123       tempstable.put(task, objecttemps);
1124
1125     for(Iterator nodeit=fm.getNodeSet().iterator(); nodeit.hasNext(); ) {
1126       FlatNode fn=(FlatNode)nodeit.next();
1127       TempDescriptor[] writes=fn.writesTemps();
1128       for(int i=0; i<writes.length; i++) {
1129         TempDescriptor temp=writes[i];
1130         TypeDescriptor type=temp.getType();
1131         if (type.isPtr()&&((GENERATEPRECISEGC) || (this.state.MULTICOREGC)))
1132           objecttemps.addPtr(temp);
1133         else
1134           objecttemps.addPrim(temp);
1135       }
1136     }
1137   }
1138
1139   /** This method outputs the following information about classes
1140    * and arrays:
1141    * (1) For classes, what are the locations of pointers.
1142    * (2) For arrays, does the array contain pointers or primitives.
1143    * (3) For classes, does the class contain flags.
1144    */
1145
1146   protected void generateLayoutStructs(PrintWriter output) {
1147     Iterator it=state.getClassSymbolTable().getDescriptorsIterator();
1148     while(it.hasNext()) {
1149       ClassDescriptor cn=(ClassDescriptor)it.next();
1150       output.println("unsigned INTPTR "+cn.getSafeSymbol()+"_pointers[]={");
1151       Iterator allit=cn.getFieldTable().getAllDescriptorsIterator();
1152       int count=0;
1153       while(allit.hasNext()) {
1154         FieldDescriptor fd=(FieldDescriptor)allit.next();
1155     if(fd.isStatic()) {
1156       continue;
1157     }
1158         TypeDescriptor type=fd.getType();
1159         if (type.isPtr())
1160           count++;
1161       }
1162       output.print(count);
1163       allit=cn.getFieldTable().getAllDescriptorsIterator();
1164       while(allit.hasNext()) {
1165         FieldDescriptor fd=(FieldDescriptor)allit.next();
1166     if(fd.isStatic()) {
1167       continue;
1168     }
1169         TypeDescriptor type=fd.getType();
1170         if (type.isPtr()) {
1171           output.println(",");
1172           output.print("((unsigned INTPTR)&(((struct "+cn.getSafeSymbol() +" *)0)->"+
1173                        fd.getSafeSymbol()+"))");
1174         }
1175       }
1176       output.println("};");
1177     }
1178
1179     output.println("unsigned INTPTR * pointerarray[]={");
1180     boolean needcomma=false;
1181     for(int i=0; i<state.numClasses(); i++) {
1182       ClassDescriptor cn=cdarray[i];
1183       if (needcomma)
1184         output.println(",");
1185       needcomma=true;
1186       if(cn != null) {
1187         output.print(cn.getSafeSymbol()+"_pointers");
1188       } else {
1189         output.print("NULL");
1190       }
1191     }
1192
1193     for(int i=0; i<state.numArrays(); i++) {
1194       if (needcomma)
1195         output.println(", ");
1196       TypeDescriptor tdelement=arraytable[i].dereference();
1197       if (tdelement.isArray()||tdelement.isClass())
1198         output.print("((unsigned INTPTR *)1)");
1199       else
1200         output.print("0");
1201       needcomma=true;
1202     }
1203
1204     output.println("};");
1205     needcomma=false;
1206     output.println("int hasflags[]={");
1207     for(int i=0; i<state.numClasses(); i++) {
1208       ClassDescriptor cn=cdarray[i];
1209       if (needcomma)
1210         output.println(", ");
1211       needcomma=true;
1212       if ((cn != null) && (cn.hasFlags()))
1213         output.print("1");
1214       else
1215         output.print("0");
1216     }
1217     output.println("};");
1218   }
1219
1220   private int checkarraysupertype(ClassDescriptor arraycd, TypeDescriptor arraytd) {
1221     int type=-1;
1222
1223     TypeDescriptor supertd=new TypeDescriptor(arraycd);
1224     supertd.setArrayCount(arraytd.getArrayCount());
1225     type=state.getArrayNumber(supertd);
1226     if (type!=-1) {
1227       return type;
1228     }
1229
1230     ClassDescriptor cd = arraycd.getSuperDesc();
1231     if(cd != null) {
1232       type = checkarraysupertype(cd, arraytd);
1233       if(type != -1) {
1234         return type;
1235       }
1236     }
1237
1238     Iterator it_sifs = arraycd.getSuperInterfaces();
1239     while(it_sifs.hasNext()) {
1240       ClassDescriptor ifcd = (ClassDescriptor)it_sifs.next();
1241       type = checkarraysupertype(ifcd, arraytd);
1242       if(type != -1) {
1243         return type;
1244       }
1245     }
1246
1247     return type;
1248   }
1249
1250
1251   /** Print out table to give us supertypes */
1252   protected void generateSuperTypeTable(PrintWriter output) {
1253     ClassDescriptor objectclass=typeutil.getClass(TypeUtil.ObjectClass);
1254     for(int i=0; i<state.numClasses(); i++) {
1255       ClassDescriptor cn=cdarray[i];
1256       if(cn == null) {
1257         continue;
1258       }
1259       output.print("int supertypes" + cn.getSafeSymbol() + "[] = {");
1260       boolean ncomma = false;
1261       int snum = 0;
1262       if((cn != null) && (cn.getSuperDesc() != null)) {
1263         snum++;
1264       }
1265       Iterator it_sifs = cn != null? cn.getSuperInterfaces() : null;
1266       while(it_sifs != null && it_sifs.hasNext()) {
1267         snum++;
1268         it_sifs.next();
1269       }
1270       output.print(snum);
1271       ncomma = true;
1272       if ((cn != null) && (cn.getSuperDesc()!=null)) {
1273         if(ncomma) {
1274           output.print(",");
1275         }
1276         ClassDescriptor cdsuper=cn.getSuperDesc();
1277         output.print(cdsuper.getId());
1278       }
1279       it_sifs = cn != null? cn.getSuperInterfaces() : null;
1280       while(it_sifs != null && it_sifs.hasNext()) {
1281         if(ncomma) {
1282           output.print(",");
1283         }
1284         output.print(((ClassDescriptor)it_sifs.next()).getId()+state.numClasses()+state.numArrays());
1285       }
1286
1287       output.println("};");
1288     }
1289
1290     for(int i=0; i<state.numArrays(); i++) {
1291       TypeDescriptor arraytd=arraytable[i];
1292       ClassDescriptor arraycd=arraytd.getClassDesc();
1293       output.print("int supertypes___arraytype___" + (i+state.numClasses()) + "[] = {");
1294       boolean ncomma = false;
1295       int snum = 0;
1296       if (arraycd==null) {
1297         snum++;
1298         output.print(snum);
1299         output.print(", ");
1300         output.print(objectclass.getId());
1301         output.println("};");
1302         continue;
1303       }
1304       if((arraycd != null) && (arraycd.getSuperDesc() != null)) {
1305         snum++;
1306       }
1307       Iterator it_sifs = arraycd != null? arraycd.getSuperInterfaces() : null;
1308       while(it_sifs != null && it_sifs.hasNext()) {
1309         snum++;
1310         it_sifs.next();
1311       }
1312       output.print(snum);
1313       ncomma = true;
1314       if ((arraycd != null) && (arraycd.getSuperDesc()!=null)) {
1315         ClassDescriptor cd=arraycd.getSuperDesc();
1316         int type=-1;
1317         if(cd!=null) {
1318           type = checkarraysupertype(cd, arraytd);
1319           if(type != -1) {
1320             type += state.numClasses();
1321           }
1322         }
1323         if (ncomma)
1324           output.print(", ");
1325         output.print(type);
1326       }
1327       it_sifs = arraycd != null? arraycd.getSuperInterfaces() : null;
1328       while(it_sifs != null && it_sifs.hasNext()) {
1329         ClassDescriptor ifcd = (ClassDescriptor)it_sifs.next();
1330         int type = checkarraysupertype(ifcd , arraytd);
1331         if(type != -1) {
1332           type += state.numClasses();
1333         }
1334         if (ncomma)
1335           output.print(", ");
1336         output.print(type);
1337       }
1338       output.println("};");
1339     }
1340
1341     for(int i=0; i<state.numInterfaces(); i++) {
1342       ClassDescriptor cn=ifarray[i];
1343       if(cn == null) {
1344         continue;
1345       }
1346       output.print("int supertypes" + cn.getSafeSymbol() + "[] = {");
1347       boolean ncomma = false;
1348       int snum = 0;
1349       if((cn != null) && (cn.getSuperDesc() != null)) {
1350         snum++;
1351       }
1352       Iterator it_sifs = cn != null? cn.getSuperInterfaces() : null;
1353       while(it_sifs != null && it_sifs.hasNext()) {
1354         snum++;
1355         it_sifs.next();
1356       }
1357       output.print(snum);
1358       ncomma = true;
1359       if ((cn != null) && (cn.getSuperDesc()!=null)) {
1360         if(ncomma) {
1361           output.print(",");
1362         }
1363         ClassDescriptor cdsuper=cn.getSuperDesc();
1364         output.print(cdsuper.getId());
1365       }
1366       it_sifs = cn != null? cn.getSuperInterfaces() : null;
1367       while(it_sifs != null && it_sifs.hasNext()) {
1368         if(ncomma) {
1369           output.print(",");
1370         }
1371         output.print(((ClassDescriptor)it_sifs.next()).getId()+state.numClasses()+state.numArrays());
1372       }
1373
1374       output.println("};");
1375     }
1376
1377     output.println("int* supertypes[]={");
1378     boolean needcomma=false;
1379     for(int i=0; i<state.numClasses(); i++) {
1380       ClassDescriptor cn=cdarray[i];
1381       if (needcomma)
1382         output.println(",");
1383       needcomma=true;
1384       if(cn != null) {
1385         output.print("supertypes" + cn.getSafeSymbol());
1386       } else {
1387         output.print(0);
1388       }
1389     }
1390
1391     for(int i=0; i<state.numArrays(); i++) {
1392       if (needcomma)
1393         output.println(",");
1394       needcomma = true;
1395       output.print("supertypes___arraytype___" + (i+state.numClasses()));
1396     }
1397
1398     for(int i=0; i<state.numInterfaces(); i++) {
1399       ClassDescriptor cn=ifarray[i];
1400       if (needcomma)
1401     output.println(",");
1402       needcomma=true;
1403       output.print("supertypes" + cn.getSafeSymbol());
1404     }
1405     output.println("};");
1406   }
1407
1408   /** Force consistent field ordering between inherited classes. */
1409
1410   protected void printClassStruct(ClassDescriptor cn, PrintWriter classdefout, PrintWriter globaldefout, PrintWriter globaldefprimout) {
1411
1412     ClassDescriptor sp=cn.getSuperDesc();
1413     if (sp!=null)
1414       printClassStruct(sp, classdefout, /*globaldefout*/ null, null);
1415
1416     SymbolTable sitbl = cn.getSuperInterfaceTable();
1417     Iterator it_sifs = sitbl.getDescriptorsIterator();
1418     while(it_sifs.hasNext()) {
1419       ClassDescriptor si = (ClassDescriptor)it_sifs.next();
1420       printClassStruct(si, classdefout, /*globaldefout*/ null, null);
1421     }
1422
1423     if (!fieldorder.containsKey(cn)) {
1424       Vector fields=new Vector();
1425       fieldorder.put(cn,fields);
1426
1427       Vector fieldvec=cn.getFieldVec();
1428       for(int i=0; i<fieldvec.size(); i++) {
1429         FieldDescriptor fd=(FieldDescriptor)fieldvec.get(i);
1430         if((sp != null) && sp.getFieldTable().contains(fd.getSymbol())) {
1431           // a shadow field
1432         } else {
1433           it_sifs = sitbl.getDescriptorsIterator();
1434           boolean hasprinted = false;
1435           while(it_sifs.hasNext()) {
1436             ClassDescriptor si = (ClassDescriptor)it_sifs.next();
1437             if(si.getFieldTable().contains(fd.getSymbol())) {
1438               hasprinted = true;
1439               break;
1440             }
1441           }
1442           if(hasprinted) {
1443             // this field has been defined in the super class
1444           } else {
1445             fields.add(fd);
1446           }
1447         }
1448       }
1449     }
1450     //Vector fields=(Vector)fieldorder.get(cn);
1451
1452     Vector fields = cn.getFieldVec();
1453
1454     for(int i=0; i<fields.size(); i++) {
1455       FieldDescriptor fd=(FieldDescriptor)fields.get(i);
1456       String fstring = fd.getSafeSymbol();
1457       if(printedfieldstbl.containsKey(fstring)) {
1458         printedfieldstbl.put(fstring, cn);
1459         continue;
1460       } else {
1461         printedfieldstbl.put(fstring, cn);
1462       }
1463       if (fd.getType().isClass()
1464           && fd.getType().getClassDesc().isEnum()) {
1465         classdefout.println("  int " + fd.getSafeSymbol() + ";");
1466       } else if (fd.getType().isClass()||fd.getType().isArray()) {
1467         if (fd.isStatic()) {
1468           // TODO add version for normal Java later
1469           // static field
1470           if(globaldefout != null) {
1471             if(fd.isVolatile()) {
1472               globaldefout.println("  volatile struct "+fd.getType().getSafeSymbol()+ " * "+fd.getSafeSymbol()+";");
1473             } else {
1474               globaldefout.println("  struct "+fd.getType().getSafeSymbol()+ " * "+fd.getSafeSymbol()+";");
1475             }
1476             globaldefscount++;
1477           }
1478         } else if (fd.isVolatile()) {
1479           //volatile field
1480           classdefout.println("  volatile struct "+fd.getType().getSafeSymbol()+ " * "+fd.getSafeSymbol()+";");
1481         } else {
1482           classdefout.println("  struct "+fd.getType().getSafeSymbol()+" * "+fd.getSafeSymbol()+";");
1483         }
1484       } else if (fd.isStatic()) {
1485         // TODO add version for normal Java later
1486         // static field
1487         if(globaldefout != null) {
1488           if(fd.isVolatile()) {
1489             globaldefprimout.println("  volatile "+fd.getType().getSafeSymbol()+ " "+fd.getSafeSymbol()+";");
1490           } else {
1491             globaldefprimout.println("  "+fd.getType().getSafeSymbol()+ " "+fd.getSafeSymbol()+";");
1492           }
1493         }
1494       } else if (fd.isVolatile()) {
1495         //volatile field
1496         classdefout.println("  volatile "+fd.getType().getSafeSymbol()+ " "+fd.getSafeSymbol()+";");
1497       } else
1498         classdefout.println("  "+fd.getType().getSafeSymbol()+" "+fd.getSafeSymbol()+";");
1499     }
1500   }
1501
1502
1503   /* Map flags to integers consistently between inherited
1504    * classes. */
1505
1506   protected void mapFlags(ClassDescriptor cn) {
1507     ClassDescriptor sp=cn.getSuperDesc();
1508     if (sp!=null)
1509       mapFlags(sp);
1510     int max=0;
1511     if (!flagorder.containsKey(cn)) {
1512       Hashtable flags=new Hashtable();
1513       flagorder.put(cn,flags);
1514       if (sp!=null) {
1515         Hashtable superflags=(Hashtable)flagorder.get(sp);
1516         Iterator superflagit=superflags.keySet().iterator();
1517         while(superflagit.hasNext()) {
1518           FlagDescriptor fd=(FlagDescriptor)superflagit.next();
1519           Integer number=(Integer)superflags.get(fd);
1520           flags.put(fd, number);
1521           if ((number.intValue()+1)>max)
1522             max=number.intValue()+1;
1523         }
1524       }
1525
1526       Iterator flagit=cn.getFlags();
1527       while(flagit.hasNext()) {
1528         FlagDescriptor fd=(FlagDescriptor)flagit.next();
1529         if (sp==null||!sp.getFlagTable().contains(fd.getSymbol()))
1530           flags.put(fd, new Integer(max++));
1531       }
1532     }
1533   }
1534
1535
1536   /** This function outputs (1) structures that parameters are
1537    * passed in (when PRECISE GC is enabled) and (2) function
1538    * prototypes for the methods */
1539
1540   protected void generateCallStructs(ClassDescriptor cn, PrintWriter classdefout, PrintWriter output, PrintWriter headersout, PrintWriter globaldefout, PrintWriter globaldefprimout) {
1541     /* Output class structure */
1542     classdefout.println("struct "+cn.getSafeSymbol()+" {");
1543     classdefout.println("  int type;");
1544
1545
1546     additionalClassObjectFields(classdefout);
1547
1548
1549     if (state.EVENTMONITOR) {
1550       classdefout.println("  int objuid;");
1551     }
1552     if (state.THREAD) {
1553       classdefout.println("  pthread_t tid;");
1554       classdefout.println("  volatile int lockcount;");
1555       classdefout.println("  volatile int notifycount;");
1556     }
1557     if (state.MGC) {
1558       classdefout.println("  int mutex;");
1559       classdefout.println("  volatile int notifycount;");
1560       classdefout.println("  volatile int objlock;");
1561       if(state.MULTICOREGC) {
1562         classdefout.println("  int marked;");
1563       }
1564     }
1565     if (state.TASK) {
1566       classdefout.println("  int flag;");
1567       if((!state.MULTICORE) || (cn.getSymbol().equals("TagDescriptor"))) {
1568         classdefout.println("  void * flagptr;");
1569       } else if (state.MULTICORE) {
1570         classdefout.println("  int version;");
1571         classdefout.println("  int * lock;"); // lock entry for this obj
1572         classdefout.println("  int mutex;");
1573         classdefout.println("  int lockcount;");
1574         if(state.MULTICOREGC) {
1575           classdefout.println("  int marked;");
1576         }
1577       }
1578       if (state.OPTIONAL) {
1579         classdefout.println("  int numfses;");
1580         classdefout.println("  int * fses;");
1581       }
1582     }
1583     printClassStruct(cn, classdefout, globaldefout, globaldefprimout);
1584     printedfieldstbl.clear(); // = new Hashtable<String, ClassDescriptor>();
1585     classdefout.println("};\n");
1586     generateCallStructsMethods(cn, output, headersout);
1587   }
1588
1589
1590   protected void generateCallStructsMethods(ClassDescriptor cn, PrintWriter output, PrintWriter headersout) {
1591     for(Iterator methodit=cn.getMethods(); methodit.hasNext(); ) {
1592       MethodDescriptor md=(MethodDescriptor)methodit.next();
1593
1594       if (!callgraph.isCallable(md)) {
1595         continue;
1596       }
1597
1598       generateMethod(cn, md, headersout, output);
1599     }
1600   }
1601
1602   protected void generateMethodParam(ClassDescriptor cn, MethodDescriptor md, PrintWriter output) {
1603     /* Output parameter structure */
1604     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
1605       if(md.isInvokedByStatic() && !md.isStaticBlock() && !md.getModifiers().isNative()) {
1606         // generate the staticinit version
1607         String mdstring = md.getSafeMethodDescriptor() + "staticinit";
1608
1609         ParamsObject objectparams=(ParamsObject) paramstable.get(md);
1610         output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+mdstring+"_params {");
1611         output.println("  int size;");
1612         output.println("  void * next;");
1613         for(int i=0; i<objectparams.numPointers(); i++) {
1614           TempDescriptor temp=objectparams.getPointer(i);
1615           if(temp.getType().isClass() && temp.getType().getClassDesc().isEnum()) {
1616             output.println("  int " + temp.getSafeSymbol() + ";");
1617           } else {
1618             output.println("  struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1619           }
1620         }
1621         output.println("};\n");
1622       }
1623
1624       ParamsObject objectparams=(ParamsObject) paramstable.get(md);
1625       output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params {");
1626       output.println("  int size;");
1627       output.println("  void * next;");
1628       for(int i=0; i<objectparams.numPointers(); i++) {
1629         TempDescriptor temp=objectparams.getPointer(i);
1630         if(temp.getType().isClass() && temp.getType().getClassDesc().isEnum()) {
1631           output.println("  int " + temp.getSafeSymbol() + ";");
1632         } else {
1633           output.println("  struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1634         }
1635       }
1636       output.println("};\n");
1637     }
1638   }
1639
1640   protected void generateMethod(ClassDescriptor cn, MethodDescriptor md, PrintWriter headersout, PrintWriter output) {
1641     FlatMethod fm=state.getMethodFlat(md);
1642     generateTempStructs(fm);
1643
1644     ParamsObject objectparams=(ParamsObject) paramstable.get(md);
1645     TempObject objecttemps=(TempObject) tempstable.get(md);
1646
1647     boolean printcomma = false;
1648
1649     generateMethodParam(cn, md, output);
1650
1651     if(md.isInvokedByStatic() && !md.isStaticBlock() && !md.getModifiers().isNative()) {
1652       // generate the staticinit version
1653       String mdstring = md.getSafeMethodDescriptor() + "staticinit";
1654
1655       /* Output temp structure */
1656       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
1657         output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+mdstring+"_locals {");
1658         output.println("  int size;");
1659         output.println("  void * next;");
1660         for(int i=0; i<objecttemps.numPointers(); i++) {
1661           TempDescriptor temp=objecttemps.getPointer(i);
1662           if (!temp.getType().isArray() && temp.getType().isNull())
1663             output.println("  void * "+temp.getSafeSymbol()+";");
1664           else
1665             output.println("  struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1666         }
1667         output.println("};\n");
1668       }
1669
1670       headersout.println("#define D"+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+mdstring+" 1");
1671       /* First the return type */
1672       if (md.getReturnType()!=null) {
1673         if(md.getReturnType().isClass() && md.getReturnType().getClassDesc().isEnum()) {
1674           headersout.println("  int ");
1675         } else if (md.getReturnType().isClass()||md.getReturnType().isArray())
1676           headersout.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
1677         else
1678           headersout.print(md.getReturnType().getSafeSymbol()+" ");
1679       } else
1680         //catch the constructor case
1681         headersout.print("void ");
1682
1683       /* Next the method name */
1684       headersout.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+mdstring+"(");
1685       printcomma=false;
1686       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
1687         headersout.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+mdstring+"_params * "+paramsprefix);
1688         printcomma=true;
1689       }
1690
1691       /*  Output parameter list*/
1692       for(int i=0; i<objectparams.numPrimitives(); i++) {
1693         TempDescriptor temp=objectparams.getPrimitive(i);
1694         if (printcomma)
1695           headersout.print(", ");
1696         printcomma=true;
1697         if(temp.getType().isClass() && temp.getType().getClassDesc().isEnum()) {
1698           headersout.print("int " + temp.getSafeSymbol());
1699         } else if (temp.getType().isClass()||temp.getType().isArray())
1700           headersout.print("struct " + temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
1701         else
1702           headersout.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
1703       }
1704       if(md.getSymbol().equals("MonitorEnter") && state.OBJECTLOCKDEBUG) {
1705         headersout.print(", int linenum");
1706       }
1707       headersout.println(");\n");
1708     }
1709
1710     /* Output temp structure */
1711     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
1712       output.println("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals {");
1713       output.println("  int size;");
1714       output.println("  void * next;");
1715       for(int i=0; i<objecttemps.numPointers(); i++) {
1716         TempDescriptor temp=objecttemps.getPointer(i);
1717         if (!temp.getType().isArray() && temp.getType().isNull())
1718           output.println("  void * "+temp.getSafeSymbol()+";");
1719         else
1720           output.println("  struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1721       }
1722       output.println("};\n");
1723     }
1724
1725     /********* Output method declaration ***********/
1726     headersout.println("#define D"+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+" 1");
1727     /* First the return type */
1728     if (md.getReturnType()!=null) {
1729       if(md.getReturnType().isClass() && md.getReturnType().getClassDesc().isEnum()) {
1730         headersout.println("  int ");
1731       } else if (md.getReturnType().isClass()||md.getReturnType().isArray())
1732         headersout.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
1733       else
1734         headersout.print(md.getReturnType().getSafeSymbol()+" ");
1735     } else
1736       //catch the constructor case
1737       headersout.print("void ");
1738
1739     /* Next the method name */
1740     headersout.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(");
1741     printcomma=false;
1742     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
1743       headersout.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params * "+paramsprefix);
1744       printcomma=true;
1745     }
1746
1747     /*  Output parameter list*/
1748     for(int i=0; i<objectparams.numPrimitives(); i++) {
1749       TempDescriptor temp=objectparams.getPrimitive(i);
1750       if (printcomma)
1751         headersout.print(", ");
1752       printcomma=true;
1753       if(temp.getType().isClass() && temp.getType().getClassDesc().isEnum()) {
1754         headersout.print("int " + temp.getSafeSymbol());
1755       } else if (temp.getType().isClass()||temp.getType().isArray())
1756         headersout.print("struct " + temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
1757       else
1758         headersout.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
1759     }
1760     if(md.getSymbol().equals("MonitorEnter") && state.OBJECTLOCKDEBUG) {
1761       headersout.print(", int linenum");
1762     }
1763     headersout.println(");\n");
1764   }
1765
1766
1767   /** This function outputs (1) structures that parameters are
1768    * passed in (when PRECISE GC is enabled) and (2) function
1769    * prototypes for the tasks */
1770
1771   protected void generateTaskStructs(PrintWriter output, PrintWriter headersout) {
1772     /* Cycle through tasks */
1773     Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
1774
1775     while(taskit.hasNext()) {
1776       /* Classify parameters */
1777       TaskDescriptor task=(TaskDescriptor)taskit.next();
1778       FlatMethod fm=state.getMethodFlat(task);
1779       generateTempStructs(fm);
1780
1781       ParamsObject objectparams=(ParamsObject) paramstable.get(task);
1782       TempObject objecttemps=(TempObject) tempstable.get(task);
1783
1784       /* Output parameter structure */
1785       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
1786         output.println("struct "+task.getSafeSymbol()+"_params {");
1787         output.println("  int size;");
1788         output.println("  void * next;");
1789         for(int i=0; i<objectparams.numPointers(); i++) {
1790           TempDescriptor temp=objectparams.getPointer(i);
1791           output.println("  struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1792         }
1793
1794         output.println("};\n");
1795         if ((objectparams.numPointers()+fm.numTags())>maxtaskparams) {
1796           maxtaskparams=objectparams.numPointers()+fm.numTags();
1797         }
1798       }
1799
1800       /* Output temp structure */
1801       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
1802         output.println("struct "+task.getSafeSymbol()+"_locals {");
1803         output.println("  int size;");
1804         output.println("  void * next;");
1805         for(int i=0; i<objecttemps.numPointers(); i++) {
1806           TempDescriptor temp=objecttemps.getPointer(i);
1807           if (!temp.getType().isArray() && temp.getType().isNull())
1808             output.println("  void * "+temp.getSafeSymbol()+";");
1809           else if(temp.getType().isTag())
1810             output.println("  struct "+
1811                            (new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1812           else
1813             output.println("  struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+";");
1814         }
1815         output.println("};\n");
1816       }
1817
1818       /* Output task declaration */
1819       headersout.print("void " + task.getSafeSymbol()+"(");
1820
1821       boolean printcomma=false;
1822       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
1823         headersout.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
1824       } else
1825         headersout.print("void * parameterarray[]");
1826       headersout.println(");\n");
1827     }
1828   }
1829
1830   protected void generateFlatMethod(FlatMethod fm, PrintWriter output) {
1831     if (State.PRINTFLAT)
1832       System.out.println(fm.printMethod());
1833     MethodDescriptor md=fm.getMethod();
1834     TaskDescriptor task=fm.getTask();
1835     ClassDescriptor cn=md!=null ? md.getClassDesc() : null;
1836     ParamsObject objectparams=(ParamsObject)paramstable.get(md!=null ? md : task);
1837
1838     if((md != null) && md.isInvokedByStatic() && !md.isStaticBlock() && !md.getModifiers().isNative()) {
1839       // generate a special static init version
1840       mgcstaticinit = true;
1841       String mdstring = md.getSafeMethodDescriptor() + "staticinit";
1842
1843       generateHeader(fm, md!=null ? md : task,output);
1844       TempObject objecttemp=(TempObject) tempstable.get(md!=null ? md : task);
1845
1846       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
1847         output.print("   struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+mdstring+"_locals "+localsprefix+"={");
1848         output.print(objecttemp.numPointers()+",");
1849         output.print(paramsprefix);
1850         for(int j=0; j<objecttemp.numPointers(); j++)
1851           output.print(", NULL");
1852         output.println("};");
1853       }
1854
1855       for(int i=0; i<objecttemp.numPrimitives(); i++) {
1856         TempDescriptor td=objecttemp.getPrimitive(i);
1857         TypeDescriptor type=td.getType();
1858         if (type.isNull() && !type.isArray())
1859           output.println("   void * "+td.getSafeSymbol()+";");
1860         else if (type.isClass() && type.getClassDesc().isEnum()) {
1861           output.println("   int " + td.getSafeSymbol() + ";");
1862         } else if (type.isClass()||type.isArray())
1863           output.println("   struct "+type.getSafeSymbol()+" * "+td.getSafeSymbol()+";");
1864         else
1865           output.println("   "+type.getSafeSymbol()+" "+td.getSafeSymbol()+";");
1866       }
1867
1868       additionalCodeAtTopFlatMethodBody(output, fm);
1869
1870       /* Check to see if we need to do a GC if this is a
1871        * multi-threaded program...*/
1872
1873       if (((state.OOOJAVA||state.THREAD)&&GENERATEPRECISEGC)
1874           || this.state.MULTICOREGC) {
1875         //Don't bother if we aren't in recursive methods...The loops case will catch it
1876         if (callgraph.getAllMethods(md).contains(md)) {
1877           if (this.state.MULTICOREGC) {
1878             output.println("if(gcflag) gc("+localsprefixaddr+");");
1879           } else {
1880             output.println("if (unlikely(needtocollect)) checkcollect("+localsprefixaddr+");");
1881           }
1882         }
1883       }
1884
1885       generateCode(fm.getNext(0), fm, null, output);
1886
1887       output.println("}\n\n");
1888
1889       mgcstaticinit = false;
1890     }
1891
1892     generateHeader(fm, md!=null ? md : task,output);
1893     TempObject objecttemp=(TempObject) tempstable.get(md!=null ? md : task);
1894
1895     if((md != null) && (md.isStaticBlock())) {
1896       mgcstaticinit = true;
1897     }
1898
1899     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
1900       if (md!=null)
1901         output.print("   struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_locals "+localsprefix+"={");
1902       else
1903         output.print("   struct "+task.getSafeSymbol()+"_locals "+localsprefix+"={");
1904       output.print(objecttemp.numPointers()+",");
1905       output.print(paramsprefix);
1906       for(int j=0; j<objecttemp.numPointers(); j++)
1907         output.print(", NULL");
1908       output.println("};");
1909     }
1910
1911     for(int i=0; i<objecttemp.numPrimitives(); i++) {
1912       TempDescriptor td=objecttemp.getPrimitive(i);
1913       TypeDescriptor type=td.getType();
1914       if (type.isNull() && !type.isArray())
1915         output.println("   void * "+td.getSafeSymbol()+";");
1916       else if (type.isClass() && type.getClassDesc().isEnum()) {
1917         output.println("   int " + td.getSafeSymbol() + ";");
1918       } else if (type.isClass()||type.isArray())
1919         output.println("   struct "+type.getSafeSymbol()+" * "+td.getSafeSymbol()+";");
1920       else
1921         output.println("   "+type.getSafeSymbol()+" "+td.getSafeSymbol()+";");
1922     }
1923
1924     additionalCodeAtTopFlatMethodBody(output, fm);
1925
1926     /* Check to see if we need to do a GC if this is a
1927      * multi-threaded program...*/
1928
1929     if (((state.OOOJAVA||state.THREAD)&&GENERATEPRECISEGC)
1930         || this.state.MULTICOREGC) {
1931       //Don't bother if we aren't in recursive methods...The loops case will catch it
1932       if (callgraph.getAllMethods(md).contains(md)) {
1933         if (this.state.MULTICOREGC) {
1934           output.println("if(gcflag) gc("+localsprefixaddr+");");
1935         } else {
1936           output.println("if (unlikely(needtocollect)) checkcollect("+localsprefixaddr+");");
1937         }
1938       }
1939     }
1940
1941     if(fm.getMethod().isStaticBlock()) {
1942       // a static block, check if it has been executed
1943       output.println("  if(global_defsprim_p->" + cn.getSafeSymbol()+"static_block_exe_flag != 0) {");
1944       output.println("    return;");
1945       output.println("  }");
1946       output.println("");
1947     }
1948
1949     generateCode(fm.getNext(0), fm, null, output);
1950
1951     output.println("}\n\n");
1952
1953     mgcstaticinit = false;
1954   }
1955
1956   protected void generateCode(FlatNode first,
1957                               FlatMethod fm,
1958                               Set<FlatNode> stopset,
1959                               PrintWriter output) {
1960
1961     /* Assign labels to FlatNode's if necessary.*/
1962
1963     Hashtable<FlatNode, Integer> nodetolabel;
1964
1965     nodetolabel=assignLabels(first, stopset);
1966
1967     Set<FlatNode> storeset=null;
1968     HashSet<FlatNode> genset=null;
1969     HashSet<FlatNode> refset=null;
1970     Set<FlatNode> unionset=null;
1971
1972     /* Do the actual code generation */
1973     FlatNode current_node=null;
1974     HashSet tovisit=new HashSet();
1975     HashSet visited=new HashSet();
1976     tovisit.add(first);
1977     while(current_node!=null||!tovisit.isEmpty()) {
1978       if (current_node==null) {
1979         current_node=(FlatNode)tovisit.iterator().next();
1980         tovisit.remove(current_node);
1981       } else if (tovisit.contains(current_node)) {
1982         tovisit.remove(current_node);
1983       }
1984       visited.add(current_node);
1985       if (nodetolabel.containsKey(current_node)) {
1986         output.println("L"+nodetolabel.get(current_node)+":");
1987       }
1988       if (state.INSTRUCTIONFAILURE) {
1989         if (state.THREAD) {
1990           output.println("if ((++instructioncount)>failurecount) {instructioncount=0;injectinstructionfailure();}");
1991         } else
1992           output.println("if ((--instructioncount)==0) injectinstructionfailure();");
1993       }
1994       if (current_node.numNext()==0||stopset!=null&&stopset.contains(current_node)) {
1995         output.print("   ");
1996         generateFlatNode(fm, current_node, output);
1997
1998         if (state.OOOJAVA && stopset!=null) {
1999           assert first.getPrev(0) instanceof FlatSESEEnterNode;
2000           assert current_node       instanceof FlatSESEExitNode;
2001           FlatSESEEnterNode fsen = (FlatSESEEnterNode) first.getPrev(0);
2002           FlatSESEExitNode fsxn = (FlatSESEExitNode)  current_node;
2003           assert fsen.getFlatExit().equals(fsxn);
2004           assert fsxn.getFlatEnter().equals(fsen);
2005         }
2006         if (current_node.kind()!=FKind.FlatReturnNode) {
2007           if((fm.getMethod() != null) && (fm.getMethod().isStaticBlock())) {
2008             // a static block, check if it has been executed
2009             output.println("  global_defsprim_p->" + fm.getMethod().getClassDesc().getSafeSymbol()+"static_block_exe_flag = 1;");
2010             output.println("");
2011           }
2012           output.println("   return;");
2013         }
2014         current_node=null;
2015       } else if(current_node.numNext()==1) {
2016         FlatNode nextnode;
2017         if (state.OOOJAVA &&
2018             current_node.kind()==FKind.FlatSESEEnterNode) {
2019           FlatSESEEnterNode fsen = (FlatSESEEnterNode)current_node;
2020           generateFlatNode(fm, current_node, output);
2021           nextnode=fsen.getFlatExit().getNext(0);
2022         } else {
2023           output.print("   ");
2024           generateFlatNode(fm, current_node, output);
2025           nextnode=current_node.getNext(0);
2026         }
2027         if (visited.contains(nextnode)) {
2028           output.println("goto L"+nodetolabel.get(nextnode)+";");
2029           current_node=null;
2030         } else
2031           current_node=nextnode;
2032       } else if (current_node.numNext()==2) {
2033         /* Branch */
2034         output.print("   ");
2035         generateFlatCondBranch(fm, (FlatCondBranch)current_node, "L"+nodetolabel.get(current_node.getNext(1)), output);
2036         if (!visited.contains(current_node.getNext(1)))
2037           tovisit.add(current_node.getNext(1));
2038         if (visited.contains(current_node.getNext(0))) {
2039           output.println("goto L"+nodetolabel.get(current_node.getNext(0))+";");
2040           current_node=null;
2041         } else
2042           current_node=current_node.getNext(0);
2043       } else throw new Error();
2044     }
2045   }
2046
2047   protected Hashtable<FlatNode, Integer> assignLabels(FlatNode first, Set<FlatNode> lastset) {
2048     HashSet tovisit=new HashSet();
2049     HashSet visited=new HashSet();
2050     int labelindex=0;
2051     Hashtable<FlatNode, Integer> nodetolabel=new Hashtable<FlatNode, Integer>();
2052     tovisit.add(first);
2053
2054     /*Assign labels first.  A node needs a label if the previous
2055      * node has two exits or this node is a join point. */
2056
2057     while(!tovisit.isEmpty()) {
2058       FlatNode fn=(FlatNode)tovisit.iterator().next();
2059       tovisit.remove(fn);
2060       visited.add(fn);
2061
2062
2063       if(lastset!=null&&lastset.contains(fn)) {
2064         // if last is not null and matches, don't go
2065         // any further for assigning labels
2066         continue;
2067       }
2068
2069       for(int i=0; i<fn.numNext(); i++) {
2070         FlatNode nn=fn.getNext(i);
2071
2072         if(i>0) {
2073           //1) Edge >1 of node
2074           nodetolabel.put(nn,new Integer(labelindex++));
2075         }
2076         if (!visited.contains(nn)&&!tovisit.contains(nn)) {
2077           tovisit.add(nn);
2078         } else {
2079           //2) Join point
2080           nodetolabel.put(nn,new Integer(labelindex++));
2081         }
2082       }
2083     }
2084     return nodetolabel;
2085   }
2086
2087   /** Generate text string that corresponds to the TempDescriptor td. */
2088   protected String generateTemp(FlatMethod fm, TempDescriptor td) {
2089     MethodDescriptor md=fm.getMethod();
2090     TaskDescriptor task=fm.getTask();
2091     TempObject objecttemps=(TempObject) tempstable.get(md!=null ? md : task);
2092
2093     if (objecttemps.isLocalPrim(td)||objecttemps.isParamPrim(td)) {
2094       return td.getSafeSymbol();
2095     }
2096
2097     if (objecttemps.isLocalPtr(td)) {
2098       return localsprefixderef+td.getSafeSymbol();
2099     }
2100
2101     if (objecttemps.isParamPtr(td)) {
2102       return paramsprefix+"->"+td.getSafeSymbol();
2103     }
2104
2105     throw new Error();
2106   }
2107
2108
2109
2110   protected void generateFlatNode(FlatMethod fm, FlatNode fn, PrintWriter output) {
2111     if(state.LINENUM) printSourceLineNumber(fm,fn,output);
2112     additionalCodePreNode(fm, fn, output);
2113
2114     switch(fn.kind()) {
2115     case FKind.FlatAtomicEnterNode:
2116       generateFlatAtomicEnterNode(fm, (FlatAtomicEnterNode) fn, output);
2117       break;
2118
2119     case FKind.FlatAtomicExitNode:
2120       generateFlatAtomicExitNode(fm, (FlatAtomicExitNode) fn, output);
2121       break;
2122
2123     case FKind.FlatInstanceOfNode:
2124       generateFlatInstanceOfNode(fm, (FlatInstanceOfNode)fn, output);
2125       break;
2126
2127     case FKind.FlatSESEEnterNode:
2128       generateFlatSESEEnterNode(fm, (FlatSESEEnterNode)fn, output);
2129       break;
2130
2131     case FKind.FlatSESEExitNode:
2132       generateFlatSESEExitNode(fm, (FlatSESEExitNode)fn, output);
2133       break;
2134
2135     case FKind.FlatWriteDynamicVarNode:
2136       generateFlatWriteDynamicVarNode(fm, (FlatWriteDynamicVarNode)fn, output);
2137       break;
2138
2139     case FKind.FlatGlobalConvNode:
2140       generateFlatGlobalConvNode(fm, (FlatGlobalConvNode) fn, output);
2141       break;
2142
2143     case FKind.FlatTagDeclaration:
2144       generateFlatTagDeclaration(fm, (FlatTagDeclaration) fn,output);
2145       break;
2146
2147     case FKind.FlatCall:
2148       generateFlatCall(fm, (FlatCall) fn,output);
2149       break;
2150
2151     case FKind.FlatFieldNode:
2152       generateFlatFieldNode(fm, (FlatFieldNode) fn,output);
2153       break;
2154
2155     case FKind.FlatElementNode:
2156       generateFlatElementNode(fm, (FlatElementNode) fn,output);
2157       break;
2158
2159     case FKind.FlatSetElementNode:
2160       generateFlatSetElementNode(fm, (FlatSetElementNode) fn,output);
2161       break;
2162
2163     case FKind.FlatSetFieldNode:
2164       generateFlatSetFieldNode(fm, (FlatSetFieldNode) fn,output);
2165       break;
2166
2167     case FKind.FlatNew:
2168       generateFlatNew(fm, (FlatNew) fn,output);
2169       break;
2170
2171     case FKind.FlatOpNode:
2172       generateFlatOpNode(fm, (FlatOpNode) fn,output);
2173       break;
2174
2175     case FKind.FlatCastNode:
2176       generateFlatCastNode(fm, (FlatCastNode) fn,output);
2177       break;
2178
2179     case FKind.FlatLiteralNode:
2180       generateFlatLiteralNode(fm, (FlatLiteralNode) fn,output);
2181       break;
2182
2183     case FKind.FlatReturnNode:
2184       generateFlatReturnNode(fm, (FlatReturnNode) fn,output);
2185       break;
2186
2187     case FKind.FlatNop:
2188       output.println("/* nop */");
2189       break;
2190
2191     case FKind.FlatGenReachNode:
2192       // this node is just for generating a reach graph
2193       // in disjointness analysis at a particular program point
2194       break;
2195
2196     case FKind.FlatExit:
2197       output.println("/* exit */");
2198       break;
2199
2200     case FKind.FlatBackEdge:
2201       generateFlatBackEdge(fm, (FlatBackEdge)fn, output);
2202       break;
2203
2204     case FKind.FlatCheckNode:
2205       generateFlatCheckNode(fm, (FlatCheckNode) fn, output);
2206       break;
2207
2208     case FKind.FlatFlagActionNode:
2209       generateFlatFlagActionNode(fm, (FlatFlagActionNode) fn, output);
2210       break;
2211
2212     case FKind.FlatPrefetchNode:
2213       generateFlatPrefetchNode(fm, (FlatPrefetchNode) fn, output);
2214       break;
2215
2216     case FKind.FlatOffsetNode:
2217       generateFlatOffsetNode(fm, (FlatOffsetNode)fn, output);
2218       break;
2219
2220     default:
2221       throw new Error();
2222     }
2223
2224     additionalCodePostNode(fm, fn, output);
2225   }
2226
2227   public void generateFlatBackEdge(FlatMethod fm, FlatBackEdge fn, PrintWriter output) {
2228     if (((state.OOOJAVA||state.THREAD)&&GENERATEPRECISEGC)
2229         || (this.state.MULTICOREGC)) {
2230       if(this.state.MULTICOREGC) {
2231         output.println("if (gcflag) gc("+localsprefixaddr+");");
2232       } else {
2233         output.println("if (unlikely(needtocollect)) checkcollect("+localsprefixaddr+");");
2234       }
2235     } else
2236       output.println("/* nop */");
2237   }
2238
2239   public void generateFlatOffsetNode(FlatMethod fm, FlatOffsetNode fofn, PrintWriter output) {
2240     output.println("/* FlatOffsetNode */");
2241     FieldDescriptor fd=fofn.getField();
2242     if(!fd.isStatic()) {
2243     output.println(generateTemp(fm, fofn.getDst())+ " = (short)(int) (&((struct "+fofn.getClassType().getSafeSymbol() +" *)0)->"+
2244                    fd.getSafeSymbol()+");");
2245     }
2246     output.println("/* offset */");
2247   }
2248
2249   public void generateFlatPrefetchNode(FlatMethod fm, FlatPrefetchNode fpn, PrintWriter output) {
2250   }
2251
2252   public void generateFlatGlobalConvNode(FlatMethod fm, FlatGlobalConvNode fgcn, PrintWriter output) {
2253   }
2254
2255   public void generateFlatInstanceOfNode(FlatMethod fm,  FlatInstanceOfNode fion, PrintWriter output) {
2256     int type;
2257     int otype;
2258     if (fion.getType().isArray()) {
2259       type=state.getArrayNumber(fion.getType())+state.numClasses();
2260     } else if (fion.getType().getClassDesc().isInterface()) {
2261       type=fion.getType().getClassDesc().getId()+state.numClasses()+state.numArrays();
2262     } else {
2263       type=fion.getType().getClassDesc().getId();
2264     }
2265     if (fion.getSrc().getType().isArray()) {
2266       otype=state.getArrayNumber(fion.getSrc().getType())+state.numClasses();
2267     } else if (fion.getSrc().getType().getClassDesc().isInterface()) {
2268       otype=fion.getSrc().getType().getClassDesc().getId()+state.numClasses()+state.numArrays();
2269     } else {
2270       otype=fion.getSrc().getType().getClassDesc().getId();
2271     }
2272
2273     if (fion.getType().getSymbol().equals(TypeUtil.ObjectClass))
2274       output.println(generateTemp(fm, fion.getDst())+"=(" + generateTemp(fm,fion.getSrc()) + "!= NULL);");
2275     else {
2276       output.println(generateTemp(fm, fion.getDst())+"=instanceof("+generateTemp(fm,fion.getSrc())+","+type+");");
2277     }
2278   }
2279
2280   public void generateFlatAtomicEnterNode(FlatMethod fm, FlatAtomicEnterNode faen, PrintWriter output) {
2281   }
2282
2283   public void generateFlatAtomicExitNode(FlatMethod fm,  FlatAtomicExitNode faen, PrintWriter output) {
2284   }
2285
2286   public void generateFlatSESEEnterNode(FlatMethod fm,
2287                                         FlatSESEEnterNode fsen,
2288                                         PrintWriter output) {
2289     // if OOOJAVA flag is off, okay that SESE nodes are in IR graph,
2290     // just skip over them and code generates exactly the same
2291   }
2292
2293   public void generateFlatSESEExitNode(FlatMethod fm,
2294                                        FlatSESEExitNode fsexn,
2295                                        PrintWriter output) {
2296     // if OOOJAVA flag is off, okay that SESE nodes are in IR graph,
2297     // just skip over them and code generates exactly the same
2298   }
2299
2300   public void generateFlatWriteDynamicVarNode(FlatMethod fm,
2301                                               FlatWriteDynamicVarNode fwdvn,
2302                                               PrintWriter output) {
2303   }
2304
2305
2306   protected void generateFlatCheckNode(FlatMethod fm,  FlatCheckNode fcn, PrintWriter output) {
2307     if (state.CONSCHECK) {
2308       String specname=fcn.getSpec();
2309       String varname="repairstate___";
2310       output.println("{");
2311       output.println("struct "+specname+"_state * "+varname+"=allocate"+specname+"_state();");
2312
2313       TempDescriptor[] temps=fcn.getTemps();
2314       String[] vars=fcn.getVars();
2315       for(int i=0; i<temps.length; i++) {
2316         output.println(varname+"->"+vars[i]+"=(unsigned int)"+generateTemp(fm, temps[i])+";");
2317       }
2318
2319       output.println("if (doanalysis"+specname+"("+varname+")) {");
2320       output.println("free"+specname+"_state("+varname+");");
2321       output.println("} else {");
2322       output.println("/* Bad invariant */");
2323       output.println("free"+specname+"_state("+varname+");");
2324       output.println("abort_task();");
2325       output.println("}");
2326       output.println("}");
2327     }
2328   }
2329
2330   protected void generateFlatCall(FlatMethod fm, FlatCall fc, PrintWriter output) {
2331     MethodDescriptor md=fc.getMethod();
2332     ParamsObject objectparams=(ParamsObject)paramstable.get(md);
2333     ClassDescriptor cn=md.getClassDesc();
2334     String mdstring = md.getSafeMethodDescriptor();
2335     if(mgcstaticinit && !md.isStaticBlock() && !md.getModifiers().isNative()) {
2336       mdstring += "staticinit";
2337     }
2338
2339     // if the called method is a static block or a static method or a constructor
2340     // need to check if it can be invoked inside some static block
2341     if((md.isStatic() || md.isStaticBlock() || md.isConstructor()) &&
2342        ((fm.getMethod() != null) && ((fm.getMethod().isStaticBlock()) || (fm.getMethod().isInvokedByStatic())))) {
2343       if(!md.isInvokedByStatic()) {
2344         System.err.println("Error: a method that is invoked inside a static block is not tagged!");
2345       }
2346       // is a static block or is invoked in some static block
2347       ClassDescriptor cd = fm.getMethod().getClassDesc();
2348       if(cd == cn) {
2349         // the same class, do nothing
2350       } else if(mgcstaticinit) {
2351         // generate static init check code if it has not done static init in main()
2352         if((cn.getNumStaticFields() != 0) || (cn.getNumStaticBlocks() != 0)) {
2353           // need to check if the class' static fields have been initialized and/or
2354           // its static blocks have been executed
2355           output.println("if(global_defsprim_p->" + cn.getSafeSymbol()+"static_block_exe_flag == 0) {");
2356           if(cn.getNumStaticBlocks() != 0) {
2357             MethodDescriptor t_md = (MethodDescriptor)cn.getMethodTable().get("staticblocks");
2358         if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
2359           output.print("       struct "+cn.getSafeSymbol()+t_md.getSafeSymbol()+"_"+t_md.getSafeMethodDescriptor()+"_params __parameterlist__={");
2360           output.println("0, NULL};");
2361           output.println("     "+cn.getSafeSymbol()+t_md.getSafeSymbol()+"_"+t_md.getSafeMethodDescriptor()+"(& __parameterlist__);");
2362         } else {
2363           output.println("  "+cn.getSafeSymbol()+t_md.getSafeSymbol()+"_"+t_md.getSafeMethodDescriptor()+"();");
2364         }
2365           } else {
2366             output.println("  global_defsprim_p->" + cn.getSafeSymbol()+"static_block_exe_flag = 1;");
2367           }
2368           output.println("}");
2369         }
2370       }
2371     }
2372     if((md.getSymbol().equals("MonitorEnter") || md.getSymbol().equals("MonitorExit")) && fc.getThis().getSymbol().equals("classobj")) {
2373       output.println("{");
2374       if(md.getSymbol().equals("MonitorEnter") && state.OBJECTLOCKDEBUG) {
2375         output.println("int monitorenterline = __LINE__;");
2376       }
2377       // call MonitorEnter/MonitorExit on a class obj
2378       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
2379         output.print("       struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"_params __parameterlist__={");
2380         output.println("1," + localsprefixaddr + ", global_defs_p->"+ fc.getThis().getType().getClassDesc().getSafeSymbol() +"classobj};");
2381         if(md.getSymbol().equals("MonitorEnter") && state.OBJECTLOCKDEBUG) {
2382           output.println("     "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(& __parameterlist__, monitorenterline);");
2383         } else {
2384         output.println("     "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+md.getSafeMethodDescriptor()+"(& __parameterlist__);");
2385         }
2386       } else {
2387       output.println("       " + cn.getSafeSymbol()+md.getSafeSymbol()+"_"
2388                      + md.getSafeMethodDescriptor() + "((struct ___Object___*)(global_defs_p->"
2389                      + fc.getThis().getType().getClassDesc().getSafeSymbol() +"classobj));");
2390       }
2391       output.println("}");
2392       return;
2393     }
2394
2395     output.println("{");
2396     if(md.getSymbol().equals("MonitorEnter")) {
2397       output.println("int monitorenterline = __LINE__;");
2398     }
2399     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
2400       output.print("       struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+mdstring+"_params __parameterlist__={");
2401       output.print(objectparams.numPointers());
2402       output.print(", "+localsprefixaddr);
2403       if (md.getThis()!=null) {
2404         output.print(", ");
2405         output.print("(struct "+md.getThis().getType().getSafeSymbol() +" *)"+ generateTemp(fm,fc.getThis()));
2406       }
2407       if (fc.getThis()!=null&&md.getThis()==null) {
2408         System.out.println("WARNING!!!!!!!!!!!!");
2409         System.out.println("Source code calls static method "+md+" on an object in "+fm.getMethod()+"!");
2410       }
2411
2412
2413       for(int i=0; i<fc.numArgs(); i++) {
2414         Descriptor var=md.getParameter(i);
2415         TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
2416         if (objectparams.isParamPtr(paramtemp)) {
2417           TempDescriptor targ=fc.getArg(i);
2418           output.print(", ");
2419           TypeDescriptor td=md.getParamType(i);
2420           if (td.isTag())
2421             output.print("(struct "+(new TypeDescriptor(typeutil.getClass(TypeUtil.TagClass))).getSafeSymbol()  +" *)"+generateTemp(fm, targ));
2422           else
2423             output.print("(struct "+md.getParamType(i).getSafeSymbol()  +" *)"+generateTemp(fm, targ));
2424         }
2425       }
2426       output.println("};");
2427     }
2428     output.print("       ");
2429
2430
2431     if (fc.getReturnTemp()!=null)
2432       output.print(generateTemp(fm,fc.getReturnTemp())+"=");
2433
2434     /* Do we need to do virtual dispatch? */
2435     if (!md.isStatic()&&md.getReturnType()!=null&&fc.getThis().getType().getClassDesc()==null) {
2436       System.out.println(fm);
2437       System.out.println(md);
2438       System.out.println(fc);
2439       System.out.println(fm.printMethod());
2440     }
2441
2442     if (md.isStatic()||md.getReturnType()==null||singleCall(fc.getThis().getType().getClassDesc(),md)||fc.getSuper()) {
2443       //no
2444       output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+mdstring);
2445     } else {
2446       //yes
2447       output.print("((");
2448       if (md.getReturnType().isClass() && md.getReturnType().getClassDesc().isEnum()) {
2449         output.print("int ");
2450       } else if (md.getReturnType().isClass()||md.getReturnType().isArray())
2451         output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
2452       else
2453         output.print(md.getReturnType().getSafeSymbol()+" ");
2454       output.print("(*)(");
2455
2456       boolean printcomma=false;
2457       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
2458         output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+mdstring+"_params * ");
2459         printcomma=true;
2460       }
2461
2462       for(int i=0; i<objectparams.numPrimitives(); i++) {
2463         TempDescriptor temp=objectparams.getPrimitive(i);
2464         if (printcomma)
2465           output.print(", ");
2466         printcomma=true;
2467         if (temp.getType().isClass() && temp.getType().getClassDesc().isEnum()) {
2468           output.print("int ");
2469         } else if (temp.getType().isClass()||temp.getType().isArray())
2470           output.print("struct " + temp.getType().getSafeSymbol()+" * ");
2471         else
2472           output.print(temp.getType().getSafeSymbol());
2473       }
2474
2475       if(md.getSymbol().equals("MonitorEnter") && state.OBJECTLOCKDEBUG) {
2476         output.print(", int");
2477       }
2478       output.print("))virtualtable["+generateTemp(fm,fc.getThis())+"->type*"+maxcount+"+"+virtualcalls.getMethodNumber(md)+"])");
2479     }
2480
2481     output.print("(");
2482     boolean needcomma=false;
2483     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
2484       output.print("&__parameterlist__");
2485       needcomma=true;
2486     }
2487
2488     if (!GENERATEPRECISEGC && !this.state.MULTICOREGC) {
2489       if (fc.getThis()!=null) {
2490         TypeDescriptor ptd=null;
2491         if(md.getThis() != null) {
2492           ptd = md.getThis().getType();
2493         } else {
2494           ptd = fc.getThis().getType();
2495         }
2496         if (needcomma)
2497           output.print(",");
2498         if(ptd.isClass() && ptd.getClassDesc().isEnum()) {
2499           // do nothing
2500         } else if (ptd.isClass()&&!ptd.isArray())
2501           output.print("(struct "+ptd.getSafeSymbol()+" *) ");
2502         output.print(generateTemp(fm,fc.getThis()));
2503         needcomma=true;
2504       }
2505     }
2506
2507     for(int i=0; i<fc.numArgs(); i++) {
2508       Descriptor var=md.getParameter(i);
2509       TempDescriptor paramtemp=(TempDescriptor)temptovar.get(var);
2510       if (objectparams.isParamPrim(paramtemp)) {
2511         TempDescriptor targ=fc.getArg(i);
2512         if (needcomma)
2513           output.print(", ");
2514
2515         TypeDescriptor ptd=md.getParamType(i);
2516         if (ptd.isClass() && ptd.getClassDesc().isEnum()) {
2517           // do nothing
2518         } else if (ptd.isClass()&&!ptd.isArray())
2519           output.print("(struct "+ptd.getSafeSymbol()+" *) ");
2520         output.print(generateTemp(fm, targ));
2521         needcomma=true;
2522       }
2523     }
2524     if(md.getSymbol().equals("MonitorEnter") && state.OBJECTLOCKDEBUG) {
2525       output.println(", monitorenterline);");
2526     } else {
2527     output.println(");");
2528     }
2529     output.println("   }");
2530   }
2531
2532   protected boolean singleCall(ClassDescriptor thiscd, MethodDescriptor md) {
2533     if(thiscd.isInterface()) {
2534       // for interfaces, always need virtual dispatch
2535       return false;
2536     } else {
2537     Set subclasses=typeutil.getSubClasses(thiscd);
2538     if (subclasses==null)
2539       return true;
2540     for(Iterator classit=subclasses.iterator(); classit.hasNext(); ) {
2541       ClassDescriptor cd=(ClassDescriptor)classit.next();
2542       Set possiblematches=cd.getMethodTable().getSetFromSameScope(md.getSymbol());
2543       for(Iterator matchit=possiblematches.iterator(); matchit.hasNext(); ) {
2544         MethodDescriptor matchmd=(MethodDescriptor)matchit.next();
2545         if (md.matches(matchmd))
2546           return false;
2547       }
2548     }
2549     }
2550     return true;
2551   }
2552
2553   protected void generateFlatFieldNode(FlatMethod fm, FlatFieldNode ffn, PrintWriter output) {
2554
2555     if(ffn.getField().isStatic()) {
2556       // static field
2557       if((fm.getMethod().isStaticBlock()) || (fm.getMethod().isInvokedByStatic())) {
2558         // is a static block or is invoked in some static block
2559         ClassDescriptor cd = fm.getMethod().getClassDesc();
2560         ClassDescriptor cn = ffn.getSrc().getType().getClassDesc();
2561         if(cd == cn) {
2562           // the same class, do nothing
2563         } else if(mgcstaticinit) {
2564       // generate the static init check code if has not done the static init in main()
2565           if((cn.getNumStaticFields() != 0) || (cn.getNumStaticBlocks() != 0)) {
2566             // need to check if the class' static fields have been initialized and/or
2567             // its static blocks have been executed
2568             output.println("if(global_defsprim_p->" + cn.getSafeSymbol()+"static_block_exe_flag == 0) {");
2569             if(cn.getNumStaticBlocks() != 0) {
2570               MethodDescriptor t_md = (MethodDescriptor)cn.getMethodTable().get("staticblocks");
2571           if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
2572             output.print("       struct "+cn.getSafeSymbol()+t_md.getSafeSymbol()+"_"+t_md.getSafeMethodDescriptor()+"_params __parameterlist__={");
2573             output.println("0, NULL};");
2574             output.println("     "+cn.getSafeSymbol()+t_md.getSafeSymbol()+"_"+t_md.getSafeMethodDescriptor()+"(& __parameterlist__);");
2575           } else {
2576             output.println("  "+cn.getSafeSymbol()+t_md.getSafeSymbol()+"_"+t_md.getSafeMethodDescriptor()+"();");
2577           }
2578             } else {
2579               output.println("  global_defsprim_p->" + cn.getSafeSymbol()+"static_block_exe_flag = 1;");
2580             }
2581             output.println("}");
2582           }
2583         }
2584       }
2585       // redirect to the global_defs_p structure
2586         if (ffn.getField().getType().isPtr())
2587           output.println(generateTemp(fm, ffn.getDst())+"=global_defs_p->"+ffn.getField().getSafeSymbol()+";");
2588         else
2589           output.println(generateTemp(fm, ffn.getDst())+"=global_defsprim_p->"+ffn.getField().getSafeSymbol()+";");
2590     } else if (ffn.getField().isEnum()) {
2591       // an Enum value, directly replace the field access as int
2592       output.println(generateTemp(fm, ffn.getDst()) + "=" + ffn.getField().enumValue() + ";");
2593     } else {
2594       output.println("#ifdef MULTICORE_DEBUG");
2595       output.println("if (" + generateTemp(fm,ffn.getSrc()) + " == NULL) {");
2596       output.println("printf(\" NULL ptr error: %s, %s, %d \\n\", __FILE__, __func__, __LINE__);");
2597       if(state.MULTICOREGC) {
2598         output.println("failednullptr(&___locals___);");
2599       } else {
2600         output.println("failednullptr(NULL);");
2601       }
2602       output.println("}");
2603       output.println("#endif //MULTICORE_DEBUG");
2604       output.println(generateTemp(fm, ffn.getDst())+"="+ generateTemp(fm,ffn.getSrc())+"->"+ ffn.getField().getSafeSymbol()+";");
2605     }
2606   }
2607
2608
2609   protected void generateFlatSetFieldNode(FlatMethod fm, FlatSetFieldNode fsfn, PrintWriter output) {
2610     if (fsfn.getField().getSymbol().equals("length")&&fsfn.getDst().getType().isArray())
2611       throw new Error("Can't set array length");
2612     if (state.FASTCHECK) {
2613       String dst=generateTemp(fm, fsfn.getDst());
2614       output.println("if(!"+dst+"->"+localcopystr+") {");
2615       /* Link object into list */
2616       if (GENERATEPRECISEGC || this.state.MULTICOREGC)
2617         output.println("COPY_OBJ((struct garbagelist *)"+localsprefixaddr+",(struct ___Object___ *)"+dst+");");
2618       else
2619         output.println("COPY_OBJ("+dst+");");
2620       output.println(dst+"->"+nextobjstr+"="+fcrevert+";");
2621       output.println(fcrevert+"=(struct ___Object___ *)"+dst+";");
2622       output.println("}");
2623     }
2624
2625     if(fsfn.getField().isStatic()) {
2626       // static field
2627       if((fm.getMethod().isStaticBlock()) || (fm.getMethod().isInvokedByStatic())) {
2628         // is a static block or is invoked in some static block
2629         ClassDescriptor cd = fm.getMethod().getClassDesc();
2630         ClassDescriptor cn = fsfn.getDst().getType().getClassDesc();
2631         if(cd != cn && mgcstaticinit){
2632           // generate static init check code if has not done the static init in main()
2633           if((cn.getNumStaticFields() != 0) || (cn.getNumStaticBlocks() != 0)) {
2634             // need to check if the class' static fields have been initialized and/or
2635             // its static blocks have been executed
2636             output.println("if(global_defsprim_p->" + cn.getSafeSymbol()+"static_block_exe_flag == 0) {");
2637             if(cn.getNumStaticBlocks() != 0) {
2638               MethodDescriptor t_md = (MethodDescriptor)cn.getMethodTable().get("staticblocks");
2639               if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
2640                 output.print("       struct "+cn.getSafeSymbol()+t_md.getSafeSymbol()+"_"+t_md.getSafeMethodDescriptor()+"_params __parameterlist__={");
2641                 output.println("0, NULL};");
2642                 output.println("     "+cn.getSafeSymbol()+t_md.getSafeSymbol()+"_"+t_md.getSafeMethodDescriptor()+"(& __parameterlist__);");
2643               } else {
2644                 output.println("  "+cn.getSafeSymbol()+t_md.getSafeSymbol()+"_"+t_md.getSafeMethodDescriptor()+"();");
2645               }
2646             } else {
2647               output.println("  global_defsprim_p->" + cn.getSafeSymbol()+"static_block_exe_flag = 1;");
2648             }
2649             output.println("}");
2650           }
2651         }
2652       }
2653       // redirect to the global_defs_p structure
2654       if (fsfn.getField().getType().isPtr()) {
2655         if (fsfn.getField().getType()!=fsfn.getSrc().getType())
2656           output.println("global_defs_p->" +
2657                          fsfn.getField().getSafeSymbol()+"=(struct "+ fsfn.getField().getType().getSafeSymbol()+" *)"+generateTemp(fm,fsfn.getSrc())+";");
2658         else
2659           output.println("global_defs_p->" +
2660                          fsfn.getField().getSafeSymbol()+"="+ generateTemp(fm,fsfn.getSrc())+";");
2661       } else
2662         output.println("global_defsprim_p->" +
2663                        fsfn.getField().getSafeSymbol()+"="+ generateTemp(fm,fsfn.getSrc())+";");
2664     } else {
2665       output.println("#ifdef MULTICORE_DEBUG");
2666       output.println("if (" + generateTemp(fm,fsfn.getDst()) + " == NULL) {");
2667       output.println("printf(\" NULL ptr error: %s, %s, %d \\n\", __FILE__, __func__, __LINE__);");
2668       if(state.MULTICOREGC) {
2669         output.println("failednullptr(&___locals___);");
2670       } else {
2671         output.println("failednullptr(NULL);");
2672       }
2673       output.println("}");
2674       output.println("#endif //MULTICORE_DEBUG");
2675       if (fsfn.getSrc().getType().isPtr()&&fsfn.getSrc().getType()!=fsfn.getField().getType())
2676         output.println(generateTemp(fm, fsfn.getDst())+"->"+
2677                        fsfn.getField().getSafeSymbol()+"=(struct "+ fsfn.getField().getType().getSafeSymbol()+"*)"+generateTemp(fm,fsfn.getSrc())+";");
2678       else
2679         output.println(generateTemp(fm, fsfn.getDst())+"->"+
2680                        fsfn.getField().getSafeSymbol()+"="+ generateTemp(fm,fsfn.getSrc())+";");
2681     }
2682   }
2683
2684
2685   protected void generateFlatElementNode(FlatMethod fm, FlatElementNode fen, PrintWriter output) {
2686     TypeDescriptor elementtype=fen.getSrc().getType().dereference();
2687     String type="";
2688
2689     if (elementtype.isClass() && elementtype.getClassDesc().isEnum()) {
2690       type="int ";
2691     } else if (elementtype.isArray()||elementtype.isClass())
2692       type="void *";
2693     else
2694       type=elementtype.getSafeSymbol()+" ";
2695
2696     if (this.state.ARRAYBOUNDARYCHECK && fen.needsBoundsCheck()) {
2697       output.println("if (unlikely(((unsigned int)"+generateTemp(fm, fen.getIndex())+") >= "+generateTemp(fm,fen.getSrc()) + "->___length___))");
2698       output.println("failedboundschk(" + (boundschknum++) + ");");
2699     }
2700     output.println(generateTemp(fm, fen.getDst())+"=(("+ type+"*)(((char *) &("+ generateTemp(fm,fen.getSrc())+"->___length___))+sizeof(int)))["+generateTemp(fm, fen.getIndex())+"];");
2701   }
2702
2703   protected void generateFlatSetElementNode(FlatMethod fm, FlatSetElementNode fsen, PrintWriter output) {
2704     //TODO: need dynamic check to make sure this assignment is actually legal
2705     //Because Object[] could actually be something more specific...ie. Integer[]
2706
2707     TypeDescriptor elementtype=fsen.getDst().getType().dereference();
2708     String type="";
2709
2710     if (elementtype.isClass() && elementtype.getClassDesc().isEnum()) {
2711       type="int ";
2712     } else if (elementtype.isArray()||elementtype.isClass() || (elementtype.isNull()))
2713       type="void *";
2714     else
2715       type=elementtype.getSafeSymbol()+" ";
2716
2717     if (this.state.ARRAYBOUNDARYCHECK && fsen.needsBoundsCheck()) {
2718       output.println("if (unlikely(((unsigned int)"+generateTemp(fm, fsen.getIndex())+") >= "+generateTemp(fm,fsen.getDst()) + "->___length___))");
2719       output.println("failedboundschk(" + (boundschknum++) + ");");
2720     }
2721     if (state.FASTCHECK) {
2722       String dst=generateTemp(fm, fsen.getDst());
2723       output.println("if(!"+dst+"->"+localcopystr+") {");
2724       /* Link object into list */
2725       if (GENERATEPRECISEGC || this.state.MULTICOREGC)
2726         output.println("COPY_OBJ((struct garbagelist *)"+localsprefixaddr+",(struct ___Object___ *)"+dst+");");
2727       else
2728         output.println("COPY_OBJ("+dst+");");
2729       output.println(dst+"->"+nextobjstr+"="+fcrevert+";");
2730       output.println(fcrevert+"=(struct ___Object___ *)"+dst+";");
2731       output.println("}");
2732     }
2733     output.println("(("+type +"*)(((char *) &("+ generateTemp(fm,fsen.getDst())+"->___length___))+sizeof(int)))["+generateTemp(fm, fsen.getIndex())+"]="+generateTemp(fm,fsen.getSrc())+";");
2734   }
2735
2736
2737   protected void generateFlatNew(FlatMethod fm, FlatNew fn, PrintWriter output) {
2738     if (fn.getType().isArray()) {
2739       int arrayid=state.getArrayNumber(fn.getType())+state.numClasses();
2740       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
2741         output.println(generateTemp(fm,fn.getDst())+"=allocate_newarray("+localsprefixaddr+", "+arrayid+", "+generateTemp(fm, fn.getSize())+");");
2742       } else {
2743         output.println(generateTemp(fm,fn.getDst())+"=allocate_newarray("+arrayid+", "+generateTemp(fm, fn.getSize())+");");
2744       }
2745     } else {
2746       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
2747         output.println(generateTemp(fm,fn.getDst())+"=allocate_new("+localsprefixaddr+", "+fn.getType().getClassDesc().getId()+");");
2748       } else {
2749         output.println(generateTemp(fm,fn.getDst())+"=allocate_new("+fn.getType().getClassDesc().getId()+");");
2750       }
2751     }
2752     if (state.FASTCHECK) {
2753       String dst=generateTemp(fm,fn.getDst());
2754       output.println(dst+"->___localcopy___=(struct ___Object___*)1;");
2755       output.println(dst+"->"+nextobjstr+"="+fcrevert+";");
2756       output.println(fcrevert+"=(struct ___Object___ *)"+dst+";");
2757     }
2758   }
2759
2760   protected void generateFlatTagDeclaration(FlatMethod fm, FlatTagDeclaration fn, PrintWriter output) {
2761     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
2762       output.println(generateTemp(fm,fn.getDst())+"=allocate_tag("+localsprefixaddr+", "+state.getTagId(fn.getType())+");");
2763     } else {
2764       output.println(generateTemp(fm,fn.getDst())+"=allocate_tag("+state.getTagId(fn.getType())+");");
2765     }
2766   }
2767
2768   protected void generateFlatOpNode(FlatMethod fm, FlatOpNode fon, PrintWriter output) {
2769     if (fon.getRight()!=null) {
2770       if (fon.getOp().getOp()==Operation.URIGHTSHIFT) {
2771         if (fon.getLeft().getType().isLong())
2772           output.println(generateTemp(fm, fon.getDest())+" = ((unsigned long long)"+generateTemp(fm, fon.getLeft())+")>>"+generateTemp(fm,fon.getRight())+";");
2773         else
2774           output.println(generateTemp(fm, fon.getDest())+" = ((unsigned int)"+generateTemp(fm, fon.getLeft())+")>>"+generateTemp(fm,fon.getRight())+";");
2775
2776       } else {
2777         if (fon.getLeft().getType().isPtr()&&fon.getLeft().getType()!=fon.getRight().getType()&&!fon.getRight().getType().isNull())
2778           output.println(generateTemp(fm, fon.getDest())+" = (struct "+fon.getRight().getType().getSafeSymbol()+"*)"+generateTemp(fm, fon.getLeft())+fon.getOp().toString()+generateTemp(fm,fon.getRight())+";");
2779         else
2780           output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+fon.getOp().toString()+generateTemp(fm,fon.getRight())+";");
2781       }
2782     } else if (fon.getOp().getOp()==Operation.ASSIGN)
2783       if (fon.getDest().getType().isPtr()&&fon.getDest().getType()!=fon.getLeft().getType())
2784         output.println(generateTemp(fm, fon.getDest())+" = (struct "+fon.getDest().getType().getSafeSymbol()+"*)"+generateTemp(fm, fon.getLeft())+";");
2785       else
2786         output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+";");
2787     else if (fon.getOp().getOp()==Operation.UNARYPLUS)
2788       output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+";");
2789     else if (fon.getOp().getOp()==Operation.UNARYMINUS)
2790       output.println(generateTemp(fm, fon.getDest())+" = -"+generateTemp(fm, fon.getLeft())+";");
2791     else if (fon.getOp().getOp()==Operation.LOGIC_NOT)
2792       output.println(generateTemp(fm, fon.getDest())+" = !"+generateTemp(fm, fon.getLeft())+";");
2793     else if (fon.getOp().getOp()==Operation.COMP)
2794       output.println(generateTemp(fm, fon.getDest())+" = ~"+generateTemp(fm, fon.getLeft())+";");
2795     else if (fon.getOp().getOp()==Operation.ISAVAILABLE) {
2796       output.println(generateTemp(fm, fon.getDest())+" = "+generateTemp(fm, fon.getLeft())+"->fses==NULL;");
2797     } else
2798       output.println(generateTemp(fm, fon.getDest())+fon.getOp().toString()+generateTemp(fm, fon.getLeft())+";");
2799   }
2800
2801   protected void generateFlatCastNode(FlatMethod fm, FlatCastNode fcn, PrintWriter output) {
2802     /* TODO: Do type check here */
2803     if (fcn.getType().isArray()) {
2804       output.println(generateTemp(fm,fcn.getDst())+"=(struct ArrayObject *)"+generateTemp(fm,fcn.getSrc())+";");
2805     } else if (fcn.getType().isClass() && fcn.getType().getClassDesc().isEnum()) {
2806       output.println(generateTemp(fm,fcn.getDst())+"=(int)"+generateTemp(fm,fcn.getSrc())+";");
2807     } else if (fcn.getType().isClass())
2808       output.println(generateTemp(fm,fcn.getDst())+"=(struct "+fcn.getType().getSafeSymbol()+" *)"+generateTemp(fm,fcn.getSrc())+";");
2809     else
2810       output.println(generateTemp(fm,fcn.getDst())+"=("+fcn.getType().getSafeSymbol()+")"+generateTemp(fm,fcn.getSrc())+";");
2811   }
2812
2813   int flncount=0;
2814
2815   protected void generateFlatLiteralNode(FlatMethod fm, FlatLiteralNode fln, PrintWriter output) {
2816     if (fln.getValue()==null)
2817       output.println(generateTemp(fm, fln.getDst())+"=0;");
2818     else if (fln.getType().getSymbol().equals(TypeUtil.StringClass)) {
2819       String str=(String)fln.getValue();
2820       output.println("{");
2821       output.print("short str"+flncount+"[]={");
2822       for(int i=0;i<str.length();i++) {
2823         if (i!=0)
2824           output.print(", ");
2825         output.print(((int)str.charAt(i)));
2826       }
2827       output.println("};");
2828       if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
2829         output.println(generateTemp(fm, fln.getDst())+"=NewStringShort("+localsprefixaddr+", str"+flncount+", "+((String)fln.getValue()).length()+");");
2830       } else {
2831         output.println(generateTemp(fm, fln.getDst())+"=NewStringShort(str"+flncount+" ,"+((String)fln.getValue()).length()+");");
2832       }
2833       output.println("}");
2834       flncount++;
2835     } else if (fln.getType().isBoolean()) {
2836       if (((Boolean)fln.getValue()).booleanValue())
2837         output.println(generateTemp(fm, fln.getDst())+"=1;");
2838       else
2839         output.println(generateTemp(fm, fln.getDst())+"=0;");
2840     } else if (fln.getType().isChar()) {
2841       int val=(int)(((Character)fln.getValue()).charValue());
2842       output.println(generateTemp(fm, fln.getDst())+"="+val+";");
2843     } else if (fln.getType().isLong()) {
2844       output.println(generateTemp(fm, fln.getDst())+"="+fln.getValue()+"LL;");
2845     } else
2846       output.println(generateTemp(fm, fln.getDst())+"="+fln.getValue()+";");
2847   }
2848
2849   protected void generateFlatReturnNode(FlatMethod fm, FlatReturnNode frn, PrintWriter output) {
2850     if((fm.getMethod() != null) && (fm.getMethod().isStaticBlock())) {
2851       // a static block, check if it has been executed
2852       output.println("  global_defsprim_p->" + fm.getMethod().getClassDesc().getSafeSymbol()+"static_block_exe_flag = 1;");
2853       output.println("");
2854     }
2855
2856     if (frn.getReturnTemp()!=null) {
2857       if (frn.getReturnTemp().getType().isPtr())
2858         output.println("return (struct "+fm.getMethod().getReturnType().getSafeSymbol()+"*)"+generateTemp(fm, frn.getReturnTemp())+";");
2859       else
2860         output.println("return "+generateTemp(fm, frn.getReturnTemp())+";");
2861     } else {
2862       output.println("return;");
2863     }
2864   }
2865
2866   protected void generateFlatCondBranch(FlatMethod fm, FlatCondBranch fcb, String label, PrintWriter output) {
2867     output.println("if (!"+generateTemp(fm, fcb.getTest())+") goto "+label+";");
2868   }
2869
2870   /** This method generates header information for the method or
2871    * task referenced by the Descriptor des. */
2872   protected void generateHeader(FlatMethod fm, Descriptor des, PrintWriter output) {
2873     generateHeader(fm, des, output, false);
2874   }
2875
2876   protected void generateHeader(FlatMethod fm, Descriptor des, PrintWriter output, boolean addSESErecord) {
2877     /* Print header */
2878     ParamsObject objectparams=(ParamsObject)paramstable.get(des);
2879     MethodDescriptor md=null;
2880     TaskDescriptor task=null;
2881     if (des instanceof MethodDescriptor)
2882       md=(MethodDescriptor) des;
2883     else
2884       task=(TaskDescriptor) des;
2885     String mdstring = md != null ? md.getSafeMethodDescriptor() : null;
2886
2887     ClassDescriptor cn=md!=null ? md.getClassDesc() : null;
2888
2889     if (md!=null&&md.getReturnType()!=null) {
2890       if (md.getReturnType().isClass() && md.getReturnType().getClassDesc().isEnum()) {
2891         output.print("int ");
2892       } else if (md.getReturnType().isClass()||md.getReturnType().isArray())
2893         output.print("struct " + md.getReturnType().getSafeSymbol()+" * ");
2894       else
2895         output.print(md.getReturnType().getSafeSymbol()+" ");
2896     } else
2897       //catch the constructor case
2898       output.print("void ");
2899     if (md!=null) {
2900       if(mgcstaticinit && !md.isStaticBlock() && !md.getModifiers().isNative()) {
2901         mdstring += "staticinit";
2902       }
2903       output.print(cn.getSafeSymbol()+md.getSafeSymbol()+"_"+mdstring+"(");
2904     } else
2905       output.print(task.getSafeSymbol()+"(");
2906
2907     boolean printcomma=false;
2908     if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC)) {
2909       if (md!=null) {
2910         output.print("struct "+cn.getSafeSymbol()+md.getSafeSymbol()+"_"+mdstring+"_params * "+paramsprefix);
2911       } else
2912         output.print("struct "+task.getSafeSymbol()+"_params * "+paramsprefix);
2913       printcomma=true;
2914     }
2915
2916     if (md!=null) {
2917       /* Method */
2918       for(int i=0; i<objectparams.numPrimitives(); i++) {
2919         TempDescriptor temp=objectparams.getPrimitive(i);
2920         if (printcomma)
2921           output.print(", ");
2922         printcomma=true;
2923         if(temp.getType().isClass() && temp.getType().getClassDesc().isEnum()) {
2924           output.print("int " + temp.getSafeSymbol());
2925         } else if (temp.getType().isClass()||temp.getType().isArray())
2926           output.print("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol());
2927         else
2928           output.print(temp.getType().getSafeSymbol()+" "+temp.getSafeSymbol());
2929       }
2930       output.println(") {");
2931     } else if (!GENERATEPRECISEGC && !this.state.MULTICOREGC) {
2932       /* Imprecise Task */
2933       output.println("void * parameterarray[]) {");
2934       /* Unpack variables */
2935       for(int i=0; i<objectparams.numPrimitives(); i++) {
2936         TempDescriptor temp=objectparams.getPrimitive(i);
2937         if(temp.getType().isClass() && temp.getType().getClassDesc().isEnum()) {
2938           output.print("int " + temp.getSafeSymbol() + "=parameterarray["+i+"];");
2939         } else {
2940           output.println("struct "+temp.getType().getSafeSymbol()+" * "+temp.getSafeSymbol()+"=parameterarray["+i+"];");
2941         }
2942       }
2943       for(int i=0; i<fm.numTags(); i++) {
2944         TempDescriptor temp=fm.getTag(i);
2945         int offset=i+objectparams.numPrimitives();
2946         output.println("struct ___TagDescriptor___ * "+temp.getSafeSymbol()+"=parameterarray["+offset+"];");
2947       }
2948
2949       if ((objectparams.numPrimitives()+fm.numTags())>maxtaskparams)
2950         maxtaskparams=objectparams.numPrimitives()+fm.numTags();
2951     } else output.println(") {");
2952   }
2953
2954   public void generateFlatFlagActionNode(FlatMethod fm, FlatFlagActionNode ffan, PrintWriter output) {
2955     output.println("/* FlatFlagActionNode */");
2956
2957
2958     /* Process tag changes */
2959     Relation tagsettable=new Relation();
2960     Relation tagcleartable=new Relation();
2961
2962     Iterator tagsit=ffan.getTempTagPairs();
2963     while (tagsit.hasNext()) {
2964       TempTagPair ttp=(TempTagPair) tagsit.next();
2965       TempDescriptor objtmp=ttp.getTemp();
2966       TagDescriptor tag=ttp.getTag();
2967       TempDescriptor tagtmp=ttp.getTagTemp();
2968       boolean tagstatus=ffan.getTagChange(ttp);
2969       if (tagstatus) {
2970         tagsettable.put(objtmp, tagtmp);
2971       } else {
2972         tagcleartable.put(objtmp, tagtmp);
2973       }
2974     }
2975
2976
2977     Hashtable flagandtable=new Hashtable();
2978     Hashtable flagortable=new Hashtable();
2979
2980     /* Process flag changes */
2981     Iterator flagsit=ffan.getTempFlagPairs();
2982     while(flagsit.hasNext()) {
2983       TempFlagPair tfp=(TempFlagPair)flagsit.next();
2984       TempDescriptor temp=tfp.getTemp();
2985       Hashtable flagtable=(Hashtable)flagorder.get(temp.getType().getClassDesc());
2986       FlagDescriptor flag=tfp.getFlag();
2987       if (flag==null) {
2988         //Newly allocate objects that don't set any flags case
2989         if (flagortable.containsKey(temp)) {
2990           throw new Error();
2991         }
2992         int mask=0;
2993         flagortable.put(temp,new Integer(mask));
2994       } else {
2995         int flagid=1<<((Integer)flagtable.get(flag)).intValue();
2996         boolean flagstatus=ffan.getFlagChange(tfp);
2997         if (flagstatus) {
2998           int mask=0;
2999           if (flagortable.containsKey(temp)) {
3000             mask=((Integer)flagortable.get(temp)).intValue();
3001           }
3002           mask|=flagid;
3003           flagortable.put(temp,new Integer(mask));
3004         } else {
3005           int mask=0xFFFFFFFF;
3006           if (flagandtable.containsKey(temp)) {
3007             mask=((Integer)flagandtable.get(temp)).intValue();
3008           }
3009           mask&=(0xFFFFFFFF^flagid);
3010           flagandtable.put(temp,new Integer(mask));
3011         }
3012       }
3013     }
3014
3015
3016     HashSet flagtagset=new HashSet();
3017     flagtagset.addAll(flagortable.keySet());
3018     flagtagset.addAll(flagandtable.keySet());
3019     flagtagset.addAll(tagsettable.keySet());
3020     flagtagset.addAll(tagcleartable.keySet());
3021
3022     Iterator ftit=flagtagset.iterator();
3023     while(ftit.hasNext()) {
3024       TempDescriptor temp=(TempDescriptor)ftit.next();
3025
3026
3027       Set tagtmps=tagcleartable.get(temp);
3028       if (tagtmps!=null) {
3029         Iterator tagit=tagtmps.iterator();
3030         while(tagit.hasNext()) {
3031           TempDescriptor tagtmp=(TempDescriptor)tagit.next();
3032           if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC))
3033             output.println("tagclear("+localsprefixaddr+", (struct ___Object___ *)"+generateTemp(fm, temp)+", "+generateTemp(fm,tagtmp)+");");
3034           else
3035             output.println("tagclear((struct ___Object___ *)"+generateTemp(fm, temp)+", "+generateTemp(fm,tagtmp)+");");
3036         }
3037       }
3038
3039       tagtmps=tagsettable.get(temp);
3040       if (tagtmps!=null) {
3041         Iterator tagit=tagtmps.iterator();
3042         while(tagit.hasNext()) {
3043           TempDescriptor tagtmp=(TempDescriptor)tagit.next();
3044           if ((GENERATEPRECISEGC) || (this.state.MULTICOREGC))
3045             output.println("tagset("+localsprefixaddr+", (struct ___Object___ *)"+generateTemp(fm, temp)+", "+generateTemp(fm,tagtmp)+");");
3046           else
3047             output.println("tagset((struct ___Object___ *)"+generateTemp(fm, temp)+", "+generateTemp(fm,tagtmp)+");");
3048         }
3049       }
3050
3051       int ormask=0;
3052       int andmask=0xFFFFFFF;
3053
3054       if (flagortable.containsKey(temp))
3055         ormask=((Integer)flagortable.get(temp)).intValue();
3056       if (flagandtable.containsKey(temp))
3057         andmask=((Integer)flagandtable.get(temp)).intValue();
3058       generateFlagOrAnd(ffan, fm, temp, output, ormask, andmask);
3059       generateObjectDistribute(ffan, fm, temp, output);
3060     }
3061   }
3062
3063   protected void generateFlagOrAnd(FlatFlagActionNode ffan, FlatMethod fm, TempDescriptor temp,
3064                                    PrintWriter output, int ormask, int andmask) {
3065     if (ffan.getTaskType()==FlatFlagActionNode.NEWOBJECT) {
3066       output.println("flagorandinit("+generateTemp(fm, temp)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
3067     } else {
3068       output.println("flagorand("+generateTemp(fm, temp)+", 0x"+Integer.toHexString(ormask)+", 0x"+Integer.toHexString(andmask)+");");
3069     }
3070   }
3071
3072   protected void generateObjectDistribute(FlatFlagActionNode ffan, FlatMethod fm, TempDescriptor temp, PrintWriter output) {
3073     output.println("enqueueObject("+generateTemp(fm, temp)+");");
3074   }
3075
3076   void generateOptionalHeader(PrintWriter headers) {
3077
3078     //GENERATE HEADERS
3079     headers.println("#include \"task.h\"\n\n");
3080     headers.println("#ifndef _OPTIONAL_STRUCT_");
3081     headers.println("#define _OPTIONAL_STRUCT_");
3082
3083     //STRUCT PREDICATEMEMBER
3084     headers.println("struct predicatemember{");
3085     headers.println("int type;");
3086     headers.println("int numdnfterms;");
3087     headers.println("int * flags;");
3088     headers.println("int numtags;");
3089     headers.println("int * tags;\n};\n\n");
3090
3091     //STRUCT OPTIONALTASKDESCRIPTOR
3092     headers.println("struct optionaltaskdescriptor{");
3093     headers.println("struct taskdescriptor * task;");
3094     headers.println("int index;");
3095     headers.println("int numenterflags;");
3096     headers.println("int * enterflags;");
3097     headers.println("int numpredicatemembers;");
3098     headers.println("struct predicatemember ** predicatememberarray;");
3099     headers.println("};\n\n");
3100
3101     //STRUCT TASKFAILURE
3102     headers.println("struct taskfailure {");
3103     headers.println("struct taskdescriptor * task;");
3104     headers.println("int index;");
3105     headers.println("int numoptionaltaskdescriptors;");
3106     headers.println("struct optionaltaskdescriptor ** optionaltaskdescriptorarray;\n};\n\n");
3107
3108     //STRUCT FSANALYSISWRAPPER
3109     headers.println("struct fsanalysiswrapper{");
3110     headers.println("int  flags;");
3111     headers.println("int numtags;");
3112     headers.println("int * tags;");
3113     headers.println("int numtaskfailures;");
3114     headers.println("struct taskfailure ** taskfailurearray;");
3115     headers.println("int numoptionaltaskdescriptors;");
3116     headers.println("struct optionaltaskdescriptor ** optionaltaskdescriptorarray;\n};\n\n");
3117
3118     //STRUCT CLASSANALYSISWRAPPER
3119     headers.println("struct classanalysiswrapper{");
3120     headers.println("int type;");
3121     headers.println("int numotd;");
3122     headers.println("struct optionaltaskdescriptor ** otdarray;");
3123     headers.println("int numfsanalysiswrappers;");
3124     headers.println("struct fsanalysiswrapper ** fsanalysiswrapperarray;\n};");
3125
3126     headers.println("extern struct classanalysiswrapper * classanalysiswrapperarray[];");
3127
3128     Iterator taskit=state.getTaskSymbolTable().getDescriptorsIterator();
3129     while(taskit.hasNext()) {
3130       TaskDescriptor td=(TaskDescriptor)taskit.next();
3131       headers.println("extern struct taskdescriptor task_"+td.getSafeSymbol()+";");
3132     }
3133
3134   }
3135
3136   //CHECK OVER THIS -- THERE COULD BE SOME ERRORS HERE
3137   int generateOptionalPredicate(Predicate predicate, OptionalTaskDescriptor otd, ClassDescriptor cdtemp, PrintWriter output) {
3138     int predicateindex = 0;
3139     //iterate through the classes concerned by the predicate
3140     Set c_vard = predicate.vardescriptors;
3141     Hashtable<TempDescriptor, Integer> slotnumber=new Hashtable<TempDescriptor, Integer>();
3142     int current_slot=0;
3143
3144     for(Iterator vard_it = c_vard.iterator(); vard_it.hasNext(); ) {
3145       VarDescriptor vard = (VarDescriptor)vard_it.next();
3146       TypeDescriptor typed = vard.getType();
3147
3148       //generate for flags
3149       HashSet fen_hashset = predicate.flags.get(vard.getSymbol());
3150       output.println("int predicateflags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
3151       int numberterms=0;
3152       if (fen_hashset!=null) {
3153         for (Iterator fen_it = fen_hashset.iterator(); fen_it.hasNext(); ) {
3154           FlagExpressionNode fen = (FlagExpressionNode)fen_it.next();
3155           if (fen!=null) {
3156             DNFFlag dflag=fen.getDNF();
3157             numberterms+=dflag.size();
3158
3159             Hashtable flags=(Hashtable)flagorder.get(typed.getClassDesc());
3160
3161             for(int j=0; j<dflag.size(); j++) {
3162               if (j!=0)
3163                 output.println(",");
3164               Vector term=dflag.get(j);
3165               int andmask=0;
3166               int checkmask=0;
3167               for(int k=0; k<term.size(); k++) {
3168                 DNFFlagAtom dfa=(DNFFlagAtom)term.get(k);
3169                 FlagDescriptor fd=dfa.getFlag();
3170                 boolean negated=dfa.getNegated();
3171                 int flagid=1<<((Integer)flags.get(fd)).intValue();
3172                 andmask|=flagid;
3173                 if (!negated)
3174                   checkmask|=flagid;
3175               }
3176               output.print("/*andmask*/0x"+Integer.toHexString(andmask)+", /*checkmask*/0x"+Integer.toHexString(checkmask));
3177             }
3178           }
3179         }
3180       }
3181       output.println("};\n");
3182
3183       //generate for tags
3184       TagExpressionList tagel = predicate.tags.get(vard.getSymbol());
3185       output.println("int predicatetags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
3186       int numtags = 0;
3187       if (tagel!=null) {
3188         for(int j=0; j<tagel.numTags(); j++) {
3189           if (j!=0)
3190             output.println(",");
3191           TempDescriptor tmp=tagel.getTemp(j);
3192           if (!slotnumber.containsKey(tmp)) {
3193             Integer slotint=new Integer(current_slot++);
3194             slotnumber.put(tmp,slotint);
3195           }
3196           int slot=slotnumber.get(tmp).intValue();
3197           output.println("/* slot */"+ slot+", /*tagid*/"+state.getTagId(tmp.getTag()));
3198         }
3199         numtags = tagel.numTags();
3200       }
3201       output.println("};");
3202
3203       //store the result into a predicatemember struct
3204       output.println("struct predicatemember predicatemember_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"={");
3205       output.println("/*type*/"+typed.getClassDesc().getId()+",");
3206       output.println("/* number of dnf terms */"+numberterms+",");
3207       output.println("predicateflags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3208       output.println("/* number of tag */"+numtags+",");
3209       output.println("predicatetags_"+predicateindex+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3210       output.println("};\n");
3211       predicateindex++;
3212     }
3213
3214
3215     //generate an array that stores the entire predicate
3216     output.println("struct predicatemember * predicatememberarray_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
3217     for( int j = 0; j<predicateindex; j++) {
3218       if( j != predicateindex-1) output.println("&predicatemember_"+j+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3219       else output.println("&predicatemember_"+j+"_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
3220     }
3221     output.println("};\n");
3222     return predicateindex;
3223   }
3224
3225
3226   void generateOptionalArrays(PrintWriter output, PrintWriter headers, Hashtable<ClassDescriptor, Hashtable<FlagState, Set<OptionalTaskDescriptor>>> safeexecution, Hashtable optionaltaskdescriptors) {
3227     generateOptionalHeader(headers);
3228     //GENERATE STRUCTS
3229     output.println("#include \"optionalstruct.h\"\n\n");
3230     output.println("#include \"stdlib.h\"\n");
3231
3232     HashSet processedcd = new HashSet();
3233     int maxotd=0;
3234     Enumeration e = safeexecution.keys();
3235     while (e.hasMoreElements()) {
3236       int numotd=0;
3237       //get the class
3238       ClassDescriptor cdtemp=(ClassDescriptor)e.nextElement();
3239       Hashtable flaginfo=(Hashtable)flagorder.get(cdtemp);       //will be used several times
3240
3241       //Generate the struct of optionals
3242       Collection c_otd = ((Hashtable)optionaltaskdescriptors.get(cdtemp)).values();
3243       numotd = c_otd.size();
3244       if(maxotd<numotd) maxotd = numotd;
3245       if( !c_otd.isEmpty() ) {
3246         for(Iterator otd_it = c_otd.iterator(); otd_it.hasNext(); ) {
3247           OptionalTaskDescriptor otd = (OptionalTaskDescriptor)otd_it.next();
3248
3249           //generate the int arrays for the predicate
3250           Predicate predicate = otd.predicate;
3251           int predicateindex = generateOptionalPredicate(predicate, otd, cdtemp, output);
3252           TreeSet<Integer> fsset=new TreeSet<Integer>();
3253           //iterate through possible FSes corresponding to
3254           //the state when entering
3255
3256           for(Iterator fses = otd.enterflagstates.iterator(); fses.hasNext(); ) {
3257             FlagState fs = (FlagState)fses.next();
3258             int flagid=0;
3259             for(Iterator flags = fs.getFlags(); flags.hasNext(); ) {
3260               FlagDescriptor flagd = (FlagDescriptor)flags.next();
3261               int id=1<<((Integer)flaginfo.get(flagd)).intValue();
3262               flagid|=id;
3263             }
3264             fsset.add(new Integer(flagid));
3265             //tag information not needed because tag
3266             //changes are not tolerated.
3267           }
3268
3269           output.println("int enterflag_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"[]={");
3270           boolean needcomma=false;
3271           for(Iterator<Integer> it=fsset.iterator(); it.hasNext(); ) {
3272             if(needcomma)
3273               output.print(", ");
3274             output.println(it.next());
3275           }
3276
3277           output.println("};\n");
3278
3279
3280           //generate optionaltaskdescriptor that actually
3281           //includes exit fses, predicate and the task
3282           //concerned
3283           output.println("struct optionaltaskdescriptor optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+"={");
3284           output.println("&task_"+otd.td.getSafeSymbol()+",");
3285           output.println("/*index*/"+otd.getIndex()+",");
3286           output.println("/*number of enter flags*/"+fsset.size()+",");
3287           output.println("enterflag_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3288           output.println("/*number of members */"+predicateindex+",");
3289           output.println("predicatememberarray_OTD"+otd.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3290           output.println("};\n");
3291         }
3292       } else
3293         continue;
3294       // if there are no optionals, there is no need to build the rest of the struct
3295
3296       output.println("struct optionaltaskdescriptor * otdarray"+cdtemp.getSafeSymbol()+"[]={");
3297       c_otd = ((Hashtable)optionaltaskdescriptors.get(cdtemp)).values();
3298       if( !c_otd.isEmpty() ) {
3299         boolean needcomma=false;
3300         for(Iterator otd_it = c_otd.iterator(); otd_it.hasNext(); ) {
3301           OptionalTaskDescriptor otd = (OptionalTaskDescriptor)otd_it.next();
3302           if(needcomma)
3303             output.println(",");
3304           needcomma=true;
3305           output.println("&optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
3306         }
3307       }
3308       output.println("};\n");
3309
3310       //get all the possible flagstates reachable by an object
3311       Hashtable hashtbtemp = safeexecution.get(cdtemp);
3312       int fscounter = 0;
3313       TreeSet fsts=new TreeSet(new FlagComparator(flaginfo));
3314       fsts.addAll(hashtbtemp.keySet());
3315       for(Iterator fsit=fsts.iterator(); fsit.hasNext(); ) {
3316         FlagState fs = (FlagState)fsit.next();
3317         fscounter++;
3318
3319         //get the set of OptionalTaskDescriptors corresponding
3320         HashSet<OptionalTaskDescriptor> availabletasks = (HashSet<OptionalTaskDescriptor>)hashtbtemp.get(fs);
3321         //iterate through the OptionalTaskDescriptors and
3322         //store the pointers to the optionals struct (see on
3323         //top) into an array
3324
3325         output.println("struct optionaltaskdescriptor * optionaltaskdescriptorarray_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"[] = {");
3326         for(Iterator<OptionalTaskDescriptor> mos = ordertd(availabletasks).iterator(); mos.hasNext(); ) {
3327           OptionalTaskDescriptor mm = mos.next();
3328           if(!mos.hasNext())
3329             output.println("&optionaltaskdescriptor_"+mm.getuid()+"_"+cdtemp.getSafeSymbol());
3330           else
3331             output.println("&optionaltaskdescriptor_"+mm.getuid()+"_"+cdtemp.getSafeSymbol()+",");
3332         }
3333
3334         output.println("};\n");
3335
3336         //process flag information (what the flag after failure is) so we know what optionaltaskdescriptors to choose.
3337
3338         int flagid=0;
3339         for(Iterator flags = fs.getFlags(); flags.hasNext(); ) {
3340           FlagDescriptor flagd = (FlagDescriptor)flags.next();
3341           int id=1<<((Integer)flaginfo.get(flagd)).intValue();
3342           flagid|=id;
3343         }
3344
3345         //process tag information
3346
3347         int tagcounter = 0;
3348         boolean first = true;
3349         Enumeration tag_enum = fs.getTags();
3350         output.println("int tags_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"[]={");
3351         while(tag_enum.hasMoreElements()) {
3352           tagcounter++;
3353           TagDescriptor tagd = (TagDescriptor)tag_enum.nextElement();
3354           if(first==true)
3355             first = false;
3356           else
3357             output.println(", ");
3358           output.println("/*tagid*/"+state.getTagId(tagd));
3359         }
3360         output.println("};");
3361
3362         Set<TaskIndex> tiset=sa.getTaskIndex(fs);
3363         for(Iterator<TaskIndex> itti=tiset.iterator(); itti.hasNext(); ) {
3364           TaskIndex ti=itti.next();
3365           if (ti.isRuntime())
3366             continue;
3367
3368           Set<OptionalTaskDescriptor> otdset=sa.getOptions(fs, ti);
3369
3370           output.print("struct optionaltaskdescriptor * optionaltaskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex()+"_array[] = {");
3371           boolean needcomma=false;
3372           for(Iterator<OptionalTaskDescriptor> otdit=ordertd(otdset).iterator(); otdit.hasNext(); ) {
3373             OptionalTaskDescriptor otd=otdit.next();
3374             if(needcomma)
3375               output.print(", ");
3376             needcomma=true;
3377             output.println("&optionaltaskdescriptor_"+otd.getuid()+"_"+cdtemp.getSafeSymbol());
3378           }
3379           output.println("};");
3380
3381           output.print("struct taskfailure taskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex()+" = {");
3382           output.print("&task_"+ti.getTask().getSafeSymbol()+", ");
3383           output.print(ti.getIndex()+", ");
3384           output.print(otdset.size()+", ");
3385           output.print("optionaltaskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex()+"_array");
3386           output.println("};");
3387         }
3388
3389         tiset=sa.getTaskIndex(fs);
3390         boolean needcomma=false;
3391         int runtimeti=0;
3392         output.println("struct taskfailure * taskfailurearray"+fscounter+"_"+cdtemp.getSafeSymbol()+"[]={");
3393         for(Iterator<TaskIndex> itti=tiset.iterator(); itti.hasNext(); ) {
3394           TaskIndex ti=itti.next();
3395           if (ti.isRuntime()) {
3396             runtimeti++;
3397             continue;
3398           }
3399           if (needcomma)
3400             output.print(", ");
3401           needcomma=true;
3402           output.print("&taskfailure_FS"+fscounter+"_"+ti.getTask().getSafeSymbol()+"_"+ti.getIndex());
3403         }
3404         output.println("};\n");
3405
3406         //Store the result in fsanalysiswrapper
3407
3408         output.println("struct fsanalysiswrapper fsanalysiswrapper_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+"={");
3409         output.println("/*flag*/"+flagid+",");
3410         output.println("/* number of tags*/"+tagcounter+",");
3411         output.println("tags_FS"+fscounter+"_"+cdtemp.getSafeSymbol()+",");
3412         output.println("/* numtask failures */"+(tiset.size()-runtimeti)+",");
3413         output.println("taskfailurearray"+fscounter+"_"+cdtemp.getSafeSymbol()+",");
3414         output.println("/* number of optionaltaskdescriptors */"+availabletasks.size()+",");
3415         output.println("optionaltaskdescriptorarray_FS"+fscounter+"_"+cdtemp.getSafeSymbol());
3416         output.println("};\n");
3417
3418       }
3419
3420       //Build the array of fsanalysiswrappers
3421       output.println("struct fsanalysiswrapper * fsanalysiswrapperarray_"+cdtemp.getSafeSymbol()+"[] = {");
3422       boolean needcomma=false;
3423       for(int i = 0; i<fscounter; i++) {
3424         if (needcomma) output.print(",");
3425         output.println("&fsanalysiswrapper_FS"+(i+1)+"_"+cdtemp.getSafeSymbol());
3426         needcomma=true;
3427       }
3428       output.println("};");
3429
3430       //Build the classanalysiswrapper referring to the previous array
3431       output.println("struct classanalysiswrapper classanalysiswrapper_"+cdtemp.getSafeSymbol()+"={");
3432       output.println("/*type*/"+cdtemp.getId()+",");
3433       output.println("/*numotd*/"+numotd+",");
3434       output.println("otdarray"+cdtemp.getSafeSymbol()+",");
3435       output.println("/* number of fsanalysiswrappers */"+fscounter+",");
3436       output.println("fsanalysiswrapperarray_"+cdtemp.getSafeSymbol()+"};\n");
3437       processedcd.add(cdtemp);
3438     }
3439
3440     //build an array containing every classes for which code has been build
3441     output.println("struct classanalysiswrapper * classanalysiswrapperarray[]={");
3442     for(int i=0; i<state.numClasses(); i++) {
3443       ClassDescriptor cn=cdarray[i];
3444       if (i>0)
3445         output.print(", ");
3446       if ((cn != null) && (processedcd.contains(cn)))
3447         output.print("&classanalysiswrapper_"+cn.getSafeSymbol());
3448       else
3449         output.print("NULL");
3450     }
3451     output.println("};");
3452
3453     output.println("#define MAXOTD "+maxotd);
3454     headers.println("#endif");
3455   }
3456
3457   public List<OptionalTaskDescriptor> ordertd(Set<OptionalTaskDescriptor> otdset) {
3458     Relation r=new Relation();
3459     for(Iterator<OptionalTaskDescriptor>otdit=otdset.iterator(); otdit.hasNext(); ) {
3460       OptionalTaskDescriptor otd=otdit.next();
3461       TaskIndex ti=new TaskIndex(otd.td, otd.getIndex());
3462       r.put(ti, otd);
3463     }
3464
3465     LinkedList<OptionalTaskDescriptor> l=new LinkedList<OptionalTaskDescriptor>();
3466     for(Iterator it=r.keySet().iterator(); it.hasNext(); ) {
3467       Set s=r.get(it.next());
3468       for(Iterator it2=s.iterator(); it2.hasNext(); ) {
3469         OptionalTaskDescriptor otd=(OptionalTaskDescriptor)it2.next();
3470         l.add(otd);
3471       }
3472     }
3473
3474     return l;
3475   }
3476
3477   // override these methods in a subclass of BuildCode
3478   // to generate code for additional systems
3479   protected void printExtraArrayFields(PrintWriter outclassdefs) {
3480   }
3481   protected void outputTransCode(PrintWriter output) {
3482   }
3483   protected void buildCodeSetup() {
3484   }
3485   protected void generateSizeArrayExtensions(PrintWriter outclassdefs) {
3486   }
3487   protected void additionalIncludesMethodsHeader(PrintWriter outmethodheader) {
3488   }
3489   protected void preCodeGenInitialization() {
3490   }
3491   protected void postCodeGenCleanUp() {
3492   }
3493   protected void additionalCodeGen(PrintWriter outmethodheader,
3494                                    PrintWriter outstructs,
3495                                    PrintWriter outmethod) {
3496   }
3497   protected void additionalCodeAtTopOfMain(PrintWriter outmethod) {
3498   }
3499   protected void additionalCodeAtBottomOfMain(PrintWriter outmethod) {
3500   }
3501   protected void additionalIncludesMethodsImplementation(PrintWriter outmethod) {
3502   }
3503   protected void additionalIncludesStructsHeader(PrintWriter outstructs) {
3504   }
3505   protected void additionalClassObjectFields(PrintWriter outclassdefs) {
3506   }
3507   protected void additionalCodeAtTopMethodsImplementation(PrintWriter outmethod) {
3508   }
3509   protected void additionalCodeAtTopFlatMethodBody(PrintWriter output, FlatMethod fm) {
3510   }
3511   protected void additionalCodePreNode(FlatMethod fm, FlatNode fn, PrintWriter output) {
3512   }
3513   protected void additionalCodePostNode(FlatMethod fm, FlatNode fn, PrintWriter output) {
3514   }
3515
3516   private void printSourceLineNumber(FlatMethod fm, FlatNode fn, PrintWriter output) {
3517     // we do not print out line number if no one explicitly set the number
3518     if(fn.getNumLine()!=-1){
3519
3520       int lineNum=fn.getNumLine();
3521
3522       // do not generate the line number if it is same as the previous one
3523       boolean needtoprint;
3524       if(fn.prev.size()==0){
3525         needtoprint=true;
3526       }else{
3527         needtoprint=false;
3528       }
3529
3530       for(int i=0;i<fn.prev.size();i++){
3531         int prevLineNum=((FlatNode)fn.prev.get(i)).getNumLine();
3532         if(prevLineNum!=lineNum){
3533           needtoprint=true;
3534           break;
3535         }
3536       }
3537       if(needtoprint){
3538         output.println("// "+fm.getMethod().getClassDesc().getSourceFileName()+":"+fn.getNumLine());
3539       }
3540     }
3541   }
3542
3543 }
3544
3545
3546
3547
3548
3549