#!/bin/bash
printf "Content-type: text/html\n\n"
STRING=$( echo  "$QUERY_STRING" | sed 's/%3A/:/g' | sed 's/[^A-z0-9&:=-]/Q/g' )
IFS="&"  read -a ARRAY <<< "$STRING"

str=${ARRAY[0]}
weg=${str#weg=}

str=${ARRAY[1]}
rb=${str#rijbaan=}

str=${ARRAY[2]}
pos=${str#pos=}

str=${ARRAY[3]}
tm=${str//-/}
dat=${tm#date=}

str=${ARRAY[4]}
tm=${str/":"/}
tim=${tm#time=} 
dirdat=$(echo $dat | cut -c-6)

file=/home/pi/lussen/www/matrix${dat}T${tim}.gz
[ -e $file ] || file=/media/verbext/strookbackup/matrix${dat}T${tim}.gz
[ -e $file ] || file=/media/verbext/strookbackup/data${dirdat}/matrix${dat}T${tim}.gz
if [ ! -e $file ]  
then
	mounted=$(mount | grep verbext | wc -l)
	if [ $mounted -eq 0 ]
	then 
		echo "archive not mounted only two days of matrices available"
	else
	echo "sorry, no records of that time and date. Logging started 2017-12-29." 
fi
	exit
fi
echo "<h2>"${ARRAY[3]}"<br>"${ARRAY[4]/"%3A"/:}"</h2>"
n=$(zgrep $weg"\>" $file | awk '(('$rb'=="0"||$2=="'$rb'")&&('$pos'=="-314"||($4>'$pos'-1&&$4<'$pos'+1)))' | wc -l )
if [ $n -gt 0 ]
then
echo "<table border=1><tr> <td>Weg</td> <td>Rijbaan</td> <td>Rijstrook</td> <td>hmp</td><td>Matrix sinds (UTC)</td> <td></td> </tr>"
zgrep $weg"\>" $file |\
awk '(('$rb'=="0"||$2=="'$rb'")&&('$pos'=="-314"||($4>'$pos'-1&&$4<'$pos'+1)))' |\
sort -gk4  |\
       	sed 's/^/<tr><td>/;s/$/<\/td><\/tr>/' | sed 's/ /<\/td><td>/;s/ /<\/td><td>/;s/ /<\/td><td>/;s/ /<\/td><td>/;s/Z/Z<\/td><td>/;'  |\
sed 's/red_ring //g; s/speedlimit *100/<img src=\"http:\/\/matrix.petergeelhoed.nl\/DVM100.png\">/g; s/blank/<img src=\"http:\/\/matrix.petergeelhoed.nl\/blank.png\">/g; s/speedlimit *80/<img src=\"http:\/\/matrix.petergeelhoed.nl\/DVM-80RR.png\">/g; s/speedlimit *flashing *50/<img src=\"http:\/\/matrix.petergeelhoed.nl\/DVM-50F.png\">/g; s/speedlimit *flashing *70/<img src=\"http:\/\/matrix.petergeelhoed.nl\/DVM-70F.png\">/g; s/speedlimit *90/<img src=\"http:\/\/matrix.petergeelhoed.nl\/DVM-90.png\">/g; s/speedlimit *50/<img src=\"http:\/\/matrix.petergeelhoed.nl\/DVM-50.png\">/g; s/speedlimit *70/<img src=\"http:\/\/matrix.petergeelhoed.nl\/DVM-70.png\">/g; s/lane_closed_ahead\( flashing\)* *right/<img src=\"http:\/\/matrix.petergeelhoed.nl\/DVM-PR.png\">/g; s/lane_closed_ahead\( flashing\)* *left/<img src=\"http:\/\/matrix.petergeelhoed.nl\/DVM-PL.png\">/g; s/lane_closed\>/<img src=\"http:\/\/matrix.petergeelhoed.nl\/DVM-X.png\">/g; s/lane_open/<img src=\"http:\/\/matrix.petergeelhoed.nl\/DVM-GPL.png\">/g; s/restriction_end/<img src=\"http:\/\/matrix.petergeelhoed.nl\/DVM-EAV.png\">/g;' 
echo "</table>"
else
	echo "Geen matrix gezet op " $weg $rb " tussen " $((pos-1)) " en " $((pos+1)) " km. Maar het kan ook zijn dat er helemaal geen matrix staat." 
fi
cat /home/pi/lussen/links.html