Import sources from 2011-03-30 iso image - rc

1 files changed, 32 insertions, 0 deletions

diff --git a/rc/bin/ups b/rc/bin/ups
new file mode 100755
index 000000000..e1ad56ca6
--- /dev/null
+++ b/rc/bin/ups
@@ -0,0 +1,32 @@
+#!/bin/rc
+# ups - look up a UPS tracking number
+rfork en
+
+if(! ~ $#* 1) {
+	echo usage: ups 1ZA41W190338680961 >[1=2]
+	exit usage
+}
+
+hget 'http://wwwapps.ups.com/WebTracking/processInputRequest?tracknum='^$1^ \
+	'&TypeOfInquiryNumber=T' >/tmp/ups.1
+
+sed 's/<[Tt][Dd]>/& «TD»/g; s/<[Tt][Rr]>/&<td> «TR» /g' /tmp/ups.1 |
+	htmlfmt >/tmp/ups.2
+sam -d /tmp/ups.2 >[2] /dev/null <<'!'
+/^Tracking results.*/p
+.,$d
+/Help/d
+1,.d
+$-2,$d
+/Status:/+1
+.,/«TR»/-2d
+,s/\n/ /g
+,s/«TR»/\n/g
+,s/«TD»/	/g
+,s/ *	 */	/g
+,s/^[ 	]*//g
+,s/[ 	]*$//g
+,s/\n\n+/\n\n/g
+,p
+!
+echo