Note: the AW-forecast.php script requires an API keys from aerisweather.com to operate.
"; print "Visit api.aerisapi.com to "; print "register for an API key.
\n"; print "If you are uploading data to pwsweather.com, you can get free API keys from "; print "here to use.

Insert in Settings.php an entries for:

\n"; print "\$SITE['AWAPIkey'] = 'your-key-here'; // Access ID

\n"; print "\$SITE['AWAPIsecret'] = 'your-key-here' // Client Secret;

\n"; print "replacing your-key-here with your corresponding keys.

".langtransstr($Nlocation)."\n"; } // build the drop down menu $ddMenu = ''; // create menu if at least two locations are listed in the array if (isset($AWforecasts[0]) and isset($AWforecasts[1])) { $ddMenu .= '

- '.langtransstr('Select Forecast').' - ' . $dDownMenu . $ddMenu . '

'; } $Force = false; if (isset($_REQUEST['force']) and $_REQUEST['force']=="1" ) { $Force = true; } $doDebug = false; if (isset($_REQUEST['debug']) and strtolower($_REQUEST['debug'])=='y' ) { $doDebug = true; } $showTempsAs = ($showUnitsAs == 'us')? 'F':'C'; $Status .= "\n"; $fileName = "https://api.aerisapi.com/forecasts/?p=$AW_LATLONG" . "&format=json&filter=daynight,precise&limit=14&client_id=$AWAPIkey&client_secret=$AWAPIsecret"; if ($doDebug) { $Status .= "\n"; } if ($autoSetTemplate and isset($_SESSION['CSSwidescreen'])) { if($_SESSION['CSSwidescreen'] == true) { $maxWidth = '900px'; $maxIcons = 8; $maxForecasts = 8; $numIconsInFoldedRow = 7; $Status .= "\n"; } if($_SESSION['CSSwidescreen'] == false) { $maxWidth = '640px'; $maxIcons = 8; $maxForecasts = 8; $numIconsInFoldedRow = 7; $Status .= "\n"; } } $cacheName = $cacheFileDir . $cacheName; $cacheName = preg_replace('|\.txt|is',"-$haveIndex-$showUnitsAs-$lang.txt",$cacheName); // unique cache per language used $APIfileName = $fileName; if($showConditions) { $refetchSeconds = 15*60; // shorter refresh time so conditions will be 'current' } if (! $Force and file_exists($cacheName) and filemtime($cacheName) + $refetchSeconds > time()) { $html = implode('', file($cacheName)); $Status .= "\n"; } else { $Status .= "\n"; $html = AW_fetchUrlWithoutHanging($APIfileName,false); $RC = ''; if (preg_match("|^HTTP\/\S+ (.*)\r\n|",$html,$matches)) { $RC = trim($matches[1]); } $Status .= "\n"; if (preg_match('|30\d |',$RC)) { // handle possible blocked redirect preg_match('|Location: (\S+)|is',$html,$matches); if(isset($matches[1])) { $sURL = $matches[1]; if(preg_match('|opendns.com|i',$sURL)) { $Status .= "\n"; } else { $Status .= "\n"; $html = AW_fetchUrlWithoutHanging($sURL,false); $RC = ''; if (preg_match("|^HTTP\/\S+ (.*)\r\n|",$html,$matches)) { $RC = trim($matches[1]); } $Status .= "\n"; } } } if(preg_match('!weatherPrimaryCoded!is',$html)) { $fp = fopen($cacheName, "w"); if (!$fp) { $Status .= "\n"; } else { $write = fputs($fp, $html); fclose($fp); $Status .= "\n"; } } else { $Status .= "\n"; if(file_exists($cacheName) and filesize($cacheName) > 3000) { $html = implode('', file($cacheName)); $Status .= "\n"; } else { $Status .= "\n"; print $Status; print "

Sorry.. the Aerisweather forecast is not available.

