\n",$Status); print $Status; return; //Ken's dump debugging code */ if(json_last_error() === JSON_ERROR_NONE) { // got good JSON .. process it $UnSupported = false; $WCforecastcity = $FCSTlocation; if($doIconv) {$WCforecastcity = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$WCforecastcity);} if($doDebug) { $Status .= "\n"; } $WCtitle = "5-day Forecast"; if($doDebug) { $Status .= "\n"; } $n = 0; $FCpart = $JSON['daypart'][0]; $showTempsAs = ($WCunits == 'e')?'F':'C'; // process the forecast periods $n = 0; $firstIconPeriod = ''; foreach ($FCpart['temperature'] as $i => $t) { if(empty($FCpart['daypartName'][$i])) { continue; // skip the empty ones if any } if ( $doDebug) { $Status .= "\n"; } $dayOrNight = $FCpart['dayOrNight'][$i]; if($firstIconPeriod == '') { $firstIconPeriod = $dayOrNight; } if($dayOrNight == 'D') { $WCforecasttemp[$n] = "".$t."°$showTempsAs"; } else { $WCforecasttemp[$n] = "".$t."°$showTempsAs"; } $WCforecastday[$n] = trim($FCpart['daypartName'][$i]); if($doIconv) {$WCforecastday[$n] = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$WCforecastday[$n]);} $WCforecasttitles[$n] = $WCforecastday[$n]; if ($doDebug) { $Status .= "\n"; } $WCforecasttext[$n] = trim($FCpart['narrative'][$i]); $WCforecasttext[$n] = str_replace("\xc2\xba","\xc2\xb0",$WCforecasttext[$n]); // fix wrong degree symbol if($doIconv) {$WCforecasttext[$n] = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$WCforecasttext[$n]);} if ($doDebug) { $Status .= "\n"; } $WCforecastpop[$n] = $FCpart['precipChance'][$i]; if ($doDebug) { $Status .= "\n"; } $WCforecastcond[$n] = $FCpart['wxPhraseLong'][$i]; $WCforecastcond[$n] = str_replace('/',', ',$WCforecastcond[$n]); if($doIconv) {$WCforecastcond[$n] = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$WCforecastcond[$n]);} if ($doDebug) { $Status .= "\n"; } $WCforecasticon[$n] = WC_img_replace($FCpart['iconCode'][$i],$dayOrNight,$WCforecastcond[$n],round($WCforecastpop[$n],-1)); // V1.05 fix if ($doDebug) { $Status .= "\n"; } $WCforecasticons[$n] = $WCforecastday[$n] . "
" . $WCforecasticon[$n] . "
" . $WCforecastcond[$n]; if(!empty($FCpart['thunderIndex'][$i]) and !empty($FCpart['thunderCategory'][$i])) { $WCforecastthunder[$n] = '' .$FCpart['thunderCategory'][$i] . ''; if($doIconv) {$WCforecastthunder[$n] = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$WCforecastthunder[$n]);} } else { $WCforecastthunder[$n] = ''; } if ($doDebug) { $Status .= "\n"; } if(!empty($FCpart['uvIndex'][$i]) and $FCpart['uvIndex'][$i] > 0) { $WCforecastuv[$n] = 'UV: '. $FCpart['uvIndex'][$i] . '
'. WC_get_uvrange($FCpart['uvIndex'][$i],$FCpart['uvDescription'][$i]); if($doIconv) {$WCforecastuv[$n] = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$WCforecastuv[$n]);} } else { $WCforecastuv[$n] = ''; } if ($doDebug) { $Status .= "\n"; } if(!empty($FCpart['snowRange'][$i])) { $WCforecastsnow[$n] = $FCpart['snowRange'][$i]; $WCforecastsnow[$n] .= ($WCunits == 'e')?' in':' cm'; if($doIconv) {$WCforecastsnow[$n] = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$WCforecastsnow[$n]);} } else { $WCforecastsnow[$n] = ''; } if ($doDebug) { $Status .= "\n"; } if(!empty($FCpart['qpf'][$i]) and empty($FCpart['snowRange'][$i])) { $WCforecastrain[$n] = $FCpart['qpf'][$i]; if($WCunits !== 'e') {$WCforecastrain[$n] = round($WCforecastrain[$n],1); } if($WCforecastrain[$n] == 0) {$WCforecastrain[$n] = '<1'; } if($commaDecimal) {$WCforecastrain[$n] = str_replace('.',',',$WCforecastrain[$n]); } $WCforecastrain[$n] .= ($WCunits == 'e')?' in':' mm'; if($doIconv) {$WCforecastrain[$n] = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$WCforecastrain[$n]);} } else { $WCforecastrain[$n] = ''; } if ($doDebug) { $Status .= "\n"; } $n++; } // end of process json forecasts } // end got good JSON decode/process // end process JSON style -------------------------------------------------------------------- // All finished with parsing, now prepare to print if(count($WCforecasticons) < 1) { print "Error: no forecast data was found in JSON from api.weather.gov.\n"; return; } $wdth = intval(100/count($WCforecasticons)); $ndays = intval(count($WCforecasticon)/2); $WCtitle = preg_replace('|5|i',$ndays,$WCtitle,1); $doNumIcons = count($WCforecasticons); // establish what we're going to print based on the options set $IncludeMode = false; $PrintMode = true; if (isset($doPrintWC) && ! $doPrintWC ) { print $Status; return; } if (isset($_REQUEST['inc']) && strtolower($_REQUEST['inc']) == 'noprint' ) { print $Status; return; } if (isset($_REQUEST['inc']) && strtolower($_REQUEST['inc']) == 'y') { $IncludeMode = true; } if (isset($doIncludeWC)) { $IncludeMode = $doIncludeWC; } $printHeading = true; $printIcons = true; $printText = true; if (isset($doPrintHeadingWC)) { $printHeading = $doPrintHeadingWC; } if (isset($_REQUEST['heading']) ) { $printHeading = substr(strtolower($_REQUEST['heading']),0,1) == 'y'; } if (isset($doPrintIconsWC)) { $printIcons = $doPrintIconsWC; } if (isset($_REQUEST['icons']) ) { $printIcons = substr(strtolower($_REQUEST['icons']),0,1) == 'y'; } if (isset($doPrintTextWC)) { $printText = $doPrintTextWC; } if (isset($_REQUEST['text']) ) { $printText = substr(strtolower($_REQUEST['text']),0,1) == 'y'; } // ------- now do the actual HTML generation for the page if (! $IncludeMode and $PrintMode) { ?>
Forecast blank? Force Update
'; } if ($PrintMode and ($printHeading or $printIcons)) { ?>
| WeatherUnderground : | elements based on icon display method
$blankRow = array_fill(0,10,' '); print " |
| \n";
print " |
| $WCforecasttitles[$i] | \n";
print " $WCforecasttext[$i] | \n"; } else { // print RTL format print "$WCforecasttext[$i] | \n"; print "$WCforecasttitles[$i] | \n";
}
print " \n";
}
?>
'; print langtransstr('WeatherUnderground forecast for'); ?> . '.jpg') { // print credit for .gif icons if used print "
"; print langtransstr('Animated forecast icons courtesy of'); print " www.meteotreviglio.com."; } ?> \n"; $ch = curl_init(); // initialize a cURL session curl_setopt($ch, CURLOPT_URL, $theURL); // connect to provided URL curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0); // don't verify peer certificate curl_setopt($ch, CURLOPT_USERAGENT, 'Mozilla/5.0 (WC-forecast.php - saratoga-weather.org)'); curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, $numberOfSeconds); // connection timeout curl_setopt($ch, CURLOPT_TIMEOUT, $numberOfSeconds); // data timeout curl_setopt($ch, CURLOPT_RETURNTRANSFER, true); // return the data transfer curl_setopt($ch, CURLOPT_NOBODY, false); // set nobody curl_setopt($ch, CURLOPT_HEADER, true); // include header information if (isset($needCookie[$domain])) { curl_setopt($ch, $needCookie[$domain]); // set the cookie for this request curl_setopt($ch, CURLOPT_COOKIESESSION, true); // and ignore prior cookies $Status .= "\n"; } $data = curl_exec($ch); // execute session if(curl_error($ch) <> '') { // IF there is an error $Status .= "\n"; // display error notice } $cinfo = curl_getinfo($ch); // get info on curl exec. /* curl info sample Array ( [url] => http://saratoga-weather.net/clientraw.txt [content_type] => text/plain [http_code] => 200 [header_size] => 266 [request_size] => 141 [filetime] => -1 [ssl_verify_result] => 0 [redirect_count] => 0 [total_time] => 0.125 [namelookup_time] => 0.016 [connect_time] => 0.063 [pretransfer_time] => 0.063 [size_upload] => 0 [size_download] => 758 [speed_download] => 6064 [speed_upload] => 0 [download_content_length] => 758 [upload_content_length] => -1 [starttransfer_time] => 0.125 [redirect_time] => 0 [redirect_url] => [primary_ip] => 74.208.149.102 [certinfo] => Array ( ) [primary_port] => 80 [local_ip] => 192.168.1.104 [local_port] => 54156 ) */ $Status .= "\n"; //$Status .= "\n"; curl_close($ch); // close the cURL session //$Status .= "\n"; $i = strpos($data,"\r\n\r\n"); $headers = substr($data,0,$i); $content = substr($data,$i+4); if($cinfo['http_code'] <> 200) { $Status .= "\n"; } return $data; // return headers+contents } else { // print "\n"; $STRopts = array( 'http'=>array( 'method'=>"GET", 'protocol_version' => 1.1, 'header'=>"Cache-Control: no-cache, must-revalidate\r\n" . "Cache-control: max-age=0\r\n" . "Connection: close\r\n" . "User-agent: Mozilla/5.0 (WC-forecast.php - saratoga-weather.org)\r\n" . "Accept: text/plain,text/html\r\n" ), 'https'=>array( 'method'=>"GET", 'protocol_version' => 1.1, 'header'=>"Cache-Control: no-cache, must-revalidate\r\n" . "Cache-control: max-age=0\r\n" . "Connection: close\r\n" . "User-agent: Mozilla/5.0 (WC-forecast.php - saratoga-weather.org)\r\n" . "Accept: text/plain,text/html\r\n" ) ); $STRcontext = stream_context_create($STRopts); $T_start = WC_fetch_microtime(); $xml = file_get_contents($url,false,$STRcontext); $T_close = WC_fetch_microtime(); $headerarray = get_headers($url,0); $theaders = join("\r\n",$headerarray); $xml = $theaders . "\r\n\r\n" . $xml; $ms_total = sprintf("%01.3f",round($T_close - $T_start,3)); $Status .= "\n"; $Status .= "<-- get_headers returns\n".$theaders."\n -->\n"; // print " file() stats: total=$ms_total secs.\n"; $overall_end = time(); $overall_elapsed = $overall_end - $overall_start; $Status .= "\n"; // print "fetch function elapsed= $overall_elapsed secs.\n"; return($xml); } } // end WC_fetch_URL // ------------------------------------------------------------------ function WC_fetch_microtime() { list($usec, $sec) = explode(" ", microtime()); return ((float)$usec + (float)$sec); } // ------------------------------------------------------------------ function WC_img_replace ( $WCimage, $dayOrNight, $WCcondtext,$WCpop) { // // optionally replace the WeatherUnderground icon with an NWS icon instead. // global $NWSiconlist,$iconDir,$iconType,$Status; $dn = ($dayOrNight == 'D')?0:1; $curicon = isset($NWSiconlist[$WCimage][$dn])?$NWSiconlist[$WCimage][$dn]:''; // translated icon (if any) if (!$curicon) { // no change.. use WC icon $timg = sprintf('%.02d',$WCimage).'.png'; return("