Re: [hylafax-users] How to overprint a received fax with headers

[Matthias Reich <rei@xxxxxxxx>]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Am Montag, 20. Juni 2005 12:21 schrieb Giovanni Gasparri - 2ware:
> Hi everybody,
> I've just realized Hylafax doesn't print the fax header as usual fax
> machines (such as sender and timestamp).
> I need to overprint the original received fax with these information.
> Is it possible?
> - - -
> Giovanni Gasparri
> Technical Support - 2ware Srl
> http://gasparri.2ware.it
>

Hi Giovanni,

you could change the faxrcvd-script, which resides in the bin-directory.
we changed this to print additional information on the paper.
Look for the $FAX2PS, which changes the fax to a Postscript-file.
We take the output from $FAX2PS and parse it through a perl-script to
put the additional information on.

Hope that helps
Matthias



#!/usr/bin/perl -w
while (<>) {
	$title = $1 if (/^%%Title: recvq\/(.*)\.tif/);
	$title = $1 if (/^%%Title: (.*)\.fax/);
	$datum = $1 if (/^%\%CreationDate: (.*)/);
	print $_;
	print <DATA> if (/^%\%BeginSetup/);
	if (/^%\%Page: 1 1/) {
		print "0 setgray\n";
		print "16 /ISOHelvetica F\n";
		print "30 815 moveto ($title.fax) show\n";
		print "330 815 moveto ($datum) show\n";
	}
}
__DATA__
/bdef { bind def} bind def              % just a shorthand
/F {
    findfont exch 	% g f -> fdict g	font-dictionary von f: fdict
    dup /FontSize exch	% -> fdict g /FontSize g
    def 		% -> fdict g		/FontSize g def
    scalefont		% -> fdict		g scalefont
    setfont		% -> _leer_		fdict setfont
} bdef
/MakeISOFont {
    /neufont exch def
    findfont dup maxlength dict
    /newdict exch def
    {1 index /FID ne
	{newdict 3 1 roll put }
	{pop pop} ifelse
    } forall
    newdict /Encoding ISOLatin1Encoding put
    newdict /FontName neufont put
    neufont newdict definefont pop
} bdef
/Helvetica (ISOHelvetica) MakeISOFont
- -- 
HAGOS eG                 phone: +49 711 7880592
Matthias Reich             fax: +49 711 7880535
Industriestr. 62           web: http://www.hagos.de
D-70565 Stuttgart         mail: rei@xxxxxxxx
Germany
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.1 (GNU/Linux)

iD8DBQFCtqFxcjMVLPQ5oUkRAltgAJ47g6hgnWmj4NJ533GaEFDXLNNaJQCeMcJ1
QeJAvT+je1SbiOKNkqxEeOs=
=9tkT
-----END PGP SIGNATURE-----

____________________ HylaFAX(tm) Users Mailing List _______________________
  To subscribe/unsubscribe, click http://lists.hylafax.org/cgi-bin/lsg2.cgi
 On UNIX: mail -s unsubscribe hylafax-users-request@xxxxxxxxxxx < /dev/null
  *To learn about commercial HylaFAX(tm) support, mail sales@xxxxxxxxx*