root/Chameleon/trunk/Chameleon/TimeHandler/TimeHandler.widget.php

<?php
/**
 * My attempt at a Time Handler widget
 */

include_once(dirname(__FILE__)."/../Widget.php");
include_once(dirname(__FILE__)."/../Label.php");


class TimeHandler extends CWCWidget
{
    var $moLabel;
    var $mszTitle = "Select an offset Time";
    var $mszWidgetClass = "";

    /**
     * build a new time handler widget
     */
    function TimeHandler()
    {
        $this->mszLanguageResource = str_replace("\\","/",dirname(__FILE__))."/TimeHandler.dbf";

        // invoke constructor of parent
        parent::CWCWidget();

        $this->mszTitle = trim($this->moMLT->get("0", "Select an Offset Time"));

        $this->mnPriority = PRIORITY_HIGH;

        // set the description for this widget
        $this->szWidgetDescription = <<<EOT
Sends along an offset time in hours to various data sources and returns with data
EOT;

        $this->moLabel = new CWCLabel( $this );

        $this->maAttributes["TITLE"] = new StringAttribute( "TITLE", false );
        $this->maAttributes["WIDGETCLASS"] = new StringAttribute( "WIDGETCLASS", false );
        $this->mnMaturityLevel = MATURITY_BETA;
    }
    
    
    function InitDefaults()
    {
        parent::InitDefaults();
        if (isset($this->maParams["WIDGETCLASS"]))
            $this->mszWidgetClass = strtoupper($this->maParams["WIDGETCLASS"]);
    }

    /**
     * get the javascript functions for this widget
     */
    function GetJavascriptFunctions()
    {
        parent::GetJavascriptFunctions();

        if (isset($this->maSharedResourceWidgets["CWCJSAPI"]))
          $bCWCJSAPI = 1;
        else
          $bCWCJSAPI = 0;

        $aReturn = array();
        $szJsFunctionName = "changeOffset";
        $szFunction = <<<EOT
/**
 * {$szJsFunctionName}
 * called when the Time Offset value is changed.
 */
function {$szJsFunctionName}(obj)
{
    box = document.forms[0].OFFSET;
    offset = box.options[box.selectedIndex].value;
    if (offset != "")
    {
        //alert(offset);
    {$this->mszHTMLForm}.NAV_OFFSET.value=offset;
        {$this->mszHTMLForm}.SEL_OFFSET.value=box.options[box.selectedIndex].text;
        {$this->mszHTMLForm}.NAV_CMD.value = "";
        {$this->mszHTMLForm}.submit();
    }
    
    return;
}
EOT;
        $aReturn[$szJsFunctionName] = $szFunction;
        
        return $aReturn;
    }

    /**
     * get the HTML variables for this widget
     */
   function GetHTMLHiddenVariables()
    {
        parent::GetHTMLHiddenVariables();

        $szVariable = "NAV_OFFSET";
    $szNavOffset = $this->getVar( "NAV_OFFSET" );
        $szValue = " <INPUT TYPE=HIDDEN NAME=$szVariable VALUE=\"$szNavOffset\">\n";
        $aReturn[$szVariable] = $szValue;

        $szVariable = "SEL_OFFSET";
    $szSelOffset = $this->getVar( "SEL_OFFSET" );
        $szValue = " <INPUT TYPE=HIDDEN NAME=$szVariable VALUE=\"$szSelOffset\">\n";
        $aReturn[$szVariable] = $szValue;
        
        return $aReturn;
    }    
    
