head	1.1;
access;
symbols;
locks; strict;
comment	@# @;


1.1
date	2001.02.04.16.28.12;	author alexis;	state Exp;
branches;
next	;


desc
@SIMPLE SCRIPT TO PRINT A PAGE TO A PRINTER
@


1.1
log
@Initial revision
@
text
@#!MARKER_SHELL_CMD
#shpp include ../bldcfg/paths.shpp
PATH=/bin:/usr/bin:/sbin:/usr/sbin
PROGNAME=`basename $0`
RCS_ID='$Header: /home/ahuxley/dev/newstruct/lx/bin/RCS/lx.shpp,v 1.18 2000/05/31 10:54:57 ahuxley Exp ahuxley $'
VERSION_SCHEME=rcs

main()
{
    TEXT="`date`: TEST PRINTOUT BY ${USER:-$LOGNAME}"
    LINES=60

    while [ "X$1" != X ]; do
        case $1 in
            -V) echo "$PROGNAME version $VERSION"
                exit 0 ;;
            -v) VERBOSE_LEVEL=3 ;;
            -d) [ "X$2" = X ] && usage
                VERBOSE_LEVEL=$2
                shift ;;
            -t) [ "X$2" = X ] && usage
                TEXT="$2"
                shift ;;
            -*) usage ;;
            *)  break ;;
        esac
        shift
    done

    [ "X$1" = X -o "X$2" != X ] && usage
    PRINTER=$1

    I=0
    while [ $I -lt $LINES ]; do
        echo "$TEXT"
        I=`expr $I + 1`
    done | lp -d$PRINTER
}

usage()
{
    {
         echo "Usage: $PROGNAME [ -t <text> ] <printer>"
         echo "       $PROGNAME -V"
    } >&2

    exit 1
}


#shpp include ../lib/utils.sh.shpp
#shpp include ../lib/gep.sh.shpp
@