root/Chameleon/trunk/Chameleon/CatalogSearch/CatalogSearchPopup.phtml

<?php
include_once("CatalogSearch.php");

define("LOAD_MAPSESSION", 1);
//set the language resource file
$szLanguageResource = str_replace("\\","/",dirname(__FILE__))."/CatalogSearchPopup.dbf";


include("../session.inc.php");
include_once(COMMON."wrapper/map_navigator.php");
include_once("../CWC2ButtonCache.php");

if (isset($http_form_vars['bRetrieve']) && $http_form_vars['bRetrieve'] == '1')
{
    $szServiceId = $http_form_vars['serviceId'];
    $szGetServiceIdURL = "http://ceomap2.ccrs.nrcan.gc.ca/cgi-bin/cslt/wes/service_manager/catquery?RS=XML&ESN=f&DOCID=$szServiceId&DOIT=Get+Service";
    $fh = fopen($szGetServiceIdURL, "r");
    $szXMLDoc = "";
    while ($szString = fread($fh, 1024))
    {
        $szXMLDoc .= $szString;
    }
    
    if ($szXMLDoc != "")
    {
        $parser = xml_parser_create();
        xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, 0);
        xml_parser_set_option($parser, XML_OPTION_SKIP_WHITE,   1);
        xml_parse_into_struct($parser, $szXMLDoc, $aVals, $index);
        xml_parser_free($parser);

        $oXMLDoc =  xml_get_children($aVals);
    }
    
    if (!isset($oXMLDoc->searchResponse->value->searchStatus->attributes['numberOfRecords']) ||
                $oXMLDoc->searchResponse->value->searchStatus->attributes['success'] == false ||
                $oXMLDoc->searchResponse->value->searchStatus->attributes['numberOfRecords'] <= 0)
    {
        //THIS IS AN ERROR CONDITION - THE SERVICEID CAME FROM THE RESULTS BUT NOW CANNOT BE FOUND?
    }
    else
    {
        // Get result count
        $oRes =& $oXMLDoc->searchResponse->value->searchResults->value->ISO19119->value;
        // Start building the layer info parameters
        $szLayerTitle    = $oRes->citation->value->title->value;
        $szLayerAltTitle = $oRes->citation->value->alternateTitle->value;
        $szServerVersion = $oRes->serviceTypeVersion->value;

        // if DCP is a array, take the first one
        if (is_array($oRes->operationMetadata->value->DCP))
            $szLayerConnectString = $oRes->operationMetadata->value->DCP[0]->value->connectPoint->value->linkage->attributes['xlink:href'];
        else
            $szLayerConnectString = $oRes->operationMetadata->value->DCP->value->connectPoint->value->linkage->attributes['xlink:href'];

        // Add abstract data to layer info
        $szLayerAbstract = $oRes->abstract->value;

        // Add LatLong BBox
        $szLayerLLBB = str_replace(",", " ", substr(substr($oRes->typeProperty->value->typeValue->value->instanceValue->value->value->value, 1), 0, -1));

        // Get parameter count
        $nbParam = count($oRes->operationMetadata->value->parameter);
        for($j=0;$j<$nbParam;$j++)
        {
            // Get parameter object
            $oParam =& $oRes->operationMetadata->value->parameter[$j];

            // If parameter is a STYLE
            if ($oParam->value->parameterName->value->nameValue->value == "STYLES")
            {
                $szLayerStyles = "";
                // Is there more than one style ?
                if (is_array($oParam->value->permittedValues->value->enumValues->value->valueTitle))
                {
                    // Yes, then get style objects count
                    $nbStyle = count($oParam->value->permittedValues->value->enumValues->value->valueTitle);
                    for($k=0;$k<$nbStyle;$k++)
                    {
                      // Get style title
                      $szTitle = $oParam->value->permittedValues->value->enumValues->value->valueTitle[$k]->value;
                      // Get style online resource
                      $szOnlineRes = $oParam->value->permittedValues->value->enumValues->value->valueOnLineResource[$k]->value->linkage->attributes['xlink:href'];

                      // add them to layer info string.
                      $szLayerStyles .= $szTitle.">,<   ".$szOnlineRes.">;<";
                    }
                }
                else
                {
                    // Get style title
                    $szTitle = $oParam->value->permittedValues->value->enumValues->value->valueTitle->value;
                    // Get style online resource
                    $szOnlineRes = $oParam->value->permittedValues->value->enumValues->value->valueOnLineResource->value->linkage->attributes['xlink:href'];

                    // add them to layer info string.
                    $szLayerStyles .= $szTitle.">,<   ".$szOnlineRes.">;<";
                }

                $szLayerStyles = substr($szLayerStyles, 0, -3);
            }
            else
            if ($oParam->value->parameterName->value->nameValue->value == "FORMAT")
            {
                $szLayerFormats = "";
                // Is there more than one format ?
                if (is_array($oParam->value->permittedValues->value->enumValues->value->valueTitle))
                {
                    // Yes, then get format objects count
                    $nbFormat = count($oParam->value->permittedValues->value->enumValues->value->valueTitle);
                    for($k=0;$k<$nbFormat;$k++)
                    {
                      // Get format title
                      $szTitle = $oParam->value->permittedValues->value->enumValues->value->valueTitle[$k]->value;
                      // Get format value
                      $szValue = $oParam->value->permittedValues->value->enumValues->value->value[$k]->value;

                      // add them to layer info string.
                      $szLayerFormats .= $szValue.",";
                    }
                }
                else
                {
                    // Get format title
                    $szTitle = $oParam->value->permittedValues->value->enumValues->value->valueTitle->value;
                    // Get format value
                    $szValue = $oParam->value->permittedValues->value->enumValues->value->value->value;

                    // add them to layer info string.
                    $szLayerFormats .= $szValue.",";
                }

                $szLayerFormats = substr($szLayerFormats, 0, -1);
            }
            else
            if ($oParam->value->parameterName->value->nameValue->value == "SRS")
            {
                $szLayerSRSs = "";
                // Is there more than one srs
                if (is_array($oParam->value->permittedValues->value->enumValues->value->valueTitle))
                {
                    // Yes, then get srs objects count
                    $nbSRS = count($oParam->value->permittedValues->value->enumValues->value->valueTitle);
                    for($k=0;$k<$nbSRS;$k++)
                    {
                      // Get SRS title
                      $szTitle = $oParam->value->permittedValues->value->enumValues->value->valueTitle[$k]->value;

                      // add them to layer info string.
                      $szLayerSRSs .= $szTitle." ";
                    }
                }
                else
                {
                    // Get SRS title
                    $szTitle = $oParam->value->permittedValues->value->enumValues->value->valueTitle->value;
                    // add them to layer info string.
                    $szLayerSRSs .= $szTitle." ";
                }

                $szLayerSRSs = substr($szLayerSRSs, 0, -1);
            }
        }
    }

    $szScript = "<script language=\"JavaScript\" type=\"text/javascript\">\n".
    "var LayerTitle = '$szLayerTitle';\n".
    "var LayerAltTitle = '$szLayerAltTitle';\n".
    "var LayerServerVersion = '$szServerVersion';\n".
    "var LayerConnectString = '$szLayerConnectString';\n".
    "var LayerAbstract = '$szLayerAbstract';\n".
    "var LayerLLBB = '$szLayerLLBB';\n".
    "var LayerStyles = '$szLayerStyles';\n".
    "var LayerFormats = '$szLayerFormats';\n".
    "var LayerSRSs = '$szLayerSRSs';\n";

    if (!isset($http_form_vars['szCallbackFunc']))
    {
        $_SESSION['gErrorManager']->setError(ERR_WARNING, trim($oCommonMLT->get("CBNotSet", "Callback function not set in CatalogSearchPopup.phtml")));
        $szScript .= "window.close();\n";
    }
    else
    {
        $szScript .= "opener.".$http_form_vars['szCallbackFunc']."(0, self);\n";
    }

    $szScript .= "</SCRIPT>\n";
    echo $szScript;
    exit;
}

