hyperform.H

Go to the documentation of this file.

/*
 * hyperform.H
 *
 * 4/23/97 WAH:  Created.
 * 12/11/97 WAH: Moved sweepops here from IR.
 * 1/16/98 WAH:  Added hammock_stats class.
 */

#ifndef LEGORFORM_HYPERBLOCK_HEADER
#define LEGORFORM_HYPERBLOCK_HEADER

#include <values.h>
#include "TinkerKnobs.H"

/*
 * class hyper_stats
 *
 * Statistics structure for hyperblock formation - does not work
 * yet!!!
 */
class hyper_stats
{

#ifndef WTSIZE
#define WTSIZE (10000)
#endif

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

public:
  char *filename;
  long super_count;
  long td_count;
  struct idpair td_stats[WTSIZE];
  long op_count;
  struct idpair op_stats[WTSIZE];
  double total_weight;
  // add more stats later

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

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

    if (super_count > 0 && td_count != 0)
      {
        for (i = 0; i < WTSIZE; i++)
          if (td_stats[i].i != 0)
            fprintf (out, "\t%d\t%d\t%lf\n", i, td_stats[i].i,
                     td_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 hyper_stats

// void hyperform (legoProc *, ..., hyper_stats * = NULL);

/*
 * class hammock_info
 *
 * Information about a hammock.
 */
class hammock_info
{
public:
  legoRegion *S;  // start of hammock
  legoRegion *T;  // "then" branch of hammock
  legoRegion *E;  // "else" branch of hammock (NULL is delta)
  legoRegion *J;  // end (join) of hammock

  hammock_info() {S = T = E = J = NULL;}
  int HammockDetected (void) {return (S != NULL);}
  int IsDelta (void) {return (E == NULL);}
}; // end class hammock_info

/*
 * class hammock_stats
 *
 * Statistics structure for hammock conversion.
 */
class hammock_stats
{
public:
  int numdelta;  // number of deltas found/converted
  int numdiamond;  // number of diamonds found/converted

  hammock_stats() {numdelta = numdiamond = 0;}
}; // end class hammock_stats
  

// Routines for simple hammock conversion.
hammock_info *DetectHammock (legoRegion *);
legoRegion *IfConvertHammock (hammock_info *, knobs *);
legoRegion *DetectAndConvertHammock (legoRegion *, knobs *);
int hammock (legoRegion *, int, knobs *, hammock_stats * = NULL);

extern int NextPredRegNum;  // next available predicate register number

void sweepops (legoHB *, int = 0);

legoOp *IfConvertTreeBranch (legoOp *branchop, knobs *K); 
void PredicateTreeBranch (legoOp *branchop); 

void FullyIfConvertTreeBranch (legoRegion *region, knobs *K); 
void FullyIfConvertTreeBranch (legoTreegion *tree, knobs *K); 

void IfConvertAndPredicateTreeBranch (legoRegion *region, knobs *K); 
void IfConvertAndPredicateTreeBranch (legoTreegion *tree, knobs *K); 

void FullyPredicateTreeBranch (legoRegion *region); 
void FullyPredicateTreeBranch (legoTreegion *tree); 

#endif // LEGORFORM_HYPERBLOCK_HEADER

---