*BSD News Article 9907


Return to BSD News archive

Received: by minnie.vk1xwt.ampr.org with NNTP
	id AA6785 ; Fri, 15 Jan 93 10:33:15 EST
Xref: sserve comp.unix.bsd:9964 alt.sources:4988
Path: sserve!manuel.anu.edu.au!munnari.oz.au!sgiblab!zaphod.mps.ohio-state.edu!usc!sol.ctr.columbia.edu!ira.uka.de!Germany.EU.net!hcshh!hm
From: hm@hcshh.hcs.de (Hellmuth Michaelis)
Newsgroups: comp.unix.bsd,alt.sources
Subject: [386BSD] pcvt 2.00 - VT220 console driver (part 06/11)
Summary: 386BSD 0.1 VT220 console device driver source code
Keywords: 386BSD console driver VT220
Message-ID: <1622@hcshh.hcs.de>
Date: 15 Jan 93 13:02:37 GMT
Followup-To: comp.unix.bsd
Organization: HCS GmbH, Hamburg, Europe
Lines: 1545

Submitted-by: hm@hcshh.hcs.de (Hellmuth Michaelis)
Archive-name: pcvt-2.00/part06

---- Cut Here and unpack ----
#!/bin/sh
# This is part 06 of pcvt-2.00
if touch 2>&1 | fgrep '[-amc]' > /dev/null
 then TOUCH=touch
 else TOUCH=true
fi
# ============= Support/fonts/vt100sg.814.uu ==============
if test X"$1" != X"-c" -a -f 'Support/fonts/vt100sg.814.uu'; then
	echo "File already exists: skipping 'Support/fonts/vt100sg.814.uu'"