    /**
     * process the url looking for timehandler requests
     */
    function  ParseURL()
    {
        parent::ParseURL();

        if ($this->isVarSet( "NAV_OFFSET" ) &&
            $this->getVar( "NAV_OFFSET" ) != "")
        {
            $szOffset = $this->getVar( "NAV_OFFSET" );

        $oMap = $this->moMapObject->oMap;
       
        //hide mouseovers/insitu currents if offset is not 2
        
        //get layers to alter
        $mouse_layer = $oMap->getLayerByName('Observation MouseOvers');
        
        if ($szOffset != 2)
        {
        // hide MouseOver option in legend
        $mouse_layer->set('group','Hidden');             
        $mouse_layer->SetMetaData('legendvis','hidden');
                
        //if MouseOvers are ON when the time is changed these will make sure it doesn't render
        $mouse_layer->set('minscale','10000000');
        
        $codar_offset = $szOffset;
        }
        
        else
        {
            //return MouseOver to legend since -2 hrs
            $mouse_layer->set('group','Observations');
        $mouse_layer->SetMetaData('legendvis','');
        
        $codar_offset = $szOffset + 2;
        }
        

        //here is the meat of the time offset handling
            $label_layer = $oMap->getLayerByName('request_timestamp');
            $class = $label_layer->getClass(0);
        
        //Eastern Time - offset for timestamp labelling
        $request_time_eastern = time() - ($szOffset * 60 * 60); 
        
        //format and send to mapfile for labelling
        $timestamp = date('m-d-Y g\:\0\0 a', $request_time_eastern);
        $class->settext($label_layer,"$timestamp");
            
        //GMT time - offset for DB request
            $request_time = (strtotime (gmdate("m/d/Y H:i:s"))) - ($szOffset * 60 * 60);
            
        //GMT time - offset and then reformatted for QuikSCAT WMS service
        $quikscat_time = date('Y_m_d_H_i_\0', $request_time);
        
        //GMT time - offset for CODAR DB request
        $codar_request_time = (strtotime (gmdate("m/d/Y H:i:s"))) - ($codar_offset * 60 * 60);
        
        $nLayers = $oMap->numlayers;
            for ($i=0;$i<$nLayers;$i++)
            {
                $oLayer = $oMap->getLayer($i);
        $db_processing = $oLayer->getMetaData('db_processing');
        
                if ($oLayer->connectiontype == MS_WMS && $oLayer->group == 'Observations' && $oLayer->name != 'quikscat' && $oLayer->name != 'RADAR_large')
                {
                    //$con_string = $oLayer->connection;
                    $con_string = $oLayer->GetMetaData("wms_onlineresource");
                    $new_con_string = $con_string.'&time_offset_hours='.$szOffset;
                    //print $new_con_string;
                    $oLayer->set('connection', $new_con_string);
                }
                
        //handling for local QuikSCAT layers        
        if ($oLayer->connectiontype == MS_WMS && $oLayer->name == 'quikscat_wms')
                {
                    $qs_connection = $oLayer->GetMetaData("wms_onlineresource");
                    $new_qs_connection = $qs_connection.'&time='.$quikscat_time;
                    //print $new_qs_connection;
                    $oLayer->set('connection', $new_qs_connection);
                }

                // for codar layer - dif time stamp than regular obs
                if ($oLayer->connectiontype == MS_WMS && $oLayer->name == 'RADAR_large')
                {
                    //timestamp format is 2006-01-19 16:00
                    $request_codar_time= date('Y_m_d_H_00_00', $codar_request_time);               

                    $codar_connection = $oLayer->GetMetaData("wms_onlineresource");
                    $new_codar_connection = $codar_connection.'&time='.$request_codar_time;
                    $oLayer->set('connection', $new_codar_connection);
                }

            
            // for seacoos_test OBS layers
        if ($oLayer->connectiontype == MS_POSTGIS && $db_processing == '1')
                {
            //timestamp format is 2006-01-19 16:00 
            $request_time_db = date('Y-m-d H\:i', $request_time);    
            $oLayer->setFilter('report_time_stamp = date_trunc(\'hour\',timestamp without time zone \''.$request_time_db.'\')');
        }
             
            
        // for IS surface currents - codar TS 
                if ($oLayer->connectiontype == MS_POSTGIS && $db_processing == '2')
                {
                    $cur_request_time = date('Y-m-d H\:i', $codar_request_time);
                    $oLayer->setFilter('(report_time_stamp = date_trunc(\'hour\',timestamp without time zone \''.$cur_request_time.'\')) and (surface_or_bottom = \'surface\')');
                }

        //for ADCP currents from Xenia - codar TS 
                if ($oLayer->connectiontype == MS_POSTGIS && $db_processing == '4')
                {
                    //timestamp format is 2006-01-19 16:00
                    $cur_request_time = date('Y-m-d H\:i', $codar_request_time);
            //$oLayer->setFilter('m_type_id = 41 and (sensor_id IN (select row_id from sensor where type_id = 4 )) and (d_report_hour = (timestamp without time zone \''.$cur_request_time.'\')) and (d_top_of_hour = 1)');
                    $oLayer->setFilter('m_type_id = 41 and (sensor_id IN (select row_id from sensor where type_id =\'4\')) and  (m_date > (timestamp without time zone \''.$cur_request_time.'\' - interval \'30 minutes\' )) and (m_date < (timestamp without time zone \''.$cur_request_time.'\' + interval \'31 minutes\'))');
                }
                
        }

    }
        return true;
    }    
    
