DataMuseum.dk

top - download

    Length: 1088 (0x440)
    Types: TextFile
    Notes: @(#)rc632prX 13.1 (RC International) 91/02/02
    Names: »rc632prX«

└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
    └─⟦bbf173f5c⟧ »0004« 
        └─⟦this⟧ »./usr/spool/lp/model/rc632prX« 

TextFile

#	@(#)rc632prX	13.1	(RC International)	91/02/02
# lp interface for rc632prX|rc640prX program line printer on rc39
#
machine=`basename $0`
(
# don't let rc39 lp driver fidle with data
echo '\033\033\022\c'
# reset,lf->crlf,16CPI,margin 8
echo '\033E\033&k2G\033(s16H\033&a8L\c'
# USASCII
# echo '\033(0U\c'

Header=Yes
for i in $5
do
	case "$i" in
	h | H)	Header=No;;
	*)	;;
	esac
done
if [ $Header = Yes ]; then
	echo "\n\n\n\n"
	banner "$2"
	echo "\n"
	user=`grep "^$2:" /etc/passwd | line | cut -d: -f5`
	if [ -n "$user" ]
	then
		echo "User: $user\n"
	else
		echo "\n"
	fi
	echo "Request id: $1    Printer: `basename $0`@`uname`\n"
	date
	echo "\n"
	if [ -n "$3" ]
	then
		banner $3
	fi
	echo "\014\c"
fi
copies=$4
shift; shift; shift; shift; shift
files="$*"
i=1
while [ $i -le $copies ]
do
	for file in $files
	do
		cat "$file" 2>&1
		[ "`tail -1c $file`" = `echo "\014\c"` ] || echo "\014\c"
	done
	i=`expr $i + 1`
done | /usr/bin/filt -fi7
# flush buffer,reset
echo '\033E\c'
# let rc39 lp driver fidle with the data
echo '\033\033\021\c'
) | wr -s "$machine" -c"lpr -h -b"
exit 0