typedef struct _StatusNode {  
    char *mut;  /* module under test */  
    char *mutversion;  /* module under test version */  
    char *platform;  /* platform string */  
    int stats[4] ;  /*  
       stats[0] = pass;  number of tests passed  
       stats[1] = fail;  number of tests failed  
       stats[2] = knownfail;   number of tests known to fail  
       stats[3] = malformed;   number of malformed tests  */  
} StatusNode;  

typedef struct _DirectoryNode {  
    DirNodeType dntype;  
     char *name;    /* section name */  
     char *desc;     /* desc= within a section */  
     char *dirname;  /* dirname= within a section */  
     char *mostrecent;  /* only used on dntype = PLATFORM */  
     char *vrmlFileName; /* for nodes that has a .wrl representation Root, and   
                                         each testsuite, this field indicates the name of the wrl file*/   
     StatusNode *statnode;  /* The status for the current level */  
     DirectoryNode *dnlist[];   /* list of pointers */  
} DirectoryNode; 

/* 1.1 Add all component names to DirectoryNode tree */  
Create DirectoryNode,  set as  root node, set as type DIRROOT.  
Iterate each section name that starts with Component-name {  
    Construct DirectoryNode new, add to root node, set as dntype = COMPONENT.  
    Add name,desc,version, and dirname to new node.  
}  

/* 1.2 Add all test suite names to DirectoryNode tree */  
Iterate each section name that starts with TestSuite-name {  
    Locate component where component-name in section matches.  
    If no match, then print warning message  
    otherwise {  
        Construct new DirectoryNode.  
        Set node desc,dirname values, set as dntype = TESTSUITE  
        Add new node to component node dnlist.  
    }  
}  

/* 1.3 Add all test suite names to DirectoryNode tree */  
Iterate each section name that starts with Platform-name {  
    Locate testsuite where testsuite-name in section  matches.  
    If no match, then print warning message  
    otherwise {  
        Construct new DirectoryNode.  
        Set node desc,dirname values, set dntype = PLATFORM.  
        Add new node to test suite node dnlist.  
    }  
}  

/* 2.0 Open each of the status nodes, and augment tree with HTML file objects */  
AccumulatedPath = rptdir  
Select each node n  starting from top of tree {  
   Concatenate dirname to AccumulatedPath.  
     if (n.dntype == PLATFORM) {  /* only look at leaf nodes */  
         Open directory pointed to by AccumulatedPath, and process each file {  
              If file ends in  ".htm" or file ends in ".html" {  /* file is a report */  
                  Is there a corresponding report file? If so {  
                      Open status file and parse contents into a StatusNode (sn)  
                       If status file not malformed {  
                          Construct a new DirectoryNode.  
                          Set statnode = sn  
                          Set dirname as file;   /* this should be named something more abstract than dirname */  
                          Set node dntype = FILE.  
                          Add node to current node n.dnlist.  
                      } else print error message  
                  }  
                  else print error message.  
              }  
        }  
    }  
    Remove  dirname from AccumulatedPath  
}  

/* 2.1 Select most recent report at the PLATFORM level and store in tree */  
For each node that is a PLATFORM node,  
   Iterate through the dnlist of FILE nodes and select the most recent filename (based on string prior to ".").  
      Set node.most.recent = filename.  

/* 2.2  Calculate suite results */  
For each node that is a TESTSUITE node,  
    Construct new StatusNode, all values zero, set node.statnode.  
    For each PLATFORM node in dnlist,  for each stat, node.stats[i] += platform node stats values.  

/* 2.3 Calculate component results */  
For each node that is a COMPONENT node,  
    Construct new StatusNode, all values zero,  set node.statnode.  
    For each PLATFORM node in dnlist,  for each stat, node.stats[i] += platform node stats values.  

/* TAT.6 create VRML display */  
if (vrml option is on)  
    Create a CoordNode tree having 1 to 1 correspondence with the Directory node tree (but up to a certain tree height [currently set to 2]).   Each CoordNode will store the coordinate and color information to paint the VRML representation.  
  
    Calculate the 3-D coordinates and color each Node will have (where a node is a test-suite, or platform, or component etc.)   Color code: RED if more than 50% of tests (under that node) fail or malform, ORANGE if less than 50% of tests fail or malform, GREEN if all the test pass or are known failures, and YELLOW if the total number of tests ran is zero.  
  
   Traverse the CoordNode tree and create the VRML code (a sphere with label) for each node (also generate the appropriate links).    

   By setting the tree height limit to 2 (i.e the tallest CoordNode tree created will have at most 3 levels), only the root and each test suite node will be represented by a .wrl file.    The name of the .wrl file at the root is "Root.wrl" and the at each Testsuite is <testsuitename>.wrl.  

/* 3.0 Write out all index files at ROOT, COMPONENT, SUITE, and PLATFORM level */  
for each node in tree do {  
   switch (node.dntype)  
      ROOT:   Generate HTML report from dnlist as per HTML formatting.  
     COMPONENT:  Generate HTML report from dnlist as per HTML formatting.  
      SUITE:   Generate HTML report from dnlist as per HTML formatting.  
      PLATFORM:   Generate HTML report from dnlist as per HTML formatting.  
}  
  
return NO_ERROR.

[Component-seclib]  
desc=Security Library  
version=2.0  
dirname=security-library  

[TestSuite-pkcs5]  
desc=Public Key Cryptography Standards # 5  
component=seclib  
dirname=pkcs5  

[TestSuite-crypto]  
desc=Cryptographic Functionality (bulk ciphers, RSA, DSA)  
component=seclib  
dirname=libcrypto  

[Platform=hp10_2]  
desc=HP UX 10.2  
dirname=hpux10_2  
testsuite-pkcs5=yes  
testsuite-crypto=yes  

[Platform=sol2_4]  
desc=Solaris 2.4.1  
dirname=sol2_4_1  
testsuite-pkcs5=yes