\n"; return; } } } $charsetInput = 'UTF-8'; $doIconv = ($charsetInput == $charsetOutput)?false:true; // only do iconv() if sets are different if($charsetOutput == 'UTF-8') { $doIconv = false; } $Status .= "\n"; $tranTab = AW_load_builtin_translate($lang); // boilerplate lookups for legends in $tranTab from AW-forecast-lang.php $LangTranTab = AW_load_parser_trans($lang); // use the plaintext-parser language translations for conditions $i = strpos($html,"\r\n\r\n"); $headers = substr($html,0,$i-1); $content = substr($html,$i+4); // process the file .. select out the 7-day forecast part of the page $UnSupported = false; // -------------------------------------------------------------------------------------------------- $Status .= "\n"; $i = strpos($html,"\r\n\r\n"); $headers = substr($html,0,$i-1); $content = substr($html,$i+4); $rawJSON = $content; $Status .= "\n"; $rawJSON = AW_prepareJSON($rawJSON); $JSONF = json_decode($rawJSON,true); // get as associative array $Status .= AW_decode_JSON_error(); $Status .= "\n"; $JSON = $JSONF['response'][0]; if($doDebug) {$Status .= "\n";} if(isset($JSON['periods'][0]['icon'])) { // got good JSON .. process it $UnSupported = false; $AWforecastcity = $FCSTlocation; if($doIconv) {$AWforecastcity = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$AWforecastcity);} if($doDebug) { $Status .= "\n"; } //$AWtitle = langtransstr("Forecast"); // $AWtitle = $tranTab['DarkSky Forecast for:']; // **FIX** $AWtitle = $tranTab['Aerisweather Forecast for:']; if($doIconv) {$AWtitle = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$AWtitle);} if($doDebug) { $Status .= "\n"; } /* JSON array ( 'loc' => array ( 'long' => -122.023, 'lat' => 37.275, ), 'interval' => 'daynight', 'periods' => array ( 0 => array ( 'timestamp' => 1586224800, 'validTime' => '2020-04-06T19:00:00-07:00', 'dateTimeISO' => '2020-04-06T19:00:00-07:00', 'maxTempC' => NULL, 'maxTempF' => NULL, 'minTempC' => 5, 'minTempF' => 41, 'avgTempC' => 7, 'avgTempF' => 45, 'tempC' => NULL, 'tempF' => NULL, 'pop' => 36, 'precipMM' => 0.68, 'precipIN' => 0.03, 'iceaccum' => NULL, 'iceaccumMM' => NULL, 'iceaccumIN' => NULL, 'maxHumidity' => 93, 'minHumidity' => 71, 'humidity' => 87, 'uvi' => 0, 'pressureMB' => 1016, 'pressureIN' => 30, 'sky' => 40, 'snowCM' => 0, 'snowIN' => 0, 'feelslikeC' => 9.5, 'feelslikeF' => 49, 'minFeelslikeC' => 5.6, 'minFeelslikeF' => 42, 'maxFeelslikeC' => 9.5, 'maxFeelslikeF' => 49, 'avgFeelslikeC' => 7, 'avgFeelslikeF' => 45, 'dewpointC' => 6.2, 'dewpointF' => 43, 'maxDewpointC' => 6.2, 'maxDewpointF' => 43, 'minDewpointC' => 3.9, 'minDewpointF' => 39, 'avgDewpointC' => 5, 'avgDewpointF' => 41, 'windDirDEG' => 290, 'windDir' => 'WNW', 'windDirMaxDEG' => 150, 'windDirMax' => 'SSE', 'windDirMinDEG' => 150, 'windDirMin' => 'SSE', 'windGustKTS' => 1, 'windGustKPH' => 2, 'windGustMPH' => 1, 'windSpeedKTS' => 1, 'windSpeedKPH' => 2, 'windSpeedMPH' => 1, 'windSpeedMaxKTS' => 1, 'windSpeedMaxKPH' => 2, 'windSpeedMaxMPH' => 1, 'windSpeedMinKTS' => 1, 'windSpeedMinKPH' => 2, 'windSpeedMinMPH' => 1, 'windDir80mDEG' => 320, 'windDir80m' => 'NW', 'windDirMax80mDEG' => 150, 'windDirMax80m' => 'SSE', 'windDirMin80mDEG' => 150, 'windDirMin80m' => 'SSE', 'windGust80mKTS' => 6, 'windGust80mKPH' => 12, 'windGust80mMPH' => 7, 'windSpeed80mKTS' => 4, 'windSpeed80mKPH' => 7, 'windSpeed80mMPH' => 4, 'windSpeedMax80mKTS' => 6, 'windSpeedMax80mKPH' => 12, 'windSpeedMax80mMPH' => 7, 'windSpeedMin80mKTS' => 2, 'windSpeedMin80mKPH' => 3, 'windSpeedMin80mMPH' => 2, 'weather' => 'Partly Cloudy with Scattered Showers', 'weatherCoded' => array ( 0 => array ( 'timestamp' => 1586224800, 'wx' => 'C:L:RW', 'dateTimeISO' => '2020-04-06T19:00:00-07:00', ), ), 'weatherPrimary' => 'Scattered Showers', 'weatherPrimaryCoded' => 'C:L:RW', 'cloudsCoded' => 'SC', 'icon' => 'pcloudyrn.png', 'solradWM2' => 68, 'solradMinWM2' => 0, 'solradMaxWM2' => 68, 'isDay' => false, ), ... ), 'profile' => array ( 'tz' => 'America/Los_Angeles', 'elevM' => 125, 'elevFT' => 410, ), ) */ if(isset($JSON['profile']['tz'])) { date_default_timezone_set($JSON['profile']['tz']); $Status .= "\n"; } if(isset($JSON['periods'][0]['timestamp'])) { $AWupdated = $tranTab['Updated:']; if($doIconv) { $AWupdated = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$AWupdated). ' '; } $AWupdated .= date($timeFormat,$JSON['periods'][0]['timestamp']); } else { $AWupdated = ''; } if($doDebug) { $Status .= "\n\n"; } if(isset($windUnits[$showUnitsAs])) { $windUnit = $windUnits[$showUnitsAs]; $Status .= "\n"; if(isset($tranTab[$windUnit])) { $windUnit = $tranTab[$windUnit]; $Status .= "\n"; } } else { $windUnit = ''; } $n = 0; foreach ($JSON['periods'] as $i => $FCpart) { # process each daily entry --------------------------------------------------------- /* array ( 'timestamp' => 1586224800, 'validTime' => '2020-04-06T19:00:00-07:00', 'dateTimeISO' => '2020-04-06T19:00:00-07:00', 'maxTempC' => NULL, 'maxTempF' => NULL, 'minTempC' => 5, 'minTempF' => 41, 'avgTempC' => 7, 'avgTempF' => 45, 'tempC' => NULL, 'tempF' => NULL, 'pop' => 36, 'precipMM' => 0.68, 'precipIN' => 0.03, 'iceaccum' => NULL, 'iceaccumMM' => NULL, 'iceaccumIN' => NULL, 'maxHumidity' => 93, 'minHumidity' => 71, 'humidity' => 87, 'uvi' => 0, 'pressureMB' => 1016, 'pressureIN' => 30, 'sky' => 40, 'snowCM' => 0, 'snowIN' => 0, 'feelslikeC' => 9.5, 'feelslikeF' => 49, 'minFeelslikeC' => 5.6, 'minFeelslikeF' => 42, 'maxFeelslikeC' => 9.5, 'maxFeelslikeF' => 49, 'avgFeelslikeC' => 7, 'avgFeelslikeF' => 45, 'dewpointC' => 6.2, 'dewpointF' => 43, 'maxDewpointC' => 6.2, 'maxDewpointF' => 43, 'minDewpointC' => 3.9, 'minDewpointF' => 39, 'avgDewpointC' => 5, 'avgDewpointF' => 41, 'windDirDEG' => 290, 'windDir' => 'WNW', 'windDirMaxDEG' => 150, 'windDirMax' => 'SSE', 'windDirMinDEG' => 150, 'windDirMin' => 'SSE', 'windGustKTS' => 1, 'windGustKPH' => 2, 'windGustMPH' => 1, 'windSpeedKTS' => 1, 'windSpeedKPH' => 2, 'windSpeedMPH' => 1, 'windSpeedMaxKTS' => 1, 'windSpeedMaxKPH' => 2, 'windSpeedMaxMPH' => 1, 'windSpeedMinKTS' => 1, 'windSpeedMinKPH' => 2, 'windSpeedMinMPH' => 1, 'windDir80mDEG' => 320, 'windDir80m' => 'NW', 'windDirMax80mDEG' => 150, 'windDirMax80m' => 'SSE', 'windDirMin80mDEG' => 150, 'windDirMin80m' => 'SSE', 'windGust80mKTS' => 6, 'windGust80mKPH' => 12, 'windGust80mMPH' => 7, 'windSpeed80mKTS' => 4, 'windSpeed80mKPH' => 7, 'windSpeed80mMPH' => 4, 'windSpeedMax80mKTS' => 6, 'windSpeedMax80mKPH' => 12, 'windSpeedMax80mMPH' => 7, 'windSpeedMin80mKTS' => 2, 'windSpeedMin80mKPH' => 3, 'windSpeedMin80mMPH' => 2, 'weather' => 'Partly Cloudy with Scattered Showers', 'weatherCoded' => array ( 0 => array ( 'timestamp' => 1586224800, 'wx' => 'C:L:RW', 'dateTimeISO' => '2020-04-06T19:00:00-07:00', ), ), 'weatherPrimary' => 'Scattered Showers', 'weatherPrimaryCoded' => 'C:L:RW', 'cloudsCoded' => 'SC', 'icon' => 'pcloudyrn.png', 'solradWM2' => 68, 'solradMinWM2' => 0, 'solradMaxWM2' => 68, 'isDay' => false, ) */ list($tDay,$tTime) = explode(" ",date('l H:i:s',$FCpart['timestamp'])); if ($doDebug) { $Status .= "\n"; } if(!$FCpart['isDay']) { $tDay .= ' night'; } $AWforecastdayname[$n] = $tDay; if(isset($tranTab[$tDay])) { $AWforecastday[$n] = $tranTab[$tDay]; } else { $AWforecastday[$n] = $tDay; } if($doIconv) { $AWforecastday[$n] = iconv("UTF-8",$charsetOutput.'//IGNORE',$AWforecastday[$n]); } $AWforecasttitles[$n] = $AWforecastday[$n]; if ($doDebug) { $Status .= "\n"; } $AWforecastcloudcover[$n] = $FCpart['sky']; # extract the temperature if($FCpart['isDay']) { $AWforecasttemp[$n] = "".AW_conv_units('T',$FCpart['maxTempC'])."°$showTempsAs"; } else { $AWforecasttemp[$n] = "".AW_conv_units('T',$FCpart['minTempC'])."°$showTempsAs"; } # extract the icon to use $AWforecasticon[$n] = $FCpart['icon']; if ($doDebug) { $Status .= "\n"; } if(isset($FCpart['pop'])) { $AWforecastpop[$n] = round($FCpart['pop'],-1); } else { $AWforecastpop[$n] = 0; } if ($doDebug) { $Status .= "\n"; } if(isset($FCpart['precipType'])) { // **FIX** $AWforecastpreciptype[$n] = $FCpart['precipType']; } else { $AWforecastpreciptype[$n] = ''; } $AWforecasttext[$n] = // replace problematic characters in forecast text str_replace( array('<', '>', '–','cm.','in.','.)'), array('<','>','-', 'cm', 'in',')'), trim($FCpart['weather'])); $tText = AW_do_parser_trans( trim($FCpart['weather']),$LangTranTab); if($LangTranTab['charset'] !== 'UTF-8') { // convert to UTF-8 since a later UTF-8 -> ISO may be done $tText = iconv($LangTranTab['charset'],'UTF-8//TRANSLIT',$tText); } $Status .= "\n"; if(trim($FCpart['weather']) <> $tText) { $AWforecasttext[$n] = $tText; $Status .= "\n"; } $AWforecastcond[$n] = $AWforecasttext[$n]; if($doIconv) { $AWforecastcond[$n] = iconv("UTF-8",$charsetOutput.'//IGNORE',$AWforecastcond[$n]); } if ($doDebug) { $Status .= "\n"; } $AWforecasttext[$n] .= '.'; # Add info to the forecast text if($AWforecastpop[$n] > 0) { $tstr = ''; if(!empty($AWforecastpreciptype[$n])) { $t = explode(',',$AWforecastpreciptype[$n].','); foreach ($t as $k => $ptype) { if(!empty($ptype)) {$tstr .= $tranTab[$ptype].',';} } if(strlen($tstr)>0) { $tstr = '('.substr($tstr,0,strlen($tstr)-1) .') '; } } $AWforecasttext[$n] .= " ". $tranTab['Chance of precipitation']." $tstr".$AWforecastpop[$n]."%. "; } if($FCpart['isDay'] == true) { $AWforecasttext[$n] .= " ".$tranTab['High:']." ".AW_conv_units('T',$FCpart['maxTempC'])."°$showTempsAs. "; } else { $AWforecasttext[$n] .= " ".$tranTab['Low:']." ".AW_conv_units('T',$FCpart['minTempC'])."°$showTempsAs. "; } $tWdir = AW_WindDir(round($FCpart['windDirDEG'],0)); $AWforecasttext[$n] .= " ".$tranTab['Wind']." ".AW_WindDirTrans($tWdir); $AWforecasttext[$n] .= " ". AW_conv_units('W',$FCpart['windSpeedKPH'])."->".AW_conv_units('W',$FCpart['windGustKPH']) . " $windUnit."; if(isset($FCpart['uvi']) and $FCpart['uvi'] > 1) { $AWforecasttext[$n] .= " ".$tranTab['UV index']." ".round($FCpart['uvi'],0)."."; } if(isset($FCpart['precipMM']) and $FCpart['precipMM'] > 0) { $AWforecasttext[$n] .= " ".$tranTab['rain']." ≈ ".AW_conv_units('R',$FCpart['precipMM']).$Units['R'].'.'; } if(isset($FCpart['snowCM']) and $FCpart['snowCM'] > 0) { $AWforecasttext[$n] .= " ".$tranTab['snow']." ≈ ".AW_conv_units('S',$FCpart['snowCM']).$Units['S'].'.'; } if(isset($FCpart['iceaccumMM']) and $FCpart['iceaccumMM'] > 0) { $AWforecasttext[$n] .= " ".$tranTab['sleet']." ≈ ".AW_conv_units('I',$FCpart['iceaccumMM']).$Units['I'].'.'; } if($doIconv) { $AWforecasttext[$n] = iconv("UTF-8",$charsetOutput.'//IGNORE',$AWforecasttext[$n]); } if ($doDebug) { $Status .= "\n"; } if(isset($FCpart['weatherPrimaryCoded'])) { $Status .= "\n"; } $AWforecasticons[$n] = $AWforecastday[$n] . "
" . AW_img_replace( $AWforecasticon[$n],$AWforecastcond[$n],$AWforecastpop[$n],$AWforecastcloudcover[$n]) . "
" . $AWforecastcond[$n]; $n++; } // end of process text forecasts // process alerts if any are available $AWforecastwarnings = ''; } // end got good JSON decode/process // end process JSON style -------------------------------------------------------------------- // All finished with parsing, now prepare to print $wdth = intval(100/count($AWforecasticons)); $ndays = intval(count($AWforecasticon)/2); $doNumIcons = $maxIcons; if(count($AWforecasticons) < $maxIcons) { $doNumIcons = count($AWforecasticons); } $IncludeMode = false; $PrintMode = true; if (isset($doPrintAW) && ! $doPrintAW ) { 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($doIncludeAW)) { $IncludeMode = $doIncludeAW; } $printHeading = true; $printIcons = true; $printText = true; if (isset($doPrintHeadingAW)) { $printHeading = $doPrintHeadingAW; } if (isset($_REQUEST['heading']) ) { $printHeading = substr(strtolower($_REQUEST['heading']),0,1) == 'y'; } if (isset($doPrintIconsAW)) { $printIcons = $doPrintIconsAW; } if (isset($_REQUEST['icons']) ) { $printIcons = substr(strtolower($_REQUEST['icons']),0,1) == 'y'; } if (isset($doPrintTextAW)) { $printText = $doPrintTextAW; } if (isset($_REQUEST['text']) ) { $printText = substr(strtolower($_REQUEST['text']),0,1) == 'y'; } if (! $IncludeMode and $PrintMode) { header('Content-type: text/html,charset='.$charsetOutput); ?> Sorry.. this forecast can not be processed at this time. EONAG ; } if (strlen($AWforecasttext[0])<2 and $PrintMode and ! $UnSupported ) { echo '

