xref: /plan9/sys/src/cmd/postscript/misc/lp.model (revision 219b2ee8daee37f4aad58d63f21287faa8e4ffdc)
1*219b2ee8SDavid du Colombier
2*219b2ee8SDavid du Colombier#       qmsps800        mac 10/22/86
3*219b2ee8SDavid du Colombier#
4*219b2ee8SDavid du ColombierLPDEST=`basename $0`
5*219b2ee8SDavid du ColombierQMS_FILE="$1"
6*219b2ee8SDavid du ColombierDATE="`date +%D`"
7*219b2ee8SDavid du ColombierTIME="`date +%T`"
8*219b2ee8SDavid du Colombierowner="$2"
9*219b2ee8SDavid du Colombiersite=`uname`
10*219b2ee8SDavid du Colombierport="`/usr/bin/lpstat -v$LPDEST | sed -e 's/.*: //'`"
11*219b2ee8SDavid du Colombierfilter_cmd="/usr/lbin/postscript/postio"
12*219b2ee8SDavid du Colombierfilter="$filter_cmd -l $port"
13*219b2ee8SDavid du Colombierlandscape="" formsperpage=""
14*219b2ee8SDavid du Colombierpath=/usr/lbin/postscript
15*219b2ee8SDavid du Colombierprinter=postprint
16*219b2ee8SDavid du Colombierbannerflag=ON
17*219b2ee8SDavid du Colombierprev="| $path/postreverse"
18*219b2ee8SDavid du Colombier
19*219b2ee8SDavid du Colombierfor i in $5
20*219b2ee8SDavid du Colombierdo
21*219b2ee8SDavid du Colombier        case "$i" in
22*219b2ee8SDavid du Colombier                L2)
23*219b2ee8SDavid du Colombier                        formsperpage="-n2"
24*219b2ee8SDavid du Colombier                        ;;
25*219b2ee8SDavid du Colombier                land)
26*219b2ee8SDavid du Colombier                        landscape="-pland"
27*219b2ee8SDavid du Colombier                        ;;
28*219b2ee8SDavid du Colombier                dpost|postprint|posttek|postbgi|postdmd|postio)
29*219b2ee8SDavid du Colombier                        printer="$i"
30*219b2ee8SDavid du Colombier                        ;;
31*219b2ee8SDavid du Colombier
32*219b2ee8SDavid du Colombier                postreverse)
33*219b2ee8SDavid du Colombier                        prev=""
34*219b2ee8SDavid du Colombier                        ;;
35*219b2ee8SDavid du Colombier                nobanner)
36*219b2ee8SDavid du Colombier                        bannerflag=OFF
37*219b2ee8SDavid du Colombier                        ;;
38*219b2ee8SDavid du Colombier                F*)
39*219b2ee8SDavid du Colombier                        QMS_FILE="`expr $i : 'F\(.*\)'`"
40*219b2ee8SDavid du Colombier                        ;;
41*219b2ee8SDavid du Colombier        esac
42*219b2ee8SDavid du Colombierdone
43*219b2ee8SDavid du Colombier
44*219b2ee8SDavid du Colombierif [ -n "$filter_cmd" -a ! -x "$filter_cmd" ]
45*219b2ee8SDavid du Colombierthen
46*219b2ee8SDavid du Colombier        disable -r"can't execute filter: $filter_cmd" $LPDEST
47*219b2ee8SDavid du Colombier        exit 1
48*219b2ee8SDavid du Colombierfi
49*219b2ee8SDavid du Colombier
50*219b2ee8SDavid du Colombiershift; shift; shift; shift; shift
51*219b2ee8SDavid du Colombierfiles="$*"
52*219b2ee8SDavid du Colombiercp /usr/spool/lp/model/banner.ps /tmp/ban.$$
53*219b2ee8SDavid du Colombierecho "($QMS_FILE) ($LPDEST) ($TIME) ($DATE) ($owner) banner" >> /tmp/ban.$$
54*219b2ee8SDavid du Colombierif [ "$printer" = "postio" ]
55*219b2ee8SDavid du Colombier        then
56*219b2ee8SDavid du Colombier        eval $filter $files 2> /dev/null
57*219b2ee8SDavid du Colombierelse
58*219b2ee8SDavid du Colombier        eval $path/$printer $landscape $formsperpage $files $prev | $filter 2> /dev/null
59*219b2ee8SDavid du Colombier        fi
60*219b2ee8SDavid du Colombierif [ "$bannerflag" = "ON" ]
61*219b2ee8SDavid du Colombier        then
62*219b2ee8SDavid du Colombier        eval $filter /tmp/ban.$$ 2> /dev/null
63*219b2ee8SDavid du Colombier        fi
64*219b2ee8SDavid du Colombierrm -f /tmp/ban.$$
65*219b2ee8SDavid du Colombierexit 0
66*219b2ee8SDavid du Colombier
67