#!/bin/sh
N=$1
P=$2
H=$3
printer=$4
printer_des=$5
LOCALE=$7
LATIN=0

DATE_CMD="/bin/date"
CAT_CMD="/bin/cat"
ECHO_CMD="/bin/echo"

case "${LOCALE}" in
		zh_TW*|zh_HK*)
			DBCSfontname="MingMT-Light-B5pc-H"
			date=`${DATE_CMD} '+%H:%M:%S %Y-%m-%d'`
			;;
		zh*)
			DBCSfontname="MSung-Light-GBK-EUC-H"
			date=`${DATE_CMD} '+%H:%M:%S %Y-%m-%d'`
			;;
		ja*)
			DBCSfontname="HG-MinchoL-90ms-RKSJ-H"
			date=`${DATE_CMD} '+%H:%M:%S %Y-%m-%d'`
			;;
		ko*)
			DBCSfontname="MD_BatangChe"
			date=`${DATE_CMD} '+%H:%M:%S %Y-%m-%d'`
			;;
		en*)
			DBCSfontname="Intl-CG-Times-Bold"
			date=`${DATE_CMD}`
			;;
		  *)  
			DBCSfontname="Intl-CG-Times-Bold"
			date=`${DATE_CMD} '+%H:%M:%S %d-%m-%Y'`
			LATIN=1
			;;
esac

${ECHO_CMD} "%!PS"
if [ "${LATIN}" = "1" ];then
${CAT_CMD} -<<EndOfLatin
/reencodeISO { %def
    findfont dup length dict begin
    { 1 index /FID ne { def }{ pop pop } ifelse } forall
    /Encoding ISOLatin1Encoding def
    currentdict end definefont pop
} bind def
/f1 /$DBCSfontname reencodeISO
EndOfLatin
fi

${CAT_CMD} -<<EndOfBanner
/title ($N) def
/user  (${P}) def
/host  (${H}) def
/printer ($printer) def
/printer_des ($printer_des) def
/curdate ($date) def
/DBCSFTName ($DBCSfontname) def
/LatinFont {/f1 findfont 12 scalefont setfont} def
/latin $LATIN def
EndOfBanner

