#! /bin/sh


OUTFILE="zo_table_new.csv"

rm -f $OUTFILE

awk -v "OUTFILE=$OUTFILE" '
function trim(s)
{
        sub(/^[ \t]*/,"",s)
        sub(/[ \t]*$/,"",s)
        gsub(/\"/,"",s)
        return s
}


{
        if (NR >= 1 && NR <=12) {        # skip header recs
                #print "  Skippig Header rec"
                next
        }

	f1 = trim($0)
	
	getline
	f2 = trim($0)
	split(f2,lat_lon_arr," ")
	latstr = lat_lon_arr[1]
	lonstr = lat_lon_arr[2]
	#
	gsub(/[^0-9]/,":",latstr)
	split(latstr,lat_arr,":")
	lat = lat_arr[1] + (lat_arr[2] / 60) + (lat_arr[3] / 60 / 60)
	#
	gsub(/[^0-9]/,":",lonstr)
	split(lonstr,lon_arr,":")
	lon = lon_arr[1] + (lon_arr[2] / 60) + (lon_arr[3] / 60 / 60)

	getline
	f3 = trim($0)

	getline
	f4 = trim($0)
        gsub(/, /,",",f4)

	getline
	f5 = trim($0)
        gsub(/, /,",",f5)

	getline
	f6 = trim($0)

	print f1 "|" lat "|" lon "|" f3 "|" f4 "|" f5 "|" f6 "|"


	Zone = f1
	Charge_point = f2
	District = f3
	Adjoining_zones = f4
	Community_access_to = f5
	Zone_type = f6

	# create zo_table.csv format
	#eg.
	#Aberfoyle,30.35833,152.04167,Armidale,0.00000,0.00000,N,"Guyra,Wollomombi,Ebor,Hernani,Armidale,Oban"

	outstr = Zone "," lat "," lon "," District "," "0.00000" ","  "0.00000" "," "N" ",\"" Adjoining_zones "\""

	## add Cumminity access zones
	#outstr = outstr ",\"" Community_access_to "\""

	#print "outstr=[" outstr "]"
	print outstr >> OUTFILE

}
' <telstra_charging_zones.txt >telstra_charging_zones.unl