time()
// Version 1.03 - 18-Jan-2022 - fix for extract of source HTML Charset to use
// Version 1.04 - 27-Dec-2022 - fixes for PHP 8.1
// Version 1.05 - 09-Feb-2023 - fixes for PHP 8.2 and Notice errata
//
$Version = "V1.05 - 09-Feb-2023";
//
// Settings:
// --------- start of settings ----------
//
// Go to http://weather.gc.ca/lightning/index_e.html
// Click on the desired area page.
// You should see a lightning page with an url like
// http://weather.gc.ca/lightning/index_e.html?id=XXX
// copy the three letter area id=XXX into $lightningID = 'XXX'; below
//
$lightningID = 'NAT'; // set to default Site for lightning (same as id=xxx on EC website)
// // available sites: NAT ARC PAC WRN ONT QUE ATL
$defaultLang = 'en'; // set to 'fr' for french default language
// // set to 'en' for english default language
//
$lightningCacheName = 'ec-lightning.txt'; // note: will be changed to -en.txt or
// -fr.txt depending on language choice and stored in $lightningDir
$lightningDir = './radar/'; // directory for storing lightning-XXX-0.png to lightning-XXX-6.png images
// note: relative to document root.
$lightningWidth = 620; // width of images to output in pixels. default=620
//
$refetchSeconds = 300; // look for new images from EC every 5 minutes (300 seconds)
// NOTE: EC may take up to 20 minutes to publish new images
$noLightningMinutes = 25; // minutes to wait before declaring the image site as 'N/O -not operational'
//
$aniSec = 1; // number of seconds between animations
//
$charsetOutput = 'ISO-8859-1'; // default character encoding of output
// ---------- end of settings -----------
//------------------------------------------------
// overrides from Settings.php if available
global $SITE;
if (isset($SITE['eclightningID'])) {$lightningID = $SITE['eclightningID'];}
if (isset($SITE['defaultlang'])) {$defaultLang = $SITE['defaultlang'];}
if (isset($SITE['charset'])) {$charsetOutput = strtoupper($SITE['charset']); }
// end of overrides from Settings.php if available
//
// ---------- main code -----------------
if (isset($_REQUEST['sce']) && strtolower($_REQUEST['sce']) == 'view' ) {
//--self downloader --
$filenameReal = __FILE__;
$download_size = filesize($filenameReal);
header('Pragma: public');
header('Cache-Control: private');
header('Cache-Control: no-cache, must-revalidate');
header("Content-type: text/plain,charset=ISO-8859-1");
header("Accept-Ranges: bytes");
header("Content-Length: $download_size");
header('Connection: close');
readfile($filenameReal);
exit;
}
//error_reporting(E_ALL); // uncomment to turn on full error reporting
$hasUrlFopenSet = ini_get('allow_url_fopen');
if(!$hasUrlFopenSet) {
print "
Warning: PHP does not have 'allow_url_fopen = on;' -- image fetch by ec-lightning.php is not possible.
\n";
print "
To fix, add the statement:
allow_url_fopen = on;\n\n
to your php.ini file to enable ec-lightning.php operation.\n";
return;
}
$t = pathinfo(__FILE__); // get our program name for the HTML comments
$Program = $t['basename'];
$Status = "\n";
$printIt = true;
if(isset($_REQUEST['inc']) && strtolower($_REQUEST['inc']) == 'y' or
(isset($doInclude) and $doInclude)) {$doInclude = true;}
if(isset($doPrint)) { $printIt = $doPrint; }
if(! isset($doInclude)) {$doInclude = false; }
if(isset($_REQUEST['id'])) { $lightningID = strtoupper($_REQUEST['id']); }
$lightningID = preg_replace('|[^A-Z]+|s','',$lightningID); // Make sure only alpha in siteID
if(strlen($lightningID) <> 3) {
print "
Sorry... area id '$lightningID' is not a valid EC area site name.
Sorry. Unable to write $lightningCacheName to '$cacheDir'. ";
print "Make '$cacheDir' writable by PHP for this script to operate properly.
\n";
exit;
}
if(strlen($site) < 100) {
print "
Sorry. Incomplete file received from Environment Canada website.
\n";
exit;
}
preg_match('|charset="{0,1}([^"]+)"{0,1}\r|i',$site,$matches);
if (isset($matches[1])) {
$charsetInput = trim(strtoupper($matches[1]));
} else {
$charsetInput = 'UTF-8';
}
$doIconv = ($charsetInput == $charsetOutput)?false:true; // only do iconv() if sets are different
$Status .= "\n";
// find the site name
//
preg_match_all('|(.*)|',$site,$matches);
// $Status .= "\n";
$siteTitle = isset($matches[1][0])?$matches[1][0]:'';
if($doIconv and !empty($siteTitle)) {
$siteTitle = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$siteTitle);
}
// find the site heading info
preg_match_all('|
(.*)
|',$site,$matches);
// $Status .= "\n";
$siteHeading = isset($matches[1][0])?$matches[1][0]:'';
if($doIconv and !empty($siteHeading)) {
$siteHeading = iconv($charsetInput,$charsetOutput.'//TRANSLIT',$siteHeading);
}
// find the legend info and build our version.
$ECLlegend = '';
preg_match('|
![\"red](\"{$lightningDir}legendLightning.png\")
\n".
"