DataMuseum.dk

Presents historical artifacts from the history of:

RC9000

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RC9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: @ T l

⟦0bc82ed1e⟧ TextFile

    Length: 2260 (0x8d4)
    Types: TextFile
    Notes: @(#)lj+ 13.1 (RC International) 91/02/02
    Names: »lj+«

Derivation

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

TextFile

#
#	@(#)lj+	13.1	(RC International)	91/02/02
# Copyright (c) 1987 ELAN Computer Group
# All Rights Reserved.
#
# This is unpublished proprietary source code of ELAN Computer Group.
# The copyright notice above does not evidence any actual
# or intended publication of such source code.
#
# lp interface for HP LaserJet - Serial Version
#
# Options recognized:
#       l | -l          Landscape mode, 66 lines/page
#       p | -p          Portrait mode, 66 lines/page
#
# Default: Courier font, expand \n => \r\n
#

BINDIR=/usr/lbin
LJCAT=${BINDIR}/ljcat

# Must pass all 8 bits for EROFF
stty 9600 cs8 ixon -opost <&1

echo '\033E\033&k2G\c'
#x='XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX'
#PRINTER=`basename $0`
#REQID="$1"
#USERNAME="$2"
##TITLE="$3"
#COPIES="$4"
#echo '\033E\033&k2G\033(8U\033(sp10h12vsb3T\c'          # Internal CW Font A
#echo "$x\n$x\n$x\n$x\n"
#banner "$USERNAME"
#echo "\n"
#user=`grep "^${USERNAME}:" /etc/passwd | line | cut -d: -f5`
#if [ -n "$user" ]
#then
#        echo "User: $user\n"
#else
#        #echo "\n"
#fi
#echo "Request id: $REQID    Printer: $PRINTER\n"
#date
#echo "\n"
#if [ -n "$TITLE" ]
#then
#        banner $TITLE
#fi
#echo "\014\c"
PRMODE=
#
# $5: Options
#
for i in $5
do
        case "$i" in
        -l* | l*)                       # Landscape, 66 lines
                PRMODE=L;
                ;;
        -p* | p*)                       # Portrait, 66 lines
                PRMODE=P;
                ;;
        esac
done
shift; shift; shift; shift; shift
if [ "X$PRMODE" = XL ]
then
        # landscape, 66 lines, 132 columns
	LJFLAGS=-L
        echo '\033&l1o66p2e5.6471c66F\033&k9.5639H\c'
elif [ "X$PRMODE" = XP ]
then
        # portrait, 66 lines, 80 columns
	LJFLAGS=
        echo '\033&lo66p2e7.6c66F\c'
fi
FILES="$*"
i=1

if [ ! -x $LJCAT ]; then
	echo "$LJCAT not found -- edit /usr/spool/lp/model/lj and fix LJCAT"
else
	while [ $i -le $COPIES ]
	do
		for file in $FILES
		do
#			$LJCAT $LJFLAGS "$file" 2>&1
			cat "$file" 2>&1
		done
		i=`expr $i + 1`
	done
fi
#echo '\033E\033&k2G\033(8U\033(sp10h12vsb3T\c'          # Internal CW Font A
#echo "$x\n$x\n$x\n$x\n$x\n$x\n$x\n$x\n"
echo '\033E\c'          # reset printer -- for use between spool files
exit 0