#!/bin/rc view=no stdin=no switch($1){ case -v view=yes shift } switch($#*){ case 0 1 echo usage: $0 telephone-number recipient [files] exit 0 case 2 stdin=yes } telno=$1 shift recip=$1 shift script=/tmp/fax.$pid header=/tmp/faxh.$pid user=`{cat /dev/user} tmp=/tmp/page.$pid tmpin=/tmp/page.in.$pid tel=`{grep '\) '$user /lib/tel} myname=`{echo $tel | sed 's/ \(.*//'} ext=`{echo $tel | sed 's/.*\) [^ ]* [^ ]* ([^ ]*).*/\1/'} fn sigint{ #rm -f $tmp.* $tmpin.* $script $header $header.* exit interrupt } # gs insists on reading its standard input, so we read quit.ps to cut it off. switch($stdin){ case yes cat > $tmpin gs -dSAFER '-sDEVICE=dfaxlow' '-sOUTPUTFILE='$tmp'.%.3d' -dNOPAUSE -dQUIET $tmpin quit.ps case * gs -dSAFER '-sDEVICE=dfaxlow' '-sOUTPUTFILE='$tmp'.%.3d' -dNOPAUSE -dQUIET $* quit.ps } pages=`{echo $tmp.*|wc -w} echo -n 's/ddd/' > $script echo -n `{date}>> $script echo />> $script echo -n s/FFF/>> $script echo -n $myname >> $script echo />> $script echo -n s/EEE/>> $script echo -n $user >> $script echo />> $script echo -n s/VVV/>> $script echo -n $ext >> $script echo />> $script echo -n s/TTT/>> $script echo -n $recip >> $script echo />> $script echo -n s/fff/>> $script echo -n $telno >> $script echo />> $script echo -n s/ppp/>> $script echo -n $pages >> $script echo />> $script sed -f $script /sys/lib/fax/h.ps > $header gs -dSAFER '-sDEVICE=dfaxlow' '-sOUTPUTFILE='$header'.%.3d' -dNOPAUSE -dQUIET $header quit.ps files=() for(i in $header.* $tmp.*){ files=($files -f $i) } switch($view){ case no upas/qer $files /mail/faxoutqueue fax $user $telno < /dev/null rx dinar /sys/lib/fax/faxgoose case yes page $header.* $tmp.* } #rm -f $tmp.* $header $script $header.* $tmpin