#!/bin/sh
TIF_FILE=$1
if [ ! -f $TIF_FILE ]
then
	echo "File $TIF_FILE not found";
	exit 1;
fi
# get receive-datetime of file 
RECEIPT=`date`;
fax2ps $TIF_FILE | 
awk ' { if ($0=="%%BeginProlog")
		{ print "/Courier findfont"
		  print "10 scalefont"
		  print "setfont"
		  print "0 setgray"
		  print "60 20 moveto (Received:",x,") show"
		  print "48 20 moveto (File:",y,") show"
		  print $0
		}
		else print $0
	}' x="$RECEIPT" y="$TIF_FILE";