if (isset($http_form_vars['bSearch']) && $http_form_vars['bSearch'] == '1')
{
    $oMapNavigator = new MapNavigator( $oMapSession );
    $oMap = $oMapSession->oMap;

    $szUrl = "http://ceomap2.ccrs.nrcan.gc.ca/cgi-bin/cslt/wes/service_manager/catquery?RS=XML&catalog=http%3A%2F%2Fceomap2.ccrs.nrcan.gc.ca%2Fcgi-bin%2Fcslt%2Fwes%2Fservice_manager%2Fcatquery&QUERY=";
        $szQuery = "SRS='".substr(
           $oMapSession->oMap->getmetadata("original_projection"), 5)."' AND ";
    $szQuery.= "(title like '%".$http_form_vars['szSearchString']."%' OR ";
    $szQuery.= "abstract like '%".$http_form_vars['szSearchString']."%' ) ";
    $szQuery.= "AND Format='".(($oMapSession->oMap->imagetype == "png24")?"png":
                            $oMapSession->oMap->imagetype)."' AND ";
    $szQuery.= "ServiceType='Web Mapping Layer' AND ";

    // reproject full_extents metadata if different from projection
    $szOriginalProjection = $oMap->getMetaData("original_projection");
    $szOriginalExtents = $oMap->getMetaData("original_extents");

    if (strlen($szOriginalExtents) > 0)
    {
        $aszExtents = explode(",", $szOriginalExtents);
        if (count($aszExtents) == 4 &&
            $szOriginalProjection != "init=epsg:4326")
        {
            $aszExtents = $oMapNavigator->reprojectExtentFromCenter($aszExtents, $oMap->width, $oMap->height, $szOriginalProjection,"init=epsg:4326");
        }
        else
        {
//            $_SESSION['gErrorManager']->setError(ERR_WARNING,
//                                                 trim($oCommonMLT->get("ErrInvExt", "ERROR: Invalid extent specified in "))."CatalogSearch.widget.php.");
        }
    }
    else
    {
//        $_SESSION['gErrorManager']->setError(ERR_WARNING,
//                                             trim($oCommonMLT->get("ErrInvExt", "ERROR: Invalid extent specified in "))."CatalogSearch.widget.php.");
    }

    $szQuery.= "Intersects(LatLongBoundingBox, Envelope(".
                      implode(",", $aszExtents)."))";

    $szUrl .= urlencode($szQuery);
    $szUrl .= "&SCHEMA=ISO19119&ESN=b&WANTCONTENT=XML";
    //echo "url is $szUrl<BR>";
    
    $fh = fopen($szUrl, "r");
    $szXMLDoc = "";
    while ($szString = fread($fh, 1024))
    {
        $szXMLDoc .= $szString;
    }
    
    if ($szXMLDoc != "")
    {
        $parser = xml_parser_create();
        xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, 0);
        xml_parser_set_option($parser, XML_OPTION_SKIP_WHITE,   1);
        xml_parse_into_struct($parser, $szXMLDoc, $aVals, $index);
        xml_parser_free($parser);

        $oXMLDoc =  xml_get_children($aVals);
    }
}
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title><?php echo trim($oMLT->get("0", "Catalog Search")); ?></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript" src="<?php echo $_SESSION['gszCoreWebPath']; ?>/widgets/js/cwc_dhtml.js" type="text/javascript"></script>
<script language="JavaScript" src="<?php echo $_SESSION['gszCoreWebPath']; ?>/widgets/js/cwc_button.js" type="text/javascript"></script>
<script language="JavaScript" type="text/javascript">

