|
DataMuseum.dkPresents historical artifacts from the history of: Regnecentalen RC-900 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Regnecentalen RC-900 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 814 (0x32e) Types: TextFile Notes: Uncompressed file
└─⟦5a9f1bdbd⟧ Bits:30004698 RC900 Environment Rel. 2.0 (5.25 inch) └─⟦5a9f1bdbd⟧ UNIX Filesystem └─⟦537909165⟧ »RCENV.ISC/new/usr/spool/lp/model/rcdumb.Z« └─⟦de58d8f44⟧ Bits:30004699 RC900 Environment Rel. 2.0 (3.5 inch) └─⟦de58d8f44⟧ UNIX Filesystem └─⟦537909165⟧ »RCENV.ISC/new/usr/spool/lp/model/rcdumb.Z« └─⟦this⟧
#ident @(#)rcdumb.sh 1.1, RC International, 91/09/03 # lp interface for dumb text line printer # Header=Yes for i in $5 do case "$i" in nobanner | h | H) Header=No;; *) ;; esac done 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`\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"` ] && continue [ "`tail -2c $file`" = `echo "\014\015\c"` ] && continue echo "\014\c" done i=`expr $i + 1` done #FILT-CMD