${CAT_CMD} -<<EndOfBanner 
%!PS-Adobe-3.0
%%Title: banner.ps
%%Version: 1.0
%%Creator: lexbe
%%CreationDate: Sep 28, 1993
%%Pages: 1
%%Copyright: Lexmark International, Inc.
%%EndComments
%%BeginProlog
/D/def load def/BD{bind D}bind D/LD{load D}BD/E/exch LD/O/pop LD/M/moveto LD
/L/lineto LD/C/curveto LD/P/closepath LD/K/stroke LD/S/show LD/G/setgray LD
/SC/scale LD/TR/translate LD/LW/setlinewidth LD/FF/findfont LD/CF/scalefont LD
/SF/setfont LD/WS{stringwidth O}BD/CS{dup WS -2 div 0 rmoveto}BD/RS{dup WS neg
0 rmoveto}BD
/MF{div dup 1 gt{1 E div currentfont E 1 matrix SC makefont SF}{O}ifelse}BD
/RR{/r E D/ry E D/rx E D/ly E D	/lx E D lx ly r add moveto lx r add ly r add r
180 270 arc rx r sub ly r add r 270 360 arc rx r sub ry r sub r 0 90 arc lx r
add ry r sub r 90 180 arc P}BD
/DL{{0.00 11.53 M 15.53 11.53 L 17.10 18.98 L 15.65 18.98 L 15.19 17.29 14.92 16.26
13.48 14.71 C 12.20 13.33 9.00 13.46 7.28 13.50 C 7.28 34.73 L 7.28 36.37 7.70
36.91 9.73 36.91 C 9.73 38.38 L 0.00 38.38 L 0.00 36.91 L 1.63 36.91 2.03 36.30
2.03 34.57 C 2.03 14.23 L 2.03 13.02 1.72 12.72 0.00 12.72 C P
16.76 11.53 M 34.29 11.55 L 35.84 17.39 L 34.25 17.39 L 32.91 14.98 30.86 13.18
24.15 13.12 C 24.15 21.30 L 28.77 21.26 29.25 19.84 29.25 17.37 C 30.78 17.37 L
30.78 26.70 L 29.23 26.70 L 29.21 24.29 28.16 23.31 24.15 23.23 C 24.15 31.07 L
29.02 31.10 L 32.03 31.10 33.46 28.25 33.46 26.32 C 34.65 26.32 L 34.65 32.96 L
16.78 32.96 L 16.76 31.43 L 18.25 31.43 18.73 30.97 18.73 29.38 C 18.73 14.84 L
18.73 13.27 18.29 12.74 16.76 12.72 C P
35.07 11.53 M 42.46 11.53 L 42.46 12.72 L 40.97 12.72 39.86 12.83 40.36 13.56 C
44.40 19.35 L 47.69 13.91 L 48.27 12.93 47.60 12.74 45.95 12.72 C 45.95 11.55 L
62.65 11.55 L 62.65 12.70 L 60.99 12.70 60.70 12.95 60.70 14.15 C 60.70 28.06 L
67.94 11.55 L 74.74 28.14 L 74.74 15.25 L 74.74 13.08 74.32 12.74 72.77 12.70 C
72.77 11.55 L 81.33 11.55 L 81.33 12.74 L 79.82 12.74 79.41 13.12 79.41 15.23 C
79.43 29.74 L 79.43 30.74 79.91 31.32 81.75 31.41 C 81.75 32.96 L 73.61 32.96 L
69.05 20.15 L 63.84 32.96 L 48.25 32.96 L 48.25 31.45 L 51.41 31.41 49.80 30.36
46.08 25.74 C 43.10 31.37 43.10 31.37 45.53 31.47 C 45.55 32.98 L 35.07 32.98 L
35.07 31.43 L 37.41 31.37 37.12 30.99 42.83 21.51 C 37.58 13.64 L 36.99 12.74
36.41 12.74 35.07 12.74 C 54.26 13.27 M 55.15 11.89 58.02 12.91 58.02 13.85 C
58.02 30.15 L 58.02 31.85 53.73 32.16 51.83 29.50 C 47.52 23.50 L P}exec
{109.39 31.53 M 113.68 31.41 114.96 29.67 114.96 27.20 C 114.96 24.23 113.16
22.60 109.39 22.43 C 116.00 11.55 L 131.13 11.59 L 131.13 12.70 L 129.75 12.72
128.77 13.79 128.77 14.59 C 128.77 22.56 L 135.02 14.38 L 135.84 13.31 134.94
12.70 133.45 12.72 C 133.45 11.59 L 144.00 11.59 L 144.00 12.68 L 142.56 12.72
142.43 12.74 141.91 13.39 C 133.06 24.19 L 139.46 30.80 L 140.25 31.62 140.73
31.37 142.45 31.47 C 142.45 32.98 L 134.65 32.98 L 134.65 31.39 L 136.11 31.41
136.40 31.07 135.88 30.21 C 128.77 22.60 L 128.77 29.92 L 128.77 31.12 128.98
31.41 131.15 31.41 C 131.15 32.96 L 121.04 32.96 L 121.04 31.45 L 122.95 31.45
123.37 31.37 123.37 30.01 C 123.37 14.63 L 123.37 12.64 121.59 12.35 120.54
13.87 C 114.89 21.99 L 117.66 22.41 121.53 24.98 119.81 29.13 C 118.79 31.51
114.81 32.96 112.70 32.96 C 101.94 32.91 L 101.96 31.41 L 103.36 31.39 103.97
31.24 103.97 29.99 C 103.97 14.40 L 103.97 12.26 102.02 11.72 101.08 13.94 C
98.22 20.61 98.62 19.71 92.53 34.11 C 89.45 28.14 L 95.77 14.08 L 96.42 12.66
95.22 12.74 93.86 12.76 C 93.86 11.53 L 111.67 11.53 L 111.67 12.66 L 110.75
12.68 109.39 12.53 109.39 13.81 C P}exec
{93.09 11.85 M 87.71 23.25 L 82.54 11.85 L 87.71 0.00 L P}exec}BD
%%EndProlog
%%BeginSetup
/PrintHostDomain true D
/PrintJobPath true D
%%EndSetup
%%Page: banner 1
%Set org to UL corner and scale
initgraphics clippath pathbbox newpath
3 index E TR E O E sub 580 div dup SC

/Fl//DBCSFTName FF 24 CF D/Fs//DBCSFTName FF 12 CF D

%Host,Job truncation
PrintHostDomain not{/Host Host(.)search{E O E O}if D}if
PrintJobPath not{/Job Job(/){search{O}{exit}ifelse}loop D}if

%Better screen
statusdict/resolution known{currentscreen 3 -1 roll O
statusdict/resolution get exec 300 eq{75}{85}ifelse 3 1 roll setscreen}if

%Border
0.6 G 9 -180 571 -36 18 RR 4 LW K 9 -66 M 571 -66 L 1 LW K

%COMMENT THIS NEXT SECTION OUT TO REMOVE OUR LOGO
%Logo
%gsave 146 -270 TR 2 2 SC DL 0.9 G eofill grestore
%0.9 G /Hevetica-Bold FF 6 CF SF 436 -247 M (TM) S

%Info
0 G
Fs SF
21 -54 M printer S
559 -54 M curdate RS S
latin 1 eq {LatinFont} if
290 -168 M printer_des CS S
%User,Host,Job: Scale font if necessary to fit
latin 1 ne {Fl SF host WS(@)WS user WS add add 544 MF} if
290 -96 M host CS(@)CS user CS S S S
latin 1 eq {LatinFont} if
latin 1 ne {Fl SF title WS 544 MF} if
290 -132 M title CS S
showpage
EndOfBanner
