structSearch.module

Go to the documentation of this file.

<?php




// Include the utilities function used by the hooks and tools
include_once('./' . drupal_get_path('module', 'conStruct') . '/framework/utilities.php');


function structSearch_main()
{
  global $base_url;

  drupal_set_html_head("<link type=\"text/css\" rel=\"stylesheet\" media=\"all\" href=\"" . $base_url . "/"
    . drupal_get_path("module", "structSearch") . "/css/style.css\" />");

  return (conStruct_search("", TRUE));
}

function structSearch_access($op, $node, $account)
{
  return TRUE;
}

function structSearch_access_callback()
{
  return TRUE;
}


function structSearch_block($op = 'list', $delta = 0, $edit = array())
{
  global $base_url;

  // The $op parameter determines what piece of information is being requested.
  switch ($op)
  {
    case 'list':

      // If $op is "list", we just need to return a list of block descriptions.
      // This is used to provide a list of possible blocks to the administrator,
      // end users will not see these descriptions.
      $blocks[0]['info'] = t('conStruct Search Tool');
      return $blocks;

    case 'configure':
      // If $op is "configure", we need to provide the administrator with a
      // configuration form. The $delta parameter tells us which block is being
      // configured. In this example, we'll allow the administrator to customize
      // the text of the first block.
      $form = array();
      if ($delta == 0)
      {
        // All we need to provide is a text field, Drupal will take care of
        // the other block configuration options and the save button.
        $form['block_example_string'] = array(
          '#type' => 'textfield',
          '#title' => t('Block contents'),
          '#size' => 100,
          '#description' => t('This string will appear in the conStruct Tools menu'),
          '#default_value' => variable_get('conStruct_string', t(''))
        );
      }

      return $form;

    case 'save':

      // If $op is "save", we need to save settings from the configuration form.
      // Since the first block is the only one that allows configuration, we
      // need to check $delta to make sure we only save it.
      if ($delta == 0)
      {
        // Have Drupal save the string to the database.
        variable_set('structSearch_string', $edit['structSearch_string']);
      }
      return;

    case 'view':

    default:

      // If $op is "view", then we need to generate the block for display
      // purposes. The $delta parameter tells us which block is being requested.
      switch ($delta)
      {
        case 0:
          // The subject is displayed at the top of the block. Note that it
          // should be passed through t() for translation.
          $block['subject'] = t('conStruct Search Tool');
          // The content of the block is typically generated by calling a custom
          // function.
          $block['content'] = structSearch_contents(1);
          break;
      }
      return $block;
  }
}

function structSearch_contents($which_block)
{
  global $base_url;

  if ($which_block == 1)
  {
    // Get the base path of the Drupal installation folder on the file system of the server
    $menuItems = "";

    if (user_access('access conStruct search'))
    {
      $localPath = $base_url . "/" . drupal_get_path("module", "structSearch") . "/imgs/";

      // For all users
      $menuItems .= "<img src=\"" . $localPath . "katomic.png\" style=\"padding-right:5px;\" alt=\"\" /><a href=\"" . $base_url
        . "/conStruct/search/\">Search</a><br />";
    }

    return variable_get('structSearch_menu', t($menuItems));
  }
}

function structSearch_menu()
{
  $items = array();

  // Registration of the main conStruct module page path
  $items['conStruct/search'] = array(
    'page callback' => 'structSearch_main',
    'access callback' => 'structSearch_access_callback',
    'type' => MENU_CALLBACK
  );

  return $items;
}


function structSearch_perm()
{
  return array(
    'access conStruct search',
    'administer conStruct search'
  );
}