function addLayer( serviceId )
{
    document.forms[0].serviceId.value = serviceId;
    retrieveLayer();
}


function CallBackFunc(actionId)
{
<?php
if (!isset($http_form_vars['szCallbackFunc']))
{
    $_SESSION['gErrorManager']->setError(ERR_WARNING, trim($oCommonMLT->get("CBNotSet", "Callback function not set in CatalogSearchPopup.phtml")));
    echo "window.close();\n";
}
else
    echo "opener.".$http_form_vars['szCallbackFunc']."(actionId, self);\n";
?>
}

function CloseWindow()
{
    CallBackFunc(2);
}

function OpenWindow()
{
//    CallBackFunc(3);

//    self.focus();
}

function startSearch()
{
    document.forms[0].bSearch.value = 1;
    document.forms[0].bRetrieve.value = 0;
    document.forms[0].submit();
}

function retrieveLayer()
{
    document.forms[0].bSearch.value = 0;
    document.forms[0].bRetrieve.value = 1;
    document.forms[0].submit();
}
</script>
<link href="<?php echo $szCSSFile; ?>" rel="stylesheet" type="text/css">
</head>
<body class="page" onLoad="OpenWindow()">
<form method=post>
<table border=0 cellpadding=1 cellspacing=10>
  <tr>
    <td class="layoutTable">
      <table class="titleArea" width="100%" border="0" cellpadding="4" cellspacing="0">
        <tr>
          <td><img src="title_find_layer.gif" width="22" height="22" align="texttop">&nbsp;<span class="title"><?php echo trim($oMLT->get("1", "Search for Layers")); ?></span></td>
        </tr>
      </table>
      <table class="contentArea" width="100%" border="0" cellpadding="4" cellspacing="0">
        <tr>
          <td align="center"><p class="helpArea"><?php echo trim($oMLT->get("2", "Please enter a keyword to identify the layer that you are trying to find in the field below.")); ?></p></td>
        </tr>
      </table>
      <table class="contentArea" border="0" cellspacing="0" cellpadding="4" width="100%">
        <tr>
          <td><span class="label"><?php echo trim($oMLT->get("3", "Keyword")); ?>:</span></td>
          <td><input class="inputBox" type="text" name="szSearchString" size="20" value="<?php echo ((isset($http_form_vars['szSearchString'])) ? $http_form_vars['szSearchString'] : ''); ?>"></td>
          <td><?php echo makeButton( 'startSearch', '', 'CatalogSearch', "icons/icon_find_layer.png", trim($oMLT->get("13", "Locate Layer")), trim($oMLT->get("14", "Locate Place")), array( 'width' => 115 ) ); ?></td>
        </tr>
      </table>
    </td>
  </tr>
  <tr>
    <td class="layoutTable">
      <table class="titleArea" width="100%" border="0" cellpadding="4" cellspacing="0">
        <tr>
          <td><img src="title_layers.gif" width="22" height="22" align="texttop">&nbsp;<span class="title"><?php echo trim($oMLT->get("4", "Search Results")); ?></span></td>
        </tr>
      </table>
      <table class="contentArea" width="100%" border="0" cellpadding="4" cellspacing="0">
        <tr>
          <td align="center"><p class="helpArea"><?php echo trim($oMLT->get("5", "Below are the results of the search. Select one of the layers from the list to add to your map.")); ?></p></td>
        </tr>
      </table>
      <table class="contentArea" border="0" cellspacing="0" cellpadding="4" width="100%">
        <tr>
          <td>
            <table class="subLayoutTable" border="0" cellspacing="1" cellpadding="4">
              <tr>
                <td class="subContentArea1"><span class="label"><strong><?php echo trim($oMLT->get("7", "Title")); ?></strong></span></td>
                <td class="subContentArea1"><span class="label"><strong><?php echo trim($oMLT->get("8", "Name")); ?></strong></span></td>
                <td class="subContentArea1"><span class="label"><strong><?php echo trim($oMLT->get("9", "Add")); ?></strong></span></td>
              </tr>

