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