function conStruct_search($baseLinksUrl, $showFilters)
{
  // Make sure the user has access to this tool
  if (!user_access('access conStruct search'))
  {
    return "<h2>" . t("You don't have access to this tool, sorry.") . "</h2>";
  }
  else
  {
    include_once('./' . drupal_get_path('module', 'conStruct') . '/framework/WebServiceQuerier.php');
    include_once('./' . drupal_get_path('module', 'conStruct') . '/framework/ProcessorXML.php');


    // Display errors when in debug mode
    if (!isset($_GET['debug']) || $_GET['debug'] != 1)
    {
      ini_set("error_reporting", 0);
    }

    // Current page of the resultset to display to the user
    $page = 0;

    if (isset($_GET['page']))
    {
      $page = $_GET['page'];
    }

    // Requested mime of a search page resultset export
    $requestedMime = "";

    if (isset($_GET['mime']))
    {
      // Check if the mime is supported
      if ($_GET["mime"] == "application/json" || $_GET["mime"] == "application/iron+json"
        || $_GET["mime"] == "application/rdf+xml" || $_GET["mime"] == "application/rdf+n3"
        || $_GET["mime"] == "text/xml")
      {
        $requestedMime = $_GET['mime'];
      }
    }

    // Filtering on/off flag
    $filterStatus = "off";

    if (isset($_GET['filter']))
    {
      $filterStatus = strtolower($_GET['filter']);
    }

    global $base_url;

    $query = $_GET['query'];

    // Get all possible datasets, types and attributes filter from the query parameters
    $filterDatasets = array();
    $filterTypes = array();
    $filterAttributes = array();

    // This string used to re-create the proper search URL with all parameters in it (mainly used for paging URLs)
    $filterParameters = "";

    foreach ($_GET as $param => $value)
    {
      if (stripos($param, "filter_datasets_") !== FALSE)
      {
        array_push($filterDatasets, urlencode($value));
        $filterParameters .= "&filter_datasets_" . str_replace("filter_datasets_", "", $param) . "="
          . urlencode($value);
      }
      elseif (stripos($param, "filter_types_") !== FALSE)
      {
        array_push($filterTypes, urlencode($value));
        $filterParameters .= "&filter_types_" . str_replace("filter_types_", "", $param) . "=" . urlencode($value);
      }
      elseif (stripos($param, "filter_attributes_") !== FALSE)
      {
        array_push($filterAttributes, urlencode(urlencode($value)));
        $filterParameters .= "&filter_attributes_" . str_replace("filter_attributes_", "", $param) . "="
          . urlencode($value);
      }
    }

    include_once('./' . drupal_get_path('module', 'conStruct') . '/framework/ClassHierarchy.php');
    include_once('./' . drupal_get_path('module', 'conStruct') . '/framework/PropertyHierarchy.php');
    include_once(drupal_get_path('module', 'structSearch') . '/settings.php');

    $userIP = variable_get("conStruct_AccessUser" . $user->uid, "");
    $filename = './' . drupal_get_path('module', 'conStruct') . '/framework/ontologies/classHierarchySerialized.srz';
    $file = fopen($filename, "r");
    $classHierarchy = fread($file, filesize($filename));
    $classHierarchy = unserialize($classHierarchy);
    fclose($file);

    $filename = './' . drupal_get_path('module', 'conStruct') . '/framework/ontologies/propertyHierarchySerialized.srz';
    $file = fopen($filename, "r");
    $propertyHierarchy = fread($file, filesize($filename));
    $propertyHierarchy = unserialize($propertyHierarchy);
    fclose($file);

    $inference = "on";
    $html = "";

    if (isset($_GET['query']))
    {
      $query = rtrim(ltrim($query));

      // Count the number of resources belonging to the resultset of this search query
      $nbResources = 0;
      $results = array();
      $typeAggregates = array();
      $attributeAggregates = array();
      $datasetAggregates = array();
      $searchPagingHtml = "";

      $datasetTab = "";
      $typeTab = "";
      $attributeTab = "";

      global $user;

      $userIP = variable_get("conStruct_AccessUser" . $user->uid, "");

      if ($userIP == "")
      {
        // If there is no IP for that user, we overload the IP of the node with "::"
        $userIP = "self::$user->uid";
      }

      $wsfRegistry = variable_get("WSF-Registry", "");

      if ($wsfRegistry != "")
      {
        $includedWsfAddresses = array();

        $sidRegistry = variable_get("SID-Registry", "");

        // Count the number of items displayed in the page so far
        $pageCount = $page;

        $wsfPageStartingPoint = 0;

        foreach ($wsfRegistry as $wsfAddress)
        {
          $sid = "";

          // Make sure that we don't query the same server twice
          foreach ($sidRegistry as $s => $wsfs)
          {
            if (array_search($wsfAddress, $wsfs) !== FALSE)
            {
              $sid = $s;
            }
          }

          if ($sid !== FALSE && array_search($sid, $includedWsfAddresses) === FALSE)
          {
            array_push($includedWsfAddresses, $sid);
          }
          else
          {
            continue;
          }

          // Now, lets create the union of all datasets created/linked for that node. We will only query them (even if
          // world readable (public) ones can be accessible from a target WSF)

          $targetDatasets = "";

          // We want to query all datasets
          if (count($filterDatasets) == 0)
          {
            $resultset = db_query('SELECT nid FROM {og}');

            $linkedDatasets = variable_get("Linked-Dataset-Registry", "");

            while ($datasetId = db_result($resultset))
            {
              $datasetWsf = variable_get("Dataset-" . $datasetId . "-WSF", "");

              if ($datasetWsf == $wsfAddress)
              {
                // If this dataset come from this WSF Address, then we include it into the dataset to search for.

                // Check if it is a linked dataset
                if (isset($linkedDatasets[$datasetId]))
                {
                  $targetDatasets .= $linkedDatasets[$datasetId] . ";";
                }
                else
                {
                  $datasetsRegistry = variable_get("Datasets-Registry", "");

                  if ($datasetsRegistry != "" && isset($datasetsRegistry[$datasetId]))
                  {
                    $targetDatasets .= $datasetsRegistry[$datasetId] . ";";
                  }
                  else
                  {
                    global $base_url;

                    $targetDatasets .= get_domain($base_url) . "/wsf/datasets/" . $datasetId . "/;";
                  }
                }
              }
            }

            $targetDatasets = substr($targetDatasets, 0, strlen($targetDatasets) - 1);
          }

          // Generate the filtering stucture to pass to the seach web service.

          $filters = "";

          if ($filterStatus == "on")
          {
            if (count($filterTypes) > 0)
            {
              $filters .= "&types=" . implode(";", $filterTypes);
            }

            if (count($filterAttributes) > 0)
            {
              $filters .= "&attributes=" . implode(";", $filterAttributes);
            }

            if (count($filterDatasets) > 0)
            {
              $filters .= "&datasets=" . implode(";", $filterDatasets);

              if ($targetDatasets != "")
              {
                $filters .= ";" . $targetDatasets;
              }
            }
            elseif ($targetDatasets != "")
            {
              $filters .= "&datasets=" . $targetDatasets;
            }
          }
          else
          {
            if ($targetDatasets != "")
            {
              $filters = "&datasets=" . $targetDatasets;
            }
            else
            {
              $filters = "&datasets=all";
            }
          }

          if (($pageCount - $page) < 10)
          {
            $wsq = new WebServiceQuerier($wsfAddress . "search/", "post", "text/xml",
              "query=" . urlencode($query) . $filters . "&items=" . (10 - ($pageCount - $page)) . "&page="
              . ($pageCount - $typeAggregates["http://www.w3.org/2002/07/owl#Thing"])
              . "&inference=on&include_aggregates=true&registered_ip=" . urlencode($userIP), 5);
          }
          else
          {
            // The page is already full. We query the remaining WSF only to get their counts and aggregates.
            $wsq = new WebServiceQuerier($wsfAddress . "search/", "post", "text/xml",
              "query=" . urlencode($query) . $filters . "&items=0&inference=on&include_aggregates=true&registered_ip="
              . urlencode($userIP), 5);
          }

          if ($wsq->getStatus() == 200)
          {
            // If a mime type has been requested, we send the resultset to the user (instead of a webpage)
            if ($requestedMime != "")
            {
              $fileextension = "";

              switch ($requestedMime)
              {
                case "application/json":

                  $fileextension = "js";
                  break;

                case "application/iron+json":
                  $fileextension = "irjson";
                  break;

                case "text/xml":
                  $fileextension = "xml";
                  break;

                case "application/rdf+xml":
                  $fileextension = "rdf";
                  break;

                case "application/rdf+n3":
                  $fileextension = "n3";
                  break;
              }

              // Query the CrudRead web service to getthe whole description of all records of this resultset.
              $xml = new ProcessorXML();
              $xml->loadXML($wsq->getResultset());

              $subjects = $xml->getSubjects();

              $recordsUriList = "";
              $recordsDatasetUriList = "";

              foreach ($subjects as $subject)
              {
                $recordType = $xml->getType($subject, FALSE);

                if ($recordType != "http://purl.org/ontology/aggregate#Aggregate")
                {
                  $recordUri = $xml->getURI($subject);
                  $recordsUriList .= urlencode($recordUri) . ";";

                  $predicates = $xml->getPredicatesByType($subject, "http://purl.org/dc/terms/isPartOf");
                  $datasetUri = "";

                  foreach ($predicates as $predicate)
                  {
                    $objects = $xml->getObjects($predicate);
                    $datasetUri = $xml->getURI($objects->item(0));

                    $recordsDatasetUriList .= urlencode($datasetUri) . ";";

                    break;
                  }
                }
              }

              $recordsUriList = trim($recordsUriList, ";");
              $recordsDatasetUriList = trim($recordsDatasetUriList, ";");

              $wsq = new WebServiceQuerier($wsfAddress . "crud/read/", "get", $requestedMime,
                "uri=" . $recordsUriList . "&dataset=" . $recordsDatasetUriList . "&registered_ip="
                . urlencode($userIP) . "&include_reification=true&include_linksback=false", 256);

              if ($wsq->getStatus() == 200)
              {
                header("HTTP/1.1 " . $wsq->getStatus() . " " . $wsq->getStatusMessage());

                // With the Search tool, if the irJSON mime as been requested, we return application/json
                // to make it processable by JSON aware browser tools.
                if ($requestedMime == "application/iron+json")
                {
                  $requestedMime = "application/json";
                }
                header("Content-Type: " . $requestedMime . "; charset=utf-8");
                header("Content-Disposition: filename=search-tool-$page.$fileextension");

                echo $wsq->getResultset();

                return;
              }
              else
              {
                return "";
              }
            }

            $xml = new ProcessorXML();
            $xml->loadXML($wsq->getResultset());

            $aggregates = $xml->getSubjectsByType("aggr:Aggregate");

            foreach ($aggregates as $aggregate)
            {
              $aggregetionType = $xml->getPredicatesByType($aggregate, "aggr:property");
              $aggregetionTypeObj = $xml->getObjects($aggregetionType->item(0));

              switch ($xml->getURI($aggregetionTypeObj->item(0)))
              {
                case "http://www.w3.org/1999/02/22-rdf-syntax-ns#type":
                  $aggregateObject = $xml->getPredicatesByType($aggregate, "aggr:object");
                  $aggregateObjectObj = $xml->getObjects($aggregateObject->item(0));

                  $aggregateCount = $xml->getPredicatesByType($aggregate, "aggr:count");
                  $aggregateCountObj = $xml->getObjects($aggregateCount->item(0));
                  if (!isset($typeAggregates[$xml->getURI($aggregateObjectObj->item(0))]))
                  {
                    $typeAggregates[$xml->getURI($aggregateObjectObj->item(0))] = $xml->getContent(
                      $aggregateCountObj->item(0));
                  }
                  else
                  {
                    $typeAggregates[$xml->getURI($aggregateObjectObj->item(0))] += $xml->getContent(
                      $aggregateCountObj->item(0));
                  }

                  break;

                case "http://rdfs.org/ns/void#Dataset":
                  $aggregateObject = $xml->getPredicatesByType($aggregate, "aggr:object");
                  $aggregateObjectObj = $xml->getObjects($aggregateObject->item(0));

                  $aggregateCount = $xml->getPredicatesByType($aggregate, "aggr:count");
                  $aggregateCountObj = $xml->getObjects($aggregateCount->item(0));

                  $datasetAggregates[$xml->getURI($aggregateObjectObj->item(0))] =
                    $xml->getContent($aggregateCountObj->item(0));
                  break;

                case "http://www.w3.org/1999/02/22-rdf-syntax-ns#Property":
                  $aggregateObject = $xml->getPredicatesByType($aggregate, "http://purl.org/ontology/aggregate#object");
                  $aggregateObjectObj = $xml->getObjects($aggregateObject->item(0));

                  $aggregateCount = $xml->getPredicatesByType($aggregate, "http://purl.org/ontology/aggregate#count");
                  $aggregateCountObj = $xml->getObjects($aggregateCount->item(0));

                  $attributeAggregates[$xml->getURI($aggregateObjectObj->item(0))] =
                    $xml->getContent($aggregateCountObj->item(0));
                  break;
              }
            }

            // Get all the results
            $subjects = $xml->getSubjects();

            foreach ($subjects as $subject)
            {
              $subjectType = $xml->getType($subject);

              if ($subjectType != "aggr:Aggregate")
              {
                // Increase the count for the current page.
                $pageCount++;

                // Get and set the URI
                $subjectUri = $xml->getURI($subject);

                $results[$subjectUri] = array();

                $results[$subjectUri]["type"] = array($subjectType);

                $predicates = $xml->getPredicates($subject);

                foreach ($predicates as $predicate)
                {
                  $predicateType = $xml->getType($predicate, FALSE);

                  $datasetUri = "";

                  if ($predicateType == "http://purl.org/dc/terms/isPartOf")
                  {
                    $objects = $xml->getObjects($predicate);
                    $datasetUri = $xml->getURI($objects->item(0));

                    if ($datasetUri != "")
                    {
                      $results[$subjectUri]["dataset"] = $datasetUri;

                      continue;
                    }
                  }

                  $objects = $xml->getObjects($predicate);

                  // Check if it is a reified statement
                  $nodesList = $xml->getReificationStatements($objects->item(0));

                  $objectText = "";

                  if ($nodesList->length > 0)
                  {
                    $objectText = $xml->getValue($nodesList->item(0));
                    $objectUri = $xml->getURI($objects->item(0));
                  }
                  else
                  {
                    $objectText = $xml->getContent($objects->item(0));
                  }

                  if (!isset($results[$subjectUri][$predicateType]))
                  {
                    $results[$subjectUri][$predicateType] = array(array(
                      "text" => $objectText,
                      "uri" => $objectUri
                    ));
                  }
                  else
                  {
                    array_push($results[$subjectUri][$predicateType], array(
                      "text" => $objectText,
                      "uri" => $objectUri
                    ));
                  }
                }
              }
            }
          }
          else
          {
            $wsq->displayError();
          }
        }
      }

      // Get the number of results
      foreach ($datasetAggregates as $da)
      {
        $nbResources += $da;
      }

      if ($nbResources > 0)
      {
        // Count the number of pages
        $nbPages = (ceil($nbResources / 10) > 10 ? 10 : ceil($nbResources / 10));

        $nbPagesTotal = ceil($nbResources / 10);

        $currentPage = (($page + 10) / 10);
        $maxDisplayPages = 10;

        $currentSlide = floor($page / 100) * 10;

        // Display the "pages switcher" tool
        $html .= "<div class=\"pages\">\n";

        $html .= "<span style=\"padding-right:10px; font-size:medium;\">" . ($page + 1) . " - "
          . (($page + 10) > $nbResources ? $nbResources : ($page + 10)) . " of "
          . number_format($nbResources, 0, ',', ' ') . " $typeName "
          . ($filter == "" ? "" : "with a <strong>$filterLabel</strong> attribute") . "</span>\n";
        $searchPagingHtml .= "<div style=\"position:relative; top:3px; float:right;\">\n";

        if ($currentPage == 1)
        {
          $searchPagingHtml .= "<span class=\"nextprev\">&laquo; Previous</span>\n";
        }
        else
        {
          $searchPagingHtml .= "<a class=\"nextprev\" href=\"$base_url/conStruct/search/?page=" . ($page - 10)
            . "&filter=" . $filterStatus . "&query=" . urlencode($query) . $filterParameters
            . "\">&laquo; Previous</a>\n";
        }

        for ($i = (1 + $currentSlide);
          $i <= (($nbPages + $currentSlide) > $nbPagesTotal ? $nbPagesTotal : ($nbPages + $currentSlide)); $i++)
        {
          if ($currentPage == $i)
          {
            $searchPagingHtml .= "<span class=\"current\">$i</span>\n";
          }
          else
          {
            $searchPagingHtml .= "<a href=\"$base_url/conStruct/search/?&filter=" . $filterStatus . "&page="
              . (($i - 1) * 10) . "&query=" . urlencode($query) . $filterParameters . "\">$i</a>\n";
          }
        }

        if ($currentPage == $nbPagesTotal || $nbPagesTotal == 0)
        {
          $searchPagingHtml .= "<span class=\"nextprev\">Next &raquo;</span>\n";
        }
        else
        {
          $searchPagingHtml .= "<a class=\"nextprev\" href=\"$base_url/conStruct/search/?&filter=" . $filterStatus
            . "&page=" . ($page + 10) . "&query=" . urlencode($query) . $filterParameters . "\">Next &raquo;</a>\n";
        }

        $searchPagingHtml .= "</div>\n";

        $html .= $searchPagingHtml;

        $html .= "</div>\n";
      }
    }

    // Get the names and descriptions of the dataset available to this user.
    $wsfRegistry = variable_get("WSF-Registry", "");

    $datasetTitles = array();

    if ($wsfRegistry != "")
    {
      $includedWsfAddresses = array();

      $sidRegistry = variable_get("SID-Registry", "");

      foreach ($wsfRegistry as $wsfAddress)
      {
        $sid = "";

        // Make sure that we don't query the same server twice
        foreach ($sidRegistry as $s => $wsfs)
        {
          if (array_search($wsfAddress, $wsfs) !== FALSE)
          {
            $sid = $s;
          }
        }

        if ($sid !== FALSE && array_search($sid, $includedWsfAddresses) === FALSE)
        {
          array_push($includedWsfAddresses, $sid);
        }
        else
        {
          continue;
        }

        $wsq = new WebServiceQuerier($wsfAddress . "dataset/read/", "get", "text/xml",
          "uri=all&registered_ip=" . urlencode($userIP), 5);

        if ($wsq->getStatus() == 200)
        {
          $xml = new ProcessorXML();
          $xml->loadXML($wsq->getResultset());

          $datasets = $xml->getSubjectsByType("void:Dataset");

          foreach ($datasets as $d)
          {
            $datasetUri = $xml->getURI($d);

            $predicates = $xml->getPredicatesByType($d, "dcterms:title");
            $objects = $xml->getObjectsByType($predicates->item(0), "rdfs:Literal");
            $datasetTitle = $xml->getContent($objects->item(0));

            $datasetTitles[$datasetUri] = $datasetTitle;
          }
        }
        else
        {
          if ($wsq->getStatus() != 503 && $wsq->getStatus() != 404)
          {
            $wsq->displayError();
          }
        }
      }
    }

    // Fill the filtering by dataset tab.

    $datasetTab = "<table style=\"border:0px none;\"><tbody style=\"border: none;\">";

    $tdCount = 0;

    if(gettype($datasetAggregates) == "array")
    {
      arsort($datasetAggregates);
    }

    if (count($datasetAggregates) < 1 && count($filterDatasets) < 1)
    {
      $datasetTab .= "<tr><td>No dataset filter can be applied for this search query</td></tr>";
    }
    else
    {
      foreach ($datasetAggregates as $d => $count)
      {
        if (($tdCount % 3) == 0)
        {
          $datasetTab .= "</tr>";
          $datasetTab .= "<tr>";
        }

        $datasetTab
          .= "<td style=\"border:0px none;\"><table style=\"border:0px none; padding: 0px; margin:0px;\"><tbody style=\"border: none;\"><tr><td style=\"border:0px none; width:1px;\"><input onClick=\"setFilterOn()\" type=\"checkbox\" name=\"filter_datasets_"
          . $tdCount . "\" value='" . $d . "' "
          . (array_search(urlencode($d), $filterDatasets) !== FALSE ? "checked" : "")
            . "></td><td style=\"border:0px none;\">" . wordwrap($datasetTitles[$d], 28, "<br />")
            . "</td></tr></tbody></table></td>";
        $tdCount++;
      }

      // Make sure that we include all filter datasets selected by the user.
      foreach ($filterDatasets as $d)
      {
        $d = urldecode($d);

        // Make sure we don't duplicate the filter.
        if (isset($datasetAggregates[$d]))
        {
          continue;
        }

        if (($tdCount % 3) == 0)
        {
          $datasetTab .= "</tr>";
          $datasetTab .= "<tr>";
        }

        $datasetTab
          .= "<td style=\"border:0px none;\"><table style=\"border:0px none; padding: 0px; margin:0px;\"><tbody style=\"border: none;\"><tr><td style=\"border:0px none; width:1px;\"><input onClick=\"setFilterOn()\" type=\"checkbox\" name=\"filter_datasets_"
          . $tdCount . "\" value='" . $d . "' "
          . (array_search(urlencode($d), $filterDatasets) !== FALSE ? "checked" : "")
            . "></td><td style=\"border:0px none;\">" . wordwrap($datasetTitles[$d], 28, "<br />")
            . "</td></tr></tbody></table></td>";

        $tdCount++;
      }

      for ($i = $tdCount; $i < 3; $i++)
      {
        $datasetTab .= "<td style=\"border:0px none;\">&nbsp;</td>";
      }

      if ($tdCount != 3)
      {
        $datasetTab .= "</tr>";
      }

      $datasetTab .= "</tbody></table>";

      $datasetTab = str_replace("'", "\'", $datasetTab);
    }

    // Populating the Type filtering tab
    $typeTab = "<table style=\"border:0px none;\"><tbody style=\"border: none;\">";

    $tdCount = 0;

    if(gettype($typeAggregates) == "array")
    {
      arsort($typeAggregates);
    }

    if (count($typeAggregates) < 1 && count($filterTypes) < 1)
    {
      $typeTab .= "<tr><td>No type filter can be applied for this search query</td></tr>";
    }
    else
    {
      // Create and fill the filtering tabs that we have to put in the YUI tab control.
      foreach ($typeAggregates as $ctype => $count)
      {
        if (array_search($ctype, $filterKindsIgnore) !== FALSE)
        {
          continue;
        }

        $className = "";
        $className = $classHierarchy->classes[$ctype]->label;

        if ($ctype == "http://www.w3.org/2002/07/owl#Thing")
        {
          continue;
        }

        if (($tdCount % 3) == 0)
        {
          $typeTab .= "</tr>";
          $typeTab .= "<tr>";
        }

        if ($className == "")
        {
          $className = get_uri_label($ctype);
        }

        $typeTab
          .= "<td style=\"border:0px none;\"><table style=\"border:0px none; padding: 0px; margin:0px;\"><tbody style=\"border: none;\"><tr><td style=\"border:0px none; width:1px;\"><input onClick=\"setFilterOn()\" type=\"checkbox\" name=\"filter_types_"
          . $tdCount . "\" value='" . $ctype . "' "
          . (array_search(urlencode($ctype), $filterTypes) !== FALSE ? "checked" : "") . "></td>"
          . (module_exists("structOntology")
            ? "<td style=\"border: 0px none ; width: 1px;\"><a href=\"" . $base_url . "/conStruct/ontology/view/?uri="
          . urlencode($ctype) . "\"><img style=\"top: 2px; position:relative;\" src=\"" . base_path()
              . drupal_get_path("module", "structSearch") . "/imgs/application_link.png\" /></a></td>" : "")
            . "<td style=\"border:0px none;\">" . wordwrap($className, 28, "<br />") . "</td>" .
          "</tr></tbody></table></td>";

        $tdCount++;
      }

      // Make sure that we include all filter types selected by the user.
      foreach ($filterTypes as $ctype)
      {
        $ctype = urldecode($ctype);

        // Make sure we don't duplicate the filter.
        if (isset($typeAggregates[$ctype]))
        {
          continue;
        }

        $className = "";
        $className = $classHierarchy->classes[$ctype]->label;

        if ($ctype == "http://www.w3.org/2002/07/owl#Thing")
        {
          continue;
        }

        if (($tdCount % 3) == 0)
        {
          $typeTab .= "</tr>";
          $typeTab .= "<tr>";
        }

        if ($className == "")
        {
          $className = get_uri_label($ctype);
        }

        $typeTab
          .= "<td style=\"border:0px none;\"><table style=\"border:0px none; padding: 0px; margin:0px;\"><tbody style=\"border: none;\"><tr><td style=\"border:0px none; width:1px;\"><input onClick=\"setFilterOn()\" type=\"checkbox\" name=\"filter_types_"
          . $tdCount . "\" value='" . $ctype . "' "
          . (array_search(urlencode($ctype), $filterTypes) !== FALSE ? "checked" : "") . "></td>"
          . (module_exists("structOntology")
            ? "<td style=\"border: 0px none ; width: 1px;\"><a href=\"" . $base_url . "/conStruct/ontology/view/?uri="
          . urlencode($ctype) . "\"><img style=\"top: 2px; position:relative;\" src=\"" . base_path()
              . drupal_get_path("module", "structSearch") . "/imgs/application_link.png\" /></a></td>" : "")
            . "<td style=\"border:0px none;\">" . wordwrap($className, 28, "<br />") . "</td>" .
          "</tr></tbody></table></td>";

        $tdCount++;
      }

      for ($i = $tdCount; $i < 3; $i++)
      {
        $typeTab .= "<td style=\"border:0px none;\">&nbsp;</td>";
      }

      if ($tdCount != 3)
      {
        $typeTab .= "</tr>";
      }
    }

    $typeTab .= "</tbody></table>";

    $typeTab = str_replace("'", "\'", $typeTab);

    $attributeTab = "<table style=\"border:0px none;\"><tbody style=\"border: none;\">";

    $tdCount = 0;

    if(gettype($attributeAggregates) == "array")
    {
      arsort($attributeAggregates);
    }

    if (count($attributeAggregates) < 1 && count($filterAttributes) < 1)
    {
      $attributeTab .= "<tr><td>No attribute filter can be applied for this search query</td></tr>";
    }
    else
    {
      foreach ($attributeAggregates as $property => $count)
      {
        if (array_search($property, $filterAttributesIgnore) !== FALSE)
        {
          continue;
        }

        if (($tdCount % 3) == 0)
        {
          $attributeTab .= "</tr>";
          $attributeTab .= "<tr>";
        }

        $attributeTab .= "<td style=\"border:0px none;\"><table style=\"border:0px none; padding: 0px; margin:0px;\">" .
          "<tbody style=\"border: none;\"><tr><td style=\"border:0px none; width:1px;\">" .
          "<input onClick=\"setFilterOn()\" type=\"checkbox\" name=\"filter_attributes_" . $tdCount . "\" value='"
          . $property . "' "
          . (array_search(urlencode(urlencode($property)), $filterAttributes) !== FALSE ? "checked" : "") . "></td>"
          . (module_exists("structOntology")
            ? "<td style=\"border: 0px none ; width: 1px;\"><a href=\"" . $base_url . "/conStruct/ontology/view/?uri="
          . urlencode($property) . "\"><img style=\"top: 2px; position:relative;\" src=\"" . base_path()
              . drupal_get_path("module", "structSearch") . "/imgs/application_link.png\" /></a></td>" : "") .
          "<td style=\"border:0px none; width: 100%;\">" . wordwrap(($propertyHierarchy->properties[$property]->label
          == "" ? get_uri_label($property) : $propertyHierarchy->properties[$property]->label), 28, "<br />")
          . "</td>" .
          "</tr></tbody></table></td>";

        $tdCount++;
      }

      // Make sure that we include all filter attributes selected by the user.
      foreach ($filterAttributes as $property)
      {
        $property = urldecode(urldecode($property));

        // Make sure we don't duplicate the filter.
        if (isset($attributeAggregates[$property]))
        {
          continue;
        }

        if (($tdCount % 3) == 0)
        {
          $attributeTab .= "</tr>";
          $attributeTab .= "<tr>";
        }

        $attributeTab .= "<td style=\"border:0px none;\"><table style=\"border:0px none; padding: 0px; margin:0px;\">" .
          "<tbody style=\"border: none;\"><tr><td style=\"border:0px none; width:1px;\">" .
          "<input onClick=\"setFilterOn()\" type=\"checkbox\" name=\"filter_attributes_" . $tdCount . "\" value='"
          . $property . "' "
          . (array_search(urlencode(urlencode($property)), $filterAttributes) !== FALSE ? "checked" : "") . "></td>"
          . (module_exists("structOntology")
            ? "<td style=\"border: 0px none ; width: 1px;\"><a href=\"" . $base_url . "/conStruct/ontology/view/?uri="
          . urlencode($property) . "\"><img style=\"top: 2px; position:relative;\" src=\"" . base_path()
              . drupal_get_path("module", "structSearch") . "/imgs/application_link.png\" /></a></td>" : "") .
          "<td style=\"border:0px none; width: 100%;\">" . wordwrap(($propertyHierarchy->properties[$property]->label
          == "" ? get_uri_label($property) : $propertyHierarchy->properties[$property]->label), 28, "<br />")
          . "</td>" .
          "</tr></tbody></table></td>";

        $tdCount++;
      }

      for ($i = $tdCount; $i < 3; $i++)
      {
        $attributeTab .= "<td style=\"border:0px none;\">&nbsp;</td>";
      }

      if ($tdCount != 3)
      {
        $attributeTab .= "</tr>";
      }
    }

    $attributeTab .= "</tbody></table>";

    $attributeTab = str_replace("'", "\'", $attributeTab);


    // Populating the Export tab
    $exportTab = "<table style=\"border:0px none;\"><tbody style=\"border: none;\">";

    $pos = strpos($_SERVER["REQUEST_URI"], "?");

    $exportTab .= "<tr><td><img style=\"top: 4px; position:relative;\" src=\"" . base_path()
      . drupal_get_path("module", "structSearch") . "/imgs/bullet_blue.png\" /><a target=\"_blank\" href=\"?"
      . substr($_SERVER["REQUEST_URI"], $pos + 1, strlen($_SERVER["REQUEST_URI"])) . "&mime="
      . urlencode("application/iron+json") . "\">irJSON</a></td></tr>";
    $exportTab .= "<tr><td><img style=\"top: 4px; position:relative;\" src=\"" . base_path()
      . drupal_get_path("module", "structSearch") . "/imgs/bullet_blue.png\" /><a target=\"_blank\" href=\"?"
      . substr($_SERVER["REQUEST_URI"], $pos + 1, strlen($_SERVER["REQUEST_URI"])) . "&mime="
      . urlencode("application/json") . "\">JSON</a></td></tr>";
    $exportTab .= "<tr><td><img style=\"top: 4px; position:relative;\" src=\"" . base_path()
      . drupal_get_path("module", "structSearch") . "/imgs/bullet_blue.png\" /><a target=\"_blank\" href=\"?"
      . substr($_SERVER["REQUEST_URI"], $pos + 1, strlen($_SERVER["REQUEST_URI"])) . "&mime=" . urlencode("text/xml")
      . "\">XML</a></td></tr>";
    $exportTab .= "<tr><td><img style=\"top: 4px; position:relative;\" src=\"" . base_path()
      . drupal_get_path("module", "structSearch") . "/imgs/bullet_blue.png\" /><a target=\"_blank\" href=\"?"
      . substr($_SERVER["REQUEST_URI"], $pos + 1, strlen($_SERVER["REQUEST_URI"])) . "&mime="
      . urlencode("application/rdf+xml") . "\">RDF+XML</a></td></tr>";
    $exportTab .= "<tr><td><img style=\"top: 4px; position:relative;\" src=\"" . base_path()
      . drupal_get_path("module", "structSearch") . "/imgs/bullet_blue.png\" /><a target=\"_blank\" href=\"?"
      . substr($_SERVER["REQUEST_URI"], $pos + 1, strlen($_SERVER["REQUEST_URI"])) . "&mime="
      . urlencode("application/rdf+n3") . "\">RDF+N3</a></td></tr>";

    $exportTab .= "</tbody></table>";

    // Inject JS scripts for the auto-copletion tool in the HTML page's header
    drupal_set_html_head("<style type=\"text/css\">
                                       /*margin and padding on body element
                                         can introduce errors in determining
                                         element position and are not recommended;
                                         we turn them off as a foundation for YUI
                                         CSS treatments. */
                                       body {
                                          margin:0;
                                          padding:0;
                                       }
                                    </style>
                                    
                                    <script type=\"text/javascript\">
                                       function setFilterOn() 
                                       {
                                          if(document.getElementById)
                                          {
                                             document.getElementById('radioFilterOff').checked = false;
                                             document.getElementById('radioFilterOn').checked = true;
                                          }
                                       }
                                    </script>                                    
                                       
                                    <link rel=\"stylesheet\" type=\"text/css\" href=\"" . base_path() . drupal_get_path("module", "conStruct") . "/js/yui/build/fonts/fonts-min.css\" />
                                    <link rel=\"stylesheet\" type=\"text/css\" href=\"" . base_path() . drupal_get_path("module", "conStruct") . "/js/yui/build/tabview/assets/skins/sam/tabview.css\" />
                                    
                                    <script type=\"text/javascript\" src=\"" . base_path() . drupal_get_path("module", "conStruct") . "/js/yui/build/yahoo-dom-event/yahoo-dom-event.js\"></script>

                                    <script type=\"text/javascript\" src=\"" . base_path() . drupal_get_path("module", "conStruct") . "/js/yui/build/element/element-min.js\"></script>
                                    <script type=\"text/javascript\" src=\"" . base_path() . drupal_get_path("module", "conStruct")
      . "/js/yui/build/tabview/tabview-min.js\"></script>");

    if (isset($_GET['query']) && $nbResources > 0)
    {
      $html .= "<div class=\"yui-skin-sam\" style=\"width:100%;\">   
                           <form id=\"filterForm\" action=\"" . $baseLinksUrl . "\">
                           
                              <div class=\"yui-skin-sam\" style=\"width:100%;border-color:#2647A0; border-bottom-width: 5px; padding-top: 5px; padding-bottom: 5px\">
                                 <div id=\"filtering_tabs_search\"></div> 
                              </div>                           
                           
                              <table border=\"0\" style=\"width:100%\">
                                 <tr>
                                    <td>Search for:</td>
                                    <td style=\"width:50px\">
                                       <input name=\"query\" id=\"search_keyword\" type=\"text\" value='"
        . $_GET['query'] . "' size=\"50px\" />
                                    </td>
                                    <td>
                                       <input type=\"radio\" id=\"radioFilterOff\" name=\"filter\" value=\"off\" "
        . ($filterStatus == "off" ? "checked" : "") . "> All
                                       <input type=\"radio\" id=\"radioFilterOn\" name=\"filter\" value=\"on\" "
        . ($filterStatus == "on" ? "checked" : "")
        . "> Filter(s) 
                                    </td>
                                    <td>
                                       <input id=\"filterSubmit\" type=\"submit\" value=\"Search\" style=\"position:static;\">
                                    </td>
                                 </tr>
                              </table>
                           </form>
                        </div>";

      // Display the information relative to the resources.
      $nb = 1;

      $firstAlreadyIncluded = "";

      global $base_url;

      // Check if it is a phrase search
      $isPhraseSearch = FALSE;

      if (substr($query, 0, 1) == '"' && substr($query, strlen($query) - 1, 1) == '"')
      {
        $isPhraseSearch = TRUE;
      }

      foreach ($results as $uri => $result)
      {
        $resourceLabel = getResourceLabel($result, "<em>Untitled Record</em>");

        // Check if we can enable Scones edition for this resultset.
        $enableSconesEdit = FALSE;
        if(module_exists("structScones"))
        {
          // Now check if this item can be edit by Scones.
          
          // Check if the property sco:storyTextUri exists
          // Check if the property iron:prefLabel exists
          if(is_array($result["http://purl.org/ontology/iron#prefLabel"]) &&
             is_array($result["http://purl.org/ontology/sco#storyTextUri"]))
          {
            $enableSconesEdit = TRUE;
          }
        }        
        
        $html .= "<div style=\"padding-top:25px;\" />".
                  (!user_access('administer conStruct') ? "" : 
                  "
                  <span class=\"item-admin-toolbox\">
                  
                    ".(!$enableSconesEdit ? "" : "
                    <a href=\"" . $base_url . "/conStruct/scones/?targetUri=".urlencode($uri)."&targetDataset=".
                       urlencode($result["dataset"])
                       . "\" alt=\"Update document using Scones\" title=\"Update document using Scones\">" .
                    
                      "<img src=\"" . base_path() . drupal_get_path("module", "structSearch")
                            . "/imgs/tag_blue.png\" border=\"0\" " .
                            "style=\"padding-right:5px;\" />
                    </a>")."
                  
                  
                    <a href=\"" . $base_url . "/conStruct/update/?uri=" . urlencode($uri)
                       . "&dataset=" . urlencode($result["dataset"]) . "\" alt=\"Update item\" title=\"Update item\">" .
                       "<img src=\"" . base_path() . drupal_get_path("module", "structSearch") . 
                             "/imgs/overlays.png\" border=\"0\" "
                             ."style=\"padding-right:5px;\" />
                    </a>
                    
                    <a href=\"" . $base_url . "/conStruct/delete/?uri=" . urlencode($uri) .
                       "&dataset=" . urlencode($result["dataset"]) . "\" 
                       alt=\"Delete item\" title=\"Delete item\">
                       <img src=\"". base_path() . drupal_get_path("module", "structSearch") . 
                            "/imgs/cancel.png\" border=\"0\" style=\"\" />
                    </a>
                   
                  </span>")
          ."<div style=\"border-bottom: 1px solid #666666\"<strong>"
          . ($nb + $page) . ". " .
          "<a style=\"padding-left:3px; text-decoration: none;\" href=\"" . $base_url . "/conStruct/view/?uri="
          . urlencode($uri) . "&dataset=" . urlencode($result["dataset"]) . "\">" . $resourceLabel
          . "</a> </strong></div></div>\n";

        $nb++;

        foreach ($result as $property => $values)
        {
          if (is_array($values) === FALSE)
          {
            $values = array($values);
          }

          foreach ($values as $value)
          {
            $keywordFound = FALSE;

            if ($isPhraseSearch === FALSE)
            {
              $keywords = explode(" ", preg_replace("/[^a-zA-Z0-9\s]/", "", $query));

              foreach ($keywords as $keyword)
              {
                if (stripos($value["text"], $keyword) !== FALSE)
                {
                  $keywordFound = TRUE;
                }
              }
            }
            else
            {
              $keywordFound = stripos($value["text"], substr($query, 1, strlen($query) - 2));
            }

            if ($property != "type" && $property != "dataset" && $keywordFound !== FALSE)
            {
              if (!isset($propertyHierarchy->properties[$property])
                || strlen($propertyLabel = $propertyHierarchy->properties[$property]->label) < 1)
              {
                $pos = strripos($property, "#");

                if ($pos === FALSE)
                {
                  $pos = strripos($property, "/");
                }

                if ($pos !== FALSE)
                {
                  $pos++;
                }

                $propertyLabel = substr($property, $pos, strlen($property) - $pos);
              }
              else
              {
                $propertyLabel = $propertyHierarchy->properties[$property]->label;
              }

              $value["text"] = strip_tags($value["text"]);

              if ($isPhraseSearch)
              {
                $value["text"] = str_ireplace(substr($query, 1, strlen($query) - 2),
                  "<span style=\"background-color: #5CB3FF; padding-right: 3px; padding-left: 3px;\"><strong>"
                  . substr($query, 1, strlen($query) - 2) . "</strong></span>", $value["text"]);
              }
              else
              {
                $keywords = explode(" ", preg_replace("/[^a-zA-Z0-9\s]/", "", $query));

                foreach ($keywords as $keyword)
                {
                  $value["text"] = str_ireplace($keyword,
                    "<span style=\"padding-right: 3px; padding-left: 3px; text-decoration: none; border-bottom: dotted 1px #cc0000; \"><strong>$keyword</strong></span>",
                    $value["text"]);
                }
              }

              if ($filterStatus == "off" || array_search(urlencode(urlencode($property)), $filterAttributes) !== FALSE)
              {
                $html .= "<div>" .
                  "<img src=\"" . base_path() . drupal_get_path("module", "structSearch")
                  . "/imgs/magnifier.png\" border=\"0\" " .
                  "style=\"padding-right:5px; position:relative; top:3px\" /><span style=\"padding-left:0px;\"><strong>Found in <em><b>$propertyLabel</b>"
                  .
                  "</em>:</strong> <span style=\"font-size:14px\">" . $value["text"] . "</span></span></div>";
              }
            }
          }
        }

        // Aggregate some information to preview this record
        $display = "";

        include("display.php");

        if ($preview != "")
        {
          $html .= "<div style=\"padding-top: 10px; padding-bottom: 10px;\">" . $preview .
            "</div>";
        }

        $html .= "<div style=\"font-weight: bold; color: rgb(109, 151, 10);\"><em>Source: <a href=\"" . $baseLinksUrl
          . "?query=" . urlencode($query) . "&filter_datasets_1=" . urlencode($result["dataset"]) .
          "&page=" . $page . "\">" . $datasetTitles[$result["dataset"]] . "</a>"
          . ($addFromSkin != "" ? $addFromSkin : "") . "</em></div>\n";
      }

      if (count($results) > 0)
      {
        $html .= "<div class=\"pages\">\n";
        $html .= $searchPagingHtml;
        $html .= "</div>\n";
      }
    }
    else
    {
      $html .= "<div class=\"yui-skin-sam\" style=\"width:100%;\">   
                           <form id=\"filterForm\" action=\"" . $baseLinksUrl . "\">

                              <div class=\"yui-skin-sam\" style=\"width:100%;border-color:#2647A0; border-bottom-width: 5px; padding-top: 5px; padding-bottom: 5px\">
                                 <div id=\"filtering_tabs_search\"></div> 
                              </div>                     
                           
                              <table border=\"0\" style=\"width:100%\">
                                 <tr>
                                    <td>Search for:</td>
                                    <td style=\"width:50px\">
                                       <input name=\"query\" id=\"search_keyword\" type=\"text\" value=\""
        . $_GET['query'] . "\" size=\"50px\" />
                                    </td>
                                    <td>
                                       <input type=\"radio\" id=\"radioFilterOff\" name=\"filter\" value=\"off\" "
        . ($filterStatus == "off" ? "checked" : "") . "> All
                                       <input type=\"radio\" id=\"radioFilterOn\" name=\"filter\" value=\"on\" "
        . ($filterStatus == "on" ? "checked" : "")
        . "> Filter(s) 
                                    </td>
                                    <td>
                                       <input id=\"filterSubmit\" type=\"submit\" value=\"Search\" style=\"position:static;\">
                                    </td>
                                 </tr>
                              </table>
                           </form>
                        </div>";

      if ($nbResources <= 0 && isset($_GET['query']))
      {
        $html .= "No result found";
      }
    }

    // If no query is defined for this search tool page load, we get the aggregate counts from the browser service.
    // This is used to initiate the filtering tabs.
    if ($nbResources <= 0 && !isset($_GET['query']))
    {
      global $user;

      $userIP = variable_get("conStruct_AccessUser" . $user->uid, "");

      if ($userIP == "")
      {
        // If there is no IP for that user, we overload the IP of the node with "::"
        $userIP = "self::$user->uid";
      }

      $wsfRegistry = variable_get("WSF-Registry", "");
         
      if ($wsfRegistry != "")
      {
        $includedWsfAddresses = array();

        $sidRegistry = variable_get("SID-Registry", "");

        // Count the number of items displayed in the page so far
        $pageCount = $page;

        $wsfPageStartingPoint = 0;
                
        foreach ($wsfRegistry as $wsfAddress)
        {
          $sid = "";

          // Make sure that we don't query the same server twice
          foreach ($sidRegistry as $s => $wsfs)
          {
            if (array_search($wsfAddress, $wsfs) !== FALSE)
            {
              $sid = $s;
            }
          }

          if ($sid !== FALSE && array_search($sid, $includedWsfAddresses) === FALSE)
          {
            array_push($includedWsfAddresses, $sid);
          }
          else
          {
            continue;
          }

          // Now, lets create the union of all datasets created/linked for that node. We will only query them (even if
          // world readable (public) ones can be accessible from a target WSF)
          $targetDatasets = "";

          $resultset = db_query('SELECT nid FROM {og}');

          $linkedDatasets = variable_get("Linked-Dataset-Registry", "");

          while ($datasetId = db_result($resultset))
          {
            $datasetWsf = variable_get("Dataset-" . $datasetId . "-WSF", "");

            if ($datasetWsf == $wsfAddress)
            {
              // If this dataset come from this WSF Address, then we include it into the dataset to search for.

              // Check if it is a linked dataset
              if (isset($linkedDatasets[$datasetId]))
              {
                $targetDatasets .= $linkedDatasets[$datasetId] . ";";
              }
              else
              {
                $datasetsRegistry = variable_get("Datasets-Registry", "");

                if ($datasetsRegistry != "" && isset($datasetsRegistry[$datasetId]))
                {
                  $targetDatasets .= $datasetsRegistry[$datasetId] . ";";
                }
                else
                {
                  global $base_url;

                  $targetDatasets .= get_domain($base_url) . "/wsf/datasets/" . $datasetId . "/;";
                }
              }
            }
          }

          $targetDatasets = substr($targetDatasets, 0, strlen($targetDatasets) - 1);
          
          if($targetDatasets != "" && $showFilters === TRUE)
          {
            // Get aggregates
            $wsq = new WebServiceQuerier($wsfAddress . "browse/", "post", "text/xml",
              "attributes=all&types=all&datasets=" . urlencode($targetDatasets) . "&items=0&inference=on&" .
              "include_aggregates=true&registered_ip=" . urlencode($userIP), 5);

            // Extract aggregates from the web service endpoint resultset
            $xml = new ProcessorXML();
            $xml->loadXML($wsq->getResultset());

            $aggregates = $xml->getSubjectsByType("http://purl.org/ontology/aggregate#Aggregate");

            foreach ($aggregates as $aggregate)
            {
              $aggregetionType = $xml->getPredicatesByType($aggregate, "http://purl.org/ontology/aggregate#property");
              $aggregetionTypeObj = $xml->getObjects($aggregetionType->item(0));

              switch ($xml->getURI($aggregetionTypeObj->item(0)))
              {
                case "http://www.w3.org/1999/02/22-rdf-syntax-ns#type":
                  $aggregateObject = $xml->getPredicatesByType($aggregate, "http://purl.org/ontology/aggregate#object");
                  $aggregateObjectObj = $xml->getObjects($aggregateObject->item(0));

                  $aggregateCount = $xml->getPredicatesByType($aggregate, "http://purl.org/ontology/aggregate#count");
                  $aggregateCountObj = $xml->getObjects($aggregateCount->item(0));
                  if (!isset($typeAggregates[$xml->getURI($aggregateObjectObj->item(0))]))
                  {
                    $typeAggregates[$xml->getURI($aggregateObjectObj->item(0))] = $xml->getContent(
                      $aggregateCountObj->item(0));
                  }
                  else
                  {
                    $typeAggregates[$xml->getURI($aggregateObjectObj->item(0))] += $xml->getContent(
                      $aggregateCountObj->item(0));
                  }
                  break;

                case "http://rdfs.org/ns/void#Dataset":
                  $aggregateObject = $xml->getPredicatesByType($aggregate, "http://purl.org/ontology/aggregate#object");
                  $aggregateObjectObj = $xml->getObjects($aggregateObject->item(0));

                  $aggregateCount = $xml->getPredicatesByType($aggregate, "http://purl.org/ontology/aggregate#count");
                  $aggregateCountObj = $xml->getObjects($aggregateCount->item(0));
                  if (!isset($datasetAggregates[$xml->getURI($aggregateObjectObj->item(0))]))
                  {
                    $datasetAggregates[$xml->getURI($aggregateObjectObj->item(0))] = $xml->getContent(
                      $aggregateCountObj->item(0));
                  }
                  break;

                case "http://www.w3.org/1999/02/22-rdf-syntax-ns#Property":
                  $aggregateObject = $xml->getPredicatesByType($aggregate, "http://purl.org/ontology/aggregate#object");
                  $aggregateObjectObj = $xml->getObjects($aggregateObject->item(0));

                  $aggregateCount = $xml->getPredicatesByType($aggregate, "http://purl.org/ontology/aggregate#count");
                  $aggregateCountObj = $xml->getObjects($aggregateCount->item(0));

                  $attributeAggregates[$xml->getURI($aggregateObjectObj->item(0))] =
                    $xml->getContent($aggregateCountObj->item(0));
                  break;
              }
            }

            // Populate the filtering tabs
            $tdCount = 0;

            $datasetTab = "<table style=\"border:0px none;\"><tbody style=\"border: none;\">";

            arsort($datasetAggregates);

            foreach ($datasetAggregates as $d => $count)
            {
              if (($tdCount % 3) == 0)
              {
                $datasetTab .= "</tr>";
                $datasetTab .= "<tr>";
              }

              $datasetTab .= "<td style=\"border:0px none;\"><table style=\"border:0px none; padding: 0px; margin:0px;\">" .
                "<tbody style=\"border: none;\"><tr><td style=\"border:0px none; width:1px;\">" .
                "<input onClick=\"setFilterOn()\" type=\"checkbox\" name=\"filter_datasets_" . $tdCount . "\" value='" . $d
                . "'></td>" .
                "<td style=\"border:0px none;\">" . wordwrap($datasetTitles[$d], 28, "<br />") . "<br /><em>("
                . number_format($count, 0, "", " ") . ")</em></td></tr></tbody></table></td>";
              $tdCount++;
            }

            for ($i = $tdCount; $i < 3; $i++)
            {
              $datasetTab .= "<td style=\"border:0px none;\">&nbsp;</td>";
            }

            if ($tdCount != 3)
            {
              $datasetTab .= "</tr>";
            }

            $datasetTab .= "</tbody></table>";

            $datasetTab = str_replace("'", "\'", $datasetTab);

            // Populating the Type filtering tab

            arsort($typeAggregates);

            $classHierarchyLayout = new ClassHierarchy("http://www.w3.org/2002/07/owl#Thing");

            $typeCounts = array();

            foreach ($typeAggregates as $ctype => $count)
            {
              $className = "";
              $className = $classHierarchy->classes[$ctype]->label;

              if ($ctype == "http://www.w3.org/2002/07/owl#Thing")
              {
                continue;
              }

              if ($className == "")
              {
                $className = get_uri_label($ctype);
              }

              $typeCounts[$ctype] = $count;

              if (isset($classHierarchy->classes[$ctype]))
              {
                foreach ($classHierarchy->classes[$ctype]->subClassOf as $sc)
                {
                  if ((count($classHierarchy->classes[$ctype]->subClassOf) > 1
                    && $sc->name != "http://www.w3.org/2002/07/owl#Thing")
                    || count($classHierarchy->classes[$ctype]->subClassOf) == 1)
                  {
                    $classHierarchyLayout->addClassRelationship($ctype, $sc->name);
                  }
                }
              }
              else
              {
                $classHierarchyLayout->addClassRelationship($type, "http://www.w3.org/2002/07/owl#Thing");
              }
            }

            // Copy node information from the original hierarchy
            foreach ($classHierarchyLayout->classes as $chl)
            {
              $chl->label = $classHierarchy->classes[$chl->name]->label;
              $chl->description = $classHierarchy->classes[$chl->name]->description;
            }

            $typeTab =
              generateClassHierarchyHtmlTreeSearch($classHierarchyLayout, $typeCounts, $dataset, $attribute, $type, "0",
                $filterKindsIgnore);

            $typeTab = str_replace(array(
              "'",
              "\n",
              "\r"
            ), array(
              "\'",
              "",
              ""
            ), $typeTab);

            $attributeTab = "<table style=\"border:0px none;\"><tbody style=\"border: none;\">";

            $tdCount = 0;

            if(gettype($attributeAggregates) == "array")
            {
              arsort($attributeAggregates);
            }

            foreach ($attributeAggregates as $property => $count)
            {
              if (array_search($property, $filterAttributesIgnore) !== FALSE)
              {
                continue;
              }

              if (($tdCount % 3) == 0)
              {
                $attributeTab .= "</tr>";
                $attributeTab .= "<tr>";
              }

              $attributeTab .= "<td style=\"border:0px none;\"><table style=\"border:0px none; padding: 0px; margin:0px;\">"
                .
                "<tbody style=\"border: none;\"><tr><td style=\"border:0px none; width:1px;\">" .
                "<input onClick=\"setFilterOn()\" type=\"checkbox\" name=\"filter_attributes_" . $tdCount . "\" value='"
                . $property . "'></td>" . (module_exists("structOntology")
                ? "<td style=\"border: 0px none ; width: 1px;\"><a title=\"Attribute description\" href=\"" . $base_url . "/conStruct/ontology/view/?uri="
                . urlencode($property) . "\"><img style=\"top: 2px; position:relative;\" src=\"" . base_path()
                  . drupal_get_path("module", "structSearch") . "/imgs/application_link.png\" /></a></td>" : "") .
                "<td style=\"border:0px none; width: 100%;\">" . wordwrap(($propertyHierarchy->properties[$property]->label
                == "" ? get_uri_label($property) : $propertyHierarchy->properties[$property]->label), 28, "<br />")
                . "</td>" .
                "</tr></tbody></table></td>";

              $tdCount++;
            }

            for ($i = $tdCount; $i < 3; $i++)
            {
              $attributeTab .= "<td style=\"border:0px none;\">&nbsp;</td>";
            }

            if ($tdCount != 3)
            {
              $attributeTab .= "</tr>";
            }

            $attributeTab .= "</tbody></table>";

            $attributeTab = str_replace("'", "\'", $attributeTab);
          }          
        }
      }


    }

    // Runs the filtering tabs display tool
    if($showFilters)
    {
      $html
        .= "<script type=\"text/javascript\">
                          (function() {
                             var tabView = new YAHOO.widget.TabView();
                          
                             tabView.addTab( new YAHOO.widget.Tab({
                                label: 'Filter by Dataset',
                                content: '$datasetTab',
                                active: true
                             }));
                          
                             tabView.addTab( new YAHOO.widget.Tab({
                                label: 'Filter by Kind',
                                content: '$typeTab'
                          
                             }));
                          
                             tabView.addTab( new YAHOO.widget.Tab({
                                label: 'Filter by Attribute',
                                content: '$attributeTab'
                          
                             }));";

      if ($nbResources > 0)
      {

        $html .= "      tabView.addTab( new YAHOO.widget.Tab({
                                label: 'Export',
                                content: '$exportTab'
                          
                             }));";
      }

      $html .= "        tabView.appendTo('filtering_tabs_search');
                          })();
                          </script>";
    }
    
    return ($html);
  }
}


