#!/bin/bash
#  

#Usage: firetext.sh [lat min.] [lat max.] [long min.] [long max.] [mobile no. 1]
#
# This script downloads the incident alert XML document from
# emergency.vic.gov.au, checks the location of each incident, and
# if it is within the area specified in latitude and longitude,
# sends relevent information about the incident to the mobile
# phone numbers specified (if any), as SMS messages. Also prints
# new alerts to stdout.
#
# Version: 1.0
# Author: The Free Thinker, 2020 ( gopher://aussies.space/1/%7efreet/ )
#
#TODO:
#-Multiple Phone Numbers

#Mobile Modem Device:
TTYDEV='/dev/ttyUSB1'

#Incidents XML Data URL:
URL='http://data.emergency.vic.gov.au/Show?pageId=getIncidentXML'

#Output to terminal:
messagedisplay ()
{
 echo "---  ---  ---  ---  ---  ---  ---  ---  ---

$last_updated_dt_str
$category1 , $incident_type , $category2
$incident_status
$name, $incident_location
Longitude: $LONG
Latitude: $LAT
Ref: $UTMREF

Status: $origin_status
Size: $incident_size
Resources: $RESOURCES
Incident No. $INCIDENT_NO
Event Code: $event_code

---  ---  ---  ---  ---  ---  ---  ---  ---
"
#Bell:
echo -e "\a"
}

#Output to SMS:
#Manual terminal command:
# picocom -b 9600 -f s -r /dev/ttyUSB1
messageoutput ()
{
#SMS Commands
stty -F "$TTYDEV" 9600 raw
#echo "\
chat -e \
'' AT \
OK\\r \
AT+CMGF=1 \
OK\\r \
AT+CMGS=\""$PHONENO1"\" \
'> ' \
\
"$category1 , $incident_type , $category2"\\n\
"$origin_status"\\n\
"$name, $incident_location"\\n\
"Ref: $UTMREF"\\n\"^z \
OK\\r \
 < "$TTYDEV" > "$TTYDEV"
#" > smschat.temp

#chat -t 15 -f smschat.temp -T "$PHONENO1" < "$TTYDEV" > "$TTYDEV"

}

#Check for incidents not yet processed
newincident ()
{
  local IFS='>'
  if read -d '<' TAG VALUE
  then
#   echo "TAG: $TAG"
#   echo "VALUE: $VALUE"
#The following commands use two regular expressions to extract the
#field with its data, then extract only the data from that string.
#The first, its command nested in the seccond, skips all data
#before the tag name, then ends with the final ".
#The second skips all data that isn't a number until it finds a
#sequence of numbers, beginning with a number, then outputs all
#sequential numbers after that.
#Latter part copied from sed example here:
#https://unix.stackexchange.com/questions/31476/extracting-a-regex-matched-with-sed-without-printing-the-surrounding-character/31479#31479

#Below line works on its own but not in a script for some reason...
#   UPDATETIME="`expr '\`expr "$TAG" : '.*\(last-updated-dt=\"[0-9]*\"\)'\`' : '.*[^0-9]\([0-9][0-9]*\).*'`"

   UPDATETIMETEMP=`expr "$TAG" : '.*\(last-updated-dt=\"[0-9]*\"\)'`
#Variable will be empty if not on an incident tag
   if [ -n '$UPDATETIMETEMP' ]
   then
    UPDATETIME=`expr "$UPDATETIMETEMP" : '.*[^0-9]\([0-9][0-9]*\).*'`
#   echo "UPDATETIME is: $UPDATETIME"
    if (( UPDATETIME > OLDLATESTTIME )) && (( GETINCIDENT == 0 ))
    then
#     LONG="`expr \`expr "$TAG" : '.*\(longitude=\"[.0-9]*\"\)'\` : '.*[^0-9]\([0-9]*[.][0-9]*\).*'`"
     LONG=`expr "$TAG" : '.*\(longitude=\"[.0-9]*\"\)'`
     LONG=`expr "$LONG" : '.*[^0-9]\([0-9]*[.][0-9]*\).*'`
#Remove "-" from latitude regex for northern hemisphere
#     LAT="`expr \`expr "$TAG" : '.*\(latitude=\"-[.0-9]*\"\)'\` : '.*[^0-9]\(-[0-9][.0-9]*\).*'`"
     LAT=`expr "$TAG" : '.*\(latitude=\"-[.0-9]*\"\)'`
     LAT=`expr "$LAT" : '.*[^0-9]\(-[0-9][.0-9]*\).*'`
#     RESOURCES="`expr \`expr "$TAG" : '.*\(resource-count=\"[0-9]*\"\)'\` : '.*[^0-9]\([0-9][0-9]*\).*'`"
     RESOURCES=`expr "$TAG" : '.*\(resource-count=\"[0-9]*\"\)'`
     RESOURCES=`expr "$RESOURCES" : '.*[^0-9]\([0-9][0-9]*\).*'`
#     INCIDENT_NO="`expr \`expr "$TAG" : '.*\(incident-no=\"[0-9]*\"\)'\` : '.*[^0-9]\([0-9][0-9]*\).*'`"
     INCIDENT_NO=`expr "$TAG" : '.*\(incident-no=\"[0-9]*\"\)'`
     INCIDENT_NO=`expr "$INCIDENT_NO" : '.*[^0-9]\([0-9][0-9]*\).*'`

#Check LAT and LONG here and set GETINCIDENT accordingly
     #Results are all negative when within range:
     LATUPPER=`echo "$LAT - $LATMAX" | bc`
     LATLOWER=`echo "$LATMIN - $LAT" | bc`
     LONGUPPER=`echo "$LONG - $LONGMAX" | bc`
     LONGLOWER=`echo "$LONGMIN - $LONG" | bc`
     
     if [ "${LATUPPER:0:1}" != "-" ] || \
        [ "${LATLOWER:0:1}" != "-" ] || \
        [ "${LONGUPPER:0:1}" != "-" ] || \
        [ "${LONGLOWER:0:1}" != "-" ] || \
        grep -xFq "$INCIDENT_NO" oldincidents.lst
     then
      GETINCIDENT=0
     else
      GETINCIDENT=1

#Fetch UTM/WGS84/GDA94 map ref:
      NCATRES="`wget -q --no-check-certificate -O - \"https://www.ngs.noaa.gov/api/ncat/llh?lat=$LAT&lon=$LONG&a=6378160.0&invf=298.25\"`"
      UTME=`expr "$NCATRES" : '.*"utmEasting": "\([0-9,.]*\)"' | tr -d ,`
      UTMN=`expr "$NCATRES" : '.*"utmNorthing": "\([0-9,.]*\)"' | tr -d ,`
      UTMREF="${UTME:1:3} ${UTMN:2:3}"
     fi

# Track the latest incident read. assume they're not in order:
     LATESTTIME=$LATESTTIME
     if (( LATESTTIME < UPDATETIME ))
     then
      LATESTTIME=$UPDATETIME
     fi
    fi
   fi
  else
   if (( GETINCIDENT == 1 ))
   then
    echo "ERROR: Unexpected End of XML File While Reading Incident Information"
    return 1
   else
#   Save timestamp of latest incident read:
    echo "$LATESTTIME" > "latesttime"
    return 10
   fi
  fi
 return 0
}


