/**
 * This Javascript file is used by the Crazy Ivan RDFa Test Harness
 * to process the entire test suite without requiring the developer to
 * leave the page.
 */

/**
 * Sends an XML HTTP request to a given URL and calls a given callback
 * with the data.
 *
 * @param url the URL to call
 * @param callback the callback to call with the returned data.
 * @param postData the data to use when posting to the given URL.
 */
function sendRequest(url, callback, callback_data, postData)
{
   var req = createXMLHTTPObject();

   if(!req)
      return;
   var method = (postData) ? "POST" : "GET";
   
   req.open(method, url, true);
   req.setRequestHeader('User-Agent','XMLHTTP/1.0');
   
   if(postData)
      req.setRequestHeader('Content-type','application/x-www-form-urlencoded');

   req.onreadystatechange = function()
   {
         if(req.readyState != 4)
            return;
         if(callback_data)
            callback(req, callback_data);
         else
            callback(req);
   }

   if(req.readyState == 4)
      return;
   
   req.send(postData);
}

/**
 * Creates an XML HTTP Object based on the type of browser that the
 * client is using.
 */
function createXMLHTTPObject()
{
   var xmlHttp;

   // get the IE (ActiveX) version of the xml http object
   /*@cc_on
   @if(@_jscript_version >= 5)
   {
      try
      {
         xmlHttp = new ActiveXObject('Msxml2.XMLHTTP');
      }
      catch(e)
      {
         try
         {
            xmlHttp = new ActiveXObject('Microsoft.XMLHTTP');
         }
         catch(e)
         {
            // nothing to do
         }
      }
   }
   @end
   @*/

   // get the non-IE (non-ActiveX) version of the xml http object
   // if the object hasn't been acquired yet
   if(xmlHttp == null && typeof XMLHttpRequest !== 'undefined')
   {
      xmlHttp = new XMLHttpRequest();
   }

   return xmlHttp;
}

/**
 * Makes a call to retrieve all of the unit tests that are associated with the
 * selected test suite and status filter.
 */
function retrieveUnitTests()
{
   // get the manifest and status filter
   var manifest = getTestSuiteManifest();
   var status = getUnitTestStatusFilter();

   // note the test cases are loading
   document.getElementById('unit-tests').innerHTML = "<span style=\"font-size: 150%; font-weight: bold; color: #f00\">Test Cases are Loading...</span>";

   // send the HTTP request to the crazy ivan web service
   sendRequest('retrieve-tests?manifest=' + manifest +
               '&status=' + status, displayUnitTests)
}

/**
 * Displays all of the unit tests.
 *
 * @param req the HTTP request object.
 */
function displayUnitTests(req)
{
   document.getElementById('unit-tests').innerHTML = req.responseText;
}

/**
 * Performs a check of a unit test given the unit test number, source
 * test file and SPARQL test file.
 *
 * @param num the test case number
 * @param source_url the source test file to use.
 * @param sparql_url the SPARQL test query to use.
 * @param expected_result the expected result of the SPARQL query.
 */
function checkUnitTest(num, html_url, sparql_url, expected_result)
{
   var rdfaExtractorUrl = getRdfaExtractorUrl();
   var sparqlEngineUrl = getSparqlEngineUrl();
   
   document.getElementById('unit-test-status-' + num).innerHTML =
      "CHECKING...";
   sendRequest('check-test?id=' + num +
               '&source=' + html_url +
               '&sparql=' + sparql_url +
               '&expected-result=' + expected_result +
               '&rdfa-extractor=' + escape(rdfaExtractorUrl) +
               '&sparql-engine=' + escape(sparqlEngineUrl),
               displayUnitTestResult, num)
}

/**
 * Shows the details of a particular test case.
 *
 * @param num the unit test ID.
 * @param html_url the HTML test file to use.
 * @param sparql_url the SPARQL test query to use.
 * @param rdfa_extractor_url the RDFa extractor web service URL.
 * @param n3_extractor_url the N3 extractor web service URL.
 */
