harvey/rc/bin/ups

#!/bin/rc

if(! ~ $#* 1) {
	echo usage: ups 1ZA41W190338680961 >[1=2]
	exit usage
}

rfork e
hget -x /net.alt 'http://wwwapps.ups.com/etracking/tracking.cgi?track=Track&InquiryNumber1='^$1^ \
	'&TypeOfInquiryNumber=T' >/tmp/ups.1

cat /tmp/ups.1 |
x=`{sed -n 's/^<INPUT TYPE="HIDDEN" NAME="([^"]+)" VALUE="([^"]+)">.*/\1=\2/p' |
tr ' 	' ++}
x=$"x
x=`{echo $x | sed 's/ /\&/g'}
x=$"x
x=$x^'&tdts1.x=19&tdts1.y=7'
hget -x /net.alt -p $x http://wwwapps.ups.com/etracking/tracking.cgi | htmlfmt >/tmp/ups.2

# to first blank line, output is a simple two-column table, followed by a blank line
# after that it's a five column table followed by a blank line
# after that it's UPS stuff starting 'Tracking results'
sam -d /tmp/ups.2 >[2] /dev/null <<'!'
/^Tracking results.*\n/p
!echo
.,$d
1,/^$/ s/:\n/: /g
/^PACKAGE/,$y/(Activity|SCAN|RECEIVED|DELIVERED|DELIVERY)\n/ g/./ s/\n/ /g
,p
!