'.langtransstr('Forecast blank?').' ' . langtransstr('Force Update').'

'; } if ($PrintMode and ($printHeading or $printIcons)) { ?> \n"; } ?>

\n"; print $AWcurrentConditions; print "

0) { echo " $AWupdated\n"; } ?>

 

\n"; $maxChars = 135; if($iTitleLen >= $maxChars or $iCondLen >= $maxChars or $iTempLen >= $maxChars ) { print "\n"; $doFoldRow = true; } } $startIcon = 0; $finIcon = $doNumIcons; $incr = $doNumIcons; $doFoldRow = false; if ($doFoldRow) { $wdth = $wdth*2; $incr = $numIconsInFoldedRow; } print "\n"; for ($k=$startIcon;$k<$doNumIcons-1;$k+=$incr) { // loop over icon rows, 5 at a time until done $startIcon = $k; if ($doFoldRow) { $finIcon = $startIcon+$numIconsInFoldedRow; } else { $finIcon = $doNumIcons; } $finIcon = min($finIcon,$doNumIcons); print "\n"; print " \n"; for ($i=$startIcon;$i<$finIcon;$i++) { $ni = $doRTL?$numIconsInFoldedRow-1-$i+$startIcon+$k:$i; print "\n"; print "\n"; } print " \n"; print " \n"; for ($i=$startIcon;$i<$finIcon;$i++) { $ni = $doRTL?$numIconsInFoldedRow-1-$i+$startIcon+$k:$i; print "\n"; } ?> $AWforecastcond[$ni]\n"; } print " \n"; print " \n"; for ($i=$startIcon;$i<$finIcon;$i++) { $ni = $doRTL?$numIconsInFoldedRow-1-$i+$startIcon+$k:$i; print "\n"; } ?> \n"; for ($i=$startIcon;$i<$finIcon;$i++) { $ni = $doRTL?$numIconsInFoldedRow-1-$i+$startIcon+$k:$i; print "\n"; } ?> \n"; for ($i=$startIcon;$i<$finIcon;$i++) { print "\n"; } print "\n"; } // end doFoldRow ?> $AWforecasttitles[$ni] " . AW_img_replace($AWforecasticon[$ni],$AWforecastcond[$ni],$AWforecastpop[$ni],$AWforecastcloudcover[$ni]) . " $AWforecasttemp[$ni] "; if($AWforecastpop[$ni] > 0) { print "PoP: $AWforecastpop[$ni]%"; } else { print " "; } print "

