ref: c1d40df49550393f3afe53fb6e6d500dfa8eb7a8
dir: /sys/lib/fax/receiverc/
#!/bin/rc spool=/mail/faxqueue recipients=/mail/faxqueue/faxrecipients # run mail as if we're on fs rm /srv/fs 9fs fs bind -c /n/fs/mail/faxqueue /mail/faxqueue # # Arguments should be # time Y|N pages [ftsi] # switch($#*){ case 4 # # Check for the NYT. It's 9 pages from 'Via Fax '. # nyt=false if(~ $2 Y && {~ $4 'Via Fax '}){ switch(`{date|sed 's/ .*//'}){ case Mon Tue Wed Thu Fri hour=`{date|sed 's/.* ([0-9][0-9]):.*/\1/'} if(test $3 -gt 7 -a '(' $hour -lt 7 -o $hour -ge 21 ')') nyt=true case * if(test $3 -gt 7) nyt=true } } switch($nyt){ case true to=`{seq 0 1 $3} for(i in `{seq 2 1 $3}){ switch($i){ case ? ext=00$i case ?? ext=0$i case ??? ext=$i } cp $spool/$1.$ext /n/fs/lib/nyt/nyt.$to($i) } cp $spool/$1.1 /n/fs/lib/nyt/nyt.$3 rm -f $spool/$1.* case * {echo $*; echo FAX: page -w $spool/$1.'*'} | mail `{cat $recipients} } case 3 {echo $*; echo FAX: page -w $spool/$1.'*'} | mail `{cat $recipients} case * {echo $*; echo FAX: page -w $spool/$1.'*'} | mail jmk } exit 0