<?php
// First, make sure the document is what we expect.
if (isset($http_form_vars['bSearch']))
{
    if (!isset($oXMLDoc->searchResponse->attributes['DTD_Version']) ||
        $oXMLDoc->searchResponse->attributes['DTD_Version'] < "1.1.0")
    {
        echo "<tr><td class='subContentArea2' colspan=4><span class='label'>".trim($oMLT->get("10", "Wrong DTD version. 1.1.0 or higher required."))."</span></td></tr>";
    }
    else
    {
        // check search status
        if (!isset($oXMLDoc->searchResponse->value->searchStatus->attributes['numberOfRecords']) ||
            $oXMLDoc->searchResponse->value->searchStatus->attributes['success'] == false ||
            $oXMLDoc->searchResponse->value->searchStatus->attributes['numberOfRecords'] <= 0)
        {
            echo "<tr><td class='subContentArea2' colspan=4><span class='label'>".trim($oMLT->get("11", "No Results"))."</span></td></tr>";
        }
        else
        {
            // Get result count
            $nbIso = count($oXMLDoc->searchResponse->value->searchResults->value->ISO19119);
            for($i=0;$i<$nbIso;$i++)
            {
              // Get result object
              $oRes =& $oXMLDoc->searchResponse->value->searchResults->value->ISO19119[$i];

              // Start building the layer info parameters
              $szLayerTitle    = $oRes->value->title->value;
              $szLayerAltTitle = $oRes->value->serviceName->value;
              $szServiceID = $oRes->attributes["serviceId"];
              $szServerVersion = $oRes->value->serviceTypeVersion->value;
              //$szOnlineResource = $oRes->value->onlineResource->value->linkage->attributes["xlink:href"];
?>
              <tr>
                <td class="subContentArea2"><span class="label"><?php echo $szLayerTitle; ?></span></td>
                <td class="subContentArea2"><span class="label"><?php echo $szLayerAltTitle; ?></span></td>
                <td class="subContentArea2"><span class="label">&nbsp;<a href="javascript:addLayer('<?php echo $szServiceID; ?>');"><img src="<?php echo $_SESSION['gszCoreWebPath']."/skins/default/icons/icon_add.png"?>" width="20" height="20" border=0></a></span></td>
              </tr>
<?php
            }
        }
    }
}
else
{
  echo "<tr><td class='subContentArea2' colspan=4><span class='label'>".trim($oMLT->get("11", "No Results"))."</span></td></tr>";
}
?>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
  <tr>
    <td align=right><?php echo makeButton( 'CloseWindow', '', 'CatalogSearch', "icons/icon_cancel.png", trim($oCommonMLT->get("Cancel", "Cancel")), trim($oCommonMLT->get("CloseTip", "Close Dialog")), array('width'=>75) ); ?></td>
  </tr>
</table>
<input type=hidden name=bSearch value=1>
<input type=hidden name=bRetrieve value=0>
<input type=hidden name=serviceId value=''>
<input type=hidden name=szCallbackFunc value=<?php echo $http_form_vars['szCallbackFunc']; ?>>
</form>
</body>
</html>