#Read incident info and format it in text
readincident ()
{
 
  case $TAG in

   "last-updated-dt-str")
     last_updated_dt_str=$VALUE
     ;;

   "origin-date-time-str")
     origin_date_time_str=$VALUE
     ;;

   "incident-status")
     incident_status=$VALUE
     ;;

   "incident-type")
     incident_type=$VALUE
     ;;

   "event-code")
     event_code=$VALUE
     ;;

   "incident-location")
     incident_location=$VALUE
     ;;

   "origin-status")
     origin_status=$VALUE
     ;;

   "incident-size")
     incident_size=$VALUE
     ;;

   "category2")
     category2=$VALUE
     ;;

   "category1")
     category1=$VALUE
     ;;

   "name")
     name=$VALUE
     messagedisplay
     [ "$PHONENO1" ] && messageoutput
     oldincidents="`tail -n 5 oldincidents.lst`"
     echo -e -n "$oldincidents\n$INCIDENT_NO" > oldincidents.lst
#early exit:
#     exit 0
     GETINCIDENT=0
     ;;
  esac
return 0
}

#MAIN

#Check at least four command line parameters for lat/long range
if [ $# -lt 4 ]
then
 echo "Invalid parameters - Need at least four parameters for Lat/Long range.
Usage: firetext.sh  LAT_MIN  LAT_MAX  LONG_MIN  LONG_MAX  [MOBILE_NUMBER]

Messages will be sent to MOBILE_NUMBER by SMS if number is supplied."
 exit 1
fi

#Check that XML data has changed (can only check the size - other headers aren't useful):
XMLSIZE="`wget --no-check-certificate --spider \"$URL\" 2>&1 | grep -o 'Length: [0-9]*'`"
if [ -f lastsize ] && [ "`cat lastsize`" == "$XMLSIZE" ]
then
# echo "no change"
 exit 0
else
 echo -n "$XMLSIZE" > lastsize
fi

#Command-Line Parameters:
LATMIN=$1
LATMAX=$2
LONGMIN=$3
LONGMAX=$4
PHONENO1=$5

GETINCIDENT=0
# Start latesttime at zero if it doesn't exist:
if [ ! -f latesttime ]
then
 echo "0" > "latesttime"
fi

LATESTTIME=`cat latesttime`
OLDLATESTTIME=$LATESTTIME

#Download the latest Incident XML file:
if ! wget -q --no-check-certificate -O "incident.xml" "$URL"
then
 echo -n "ERROR: Download of XML File Failed on: "
 date +"%Y-%m-%d %H:%M:%S"
 exit 1
fi

cat incident.xml | while newincident
do
 if (( GETINCIDENT > 0 ))
 then
  readincident
 fi
done

if (( GETINCIDENT == 0 ))
then
 exit 0
else
 echo "ERROR: Terminating before output of last message."
 exit 1
fi