xref: /plan9-contrib/sys/src/cmd/fax/receiverc (revision 219b2ee8daee37f4aad58d63f21287faa8e4ffdc)
1#!/bin/rc
2spool=/mail/faxqueue
3recipients=/mail/lib/faxrecipients
4
5#
6# Arguments should be
7#	time Y|N pages [ftsi]
8#
9switch($#*){
10
11case 4
12	#
13	# Check for the NYT. It's 9 pages from
14	# area-code 202.
15	#
16	if(~ $2 Y && ~ $4 20240*){
17		if(~ $3 9){
18			for(i in 001 002 003 004 005 006 007 008 009){
19				cp $spool/$1.$i /lib/nyt/nyt.$i
20			}
21			rm -f $spool/$1.*
22		}
23		if not
24			echo NYT FAX: $* | mail rob
25	}
26	if not
27		echo FAX: page $spool/$1.* | mail `{cat $recipients}
28case 3
29	echo FAX: page $spool/$1.* | mail `{cat $recipients}
30case *
31	echo FAX BOTCH: page $spool/$1.* | mail jmk
32}
33