function generateClassHierarchyHtmlTreeSearch($classHierarchy, $counts, $dataset, $attribute, $type, $page, $ignores)
{
  $html = "<ul>\n";

  if (array_search("http://www.w3.org/2002/07/owl#Thing", $ignores) === FALSE)
  {
    $html .= "  <li>Thing\n";
    $html .= "      <ul>\n";
  }

  $html .= generateClassHierarchyHtmlTreeSearchRecur($classHierarchy->classes["http://www.w3.org/2002/07/owl#Thing"],
    $counts, $dataset, $attribute, $type, $page, $ignores, 0);

  if (array_search("http://www.w3.org/2002/07/owl#Thing", $ignores) === FALSE)
  {
    $html .= "      </ul>\n";
    $html .= "  </li>\n";
  }

  $html .= "</ul>\n";

  return $html;
}

function generateClassHierarchyHtmlTreeSearchRecur($class, $counts, $dataset, $attribute, $type, $page, $ignores, $nb)
{
  global $base_url;
  $html = "";

  foreach ($class->superClassOf as $sc)
  {
    if ($sc->name == "all")
    {
      continue;
    }

    if (array_search($sc->name, $ignores) === FALSE)
    {
      $nb++;
      $html .= "        <li><input onClick=\"setFilterOn()\" type=\"checkbox\" name=\"filter_types_" . $nb
        . "\" value='" . $sc->name . "'>" . ($sc->label == "" ? get_uri_label($sc->name) : $sc->label)
        . (module_exists("structOntology")
          ? " <a href=\"" . $base_url . "/conStruct/ontology/view/?uri=" . urlencode($sc->name)
            . "\"><img style=\"top: 4px; position:relative;\" src=\"" . base_path()
            . drupal_get_path("module", "structBrowse") . "/imgs/application_link.png\" /></a>" : "") . "\n";
    }

    if (count($sc->superClassOf) > 0)
    {
      if (array_search($sc->name, $ignores) === FALSE)
      {
        $html .= "          <ul>\n";
      }

      $html .= generateClassHierarchyHtmlTreeSearchRecur($sc, $counts, $dataset, $attribute, $type, $page, $ignores,
        $nb);

      if (array_search($sc->name, $ignores) === FALSE)
      {
        $html .= "          </ul>\n";
      }
    }
    else
    {
      if (array_search($sc->name, $ignores) === FALSE)
      {
        $html .= "        </li>\n";
      }
    }
  }

  return $html;
}


?>