function showUnitTestDetails(num, html_url, sparql_url)
{
   var rdfaExtractorUrl = getRdfaExtractorUrl();
   var n3ExtractorUrl = "http://www.w3.org/2007/08/pyRdfa/extract?format=n3&uri=";

   document.getElementById('unit-test-details-' + num).innerHTML =
      "Retreiving information...";
   sendRequest('test-details?id=' + num +
               '&xhtml=' + html_url +
               '&sparql=' + sparql_url +
               '&rdfa-extractor=' + escape(rdfaExtractorUrl) +
               '&n3-extractor=' + escape(n3ExtractorUrl),
               displayUnitTestDetailsResult, num)
}

/**
 * Hides the details of the unit test given
 *
 * @param num the unit test number to hide.
 */
function hideUnitTestDetails(num)
{
   document.getElementById('unit-test-details-' + num).innerHTML = "";
}

/**
 * Displays the return value of a unit test result.
 *
 * @param num the unit test number to hide.
 */
function displayUnitTestResult(req, num)
{
   var unitTestId = 'unit-test-status-' + num;

   if(req.responseText.length < 512)
   {
      document.getElementById(unitTestId).innerHTML =
         req.responseText;
   }
   else
   {
      leadingZeros = "";
      if(num < 10)
      {
         leadingZeros = "000";
      }
      else if(num < 100)
      {
         leadingZeros = "00";
      }
      else if(num < 1000)
      {
         leadingZeros = "000";
      }
      else if(num < 10000)
      {
         leadingZeros = "0";
      }

      var formattedNum = leadingZeros + num;
      var baseTcUrl = getBaseTcUrl();
      var htmlUrl = baseTcUrl + formattedNum + ".xhtml";
      var sparqlUrl = baseTcUrl + formattedNum + ".sparql";
      var expectedResult = "true";

      document.getElementById(unitTestId).innerHTML =
         "<a href=\"javascript:checkUnitTest(" + num + ",'" +
    htmlUrl + "','" + sparqlUrl + "','" + expectedResult +
    "')\" style=\"font-weight: bold; color: #f00\">ERROR</a>" ;
   }
}

/**
 * Displays the return HTML value for the unit test details.
 *
 * @param req the HTTP request object.
 * @param num the unit test number to hide.
 */
function displayUnitTestDetailsResult(req, num)
{
   document.getElementById('unit-test-details-' + num).innerHTML =
      req.responseText;
}

/**
 * Gets the currently selected test suite manifest URL. This URL
 * should be to a RDF file.
 *
 * @return the test suite manifest RDF URL.
 */
function getTestSuiteManifest()
{
   var rval = "";
   var testsuite = document.getElementById('test-suite-selection').value;

   if(testsuite === "xhtml1")
   {
      rval = "http://rdfa.digitalbazaar.com/test-suite/xhtml-manifest.rdf";
   }
   else if(testsuite === "html4")
   {
      rval = "http://rdfa.digitalbazaar.com/test-suite/html4-manifest.rdf";
   }
   else if(testsuite === "html5")
   {
      rval = "http://rdfa.digitalbazaar.com/test-suite/html5-manifest.rdf";
   }
   else if(testsuite === "design")
   {
       rval = "http://rdfa.digitalbazaar.com/test-suite/design-manifest.rdf";
   }

   return rval;
}

/**
 * Gets the base Test Case URL based on the test manifest.
 *
 * @return the base test case URL containing all of the HTML and SPARQL files.
 */
function getBaseTcUrl()
{
   var rval = "";
   var testsuite = document.getElementById('test-suite-selection').value;

   if(testsuite === "xhtml1")
   {
      rval = "http://rdfa.digitalbazaar.com/test-suite/test-cases/";
   }
   else if(testsuite === "html4")
   {
      rval = "http://rdfa.digitalbazaar.com/test-suite/test-cases/";
   }
   else if(testsuite === "html5")
   {
      rval = "http://rdfa.digitalbazaar.com/test-suite/test-cases/";
   }
   else if(testsuite === "design")
   {
      rval = "http://rdfa.digitalbazaar.com/test-suite/test-cases/";
   }

   return rval;
}

