1 #!/usr/local/plan9/bin/rc
2 if (! ~ $DEBUG '') flag x +
4 if (~ $LPCLASS *reverse*) {
17 face='FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
18 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
19 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
20 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
21 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
22 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
23 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
24 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
25 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
26 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
27 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
28 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
29 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
30 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
31 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
32 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
33 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
34 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF'
35 facedom=`{awk '{ if(match("'$LPMACHID'", $1)) {print $2; exit}}' $PLAN9/face/.machinelist}
36 if (~ $#facedom 0) facedom=$LPMACHID
38 facefile=`{awk '/^'$facedom'\/'$LPUSERID' /{print $2}' $PLAN9/face/48x48x4/.dict}
42 facefile=`{awk '/^'$facedom'\/'$LPUSERID' /{print $2}' $PLAN9/face/48x48x2/.dict}
47 facefile=`{awk '/^'$facedom'\/'$LPUSERID' /{print $2}' $PLAN9/face/48x48x1/.dict}
51 if (~ $#facefile 0) {facefile=u/unknown.1; facedepth=1}
52 facefile=$PLAN9/face/48x48x$facedepth/$facefile
54 if (! ~ $#facefile 0 1)
57 if (~ $#facefile 0 || ! test -f $facefile ) {facefile=$PLAN9/face/48x48x2/u/unknown.1; facedepth=2}
58 if (test -r $facefile ) {
61 face=`{cat $facefile |
62 sed -e 's/0x//g' -e 's/, *//g' |
63 tr 0123456789abcdef fedcba9876543210 };
65 face=`{iconv -u -c k4 $facefile |
66 dd -bs 60 -skip 1 >[2]/dev/null |
67 xd -b | sed 's/^[^ ]+ //;s/ //g' }
72 # We have to make sure the face information is set before rc sees the HERE file
73 # so the cat has to be in a separate if statement. This is an rc bug.
74 if (~ $NOHEAD '') cat <<EOF
75 %!PS-Adobe-2.0 div 112 page header - research!pg
78 erasepage initgraphics
80 /inch {72 mul} bind def
105 /Courier-Bold findfont 14 scalefont setfont
106 ($LPUSERID $DATE) show
111 translate rotate scale
113 48 48 $facedepth [48 0 0 -48 0 48] {<$face>} image
117 if (~ $NOHEAD '') switch ($LPCLASS) {
120 %% set the default papertray to be the lower tray for HP4siMX printers
121 statusdict begin defaultpapertray end 1 ne {
123 1 setdefaultpapertray
127 if (~ $NOHEAD '') cat <<EOF
128 statusdict /setduplexmode known {statusdict begin false setduplexmode end} if
129 statusdict begin /manualfeed false def end
133 0 14 14 0 94 752 prface
134 .3 180 180 -90 3.0 inch 10.2 inch prface
142 if (~ $REVFLAG '') cat