\n"; if(!$doRTL) { // normal Left-to-right print "\n"; print "\n"; } else { // print RTL format print "\n"; print "\n"; } print "\n"; } ?>

$AWforecasttitles[$i]

$AWforecasttext[$i]

$AWforecasttext[$i]

$AWforecasttitles[$i]

 

Aerisweather.com. '.jpg') { print "
".langtransstr('Animated forecast icons courtesy of')." www.meteotreviglio.com."; } print "

\n"; ?> \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 (AW-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 (AW-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 (AW-forecast.php - saratoga-weather.org)\r\n" . "Accept: text/plain,text/html\r\n" ) ); $STRcontext = stream_context_create($STRopts); $T_start = AW_fetch_microtime(); $xml = file_get_contents($url,false,$STRcontext); $T_close = AW_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 AW_fetch_URL // ------------------------------------------------------------------ function AW_fetch_microtime() { list($usec, $sec) = explode(" ", microtime()); return ((float)$usec + (float)$sec); } // ------------------------------------------------------------------------------------------- function AW_img_replace ( $AWimage, $AWcondtext,$AWpop,$AWcloudcover) { // // optionally replace the WeatherUnderground icon with an NWS icon instead. // global $NWSiconlist,$iconDir,$iconType,$Status; $curicon = isset($NWSiconlist[$AWimage])?$NWSiconlist[$AWimage]:''; // translated icon (if any) $tCCicon = AW_octets($AWcloudcover); if (!$curicon) { // no change.. use AW icon return(""); } // override icon with cloud coverage octets for Images of partly-cloudy-* and clear-* if(preg_match('/^(partly|clear)/i',$AWimage)) { $curicon = $tCCicon.'.jpg'; if(strpos($AWimage,'n.png') !==false) { $curicon = 'n'.$curicon; } $Status .= "\n"; } if(preg_match('/^wind/i',$AWimage) and $iconType !== '.gif') { // note: Meteotriviglio icons do not have the wind_{sky}.gif icons, only wind.gif $curicon = 'wind_'.$tCCicon.'.jpg'; if(strpos($AWimage,'n.png') !==false) { $curicon = 'n'.$curicon; } $Status .= "\n"; } if($iconType <> '.jpg') { $curicon = preg_replace('|\.jpg|',$iconType,$curicon); } $Status .= "\n"; return(""); } // ------------------------------------------------------------------------------------------- function AW_prepareJSON($input) { global $Status; //This will convert ASCII/ISO-8859-1 to UTF-8. //Be careful with the third parameter (encoding detect list), because //if set wrong, some input encodings will get garbled (including UTF-8!) list($isUTF8,$offset,$msg) = AW_check_utf8($input); if(!$isUTF8) { $Status .= "\n"; $str = utf8_encode($input); list($isUTF8,$offset,$msg) = AW_check_utf8($str); $Status .= "\n"; } else { $Status .= "\n"; $str = $input; } //Remove UTF-8 BOM if present, json_decode() does not like it. if(substr($str, 0, 3) == pack("CCC", 0xEF, 0xBB, 0xBF)) $str = substr($str, 3); return $str; } // ------------------------------------------------------------------------------------------- function AW_check_utf8($str) { // check all the characters for UTF-8 compliance so json_decode() won't choke // Sometimes, an ISO international character slips in the AW text string. $len = strlen($str); for($i = 0; $i < $len; $i++){ $c = ord($str[$i]); if ($c > 128) { if (($c > 247)) return array(false,$i,"c>247 c='$c'"); elseif ($c > 239) $bytes = 4; elseif ($c > 223) $bytes = 3; elseif ($c > 191) $bytes = 2; else return false; if (($i + $bytes) > $len) return array(false,$i,"i+bytes>len bytes=$bytes,len=$len"); while ($bytes > 1) { $i++; $b = ord($str[$i]); if ($b < 128 || $b > 191) return array(false,$i,"128191 b=$b"); $bytes--; } } } return array(true,$i,"Success. Valid UTF-8"); } // end of check_utf8 // ------------------------------------------------------------------------------------------- function AW_decode_JSON_error() { $Status = ''; $Status .= "\n"; return($Status); } // ------------------------------------------------------------------------------------------- function AW_loadLangDefaults () { global $AWlanguages, $AWlangCharsets; /* en - [DEFAULT] English ar - Arabic az - Azerbaijani be - Belarusian bg - Bulgarian bs - Bosnian ca - Catalan cz - Czech da - Danish de - German fi - Finnish fr - French el - Greek et - Estonian hr - Croation hu - Hungarian id - Indonesian it - Italian is - Icelandic kw - Cornish lt - Lithuanian nb - Norwegian Bokmål nl - Dutch pl - Polish pt - Portuguese ro - Romanian ru - Russian sk - Slovak sl - Slovenian sr - Serbian sv - Swedish tr - Turkish uk - Ukrainian */ $AWlanguages = array( // our template language codes v.s. lang:LL codes for JSON 'af' => 'en', 'bg' => 'bg', 'cs' => 'cs', 'ct' => 'ca', 'dk' => 'da', 'nl' => 'nl', 'en' => 'en', 'fi' => 'fi', 'fr' => 'fr', 'de' => 'de', 'el' => 'el', 'ga' => 'en', 'it' => 'it', 'he' => 'he', 'hu' => 'hu', 'no' => 'nb', 'pl' => 'pl', 'pt' => 'pt', 'ro' => 'ro', 'es' => 'es', 'se' => 'sv', 'si' => 'sl', 'sk' => 'sk', 'sr' => 'sr', ); $AWlangCharsets = array( 'bg' => 'ISO-8859-5', 'cs' => 'ISO-8859-2', 'el' => 'ISO-8859-7', 'he' => 'UTF-8', 'hu' => 'ISO-8859-2', 'ro' => 'ISO-8859-2', 'pl' => 'ISO-8859-2', 'si' => 'ISO-8859-2', 'sk' => 'Windows-1250', 'sr' => 'Windows-1250', 'ru' => 'ISO-8859-5', ); } // end loadLangDefaults function AW_load_builtin_translate ($lang) { global $Status; /* Note: We packed up the translation array as it is a mix of various character set types and editing the raw text can easily change the character presentation. The TRANTABLE was created by using $transSerial = serialize($transArray); $b64 = base64_encode($transSerial); print "\n"; $tArr = str_split($b64,72); print "define('TRANTABLE',\n'"; $tStr = ''; foreach($tArr as $rec) { $tStr .= $rec."\n"; } $tStr = trim($tStr); print $tStr; print "'); // end of TRANTABLE encoded\n"; and that result included here. It will reconstitute with unserialize(base64_decode(TRANTABLE)) to look like: ... 'dk' => array ( 'charset' => 'ISO-8859-1', 'Sunday' => 'Søndag', 'Monday' => 'Mandag', 'Tuesday' => 'Tirsdag', 'Wednesday' => 'Onsdag', 'Thursday' => 'Torsdag', 'Friday' => 'Fredag', 'Saturday' => 'Lørdag', 'Sunday night' => 'Søndag nat', 'Monday night' => 'Mandag nat', 'Tuesday night' => 'Tirsdag nat', 'Wednesday night' => 'Onsdag nat', 'Thursday night' => 'Torsdag nat', 'Friday night' => 'Fredag nat', 'Saturday night' => 'Lørdag nat', 'Today' => 'I dag', 'Tonight' => 'I nat', 'This afternoon' => 'I eftermiddag', 'Rest of tonight' => 'Resten af natten', ), // end dk ... and the array for the chosen language will be returned, or the English version if the language is not in the array. */ if(!file_exists("AW-forecast-lang.php")) { print "