/**
 * Gets the current unit test status filter that is selected.
 *
 * @return the current unit test status filter.
 */
function getUnitTestStatusFilter()
{
   return document.getElementById('unit-test-status-selection').value;
}

/**
 * Gets the currently selected RDFa extractor URL.
 *
 * @return The RDFa extractor URL.
 */
function getRdfaExtractorUrl()
{
   var rval = "";
   var extractor = document.getElementById('rdfa-extractor-selection').value;

   if(extractor === "pyrdfa")
   {
      rval = "http://www.w3.org/2007/08/pyRdfa/extract?uri=";
   }
   else if(extractor === "arcrdfa")
   {
      rval = "http://arc.web-semantics.org/demos/rdfa_tests/extract.php?url=";
   }
   else if(extractor === "librdfa-python")
        {
      rval = "http://rdfa.digitalbazaar.com/librdfa/rdfa2rdf.py?uri="
        }
        else if(extractor === "spread")
        {
                rval = "http://htmlwg.mn.aptest.com/rdfa/extract_rdfa.pl?format=xml&uri="
        }
   else if(extractor === "cognition")
   {
      rval = "http://srv.buzzword.org.uk/crazy-ivan.cgi?uri="
   }
   else if(extractor === "shark")
   {
      rval = "http://shark.informatik.uni-freiburg.de/Ocean/SharkWeb.asmx/Parse?url="
   }
   else if(extractor === "marklogic")
   {
           rval = "http://dmz-demo39.demo.marklogic.com/rdfa_extract.xqy?url="
   }
   else if(extractor === "rubyrdfa")
   {
           rval = "http://kellogg-assoc.com/distiller/xml?uri="
   }
   else if(extractor === "other")
   {
      rval = document.getElementById('rdfa-extractor-selection-value').value;
   }

   return rval;
}

/**
 * Gets the currently selected SPARQL engine URL.
 *
 * @return the SPARQL engine URL
 */
function getSparqlEngineUrl()
{
   var rval = "";
   var engine = document.getElementById('sparql-engine-selection').value;

   if(engine === "sparqler")
   {
      rval = "http://sparql.org/sparql?stylesheet=%2Fxml-to-html.xsl&query=";
   }
   else if(engine === "virtuoso")
   {
      rval = "http://demo.openlinksw.com/sparql/?should-sponge=soft&query=";
   }
   else if(engine === "other")
   {
      rval = document.getElementById('sparql-engine-selection-value').value;
   }

   return rval;
}

/**
 * Update the configuration that is displayed on the web page.
 */
function updateConfigurationDisplay()
{
   var testSuiteManifest = getTestSuiteManifest();
   var unitTestStatus = getUnitTestStatusFilter();
   var rdfaExtractorUrl = getRdfaExtractorUrl();
   var sparqlEngineUrl = getSparqlEngineUrl();
   
   document.getElementById('test-suite-selection-value').innerHTML =
      testSuiteManifest;
   document.getElementById('unit-test-status-selection-value').innerHTML =
      unitTestStatus;
   document.getElementById('rdfa-extractor-selection-value').value =
      rdfaExtractorUrl;
   document.getElementById('sparql-engine-selection-value').value =
      sparqlEngineUrl;
}

/**
 * Runs all of the unit tests by calling each anchor element
 * one-by-one.
 */
function performAllUnitTests()
{
   utCount = 0;
   for(var i = 1; i <= 2000; i++)
   {
      var id = "unit-test-anchor-" + i;
      var elem = document.getElementById(id);
      if(elem && elem.href)
      {
         utCount += 1;
         setTimeout(elem.href, (utCount * 1000));
      }
   }
}

/**
 * Generates an EARL report by checking the status of each test and
 */
