(fwd) печать факсов

Andrey Gerzhov (kittle@freeland.alex-ua.com)
Sun, 28 Jun 1998 18:02:07 +0300 (EEST)

-- forwarded message --
Path: barmaglot.alex-ua.com!f188.n463.z2!f385.n463.z2!f159.n463!f238.n5020!f204.n5020!f44.n5000!f83.n5000!not-for-mail
Newsgroups: fido.ru.unix
Distribution: fido
X-Comment-To: Victor Sudakov
From: Yury Bokhoncovich <Yury.Bokhoncovich@p20.f83.n5000.z2.fidonet.org>
Date: Thu, 18 Jun 98 08:48:19 +0300
Subject: печать факсов
Message-ID: <898163551@p20.f83.n5000.z2>
References: <2421798197@vas.tsu.tomsk.su>
Organization: MUMPSter At Past 22-52-40
X-FTN-AREA: RU.UNIX
X-FTN-MSGID: 2:5000/83.20 3588e35f
X-FTN-REPLY: vas.tsu.tomsk.su 9059b535
X-FTN-CHRS: +7_FIDO 2
X-FTN-Tearline: GoldED 2.50+
X-FTN-Origin: MUMPSter At Past 22-52-40 (2:5000/83.20)
X-FTN-SEEN-BY: 2/3017 50/501 461/640 462/30 463/5 58 94 159 166 188 207 385 558
X-FTN-SEEN-BY: 463/659 4614/1 4615/21 4623/17 4631/13 4635/4 40 5000/10 11 13 26
X-FTN-SEEN-BY: 5000/27 44 45 47 51 68 71 72 73 75 76 83 87 88 91 93 100 108
X-FTN-SEEN-BY: 5001/13 15 5002/16 5003/15 5004/16 5005/5005 5010/77 5011/13 201
X-FTN-SEEN-BY: 5014/4 5015/4 5020/20 52 79 104 128 194 200 204 238 269 278 400 443
X-FTN-SEEN-BY: 5020/1381 1978 5021/11 22 5022/5 5023/1 8 11 5025/8 5026/10 5027/16
X-FTN-SEEN-BY: 5028/51 5029/1 5030/23 251 634 5033/2 5038/7 5039/2 5040/47 5042/8
X-FTN-SEEN-BY: 5043/999 5045/7 5047/17 5049/6 256 5051/16 5053/16 5054/9 5058/9 24
X-FTN-SEEN-BY: 5059/2 5061/15 5063/1 5065/10 5066/2 5070/29 5075/10 5077/3 5078/20
X-FTN-SEEN-BY: 5080/80 5083/13 17 5084/10 5085/4 5090/2 5094/1 5100/8 21
X-FTN-PATH: 5000/83 44 5020/204 238 463/159 385
X-FTN-PATH: 463/188
Lines: 70
Xref: barmaglot.alex-ua.com fido.ru.unix:8226

Привет, Victor!

Среда Июнь 17 1998 23:09, Victor Sudakov писал к All:
VS> Пожалуйста киньте в меня заведомо рабочим скриптом для распечатки факсов,
VS> принятых mgetty, на лазерник. Прошу отозваться тех, кто действительно
VS> печатает факсы.
разбор линии ($ln) нужен, потому что модема два - один как обычный факс -
печатает сразу на принтер плюс откладывает копию на новелловский сервак
а вторая линия - для меня, любимого:) - работает как сканер.;)
/usr/local/bin/new_fax
=== Cut ===
#!/bin/sh
#New fax has been arrived!:-)
# $1 = suc or fail? $2 = phone $3 = pages total $4,... = filenames
res=$1
id=$2
pt=$3
shift
shift
shift
if [ -e /var/spool/fax/seq ]
then
seq=`cat /var/spool/fax/seq`
seq=`expr $seq + 1`
if [ "$seq" = "1000000" ]
then
seq="0"
fi
else
seq="0"
fi
echo $seq>/var/spool/fax/seq
for i
do
fn=${i##*/}
pn=${i##*.}
ln=${i##*S}
ln=${ln%%-*}
echo $fn|grep -q "^ff"
if test $? = 0
then
if test $ln = "0"
then
efix -i fax -o pcl -r 300x300 -s0.95x1 -n /tmp/fax.prn $i
2>>/var/log/faxerror && nprint -S server -q HP4L -U unix
-N -n /tmp/fax.prn
efix -i fax -o tiffg3 -n "/G/$seq$pn.tif" $i 2>>/var/log/faxerror
else
efix -i fax -o tiffraw -n "/G/SCAN/$seq$pn.tif" $i 2>>/var/log/faxerror
fi
else
if test $ln = "0"
then
efix -i fax -o pcl -r 150x150 -s0.95x2 -n /tmp/fax.prn $i
2>>/var/log/faxerror && nprint -S server -q HP4L -U unix
-N -n /tmp/fax.prn
efix -i fax -o tiffg3 -s1x2 -n "/G/$seq$pn.tif" $i 2>>/var/log/faxerror
else
efix -i fax -o tiffraw -s1x2 -n "/G/SCAN/$seq$pn.tif" $i
2>>/var/log/faxerror
fi
fi
rm -f $i
done
#g32pbm -l -d 300 $i >/tmp/fax.prn && nprint -S server -U unix -q HP4L -N -n
/tmp/fax.prn
=== Cut ===
WBR, Yury.
[Ё-моё Team]
... Hапился так, что уже мог творить различные мелкие чудеса.
-- end of forwarded message --

-- 
С тем, что не помешает никогда,
                                               Kittle