nickjillings@1925: <?php
nickjillings@1925: /*
nickjillings@1925:     Get Tests
nickjillings@1925:     
nickjillings@1925:     This script returns the XML test names available, plus the number of tests
nickjillings@1925: */
nickjillings@1925: 
nickjillings@1925: //http://stackoverflow.com/questions/4444475/transfrom-relative-path-into-absolute-url-using-php
nickjillings@1925: function rel2abs($rel, $base)
nickjillings@1925: {
nickjillings@1925:     /* return if already absolute URL */
nickjillings@1925:     if (parse_url($rel, PHP_URL_SCHEME) != '' || substr($rel, 0, 2) == '//') return $rel;
nickjillings@1925: 
nickjillings@1925:     /* queries and anchors */
nickjillings@1925:     if ($rel[0]=='#' || $rel[0]=='?') return $base.$rel;
nickjillings@1925: 
nickjillings@1925:     /* parse base URL and convert to local variables:
nickjillings@1925:      $scheme, $host, $path */
nickjillings@1925:     extract(parse_url($base));
nickjillings@1925: 
nickjillings@1925:     /* remove non-directory element from path */
nickjillings@1925:     $path = preg_replace('#/[^/]*$#', '', $path);
nickjillings@1925: 
nickjillings@1925:     /* destroy path if relative url points to root */
nickjillings@1925:     if ($rel[0] == '/') $path = '';
nickjillings@1925: 
nickjillings@1925:     /* dirty absolute URL */
nickjillings@1925:     $abs = "$host$path/$rel";
nickjillings@1925: 
nickjillings@1925:     /* replace '//' or '/./' or '/foo/../' with '/' */
nickjillings@1925:     $re = array('#(/\.?/)#', '#/(?!\.\.)[^/]+/\.\./#');
nickjillings@1925:     for($n=1; $n>0; $abs=preg_replace($re, '/', $abs, -1, $n)) {}
nickjillings@1925: 
nickjillings@1925:     /* absolute URL is ready! */
nickjillings@1925:     return $scheme.'://'.$abs;
nickjillings@1925: }
nickjillings@1925: 
nickjillings@1925: // XML Saves location - assumes it will be saves/
nickjillings@1925: $data = [];
nickjillings@1925: $saves = glob("../saves/*.xml");
nickjillings@1925: if (is_array($saves))
nickjillings@1925: {
nickjillings@1925:     foreach($saves as $filename) {
nickjillings@1925:         $xml_string = file_get_contents($filename, FILE_TEXT);
nickjillings@1925:         $xml_object = simplexml_load_string($xml_string);
nickjillings@1925:         if ($xml_object) {
nickjillings@1925:             $filename = rel2abs($filename,"http://".$_SERVER['SERVER_NAME'] . $_SERVER['REQUEST_URI']);
nickjillings@1925:             $waet = $xml_object->waet[0];
nickjillings@1925:             $testName = urldecode($waet["url"]);
nickjillings@1925:             if(array_key_exists($testName,$data)) {
nickjillings@1925:                 // Key exists
nickjillings@1925:                 array_push($data[$testName],$filename);
nickjillings@1925:             } else {
nickjillings@1925:                 // Key does not exist
nickjillings@1925:                 $data[$testName] = [$filename];
nickjillings@1925:             }
nickjillings@1925:         }
nickjillings@1925:     }
nickjillings@1925: }
nickjillings@1925: 
nickjillings@1925: // Now read the format response
nickjillings@1925: $format = "JSON";
nickjillings@1925: if (array_key_exists("format",$_GET)) {
nickjillings@1925:     $format = $_GET["format"];
nickjillings@1925: }
nickjillings@1925: switch($format) {
nickjillings@1925:     case "JSON":
nickjillings@1925:         // Return JSON
nickjillings@1925:         $doc_root = '{"tests": [';
nickjillings@1925:         $keys = array_keys($data);
nickjillings@1925:         $numTests = count($data);
nickjillings@1925:         for ($testIndex = 0; $testIndex < $numTests; $testIndex++) {
nickjillings@1925:             $test_root = '{"testName": "'.$keys[$testIndex].'", "files": [';
nickjillings@1925:             $numFiles = count($data[$keys[$testIndex]]);
nickjillings@1925:             for ($countIndex=0; $countIndex < $numFiles; $countIndex++) {
nickjillings@1925:                 $test_root = $test_root.'"'.$data[$keys[$testIndex]][$countIndex].'"';
nickjillings@1925:                 if ($countIndex == $numFiles-1) {
nickjillings@1925:                     $test_root = $test_root.']}';
nickjillings@1925:                 } else {
nickjillings@1925:                     $test_root = $test_root.',';
nickjillings@1925:                 }
nickjillings@1925:             }
nickjillings@1925:             $doc_root = $doc_root.$test_root;
nickjillings@1925:             if ($testIndex == $numTests-1) {
nickjillings@1925:                 $doc_root = $doc_root.']}';
nickjillings@1925:             } else {
nickjillings@1925:                 $doc_root = $doc_root.',';
nickjillings@1925:             }
nickjillings@1925:         }
nickjillings@1925:         echo $doc_root;
nickjillings@1925:         break;
nickjillings@1925:     default:
nickjillings@1925:         echo '{"error": "format can only be JSON"}';
nickjillings@1925: }
nickjillings@1925: 
nickjillings@1925: ?>