'.PHP_EOL;
echo $firstpartHtml;
$from = array ('°',' ','/');
#
if ($kind == 'temp' || $kind == 'dewp') {
$uomMetric = 'c';
$uomEnglish = 'f';
$round = 0;
$request[] = 1; // field in col 1
$request[] = 3; // field in col 3
$tempLabels = array ('High','High Avg','Mean','Low Avg','Low' );
$uomOut = trim(strtolower(str_replace ($from,'', $uomTemp) ) );
if ($uomOut == 'c') {
$tempLow = -15;
$tempInc = 5;
}
else {
$tempLow = 0;
$tempInc = 10;
}
$increments = 15; // max 15, adapt css if more is needed
$tempLevels = array ($tempLow);
for ( $i = 0; $i < $increments ; $i ++ ) {
$tempLevels[$i+1] = $tempLevels[$i] + $tempInc;
}
}
if ($kind == 'dewp') {
$request[0] = 4; // field in col 4
$request[1] = 6; // field in col 6
$dewpLabels = $tempLabels;
$dewpLevels = $tempLevels;
}
if ($kind == 'baro') {
$uomMetric = 'hpa';
$uomEnglish = 'inhg';
$request[] = 10; // field in col 10
$request[] = 11; // field in col 11
$baroLabels = array ('High','Mean','Low' );
$uomOut = trim(strtolower(str_replace ($from,'', $uomBaro) ) );
if ($uomOut == 'hpa' || $uomOut == 'mb') {
$baroLow = 980;
$baroInc = 5;
$round = 0;
}
else {
$baroLow = 29.4;
$baroInc = 0.1;
$round = 2;
$numFormat = '%01.2f';
}
$increments = 12; // max 15, adapt css if more is needed
$baroLevels = array ($baroLow);
for ( $i = 0; $i < $increments ; $i ++ ) {
$baroLevels[$i+1] = $baroLevels[$i] + $baroInc;
}
}
if ($kind == 'rain') {
$uomMetric = 'cm';
$uomEnglish = 'in';
$request[] = 15; // field in col 15
$rainLabels = array ('Raindays','Month total','YTD total' );
$uomOut = trim(strtolower(str_replace ($from,'', $uomRain) ) );
if ($uomOut == 'mm') {
$rainLow = 2;
$rainInc = 2;
$round = 1;
$numFormat = '%01.1f';
}
else {
$rainLow = 0.1;
$rainInc = 0.1;
$round = 2;
$numFormat = '%01.2f';
}
$increments = 12; // max 15, adapt css if more is needed
$rainLevels = array ($rainLow);
for ( $i = 0; $i < $increments ; $i ++ ) {
$rainLevels[$i+1] = $rainLevels[$i] + $rainInc;
}
}
if ($kind == 'wind') {
$uomMetric = 'kmh';
$uomEnglish = 'mph';
$request[] = 12; // field in col 12
$request[] = 13; // field in col 13
$windLabels = array ('High','High Avg ','Avg High','Avg' );
$windLow = 1;
$windInc = 10;
$round = 1;
$numFormat = '%01.0f';
$uomOut = trim(strtolower(str_replace ($from,'', $uomWind) ) );
if ($uomOut == 'ms') {
$windLow = 1;
$windInc = 20;
}
$increments = 12; // max 15, adapt css if more is needed
$windLevels = array ($windLow);
for ( $i = 0; $i < $increments ; $i ++ ) {
$windLevels[$i+1] = $windLevels[$i] + $windInc;
}
}
if ($kind == 'gust') {
$uomMetric = 'kmh';
$uomEnglish = 'mph';
$request[] = 14; // field in col 14 = gust
$request[] = 12; // field in col 12 = normal wind
$gustLabels = array ('High','Avg High'); #,'High Avg ','Avg High','Avg' );
$gustLow = 1;
$gustInc = 10;
$round = 1;
$numFormat = '%01.0f';
$uomOut = trim(strtolower(str_replace ($from,'', $uomWind) ) );
if ($uomOut == 'ms') {
$gustLow = 1;
$gustInc = 20;
}
$increments = 12; // max 15, adapt css if more is needed
$gustLevels = array ($gustLow);
for ( $i = 0; $i < $increments ; $i ++ ) {
$gustLevels[$i+1] = $gustLevels[$i] + $gustInc;
}
$fieldLookup['WindSpeedMax'] = array ('kind' => 'wind', 'level' => 'avg');
}
if ($kind == 'windrun' || $kind == 'wrun') {
$uomMetric = 'km';
$uomEnglish = 'mi';
$request[] = 16; // field in col 16
$wrunLabels = array ('High','High Avg','Low' );
$wrunLow = 20;
$wrunInc = 40;
$round = 1;
$numFormat = '%01.0f';
$uomOut = trim(strtolower(str_replace ($from,'', $uomWrun) ) );
$increments = 12; // max 15, adapt css if more is needed
$wrunLevels = array ($wrunLow);
for ( $i = 0; $i < $increments ; $i ++ ) {
$wrunLevels[$i+1] = $wrunLevels[$i] + $wrunInc;
}
}
if ($kind == 'hum') {
$uomMetric = '%';
$uomEnglish = '%';
$round = 0;
$request[] = 7; // field in col 7
$request[] = 9; // field in col 9
$humLabels = array ('High','High Avg','Mean','Low Avg','Low' );
$humLow = 10;
$humInc = 10;
$uomOut = '%';
$increments = 9; // max 15, adapt css if more is needed
$humLevels = array ($humLow);
for ( $i = 0; $i < $increments ; $i ++ ) {
$humLevels[$i+1] = $humLevels[$i] + $humInc;
}
}
#
$levelArr = $kind.'Levels';
#var_dump($$levelArr); exit;
$row = 0;
$noValue = '---';
$empty = ' ';
$yearArray = array();
$fields = array();
$valuesMonth = count($request);
$months = 12;
$cols = $valuesMonth * $months;
#
# gather all data starting at $validFrom end at $validUntil
# the files for those years are at array $fileNames[]
#
$endYear = count($fileNames);
$checkYear = $firstYear -1;
$thisYear = date ('Y', $now );
$today = date ('Ymd', $now );
$nowHour = date ('G', $now );
$firstYearOnly = true;
for ($cntYear = 0; $cntYear < $endYear; $cntYear++) {
$checkYear++;
$fileName = $fileNames[$cntYear];
$wuURL = $wuURLs[$cntYear];
#
$readFile = 'no';
$status = ''.PHP_EOL;
#
echo $status;
#
if ( $readFile == 'yes' ){ // file (not yet) read from WU
echo '';
$wsData = wsReportCurl ($wuURL);
if ($wsData == false) {echo '
ERROR: no data for '.$wuURL.''; exit;}
$wsData = trim($wsData);
$wsData = str_replace (PHP_EOL.'
','',$wsData); // clean data
$wsData = str_replace ('
','',$wsData); //
if ( !file_put_contents($fileName, $wsData) ) {
echo '';
}
}
$handle = fopen($fileName, "r");
$firstLine = true;
$currentYear= false;
while (($data = fgetcsv($handle, 1000, ",")) !== false) {
$num = count($data);
if ($num < 2) {continue;}
if ($firstLine) { // first line has fieldnames
$firstLine = false;
$nrFields = $num;
if ($wsDebug) { echo "'.PHP_EOL;}
}
# check which unit-type is used for this file either metric or english
$fieldname = trim($data[1]); // should be either TemperatureHighF or TemperatureHighC
$string = strtolower(substr($fieldname,-1) );
if ($string == 'c') {$uomInput = $uomMetric;}
elseif ($string == 'f') {$uomInput = $uomEnglish;}
else { echo 'Error file for '.$checkYear.' has unknown uom\'s'; exit; }
continue;
} // eo if row 1
if ($num <> $nrFields) {echo "ERROR in line $row: Number of fields = $num, expected $nrFields".PHP_EOL; continue;}
# clean date field
$string = $data[0];
if (strpos ($string,'-') == false) {echo 'invalid data - stop'; print_r ($data); exit; }
list ($year,$month,$Day) = explode ('-',$string);
if (strlen($month) == 1) {$month = '0'.$month;}
if (strlen($Day) == 1) {$Day = '0'.$Day;}
# process only records in range $validFrom - $validUntil
$dataDate = $year.$month.$Day;
if ($currentYear === false) { $currentYear = $year;}
if ($year > $currentYear) {break;}
if ( ($dataDate > $validFrom) && ($dataDate < $validUntil) ) {
$yearArray[0][$row] = $year.$month.$Day;
for ($k = 0; $k < count($request); $k++) {
$fieldNr = $request[$k];
if ($kind == 'windrun' || $kind == 'wrun') { # add calculated values
$value = convertUom (24 * $data[13]);
}
else {
$value = convertUom ($data[$fieldNr]);
}
$yearArray[$k+1][$row]= $value;
} // eo for requests
$row++;
} // eo if in range
# end process in range
} // end of data
fclose($handle);
} // end of processing all files
#
$fields[] = 'Windrum'; // add label for calculated field
#
if ($wsDebug) {echo ''.PHP_EOL;}
# echo ''; print_r($yearArray); exit;
#
if ($type == 'summonthly' || $type == 'sumseasonal'){
include $wsreportsDir.'wsReportsSum.php';
} else {
include $wsreportsDir.'wsReportsDaily.php';
}
#
echo '
'.PHP_EOL;
# credits
$link_leuven = 'http://leuven-template.eu/';
$link_wildwoodweather = 'http://weather.wildwoodnaturist.com/';
$link_wundergroundsite = 'http://www.wunderground.com/personal-weather-station/dashboard?ID='.$wuid;
$stringCredit = '