DataMuseum.dk

top - metrics - download

    Length: 3137 (0xc41)
    Types: TextFile
    Notes: Uncompressed file

└─⟦5a9f1bdbd⟧ Bits:30004698 RC900 Environment Rel. 2.0 (5.25 inch)
└─⟦5a9f1bdbd⟧ UNIX Filesystem
    └─⟦72c0897ad⟧ »RCENV.ISC/new/usr/spool/lp/model/rc640.Z« 
└─⟦de58d8f44⟧ Bits:30004699 RC900 Environment Rel. 2.0 (3.5 inch)
└─⟦de58d8f44⟧ UNIX Filesystem
    └─⟦72c0897ad⟧ »RCENV.ISC/new/usr/spool/lp/model/rc640.Z« 
        └─⟦this⟧ 

TextFile

#ident @(#)rc640.sh	1.1, RC International, 91/09/03

# lp interface for rc640 program line printer

# Formats supported:
#	letter codes:
#		d	duplex (requires rc640 && duplex unit)
#		p	program mode (12cpi)
#		h	horizontal
#
#	a4 a4p a4d a4dp a4dp8
#	a4t a4tp a4td a4tdp
#	a3 a3t a3d a3td

# set up default configuration

format=a4

Header=Yes	# generate a header
paper=a4	# papersize
lpi=0	 	# line per inch, printer programmed
cpi=0 		# character per inch, printer programmed
orient=0 	# orientation 0=portrait 1=landscape
margin=0	# margin in columns
# for rc640 with duplex
duplex=0	# single / douple sided print
shft=0		# shift left/right side 1/720 inch

# read primary options

for i in $format $5
do case "$i" in
nobanner | h | H)	Header=No;;
a4)	lpi=0 ; cpi=0 ; duplex=0 ; orient=0 ; margin=0 ; paper=a4 ;;
a4p)	lpi=0 ; cpi=16 ; duplex=0 ; orient=0 ; margin=8 ; paper=a4 ;;
a4d)	lpi=0 ; cpi=0 ; duplex=1 ; orient=0 ; margin=0 ; paper=a4 ;;
a4dp)	lpi=0 ; cpi=16 ; duplex=1 ; orient=0 ; margin=4 ; paper=a4 ; shft=180 ;;
a4dp8)	lpi=8 ; cpi=16 ; duplex=1 ; orient=0 ; margin=4 ; paper=a4 ; shft=180 ;;
a4t)	lpi=0 ; cpi=0 ; duplex=0 ; orient=1 ; margin=0 ; paper=a4 ;;
a4tp)	lpi=0 ; cpi=12 ; duplex=0 ; orient=1 ; margin=0 ; paper=a4 ;;
a4td)	lpi=0 ; cpi=0 ; duplex=1 ; orient=1 ; margin=4 ; paper=a4 ; shft=180 ;;
a4tdp)	lpi=0 ; cpi=12 ; duplex=1 ; orient=1 ; margin=0 ; paper=a4 ;;
a3)	lpi=0 ; cpi=0 ; duplex=0 ; orient=0 ; margin=0 ; paper=a3 ;;
a3t)	lpi=0 ; cpi=0 ; duplex=0 ; orient=1 ; margin=0 ; paper=a3 ;;
a3d)	lpi=0 ; cpi=0 ; duplex=1 ; orient=0 ; margin=0 ; paper=a3 ;;
a3td)	lpi=0 ; cpi=0 ; duplex=1 ; orient=1 ; margin=0 ; paper=a3 ;;
esac
done

# read secondary options

for i in $5
do
	case "$i" in
	c10)	cpi=10 ;;
	c12)	cpi=12 ;;
	c15)	cpi=15 ;;
	c16)	cpi=16.66 ;;
	c16.66)	cpi=16.66 ;;
	l1)	lpi=1 ;;
	l2)	lpi=2 ;;
	l3)	lpi=3 ;;
	l4)	lpi=4 ;;
	l6)	lpi=6 ;;
	l8)	lpi=8 ;;
	l12)	lpi=12 ;;
	l16)	lpi=16 ;;
	l24)	lpi=24 ;;
	l48)	lpi=48 ;;
	m)	margin=4 ;;
	s)	shft=180 ;;
esac
done


# reset, lf->cr lf
echo '\033E\033&k2G'

# set paper size, before we print the header
if [ $paper = a3 ]; then
	echo "\033&l27A"
fi

if [ $Header = Yes ]; then
	echo "\n\n\n\n"
	banner "$2" "`uname -n`"
	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`"
	test -n "$5" && echo "Options: $5"
	echo
	date
	echo "\n"
	if [ -n "$3" ]
	then
		banner $3
	fi
	echo "\014\c"
fi
copies=$4

# set orientation
if [ $orient -ne 0 ]; then
	echo "\033&l${orient}O\c"
fi

# set lpi
if [ $lpi -ne 0 ]; then
	echo "\033&l${lpi}D\c"
fi

# set cpi
if [ $cpi -ne 0 ]; then
	echo "\033(s${cpi}H\c"
fi

# set duplex
if [ $duplex -ne 0 ]; then
	echo "\033&l${duplex}S\c"
fi

# set margins etc
if [ $margin -ne 0 ]; then
	echo "\033&a${margin}L\c"
	if [ $shft -ne 0 ]; then
		echo "\033&l${shft}U\c"
	fi
fi

shift; shift; shift; shift; shift
files="$*"
i=1
while [ $i -le $copies ]
do
	for file in $files
	do
#		select front side
		echo "\033&a1G\033&a0G\c"
		cat "$file" 2>&1
	done
	i=`expr $i + 1`
done	#FILT-CMD
echo '\033E\c'