else
echo "x - extracting Support/fonts/vt100sg.814.uu (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/fonts/vt100sg.814.uu &&
Xbegin 660 vt100sg.814
XM`$1D5$Q$`"`@("`^````/$`X!'@`(B(^(B(````\0#@$>``B%`@4(@```'Q`
XM>$!\`"(4"!0B````?$!X0'P`/@@("`@```!\0'A`?``<(B(J'`(``#A$?$1$
XM`"0H,"@D````>$1X1'@`("`@(#X```!X1'A$>``>(!P"/````$1$?$1$`#X(
XM"`@(````0$!`0'P`/B`\("````!$1$0H$``^"`@("````'Q`>$!``#X@/"`@
XM````/$!`0#P`/"(\)"(````\0#@$>``<(B(B'````#Q`.`1X`!P("`@<````
XM>$1$1'@`("`@(#X```!X1$1$>``$#`0$#@```'A$1$1X`!PB#!`^````>$1$
XM1'@`'`(,`AP```!X1$1$>``$"!(^`@```$1D5$Q$`"(D."0B````/$`X!'@`
XM(A0("`@```!\0'A`?``\(CPB/````#Q`0$`\`"(R*B8B````?$!X0'P`(C8J
XM(B(````\0#@$>``B(B(B'````'Q`>$!\`!X@("`>````?$!X0$``'B`<`CP`
XM```\0$Q$/``>(!P"/````'A$>$A$`!X@'`(\````1$1$1#@`'B`<`CP`````
XM```````````````````8/#P\&!@`&!@`````8V-C(@``````````````-C9_
XM-C8V?S8V````#`P^8V%@/@-#8SX,#```````86,&#!@S8P``````'#8V'#MN
XM9F8[`````#`P,&````````````````P8,#`P,#`8#```````&`P&!@8&!@P8
XM`````````&8\_SQF```````````8&!C_&!@8````````````````&!@8,```
XM````````_P`````````````````````8&````````0,&#!@P8$`````````^
XM8V=O>W-C8SX```````P</`P,#`P,/P``````/F,#!@P8,&-_```````^8P,#
XM'@,#8SX```````8.'C9F?P8&#P``````?V!@8'X#`V,^```````<,&!@?F-C
XM8SX``````']C`P8,&!@8&```````/F-C8SYC8V,^```````^8V-C/P,#!CP`
XM```````8&````!@8`````````!@8````&!@P```````&#!@P8#`8#`8`````
XM`````'X``'X`````````8#`8#`8,&#!@```````^8V,&#`P`#`P``````#YC
XM8V]O;VY@/@``````"!PV8V-_8V-C``````!^,S,S/C,S,WX``````!XS86!@
XM8&$S'@``````?#8S,S,S,S9\``````!_,3$T/#0Q,7\``````'\Q,30\-#`P
XM>```````'C-A8&!O8S,=``````!C8V-C?V-C8V,``````#P8&!@8&!@8/```
XM````#P8&!@8&9F8\``````!S,S8V/#8V,W,``````'@P,#`P,#$Q?P``````
XMP^?_V\/#P\/#``````!C<WM_;V=C8V,``````!PV8V-C8V,V'```````?C,S
XM,SXP,#!X```````^8V-C8VMO/@8'`````'XS,S,^-C,S<P``````/F-C,!P&
XM8V,^``````#_F9D8&!@8&#P``````&-C8V-C8V-C/@``````P\/#P\/#9CP8
XM``````##P\/#V]O_9F8``````,/#9CP8/&;#PP``````P\/#9CP8&!@\````
XM``#_@X8,&#!AP?\``````#PP,#`P,#`P/```````0&!P.!P.!P,!```````\
XM#`P,#`P,##P````('#9C```````````````````````````````````0.'S^
XM_GPX$```````_H*"_H*"_H*"_@````!$1'Q$1``^"`@("````'Q`>$!\`#X@
XM."`@````/$!`0#P`/"(\)"(```!`0$!`?``^(#P@(````'#8V'``````````
XM`````#`P,/PP,#``_`````!$9%1,1``@("`@/@```$1$1"@0`#X("`@(```8
XM&!@8&!@8^`````````````````#X&!@8&!@8`````````!\8&!@8&!@8&!@8
XM&!@8'P```````!@8&!@8&!C_&!@8&!@8``#_````````````````````_P``
XM`````````````````/\```````````````````#_````````````````````
XM_P```!@8&!@8&!@?&!@8&!@8&!@8&!@8&/@8&!@8&!@8&!@8&!@8_P``````
XM``````````#_&!@8&!@8&!@8&!@8&!@8&!@8&!@``!@P8,!@,!@`_```````
XM8#`8#!@P8`#\`````````/YL;&QL;&P````````"!'X($'X@0``````X;&1@
XM\&!@8.;\`````````````!@`````````J@"J`*H`J@"J`*H`J@``````````
XM````````````````````````````````````````````````````````````
XM````````````````````````````````````````````````````````````
XM````````````````````````````````````````````````````````````
XM````````````````````````````````````````````````````````````
XM````````````````````````````````````````````````````````````
XM````````````````````````````````````````````````````````````
XM````````````````````````````````````````````````````````````
XM````````````````````````````````````````````````````````````
XM````````````````````````````````````````````````````````````
XM````````````````````````````````````````````````````````````
XM````````&!@`&!@\/#P8``````@(?LC(R,A^"`@`````.&QD8/!@8&#F_```
XM``````````````````````#&;#@0$/X0$!````````````````````````!\
XMQF`X;,;&;#@,QGP```"!F3QF9F8\F8$``````'R"FJ*BHIJ"?``````\;&P^
XM`'X``````````````#9LV&PV````````````````````````````````````
XM```````````````````````````````````````````````````\)"0\````
XM````````&!A^&!@`?@```````'S&!@0,&##&_@``````?,8&!CP&!L9\````
XM````````````````````````9F9F9GQ@8,``````?O3T]'04%!04````````
XM```8&```````````````````````````````"!@X&!@8&!A^`````#AL;#@`
XM?```````````````V&PV;-@```````#`P,;,V#!FSIH^!@8``,#`QLS8,&#<
XMA@P8/@``````-FS8;#8`````````,#``,#!@QL9\````,!@`$#ALQL;^QL8`
XM```,&``0.&S&QO[&Q@```!!LQA`X;,;&_L;&````=MP`$#ALQL;^QL8`````
XMQL80.&S&QO[&Q@```#AL.``X;,;&_L;&```````^;,S,_LS,S,X``````#QF
XMPL#`PF8\#`9\`#`8#`#^8F!\8&+^````&#!@`/YB8'Q@8OX````0;,8`_F)@
XM?&!B_@````#&Q@#^8F!\8&+^````,!@`/!@8&!@8&#P````,&``\&!@8&!@8
XM/````#QF`#P8&!@8&!@\````9F8`/!@8&!@8&#P`````````````````````
XM`';<`,;F]O[>SL;&````8#``.&S&QL;&;#@````,&``X;,;&QL9L.````!!L
XM@CALQL;&QFPX````=MP`.&S&QL;&;#@`````QL8X;,;&QL9L.```````?LS,
XMS,[,S,Q^```````".FS.UM;F;+B```!@,!@`QL;&QL;&?`````8,&`#&QL;&
XMQL9\`````';<`,;&QL;&QGP`````QL8`QL;&QL;&?````,;&`,;&;#@0$!`X
XM`````````````````````````'S&QMS&QOS`P,````!@,!@`>`Q\S,QV````
XM`!@P8`!X#'S,S'8`````$#AL`'@,?,S,=@``````=MP`>`Q\S,QV``````#,
XMS`!X#'S,S'8`````.&PX`'@,?,S,=@````````!LNA)^D)A^`````````'C,
XMP,QX&`QX````8#`8`'S&_L#&?``````,&#``?,;^P,9\`````!`X;`!\QO[`
XMQGP``````,S,`'S&_L#&?`````#`8#``<#`P,#!X``````P8,``X&!@8&#P`
XM````,'C,`'`P,#`P>```````S,P`<#`P,#!X````````````````````````
XM`';<`-QF9F9F9@````!@,!@`?,;&QL9\`````!@P8`!\QL;&QGP`````.&S&
XM`'S&QL;&?```````=MP`?,;&QL9\``````#&Q@!\QL;&QGP``````````'R2
XMDIR0?@````````)\SM;6YGR``````&`P&`#,S,S,S'8`````&#!@`,S,S,S,
XM=@`````P>,P`S,S,S,QV``````#,S`#,S,S,S'8``````,;&`,;&QL9^!@QX
X=````````````````````````````````````````
X`
Xend
SHAR_EOF
$TOUCH -am 0112125693 Support/fonts/vt100sg.814.uu &&
chmod 0640 Support/fonts/vt100sg.814.uu ||
echo "restore of Support/fonts/vt100sg.814.uu failed"
set `wc -c Support/fonts/vt100sg.814.uu`;Wc_c=$1
if test "$Wc_c" != "4968"; then
	echo original size 4968, current size $Wc_c
fi
fi
# ============= Support/fonts/Makefile ==============
if test X"$1" != X"-c" -a -f 'Support/fonts/Makefile'; then
	echo "File already exists: skipping 'Support/fonts/Makefile'"
else
echo "x - extracting Support/fonts/Makefile (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/fonts/Makefile &&
XFONTS	= vt100pc.814 vt100sg.814 vt220l.814 vt220h.814 vt220l.808\
X	  vt220h.808 vt220l.816 vt220h.816 vt220l.810 vt220h.810
XLIBMODE= 644
XLIBOWN=	bin
XLIBGRP=	bin
X
Xall: $(FONTS)
X
XCLEANFILES= ${FONTS}
X
Xinstall: ${FONTS}
X	-mkdir ${FONTDIR}
X	@for i in ${FONTS}; do \
X		echo "installing font $$i into ${FONTDIR}"; \
X		install -c -m ${LIBMODE} -o ${LIBOWN} -g ${LIBGRP} \
X		$$i ${FONTDIR}; \
X	done
X
X.SUFFIXES: .uu
X
X.uu:
X	uudecode ${.IMPSRC}
X
Xclean:
X	rm -f ${CLEANFILES}
X
X.include <${.CURDIR}/../Makefile.inc>
SHAR_EOF
$TOUCH -am 0113141293 Support/fonts/Makefile &&
chmod 0660 Support/fonts/Makefile ||
echo "restore of Support/fonts/Makefile failed"
set `wc -c Support/fonts/Makefile`;Wc_c=$1
if test "$Wc_c" != "502"; then
	echo original size 502, current size $Wc_c
fi
fi
# ============= Support/fonts/vt220h.808.uu ==============
if test X"$1" != X"-c" -a -f 'Support/fonts/vt220h.808.uu'; then
	echo "File already exists: skipping 'Support/fonts/vt220h.808.uu'"
else
echo "x - extracting Support/fonts/vt220h.808.uu (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/fonts/vt220h.808.uu &&
Xbegin 644 vt220h.808
XM9%1,1"`@(#X\0#@$>"(^(CQ`.`1X-@@V?$!X0'PV"#9\0'A`?#X("'Q`>'P<
XM(BH<.$1\1"PP*"1X1'A$>"`@/GA$>$1^$`P\1$1\1#X("`A`0$!\/B`\($1$
XM*!`^"`@(?$!X0#X@/"`\0$`\/"(\)CQ`.`1X'"(</$`X!'@<"!QX1$1X("`@
XM/GA$1'@$#`0.>$1X'"(,$#YX1'@<`@P"''A$1'@,$CX"9%1,(B0X)"(\0#@$
XM>"(<"'Q`>'P\(CP^/$`\(C(J)B)\0'A`?"(V*CQ`.`1X(B(<?$!X0'P>(!Y\
XM0'A`'B`>/#Q`3#P>(!X\>$1X3!X@'CQ$1#@>(!P"/'"(<(AP#!(,<(APB'`,
XM!`YPB'"(?"0(/'"(<(QB#@(<<(APC'@2/@)PB'"><!P"''"(<(YP/"(<<(AP
XMCG($"`APB'"<<APB''"(<)QR#@(<<(APB'P2'A)PB'"<<AP2''"(<(AP#A`.
XM<(APB'`<$AQPB'"><!P0'G"(<)YP'!`0<(AX"'`,$@QPB'@(<`P$#G"(>`A\
XM)`@\<(AX#&(.`AQPB'@,>!(^`G"(>!YP'`(<<(AX#G`\(AQPB'@><@0("'"(
XM>!QR'"(<<(AX''(.`AQPB'@(?!(>$G"(>!QR'!(<<(AX"'`.$`YPB'@(<!P2
XM''"(>!YP'!`><(AX'G`<$!```'S&QOS`P````,945'P8`'S&!G[&?```8+`8
XM+$V&`````!@X&!H,````_+8V-@0``'SD<.1\````PJ08*L8``$1$*"@0$```
XM$!`H*$1$``#&QL;&QGP```#\!@8&_````'[`P,!^````PD(D&"08`/Z"*#BJ
XM_@``QE14?!@\`````/YL;.X````$_@'^!````"1^@7XD````$!`H1.X`.$2"
XMJKJJ1#@``-QV`/X``/Z"Q,1H:#``&"PL1$:&_@`````VS,PV```8&`!F9@``
XM`!PT,#`PL.`!`@0($"!`@(!`(!`(!`(!`0($"!`@0/\``#\0"`0"`1@8,&`P
XM&!@8&!@,!@P8&!@```X8&!@8&!@8&!@8&`X```!P&!@8&!@8&!@8&!AP```"
XM`@(B$@H&``#NQM;6?```9F8\&'X8`%@D&"0X8`QX`!@`QL9^#'@`P,#XS/C`
XMP%`@4`P\9CP`\&!X;'A@\``.`&9F/!@\````1"@0*$0`_&9F]F9F_`#P$'(6
XM_CINP@``````&`QX&#!@````````````_@```'R"NJJRJH)\`````'@`````
XM``!X"`@``,;&``````````($?AA^($``````````_P```````/\```````#_
XM````````_P```````/\```````#N9F8L&````GS.UN9\@```?-;<T'P``/X`
XM?,;&?`#^`'@,?,QV`,P`S$AX,'@`.&P`QL;&?``<`,;&QL9\`'``QL;&QGP`
XM`CILUM9LN(``?LS.S,Q^`/XX;,;&;#@`.,8X;,9L.``.`#ALQFPX`'``.&S&
XM;#@`9@`\&!@8/``8)``\&!@\``X`/!@8&#P`<``\&!@8/`#&`/YB>&+^`#A$
XM_F)X8OX`<`#^8GAB_@#^`#ALQO[&`#AL$&S&_L8`#@`X;,;^Q@!P`#ALQO[&
XM```<#!X`````````&!@````('CIB>#P$&'@,.`QX````?(*:HJ*:@GP`P]L\
XM9CS;PP``S%1@4$P``'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```
XM?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``
XM,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&
XM8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#``
XM`'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P
XM`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\
XMQF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P
XM``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@
XM,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```
XM?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``
XM,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&
XM8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#``
XM`'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P
XM`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\
XMQF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P
XM``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@
XM,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```
X7?,9@,``P``!\QF`P`#```'S&8#``,`!@
X`
Xend
SHAR_EOF
$TOUCH -am 0112125693 Support/fonts/vt220h.808.uu &&
chmod 0640 Support/fonts/vt220h.808.uu ||
echo "restore of Support/fonts/vt220h.808.uu failed"
set `wc -c Support/fonts/vt220h.808.uu`;Wc_c=$1
if test "$Wc_c" != "2851"; then
	echo original size 2851, current size $Wc_c
fi
fi
# ============= Support/fonts/vt220l.810.uu ==============
if test X"$1" != X"-c" -a -f 'Support/fonts/vt220l.810.uu'; then
	echo "File already exists: skipping 'Support/fonts/vt220l.810.uu'"
else
echo "x - extracting Support/fonts/vt220l.810.uu (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/fonts/vt220l.810.uu &&
Xbegin 644 vt220l.810
XM`````````````'Z!I:6!@;V9@7Y^_]O;___#Y_]^;/[^?'PX.!`0````$#A\
XM_GPX$``X?'PX?/[^?#A\$!`X.'S^_GPX?````!@\/!@```#____GP\/G____
XM```\9D)"9CP``/__PYF]O9G#__\`#P</?<S,S'@``#QF9F8\&'X8`#\S/S`P
XM,'#PX`!_8W]C8V-GYL```-M^/.?G/'[;````@.#X_OC@@`````(./OX^#@(`
XM&!@\?A@8?CP8&&9F9F9F9@!F9@!_V]O;>QL;&QL`/&8P;,9L&,QX````````
XM?GY^?@`8&#Q^&!A^/!C_&!@\/'X8&!@8&!@8&!@8?CP\&!@`````&`S^#!@`
XM`````#!@_F`P``````#`P,#`_@``````)&;_9B0``!@8/#Q^?O__``#__WY^
XM/#P8&```````````````,'AX>#`P`#`P`&QL;"@```````!L;/YL;&S^;&P`
XM&'[8V'PV-OPP`,;,#!@X,&!FQ@`X;&PX,';<S'8`X.!@8,````````P8,#`P
XM,#`8#`!@,!@8&!@8,&````#&;#C^.&S&`````#`P_#`P````````<'`P,&``
XM``````#^```````````````P,```#`P8&#`P8&``?,;.WM;VYL9\`#!P,#`P
XM,#`P_`!\QL8&##A@QOX`?,;&!CP&QL9\``P,'#QLS/X,'@#^P,#\!@8&QGP`
XM'#!@P/S&QL9\`/[&!@P,&!@8&`!\QL;&?,;&QGP`?,;&QGX&#!AP`````#`P
XM```P,````#`P```P,&`````8,&#`8#`8``````#\``#\`````&`P&`P8,&``
XM?,;&!@P8&``8`'S&SMK6WL#&?``X?,;&QO[&QL8`_&9F9GQF9F;\`#QFP,#`
XMP,!F/`#X;&9F9F9F;/@`_F)@:'AH8&+^`/YB8&AX:&!@\``\9L#`P,[&9CP`
XMQL;&QO[&QL;&`#P8&!@8&!@8/``>#`P,#`S,S'@`YF9L;'AL;&;F`/!@8&!@
XM8&)F_@#&[O[^UL;&QL8`QN;F]M[.SL;&`#ALQL;&QL9L.`#\9F9F?&!@8/``
XM?,;&QL;&SGP.`/QF9F9X;&QFY@!\QL!@.`P&QGP`?EH8&!@8&!@\`,;&QL;&
XMQL;&?`!F9F9F9F9F/!@`QL;&QL;6_N[&`,;&;#@0.&S&Q@#,S,S,>#`P,'@`
XM_L:,&#!@PL;^`!X8&!@8&!@8'@``8&`P,!@8#`P`\#`P,#`P,##P`!`X;,8`
XM``````````````````#_,#`8`````````````'@,?,S,=@#@8&!\9F9F9MP`
XM````?,;`P,9\`!P,#'S,S,S,=@````!\QO[`P'P`.&Q@\&!@8&#P`````';,
XMS'P,#/C@8&!L=F9F9N8`,#``<#`P,#!X``P,``P,#`S,S'C@8&!F;'AX;.8`
XM<#`P,#`P,#!X`````,S^_M;6U@````#<YL;&QL8`````?,;&QL9\`````-QF
XM9F9\8/````!VS,S,?`P>````W'9F8&#P`````'S&<!S&?``@8&#\8&!@;#``
XM````S,S,S,QV`````,;&QL9L.`````#&UM;^_FP`````QFPX.&S&`````,;&
XMQGX&!OP```#^C!@P8OX`#A@8&'`8&!@.`!@8&!@`&!@8&`#@,#`P'#`P,.``
XM=MP``````````````!`X;,;&_@!\QL#`P,9\#`8\`,P`S,S,S,QV```.`'S&
XM_L#`?``\9@`\!CYF9C\``,P`>`Q\S,QV``!P`'@,?,S,=@`P,`!X#'S,S'8`
XM````?L#`P'X&/#QF`#QF?F!@/`#,``!\QO[`P'P``'``?,;^P,!\``#,`'`P
XM,#`P>``X;``X&!@8&#P``.``<#`P,#!X`,8`.&S&_L;&Q@`P,`!XS/S,S,P`
XM'`#\8&!X8&#\`````'X;?MC8?P`^;,S,_LS,S,X`.&P`?,;&QL9\``#&`'S&
XMQL;&?```<`!\QL;&QGP`>,P`S,S,S,QV``!P`,S,S,S,=@``Q@#&QL9^!@;\
XMQCALQL;&QFPX`,8`QL;&QL;&?``8&'[`P,#`?A@8.&QD8/A@8.;\`,S,>##\
XM,/PP,`#XS,S,^L;/QL<`#AL8&#P8&!C8<``<`'@,?,S,=@``.`!P,#`P,'@`
XM`!P`?,;&QL9\```<`,S,S,S,=@!P_AP`W.;&QL8`_@#&YO;^WL[&`#QL;&P^
XM`'X````X;&QL.`!\````,``P,&#`QL9\``````#^P,``````````_@8&````
XMP\;,V#Y[PP8,#\/&S-DS9\T/`P,8&``8&#P\/!@`````,V;,9C,``````,QF
XM,V;,```BB"*((H@BB"*(5:I5JE6J5:I5JMMWV^[;=]ONVW<8&!@8&!@8&!@8
XM&!@8&!CX&!@8&!@8&/@8^!@8&!@V-C8V-O8V-C8V``````#^-C8V-@```/@8
XM^!@8&!@V-C;V!O8V-C8V-C8V-C8V-C8V-@```/X&]C8V-C8V-C;V!OX`````
XM-C8V-C;^`````!@8&/@8^````````````/@8&!@8&!@8&!@?`````!@8&!@8
XM_P```````````/\8&!@8&!@8&!@?&!@8&```````_P`````8&!@8&/\8&!@8
XM&!@8'Q@?&!@8&#8V-C8V-S8V-C8V-C8W,#\`````````/S`W-C8V-C8V-O<`
XM_P````````#_`/<V-C8V-C8V-S`W-C8V-@```/\`_P`````V-C;W`/<V-C8V
XM&!@8_P#_`````#8V-C8V_P````````#_`/\8&!@8``````#_-C8V-C8V-C8V
XM/P`````8&!@?&!\`````````'Q@?&!@8&```````/S8V-C8V-C8V-O\V-C8V
XM&!@8_QC_&!@8&!@8&!@8^````````````!\8&!@8_____________P``````
XM_______P\/#P\/#P\/#P#P\/#P\/#P\/#_______``````````!VW-C,W'8`
XM`'S&QMS&QMS`P/YF9&!@8&!@\`#^;&QL;&QL;.X`_L9@,!@P8,;^`````'_,
XMS,S,>`````!F9F9V;&#`````=MP8&!@8`#P8?MO;VWX8/``X;,;&_L;&;#@`
XM.&S&QL9L;&SN`!PR,!A\S,S,>`````!VV]O;;@```P9\S]O;\SY@P```'#!@
XM?&`P'````'S&QL;&QL8`````_@#^`/X`````,##\,#``_`!@,!@,&#!@`/X`
XM#!@P8#`8#`#^``X;&Q@8&!@8&!@8&!@8&!@8V-AP```P,`#\`#`P`````';<
XM`';<```X;&QL.````````````!@8````````````&``````/#`P,[&QL-#P<
XH>&QL;&QL`````'#8&'#`^``````````\/#P\`````````````````&QL
X`
Xend
SHAR_EOF
$TOUCH -am 0112125693 Support/fonts/vt220l.810.uu &&
chmod 0640 Support/fonts/vt220l.810.uu ||
echo "restore of Support/fonts/vt220l.810.uu failed"
set `wc -c Support/fonts/vt220l.810.uu`;Wc_c=$1
if test "$Wc_c" != "3557"; then
	echo original size 3557, current size $Wc_c
fi
fi
# ============= Support/fonts/vt220h.810.uu ==============
if test X"$1" != X"-c" -a -f 'Support/fonts/vt220h.810.uu'; then
	echo "File already exists: skipping 'Support/fonts/vt220h.810.uu'"
else
echo "x - extracting Support/fonts/vt220h.810.uu (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/fonts/vt220h.810.uu &&
Xbegin 644 vt220h.810
XM1&143$0@("`@/CQ`.`1X(B(^(B(\0#@$>"(4"!0B?$!X0'PB%`@4(GQ`>$!\
XM/@@("`A\0'A`?!PB(BH<.$1\1$0D*#`H)'A$>$1X("`@(#YX1'A$>!X@'`(\
XM1$1\1$0^"`@("$!`0$!\/B`\("!$1$0H$#X("`@(?$!X0$`^(#P@(#Q`0$`\
XM/"(\)"(\0#@$>!PB(B(</$`X!'@<"`@(''A$1$1X("`@(#YX1$1$>`0,!`0.
XM>$1$1'@<(@P0/GA$1$1X'`(,`AQX1$1$>`0($CX"1&143$0B)#@D(CQ`.`1X
XM(A0("`A\0'A`?#PB/"(\/$!`0#PB,BHF(GQ`>$!\(C8J(B(\0#@$>"(B(B(<
XM?$!X0'P>("`@'GQ`>$!`'B`<`CP\0$Q$/!X@'`(\>$1X2$0>(!P"/$1$1$0X
XM'B`<`CQPB'"(<`P2$A(,<(APB'`$#`0$#G"(<(AP'"(,$#YPB'"(<!P"#`(<
XM<(APB'`$"!(^`G"(<(AP'A`<`AQPB'"(<!P@/"(<<(APB'`^`@0("'"(<(AP
XM'"(<(AQPB'"(<!PB'@(<<(APB'`,$AX2$G"(<(AP'!(<$AQPB'"(<`X0$!`.
XM<(APB'`<$A(2''"(<(AP'A`<$!YPB'"(<!X0'!`0<(AX"'`,$A(2#'"(>`AP
XM!`P$!`YPB'@(<!PB#!`^<(AX"'`<`@P"''"(>`AP!`@2/@)PB'@(<!X0'`(<
XM<(AX"'`<(!PB''"(>`AP/@($"`APB'@(<!PB'"(<<(AX"'`<(AX"''"(>`AP
XM#!(>$A)PB'@(<!P2'!(<<(AX"'`.$!`0#G"(>`AP'!(2$AQPB'@(<!X0'!`>
XM<(AX"'`>$!P0$```?,;&QOS`P,````#&5%14?!@8`'S&!@9^QL9\``!@L#`8
XM&"Q-A@`````8.!@8&!H,````_+8V-C8&!`````!\Y'#D?`````#"I!@8*L8`
XM``""@D1$*"@0$```$!`H*$1$@H(``,;&QL;&QGP`````_`8&!@;\`````'[`
XMP,#`?@```,)")!@8)!@```#^@B@X*(+^``#&5%14?#@0.````/YL;&QL;.X`
XM````!/X!_@0``````"1^@7XD`````!`0*"A$1.X``#A$@JJZJH)$.````-QV
XM`/X``````/Z"Q,1H:#```!@8+"Q$1H;^```````V2$@V`````!@8``!F9@``
XM`!PT,#`P,+#@```!`@0($"!`@```@$`@$`@$`@$```$"!`@0($#_`````#\0
XM"`0"`0`8&!@P8#`8&!@8&!@8#`8,&!@8&```#A@8&!@8&!@8&!@8&!@8&`X`
XM``!P&!@8&!@8&!@8&!@8&!@8<`````("`B(2"@8``````.[&UM9\``!F9CP8
XM&'X8&`!8)!@8)#A@>`1X`!@P`,;&QGX,>`#`P/C,S/C`P```4"!0&`P\9F8\
XM`/!@>&QX8&#P``8,`&9F/!@8/`````!$*!`H1````/QF9O9F9F;\`/`0<!;N
XM&C9JSH(`````````&`QX&#!@````````````````_@``````?(*ZJKJRJH)\
XM``````!X``````````!X"`@```#&Q@````````````($?@@0?B!`````````
XM`````/\`````````_P````````#_`````````/\`````````_P``````````
XM````[FYF9BP8```"?,[6UN9\@`````!\UM;<T'P``';<`'S&QL9\`';<`'@,
XM?,S,=@#,`,S,2'@P,'@`.&P`QL;&QL9\``P8`,;&QL;&?``P&`#&QL;&QGP`
XM`CILSM;F;+B```!^S,S.S,S,?@!VS#ALQL;&;#@`.,8X;,;&QFPX``X`.&S&
XMQL9L.`!P`#ALQL;&;#@`9@`\&!@8&!@\`!@D`#P8&!@8/``,&``\&!@8&#P`
XM,!@`/!@8&!@\`,8`_F9B>&!B_@`X;`#^8GA@8OX`,!@`_F)X8&+^`';<`!`X
XM;,;^Q@`X;``0.&S&_L8`#!@`$#ALQO[&`&`P`!`X;,;^Q@``#!P,#!X`````
XM`````!@8```````('CID8'@\!!@`>`PX#'@``````'R"FJ*BHIJ"?`##VSQF
XM9CS;PP``````S%1@4$P``'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#``
XM`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@
XM,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#``
XM`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@
XM,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#``
XM`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@
XM,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#``
XM`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@
XM,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#``
XM`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@
XM,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#``
XM`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@
XM,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#``
XM`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@
XM,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#``
XM`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@
XM,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#``
XM`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@
XM,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#``
XM`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@
XM,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#``
XH`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P`#`P
X`
Xend
SHAR_EOF
$TOUCH -am 0112125693 Support/fonts/vt220h.810.uu &&
chmod 0640 Support/fonts/vt220h.810.uu ||
echo "restore of Support/fonts/vt220h.810.uu failed"
set `wc -c Support/fonts/vt220h.810.uu`;Wc_c=$1
if test "$Wc_c" != "3557"; then
	echo original size 3557, current size $Wc_c
fi
fi
# ============= Support/fonts/vt220l.808.uu ==============
if test X"$1" != X"-c" -a -f 'Support/fonts/vt220l.808.uu'; then
	echo "File already exists: skipping 'Support/fonts/vt220l.808.uu'"
else
echo "x - extracting Support/fonts/vt220l.808.uu (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/fonts/vt220l.808.uu &&
Xbegin 660 vt220l.808
XM``````````!^@:6!O9F!?G[_V__#Y_]^;/[^_GPX$``0.'S^?#@0`#A\./[^
XMUA`X$#A\_OY\$#@``!@\/!@``/__Y\/#Y___/&;#P\/#9CS_PYF]O9G#_Q\'
XM#7G-S,QX/&9F9CP8?A@X/#8R-'#PX']C?V-C9^;`&-L\Y^<\VQB`X/C^^."`
XM``(./OX^#@(`&#Q^&!A^/!AF9F9F9@!F`'_;VWL;&QL`?L/\9F8_PWX``'Y^
XM?@```!@\?AA^/!C_&#Q^&!@8&``8&!@8?CP8```8#/X,&````#!@_F`P````
XM`&!@8'X````D9O]F)````!`X?/[^````_OY\.!``````````````&#P\&!@`
XM&`!L;&P``````&QL_FS^;&P`,'S`?`;\,```QLP8,&;&`#AL.';<SGL`8&#`
XM```````8,&!@8#`8`#`8#`P,&#```&PX_CAL````,##\,#``````````,#!@
XM````_````````````!@8``8,&#!@P(``?,[>]N;&?``P<+`P,##\`'C,##A@
XMP/P`>,P,.`S,>``</&S,_@P>`/S`^`P,S'@`>,S`^,S,>`#\S`P8,#`P`'C,
XMS'C,S'@`>,S,?`S,>```,#```#`P```P,```,#!@&#!@P&`P&````'X``'X`
XM`#`8#`8,&#``/&8&#!@`&`!\QM[>WL!^`#!XS,S\S,P`_&9F?&9F_``\9L#`
XMP&8\`/AL9F9F;/@`_F)H>&AB_@#^8FAX:&#P`#QFP,#.9CX`S,S,_,S,S`!X
XM,#`P,#!X`!X,#`S,S'@`YFQX<'ALY@#P8&!@8F;^`,;N_M;&QL8`QN;VWL[&
XMQ@`X;,;&QFPX`/QF9GQ@8/``>,S,S-QX'`#\9F9\;&;F`'C,P'@,S'@`_+0P
XM,#`P>`#,S,S,S,QX`,S,S,S,>#``QL;&UO[^Q@#&QFPX.&S&`,S,S'@P,'@`
XM_,R8,&3,_`!X8&!@8&!X`,!@,!@,!@(`>!@8&!@8>``0.&S&````````````
XM``#_,#`8`````````'@,?,QV`.!@8'QF9OP```!XS,#,>``<#`Q\S,Q^````
XM>,S\P'@`.&Q@^&!@\````';,S'P,^.!@;'9F9N8`,`!P,#`P>``,`!P,#,S,
XM>.!@9FQX;.8`<#`P,#`P>````,S^_M;&````^,S,S,P```!XS,S,>````-QF
XM9GQ@\```=LS,?`P>``#<=F!@\````'S`?`;\`!`P?#`P-AP```#,S,S,=@``
XM`,;&QGPX````QM;^_FP```#&;#ALQ@```,S,S'P,^```_)@P9/P`'#`PX#`P
XM'``8&!@`&!@8`.`P,!PP,.``=MP````````0.&QLQL;^`'C,P,QX&`QX`,P`
XMS,S,?@`<`'C,_,!X`'[#/`8^9C\`S`!X#'S,?@#@`'@,?,Q^`#`P>`Q\S'X`
XM``!XP,!X##A^PSQF?F`\`,P`>,S\P'@`X`!XS/S`>`#,`'`P,#!X`'S&.!@8
XM&#P`X`!P,#`P>`#&.&S&_L;&`#`P`'C,_,P`'`#\8'A@_````'\,?\Q_`#YL
XMS/[,S,X`>,P`>,S,>```S`!XS,QX``#@`'C,S'@`>,P`S,S,?@``X`#,S,Q^
XM``#,`,S,?`SXPQ@\9F8\&`#,`,S,S,QX`!@8?L#`?A@8.&QD\&#F_`#,S'C\
XM,/PP,/C,S/K&S\;'#AL8/!@8V'`<`'@,?,Q^`#@`<#`P,'@``!P`>,S,>```
XM'`#,S,Q^``#X`/C,S,P`_`#,[/S<S``\;&P^`'X``#AL;#@`?```,``P8,#,
XM>`````#\P,```````/P,#```P\;,WC-FS`_#QLS;-V_/`Q@8`!@8&!@``#-F
XMS&8S````S&8S9LP``"*((H@BB"*(5:I5JE6J5:K;=]ONVW?;[A@8&!@8&!@8
XM&!@8&/@8&!@8&/@8^!@8&#8V-C;V-C8V`````/XV-C8``/@8^!@8&#8V]@;V
XM-C8V-C8V-C8V-C8``/X&]C8V-C8V]@;^````-C8V-OX````8&/@8^```````
XM``#X&!@8&!@8&!\````8&!@8_P````````#_&!@8&!@8&!\8&!@`````_P``
XM`!@8&!C_&!@8&!@?&!\8&!@V-C8V-S8V-C8V-S`_```````_,#<V-C8V-O<`
XM_P``````_P#W-C8V-C8W,#<V-C8``/\`_P```#8V]P#W-C8V&!C_`/\````V
XM-C8V_P``````_P#_&!@8`````/\V-C8V-C8V/P```!@8'Q@?```````?&!\8
XM&!@`````/S8V-C8V-C;_-C8V&!C_&/\8&!@8&!@8^``````````?&!@8____
XM______\`````______#P\/#P\/#P#P\/#P\/#P______````````=MS(W'8`
XM`'C,^,SXP,``_,S`P,#```#^;&QL;&P`_,Q@,&#,_````'[8V-AP``!F9F9F
XM?&#``';<&!@8&`#\,'C,S'@P_#ALQO[&;#@`.&S&QFQL[@`<,!A\S,QX````
XM?MO;?@``!@Q^V]M^8,`\8,#\P&`\`'C,S,S,S,P``/P`_`#\```P,/PP,`#\
XM`&`P&#!@`/P`&#!@,!@`_``.&QL8&!@8&!@8&!@8V-AP,#``_``P,```=MP`
XM=MP``#AL;#@`````````&!@`````````&`````\,#`SL;#P<>&QL;&P```!P
X7&#!@>```````/#P\/```````````````
X`
Xend
SHAR_EOF
$TOUCH -am 0112125693 Support/fonts/vt220l.808.uu &&
chmod 0640 Support/fonts/vt220l.808.uu ||
echo "restore of Support/fonts/vt220l.808.uu failed"
set `wc -c Support/fonts/vt220l.808.uu`;Wc_c=$1
if test "$Wc_c" != "2851"; then
	echo original size 2851, current size $Wc_c
fi
fi
# ============= Support/fonts/vt220l.814.uu ==============
if test X"$1" != X"-c" -a -f 'Support/fonts/vt220l.814.uu'; then
	echo "File already exists: skipping 'Support/fonts/vt220l.814.uu'"
else
echo "x - extracting Support/fonts/vt220l.814.uu (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/fonts/vt220l.814.uu &&
Xbegin 660 vt220l.814
XM`````````````````````'Z!I8&!O9F!?@``````?O_;___#Y_]^````````
XM;/[^_OY\.!`````````0.'S^?#@0````````&#P\Y^?G&!@\```````8/'[_
XM_WX8&#P``````````!@\/!@``````/______Y\/#Y_______`````#QF0D)F
XM/`````#_____PYF]O9G#_____P``'@X:,GC,S,QX```````\9F9F/!A^&!@`
XM`````#\S/S`P,'#PX```````?V-_8V-C9^?FP``````8&-L\YSS;&!@`````
XM`(#`X/C^^.#`@````````@8./OX^#@8"```````8/'X8&!A^/!@``````&9F
XM9F9F9@!F9@``````?]O;VWL;&QL;`````'S&8#ALQL9L.`S&?```````````
XM`/[^_@``````&#Q^&!@8?CP8?@`````8/'X8&!@8&!@``````!@8&!@8&'X\
XM&``````````8#/X,&````````````#!@_F`P`````````````,#`P/X`````
XM```````H;/YL*```````````$#@X?'S^_@````````#^_GQ\.#@0````````
XM```````````````````8/#P\&!@`&!@`````9F9F)```````````````;&S^
XM;&QL_FQL````&!A\QL+`?`:&QGP8&```````PL8,&#!FQ@``````.&QL.';<
XMS,QV`````#`P,&````````````````P8,#`P,#`8#```````,!@,#`P,#!@P
XM`````````&8\_SQF````````````&!A^&!@`````````````````&!@8,```
XM````````_@`````````````````````8&````````@8,&#!@P(````````!\
XMQL[>]N;&QGP``````!@X>!@8&!@8?@``````?,8&#!@P8,;^``````!\Q@8&
XM/`8&QGP```````P</&S,_@P,'@``````_L#`P/P&!L9\```````X8,#`_,;&
XMQGP``````/[&!@P8,#`P,```````?,;&QGS&QL9\``````!\QL;&?@8&#'@`
XM```````8&````!@8`````````!@8````&!@P```````&#!@P8#`8#`8`````
XM`````'X``'X`````````8#`8#`8,&#!@``````!\QL8,&!@`&!@``````'S&
XMQM[>WMS`?```````$#ALQL;^QL;&``````#\9F9F?&9F9OP``````#QFPL#`
XMP,)F/```````^&QF9F9F9FSX``````#^9F)H>&AB9OX``````/YF8FAX:&!@
XM\```````/&;"P,#>QF8Z``````#&QL;&_L;&QL8``````#P8&!@8&!@8/```
XM````'@P,#`P,S,QX``````#F9FQL>&QL9N8``````/!@8&!@8&)F_@``````
XMQN[^_M;&QL;&``````#&YO;^WL[&QL8``````#ALQL;&QL9L.```````_&9F
XM9GQ@8&#P``````!\QL;&QM;>?`P.`````/QF9F9\;&9FY@``````?,;&8#@,
XMQL9\``````!^?EH8&!@8&#P``````,;&QL;&QL;&?```````QL;&QL;&;#@0
XM``````#&QL;&UM;^?&P``````,;&;#@X.&S&Q@``````9F9F9CP8&!@\````
XM``#^QHP8,&#"QOX``````#PP,#`P,#`P/```````@,#@<#@<#@8"```````\
XM#`P,#`P,##P````0.&S&`````````````````````````````/\`,#`8````
XM`````````````````'@,?,S,=@``````X&!@>&QF9F9\``````````!\QL#`
XMQGP``````!P,##QLS,S,=@``````````?,;^P,9\```````X;&1@\&!@8/``
XM`````````';,S,Q\#,QX````X&!@;'9F9F;F```````8&``X&!@8&#P`````
XM``8&``X&!@8&9F8\````X&!@9FQX;&;F```````X&!@8&!@8&#P`````````
XM`.S^UM;6Q@``````````W&9F9F9F``````````!\QL;&QGP``````````-QF
XM9F9\8&#P````````=LS,S'P,#!X```````#<=F9@8/```````````'S&<!S&
XM?```````$#`P_#`P,#8<``````````#,S,S,S'8``````````,;&QFPX$```
XM````````QL;6UOYL``````````#&;#@X;,8``````````,;&QL9^!@SX````
XM````_LP8,&;^```````.&!@8<!@8&`X``````!@8&!@`&!@8&```````<!@8
XM&`X8&!AP``````!VW```````````````````$#ALQL;^````````/&;"P,#"
XM9CP,!GP```#,S`#,S,S,S'8`````#!@P`'S&_L#&?``````0.&P`>`Q\S,QV
XM``````#,S`!X#'S,S'8`````8#`8`'@,?,S,=@`````X;#@`>`Q\S,QV````
XM`````#QF8&8\#`8\````$#AL`'S&_L#&?```````S,P`?,;^P,9\`````&`P
XM&`!\QO[`QGP``````&9F`#@8&!@8/``````8/&8`.!@8&!@\`````&`P&``X
XM&!@8&#P`````QL80.&S&QO[&Q@```#AL.``X;,;&_L;&````&#!@`/YF8'Q@
XM9OX`````````S'8V?MC8;@``````/FS,S/[,S,S.`````!`X;`!\QL;&QGP`
XM`````,;&`'S&QL;&?`````!@,!@`?,;&QL9\`````#!XS`#,S,S,S'8`````
XM8#`8`,S,S,S,=@``````QL8`QL;&QGX&#'@`QL8`.&S&QL;&;#@```#&Q@#&
XMQL;&QL;&?``````8&#QF8&!F/!@8`````#AL9&#P8&!@YOP``````&9F/!A^
XM&'X8&`````#XS,SXQ,S>S,S&``````X;&!@8?A@8&!C8<```&#!@`'@,?,S,
XM=@`````,&#``.!@8&!@\`````!@P8`!\QL;&QGP`````&#!@`,S,S,S,=@``
XM````=MP`W&9F9F9F````=MP`QN;V_M[.QL8`````/&QL/@!^```````````X
XM;&PX`'P````````````P,``P,&#&QGP```````````#^P,#`````````````
XM`/X&!@8``````,#`QLS8,&#<A@P8/@``P,#&S-@P9LZ>/@8&````&!@`&!@\
XM/#P8`````````#9LV&PV````````````V&PV;-@``````!%$$4011!%$$401
XM1!%$5:I5JE6J5:I5JE6J5:K==]UWW7?==]UWW7?==Q@8&!@8&!@8&!@8&!@8
XM&!@8&!@8&/@8&!@8&!@8&!@8&/@8^!@8&!@8&#8V-C8V-C;V-C8V-C8V````
XM`````/XV-C8V-C8``````/@8^!@8&!@8&#8V-C8V]@;V-C8V-C8V-C8V-C8V
XM-C8V-C8V-C8``````/X&]C8V-C8V-C8V-C8V]@;^````````-C8V-C8V-OX`
XM```````8&!@8&/@8^`````````````````#X&!@8&!@8&!@8&!@8&!\`````
XM```8&!@8&!@8_P````````````````#_&!@8&!@8&!@8&!@8&!\8&!@8&!@`
XM````````_P```````!@8&!@8&!C_&!@8&!@8&!@8&!@?&!\8&!@8&!@V-C8V
XM-C8V-S8V-C8V-C8V-C8V-S`_```````````````_,#<V-C8V-C8V-C8V-O<`
XM_P``````````````_P#W-C8V-C8V-C8V-C8W,#<V-C8V-C8``````/\`_P``
XM`````#8V-C8V]P#W-C8V-C8V&!@8&!C_`/\````````V-C8V-C8V_P``````
XM````````_P#_&!@8&!@8`````````/\V-C8V-C8V-C8V-C8V/P```````!@8
XM&!@8'Q@?```````````````?&!\8&!@8&!@`````````/S8V-C8V-C8V-C8V
XM-C;_-C8V-C8V&!@8&!C_&/\8&!@8&!@8&!@8&!@8^``````````````````?
XM&!@8&!@8__________________\`````````__________#P\/#P\/#P\/#P
XM\/#P#P\/#P\/#P\/#P\/#P__________````````````````=MS8V-QV````
XM`````'S&_,;&_,#`0````/[&QL#`P,#`P`````````#^;&QL;&QL``````#^
XMQF`P&#!@QOX``````````'[8V-C8<`````````!F9F9F?&!@P````````';<
XM&!@8&!@``````'X8/&9F9CP8?@``````.&S&QO[&QFPX```````X;,;&QFQL
XM;.X``````!XP&`P^9F9F/```````````?MO;?@`````````#!G[;V_-^8,``
XM`````!XP8&!^8&`P'@```````'S&QL;&QL;&````````_@``_@``_@``````
XM```8&'X8&```_P``````,!@,!@P8,`!^```````,&#!@,!@,`'X```````X;
XM&Q@8&!@8&!@8&!@8&!@8&!@8V-AP````````&!@`?@`8&```````````=MP`
XM=MP````````X;&PX````````````````````&!@`````````````````&```
XM```````/#`P,#`SL;#P<`````-AL;&QL;```````````<-@P8,CX````````
X=``````!\?'Q\?'P`````````````````````````
X`
Xend
SHAR_EOF
$TOUCH -am 0112125693 Support/fonts/vt220l.814.uu &&
chmod 0640 Support/fonts/vt220l.814.uu ||
echo "restore of Support/fonts/vt220l.814.uu failed"
set `wc -c Support/fonts/vt220l.814.uu`;Wc_c=$1
if test "$Wc_c" != "4967"; then
	echo original size 4967, current size $Wc_c
fi
fi
# ============= Support/fonts/vt220h.814.uu ==============
if test X"$1" != X"-c" -a -f 'Support/fonts/vt220h.814.uu'; then
	echo "File already exists: skipping 'Support/fonts/vt220h.814.uu'"
else
echo "x - extracting Support/fonts/vt220h.814.uu (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/fonts/vt220h.814.uu &&
Xbegin 660 vt220h.814
XM`$1D5$Q$`"`@("`^````/$`X!'@`(B(^(B(````\0#@$>``B%`@4(@```'Q`
XM>$!\`"(4"!0B````?$!X0'P`/@@("`@```!\0'A`?``<(B(J'`(``#A$?$1$
XM`"0H,"@D````>$1X1'@`("`@(#X```!X1'A$>``>(!P"/````$1$?$1$`#X(
XM"`@(````0$!`0'P`/B`\("````!$1$0H$``^"`@("````'Q`>$!``#X@/"`@
XM````/$!`0#P`/"(\)"(````\0#@$>``<(B(B'````#Q`.`1X`!P("`@<````
XM>$1$1'@`("`@(#X```!X1$1$>``$#`0$#@```'A$1$1X`!PB#!`^````>$1$
XM1'@`'`(,`AP```!X1$1$>``$"!(^`@```$1D5$Q$`"(D."0B````/$`X!'@`
XM(A0("`@```!\0'A`?``\(CPB/````#Q`0$`\`"(R*B8B````?$!X0'P`(C8J
XM(B(````\0#@$>``B(B(B'````'Q`>$!\`!X@("`>````?$!X0$``'B`<`CP`
XM```\0$Q$/``>(!P"/````'A$>$A$`!X@'`(\````1$1$1#@`'B`<`CP```!P
XMB'"(<``,$A(2#````'"(<(AP``0,!`0.````<(APB'``'"(,$#X```!PB'"(
XM<``<`@P"'````'"(<(AP``0($CX"````<(APB'``'A`<`AP```!PB'"(<``<
XM(#PB'````'"(<(AP`#X"!`@(````<(APB'``'"(<(AP```!PB'"(<``<(AX"
XM'````'"(<(AP``P2'A(2````<(APB'``'!(<$AP```!PB'"(<``.$!`0#@``
XM`'"(<(AP`!P2$A(<````<(APB'``'A`<$!X```!PB'"(<``>$!P0$````'"(
XM>`AP``P2$A(,````<(AX"'``!`P$!`X```!PB'@(<``<(@P0/@```'"(>`AP
XM`!P"#`(<````<(AX"'``!`@2/@(```!PB'@(<``>$!P"'````'"(>`AP`!P@
XM'"(<````<(AX"'``/@($"`@```!PB'@(<``<(APB'````'"(>`AP`!PB'@(<
XM````<(AX"'``#!(>$A(```!PB'@(<``<$AP2'````'"(>`AP``X0$!`.````
XM<(AX"'``'!(2$AP```!PB'@(<``>$!P0'@```'"(>`AP`!X0'!`0````````
XM`'S&QL;&_,#`P``````8V]O;V]M^&!@8````?,8&!G[&QGP``````,#`8#`8
XM'#9C00`````````P<#`P,#08``````````#<9F9F9F8&!@8``````'S&\,#&
XM?`````````#BMAP8.&S&````````@L;&;&PX.!`````````0.#AL;,;&@@``
XM`````,;&QL;&QL9\`````````/P&!@8&_```````````?L#`P,!^````````
XM``#&9CP8/&8\``````#^Q@!L?&P`QOX``````#P8V]O;VWX8/```````_FQL
XM;&QL;&SN````````"`S^`_X,"``````````D9G[#?F8D```````````0$"@H
XM1$3N```````\9L/G_^?#9CP``````````-QV`/X``````````/[&QLQL:#@P
XM````````&#@L;$3&QOX``````````&[8V&X````````````8&```9F8`````
XM```<-#`P,#`PL.`````````!`@0($"!`@````````(!`(!`(!`(!````````
XM``$"!`@0('\````````````_$`@$`@$``!@8&!@8,&`P&!@8&!@8&!@8&!@,
XM!@P8&!@8&!@```X8&!@8&!@8&!@8&!@8&!@8&!@8&!@.``````!P&!@8&!@8
XM&!@8&!@8&!@8&!@8&!@8<````````@("`B(2"@8"``````````!LQM;6UFP`
XM`````,S,>#`P_#`P,```````X'S@P'C`P&`X#'@```P8,`#&QL;&?@8,>```
XM`,#`^,S,^,#`P`````#8<.`P&`P^9F8\``````#P8'AL>&!@8/`````,&`#,
XMS,QX,#`P>`````````!$*!`H1`````````#\9F9F]F9F9OP```#P$'`6_!@P
XM9LZ:/@8&```````````````8#'@`&#!@``````````````````````#^````
XM````````?(*ZJKJRJH)\````````````>````````````````'@("```````
XM`,;&`````````````````````@9^"!!^8$``````````````````_P``````
XM````````_P``````````````_P``````````````_P``````````````_P``
XM``````````````````#N;F9F;#@````````&?,[>]N9\P```````````?-;6
XMW-!^``````!VW`!\QL;&QGP``````';<`'@,?,S,=@```,S,`,S,2'@P,#!X
XM````.&S&`,;&QL;&QGP````&#!@`QL;&QL;&?````&`P&`#&QL;&QL9\````
XM```&/FS.UM;F;/C``````'[,S,S.S,S,?@```';<`#ALQL;&QFPX````.&S&
XM.&S&QL;&;#@````,&``X;,;&QL9L.````&`P`#ALQL;&QFPX````9F8`/!@8
XM&!@8&#P````\9@`\&!@8&!@8/`````P8`#P8&!@8&!@\````,!@`/!@8&!@8
XM&#P```#&Q@#^9F)X8&)F_@```#ALQ@#^9F!X8&;^````,!@,`/YF8'A@9OX`
XM``!VW``0.&S&QO[&Q@```#ALQA`X;,;&_L;&````#!@`$#ALQL;^QL8````P
XM&``0.&S&QO[&Q@`````,'`P,'@`````````````````8&````````````.`\
XM8,#`P,!@.`QX```\!AP&/`````````````!\@IJBHJ*:@GP```````##VSQF
XM9CS;PP``````````YFQX;&9F``````!\QL9@,#``,#```````'S&QF`P,``P
XM,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```
XM````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````
XM?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&
XM8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P
XM`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P
XM``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P````
XM``!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\
XMQL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@
XM,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``
XM,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#``
XM`````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#``````
XM`'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&
XMQF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P
XM,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P
XM,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```
XM````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````
XM?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&
XM8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P
XM`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P
XM``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P````
XM``!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\
XMQL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@
XM,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``
XM,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#``
XM`````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#``````
XM`'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&
XMQF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P
XM,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P
XM,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```
X=````?,;&8#`P`#`P``````!\QL9@,#``,#``````
X`
Xend
SHAR_EOF
$TOUCH -am 0112125693 Support/fonts/vt220h.814.uu &&
chmod 0640 Support/fonts/vt220h.814.uu ||
echo "restore of Support/fonts/vt220h.814.uu failed"
set `wc -c Support/fonts/vt220h.814.uu`;Wc_c=$1
if test "$Wc_c" != "4967"; then
	echo original size 4967, current size $Wc_c
fi
fi
# ============= Support/fonts/vt220l.816.uu ==============
if test X"$1" != X"-c" -a -f 'Support/fonts/vt220l.816.uu'; then
	echo "File already exists: skipping 'Support/fonts/vt220l.816.uu'"
else
echo "x - extracting Support/fonts/vt220l.816.uu (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/fonts/vt220l.816.uu &&
Xbegin 660 vt220l.816
XM````````````````````````?H&E@8&]F8&!?@```````'[_V___P^?__WX`
XM`````````&S^_O[^?#@0```````````0.'S^?#@0```````````8/#SGY^<8
XM&#P`````````&#Q^__]^&!@\`````````````!@\/!@```````#________G
XMP\/G________```````\9D)"9CP``````/______PYF]O9G#______\``!X.
XM&C)XS,S,S'@````````\9F9F9CP8?A@8````````/S,_,#`P,'#PX```````
XM`']C?V-C8V-GY^;`````````&!C;/.<\VQ@8``````"`P.#P^/[X\.#`@```
XM`````@8.'C[^/AX.!@(````````8/'X8&!A^/!@`````````9F9F9F9F9@!F
XM9@```````'_;V]M[&QL;&QL``````'S&8#ALQL9L.`S&?```````````````
XM_O[^_@```````!@\?A@8&'X\&'X````````8/'X8&!@8&!@8````````&!@8
XM&!@8&'X\&````````````!@,_@P8```````````````P8/Y@,```````````
XM`````,#`P/X``````````````"AL_FPH`````````````!`X.'Q\_OX`````
XM``````#^_GQ\.#@0```````````````````````````````8/#P\&!@8`!@8
XM``````!F9F8D``````````````````!L;/YL;&S^;&P``````!@8?,;"P'P&
XMAL9\&!@```````#"Q@P8,&#&A@```````#AL;#AVW,S,S'8``````#`P,&``
XM````````````````#!@P,#`P,#`8#````````#`8#`P,#`P,&#``````````
XM``!F//\\9@``````````````&!A^&!@````````````````````8&!@P````
XM`````````'X````````````````````````8&````````````@8,&#!@P(``
XM``````!\QL;.WO;FQL9\````````&#AX&!@8&!@8?@```````'S&!@P8,&#`
XMQOX```````!\Q@8&/`8&!L9\````````#!P\;,S^#`P,'@```````/[`P,#\
XM!@8&QGP````````X8,#`_,;&QL9\````````_L8&!@P8,#`P,````````'S&
XMQL9\QL;&QGP```````!\QL;&?@8&!@QX```````````8&````!@8````````
XM````&!@````8&#``````````!@P8,&`P&`P&````````````?@``?@``````
XM``````!@,!@,!@P8,&````````!\QL8,&!@8`!@8````````?,;&QM[>WMS`
XM?````````!`X;,;&_L;&QL8```````#\9F9F?&9F9F;\````````/&;"P,#`
XMP,)F/````````/AL9F9F9F9F;/@```````#^9F)H>&A@8F;^````````_F9B
XM:'AH8&!@\````````#QFPL#`WL;&9CH```````#&QL;&_L;&QL;&````````
XM/!@8&!@8&!@8/````````!X,#`P,#,S,S'@```````#F9F9L>'AL9F;F````
XM````\&!@8&!@8&)F_@```````,;N_O[6QL;&QL8```````#&YO;^WL[&QL;&
XM````````?,;&QL;&QL;&?````````/QF9F9\8&!@8/````````!\QL;&QL;&
XMUMY\#`X`````_&9F9GQL9F9FY@```````'S&QF`X#`;&QGP```````!^?EH8
XM&!@8&!@\````````QL;&QL;&QL;&?````````,;&QL;&QL9L.!````````#&
XMQL;&UM;6_NYL````````QL9L?#@X?&S&Q@```````&9F9F8\&!@8&#P`````
XM``#^QH8,&#!@PL;^````````/#`P,#`P,#`P/`````````"`P.!P.!P.!@(`
XM```````\#`P,#`P,#`P\`````!`X;,8`````````````````````````````
XM````_P``,#`8````````````````````````>`Q\S,S,=@```````.!@8'AL
XM9F9F9GP```````````!\QL#`P,9\````````'`P,/&S,S,S,=@``````````
XM`'S&_L#`QGP````````X;&1@\&!@8&#P````````````=LS,S,S,?`S,>```
XM`.!@8&QV9F9F9N8````````8&``X&!@8&!@\````````!@8`#@8&!@8&!F9F
XM/````.!@8&9L>'AL9N8````````X&!@8&!@8&!@\````````````[/[6UM;6
XMQ@```````````-QF9F9F9F8```````````!\QL;&QL9\````````````W&9F
XM9F9F?&!@\````````';,S,S,S'P,#!X```````#<=F9@8&#P````````````
XM?,9@.`S&?````````!`P,/PP,#`P-AP```````````#,S,S,S,QV````````
XM````QL;&QFPX$````````````,;&UM;6_FP```````````#&;#@X.&S&````
XM````````QL;&QL;&?@8,^````````/[,&#!@QOX````````.&!@8<!@8&!@.
XM````````&!@8&``8&!@8&````````'`8&!@.&!@8&'````````!VW```````
XM```````````````0.&S&QL;^`````````#QFPL#`P,)F/`P&?`````#,``#,
XMS,S,S,QV```````,&#``?,;^P,#&?```````$#AL`'@,?,S,S'8```````#,
XM``!X#'S,S,QV``````!@,!@`>`Q\S,S,=@``````.&PX`'@,?,S,S'8`````
XM`````#QF8&!F/`P&/``````0.&P`?,;^P,#&?````````,8``'S&_L#`QGP`
XM`````&`P&`!\QO[`P,9\````````9@``.!@8&!@8/```````&#QF`#@8&!@8
XM&#P``````&`P&``X&!@8&!@\``````#&`!`X;,;&_L;&Q@`````X;#@`.&S&
XMQO[&QL8`````&#!@`/YF8'Q@8&;^``````````!L_K(R?MC8;@```````#YL
XMS,S^S,S,S,X``````!`X;`!\QL;&QL9\````````Q@``?,;&QL;&?```````
XM8#`8`'S&QL;&QGP``````#!XS`#,S,S,S,QV``````!@,!@`S,S,S,S,=@``
XM````QL8``,;&QL;&QGX&#'@`QL8`?,;&QL;&QL9\`````,;&`,;&QL;&QL;&
XM?```````&!@\9F!@8&8\&!@``````#AL9&#P8&!@8.;\````````9F8\&'X8
XM?A@8&```````^,S,^,3,WLS,S,8```````X;&!@8?A@8&!@8V'`````8,&``
XM>`Q\S,S,=@``````#!@P`#@8&!@8&#P``````!@P8`!\QL;&QL9\```````8
XM,&``S,S,S,S,=@```````';<`-QF9F9F9F8`````=MP`QN;V_M[.QL;&````
XM```\;&P^`'X`````````````.&QL.`!\```````````````P,``P,&#`QL9\
XM`````````````/[`P,#```````````````#^!@8&!@```````,#`PL;,&#!@
XMW(8,&#X```#`P,+&S!@P9LZ>/@8&`````!@8`!@8&#P\/!@````````````V
XM;-AL-@``````````````V&PV;-@````````11!%$$4011!%$$4011!%$5:I5
XMJE6J5:I5JE6J5:I5JMUWW7?==]UWW7?==]UWW7<8&!@8&!@8&!@8&!@8&!@8
XM&!@8&!@8&/@8&!@8&!@8&!@8&!@8^!CX&!@8&!@8&!@V-C8V-C8V]C8V-C8V
XM-C8V`````````/XV-C8V-C8V-@``````^!CX&!@8&!@8&!@V-C8V-O8&]C8V
XM-C8V-C8V-C8V-C8V-C8V-C8V-C8V-@``````_@;V-C8V-C8V-C8V-C8V-O8&
XM_@``````````-C8V-C8V-OX``````````!@8&!@8^!CX````````````````
XM````^!@8&!@8&!@8&!@8&!@8&!\``````````!@8&!@8&!C_````````````
XM````````_Q@8&!@8&!@8&!@8&!@8&!\8&!@8&!@8&`````````#_````````
XM```8&!@8&!@8_Q@8&!@8&!@8&!@8&!@?&!\8&!@8&!@8&#8V-C8V-C8W-C8V
XM-C8V-C8V-C8V-C<P/P`````````````````_,#<V-C8V-C8V-C8V-C8V]P#_
XM`````````````````/\`]S8V-C8V-C8V-C8V-C8W,#<V-C8V-C8V-@``````
XM_P#_```````````V-C8V-O<`]S8V-C8V-C8V&!@8&!C_`/\``````````#8V
XM-C8V-C;_`````````````````/\`_Q@8&!@8&!@8`````````/\V-C8V-C8V
XM-C8V-C8V-C8_```````````8&!@8&!\8'P`````````````````?&!\8&!@8
XM&!@8&``````````_-C8V-C8V-C8V-C8V-C8V_S8V-C8V-C8V&!@8&!C_&/\8
XM&!@8&!@8&!@8&!@8&!CX````````````````````'Q@8&!@8&!@8________
XM_____________P````````#____________P\/#P\/#P\/#P\/#P\/#P#P\/
XM#P\/#P\/#P\/#P\/#_________\``````````````````';<V-C8W'8`````
XM``!XS,S,V,S&QL;,````````_L;&P,#`P,#`P```````````_FQL;&QL;&P`
XM````````_L9@,!@P8,;^````````````?MC8V-C8<```````````9F9F9F9\
XM8&#``````````';<&!@8&!@8`````````'X8/&9F9CP8?@`````````X;,;&
XM_L;&;#@````````X;,;&QFQL;&SN````````'C`8##YF9F9F/```````````
XM`'[;V]M^`````````````P9^V]OS?F#`````````'C!@8'Y@8&`P'@``````
XM``!\QL;&QL;&QL8``````````/X``/X``/X````````````8&'X8&```_P``
XM```````P&`P&#!@P`'X`````````#!@P8#`8#`!^````````#AL;&Q@8&!@8
XM&!@8&!@8&!@8&!@8&-C8V'```````````!@8`'X`&!@`````````````=MP`
XM=MP`````````.&QL.````````````````````````!@8````````````````
XM````&```````````#PP,#`P,[&QL/!P``````-AL;&QL;`````````````!P
XMV#!@R/@`````````````````?'Q\?'Q\?```````````````````````````
X!`#!@
X`
Xend
SHAR_EOF
$TOUCH -am 0112125693 Support/fonts/vt220l.816.uu &&
chmod 0640 Support/fonts/vt220l.816.uu ||
echo "restore of Support/fonts/vt220l.816.uu failed"
set `wc -c Support/fonts/vt220l.816.uu`;Wc_c=$1
if test "$Wc_c" != "5675"; then
	echo original size 5675, current size $Wc_c
fi
fi
# ============= Support/fonts/vt220h.816.uu ==============
if test X"$1" != X"-c" -a -f 'Support/fonts/vt220h.816.uu'; then
	echo "File already exists: skipping 'Support/fonts/vt220h.816.uu'"
else
echo "x - extracting Support/fonts/vt220h.816.uu (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/fonts/vt220h.816.uu &&
Xbegin 660 vt220h.816
XM``!$9%1,1``@("`@/@``````/$`X!'@`(B(^(B(``````#Q`.`1X`"(4"!0B
XM``````!\0'A`?``B%`@4(@``````?$!X0'P`/@@("`@``````'Q`>$!\`!PB
XM(BH<`@`````X1'Q$1``D*#`H)```````>$1X1'@`("`@(#X``````'A$>$1X
XM`!X@'`(\``````!$1'Q$1``^"`@("```````0$!`0'P`/B`\("```````$1$
XM1"@0`#X("`@(``````!\0'A`0``^(#P@(```````/$!`0#P`/"(\)"(`````
XM`#Q`.`1X`!PB(B(<```````\0#@$>``<"`@('```````>$1$1'@`("`@(#X`
XM`````'A$1$1X``0,!`0.``````!X1$1$>``<(@P0/@``````>$1$1'@`'`(,
XM`AP``````'A$1$1X``0($CX"``````!$9%1,1``B)#@D(@``````/$`X!'@`
XM(A0("`@``````'Q`>$!\`#PB/"(\```````\0$!`/``B,BHF(@``````?$!X
XM0'P`(C8J(B(``````#Q`.`1X`"(B(B(<``````!\0'A`?``>("`@'@``````
XM?$!X0$``'B`<`CP``````#Q`3$0\`!X@'`(\``````!X1'A(1``>(!P"/```
XM````1$1$1#@`'B`<`CP`````<(APB'``#!(2$@P``````'"(<(AP``0,!`0.
XM``````!PB'"(<``<(@P0/@``````<(APB'``'`(,`AP``````'"(<(AP``0(
XM$CX"``````!PB'"(<``>$!P"'```````<(APB'``'"`\(AP``````'"(<(AP
XM`#X"!`@(``````!PB'"(<``<(APB'```````<(APB'``'"(>`AP``````'"(
XM<(AP``P2'A(2``````!PB'"(<``<$AP2'```````<(APB'``#A`0$`X`````
XM`'"(<(AP`!P2$A(<``````!PB'"(<``>$!P0'@``````<(APB'``'A`<$!``
XM`````'"(>`AP``P2$A(,``````!PB'@(<``$#`0$#@``````<(AX"'``'"(,
XM$#X``````'"(>`AP`!P"#`(<``````!PB'@(<``$"!(^`@``````<(AX"'``
XM'A`<`AP``````'"(>`AP`!P@/"(<``````!PB'@(<``^`@0("```````<(AX
XM"'``'"(<(AP``````'"(>`AP`!PB'@(<``````!PB'@(<``,$AX2$@``````
XM<(AX"'``'!(<$AP``````'"(>`AP``X0$!`.``````!PB'@(<``<$A(2'```
XM````<(AX"'``'A`<$!X``````'"(>`AP`!X0'!`0`````````````#YC8V-C
XM?F!@8&```````!C;V]O;VWX8&!@8`````'S&!@9^QL9\`````````,#`8#`8
XM'#9C00```````````#!P,#`P-!@`````````````W&9F9F9F!@8&!@``````
XM``!\Y'#D?````````````.:V'!@X;,8```````````""QD1L*#@0````````
XM````$#@H;$3&@@````````#&QL;&QL;&QGP``````````/P&!@8&_```````
XM``````!^P,#`P'X``````````````,9F/!@\9CP```````#^Q@!L?'QL`,;^
XM```````\&-O;V]O;?A@8/````````/YL;&QL;&QL;.X```````````@,_@/^
XM#`@````````````D9G[#?F8D````````````$!`X*&Q$1.X````````X1(*J
XMNKJJ@D0X````````````W'8`_@``````````````_H+$Q&AH,#``````````
XM`!@8+"Q$1H;^````````````=HB(=@``````````````&!@``&9F````````
XM```,'A@8&!@8&'@P```````````!`@0($"!`@```````````@$`@$`@$`@$`
XM```````````!`@0($"!_```````````````_$`@$`@$````8&!@8&!@P8#`8
XM&!@8&!@8&!@8&!@8#`8,&!@8&!@8&```#A@8&!@8&!@8&!@8&!@8&!@8&!@8
XM&!@8&`X```````!P&!@8&!@8&!@8&!@8&!@8&!@8&!@8&!@8<``````````"
XM`@("(A(*!@(``````````````&S&UM9L````````9F9F/!@8?A@8&```````
XM<#YP8#Q@8#`<!CP`````````#!@P`,;&QL9^!@QX````P,#XS,S,^,#`P```
XM`````+!@X+`8##YF9CP```````#P8'QF9GQ@8&#P``````P8`,S,S'@P,#`P
XM>```````````1"@0*$0```````````#\9F9F]F9F9F;\`````.`0<!#F#!@P
XM9LJ2/@(``````````````````!@,>```&#!@````````````````````````
XM``#^`````````````'R"NJJJLJJJ@GP``````````````'@`````````````
XM`````'@("`````````#&Q@```````````````````````@9^"!!^8$``````
XM````````````````_P````````````````#_`````````````````/\`````
XM````````````_P````````````````#_````````````````````````YF9B
XM8C08```````````&?,[>]N9\P`````````````!\UM;<T'X`````````=MP`
XM?,;&QL9\`````````';<`'@,?,S,=@````#,S`#,S,QX,#`P,'@`````.&S&
XM`,;&QL;&QL9\``````8,&`#&QL;&QL;&?`````!@,!@`QL;&QL;&QGP`````
XM```&/FS.WO;F;/C`````````?MC8V-[>V-C8?@````!VW``X;,;&QL;&;#@`
XM````.&S&.&S&QL;&QFPX``````P8`#ALQL;&QL9L.`````!@,``X;,;&QL;&
XM;#@`````9F8`/!@8&!@8&!@\`````!@\9@`\&!@8&!@8/``````&#!@`/!@8
XM&!@8&#P`````8#`8`#P8&!@8&!@\`````,;&`/YB8&!\8&!B_@`````X;,8`
XM_F)@?&!@8OX`````8#`8`/YB8'Q@8&+^`````';<`!`X;,;&_L;&Q@`````X
XM;,80.&S&QO[&QL8`````&#!@$#ALQL;^QL;&`````#`8#!`X;,;&_L;&Q@``
XM````"!@("!P`````````````````````&!@`````````````X#Q@P,#`8#@,
XM>```````.`08!#@```````````````!\@IJBHJ*BFH)\``````````##VSQF
XM9CS;PP``````````````YFYX;&8```````!\QL9@,#`P`#`P````````````
XM`````````````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````
XM?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````
XM````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P
XM````````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P
XM`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@
XM,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\
XMQL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#``````
XM``!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#``
XM``````!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``
XM,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P
XM,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&
XMQF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,```````
XM`'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,```
XM`````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P
XM,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P
XM,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&
XM8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````
XM?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````
XM````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P
XM````````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P
XM`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@
XM,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\
XMQL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#``````
XM``!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#``
XM``````!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``
XM,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P
XM,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&
XMQF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,```````
XM`'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,```
XM`````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P
XM,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P
XM,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&
XM8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````
XM?,;&8#`P,``P,````````'S&QF`P,#``,#``````````````````````````
X!`,;&
X`
Xend
SHAR_EOF
$TOUCH -am 0112125693 Support/fonts/vt220h.816.uu &&
chmod 0640 Support/fonts/vt220h.816.uu ||
echo "restore of Support/fonts/vt220h.816.uu failed"
set `wc -c Support/fonts/vt220h.816.uu`;Wc_c=$1
if test "$Wc_c" != "5675"; then
	echo original size 5675, current size $Wc_c
fi
fi
# ============= Support/fonts/COPYRIGHT ==============
if test X"$1" != X"-c" -a -f 'Support/fonts/COPYRIGHT'; then
	echo "File already exists: skipping 'Support/fonts/COPYRIGHT'"
else
echo "x - extracting Support/fonts/COPYRIGHT (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/fonts/COPYRIGHT &&
XThe font files  
X
X	vt100pc.814.uu
X	vt100sg.814.uu
X	vt220h.808.uu
X	vt220h.810.uu
X	vt220h.814.uu
X	vt220h.816.uu
X	vt220l.808.uu
X	vt220l.810.uu
X	vt220l.814.uu
X	vt220l.816.uu
X
Xin this directory are 
X
XCopyright (c) 1992, 1993 Hellmuth Michaelis and Joerg Wunsch
X
XAll rights reserved.
X
XThe fonts are contributed to the 386BSD operating system.
X
XRedistribution and use in source and binary forms, with or without
Xmodification, are permitted provided that the following conditions
Xare met:
X
X1. Redistributions of source code must retain the above copyright
X   notice, this list of conditions and the following disclaimer.
X2. Redistributions in binary form must reproduce the above copyright
X   notice, this list of conditions and the following disclaimer in the
X   documentation and/or other materials provided with the distribution.
X3. All advertising materials mentioning features or use of this software
X   must display the following acknowledgement:
X     This product includes software contributed to 386BSD and developed
X     by Hellmuth Michaelis and Joerg Wunsch
X4. Neither the name of the developers nor the names "386BSD" and "pcvt"
X   may be used to endorse or promote products derived from this software
X   without specific prior written permission.
X
XTHIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY EXPRESS OR
XIMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
XOF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
XIN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT,
XINCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
XNOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
XDATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
XTHEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
X(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
XTHIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
SHAR_EOF
$TOUCH -am 0112125693 Support/fonts/COPYRIGHT &&
chmod 0660 Support/fonts/COPYRIGHT ||
echo "restore of Support/fonts/COPYRIGHT failed"
set `wc -c Support/fonts/COPYRIGHT`;Wc_c=$1
if test "$Wc_c" != "1965"; then
	echo original size 1965, current size $Wc_c
fi
fi
# ============= Support/keycap/Makefile ==============
if test ! -d 'Support/keycap'; then
    echo "x - creating directory Support/keycap"
    mkdir 'Support/keycap'
fi
if test X"$1" != X"-c" -a -f 'Support/keycap/Makefile'; then
	echo "File already exists: skipping 'Support/keycap/Makefile'"
else
echo "x - extracting Support/keycap/Makefile (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/keycap/Makefile &&
XLIB=		keycap
XCAPDIR=		/usr/share/misc
XCAPPATH=	$(CAPDIR)/keycap
XDEVICE=		/dev/console
XKEYCAPSRC=	keycap.src
X
XCFLAGS+=	-DKEYCAP_PATH=\"$(CAPPATH)\" -DKEYB_DEVICE=\"$(DEVICE)\"
XSRCS=		keycap.c
XMAN3=		keycap.0
XMAN5=		keycap-file.0
XCLEANFILES+=	keycap.0 keycap-file.0
X
XMLINKS=		keycap-file.5 keycap.5
X
Xbeforeinstall:
X	@echo "Saving old keycap database"
X	@mv -f ${CAPPATH} ${CAPPATH}.BAK
X	install -c -m ${LIBMODE} -o ${LIBOWN} -g ${LIBGRP}\
X	${.CURDIR}/${KEYCAPSRC} ${CAPPATH}
X
X.include <bsd.lib.mk>
SHAR_EOF
$TOUCH -am 0113143193 Support/keycap/Makefile &&
chmod 0660 Support/keycap/Makefile ||
echo "restore of Support/keycap/Makefile failed"
set `wc -c Support/keycap/Makefile`;Wc_c=$1
if test "$Wc_c" != "495"; then
	echo original size 495, current size $Wc_c
fi
fi
# ============= Support/keycap/keycap.3 ==============
if test X"$1" != X"-c" -a -f 'Support/keycap/keycap.3'; then
	echo "File already exists: skipping 'Support/keycap/keycap.3'"
else
echo "x - extracting Support/keycap/keycap.3 (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/keycap/keycap.3 &&
X.\" Copyright (c) 1992, 1993 Hellmuth Michaelis
X.\"
X.\" All rights reserved.
X.\" 
X.\" This driver is contributed to the 386BSD operating system.
X.\"
X.\" Redistribution and use in source and binary forms, with or without
X.\" modification, are permitted provided that the following conditions
X.\" are met:
X.\" 1. Redistributions of source code must retain the above copyright
X.\"    notice, this list of conditions and the following disclaimer.
X.\" 2. Redistributions in binary form must reproduce the above copyright
X.\"    notice, this list of conditions and the following disclaimer in the
X.\"    documentation and/or other materials provided with the distribution.
X.\" 3. All advertising materials mentioning features or use of this software
X.\"    must display the following acknowledgement:
X.\" This product includes software contributed to 386BSD and developed
X.\"      by Hellmuth Michaelis
X.\" 4. Neither the name of the developers nor the names "386BSD" and "pcvt"
X.\"    may be used to endorse or promote products derived from this software
X.\"    without specific prior written permission.
X.\"  
X.\" THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY EXPRESS OR
X.\" IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
X.\" OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
X.\" IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT,
X.\" INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
X.\" NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
X.\" DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
X.\" THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
X.\" (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
X.\" THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
X.\" 
X.\"
X.\"	@(#)keycap.3		2.00		   (contributed to 386BSD)
X.\"				Last Edit-Date: [Sun Jan  3 15:24:13 1993]
X.\"
X.Dd January 3, 1993
X.Dt KEYCAP 3
X.Os 386BSD
X.Sh NAME
X.Nm kgetent ,
X.Nm kgetnum ,
X.Nm kgetflag ,
X.Nm kgetstr
X.Nd routines for accessing the keycap database
X.Sh SYNOPSIS
X.Fn kgetent "char *bp" "char *name"
X.Fn kgetnum "char *id"
X.Fn kgetflag "char *id"
X.Ft char *
X.Fn kgetstr "char *id" "char *area"
X.Sh DESCRIPTION
XThese functions extract and use capabilities from a keyboard capability data
Xbase, usually
X.Pa /usr/share/misc/keycap ,
Xthe format of which is described in
X.Xr keycap 5 .
X.Pp
XThe
X.Fn kgetent
Xfunction
Xextracts the entry for keyboard mapping
X.Fa name
Xinto the buffer at
X.Fa bp .
XThe
X.Fa bp
Xargument
Xshould be a character buffer of size
X1024 and must be retained through all subsequent calls to
X.Fn kgetnum ,
X.Fn kgetflag ,
Xand
X.Fn kgetstr .
XThe
X.Fn kgetent
Xfunction
Xreturns \-1 if none of the
X.Nm keycap
Xdata base files could be opened,
X0 if the map name given does not have an entry,
Xand 1 if all goes well.
X.Pp
XThe
X.Fn kgetnum
Xfunction
Xgets the numeric value of capability
X.Fa id ,
Xreturning \-1 if is not given for the map.
X.Pp
XThe
X.Fn kgetflag
Xfunction
Xreturns 1 if the specified capability is present in
Xthe map's entry, 0 if it is not.
X.Pp
XThe
X.Fn kgetstr
Xfunction
Xreturns the string value of the capability
X.Fa id ,
Xplaces it in the buffer at
X.Fa area ,
Xand advances the
X.Fa area
Xpointer.
XThe
X.Fn kgetstr
Xfunction
Xreturns
X.Dv NULL
Xif the capability was not found.
X.Pp
X.Sh FILES
X.Bl -tag -width /usr/share/misc/keycap -compact
X.It Pa /usr/share/misc/keycap
XKeyboard capabilities database (if nothing else choosen during installation).
X.El
X.Sh SEE ALSO
X.Xr kcon 1 ,
X.Xr keycap 5
SHAR_EOF
$TOUCH -am 0112125693 Support/keycap/keycap.3 &&
chmod 0640 Support/keycap/keycap.3 ||
echo "restore of Support/keycap/keycap.3 failed"
set `wc -c Support/keycap/keycap.3`;Wc_c=$1
if test "$Wc_c" != "3568"; then
	echo original size 3568, current size $Wc_c
fi
fi
# ============= Support/keycap/keycap.c ==============
if test X"$1" != X"-c" -a -f 'Support/keycap/keycap.c'; then
	echo "File already exists: skipping 'Support/keycap/keycap.c'"
else
echo "x - extracting Support/keycap/keycap.c (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/keycap/keycap.c &&
X/*-
X * Copyright (c) 1992, 1993 The Regents of the University of California.
X * All rights reserved.
X *
X * This code is derived from software contributed to Berkeley by
X * Holger Veit
X *
X * Redistribution and use in source and binary forms, with or without
X * modification, are permitted provided that the following conditions
X * are met:
X * 1. Redistributions of source code must retain the above copyright
X *    notice, this list of conditions and the following disclaimer.
X * 2. Redistributions in binary form must reproduce the above copyright
X *    notice, this list of conditions and the following disclaimer in the
X *    documentation and/or other materials provided with the distribution.
X * 3. All advertising materials mentioning features or use of this software
X *    must display the following acknowledgement:
X *	This product includes software developed by the University of
X *	California, Berkeley and its contributors.
X * 4. Neither the name of the University nor the names of its contributors
X *    may be used to endorse or promote products derived from this software
X *    without specific prior written permission.
X *
X * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
X * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
X * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
X * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
X * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
X * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
X * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
X * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
X * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
X * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
X * SUCH DAMAGE.
X *
X *	@(#)keycap.c		2.00		   (contributed to 386BSD)
X *				Last Edit-Date: [Sun Jan  3 15:29:22 1993]
X */
X
X/*---------------------------------------------------------------------------*
X *
X *	keycap.c	Keyboard capabilities database handling
X *	-------------------------------------------------------
X *
X *	converted from printcap by Holger Veit (veit@du9ds3.uni-duisburg.de)
X *
X *	BUG:	Should use a "last" pointer in tbuf, so that searching
X *		for capabilities alphabetically would not be a n**2/2
X *		process when large numbers of capabilities are given.
X *
X *	Note:	If we add a last pointer now we will screw up the
X *		tc capability. We really should compile termcap.
X *
X *	modified by Hellmuth Michaelis (hm@hcshh.hcs.de) to fit into the
X *	vt220 driver pcvt 2.0 distribution
X *
X *	-hm	header conversion & cosmetic changes for pcvt 2.0 distribution
X *	-hm	debugging remapping
X *	-hm	cleaning up from termcap ....
X *	-hm	split off header file keycap.h
X *
X *---------------------------------------------------------------------------*/
X
X#include <stdio.h>
X#include <ctype.h>
X
X#include "keycap.h"
X
X#define	KEYCAP_BUFSIZ	1024
X
X#define MAXHOP	32		/* max number of tc= indirections */
X
Xchar	*getenv();
X
Xstatic	FILE *pfp = NULL;	/* keycap data base file pointer */
Xstatic	char *tbuf;
Xstatic	int hopcount;		/* detect infinite loops in keycap, init 0 */
X
Xstatic int knchktc();
Xstatic int knamatch();
Xstatic char *kdecode();
X
X/*---------------------------------------------------------------------------*
X *	match a name
X *---------------------------------------------------------------------------*/
Xstatic char *nmatch(id,cstr)
Xchar *id,*cstr;
X{
X	register n = strlen(id);
X	register char *c = cstr+n;
X
X	if (strncmp(id,cstr,n)==0 &&
X	    (*c==':' || *c=='|' || *c=='=' || *c=='#') || *c=='@') 
X	    	return c;
X	return 0;
X}
X
X/*---------------------------------------------------------------------------*
X * Get an entry for keyboard name in buffer bp from the keycap file.
X * Parse is very rudimentary, we just notice escaped newlines.
X *---------------------------------------------------------------------------*/
Xkgetent(bp, name)
Xchar *bp, *name;
X{
X	register char *cp;
X	register int c;
X	register int i = 0, cnt = 0;
X	char ibuf[KEYCAP_BUFSIZ];
X	char *cp2;
X	int tf;
X
X	tbuf = bp;
X	tf = 0;
X
X	tf = open(KEYCAP_PATH, 0);
X
X	if (tf < 0)
X		return (-1);
X	for (;;) {
X		cp = bp;
X		for (;;) {
X			if (i == cnt) {
X				cnt = read(tf, ibuf, KEYCAP_BUFSIZ);
X				if (cnt <= 0) {
X					close(tf);
X					return (0);
X				}
X				i = 0;
X			}
X			c = ibuf[i++];
X			if (c == '\n') {
X				if (cp > bp && cp[-1] == '\\'){
X					cp--;
X					continue;
X				}
X				break;
X			}
X			if (cp >= bp+KEYCAP_BUFSIZ) {
X				write(2,"Keycap entry too long\n", 23);
X				break;
X			} else
X				*cp++ = c;
X		}
X		*cp = 0;
X
X		/*
X		 * The real work for the match.
X		 */
X		if (knamatch(name)) {
X			close(tf);
X			return(knchktc());
X		}
X	}
X}
X
X/*---------------------------------------------------------------------------*
X * knchktc: check the last entry, see if it's tc=xxx. If so, recursively
X * find xxx and append that entry (minus the names) to take the place of
X * the tc=xxx entry. Note that this works because of the left to right scan.
X *---------------------------------------------------------------------------*/
Xstatic int knchktc()
X{
X	register char *p, *q;
X	char tcname[16];	/* name of similar keyboard */
X	char tcbuf[KEYCAP_BUFSIZ];
X	char *holdtbuf = tbuf;
X	int l;
X
X	p = tbuf + strlen(tbuf) - 2;	/* before the last colon */
X	while (*--p != ':')
X		if (p<tbuf) {
X			write(2, "Bad keycap entry\n", 18);
X			return (0);
X		}
X	p++;
X	/* p now points to beginning of last field */
X	if (p[0] != 't' || p[1] != 'c')
X		return(1);
X	strcpy(tcname,p+3);
X	q = tcname;
X	while (q && *q != ':')
X		q++;
X	*q = 0;
X	if (++hopcount > MAXHOP) {
X		write(2, "Infinite tc= loop\n", 18);
X		return (0);
X	}
X	if (kgetent(tcbuf, tcname) != 1)
X		return(0);
X	for (q=tcbuf; *q != ':'; q++)
X		;
X	l = p - holdtbuf + strlen(q);
X	if (l > KEYCAP_BUFSIZ) {
X		write(2, "Keycap entry too long\n", 23);
X		q[KEYCAP_BUFSIZ - (p-tbuf)] = 0;
X	}
X	strcpy(p, q+1);
X	tbuf = holdtbuf;
X	return(1);
X}
X
X/*---------------------------------------------------------------------------*
X * knamatch deals with name matching.  The first field of the keycap entry
X * is a sequence of names separated by |'s, so we compare against each such
X * name. The normal : terminator after the last name (before the first field)
X * stops us.
X *---------------------------------------------------------------------------*/
Xstatic int knamatch(np)
Xchar *np;
X{
X	register char *Np, *Bp;
X
X	Bp = tbuf;
X	if (*Bp == '#' || *Bp == 0)
X		return(0);
X	for (;;) {
X		for (Np = np; *Np && *Bp == *Np; Bp++, Np++)
X			continue;
X		if (*Np == 0 && (*Bp == '|' || *Bp == ':' || *Bp == 0))
X			return (1);
X		while (*Bp && *Bp != ':' && *Bp != '|')
X			Bp++;
X		if (*Bp == 0 || *Bp == ':')
X			return (0);
X		Bp++;
X	}
X}
X
X/*---------------------------------------------------------------------------*
X * Skip to the next field. Notice that this is very dumb, not knowing about
X * \: escapes or any such. If necessary, :'s can be put into the keycap file
X * in octal.
X *---------------------------------------------------------------------------*/
Xstatic char *kskip(bp)
Xchar *bp;
X{
X	while (*bp && *bp != ':')
X		bp++;
X	if (*bp == ':')
X		bp++;
X	return (bp);
X}
X
X/*---------------------------------------------------------------------------*
X * Return the (numeric) option id. Numeric options look like 'li#80' i.e.
X * the option string is separated from the numeric value by a # character.
X * If the option is not found we return -1. Note that we handle octal
X * numbers beginning with 0.
X *---------------------------------------------------------------------------*/
Xint kgetnum(id)
Xchar *id;
X{
X	register int i, base;
X	register char *bp = tbuf,*xp;
X
X	for (;;) {
X		bp = kskip(bp);
X		if (*bp == 0)
X			return (-1);
X		if ((xp=nmatch(id,bp)) == 0) 
X			continue;
X		bp = xp;	/* we have an entry */
X		if (*bp == '@')
X			return(-1);
X		if (*bp != '#')
X			continue;
X		bp++;
X		base = 10;
X		if (*bp == '0')
X			base = 8;
X		i = 0;
X		while (isdigit(*bp))
X			i *= base, i += *bp++ - '0';
X		return (i);
X	}
X}
X
X/*---------------------------------------------------------------------------*
X * Handle a flag option. Flag options are given "naked", i.e. followed by
X * a : or the end of the buffer.  Return 1 if we find the option, or 0 if
X * it is not given.
X *---------------------------------------------------------------------------*/
Xint kgetflag(id)
Xchar *id;
X{
X	register char *bp = tbuf,*xp;
X
X	for (;;) {
X		bp = kskip(bp);
X		if (!*bp)
X			return (0);
X		if ((xp=nmatch(id,bp)) != 0) {
X			bp = xp;
X			if (!*bp || *bp == ':')
X				return (1);
X			else if (*bp == '@')
X				return(0);
X		}
X	}
X}
X
X/*---------------------------------------------------------------------------*
X * Get a string valued option. These are given as 'cl=^Z'. Much decoding
X * is done on the strings, and the strings are placed in area, which is a
X * ref parameter which is updated. No checking on area overflow.
X *---------------------------------------------------------------------------*/
Xchar *kgetstr(id, area)
Xchar *id;
Xchar **area;
X{
X	register char *bp = tbuf,*xp;
X
X	for (;;) {
X		bp = kskip(bp);
X		if (!*bp)
X			return (0);
X		if ((xp = nmatch(id,bp)) == 0)
X			continue;
X		bp = xp;
X		if (*bp == '@')
X			return(0);
X		if (*bp != '=')
X			continue;
X		bp++;
X		return (kdecode(bp, area));
X	}
X}
X
X/*---------------------------------------------------------------------------*
X * kdecode does the grung work to decode the string capability escapes.
X *---------------------------------------------------------------------------*/
Xstatic char *kdecode(str, area)
Xchar *str;
Xchar **area;
X{
X	register char *cp;
X	register int c;
X	register char *dp;
X	int i;
X
X	cp = *area;
X	while ((c = *str++) && c != ':') {
X		switch (c) {
X
X		case '^':
X			c = *str++ & 037;
X			break;
X
X		case '\\':
X			dp = "E\033^^\\\\::n\nr\rt\tb\bf\f";
X			c = *str++;
Xnextc:
X			if (*dp++ == c) {
X				c = *dp++;
X				break;
X			}
X			dp++;
X			if (*dp)
X				goto nextc;
X			if (isdigit(c)) {
X				c -= '0', i = 2;
X				do
X					c <<= 3, c |= *str++ - '0';
X				while (--i && isdigit(*str));
X			}
X			break;
X		}
X		*cp++ = c;
X	}
X	*cp++ = 0;
X	str = *area;
X	*area = cp;
X	return (str);
X}
X
X/*-------------------------------- EOF --------------------------------------*/
SHAR_EOF
$TOUCH -am 0112125693 Support/keycap/keycap.c &&
chmod 0640 Support/keycap/keycap.c ||
echo "restore of Support/keycap/keycap.c failed"
set `wc -c Support/keycap/keycap.c`;Wc_c=$1
if test "$Wc_c" != "10218"; then
	echo original size 10218, current size $Wc_c
fi
fi
# ============= Support/keycap/keycap.h ==============
if test X"$1" != X"-c" -a -f 'Support/keycap/keycap.h'; then
	echo "File already exists: skipping 'Support/keycap/keycap.h'"
else
echo "x - extracting Support/keycap/keycap.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > Support/keycap/keycap.h &&
X/*-
X * Copyright (c) 1992, 1993 The Regents of the University of California.
X * All rights reserved.
X *
X * This code is derived from software contributed to Berkeley by
X * Holger Veit
X *
X * Redistribution and use in source and binary forms, with or without
X * modification, are permitted provided that the following conditions
X * are met:
X * 1. Redistributions of source code must retain the above copyright
X *    notice, this list of conditions and the following disclaimer.
X * 2. Redistributions in binary form must reproduce the above copyright
X *    notice, this list of conditions and the following disclaimer in the
X *    documentation and/or other materials provided with the distribution.
X * 3. All advertising materials mentioning features or use of this software
X *    must display the following acknowledgement:
X *	This product includes software developed by the University of
X *	California, Berkeley and its contributors.
X * 4. Neither the name of the University nor the names of its contributors
X *    may be used to endorse or promote products derived from this software
X *    without specific prior written permission.
X *
X * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
X * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
X * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
X * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
X * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
X * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
X * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
X * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
X * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
X * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
X * SUCH DAMAGE.
X *
X *	@(#)keycap.h		2.00		   (contributed to 386BSD)
X *				Last Edit-Date: [Sun Jan  3 15:28:03 1993]
X */
X
X#ifndef _KEYCAP_H_
X#define _KEYCAP_H_
X
Xint kgetent( char*, char* );
Xint kgetnum( char* );
Xint kgetflag( char* );
Xchar *kgetstr( char*, char** );
X
X#endif /* _KEYCAP_H_ */
X
X/*-------------------------------- EOF -------------------------------------*/
SHAR_EOF
$TOUCH -am 0112125693 Support/keycap/keycap.h &&
chmod 0640 Support/keycap/keycap.h ||
echo "restore of Support/keycap/keycap.h failed"
set `wc -c Support/keycap/keycap.h`;Wc_c=$1
if test "$Wc_c" != "2267"; then
	echo original size 2267, current size $Wc_c
fi
fi
echo "End of part 6, continue with part 7"
exit 0
-- 
hellmuth michaelis    HCS Hanseatischer Computerservice GmbH   hamburg, europe
hm@hcshh.hcs.de              tel: +49/40/55903-170         fax: +49/40/5591486