xref: /plan9/sys/lib/fax/receiverc (revision 219b2ee8daee37f4aad58d63f21287faa8e4ffdc)
1*219b2ee8SDavid du Colombier#!/bin/rc
2*219b2ee8SDavid du Colombierspool=/mail/faxqueue
3*219b2ee8SDavid du Colombierrecipients=/mail/faxqueue/faxrecipients
4*219b2ee8SDavid du Colombierfaxowner=tor	#list of people to notify when unrecognizable fax comes in
5*219b2ee8SDavid du Colombier
6*219b2ee8SDavid du Colombier#
7*219b2ee8SDavid du Colombier# Arguments should be
8*219b2ee8SDavid du Colombier#	time Y|N pages [ftsi]
9*219b2ee8SDavid du Colombier#
10*219b2ee8SDavid du Colombierswitch($#*){
11*219b2ee8SDavid du Colombier
12*219b2ee8SDavid du Colombiercase 4
13*219b2ee8SDavid du Colombiercase 3
14*219b2ee8SDavid du Colombier	{echo $*; echo FAX: page $spool/$1.'*'} | mail `{cat $recipients}
15*219b2ee8SDavid du Colombiercase 0
16*219b2ee8SDavid du Colombier	{echo $*; echo FAX: no pages} | mail $faxowner
17*219b2ee8SDavid du Colombiercase *
18*219b2ee8SDavid du Colombier	{echo $*; echo FAX: page $spool/$1.'*'} | mail $faxowner
19*219b2ee8SDavid du Colombier}
20