function generateEarlReport()
{
   var rdfaExtractorUrl = getRdfaExtractorUrl();
   var rdftext = '';
   
   rdftext =  '<rdf:RDF xmlns:earl="http://www.w3.org/ns/earl#"\n';   
   rdftext += ' xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"\n';
   rdftext += ' xmlns:dc="http://purl.org/dc/elements/1.1/"\n';
   rdftext += ' xmlns:foaf="http://xmlns.com/foaf/0.1/">\n\n';

   rdftext += '<earl:Software ' +
      'rdf:about="http://rdfa.digitalbazaar.com/rdfa-test-harness">\n';
   rdftext += ' <dc:title>Crazy Ivan</dc:title>\n';
   rdftext += ' <dc:description>The W3C RDFa Test Harness</dc:description>\n';
   rdftext += ' <foaf:homepage ' +
      'rdf:resource="http://rdfa.digitalbazaar.com/rdfa-test-harness" />\n';
   rdftext += '</earl:Software>\n\n';

   for(var i = 1; i <= 2000; i++)
   {
      var id = "unit-test-anchor-" + i;
      var elem = document.getElementById(id);
      if(elem)
      {
         // Calculate the proper idString to use when describing the
         // test case numbers.
         idString = "";
         if(i < 10)
         {
            idString = '000' + i;
         }
         else if(i < 100)
         {
            idString = '00' + i;
         }
         else if(i < 1000)
         {
            idString = '0' + i;
         }
         else
         {
            idString = i;
         }
            
         var assertionUrl =
            "http://rdfa.digitalbazaar.com/rdfa-test-harness#" + id
         var tcUrl = 'http://www.w3.org/2006/07/SWD/RDFa/testsuite/' +
            'xhtml1-testcases/Test' + idString;
         var tcDescription =
            document.getElementById(id.replace('anchor', 'description'));
         var tcResult =
            document.getElementById(id.replace('anchor', 'result')).innerHTML;
         var resultUrl = 'http://www.w3.org/ns/earl#notTested';

         if(tcResult == "PASS")
         {
            resultUrl = 'http://www.w3.org/ns/earl#pass';
         }
         else if((tcResult == "FAIL") || (tcResult == "ERROR"))
         {
            resultUrl = 'http://www.w3.org/ns/earl#fail';
         }
         
         rdftext += '<earl:TestCase rdf:about="' + tcUrl +'">\n';
         rdftext += ' <dc:title>Test Case #' +
            id.replace('unit-test-anchor-', '') + '</dc:title>\n';
         rdftext += ' <dc:description>' +
            tcDescription.innerHTML + '</dc:description>\n';
         rdftext += '</earl:TestCase>\n';

         rdftext += '<earl:Assertion rdf:about="' +
            assertionUrl.replace('anchor', 'assertion') + '">\n';
         rdftext += ' <earl:assertedBy rdf:resource="http://rdfa.digitalbazaar.com/rdfa-test-harness"/>\n';
         rdftext += ' <earl:subject rdf:resource="' + rdfaExtractorUrl  +
            '"/>\n';
         rdftext += ' <earl:test rdf:resource="' + tcUrl + '"/>\n';
         rdftext += ' <earl:result rdf:parseType="Resource">\n';
           rdftext += '  <rdf:type ';
         rdftext += 'rdf:resource="http://www.w3.org/ns/earl#TestResult"/>\n';
         rdftext += '  <earl:outcome ';
         rdftext += 'rdf:resource="' + resultUrl + '"/>\n';
         rdftext += ' </earl:result>\n';

         rdftext += '</earl:Assertion>\n\n';
      }
   }
   rdftext += '</rdf:RDF>\n';   

   document.getElementById('earl-report').innerHTML = escapeXml(rdftext);
}

/**
 * Escapes XML-specific codes, such as <, >, & and \t and encodes them
 * into XHTML.
 */
function escapeXml(text)
{
   var rval = '';
   
   var LT = new RegExp("<", "g");  
   var GT = new RegExp(">", "g");  
   var AMP = new RegExp("&", "g");  
   var TAB = new RegExp("\t", "g");
   
   rval = text.replace(AMP,"&amp;").replace(LT, "&lt;").replace(GT, "&gt;").replace(TAB, "   ");

   return rval;
}