Warning: AW-forecast-lang.php translation file was not found. It is required"; print " to be in the same directory as AW-forecast.php.

\n"; exit; } include_once("AW-forecast-lang.php"); $default = array( 'charset' => 'ISO-8859-1', 'Sunday' => 'Sunday', 'Monday' => 'Monday', 'Tuesday' => 'Tuesday', 'Wednesday' => 'Wednesday', 'Thursday' => 'Thursday', 'Friday' => 'Friday', 'Saturday' => 'Saturday', 'Sunday night' => 'Sunday night', 'Monday night' => 'Monday night', 'Tuesday night' => 'Tuesday night', 'Wednesday night' => 'Wednesday night', 'Thursday night' => 'Thursday night', 'Friday night' => 'Friday night', 'Saturday night' => 'Saturday night', 'Today' => 'Today', 'Tonight' => 'Tonight', 'This afternoon' => 'This afternoon', 'Rest of tonight' => 'Rest of tonight', 'High:' => 'High:', 'Low:' => 'Low:', 'Updated:' => 'Updated:', 'Aerisweather Forecast for:' => 'Aerisweather Forecast for:', 'NESW' => 'NESW', // cardinal wind directions 'Wind' => 'Wind', 'UV index' => 'UV Index', 'Chance of precipitation' => 'Chance of precipitation', 'mph' => 'mph', 'kph' => 'km/h', 'mps' => 'm/s', 'Temperature' => 'Temperature', 'Barometer' => 'Barometer', 'Dew Point' => 'Dew Point', 'Humidity' => 'Humidity', 'Visibility' => 'Visibility', 'Wind chill' => 'Wind chill', 'Heat index' => 'Heat index', 'Humidex' => 'Humidex', 'Sunrise' => 'Sunrise', 'Sunset' => 'Sunset', 'Currently' => 'Currently', 'rain' => 'rain', 'snow' => 'snow', 'sleet' => 'sleet', 'Weather conditions at 999 from forecast point.' => 'Weather conditions at 999 from forecast point.', 'Daily Forecast' => 'Daily Forecast', 'Hourly Forecast' => 'Hourly Forecast', 'Meteogram' => 'Meteogram', ); $t = unserialize(base64_decode(TRANTABLE)); if(isset($t[$lang])) { $Status .= "\n"; return($t[$lang]); } else { $Status .= "\n"; return($default); } } // ------------------------------------------------------------------ // convert degrees into wind direction abbreviation function AW_WindDir ($degrees) { // figure out a text value for compass direction // Given the wind direction, return the text label // for that value. 16 point compass $winddir = $degrees; if ($winddir == "n/a") { return($winddir); } if (!isset($winddir)) { return "---"; } if (!is_numeric($winddir)) { return($winddir); } $windlabel = array ("N","NNE", "NE", "ENE", "E", "ESE", "SE", "SSE", "S", "SSW","SW", "WSW", "W", "WNW", "NW", "NNW"); $dir = $windlabel[ (integer)fmod((($winddir + 11) / 22.5),16) ]; return($dir); } // end function AW_WindDir // ------------------------------------------------------------------ function AW_WindDirTrans($inwdir) { global $tranTab, $Status; $wdirs = $tranTab['NESW']; // default directions $tstr = $inwdir; $Status .= "\n"; return($tstr); } // ------------------------------------------------------------------ function AW_round($item,$dp) { $t = round($item,$dp); if ($t == '-0') { $t = 0; } return ($t); } // ------------------------------------------------------------------ function AW_octets ($coverage) { global $Status; $octets = round($coverage / 12.5,1); $Status .= "\n"; return('skc'); } elseif ($octets < 3.0) { $Status .= " clouds=few -->\n"; return('few'); } elseif ($octets < 5.0) { $Status .= " clouds=sct -->\n"; return('sct'); } elseif ($octets < 8.0) { $Status .= " clouds=bkn -->\n"; return('bkn'); } else { $Status .= " clouds=ovc -->\n"; return('ovc'); } } // ------------------------------------------------------------------ function AW_conv_baro($hPa) { # even 'us' imperial returns pressure in hPa so we need to convert global $showUnitsAs; if($showUnitsAs == 'us') { $t = (float)$hPa * 0.02952998751; return(sprintf("%01.2f",$t)); } else { return( sprintf("%01.1f",$hPa) ); } } // ------------------------------------------------------------------ function AW_conv_units($type,$value) { global $Units,$Status,$doDebug; $output = $value; // default is no conversion if($type == 'W') { //input wind in km/h switch ($Units[$type]) { case 'm/s': $t = (float)$value * 0.277778; $output = sprintf("%01.1f",round($t,1)); break; case 'km/h': $output = $value; break; case 'mph': $t = (float)$value * 0.621371; $output = round($t,0); break; case 'kts': $t = (float)$value * 0.539957; $output = round($t,0); break; } } if($type == 'T') { //input temperature in C switch ($Units[$type]) { case '°C': $output = sprintf("%01.1f",$value); break; case '°F': // (0°C × 9/5) + 32 $t = ((float)$value * 9.0)/5.0 + 32.0; $output = round($t,0); break; } } if($type == 'R') { //input rain in mm switch ($Units[$type]) { case 'mm': $output = sprintf("%01.1f",$value); break; case 'in': $t = (float)$value * 0.0393701; $output = sprintf("%01.2f",$t); break; } } if($type == 'S') { //input snow in CM switch ($Units[$type]) { case 'cm': $output = sprintf("%01.1f",$value); break; case 'in': $t = (float)$value * 0.393701; $output = sprintf("%01.2f",$t); break; } } if($type == 'I') { //input ice in mm switch ($Units[$type]) { case 'mm': $output = sprintf("%01.1f",$value); break; case 'in': $t = (float)$value * 0.0393701; $output = sprintf("%01.2f",$t); break; } } if($type == 'P') { //input pressure in hPa/millibars switch ($Units[$type]) { case 'mb': $output = sprintf("%01.1f",$value); break; case 'hPa': $output = sprintf("%01.1f",$value); break; case 'inHg': $t = (float)$value * 0.02952998751; $output = sprintf("%01.2f",$t); break; } } if($doDebug) { $Status .= "\n"; } return($output); } // end AW_conf_units // ------------------------------------------------------------------ function AW_decode_conds($condcode) { $output = ''; /* The weather codes are given in the following standard format: [coverage]:[intensity]:[weather] For example, the following code suggests that there is a slight chance (S) for light (L) rain showers (RW) for the period: S:L:RW If a weather type is not expected for any period, then the clouds code will be provided in place of the weather field along with empty values for coverage and intensity: ::FW */ //Cloud Codes //Cloud codes indicate the percentage of the sky that is covered by clouds. $CloudCodes = array( 'CL' => 'Clear ', // Cloud coverage is 0-7% of the sky. 'FW' => 'Mostly Clear ', // Cloud coverage is 7-32% of the sky. 'SC' => 'Partly Cloudy ', // Cloud coverage is 32-70% of the sky. 'BK' => 'Mostly Cloudy ', // Cloud coverage is 70-95% of the sky. 'OV' => 'Overcast ', // Cloud coverage is 95-100% of the sky. ); //Coverage Codes //Coverage codes are used with coded weather strings to provide information regarding the coverage of precipitation or other weather types. This can be used to determine how widespread a specific weather type will be, from isolated to definite. $CoverageCodes = array( 'AR' => 'Areas of ', // 'BR' => 'Brief ', // 'C' => 'Chance of ', // 'D' => '', // was 'Definite ' 'FQ' => 'Frequent ', // 'IN' => 'Intermittent ', // 'IS' => 'Isolated ', // 'L' => 'Likely ', // 'NM' => 'Numerous ', // 'O' => 'Occasional ', // 'PA' => 'Patchy ', // 'PD' => 'Periods of ', // 'S' => 'Slight chance ', // 'SC' => 'Scattered ', // 'VC' => 'Nearby ', // 'WD' => 'Widespread ', // ); //Intensity Codes //Intensity codes indicate how heavy or light the accompanying weather type is or will be. $IntensityCodes = array( 'VL' => 'Very light ', // 'L' => 'Light ', // 'H' => 'Heavy ', // 'VH' => 'Very heavy ', // // Moderate (if no intensity is provided, moderate weather type is assumed) ); //Weather Codes //Weather codes indicate the type of weather that is observed or forecasted. These codes are typically combined with the Coverage and Intensity codes to provide more specifics regarding the weather conditions. $WeatherCodes = array( 'A' => 'Hail ', // 'BD' => 'Blowing dust ', // 'BN' => 'Blowing sand ', // 'BR' => 'Mist ', // 'BS' => 'Blowing snow ', // 'BY' => 'Blowing spray ', // 'F' => 'Fog ', // 'FR' => 'Frost ', // 'H' => 'Haze ', // 'IC' => 'Ice crystals ', // 'IF' => 'Ice fog ', // 'IP' => 'Sleet ', // 'K' => 'Smoke ', // 'L' => 'Drizzle ', // 'R' => 'Rain ', // 'RW' => 'Rain showers ', // 'RS' => 'Rain/snow mix ', // 'SI' => 'Snow/sleet mix ', // 'WM' => 'Wintry mix ', // 'S' => 'Snow ', // 'SW' => 'Snow showers ', // 'T' => 'Thunderstorms ', // 'UP' => 'Unk precip ', // May occur in an automated observation station, which cannot determine the precipitation type falling. 'VA' => 'Volcanic ash ', // 'WP' => 'Waterspouts ', // 'ZF' => 'Freezing fog ', // 'ZL' => 'Freezing drizzle ', // 'ZR' => 'Freezing rain ', // 'ZY' => 'Freezing spray ', // ); list($cover,$intensity,$weather) = explode(':',$condcode.'::'); if(empty($cover) and empty($intensity) and isset($CloudCodes[$weather])) { return(trim($CloudCodes[$weather])); } if(!empty($cover) and isset($CoverageCodes[$cover])) { $output .= $CoverageCodes[$cover]; } if(!empty($intensity) and isset($IntensityCodes[$intensity])) { $output .= $IntensityCodes[$intensity]; } if(!empty($weather) and isset($WeatherCodes[$weather])) { $output .= $WeatherCodes[$weather]; } $output = ucfirst(strtolower(trim($output))); return($output); } // ------------------------------------------------------------------ function AW_load_parser_trans($lang) { global $Status; $Language = array(); $Language['charset'] = 'ISO-8859-1'; // default for languages if($lang == 'en') {return($Language);} $file = "./AWlang/plaintext-parser-lang-$lang.txt"; $config = array(); if (file_exists("$file") ) { $config = file("$file"); $Status .= "\n"; } else { $Status .= "\n"; } foreach ($config as $key => $rec) { // load the parser condition strings $recin = trim($rec); if ($recin and substr($recin,0,1) <> '#') { // got a non comment record list($type,$keyword,$dayicon,$nighticon,$condition) = explode('|',$recin . '|||||'); if (isset($type) and strtolower($type) == 'lang' and isset($dayicon)) { $Language["$keyword"] = "$dayicon"; } if (isset($type) and strtolower($type) == 'charset' and isset($keyword)) { $Language['charset'] = trim($keyword); $Status .= "\n"; } } } return($Language); } // ------------------------------------------------------------------ function AW_do_parser_trans($text,$Language) { $t = str_replace(' with ',', ',$text); $t = str_replace(' of ',' ',$t); reset ($Language); // process in order of the file foreach ($Language as $key => $replacement) { $t = str_replace($key,$replacement,$t); } return($t); } // End of functions --------------------------------------------------------------------------