    /**
     * draw this widget
     */
    function DrawPublish()
    {
        if (!$this->mbVisible)
            return "<!-- Offset is hidden -->";

        if ($this->isVarSet( "SEL_OFFSET" ))
            $szSelOffset = $this->getVar( "SEL_OFFSET" );
        else
            $szSelOffset = "";

        if ($this->mszWidgetClass != "")
            $szWidgetClass = " CLASS=\"".$this->mszWidgetClass."\"";
        else
            $szWidgetClass = "";

        $szResult = "<SELECT NAME=\"OFFSET\" onchange=\"changeOffset(this)\"$szWidgetClass>\n";

        if (isset( $this->maszContents["OFFSET"] ))
        {
            foreach( $this->maszContents["OFFSET"] as $anOffset )
            {
                if (isset($anOffset["HOUR"])) 
                {            
          $szResult .= "<OPTION VALUE=\"".$anOffset["HOUR"]."\" ".
                        (($szSelOffset==$anOffset["NAME"]) ? "SELECTED":"").
                        ">".$anOffset["NAME"]."</OPTION>\n";
                }
                else
                {
                    $_SESSION['gErrorManager']->setError(ERR_WARNING,
                      trim($this->moMLT->get("3", "ERROR: Invalid HOUR tag definition in TimeHandler.php.")));
                }
            }
        }

        $szResult .= "</SELECT></td>\n";
            
       if ($this->isVarSet( "NAV_OFFSET" ) &&
               $this->getVar( "NAV_OFFSET" ) != "")
        {
           $timeOffset_end = $this->getVar( "NAV_OFFSET" );
        }        
            else
        {
               $timeOffset_end = 2;
        }
        
        //Eastern Time
        $EasternTime = time();
             
        // use offset to build request times        
        $request_time_end = $EasternTime - ($timeOffset_end * 60 * 60);
        $timeOffset_begin = $timeOffset_end + 1;
        $request_time_begin = $EasternTime - ($timeOffset_begin * 60 * 60);
            
        //$timestamp_now = date('m-d-Y g\:\0\0 a');
        $timestamp_end = date('m-d-Y g\:\0\0 a', $request_time_end);
        $timestamp_end_hour = date('g\:\0\0 a', $request_time_end);
        
        $timestamp_begin = date('m-d-Y g\:\3\0 a', $request_time_begin);
        $timestamp_begin_hour = date('m-d-Y g\:\3\0', $request_time_begin);        
        
        
    // RS Timestamp lookup for labeling - in GMT, out Eastern
    // Site Path
    $site_path = "/opt/inventory/htdocs/";
    
    // Include ADODB library
    require_once($site_path . "/admin/adodb/adodb.inc.php");
    
    // Connection definitions
    $database_type = "postgres7";
    $database_user = "lookup";
    $database_database = "seacoos_test";
    $database_server = "coriolis.marine.unc.edu";
    $database_password = "lookup";

    // takes request time from WMS call above and reformts it
        $request_time = (strtotime (gmdate("m/d/Y H:i:s"))) - ($timeOffset_end * 60 * 60);
    $rs_request_time = date('Y-m-d H:i:\0\0', $request_time);
    
    // Initialize ADODB connection
    $db = ADONewConnection($database_type);
    $db->Connect($database_server, $database_user,$database_password,$database_database);


    // Construct queries - looks for nearest overpass time not older than 48 hrs
    // loop through for quikscat, modis_sst, avhrr

        $rs_layers = array("quikscat","modis_sst","avhrr");
        foreach ($rs_layers as $l)
        {
        $table = $l."_timestamps";

    $query = "select $l from $table"
       ." where abs(extract(epoch from timestamp without time zone '$rs_request_time')"
       ." - extract(epoch from $l))"
       ." = (select min(abs((extract(epoch from timestamp without time zone '$rs_request_time'))"
       ." - extract(epoch from $l)))"
       ." from $table)"
       ." and abs(extract(epoch from timestamp without time zone '$rs_request_time')"
       ." - extract(epoch from $l))"
       ." <= 60*60*24*2";
    
    $recordSet = $db->Execute($query);
    if (!$recordSet)
    {
        print $db->ErrorMsg();
    }
    else
    {
        while (!$recordSet->EOF) 
        {
            $db_time = $recordSet->fields[0];
            $recordSet->MoveNext();
        }
    }
    
    $recordSet->Close();
    $rs_timestamp_utc = strtotime($db_time);

        ## need to add Eastern to GMT offset var - hardcoded for now
    $rs_timestamp_eastern = $rs_timestamp_utc - (5*60*60);

        if ($l == "quikscat")
        {
      $quikscat_time = date('m-d-Y g\:\0\0 a', $rs_timestamp_eastern);
        }
        if ($l == "modis_sst")
        {
        $modis_timestamp = date('m-d-Y g\:i a', $rs_timestamp_eastern);
        }
    if ($l == "avhrr")
        {
        $avhrr_timestamp = date('m-d-Y g\:i a', $rs_timestamp_eastern);
        }
        
        }
    $db->Close();
        
        //added b/c CODAR default will be -4 hrs
        if ($this->getVar( "NAV_OFFSET" ) == "" OR
                $this->getVar( "NAV_OFFSET" ) == "2" )
        {  
        $codar_time_raw = $EasternTime - (4 * 60 * 60);
        $codar_time = date('m-d-Y g\:\0\0 a', $codar_time_raw);
            }
        else
        {
        $codar_time = $timestamp_end;
        }   
   
        //return time table
        //$szResult .="<tr><td>Now: </td><td>".$timestamp_now."</td></tr>\n";
        $szResult .="<td><b>Data Display Time: </b></td><td><b>".$timestamp_end."</b></td></tr>\n";
        $szResult .="<tr><td>SST, Water Level, & Wind:</td><td>".$timestamp_begin_hour." - ".$timestamp_end_hour."</td></tr>\n";
        $szResult .="<tr><td rowspan=\"6\"></td><td>Precipitation RADAR: </td><td>".$timestamp_end."</td></tr>\n";
            $szResult .="<tr><td colspan=\"2\"><hr></td></tr>\n";
        $szResult .="<tr><td>QuikSCAT winds: </td><td>".$quikscat_time."</td></tr>\n";
        $szResult .="<tr><td>Surface Currents: </td><td>".$codar_time."</td></tr>\n";
        $szResult .="<tr><td>AVHRR SST: </td><td>".$avhrr_timestamp."</td></tr>\n";
        $szResult .="<tr><td>MODIS RGB/SST: </td><td>".$modis_timestamp."</td></tr>\n";
    
    
        $szResult = $this->moLabel->DrawPublish( $szResult );
        return $szResult;
    }
}
?>