loopdetect.H

Go to the documentation of this file.

// loopdetect.H

/*
 * 4/25/97 WAH: Created.
 * 7/23/97 WAH: Fixed #define of WTSIZE.
 * 7/31/97 WAH: Added loopunroll_stats class.
 * 9/17/97 WAH: Name changes.
 * 1/22/98 WAH: Changed FindCommonNaturalLoop so marking is optional.
 * 4/3/98 WAH:  Added missing #include of lego.H.
 */

#ifndef LEGOAN_LOOPDETECT_HEADER
#define LEGOAN_LOOPDETECT_HEADER

#include "lego.H"

/*
 * class loopdetect_stats
 *
 * Statistics structure for loop detection.
 */
class loopdetect_stats
{

#ifndef WTSIZE
#define WTSIZE (10000)
#endif

struct idpair
{
  int i;  // amount of treegions with given block/op count
  double d;  // total weight of these treegions
}; // end struct idpair

public:
  char *filename;
  long loop_count;
  long block_count;
  struct idpair block_stats[WTSIZE];
  long op_count;
  struct idpair op_stats[WTSIZE];
  double total_weight;
  // add more stats later

  loopdetect_stats (char *fn)
  {
    int i;

    filename = new char [strlen (fn) + 1];
    strcpy (filename, fn);
    loop_count = block_count = op_count = 0;
    for (i = 0; i < WTSIZE; i++)
      {
        block_stats[i].i = op_stats[i].i = 0;
        block_stats[i].d = op_stats[i].d = 0.0;
      } // end for
    total_weight = 0.0;
  } // end loopunroll_stats
  void dump (FILE *out)
  {
    int i;

    fprintf (out, "%s\t%ld\t", filename, loop_count);
    fprintf (out, "%lf\t",
             ((double) block_count) / ((double) loop_count));
    fprintf (out, "%lf\n",
             ((double) op_count) / ((double) loop_count));

    if (loop_count > 0 && block_count != 0)
      {
        for (i = 0; i < WTSIZE; i++)
          if (block_stats[i].i != 0)
            fprintf (out, "\t%d\t%d\t%lf\n", i, block_stats[i].i,
                     block_stats[i].d / total_weight);
        fprintf (out, "\n");
        for (i = 0; i < WTSIZE; i++)
          if (op_stats[i].i != 0)
            fprintf (out, "\t%d\t%d\t%lf\n", i, op_stats[i].i,
                     op_stats[i].d / total_weight);
      } // end if
    fprintf (out, "\n");
    return;
  } // end dump
}; // end class loopdetect_stats

/*
 * class loopunroll_stats
 *
 * Statistics structure for loop unrolling.
 */
class loopunroll_stats
{

struct idpair
{
  int i;  // number of loops with given unrolling factor
  double d;  // total weight of these loops
}; // end struct idpair

public:
  char *filename;
  long loop_count;
  struct idpair unroll_stats[WTSIZE];
  double total_weight;
  // add more stats later

  loopunroll_stats (char *fn)
  {
    int i;

    filename = new char [strlen (fn) + 1];
    strcpy (filename, fn);
    loop_count = 0;
    for (i = 0; i < WTSIZE; i++)
      {
        unroll_stats[i].i = 0;
        unroll_stats[i].d = 0.0;
      } // end for
    total_weight = 0.0;
  } // end loopunroll_stats
  void dump (FILE *out)
  {
    int i;

    fprintf (out, "%s\t%ld\t%lf\n", filename, loop_count, total_weight);
    //    fprintf (out, "%lf\t",
    //       ((double) block_count) / ((double) loop_count));
    //    fprintf (out, "%lf\n",
    //       ((double) op_count) / ((double) loop_count));

    if (loop_count > 0)
      {
        for (i = 0; i < WTSIZE; i++)
          if (unroll_stats[i].i != 0)
            fprintf (out, "\t%d\t%d\t%lf\n", i, unroll_stats[i].i,
                     unroll_stats[i].d / total_weight);
        //      fprintf (out, "\n");
        //      for (i = 0; i < WTSIZE; i++)
        //        if (op_stats[i].i != 0)
        //          fprintf (out, "\t%d\t%d\t%lf\n", i, op_stats[i].i,
        //                   op_stats[i].d / total_weight);
      } // end if
    fprintf (out, "\n");
    return;
  } // end dump
}; // end class loopunroll_stats

regionList *FindNaturalLoop (opEdges *, legoProc *);
regionList *FindCommonNaturalLoop (opEdges *, legoProc *, int = 0);
void CreateLcLoopAttributes (legoProc *);
void LoopDetect (legoProc *, loopdetect_stats * = NULL);
legoRegion *FindLoopHeader (regionList *);
void GatherUnrollInfo (legoProc *, loopunroll_stats *);
void markbackedgesandloopheaders (legoProc *proc);

#endif // LEGOAN_LOOPDETECT_HEADER

---