diff options
author | jkh <jkh@FreeBSD.org> | 1995-02-05 13:49:25 +0000 |
---|---|---|
committer | jkh <jkh@FreeBSD.org> | 1995-02-05 13:49:25 +0000 |
commit | 839ad527396286b846e58e11836f9091ceccc6d9 (patch) | |
tree | 50f3988ee320fe96b2fce23c40e51b297dbe8754 /usr.sbin | |
parent | 8e4f208589200093617b1a41bc21915a81e2751b (diff) | |
download | FreeBSD-src-839ad527396286b846e58e11836f9091ceccc6d9.zip FreeBSD-src-839ad527396286b846e58e11836f9091ceccc6d9.tar.gz |
PCVT userland utilities.
Submitted by: hm
Diffstat (limited to 'usr.sbin')
82 files changed, 13881 insertions, 0 deletions
diff --git a/usr.sbin/pcvt/Makefile b/usr.sbin/pcvt/Makefile new file mode 100644 index 0000000..78fc669 --- /dev/null +++ b/usr.sbin/pcvt/Makefile @@ -0,0 +1,26 @@ +.if !exists(Makefile.inc) + +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " Makefile.inc.NetBSD or Makefile.inc.FreeBSD" + @echo + @echo " to Makefile.inc before you can proceed !" + @echo + +all: error +clean: error +cleandir: error +depend: error +install: error + +.else + +SUBDIR= keycap cursor fontedit fonts kcon loadfont scon \ + userkeys vttest ispcvt mcon +SUBDIR+= vgaio kbdio set2061 +SUBDIR+= demo + +.include <bsd.subdir.mk> +.endif diff --git a/usr.sbin/pcvt/Makefile.inc b/usr.sbin/pcvt/Makefile.inc new file mode 100644 index 0000000..210acb0 --- /dev/null +++ b/usr.sbin/pcvt/Makefile.inc @@ -0,0 +1,25 @@ +BINDIR = /usr/local/bin +FONTDIR = /usr/share/misc/pcvtfonts +LIBDIR = /usr/local/lib +LIBMODE = 644 + +# for pcvt_ioctl.h + +INCDIR = /usr/include/machine +INCOWN = bin +INCGRP = bin +INCMODE = 444 + +${INCDIR}/pcvt_ioctl.h: ${.CURDIR}/../../pcvt_ioctl.h + install ${COPY} -o ${INCOWN} -g ${INCGRP} -m ${INCMODE} \ + ${.CURDIR}/../../pcvt_ioctl.h ${INCDIR} + +.depend: ${INCDIR}/pcvt_ioctl.h + +# for FreeBSD (they nroffify "on the fly") + +MAN3EXT = 3 +MAN4EXT = 4 +MAN5EXT = 5 +MAN8EXT = 8 +MANDIR = /usr/local/man/man diff --git a/usr.sbin/pcvt/cursor/Makefile b/usr.sbin/pcvt/cursor/Makefile new file mode 100644 index 0000000..47894b8 --- /dev/null +++ b/usr.sbin/pcvt/cursor/Makefile @@ -0,0 +1,18 @@ +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +PROG = cursor + +.include <bsd.prog.mk> + +$(PROG): $(INCDIR)/pcvt_ioctl.h + +.endif diff --git a/usr.sbin/pcvt/cursor/cursor.1 b/usr.sbin/pcvt/cursor/cursor.1 new file mode 100644 index 0000000..7333108 --- /dev/null +++ b/usr.sbin/pcvt/cursor/cursor.1 @@ -0,0 +1,76 @@ +.\" Copyright (c) 1992,1993,1994 Hellmuth Michaelis +.\" +.\" All rights reserved. +.\" +.\" Redistribution and use in source and binary forms, with or without +.\" modification, are permitted provided that the following conditions +.\" are met: +.\" 1. Redistributions of source code must retain the above copyright +.\" notice, this list of conditions and the following disclaimer. +.\" 2. Redistributions in binary form must reproduce the above copyright +.\" notice, this list of conditions and the following disclaimer in the +.\" documentation and/or other materials provided with the distribution. +.\" 3. All advertising materials mentioning features or use of this software +.\" must display the following acknowledgement: +.\" This product includes software developed by Hellmuth Michaelis +.\" 4. The name authors may not be used to endorse or promote products +.\" derived from this software without specific prior written permission. +.\" +.\" THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR +.\" IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES +.\" OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. +.\" IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, +.\" INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT +.\" NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, +.\" DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY +.\" THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +.\" (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF +.\" THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +.\" +.\" @(#)cursor.1, 3.20, Last Edit-Date: [Mon Dec 19 20:30:40 1994] +.\" +.Dd December 19, 1994 +.Dt CURSOR 1 +.Sh NAME +.Nm cursor +.Nd set cursor shape for the pcvt VT220 video driver +.Sh SYNOPSIS +.Nm cursor +.Op Fl d Ar device +.Op Fl n Ar screenno +.Op Fl s Ar lineno +.Op Fl e Ar lineno +.Sh DESCRIPTION +The +.Nm cursor +utility allows the user to set the cursor shape in a given virtual screen +of the above mentioned driver. +.Pp +The options are as follows: +.Bl -tag -width Ds +.It Fl d +Specifies a device for which the cursor shape is set. +.It Fl n +Sets the virtual screen number to apply the following parameters to. Not +specifying this parameter implies the current virtual screen or the screen +referenced by the -d parameter. +.It Fl s +Specifies the starting (top) scanline the cursor should have. +.It Fl e +Specifies the last (bottom) scanline the cursor should have. +.El +.Pp +Be aware of the fact that the parameters need to be adjusted for the current +size of the characterfont in use, on EGA and VGA boards sizes of 8, 14 and +16 scanlines are currently supported. +.Sh EXAMPLES +The command +.Dq Li cursor -s3 -e10 +sets the cursor on the current virtual screen to a rectangular shape on a +14 line VGA screen. +.Sh BUGS +No known bugs +.Sh SEE ALSO +.Xr loadfont 1 , +.Xr scon 1 , +.Xr pcvt 4 diff --git a/usr.sbin/pcvt/cursor/cursor.c b/usr.sbin/pcvt/cursor/cursor.c new file mode 100644 index 0000000..f7278f0 --- /dev/null +++ b/usr.sbin/pcvt/cursor/cursor.c @@ -0,0 +1,155 @@ +/* + * Copyright (c) 1992,1993,1994 Hellmuth Michaelis and Brian Dunford-Shore + * + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by + * Hellmuth Michaelis and Brian Dunford-Shore + * 4. The name authors may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + */ + +static char *id = + "@(#)cursor.c, 3.20, Last Edit-Date: [Mon Dec 19 20:26:38 1994]"; + +/*---------------------------------------------------------------------------* + * + * history: + * + * -hm adding option -d <device> + * + *---------------------------------------------------------------------------*/ + +#include <stdio.h> +#include <fcntl.h> +#include <sys/stat.h> +#include <machine/pcvt_ioctl.h> + +#define DEFAULTFD 0 + +main(argc,argv) +int argc; +char *argv[]; +{ + extern int optind; + extern int opterr; + extern char *optarg; + + struct cursorshape cursorshape; + int fd; + int c; + int screen = -1; + int start = -1; + int end = -1; + int dflag = -1; + char *device; + + while( (c = getopt(argc, argv, "d:n:s:e:")) != EOF) + { + switch(c) + { + case 'd': + device = optarg; + dflag = 1; + break; + + case 'n': + screen = atoi(optarg); + break; + + case 's': + start = atoi(optarg); + break; + + case 'e': + end = atoi(optarg); + break; + + case '?': + default: + usage(); + break; + } + } + + if(start == -1 || end == -1) + usage(); + + if(dflag == -1) + { + fd = DEFAULTFD; + } + else + { + if((fd = open(device, O_RDWR)) == -1) + { + char buffer[80]; + strcpy(buffer,"ERROR opening "); + strcat(buffer,device); + perror(buffer); + exit(1); + } + } + + if(screen == -1) + { + struct stat stat; + + if((fstat(fd, &stat)) == -1) + { + char buffer[80]; + strcpy(buffer,"ERROR opening "); + strcat(buffer,device); + perror(buffer); + exit(1); + } + + screen = minor(stat.st_rdev); + } + + cursorshape.start = start; + cursorshape.end = end; + cursorshape.screen_no = screen; + + if(ioctl(fd, VGACURSOR, &cursorshape) == -1) + { + perror("cursor - ioctl VGACURSOR failed, error"); + exit(1); + } + else + exit(0); +} + +usage() +{ + fprintf(stderr,"\ncursor - set cursor shape for pcvt video driver\n"); + fprintf(stderr,"usage: cursor -d [device] -n [no] -s [line] -e [line]\n"); + fprintf(stderr," -d <device> device to use (/dev/ttyvX), default current\n"); + fprintf(stderr," -n <no> screen no if specified, else current screen\n"); + fprintf(stderr," -s <line> start scan line (topmost scan line)\n"); + fprintf(stderr," -e <line> ending scan line (bottom scan line)\n\n"); + exit(1); +} + diff --git a/usr.sbin/pcvt/demo/Makefile b/usr.sbin/pcvt/demo/Makefile new file mode 100644 index 0000000..c20b8ac --- /dev/null +++ b/usr.sbin/pcvt/demo/Makefile @@ -0,0 +1,54 @@ +PROG= playvt +SRCS= playvt.c +DEMOS= chardemo.vt colors.vt sgr.vt +DEMOS+= outerlimit.vt twzone.vt cowscene.vt xmas.vt +NOMAN= + +all: $(DEMOS) $(PROG) + +install: ${DEMOS} + @echo "to look at the demos, execute:" + @echo " \"cat <filename>.vt\"" + @echo "if it is an animation an it runs too fast, try out:" + @echo " \"playvt -f <filename>.vt -d<some-delay-val>\"" + +.include <bsd.prog.mk> + +CLEANFILES+= ${DEMOS} + +# this seems to be the lowest common denominator + +chardemo.vt: ${.CURDIR}/$@.gz.uu + uudecode ${.CURDIR}/$@.gz.uu + gunzip $@.gz + rm -f $@.gz + +colors.vt: ${.CURDIR}/$@.gz.uu + uudecode ${.CURDIR}/$@.gz.uu + gunzip $@.gz + rm -f $@.gz + +sgr.vt: ${.CURDIR}/$@.gz.uu + uudecode ${.CURDIR}/$@.gz.uu + gunzip $@.gz + rm -f $@.gz + +cowscene.vt: ${.CURDIR}/$@.gz.uu + uudecode ${.CURDIR}/$@.gz.uu + gunzip $@.gz + rm -f $@.gz + +xmas.vt: ${.CURDIR}/$@.gz.uu + uudecode ${.CURDIR}/$@.gz.uu + gunzip $@.gz + rm -f $@.gz + +outerlimit.vt: ${.CURDIR}/$@.gz.uu + uudecode ${.CURDIR}/$@.gz.uu + gunzip $@.gz + rm -f $@.gz + +twzone.vt: ${.CURDIR}/$@.gz.uu + uudecode ${.CURDIR}/$@.gz.uu + gunzip $@.gz + rm -f $@.gz diff --git a/usr.sbin/pcvt/demo/README b/usr.sbin/pcvt/demo/README new file mode 100644 index 0000000..5e33f54 --- /dev/null +++ b/usr.sbin/pcvt/demo/README @@ -0,0 +1,20 @@ +- The files "chardemo.vt" and "colors.vt" are taken from the MSDOS Kermit + distribution and are redistributed with permission from Frank da Cruz. + +- cat chardemo.vt - displays all available character sets + +- cat colors.vt - displays all available back/foreground color combinations + +- cat sgr.vt - displays all possible graphic renditions + +- all other files are some VT100 animations collected over the time from + unkown sources, play them with playvt. + +- Playvt is a program to play an animation file on pcvt: because pcvt is + _much_ faster than an original VT100/VT220, it adds a programmable delay + for each character so one can enjoy smooth-running animations! :-) + There is no manpage available for playvt, just try to run playvt -? which + should give sufficient information. You have to empirically find out which + delay value fit's your needs! + +have fun! diff --git a/usr.sbin/pcvt/demo/chardemo.vt.gz.uu b/usr.sbin/pcvt/demo/chardemo.vt.gz.uu new file mode 100644 index 0000000..efcd4c7 --- /dev/null +++ b/usr.sbin/pcvt/demo/chardemo.vt.gz.uu @@ -0,0 +1,53 @@ +begin 664 chardemo.vt.gz +M'XL("):V^BX"`V-H87)D96UO+G9T`*7829,=5Q5%X3D1X!]0DZ(1($`F[VLR +M\UI"IF3`1V",<=DT%IT0!MF6)6%D^N:OLW*OO!',J<E>\09U[N2;Y,6CBP>' +MVZT^^YE+_MY\^.*#9T\?/KF\O+I^[?[][:<W^.GIK79Y>?WI\\O7/^&7Z^>/ +MC,MWW[J^WO;RG?<?/=[VZLF+6V\_^]A_]K]_]T9<C;AQWF,:O]P9<7=$V__1 +MX7@ZS\O_'Q</YMN'NIQ>H9:MVE;K5H>M^E;'K=JTY2G9MCPG#UO.R>.62_*T +MY9H\;]F3VZF64VV[U7*K;<=:CK7M6LNUPW:MY=IAN]9R[=73X?'%\KGMT7/E +MQ7-]?GON7%_8WCK7%_/0N;Z45\YU(T^<Z\MYWUQ?R>/F^FI>-M?-/&NNK^5- +M<WT]#YKK&WG-7+?RE+E>SCOF^N9V>ZEIN[U4VVXO==AN+W7,[:5.N;W4.;>7 +MFG-[J26WEUIS>ZF>VTN]DMM+W<[MI>[D]E+?RNVE[N;V4J]NM]?Z]G9[K:OM +M]EKWMMMKO9;;:WTGM]?Z;FZO];W<7NOUW%ZK<GNM^[F]UO=S>ZT?Y/9:;^3V +M6C_,[;7>S.VU?K3=[O76=KO7C[?;O=[>;O>ZSNU>[^1VKW=SN]=/<KO73W.[ +MU\]RN]?/<[O7>[G=ZT%N]_I%;O?Z96[W^E5N]_KU=KM-]9OM./MPN\[^=CO/ +M/LI]XG=Y`/%^7D#\/D\@_I`W$(_S".*#O(+X,,\@/LH[B"=Y"/%Q7D(\S5.( +M9WE+J^=Y2ZL_YBVM/LE;6OW)M[1ZX5M:?>I;6OW9M[3ZBV]I]5??TNIOOJ75 +MWWU+JW_XEE;_]"VM_N5;6OW;M[3ZSTL7:TP\N;AY;V?1SKI@`X.-#%8:A#8( +M<1#J(.1!Z(,0"*$00B*$1@B1$"HAPJ3-.F$#A8T45BJ$5@BQ$&HAY$+HA1`, +MH1A",H1F"-$0JB'"IBVZ80.'C1Q6.H1V"/$0ZB'D0^B'$!"A($)"A(8($1$J +M(L*HK3IB`XF-)%9*A)8(,1%J(N1$Z(D0%*$H0E*$I@A1$:HB9-5W5GUGU7=6 +M?;#J@U4?K/I@U0>K/ECUP:H/5GVPZH-5'ZSZ8-5E=9ADQ885&U:LK`A9$;(B +M9$7(BI`5(2M"5H2L"%D1LB)D1835K:L=U.$D*#:@V(!B!44(BA`4(2A"4(2@ +M"$$1@B($10B*$!0A*"*@#F=!L0'%!A0K*$)0A*`(01&"(@1%"(H0%"$H0E"$ +MH`A!$0%UF`7%!A0;4*R@"$$1@B($10B*$!0A*$)0A*`(01&"(@1%!-1A$10; +M4&Q`L8(B!$4(BA`4(2A"4(2@"$$1@B($10B*$!014(=54&Q`L0'%"HH0%"$H +M0E"$H`A!$8(B!$4(BA`4(2A"4(2@^@ZJ[Z#Z#JH/4'V`Z@-4'Z#Z`-4'J#Y` +M]0&J#U!]@.H#5!^@NJ!NWCCOHHY'1;$1Q484JRA"482B"$41BB(412B*4!2A +M*$)1A*((11$1=3PIBHTH-J)811&*(A1%*(I0%*$H0E&$H@A%$8HB%$4HBHBH +MXUE1;$2Q$<4JBE`4H2A"482B"$41BB(412B*4!2A*$)11$0=9T6Q$<5&%*LH +M0E&$H@A%$8HB%$4HBE`4H2A"482B"$41$75<%,5&%!M1K*((11&*(A1%*(I0 +M%*$H0E&$H@A%$8HB%$5$U'%5%!M1;$2QBB(412B*4!2A*$)1A*((11&*(A1% +M*(I0%*&H:0=U.@B*#2@VH%A!$8(B!$4(BA`4(2A"4(2@"$$1@B($10B*"*C3 +M45!L0+$!Q0J*$!0A*$)0A*`(01&"(@1%"(H0%"$H0E!$0)U.@F(#B@TH5E"$ +MH`A!$8(B!$4(BA`4(2A"4(2@"$$1@B("ZG06%!M0;$"Q@B($10B*$!0A*$)0 +MA*`(01&"(@1%"(H0%!%0IUE0;$"Q`<4*BA`4(2A"4(2@"$$1@B($10B*$!0A +M*$)01$"=%D&Q`<4&%"LH0E"$H`A!$8(B!$4(BA`4(2A"4(2@"$$1@KJS@SHW +M0;$!Q084*RA"4(2@"$$1@B($10B*$!0A*$)0A*`(01$!=3X(B@TH-J!801&" +M(@1%"(H0%"$H0E"$H`A!$8(B!$4(B@BH\U%0;$"Q`<4*BA`4(2A"4(2@"$$1 +M@B($10B*$!0A*$)01$"=3X)B`XH-*%90A*`(01&"(@1%"(H0%"$H0E"$H`A! +M$8(B`NI\%A0;4&Q`L8(B!$4(BA`4(2A"4(2@"$$1@B($10B*$!014.=94&Q` +ML0'%"HH0%"$H0E"$H`A!$8(B!$4(BA`4(2A"4(2@[HZ/==/^M6[:/]=-^_>Z +M:7RPF\87NVE\LIO&-[MI?+2;QE>[:7RVF\9WNVE\N)O&E[MI?+J;QK>[25!S +M$Q0;4&Q`L8(B!$4(BA`4(2A"4(2@"$$1@B($10B*$!014/-!4&Q`L0'%"HH0 +M%"$H0E"$H`A!$8(B!$4(BA`4(2A"4$1`S4=!L0'%!A0K*$)0A*`(01&"(@1% +M"(H0%"$H0E"$H`A!$0$UGP3%!A0;4*R@"$$1@B($10B*$!0A*$)0A*`(01&" +M(@1%!-1\%A0;4&Q`L8(B!$4(BA`4(2A"4(2@"$$1@B($10B*$!0AJ#9`]1U4 +MWT'U'50?H/H`U0>H/D#U`:H/4'V`Z@-4'Z#Z`-4'J#Y`]?UK^+1_#I_V[^'3 +M_D%\&E_$I_%)?!K?Q*?Q47P:7\6G\5E\&M_%I_%A?!I?QJ?Q:7P:W\:G\7%\ +M$M32!,4&%!M0K*`(01&"(@1%"(H0%"$H0E"$H`A!$8(B!$4$U'(0%!M0;$"Q +M@B($10B*$!0A*$)0A*`(01&"(@1%"(H0%!%0RU%0;$"Q`<4*BA`4(2A"4(2@ +M"$$1@B($10B*$!0A*$)01$`M)T&Q`<4&%"LH0E"$H`A!$8(B!$4(BA`4(2A" +64(2@"$$1?CT_'&^W^B\8)0@*\AL``,4& +` +end diff --git a/usr.sbin/pcvt/demo/colors.vt.gz.uu b/usr.sbin/pcvt/demo/colors.vt.gz.uu new file mode 100644 index 0000000..1d5d0da --- /dev/null +++ b/usr.sbin/pcvt/demo/colors.vt.gz.uu @@ -0,0 +1,15 @@ +begin 664 colors.vt.gz +M'XL("):V^BX"`V-O;&]R<RYV=`#MU+UNG$`4!>!^I7T"FGD`Q^+^S)TB2N-8 +M;B(GA=UMM;*1C;(8":\E/W[,G(.SX0E2+,WE(#%\@N$T._.O7H;MYO;NR_6O +MN_2CFX;^F.RR3??=^S'=CH]=^CX>QNGU(ME[^I9NQJE[FL:WE\>+Y/.%J_W# +M;US8;K:;A*/963LO_'&+MVF^TP5#,0S#,3)&8)24MIMEA63MLEP[I#EYBRB, +M@JB,BFB,ANB,CI@9,V(PQN=3:RRG#*D,(4/`$#($#"%#P!`R!`PA0\`0,@0, +M(4/`$#*DOH_T<YR&_>'4H]6C]"@\2H_"H_0H/$J/PJ/T*#Q*C\*C]"@\2H_" +M\W<;G)JLFHPF@\EH,IB,)H/):#*8C":#R6@RF(PF@\EHLM6G\LIP,AP,)\/! +M<#(<#"?#P7`R'`PGP\%P,AP,)\-7C%P9F8P,1B8C@Y')R&!D,C(8F8P,1B8C +M@Y')R&!D,O**$9419`0804:`$60$&$%&@!%D!!A!1H`19`0804:L&*4R"AD% +MC$)&`:.04<`H9!0P"AD%C$)&`:.04<`H9)1_&/?/_6M:_BZ<UHV]3\MV&MX. +MQW[YJ`]S\Z7EW1[ZEVY9Z++YK,YF)\.YKU9]=37U3\_'<U^=^^K<5_]57S6[ +-]J.M_@#AP6KE^0D``&Y9 +` +end diff --git a/usr.sbin/pcvt/demo/cowscene.vt.gz.uu b/usr.sbin/pcvt/demo/cowscene.vt.gz.uu new file mode 100644 index 0000000..7a5a4dbb --- /dev/null +++ b/usr.sbin/pcvt/demo/cowscene.vt.gz.uu @@ -0,0 +1,90 @@ +begin 644 cowscene.vt.gz +M'XL(".BA?2H"`V-O=W-C96YE+G9T`.U=P8[CQA$]&MA?F`N!R6%6B"QU=9.4 +ML`?;"1((1GP*XLL(&!C916QDXPT<(-Z#H&\/V5U-=C<?BV4@<)RD%XA":JA^ +M[W635:\DLOSP3%\^/']&[?N'Y_X-N1]>/3R;XQMS>3UNF+A!PT8S;MAQPV^Y +M::N-?^R&C=WVOX>GXU]_?/_P])OM0R.;EXG.AXG/`1&*?*8/)I^</WJ=/WN; +M/WR;Y=R;.,!3,L)3,L0^'2,9Y'!-1IF':=)QFFR@=*0F'6I_2Q@UZ6#Y:,5P +MV7CY@/N479,/68Q9#IJ/6@R;,RT'+D=>#%V,G0U^W>>L[\OA%^,O`?;YBN<0 +MMUNAX(Y`EB@9S&&!TRR`FD.IIL%0`"L#:Y9H!P#7+)0U:X`(,8<$F`T`W35` +M90[;)Q#*?R5;2+?@BP@CQLT.3M3,F=$)H1-")X1.")T\>C%AA-`M0K<(W2)T +MB]`MTFX1ND/H#J$[A.X0ND/:'4)O$7J+T%N$WB+T%FEO$7J'T#N$WB'T#J%W +M2'N'T'N$WB/T'J'W"+U'VGN$?D+H)X1^0N@GA'Y"VD\(_8S0SPC]C-#/"/V, +MM)\1NCG"<'.$\>8(`\X11IPCF@`>M^2`0QZ.>3CHX:B'PQZ,>P8&/@,CGX&A +MS\#89V#P,S#Z&1C^#(Q_!@9``R.@@2'0P!AH8!`T,`H:&`8-C(,&!D(#(Z&! +MH=#`6&A@,#0P&AH8#@V,AP8&1`,CHH$AT<"8:&!0-#`J&A@6#8R+!@9&`R.C +M@:'1P-AH8'`T,#H:&!X-C(\&!D@#(Z2!(=+`&&E@D#0P2AH8)@V,DP3C),$X +M23!.$HR3=$0<:!DG3T/=>OFB^>V''Q^>SV^HN]P"K^[R]?B9P<V-K^1?K7]U +M_K7UKYU_[?WKR;^>_>L0D/W_A4\/82F,%08P8003AC!A#!,&,6$4$X:A,`PQ +MB<""[*4RJ\Q^)F;^^O`7(E\?3;P^FCJCE5F]/FK^J,PJLYH_*K/*K.:/RJPR +MJ_FC,JO,*K/*K#+[.9@-=-SE$'[H;L>-\QMK+U]]^/#IIW5**[/*S%\@3;Q` +M&KY`IGMCZI169O4"J1FD,JO,:@:IS"JSFD$JL\JL9I#*K#*KS"JSRNS_FYE[ +M8_O+U^%9J-[_0D]C]OJB>?_-]V__]MWW[ZK)J\PJLW"=-/$Z:>)U4CR+66>V +M,JO72<TGE5EE5O-)95:9U7Q2F55FOY1\<AP_C)Y*AIT3"'9.(-@Y@0QLV8([ +MQN"6,;AG#&X:@[O&$'PR&G9.(-@Y@6#G!(*=$PAV3B`+YP%V3B#8.8%@YP2" +MG1,(=DX@!^<!=DX@V#F!8.<$@IT3"'9.H!;.`^R<0+!S`L'."00[)Q#LG$`= +MG`?8.8%@YP2"G1,(=DX@V#F!>C@/R\X)OKW&PZ/]W<>_O__P]KOO_S(^.#.\ +MWX7W7?G^R!EV6B#8:8%@IP6"G1;H!.<M[[3PZI/0%JF[7&^'\6F&(1K]X>'Y +MJX?GS]IO.2*UE^LP]H%;+;G+-<WC]HTSEP,W5QJ.W.UVAU<Q;EW#1LSXCL*1 +MSH^R&]B%8X<@3/Y8$X\=`K*]E'S>O_(_RIWF=G-'?WSS]/GGL674J([GA<:] +M89:8]\!F%[:ZR^X6-MWQ,K$]7@XA\-(Y;/D9W(4>#,6LG%(63.GCQT@IYT`! +MEV9<&J=L4F["W\W\=S-.5/R[&SM"Q+6_-4U<\%M"D6?_Z%N[#8R'_]WO/-'# +MXAR:G3]?=E<PH7TJY91*.6=*CBF3?F;23TQZ9F)#QHISW?#F\/$KFLN!P#DE +M<$X)G-.I')\]B[#=!-L%V%+7R?.=ELCO3$ODI:1+=-C')1KF*2[1_N#IN="3 +M(\;.B4([46B7%+X-J"8]5_T><S!^CSF<PD[$<#.&FS#<O,Y39ID6V7(?P/T5 +M+?$(36F/1K_'1/Q5&8F<PTXD,IR:_&!32-97WO'Y,=#Q)[!_T\R+'1!B:S=_ +M6K^*%_5$@\(>T[!^+SG9;,9CHM#$YBG#Z3P##.%I6LJ\M5XX"X=K^Y!,4,1F +M)C9CXC(F)C*9@'G;]XM)2/27^3)\?`Q@CX_\L8Q`$Z^2XR4CRJN6,&)^+N/7 +M9OQHXA=:E(ZS[1N+YHGHW=L&)J+Y_6K7*[-:?-4O\RJSRNS?<9UP_FG+=-S! +M][WW2/M:S]UOK].5QXUOKR\O+[]NLI;*8]T3&]Z^A'^WJ=?M4_,ZCO^K"'"; +M$9X!Q`K&`B1!26'N,TX"U$"D-:@E5@J6HC4SW$N&MP*XB@@@,\P4].7>)).9 +MPMX`[@T"WP#R;04ZPWY))#<Y>H/@&XS?(`(OJPQR"HG^_Q2%;!H*$F\QBS4: +MF(=`I&"234?)Y<,:F54V*W0D/B6A?'(6E%8XO9-(K;$2:2UX%5-5,OO]&K4_ +MR]Q6R<GLEO3*B2L)-JL,O]NBN,YQ@R1@N9C&DN<_UHG^<YNI0!5R?2V374[J +M@J[`]P<-88DQGMZ"<TD9S'!)^AN)]3L=;9$W)/ZTR1Q-=\G]*Y'\'[7L9?KX +M7%D(X.\1"A%P`4H9>UE'HQ>RH63E'%IJV0$E>$%*+7_:$O-3U&S)63NU%H*@ +MGI6U603+;4D_2=.F*+Q*I:P]"E&+A;H)PFZ;RFX*:;=-;;=M<:6Z?:JN>5E? +M-DE?LRVPT2ALMB4V&HV%R"%@3")I(7):0Y)$TK9(THBD;9&T+9(6(L>@.(FT +MZRMI)9%V6Z35B+3;(NVV2%N*'#7.(MWZ2CI)I-L6Z30BW;9(MRW2%2*]QEED +MN[Z2K22RW1;9:D2VVR+;;9%M+C)HG+Q(M[Z0G:2QV];8:31VVQJ[;8U=II$E +M3AK[=8V]I+'?UMAK-/;;&OMMC7VJ,4H<WTA_P[F//[>LB)Y.WO]2T9-F+WJ/ +M1)_65_HDB3YMBSYI1)^V19^V19]FT;/F8+Z!YO/Z0I\ES>=MS6>-YO.VYO.V +MYG.B>=<L-.>2Q_]&SZH9/(IVZ:CP2T>583HJ'--189F.L_)9^&-47@@W@G#9 +M)VJ,HLXI:JRBQBL"L]@\1N&%;A+LL6@=C<([&I5Y-`KW:!3VT2S]XR!['W07 +MLJVPW**9-`HW:51VTBC\I%$82K-PE*/J(+M0[83%%MVE4=A+H_*71F$PC<)A +MFM)B>M%>=2&Z%99:=)M&83>-RF\:A>$T"L?I_W-5^T1T<"C>JF2:.V&A1?=I +M%/;3J/RG41A0HW"@XS'[1#.;LE%S)EGPHD;T949AS(S*F1F%-3,*;S8<$XK[ +M(#G:4+^7*#X)BRR:,J-P949ERXS"EQF%,1N."96^UQ@%>\6)X+.PQ*(C,PI+ +M9E2>S"A,F5&XLN&8W12^)KUCCK[/-^+1<7V%271CI'!CI')CI'!CI'!CE+BQ +M6>^C7^^HUW:7>_-+ONW!4VSNOWB*=1;K+-99_)^8Q4]\(A"J4Q*K4U)4IZ2J +M3DE1G9*B.B54G8;OAJ>\)Q2E)/^>H?E!0_>+AN8G#<UO&K0F=U(KU*(DUJ*D +MJ$5)58N2HA8E12U*%JF]#WO!PI%0@9)8@9*B`B55!4J*"I04%2@YH/4^?3=. +M0MU)8MU)BKJ35'4G*>I.4M2=U"ZEWN>?`4@H-TDL-TE1;I*JW"1%N4F*<I.Z +MA=31D4]2A3*3Q#*3%&4FJ<I,4I29I"@SJ2^E^MICDBK4ER36EZ2H+TE57Y*B +MOB1%?4FG0FJHLB:I0F5)8F5)BLJ25)4E*2I+4E26=,ZE!J635"O4E%:L*:VB +MIK2JFM(J:DJKJ"GM,9/*2F>I@FNRHFNR"M=D5:[)*ER35;@FF[FFJ'26*C@F +M*SHFJW!,5N68K,(Q685CLJECFI3.4@6[9.7[0#0W@NCN!-'<"J*Y%R2Q2[/2 +M6:K@EJSHEJS"+5F56[(*MV05;LEF;BDJG:4*;LF*;LDJW))5N26K<$M6X99L +MZI8FI;-4P2U9T2U9A5NR*K=D%6[)*MR23=S2K'26*K@E*[HEJW!+5N66K,(M +M685;LHE;.BQO/;:"6[*B6[(*MV15;LDJW))5N"5[6JM9IR?R5U=5=$M6X9:L +MRBU9A5NR"K=DSZ)4)[@E)[HEIW!+3N66G,(M.85;\CT,[NM2!;?D1+?D%&[) +MJ=R24[@EIW!+XS%W854%M^1$M^04;LFIW))3N"6G<$O#,7?I!!;<DA/=DE.X +M):=R2T[AEIS"+86>!^M2!;?DY'MG-3?/ZNZ>=9>G3:GC,5M2!S1?B:](%=R2 +M$]V24[@EIW)+PU$OFU+;R\=-J>TE5.(K4@6WY$2WY!1NR:G<TG#4MM1.(;6[ +M'*1K57!+3G1+3N&6G,HM#4>]WI0Z'K,EM9?SJN"6G.B6G,(M.<DM-9-4R2VQ +M4LDLL5#9*SG!*SG1*SF%5W*"5V*1@D]BC8)+8HFR1VH%C]2*'JE5>*1VW2-- +M1UF$4ZYENVZ1^';^HRQ3\$>MZ(]:A3]J5_T1"S1;Z]BN^B*69V1Y@B=J14_4 +M*CQ1N^:)$@D6X2Q6<<T2L<BU7]N"1L$,M:(9:E?,4)-J7#-#+,YNKN"*!V)I +M%DL+R@3OTV+OP\*<0IA3+9[;7CS\/5%L2]@ZJ#`(%!Q/"QT/ZX-^AW5!G\-J +MX'=!+`-^!\0:6J@AJA#,3`O,S$M4@:P,B^A4B]-M+P[ZNH=%=<+"(-/"BH!G +M83W]NIY>OHKZS:L(?)?#,GI!!C(D+&/I$UC%THJPAJ7_8/9X*!?^D)-FSB>! +M\]);,.-%TF?""TL1)WWA(^)T+T:*L[QP#?$B7IB%\#3<PB3PHW!EXN:'X$IG +MP`^^E6:`'W5#@[CP=@G9^K?7IK0KDCR?`EV1?9EDGM?CPWE%)F>*8`07WEU, +M85=DZL"LR,],C/#T92F9>64IF%D1GK@LR3(I$F8MRZO,+$UWS"I-HDPJS9G, +MJ?R@"V\5=/)L&&BD29!9.#P_2=9C(DF.8QX.STV2PYB*D+:Z)&TQHSFQ,)<Y +M0S&5.2TQD_PC+KR149BS3H"=\PRCQOC/F%,^8<@IB3!B>K@+NRG<E`\"VI0" +M&*S/P6*P9ZP8X!FJSZ%B]&:D&+(#4`S2C'/*<3@<,PS_D5'"'F-PL&4(CK`! +M@4,J`YQS@!`^>?SS-*+-#W1A=QH_!,3PZ&B(@ORPZ'$:P?`.CQUV^&G/:=N% +M;1ZV]U$LC.J#%H>J<8?SD]^,3Y;&M^V\Z>;-UF_.P\5NI\=I;QJQF7JRIGLV +>.?"2C#BW34UWQQ.;K+_C\C-JOWWU+THZ&OFDJ0`` +` +end diff --git a/usr.sbin/pcvt/demo/outerlimit.vt.gz.uu b/usr.sbin/pcvt/demo/outerlimit.vt.gz.uu new file mode 100644 index 0000000..a2b6d1a --- /dev/null +++ b/usr.sbin/pcvt/demo/outerlimit.vt.gz.uu @@ -0,0 +1,193 @@ +begin 644 outerlimit.vt.gz +M'XL(",2<V"H"`V]U=&5R;&EM:70N=G0`[9U=C]S(=88O#0R"Y`?H9@#?V#<! +MZYM<76FU8_>LM1IG-+*\WJL-D@M[K37LK&(;0?Y[2-;[G"*[1^.6+4ZV%RT( +MF&)WL5AUZCWO^:ABUS]=//G)IT]^VET\^:I[^^0K__F3K\KXU_FGL=M=UH*; +M"V%1F+_JCJPW%MSN8I-V_4;MAHW:C1NUFS9J-V_4;MFHW7ZC=H>-VG7=5@UO +MI7%N*Y5S6^F<VTKIW%9:Y[92.[>5WKFM%,]MI7E^UCP_:>#=[NKVZFSVMC9[ +M<=+$ZU=G06\MZ#SI^<N;N]WURY^?I7WVYM;>7/_4Y]V;VYLS-L[8V,>&BV/[ +M;Z[O=F=H;`T-EY\&O_ORYO7M6=:;R[J??/6[JQ=7O[I^=7WS\BSQ,_&MB<]W +MTP>OKN[.T-@:&G/(-=[V"T4$M3C[K+4X.RBU.-LC%6>^5+F?;OR?IM#_RPQ. +MWU^<Y_`Q")69\T_]."\_#I_=//DJU'*<RN<YV#J<#K/<QT#OR5>I7L3YXBSY +M;27?SPSVX_!LE/50R_'9"<K=O9W',J/H[NJ+7];AS#C2Y=3B&4T;<^ELX\89 +MN+F9KM)\%>O5R2&*L;Q9C>7-28_E1DY%FYH3]3*<$==8-N*:7:=*`I^-92<& +M^*R9^1^'S^L-4SE^/OMB+D^?OQ[+I9;CZRHSUT]?O)K%-9?CJ_D&/S_Y;KYA +M+L>[LZ/V",[V+.J+4?2SR["\RJNK?G7ENO7E^DZWOM6M[_7K>[V7'NVNQHL@ +M'=J=Z(++.!H_#^>7U\_O7M_6(<V?1/OD;#7/"8:#!,-Y7\T9$_O9]NYIZ'9O +MSDO/9V3L(\-//M*S4]R5,+L*/]??EQ3FE>C:S/3HN5TJO[BV:B\6Y1LNYF<> +MW'5[LZQ\M[Y\N;@.]]Y^\W+OEN?MDPN&M7?7U(S[Q?.]6_T]GU9YU;O"O7?% +M^^]RW)7NO2O?\VE8W%7NO:N__R[KX7#O77.6=O7QV5\_$]4^41$AWMT^>_GJ +MB^M7=7G-@L7EQV?X;)]+&J=EM!LG:#7\T^QV_M0Z_J-SA[>'QHAIO_OB-#L> +M=L]/L^-Q=X)+>.<@^^RAW!-*.7\.LA_#^9A3HV^N7[PXR_JLA0=:&'IB[.5C +M7G+[W<./>;C>(3P^6KM^HW;#1NVBBLGO]A993D/44R3@=[N;V^O?C&AY]H,% +MBY1BF/RLJ9+?W=;O/``9K%(_>9%3I3#7#E-!E7JK5%#%N'M1*T4J%:N4J93H +M"H7I*U5*5,I4HC!]I4J12H5*%*:O5"E0J:<2A>DK5?)4&JA$8?I*E9PJ):,K +M4R1GE6"CA*"M$$SB?J"2U[0D).Y-XKZ?93A6"KM=K83$O4G<%RK%2=&F2DC< +MF\1]WEW72@C:"MXD/IG-6@E!6\&;Q#T23PC:"MXD[I%X0M!6\"9QC\03@K:" +M-XE[))Z-R`WE)G&/Q#."MH(WB3LD/NDU\9R]W4>EGDI@/(?V;B&5P/@8GMP2 +MI]B;C50"XSG-H@]3P=ZKI!(8SWGWFUHIM[<ZJ83$<Z%/I;U32J4P3_Y8J9_U +M/4P%>Z/ULGF@M=(@T.6AO4]+)21>YA3.]);TXFU>*B'QXJ3FQ;5WB54)@1?D +M;`63-^(N2-D*)FV$79!Q*U`%41<D;`63-((NR-<*)F?$7)"N%1J34`796J&A +MFBI(U@I-PJK2V^OBS2!<7AC3_ZUJQSWLB"X?,?`CQ'?$)!PQE4<`X@A8+>%Y +M^3YX+H%^^5Z@(V+3E/M4!B&;SMVG?`LUOGRO&B\(X?*]A+"@ELOW4LN"I"[? +M2U(+NKM\+]TMB//R?<1Y%`4?1^9'F86C#,Q1I@J)/VCTD/B#YA.)F_V]SQ`C +M<;/D]YGTA7-P^3[GX"@WXSB'Y2C7YR@GZBAW["C'[B@7<>%L7K[7V43BYJW> +MY[8B<?-[[W&`_T:8>5Y8.N<;]O(-<;H^)_T>XUV(44W/.;^S#IYS?O_?.;\\ +MJ>))YOQ\-[D-O[JZ/<FNCQ_<79]FS_WN^0\[P^JXT_%=7!14J:-2QW=I4:B5 +M!M49^"9/A:M:Z';5%(Z%Z_EOS<T4ZA9S4]6*?=,O"K5*5I7,-\.B4*LD5:&7 +M?N[WM8'1_)_Y[]Q+S_B]HQ6$BM2\7Q1J%<C>O@F+0F<I$VWK=+]85)W?#`Y[ +M%ZK%PW7+JI;?NVBWQ,4M<5G+[5VT6]+BEK2LU>U=M%ORXI:\J&73P$6[I2QN +M*<M:_=Y%NZ5?W+*J5?8NVBW#XI957_+>1;O%=8M[W'+,+NU=+&YRRYN6LG5Q +M[V)QTQ(";CF'+NQ=+.1V]A?/_N(J9NM/,F3+4X;P^;,3_%69?DKL/=\]>_GS +M<Z1\5L=[WDYRNY-\4;-&GC^[>?YZ]6N3S[GY]<,/>;C>8><_6KM^HW;#1NW& +MC=I-&[7+;]S%?G=W<WK(&+V[E->[^T^DX_VTO/7JYF=W9W7<6AW'<*:XW:<O +M7M]>G(5]YK[W_9+_1VNW;-1NOU&[PT;M[O^2_\=K>"N-FW[)_Y_GQ(S;??V1 +M_XT/J$SA_0:M;\ALT^_?G%1_N]/J[_1FZ$GUMS^Q_I83ZV\^L?ZF$^MO/+'^ +MAL?O[]?TX^N'^[NL9_W=W+Y]33^^?KB_#]>S_KH3ZV]W6OT=3JN[_6EUMYQ6 +M=_-I=3>=5G?C:74WG%9W3\VNG1B1G4Z[?J-VPT;MQHW:31NUFTF3C'[P^*^F +M(,;RS6W=VJ//SZ#9'#13;J*?A7U99V(*_L</7NV>W?[RZF7=R;6L<9Z3[><D +MSR_5U.E(<_GZKF[?"V?%.+/IO6PZ!HT)T`QS\>YFWFF73A<R\WMVC9KR?/W\ +M]LM7=\]>S-L;TYF8'I68WDX12%Y-2GW]]/F+9[?7=U_.FV'S>5+.1/5^HMJ@ +MW;)1N_U&[0Y;A4/=5@UO%L#9H3SS#P'\\8]__-U$(7VW^\L4WXY_OYD#73]] +M]1'_U>#Y]S7D_XNMW(;555Q=I=557EV5U56_NAI65W-N=W'IUI?K[KAU?]RZ +M0V[=([?NDEOWR:T[Y=:]\NM>^76O_+I7\^+YVWH(Q$>>EM_5A\R/G#!0^T*I +MHS3VGE)OI6*E;*5DI6BE8"5[AK-G.'N&/<*>8`^P]JUY:WV2U'<?5R:7JW_O +MA-+-'Q(?XR'I,1Z2'^,AY3$>TC_&0X;'>,A,@UL^Y1WDNOE#_&,\)#S&0^)C +M/"0]QD/R8SRD/,9#^L=XR/`(#_&/H?'^,33>/X;&5R?KOS_JO]^M/;KOOOVH +M_]ZMW<?M6N^V;+WJPF:M]YNV7C9M/6_:>MJT];AIZV'3UC?55;>IKKI-=753 +M5=U44S=5U$WU=%,UW51+-U72;75T2E7]^:/^^V8A\Y!VWS8GX=OY8/6T>W?9 +MN4_&_]Y??C=A:JK5[O^V_M)$V/E.!3=0Z"D4"IE"HA`I!!IRGH*C0-,=37<T +MW=%T1]-=HJ&.MKM`@:8[FNXZ_5!&UWV2!NY,-)]*!6,GP<PR&:_>7?[LYK:* +M8_IN+8E$5Q*C3/0DT9-$3Q(]20PR6C<BW8B,,M)TI.E(TY&F(TU'5SN?=ZWK +M>7JG61W/NU6W(QT(2#GP_,#S`\\//#_P_&`3&.A`8&R!ICU->YKV-.UIVJ>Y +MV[[;-9&/%R^O?GU7.SY>[$&//GADX.F"=\?`\^(8?!X#SXMC\'D,/*L(TE($ +M:;>[>2W0C1=K$50<AU)Q?#^4CX'GQ3'X/`:>%\?@\QCD71P#O6.0=W$,](Y! +MU(74_MT<H_U^-N+3U:OK&:#]/93PO2+'6?4),6OW\^[?7E]?W;WX4@.HU+!& +MV(>P:>K?RZ;?/XKL5Y,YU*MG+S^;9.&Z>V;S>\64M8?OU'OGZM6;F>3K;U)_ +M^_TERZGS:7?Y5BPW]7Z\G'Y1D^Z+Z!8X_`C4N@?6\@_QY3@&[W8+KVD<Q?B! +M?OI1XQ@_.-"H,\<^R+$5O*:7=55[5$QA(W[?:?;O8,W\7M;4[Z\O9#%Y<L_N +M$$7>?8]]4/T&N_5]O/CRYK6Z+LWXGI)K7&-0SO^KJTJO]WG_/TQG=`^HZ1]C +MS(7[]%W-5BY-[GT.U)DK'^;*A0_S]MN:O)ZN=U?/QHCA1VRE__:'%;.G>$)> +MYO>/W#X:7<V)Z?HCE^7MR.S:^/7V`#AA'R4-'.6`D<(>_XSS'9;S70XF-^Q/ +M9:.&LB2"^?"9^7C[9[=7>YUML^<.IJH<3$S8GX59K>-T:D25QY[\TX&P35^& +MNFY3CZ,_4,*'1%CWQ97E$Q\4)]+TDS3M`)PJCT]O7M_M2:1I43C0$!-KO."T +MF$7WFPC[`\GYI<!\G`XM64HL'PBJ.Y!)U(]GYY7(W`'=I#63C"-WBY$[06'Z +M3;2_;]QI;[J/'_9\G,JB\T</NW^:ET\\:M#=<M"E#OKJU[^\NKV^>OE\7PV: +M4KF#,1OHA[ILE%<3T,;J#N`?EF"?CVI:#B(=C*:LP=N-"FV#2-/!,XOG'M_C +M^3B<.N>[_7$?W?O1PGKWP=WOZ7Z9SB#ZNWK?34=!+9Y[?(_G(W>JFK_9'[?9 +M],;(D4ZOPN-8$TC]2L^'?1O8.#.N`.^F7Q]<ZGD\L"SW=*0ZXCFT9XZ]6L5* +M\8&>V,D^=>@O/]N?\GA@.._IU;RTXU<D=8^HTOV=JAY:*BNA/20KZTC=`%+\ +M"FG#$9,6%]H^_^ST./8OOGQU=W7[Y;ZJAP/$N7ULS;,W3)NTEVP5#KC)K>EG +M[$>P?N3IQ*;%,(Y^;B6[#WOLTK9%:?N;W?7SW=\[>/BF^Z!N-$,CNG`?/'KY +M!!_VW"77)QFXVZMGSW=7K_8%X/<=V6:UW!*&HNM[?)-NG^;"R-+Y8H5^J6^S +MD?Y@L/V!2Q07L'&'K@UA0!A9U1QC<\Q1_"S.^]GMS1?[FN\.9)K63QD;+R9* +M:7`#L#M@Z+1/P6[)V?<X*2:RD<Y:C%J68\!+:(Q_3+>3==M-)Z/4A\\_0__V +MT.HUQ\8=."IA.1MIS]LRQ(6XG/*R#Z4E?S0D=P?BP%D)83FE2Q8\]#/,:3)$ +MR@L:FUG20.A74KA^^7(Z<F7M_`_[G&Q4;*0[^]NR@!W6*+@%\3_8RL(*NCU# +M,C;3_8UF%E[VH3FP9OQP?S,7'#^WE,,7UP<6T1\D`12ICTWW2YS&A>_>)N8@ +MD'0'D;LOG\0Z,3CP#=T'4:O+^VCSH[;$.J\U\&E6]2#UXO<R$N/=2]V(W5(: +M\XF2=OWC<'?#69+MPSA]N(?S@[C.$67YN.?R-0H\YFXSGXHIW0?=[1<#S?F# +M'V[62Y[/ASW<;-#1M[@5;N^YX6)_*MT(QW*0VC."=/T^<MQ(Y_YBJ1'KP+SU +M)2];#@>*G/;#:9<^B:6-U_#7=`AR<W&J>42]L&[1K9\]5O!+>84#O;&NN872 +M+@;M#Z33?1+[P^?A5';#4B;=P;18.UV_&&&3&?WIRH+=;7H=MJO+:^1T^YIL +M$NI&F8>#3%;KQBAH,TK>.F1&L@O+;I:#K_W#7[O5]/@#ENI&:<:+?;1/G?>? +M+PWS@W]/JN*=3@.O)N;!OQ>G5/'F]=W5[<)X/OCWXESQJ(HOKK^XOGO%^;E_ +MZ^_%:534F]&Y'3!>7S[526B#CCNK)X5/BS*<2U9/_/:<ZNT]QW-[CN?V','M +M.69[NJVG(9K6D=B%8Z]3.]J:,ZH[G5'=ZQCJK).FHPZ3MO.B.1*:4Y\YV)D# +MFCF?.>H(YJQ3EH=VD')`!`$9U$.//>?.Z02S.M*(%.IAR=-WD>/?$J?)Y=4A +MSX-.A,XZ/KJ>-3V[ACJ96L=8<_AUT@'9P^)8[2SA)>1:S_7V]3CPZK-G!)O= +MZF3RS.GE''6N<]$3AZC;V>O#_(L8=:0ZSWW@]/=.9\5SP/SR+/JHONAH^_2T +MU(:G%^4UH87^%LU8WZDN`%-?U54[HURWU<.MI^,3=&!@7V6IUIQ.Y7-N<0I] +MQ1T3I3/DLQT&WPFED?/>P:@@&H30`D"S8#FVZNF7SCGWG',^#:27Y`3.U,XD +MK_#L=;1X$CKM@'`[Z!MX"IV<UIV$S7)P).)\,/==/6(N<&1A1&:1WD;TLT+3 +M<VRYYY#S"5FH?N+LP\3PD_33CG!W@N@@A!8!-`F?'%)O1]N#S1F:\TBS1%"Q +M&`3%-"-QQNY015:08>$$<N$OS?BKB2@!L`>`PXS`>5@"H!,`ZVO[(BOF4G^# +M:3LB03MH7?+H=50EIZ0[9L5IGIW7J9%.-.1JDX!1A.F$1*-+(1!J[(T9@Y#G +MH,2)4`N@9"X]0PP,,:!E.M1^L-/I,^`+G$#?"7U9Z`M0(\?!@SZ!KQX*7X]: +M#!SG&3F&$]D)>IV`-J$):56@)7!F,!/*(CSHA+*)]9C-BJ_I%UNZ6C=+].*\ +M828]$6325Q*Z6*\(:U-!`RSH0.$X4:%N!MT\HY7T)C"@7,)<%.:B(`?B(I0G +MP$T$0<^BD"QEDBH($VI%C3@==.HX)U48FXRV41TTY4"J&,Z+XH8&,)&Z*,Z` +M)JISPEL0W)+0UL-R9H(C+%<PPH-980?1P713`;%5L'GCN@ZX]>`M+\YU<;MK +MY46\C&N0<156HOHKO(GIG(C.`3^,L!?J@HQO%.BR0-=C>SM1F\/V.LAMG+?< +M,0<9NY.9C,R(,^#-D&\VHXBG43@RMMBLBN8*B$NP7`!Q3H@;A+@BQ"4A;GJ? +M2%D2Z;%$(#60.:]596AD9YQ!5OU)0MFT)PK/1^Z?6[A_#,QA5>3U#7A]>4:< +M*"T(DY*\*$Y0PZ`&`2P+7P-<%HW+>N#E%O#"M1&JL*$<&6PG#@M1;D94C8HQ +M<A&S$L%JI+$*)\@LPF%)</+S\H:(-@F:2:HD0'7"41:'3<#0"#.><0-1,J3) +MXHK%!*8`AT%BDPW$P,ES<\)4Y:ZZ=`((-/WRTCHX*S\%F%ZB,+*K/>U%BW)Q +MA1M82NZ8$WB"L),%G0$[6`,'X0P6</CC'O%XL]B8;(^T/;0L\YAG%-45GHJC +M03B*PD\0.3DAQ`L@<>\<YX*9FV@(1S?R%-%,#S(&'"HO\^9A&N\7V$BX&@ED +M)5@PT9!8IN!#99RHN,!'T'S)VO4R=EDPB8))@'.:J=,,F5<?97R2M*`(9Y5C +MG'GP9L^*8<.&!=[T>0]FX<M&*P*ZX2/)/Q(.G;P_SPW>X=2V*8=^/(%7G>@> +MT^1P<7I<G*RYKB;FHAV,[3I"O$Z6Q0([YAJ3$C$E0<H?Y@F>999P/I+%,5(P +MZ;QFUR:W1_<=<YKF.:U3J2G)$+;:JE.:<5]L3@OVQ&*TP7QDI_D,YIW(A\.< +M`C'U!B('S*ZSH!\K[_##Y=22!ACD?A3-9D"!L0&8@(PST>%#H)MU<57\G4`9 +M5B;0N3#LG8SN%^>I!Z8S<K`\XHJ07))/E:3H%H\3CLD':+,GY=&D22&#YBY) +M'8MF;C#69NX<^NAL]GK-WF3[;?:P9@4O6A:_6&1M7B9N9B^U)+!^*OV7VT9E +MHGMG^N1PLIU@12SB9)T\U"^.+3+0`X''K&]S'"`/L&@:/7D88HQ`@-MCGWOL +M,W99YYG+V4/7(X^.2F%(*:63F<G-"_I%L9(S0ZRH2CR,EC:7KZ#8(*SE5DAZ +MB&ACBR9D^HJ\E")J*R"YX"\5"*N`9,VFQP![,[S]4_.7[,A$\93Z*L35D?2R +MYTX&WD&)#H?%P1&>!W@S[;@'C5I[''@/.`->1<`(!3C.<FM2^R"UERZ:_606 +MR4MHTI*FJD@/!YPI#*;#.7?5*Z^X30`H&W?A'V=<]ZP>93THR\+7F2CS1%2O +MHZ"-!<^U!S^65[&S(*MZJ-..=(GR2\&,F`?07N/R6!+S;%&M0-0@H7:DA`** +M4E/3M0Y3&=5NE$,3I6Q1>(Z03BR6$C+O@BRLA-U)V%FR#M(*8NXD\NLMZ('^ +M)LF37<BP;@9W+7_CI!^*MT1R.!RN)0\EG%[NFNZ3[EJF`6L),>ZTG0E%8AZ= +MI7LL-4B2R)$(<+"'P\?QG:6D92&]N+VR8)+[$36IP:*6H&1N9;K*;SJXFWS1 +MR'3*V3'_+:V,M4LP3R+:D3)89)%EGB*^(]-`QL,92?4MTUMP,PJ2E(M`%BTT +M1\\2@32+I0#83F-UBC_=(-=%-@-IQ1;;H9J>#GF+^LD+!5G54#N&"^"0Z<1& +MYG9W@KJ7;R9JCQ)-E/V+/9K>[`*TE["R"3")6R+..)8_"?*1A+DS1SH@V4$0 +MS4]M$M"`"B2UY-228\G"(2HY$Q8>(_[FY[)VX4E@>>QZZ-#T@((O#VB_FA59 +MJ;($7!*>7*-9@Z'EN2U`R79XK62N(%6H&W!'>RP??DR$;P<@UC=SYV4[\(91 +M2%LN@*:<](]T?D:-![27K`/$2Z;!68K!MX4CUH=L<2"0.8Y8O`CS1\`;95>4 +M11>FTB)GU$-'&91EC&O&N\M05?/?F;,BTBF*YG`4D-=3B5[1C".(<5A.A^5T +M6$=;K!.U><OU&<0*$"/=-^FI6%\I98DGRLAG`JD)9[9&9BMB$$F2;Y2TV)-P +M@A,SEC6K\IA[#`@+`=-2$@`L2N08=F11!$/SLHC:43B28I*M`Q0.FZN,@^"2 +MD$^PU1Y;:`P"3C2G)^(-1408L2[FFR86#K1XY\S![%K^FE"">%Q]*;+IA58M +M7$5!L>P.[FT!&N-P9/J=C).MA+$"YN1U>'E(#0<D/SW)V6#B-X\0MIRV7%0= +M,G0D'(*LK'_+F-HRBZ4UE9@I8+<(;(6H7<*R8)&F4)\Z*I*96+J6N<R6@Q0B +MM<)GZ6Z-"7/N6$%V0TM<1RQSS*R#R+],6`GYB"U?@R7+MCYEJ(;+^\XZAT&4 +M#9/RJ&VYH6(")^_-*3YP%GHZO$!G"T:6+*,['M%[P;E.=\3_QZ[8JI%;R`-K +M%.6I15NUEG%&',V#Z;%29D-8#B1:;ZB0V<SDN$%;4;;!$Q$;Y;$H3'*)Q3<" +M7-N2@+6QQ;7`BE8`!W*MHJ0>];GY%?ATB6XEU"^99C:H`\#,`S.>1B854B0T +M\Y<EH<(*C<)(T6"Q`-$6?S#K3GUV1!`M@(=E&YWA$P<8>31_NVKLR,1$S4#B +M20FJE9?@\!)"H[I,%K1%T**6K-7&MNA&I+78/J`Q]E(DV,ARQ+8:18@E/\*S +MPNX4K@<I43#C!'U%XN!H,T=7;95;6B'<LF!HFR0BSE]IF;?>HC\41CZ"N$U, +MAK@=7.9HP.$GV/PY9MP65>3E-NVD&P%E4/I,$UP$:!QG-K1,)"9ZB19)69J$ +M-7Z8WW++(H="K%*P005_-+%$CQ-,<HEH"I[U&"O;8A'PG&S/SCA!MS-LK:\L +M^H$Z>1%)$$NXD9G)SN0'L[D'!6Q9P@9QPT6VBFKHPK7W>K#',`6VLV"2;)5] +M%/2K*FB3C44B<F`RLY<MRY'I3,%T%S&0V41];D$;0;FSM`[I:4FT+7"0_+4- +M#[8@S:J!=#3S%.(>UIL\5IHM%TZYY/)4%L39?@49QQ;$#2`M$I1:^(8A[0A1 +MB)2342A?95D^DJV^^4B%[!5Y2<<6J>;S"2J.'6;R'90"2^IVD;MC^2_?ME1$ +M7(26:B9DB_*SI%1AL79`'Q-10%,ON99%3VR;$30;\A!*HWQB(@L,"0B\K;(3 +MM042*=)`9J%;,"+(T7:AME!)LQEMS9B`3-ZU6&:YH"4%(]G;1AD!4+,LL&D0 +MBGD6^[5PH#T9"0]@`IY54+0<A+Z`P99"1MOW$C%UT=*]NC<!BBS)9Z17>$PA +M#6OKXMA41UW'/'KY(1X;[XGS`B8OL,(<+!,96&^;]O?.(Y+P;3-$,@Y#'!G' +M*D,.G<Q>401<+-;'"N-M2ABF*9"2;:E;I,((IW&6;>.0):G)0-H2.D-.+&(F +MV[65\6\M7=4,B4!:B+(TW3*[CM1@@HT<VU.TC<RS<<[V(5F^DW$ED7FRI[/P +M)H';4S1LGM%2Z3!`<R0);#V9L`!S1GR6MOQD_@8>D2WT$K%8PMJKN:+5!G:_ +M8&_QAPAG:*!9*EA7/7-Y@;1A]WIF*1QXQ:"P,0DC=@O(^EHR!PVPU5TM<EH\ +MC8X$G-S(3E?A)3LPEH$2?K_E*?G"X2;:_A./[VWI'07L62H7Q-I1RD12C!2Z +M6ZXP(<M$0$:T'J1PC:$SKKCXS-BAX-\76L-<]YI(BT4]:NT):E'-%FH1G;4U +M8@U#N`@\QRTV;K#$+D)T6C'RA(-MNQ;A8#0+&FVBE/ZQ#`[1.Y$M:I61GX4V +M!"RL9V*_7,(GR(B?C%`O2T/4YWQ;)A6E#=@.F$:Z:1;>=HW0,TO("Y7D)-CR +MZN)BRRMN&UNQ;4&CL*9M&3;(S].QB`/4<AVLN;.%VHP^$&;:`L3!QH1NL91M +M"62Y5*SXLKO4MB<'`A=VQ9&'9%ERDB.D56QH%FB@`F@<^9=`YCE89!8L><FD +MLA8@:F+75E+@9<;5^#85]H?8AKJ"@U'DT13QN4)/BY9LT<W4R&-6/!&-)R7G +M!7U3J!:L$X-B%@4NCV?J+=UFN2U+IV.4(N)O`"#(3$Q=PAX8A8AC+<?5-L9; +M,I=-4[9LB&_#BHUMKDU,*DM!;/12X[;L3V*<ARD^=I:U[5J*P_8?6:[*(G5[ +MCP0D@H^A[M,D)>Y8S/6L+[K>=JRUC8UTT[;9VYJG;04(BE78.F\>AGJG/D53 +MU$+"LCF='9DB-H_"-J8!MFAHJ5/EC#RZD0A82>^((D)CP$+$X[2OQ#9!8'S8 +MBT62))KU4W1,:LNB8TOR=+LOJF,U+^:$MG<%TX-_Y4%A:NM:&:%9=I.=W#A> +MT1A$HN&E%5O6B0LE50A1A$MP"G",*PFJ-)UX8^C?9%E)<UNL@ZPLE"(D!=K- +MO+"9D%#.V`I;&*"+EE,0E49U/>$P:RF][8IA_8-5<=*1%GZ:$\XV3W+4MK_" +M]!<)1M2/I0Q+?M@"',99GE%N(2ST:3E\<:,7ER%;L^&-\<WYL->\;`,6H2N) +MSY9X,`\)@&FFQ$%M<0&4V>YS3U@2L!$M*<9NXL#>FX0.)$C-MA<49%U$FI:9 +ML<0!6W@*`U**TZ6VI-[V#6M.6^!NV4H;#%O#>.$@6X!F6HO<21`(.K8^"A-% +M/**D&<,JL]8;;$,(KXP5,D[!7&=10M1?>]E+?I%+S4&V5P3(_;%!1SUN&V5L +MW+9DZ^B:Y9NDXZ2EB9J88UO3(M)R]D*=[>EM\K7E+MPTND+(8*Z3GF.AK=:. +MM0.Y;QE?>0@!D`1;;K,7#7E["J>RA;21%PUY]<LPPKA--?%GQ!QMZ;*'B"PW +MP,J]O5%HKP9JP99=N;9BG4@[V99VSP*K;C$B;/ABUP54Q?.#+7@9T!Q!9Y;X +M;,81N&TWMGTA;%7%-$3;>FCK<K8U`>_(-L@'WN0D@K=F9,BSV2F+HG6+A3OD +M38HHQS$Y60(V2QL-:H$0T';D>U;&;)N`O?_UY">?/OGII_\R_<Q(_2F7\:8W +M?_KM=]_]Y[>7__[7R]MW__'7R[M_O?ST#W_ZY@]__J]O?JO;+B[_#PQUTQ:@ +#^0`` +` +end diff --git a/usr.sbin/pcvt/demo/playvt.c b/usr.sbin/pcvt/demo/playvt.c new file mode 100644 index 0000000..d0a391f --- /dev/null +++ b/usr.sbin/pcvt/demo/playvt.c @@ -0,0 +1,111 @@ +/* + * Copyright (c) 1995 Hellmuth Michaelis + * + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Hellmuth Michaelis + * 4. The name authors may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + */ + +static char *id = + "@(#)playvt.c, 1.00, Last Edit-Date: [Sun Jan 1 18:32:22 1995]"; + +/*---------------------------------------------------------------------------* + * + * history: + * + * -hm want to see my xmas greeting ... :-) + * + *---------------------------------------------------------------------------*/ + +#include <stdio.h> +#include <unistd.h> + +main(argc,argv) +int argc; +char *argv[]; +{ + extern int optind; + extern int opterr; + extern char *optarg; + + int c; + FILE *fp = stdin; + volatile int i; + int delay = 0; + int fflag = -1; + char *filename; + + while( (c = getopt(argc, argv, "d:f:")) != EOF) + { + switch(c) + { + case 'd': + delay = atoi(optarg); + break; + + case 'f': + filename = optarg; + fflag = 1; + break; + + case '?': + default: + usage(); + break; + } + } + + if(fflag == 1) + { + if((fp = fopen(filename, "r")) == NULL) + { + char buffer[80]; + strcpy(buffer,"ERROR opening file "); + strcat(buffer,filename); + perror(buffer); + exit(1); + } + } + + while((c = getc(fp)) != EOF) + { + putchar(c); + for(i = delay; i > 0; i--) + ; + } +} + + +usage() +{ + fprintf(stderr,"\nplayvt - play a VT animation with programmable delay\n"); + fprintf(stderr,"usage: playvt -f [filename] -d [delay]\n"); + fprintf(stderr," -f <filename> file containing the animation\n"); + fprintf(stderr," -d <delay> delay between characters\n"); + exit(1); +} + diff --git a/usr.sbin/pcvt/demo/sgr.vt.gz.uu b/usr.sbin/pcvt/demo/sgr.vt.gz.uu new file mode 100644 index 0000000..099c3a4 --- /dev/null +++ b/usr.sbin/pcvt/demo/sgr.vt.gz.uu @@ -0,0 +1,11 @@ +begin 664 sgr.vt.gz +M'XL("):V^BX"`W-G<BYV=`"%44U/@T`0/2]_H9<Y:AH;MMT5#?&`L*D8^Q&H +MIYYJNU0BA0:HO]]AV18L&"=D=LE[,^\]&*Q-VXP&ZU=CL#8/)!1OPEW!-'"6 +M+[X+@9A[_LI?S,$3L\4\7`6.>KOQA!M.`W@"$;JP+&Q\1B/L<+@U#"**[>8H +M"0ED<4K*.-W#/M\</^,MY#+=Q66<I0:Y4T7TV5NU)Y3`0UV)DR3@E&4>?YQ* +M64`610V'(H<BAP(\9\FN`1@"#($QP'NZDWD2I[)!.:(<T0F.(?*%=AO00M!" +MD`$$\EOF16N0VM7BJA->2PY[UE.;*Q9*W&M65X;:EB*AE*5)'3FF%E6=/+2" +M]&QC:EO5R6.;V5G)%;'JA)J7],.^I#J%DJ?T*FUO(J8S*1]T?#W2(\+U1&UH +F\OMC=0<L[<K2KMCY%_UKC%^LU5+\KSQGT6K:P/H!L`MLDRX#``#2 +` +end diff --git a/usr.sbin/pcvt/demo/twzone.vt.gz.uu b/usr.sbin/pcvt/demo/twzone.vt.gz.uu new file mode 100644 index 0000000..df05d50 --- /dev/null +++ b/usr.sbin/pcvt/demo/twzone.vt.gz.uu @@ -0,0 +1,350 @@ +begin 644 twzone.vt.gz +M'XL("`PIFB8"`W1W>F]N92YV=`#M?5MS'<>1YN-&G-@`?H!>VK$7CV-WI*Y[ +MMV%Z!Y8@'U@2Y1$XJ_!X7R2*MD00D"%1XO'^^NW.S"_KTET@'V;?K`@%#[JK +MJ[*R\EY96?_Y\-X__>Z]7XV']_YLS(5/Q^&]/UMS8?WZ(UP8M_YKPH4-]&.Z +MX`?V(DS<@AJZBS`>AZ6/Z<+2^Z4':FCMA9_IB;\(^-30-V:^,./Z8[YPHW0> +M(_6R_+)1&GL>>)2.XT6DQOXB"62.81[I8^[64B_+0(#52I,`Z!B69:*&H$L" +M0I)I+="B$WLQR:N8Y)6=I3N>FKN(CO^=91K>\[PL?3G>K?W\84'RV?+_?QK^ +M8_\[_$?W]P\`_P'@/P#\!X#_GP%<1?A\7,3EW=4J(DE.Q_GX0#\6D?M`+29J +M\86V"%%:+`*<6P1J\4Q;I"`M'/J(U.*8^\`H(4F+U,!AC;2PZ&/1!FN3&VWB +M+9J@$V.HR77N9<(X$YIX:G*I39P#L&B1FDX6;2?CS&C"./E8FQ@T"=)B@;J> +ML0?6G'82FTX<@%T4KS296\RB24*31<?7T"ZZF)MH"Y[Q9QDI7EHL.E*:\#B? +MY_7!"EJ=4&JPGS!E9]%D:D`Q6&5GT"0TRYP`K=%>>)D_RK``W(A>'"/W:4:N +M$BTZB4T+"UHQC)9U:(-?7G\EI\]&_`KY[:S/K+;3E_@1)_PR07]ILZ#]6ATK +MZ5NOWT9]ZW(O>0R=A<_M\K/<+O_2,4R&+V-`Q]`I)IVB_HCZR^11M=_(?:P( +M7QE^78`5BR=A[RNV;O%@7A_,^>]P?+;^HW]/QR_(.-0'"X$LQ&=2\<0<%UJS +MKGCBCY=DJ.8GT_%CM@?Q9.',(QO%VB:M_9@"F(5(/F;K4I_,*WRF`'"AJ(]` +M*?>@_Q6>HLE\_'RU2?7!0K@+2<:B15P?%'-:&&1%5/'-PJV?D9&=G[AUG/)! +M6E&C<S0RP#DOQ+>$HP66#P31KPDF_)V.+]BI\/)@I@=FY8H/9"E^H.&2_+VL +MQ(_K/!=2_@`+\1U-*^*!/W[%ZV#Q)*U-R"S_``OS%UH&I[W$]<D"O--NYA76 +M!>F+9/P`B_<M$<'"%!\`I?>T5`Y#+2A\02ATF.*"GQ\)R_AHP>!W1&W:KS_> +M$3DZ/(AKMPM-.'UBC]^L)!V`EF6YOX/W\P'6^WLB6H<VL11WQ.CO$[*G]5^W +M,M3[3&?\@B!ZGY"P"'AN:B=YM7Y<:KE!A)M;L?P^+3)_M/Q8]-'[!#Y_;4D! +MOD^PQ4G&M%&&6K#[?F$+0&C&=1G7I@+FBG4&,\BW*Q.M_R9,+/'?;I5/[Q?& +M`Q3+:CMPCX`/'7I`)6-%0#ZNB.>VBT4B"!@K%>%H!M26$>"HZ3J>C&,RYGGZ +MAEQ5QI4#7EDW_4YZ32M!O@\?64#A[A9N`E8C'HR"WH257+CD_<*R^9/0@%MI +MC7`@*^+0";G&[Q/58*V<E1\&O4;%0:R((`BT"Y#XF!'HI=?5^<<BR;J"<%*! +MV=J4`RCK#RP8?H!0A29`<RNPDR`]`VNK;I-,;`9('@0["4'(,!X+""2MI`V\ +MUI;<2MG49`(/34!L7(4$@Z9<X"(H&908M%]7FFY!\+>.3!^'5972O[+41@:, +MJ\H4GE6&1*=BU6"YIE5X,@#<VR3_6@L,3\")EU<K3XP\<@#'BIGY(7<;\XQY +M95>R`.\JR^GJ6^T?C;V":RKS=5P-3UHP:2H@1="'DQ5=&4QH2E?!`U@QK+^$ +M,$B"1_XBK!:E\($NEX=4P')EAH:$$5O\J&3@519YACD!!>!:D#UWMF`"7*QX +M%</[6KDK"L%&95HAAJ3<-?(Z!L@B@P6UNEJ^M*'76)A0.__K!<M61DE@W2@T +MD;*HT.G7]G]`BP1=,%Z`%@4O8S'M")V`M4.GH:36E8Z%PH-RRRB"7G#L%<=X +M(-(G0KK:6A5XD%^"%K0RRJITA2<F0&JQ8A"(#J*E\054\GL0)JNJ&4SDA5(C +M6D:9_:JKI,M*OUH+]6+DQX*H!,),8.,LR70<89&@&&"1_8E2JJI3[0W:.N)- +M%+X+&!FKJ4I;'+.G*EF4T:U@406*8EQLBB0#3D+%+O.J>(3@U5F$WZK@+,A( +M=+VL&D1!U,5*@%75B_,59D>H"B\P6BL(!62K72<\DK0%-!"HU=7:9<*B./EV +MU87@"LA'-3,"NE4BQ'(Y5Q%LPA*K%@'1*Q\[\/P(VR$*I<1L$;EZO4*6QTY5 +M'*3=)%RF3*UH\I`8BMI8:4,+V6DOP.1J1X%5$\P:KV]&,1D4V%#%#@)W%K`& +M7E"APD7E(6Q1`WLG0KBR?QB.OV/@H#:<=)0@I=0\<BIS8C:`!S*G,;4$ZR&I +M)H-N`7\ZJ+9(#I9JFQG*.G<BO!9T<J$P/#]BF:J$I30!RQ=<$"#,5*E,JS=H +M0I;,(D7`H!Z]`2LF*^1Y]1-#EMAL&\R0D!8T,T+PI3QN.OZ)[0FP5`#2)[4` +M0&#:QL=L9EW2\@&U`4,ZR!7U53PZSE\[\K9=]C:BF.B*;B5ES"T;#'9UNJ,T +MQ:).JGR41!+X+]IL'M-VD*(VP:8`>B90?\`395%#P8C53(4245$6P>!J^4,, +M9F,W';_D-Q!N3F1:4.,%+)C='I\M#PHB)&BZ*.A1?C;Z1EEMS.;@ASQ)C*3V +M61+<J1@5T4N"%B8J[^Y9]4?$H(:!IK:_*KM06&%']AE!_T;L(2%93!7&C;49 +MWXNUR1]#WGE11VH?`9/JR[C"_KEF)QB.':\T)"^LVTDT"JM46#FR/:H\JT:L +MR*RDLP'/JONQ\.H-P2:<*&P!=P$^[DK/8K3[;+(\)32JO:.R**G]+IU@^=0[ +M<08;G["50)K*EU8-3[5P?%;K7[*X55,@\DP]L*2^(=2\S>;+)\Q*F.&$3HR@ +M7`,%22A&)>=BI3S%QK"(7=AE(%6U+=5SR(M,HE/%U`0CRZF-+^QH@%-_8;/- +M07O5F<T5Z[`!G,Q=G:9L73J2V7,.T!C1@)/:&&J.H#N5!$[DEX?_%J`V`H2/ +M4UM<M%`H[(2GO`#B#'C(:+62H=NLNDF%-7#)8@IM#)2:A2<G'K:'U9'I,U#$ +M,5O=RNX60D]M9XE8J-$T4]@,S+8J4UCN7K71WYGP5,>IW+>J*+]G`:I8PNJJ +MR(AKC,^!85UV<[63A2:_886H/A-B0,K#X?@UJW.1A=F*81DQ9P\L@=9=H1B_ +M8AH$_$J#8]9^WS(EJQ,&8[G0-:^)=<"T"7C)NLQ2�@(*`AB1&JTL1,S`$Z +M/;N(X_$Y<Y@&/<#L8Q;?WY)F!0*<<&<JM-H;0AD(5LT,'@8ZT@"XPN\Q@@4# +M9:P&9UZM>0VFIAP#4#M2NC$N,X"&X91/%P[XD<#58*G&4:>L*+[CP2';H0E= +M(>%N264)BZA9D<78O&)A-6>$*354E[&=B`5"X7:I<66S//N>T0Q=:!"T*!U; +M[B>II(>&$W]J74C8V-I/(7M>LUC2P*_&YVR6;@Q&1'@!-@'W8JUX4$":8=\$ +M(N8K'@"KH1'5[)0P+K)=&,$BV24,1_97+*)`2EACX2]0WD\A6CEMR>;EG427 +MYS">.`DZ4D3>4>9^RBGR678-+(H+]J4<HE2P/"="Z3<F(/-IJBS/U34HHI]L +M6!6!,'Y@BGC;P&9:8XVYBX*+>:0<K)6\J<Q$D\S`^,P7`U'TF+E`)EE;068N +MC(0D;5QC=!2XX]RP.1OZ=I(YJ?4N&66^B'\!P[YPW0F^K/4\4LH*-WP@FK29 +MJ#@7K*!$SODJ-1@GQO$WJ]G!C=7H5#C7A8(,M1Z_!#L.2V\X^LOM%5A9B96E +M(@82]6!I%W_]E;2/"0.L9B1_.@&C)H*F[(BI&B<48[$V9LZSED96;4-KP3(F +M02&;I`,8=!)TZ@Y3#YC3JFLG/(,.%,",SZ0GB+7J/ABB6/DEJ#)&/U7]OW(* +MFNF<!%B+YHA1$\-]1FLM?\YL!RY4?+.V=V+]B825KB%Q$4C!_I"!`H+8U;]E +M]P9\4[A`#BW$B'?0SA;V,38[)-XY'6\(QT;\+2@*B1\;D;16#"=+OH#':T%^ +M]IZ<>$+XVXJWX<2L<F*.PL447DN*`NPVJ0GEQ*DS,B.!>^G@DCJ.F>]NF&RX +M'<(XB"KB7P=$.-&:0N2ZE0,4&MDK-!)_-9@"5+X\=R!ZB_`:(JE&HI56D`+4 +M6VRG"DX7X_=`(Z)G(^%K^#KH%XOI,)+@1$2W,;`K1XFBR=\D]Z]H7<3[%WIU +MR'.`0!C587"(%,DT$7:R<+)%T?+>OHU95]P0"0-HH`_8PAZMS-U2!@3H(`KV +MX>.0@/TC+9NPA)`G-N2L.,G"S`B!K`KXFG8*9?I$+5;6#AD(I/R>$N8A/P5_ +M%UA!D+]$=+`PX!;=.C20548`$S@E/@434)UK,8!TFN'XC-$/AA%)881T8&TX +M`0`36=#U(7]7Z+X;`D36"98QUD^(3#D8`ZD,=`#58O)@22%G`R2&X_\6-7Y- +M'AKWD#TE!/V,]BBSD<@Q8`!E81$P,,2A@2&)D1%\=;(LZ+:P5Y]1!\+"L`H- +MY\!D@8K`.`">P`4J-<!ZD&."/6S*6,@]B2A,6:-S9@]<-0>!+/0-&8`.,%=! +M0D!F`E`$B:^H``6*:P0Z\U@$R$\KDM;(O^!+Z""5$!R8,K!DC&)7!`*9`*Q- +MD6>_;CR-GV1K=365:#/J$WUN):Y9-(4UV38-;%L5+9V8K_(H&\ZQZG`6ZZEX +MQ/;VI,]*PS9M1F;;VTS5B]+0M2548NJ6C\22';<]2URW_'R4<Q+%YVSEUC.8 +MQ?XOGWFQ:S?#B(U9=<"F?H4\*Z<,RG9L4/OZ&<YP;!$R\4AEXQE>1OE0/*#R +M$=N]53,GQSE*(!U.7%0-#8*?S=3%WG8MJ,8W3<V\]^W-'R\_O$(+LNA^A3S% +M_XET.0=J?PVP?LL_'#4FL_%#I`O^^P$[(;]`UN^O]=$K]/1_\-V?T>@%AOT. +M@WR$03Y`WQG(OP&VVP->6O3T=[Q[C6%_C;[O\/TK#/('`/(;S2W]5XP;-;7T +M&=[]6K,BT?=/&/82/?T[!GF.0?YR0)>_`"2_48-[1`=O\.X%AOT"P_Y"(3GB +M,X//;M'HO^'[;S35]"]H]#<T^A=\;]'COVKKO^*=:T`:*:I*W_]WA=OCT7]% +MH]_CL[^BQV^U=4"CJW*=ZPGDOB,:O<2[7Z'U2=?IG_'H%3Y+^.SV@'?_%^\F +M?/8_T.B5]C2@T=P0BCU^I]BYWRR8(O67VM,3M/Z^1"$OV*%$3[D&[O@W??=- +MLP8YP=D>?\:C'W0-%+H?&T3;X]?Z[C4>_:3X/6S83M\E_>[G#<"3?O=R@[(W +M6XJ^P[N3]OGW%ATN+Y'31U]M6WV];?6\:L48/53-FF=-NVE-#K6LBQ/U1C+\ +MN1B:5A*>GW.+>7U`Z=U6;#A+ALHB1*]8W(:U*05)K7@03Q#!Y-UXSTUIR^0) +M8J3V@)V1Y^(@7(EL?B(&_7-DC4IWB8`FK_Z*80O')^P]A+4->1&4P.J<S"92 +M)_/Z[179:XDZHZB=%4/\3D7I$S:$9H'$RA:\C\`%NB=V#CDH&+@7LO]X-H0U +MSBJ[$QOU"5*^N0]B&G)T.'-E0?3=05P>SCSRA`J.EUR)37^%_(HG2(BW\&JO +M:.!E00^0OW?86[G#+NYSR>*VW"_!X%9TW5'_LZ!KF8^E`,?R1++59@R=CG>( +M`UTAQ^HYSY4^YVVC)SRT86C""N@=#D(*"3C!#!&`I7,ZSY$4\80&IT6SE,M\ +M=T#^K14'UF)GX0IFP!713>",?<>DMG;/+9?N[4%L0\M3X23V:9W3$^BUYP03 +M.J/)4OCB"0*+S]E3<#,>>5F"94(66057*C">77]V]>G5S8V:SI<W*G:OGWY\ +M_?3ZV9_`V)=HM;BM3S\:#B#']0^L.[7AM:.?1(7%((P3^8(8G'LEA!?MB+XQ +MRHJE#`RO('U&_%Z`2>M?3HE6BYJ2S."QB%-*F&B+$7]K#)"!)/(K&I,@R4,2 +MN>8_B<?KKD/QFL223)Y6!*^4"DO@22YP:Y(90*C,B)BS:$]"BIN3H"R!=*F> +M(!$Z8X,$5EZ0P(^)J'@QB;L4:*>K1Q*TPHQ+6#+F%ZR1E:&(Q]%IJ`B,!$(Y +M^3$3(Y$L#TI"!F1!+,+/O>*'>4VP1KQ9+P?6E06GHB"5P)"T*_'%BD!INV8; +MDJ+U.@2=NGQ%HEWHT$V9R8@D$2&ZQ,3'E@RF3+F^@-\5\Q0<D^3663GIGM4@ +M8`)Z6"9>"LPICS$7R""Q>RFL&US)AR2[2S218JD;9#$0L_PH68+EFR!I6;GB +M#<G3_#>)U8)A2/S7"Q%,#7FU+JS7*VD1QKI_P1%K#?UI*S8=%2$LD<$N($6V +M"03OE*S`Q_%ASX91_$TO'F*`ESR)QZN!C)FBX"N<CN,&R\@WLO4P@$Y5J`KQ +M!(E$8`-MK0,`BVB0\TW,,;.X]Q:;?D%"("%*BX0M(<?5#(),9]V),-@"0RI- +ME,U$=I2C],]"_D:K%Y`\9R#731>G$0*!`:4)!$U6P)VP/S6B%V(992/BK(#( +MC'P\"BZ=S)$3*08DC3_EL%%"+P[3EWTO&1&(LK*&O+<YX%3C@'VP0:)3`_(E +M!N1VLMJ097:Z,"CWL*#[V4$X$P*S+,O`A,UKEX"5>/R4%V26]4Y'/HHLTP"2 +MC>"6M,6E''@;D/\`A<)KNDZ<`)%/';RP!+Q93%W)-.C$O$9GA%IL\3EH@2<] +MR]K-F0B#QIK`3M`C*(;!RV*5@Q*P,0D-&BR5+K-1DHOX*@*INF8!A(]B&GP6 +M9<!IGP%;>])11!!/&=C+VLN_'@5#@NQ\>P`LY#*AB7#8)/0Y`6$C(/$";<Q2 +M`;RHJX0E#[)ABU"5P[A@E!&L/M)Z"$,GP.9!:]BXEE<.2S`*PB>,S$+L('IU +M$!&*HYB#G$0=1!1?2I[4`"'*\PK"02)L1LB"<1W_3\0.4IQ$"`S,["%3$VJV +M<-K^(-GZ`CL60^045LD5-()(H2S/++!X&8GV,SY"YJ3J!XT&2G=&)B2P)*`M +MRJL$R@N%<#82)$Y"_BJ#K(`2-&D`BF0$"%K`1G,R%',2#G4S9/^,MLA_"!Q8 +MCP6O(]RKA(!B-EZH92Q*X(0CC&$U(AEEVAW4V00$!:4Y!$>#%*2!TG*HS9.9 +M7J.X3E.1Q2>P`BY6(JA2">!951`)V1DF)[B(J$,RBG(Z`VP1PK69OR'@=-4B +MECKC!0(ZRQ19-X^]B`"QXU$]"+(%:EQ+`:$XD0<+8[:0!U'(>5W0Q:HZR![U +M()X(]B0&G)`44E))/6N&AV;UB%\G#)2*'Y")7M$Z@_\@B+'HS@EZG===D`%' +M5`9D]LOLE?%'S<09X'->ZXG^&S8RH"(C$*2EBG2-Q1I0^2S+Q#DG:M.IJ0;S +M7'V=`0;_(/N+/(,9O40H8VSZP(A)N3C3QSS'62@'8MU-8KMDX$2XN4GW.X0% +M\$((WREYS^``9%X+4Q>4JFN&M"2U0B:99QQ%P'CL)7G*$IFQ0E:C4@&2$WL_ +MJJUF2'\(0:_:1"U4H`^@I5P.BZ)4L!:TK!9D'OOIES1W_8AR@5V!ZI%W>0.F +M$V#I94*#%H:)@:0KV`HC$.MAS,$PFK`62OI)9H.$M074I_"O!N01#0=X[X,< +M]QOD6/P`/U_ZU>51LWK,65@@6H';04A.NGDYB&\_X!C!@+,E3)BR/F/I2`UB +M6J;-D[AY$HHG!QRQ+QN)1WJCK]WFM2M?V\UK6[XVF]>F?#UN7I.7IGZ".GOR +M0>&-R@?LN@TH(;/Y8-I\,!4?3-L/TN:#5'Q01%T&I&"W[6/1/E;M)[R4L<+F +MVU!\&]IO0_GM9MDX,C&@^DCS;;FF;K.F'&L94/BG^;9<<+=9<`X&#:AYTWR+ +MEQK^0S\;RN`PQX#".$T_)O=CJGXV).0*$G)CV\^8^QG+?NR&LFQ!679N^M&7 +MM"U=]K,A.%L0G)W:?J;<SU3ULZ%#6]"A36T_*?>3JGXV]&D+^K0M?>I+3A<K +M^MG0JBUHU;:TJB]IW[_L9T.WMJ!;V]*MOJ2<@K*?#0W;@H9M2\/ZDG(.RGXV +M]&P+>K8M/=M,S[:B9[NA9UO0LVWIV69ZMA4]VPT]VX*>;4O/-M.SK>C9;.C9 +M%/1L6GHVF9Y-1<]F0\^FH&?3TK/)]&PJ>C8;>C8%/9N6GDVF9U/1L]G0LRGH +MV;3T;#(]FXJ>S8:>34'/IJ5GD^G95/1L-O1L"GHV+3V;3,^FHF>SH6=3T+-I +MZ=ED>C85/9L-/9N"GDU+SR;3LZGHV6SHV13T;%IZ-IF>347/9D//IJ!GT]*S +MR?1L*GK>D'-!S2TQ9UJN2'E#R04AMW2<R;BBX@T1%S3<DG"FX(J`-_1;D&]+ +MO9EX*]K=D&Y!N2WA9KJMR'9K]!5V5]-%)MF*8K=&1*%W6[6;M6XE[#:RKA!U +MK:3+@JZBKPUY%=35$E>FK;J+MH?<0?.]?EY^W7RLW]:?XLL*\NH[^:S^BC\J +M0-W[9.\+'61OB'[SG=;]QCMM>TTW+3<-SY`[>8]<R0=)=#Y)QO0IQ^,]2NU9 +M>4'R]$'RYT\B/Q[P`1(5'U@H/$A":M$AY=^?#B(33Z(P'LH1)RW)^2`ITS5` +M28MZ/B`CO6X@!0:QI6#R2#-#EBL:R@L[\@O?3$6J@&ZQPD@AI2C%]^HY2+U' +MC]E2\O.)ODAERRC8HOSNTZ'J@@N#A@P]QJ0BG%/NT3/PAFO&%=#S=&(%_4$. +MIO"G<P.,$YP+,&DS<2G(R0<+3I(R7?1A<]],82:7]E9L1YF)H#=_PG_C@0)L +MYOQMJI9(>R_&'9D^;5$7]`$ZN^PU7E2S-QDM*(V).64*DA*L47"[ZK8'G,L^ +M5<AW-5HL*(%+I=$P20`-#=4Y4WWJ]-.8(8S\;:P^)3OUOJ(BJ8ZJD\R$&&1T +M9J=):&&21:$4]9.<E6AFYG:7(%X(2J3H[00JFI1BA2M&Z9-HIR995W,@GYP[ +ME8,X&60&V$GZ=B72`L"FA/F:L:2@J2U(N.8"*1L\"4=-LMB^`A=^0M,W2-LP +MF+R4=DO1KL*KG!PXB4OW(*;P0]UWJJDRD[PL\B2B@(M;%9U/0B\*L$>QW\P+ +MSK5$5PND282#0=\A0YQ:2.?J04255A(!]^*/EZP7,V!^[%`7ZM"F/*Y0K#$- +M`WG3ZR,*',*=TP919H1\6];A'H<-&U1U9-"LD/&R3ZAF:];.3CB(\H#S&@4& +M9FJ!;>@.\!.`K^AUNH!\`S6.(B6)ENX1.)#Q]WOW*,9,D;ZRA34Z*^FTX?^$ +MSETQBC+ZU"Y-Z`D/1CR7#:F6A&7")`6ES2@2*F)V.76`"<+X`IFQ6;N&-*:+ +M4./2T=]<G5"0*;029'KXMQRWE;H^-0S@:S$\7<B<4#0Y]\6DXS&YF)%JYH;- +MI%IS;$EFJBB4_0)!'9..:Z>0BE&F=A2H/.]WEVX263*A4//8R!(SBI!6,ISR +M`H6Q7:#0&458"K)E+D".#1U`B\@H>2ZHI9W7!0*A%3NC&&8<DJN7.U?$7B;* +M,B+8'EFG=N$9!%O(!!=;=/FRO#67FG`5$`8/BOKGH:N7(3C\/I2VD`]".:.6 +MV,[*3LP27PP=I+'@H4"T;Q$]MWC(-#EE0_Z>>2_4RC(40XYLG33XT/+C'K7C +M,T6%L4-1(O(XIT)`:,6#<\*&&8**MW)9_F+R,`*"Z8V<K>BQ67L4?D\R8MJ9 +MJA;J;WDUM'(GP#)H!"%GB_"<:WEOICQ5VTZ5\10+NI\Z-">7,]#N\JZR'$&- +MHSA\!HM:K+;%K04=J\#330[UP#`U_+29L9,!]T'B'9N3F+CW6IH?"K2F\#BV +M`P<,/&\&AM*//>>%S0(+MG89!1[L'7M&38`,ZQ`ZYS8R``%*MB8J6XR'^RC@ +M!)$YU<S=@L!3JTW-9NZM<,N7#>!B!0NQ5,/$2#@@G:[D`37*U%ZD1(E:V$?7 +MKM#4R*"0-9;@QW?=2Z]74I3W-MS70#E(R%D\;P&*ZM!V5@^.3$=\4V&"!^2X +M8.38RB"Q0`PPE;8H<_!5O6_$1@P-IB(\H.![0$%Z>+VQ0:_;:)'H,_T)RB9` +MYUMCFHJLU?([]J1H"*WQ%,96:7G(RC8J!-MP!BAS`5-L$92$X*-M"7XC5UL6 +ML)5`*"_2X(W[AJX32$C<0&$^*H7>X,7U\))`UAVS1.X!0=CD_H""P0\XC5Q% +M[!0O'J&Y.'>H.4+Z=A0#)V@6]Y/H%2<-P<Q-]"2O#8GFN!5*:<0:A7:-YBXL +MOKPAI490;;&'`@(K+H(^";@C*)EVC6)GC:+ZF2%T(UJNONF($S>K.*/PD\<5 +M-YRN>X\*/0TPK;2.&VG=DK,5HRS?@Y.#B!DAH]!L2VZQ)7U*PCPAU>:$',^: +MV1*"JW'J(4_E=J.`\M5!!18-D*?N(8M:6Q'Z`=FC#TCAU+6]KR(5OC6Z$CSG +MABNF#8>.&[:PK0%HH<X+F1`TJB-?"]P1.F,&N#F4J>CU;7`FM<(^C8U:C&H7 +MMYQC@7#;6HUJ=V]#M%$D+2>=G7"XXP%RJ(X`IM@1+7)?TM3R-U>4;\`L[]VJ +MP123TF](':XGY\F?JC67N?&;&INMQ9U:3S]JW")N-`.0&;;8K$UOKP;H")3% +M:@;(*'M`7J/<>]2SSY-KP4RM,LW7+;76!H27;C$4M-JH600GYF+MD\C/+3(1 +M:DB]4$.<-E"J.@G%/5U[`E6W5'QA=`&7WC:XU!O;II*XSE%>Y/KU<,:@]N(5 +M<=Z`ZEOK).):,`^$1LA2:YLH6^9HTTBDC0^48K.X2;5-[&J;6%]$9W3WJ^MZ +M\)&.!_&Q[Y%8^'#`:8C[&BKL-"33T\?Y7K'8ZF.K4(VB\N)&VT13[P$HRA`T +MHH3K$S)3'ZK8;7X#][UAGJG5J"7@>M&9:7DE`'`#]=.HA1T=(U/3F"]GO#8$ +MFL249N'!QSY.#/C<H<F&Z[FZ;W&G6RV#(O2.F7KKS]9[H6Z$'?F45BE$0X%@ +M+THVPF1K>8RV18?O?B0>FWKB8`5_WK!44GS#E&YI/F)FL0F]J>`TZH[YC.>: +MNOC('>]OI8U&2AN-U#%FC.[;>J5^-6$C(FR51CK@\..IVET-,$L5SQ'!GXY. +M7>%49[9CTAL/L]'KCE1MUB(IMEF'C#8'DPH*/'5#0HWRE&L>#[@*Z@$WG#3+ +MJ4&ZQL(UIB"Z$?#XEJLW@:+D>D(RJ3%I0!\MXB+V9[8&[)BQ(H;QM/564M=; +MR?<TMH+(5P2'Q(/[`Q)^!9RZYWE+0QY;M['5('0=Z[GL$P^OOWU!K%D"%S9+ +MIXK$0)&DKB(1'T*MT0FH*H!+`$[=YVAA%*6-X](3&IJQXI7<(@"+\!&*:"@; +MKX7F:%>52J^?JC@BT[R%R<>7)<AV4MJX+!T3PB"%1ETBKK/]@'3G)LRMI%5K +M"K5$^)J'6H0)Y"0K[G$864R%M/%5TD9%)*B(KH807M)$`[YQ@U)>-N27-/;- +M<%G8*[9V15"Q_M20X$89--:YD:0BL_&"#%(J^,H<`52H8JHVV"3.?E]'C@,V +M82.ZB4W^RZ@\Q-O`P]UWWWSSJN$COF*W`1D>BZJ'!/50[H`><`,-*^0-:PNM +MAXQ;IA@[;L2FW0@A7Y$MZ\4-`J%4&_/39M;1\)\0M!T;)X8K63_`OKL_Z%W0 +MI7G`NU[#7W_X_J?[;QB!5>X62K`W`,H4<GY/O>V'F[58X2:$GC?,'4"2K?'A +M@3;DAYG:AD3:NXSMH`(Z_&_'?,FQLF=03\$V\Y4+LTUM_B%%'F-.[7PC4A24 +M+)CJ^:1K0P2F60<^IOSUB]=O7KRXYX6HC3GD=MP+=4*$-U%?+CK]`+?S'H<! +M&\5J-L(Y06&YV.BV/!W7$%@3<.)4>^"GE9V-3+%POPN)"7E1Y_8=<*OM`ZXZ +MZJRQA_G.9)!4L,4VH\_H=F01T[.EEN0#:P^XB[2=9M!IUJ@-6R+GE>+C;IA= +M1Z%."#Y:[/;X+5A;;C3*A&YLB:%68784DG8E;FR-FPR-[,?:3`(2%QDWJQ#; +M#=^R&T"<NW$])6?4Z[4;PNYLNE-J/3Z*FX_,_NSBA9)J(_OYF%]/"=?(YXPV +M/>K7.D==C*C0;K+'3+P(+>5;V]UD39L0D<[)M(APL6LQ;N8TMDK9;754^Y%1 +MV\CY[NJ*VM8*&'>?7O_^2/?]U=I[:G>9["8UPDQZC7K19@L6[\K8L4H&9229 +MKKIP2H8=7N4#>.U8NJR-36FF'I?QP;FV'Y4"MDM"9FSGCKCF=#%W05;ZF%KR +M:-/9IO[>?E:\L=M$]607Q5F7=3%L-AAV[:3;S4CD3MEQ1X>T2I>+/'P%RZ?H +M-;8,T.206DTMXI-0O0E8$)_9\*/9R.KNLFU8(;MMO4\T,]=OY,!FY3>0U6C2 +MD@?I[N9X^='G7PJ[GNOYO[,WYP@(##`&!UBG`QR[`?:*:H4!V6=P$.%FN:I4 +M$N<NJTI2\W*`#Z1%8[XZ@`]59``V=)EP\%TALEGW#LC4AY&`(@:V$(V#,)`6 +MQJY*E5`,Y>SG<U@'@RHF30]4Q3$(MPY0WAJS1`=5>:$#/!6\-0!"KK,AUY5? +MI@Q8U#Z*:A<'"!KU:33O5LW9`4*R*HBB90UR498)55,2"I10W&.`H37`H1J@ +MF]0D'Ɖ-4U8F*-5[#.5>#26.NE`YDA)"5J_+[`%-B@*.@!RA4A2BK*AF' +MHJ:(6I]Z=I,&9*>/OF!YP1^3-06(DHX?LM`&J4]%D058]+F2$+(H<NTSG-U0 +M1V`9Y8"H]3?PK0?X)FIA`W=Y8<:JH!<;&"A=-.=J[<"&5HK02FRH$V%S:8I[ +MZ%HI1J/\&B=-1%A@>3A'N:Y[Y$.=W9\CE69Y?<#MY2^0FZ3?T$5Q7-KKM>;" +MZ%M#98`IL4*?A>.+`_)3]*&GNLN4'L+/*-E(AHX`+6*\B*YI3_#-`1MQKP'H +MV:!SXI^T`_;B@-'TO<L_EUF?%,;EJ6Z:OL!4Y6$"/*D``SB)@@!IR#!%F0WN +M37^#6>49FBPB>(X)0\=B%6+&6M(930`C%4*`OR59=7\H2[Y,&&`"="R5#F7E +MM)0%N(";M!Y+RD7S"@CX/C12,E\#IA>UM%R+3J/+%X#D_M!(KX`PGT,C*Y\M +M<D*[UL%D_$4G?0C^>0KVO`)3?PA`;J`4KB`JKP]@^-_BQ]G#;W5+ZK?GBR%R +M@*0]J_Y.S=]3\_=<_QW'YF_3_&V;OUWSMV_^#LW?#7RQ@2\V\,4&OM3`EQKX +M4@-?:N!+#7RI@2_%S=^_7?[XC;8^IS_/'FX.6BU0#NMIE8E!A]+&_W8HBI^- +MHH38D%$X<^,_ZDU;@YQ6U`S^'&$LFE]IA&[(-2$I0CDHELKF7QQD-P'E!W(A +M/L5RU?Y&0R$/R$=".9`L_NLOGAUR%4V/$H<6]3QYI9LOKC6=H:S@Q^I-J:7] +MAFM/:KW-(N5_4(K;?'-]D)SN(5?U"V4=OK#SS>=%'5+<3L+[%X/2_LY73P\( +MI*IB?9"L\$%Y:.\[Y`65)>NBUJ$C5MS][""!L2'7Q\K*E#BZ]QDEPPPXO*3E +M-U4R]+Y#M3:M#QL+2RK,_?&\5D2S`8=D!A54CWVF[":'JJ.R74B/SB_E*'%5 +M-I%EYR-#>B'E9/1L(PRR161_>'WU],.KAT=&CE7UQ*EP%98G;_O>*\MYEZMD +M'J",WOXY^T5:MXZ">8/N!+W]>RVJ&W)MR0-4X-L^YZVWHL!B*CTW^R[8$P\K +MP'1D!E3#XFT]!`AH+Q3`MQ#I_L-;(1AQIZ<3/X?VG`?=1'A;!U$Y*R#/*KN* +MT]O'!X?,N1"RPN_2.RR@\_F,CB;39U_U[?!'HX<]<*`I>W!O^UP=-BL_4"^! +M':1W0']$$4(SYHI_.2#_=@"T)NTD6B4#\`X4*)=N<16"LGP@>_]OQW\2!A)_ +MVQ<<X,9WH%\M0:DU1:W.W\[OQ$)R:Y;5TV'X?'H']!E9]C1IR81!H^UOIQZU +M9>3SY(OPQCN,;JJRTY0\-&@(_JWRQ^F%7*A$&G-XY=W(KRX<[4OLOYWZ4&/4 +M*O5D_6C?2?X9+=$*^1?S`IAWF8&5PN8V)T+B^_$=%C#G=AD]*H]8R?P."(@8 +MU]BZTC#%HMY!@=E\TF^0<Z7X/KT+_R:G9]-R85PE@?-AN+S_9L#VZ2+<5O?U +M;J!-AF$-6Y[AK#!J&YGCP_DFM*FE<0\:UA#8D)B<A<[06'NSV@1K()6"LHMQ +M<J5"XOR[,ZTIKR&'/3#YB/F@Z3F[<-HRF!=*,#D'+,O6%DZJT'I=PLEUJ54: +MGK\^PT7W5QH0V`5TG<'3@Z;K[.+3%X[,*CT+0$.IQ/P&T$F)7`"U!=\O"W!. +M_8^*"`J+[*][T!#WFKZS!V<H*=*58'+IDB+<N0'35%#&PA-9T'_^ZDPJS`QZ +M2?0N,@T*%TO*SAZ4OK`;5J`*9%JM",UDOO%%_(8ZRR`G4V>VBRF<U*'.E+DH +M[L,92_EB*CA+VW?=$FC@S)H5<-(62D;_^8LS.14$..T^G!Y4+=DY>W!.A4.V +M6B893E=::-.6B6)9QN=XT)1C78#S'\_DR-F@X;<.G-)&$G=VN:@4V'/#[<87 +MENP.$]7DR6E?>0'`106@8X?;%[K^]*!I._OTF0/Z4\5$Y.1_H1;[%DPW5V!2 +MSFS&__G79UIN_H!\]#TH>=]`ML#6W)]=X4DEKS_';F<!)U\RJH[)9ME'O0)! +MX2S]"").2^7LGQZ0?=[AHJ"KGDP/F]G.B@TVUQO8U`/;`;-A=EMTM:ZOB/BU +MZ.P!6>A[<'HPGZ07[3-1%IVA1J9-A9^Y@9)2DVMDIK'`_OF;,YSLQJ+'+@\E +M!=-UP2RV&RO)F?6E]WO(K)=\@J!FY.N:F^-G!V2<[T+)5VXH,K=`/B`A%!15 +MPCD5/IO?JB&3K6)51"86Z!?!B0KNE'#>0:9)!6GN@AD+G6@;>13F(C2RM3X: +M*ZFT#U;5>'^F5_!H9OH>F)24/2B?[R/3%G:V:3G(%1&@K1J*H0$SFX6KF<%: +MSILB87W?]/#9])B[2Q[+G4O\QQM_%=1EV&JKE-+&`O7EQF-DMJ>TL4'SVCN4 +M6EA,TS[87KV@N2:!4`;'=C52*YNR!EM-XF_/Y"6`'+MT&@L%W\.MUQQSURI. +M)=0P[K+]U`+J"^P3/_&I#VS0SQU*%5IB@ZE'J4;AW(BG'%8U.Y1:0\F%TC+Z +MB5)YIUJ2$&W/.XIC87_N@SFJR3Y?M%Z'(B?8/7[RC?FY%JA7[)__3132?/SX +M@%SW?8649>@:L=\73DZ!K/1FB9K@]HR0C00M,`\'SJ@-8F,'1MD=8+]H%\8) +M\UA@3"TB,Y!^Q\T,XT:W3P7JB<F-ORCS1CKK'0HOL[O>2I93`Z;+6G]''7FX +M"84A[U*!_7-6R@4V?0=.:PJOO2.+,IASXVX4R(F[EM*&R[-]O.#__/LSLGWM +M\:,#,M\[7)[-^+&[Z),691P;)S-[C2'MH=.UV"S$PK+"?SF3XI7`INV`&=3+ +M#'-WU46WKG"V[EL.'89=ORB7SB!`RS2O=8MF.$-=)`#:]8N<(C1T=!!7ULOU +M36MSR1>;6#L+'UNYF2V"=1?J[@S'>P#HV(LNJ)\9>FHH*)W/37@A%CL1<=P1 +MG,FU_MNB)#_.VVQ?G96W`7**_RY"U?'C(R-=\S,OO:\]XHR?:/;"(&%C?-AR +M&_'^#`>4`>C4M>95$X6.)K)T#=,S`;1513DX&'>\HU5[?]Y(T&JC])?$\HLZ +M/^JAA(YSE.'LZ")#%VEH'=9JX3.!QJTRLFI<%H*I7``),`#K9.UW/&*CJ;'! +M]2WE3*"I8:1BBWP#)EVS]<=ZW;/;%ZV:R@IFZ"#39NJT/<7N,Y!3#60.%\2P +M$_URKC4_/+MKO('_ES-4%1KTI$:'-KUJH]#51D9UNYD;7+HBLV$+9J.+7)G5 +MX-GD3(60-_NZR&ITF#,6NB:GFDEV;"*S66BO<%;_L5T5]W24S:6M4-NNR,GX +MZ@QGX@<]@-*)T^<#&7-7E6;@31UU4.3O4D*(C3>?MZ)7Z_R',Q2ZR<=;]L-A +M=BQNN.H`:;*+U&JG;*+NQAS2)@Q:B(L$[G=9ZH\]J9\)UJ<>P3KE*^L:?>\5 +M3K>WY$C5R8QEUQ2X6$9MQ^,RU"<XDIR?DJGJLVB8>]ZH5TO`]Q37RN'_)E-H +MMQE"*HX9[\QAWD2<0[D?(@ZI"MJN_^2*PU<=@L@"S(::(%)&M-D#TC0.5"CT +ML9,PE-P%)V<8.P9@#M][WQ4--G-7;`E"I[!CKT1-*BYD6"KW0U9U,!<R+'87 +M7468=WWW)#-8:@W563W5><>N"JF1`SD):8V,_7BFEX[B>%8'G:DXIM8#<U(K +MU39ZR^J5?7OFM-4@2[8"\I;%&FC\Z0REMA&^[XBKQ;7^7$_&]<15!K/16\I! +M82]89ESC-V<+8`W9WIW)<5)$=+H[2\4YO)[9MQ#M+R6>,S:&=$;E[@;8O`GG +MS.5&R-T9+M04>[]'F#DD[CK:B4_'H"2K:?U[M;##GH*RF_B8*Y.-$(9(V?#K +MFBHJ-EU70WE=66=K=-H,IM]U2,>-AK+E7@C%(4SIX!\?-H!R_?!\HV'/*W'* +MS*Y64.LB?GG02XFW8(8-.N-8;H4,9RC?K-2Y!Z;1E#$^4MD3G%G7.-]N?&8F +MVE5#QK0.5/9C5IY=(Q&NP*??!306^YZN%\<S!1&Z=M-&H32[`JFQ44V=#<BF +M="@"^&$?GV.QW^U\5W(&U3:N<9^BBO[]\&VPC8"OLA[/92/0V.+0[CZ<(1-H +MWWW*BLC5BBC[S?->.)QN1/Y];9#Z<D-$K(^8LE[?9Z.43_KU%-%*4%<"Y51C +M,\.XKX8V08CY>)FW0[X[DTJN:B+MXM+":N=3N;TUSY+'S74((G/7SJ:--6WR +M@*^+T+!2S\FC='Y\G]<+.,=NE#D#,S8B/JJXVMD#\^UF-P>7'O(6"/;D0V'= +M[P(:"NO>SCU`8]Y:,(V,5Z/3[\9PW48DY3-CJ]=S>R:WB!2U`'9E4LA@=O>3 +M4L:GK;>]"@[:"4'D;;%"M9=;4!QZLD6.@]G71:;TZFQ'&]D*'E<+SU"_V4#J +MVV2A(CHZ2K#99E?#N`X^D\I.^T@HK\):*3IK3&]WOAI\ZFWHO!'RYDP*8^9@ +M24<D:4C']G>4YHH$\ZJ/&DJ>]W(QO";!9RA'#8Q:3KRRY7:-Z6HBHX:2]3U# +M*4P52U<[(7,E"#9;7XT>*G8D9%O>F$(/F:XBRHK=]K>5?"4A2_LC[]?N)`K% +MUB%B=?>0-T*^.9,R)T,NU;(#IX<!RP4#.B+)SI6^J?Q+-4!V$J_61")SO*ED +M?+D/=?[7,RG7EX/,'1&O$MZ:OC57J^[2[+0<'9[WLMBF-GPSE;LU$;D89B[+ +M\NSB,D?";4</I6)K(8R-<YDJXVFCU5V;V1)P-&PL$KS7X`V*/LOYI+G8%-E% +M;]1;6FB?O2>A@JF,S<I]=Y6!NH5];B1I(0Y<L;FT+YFLLI*9^JL_5P9[H9#" +M6%GY&U:J0,L9=SDBRE6L=D!33X0+6?0TN@)6YZI:E2/S;NZO;6-=0<,LI6=A +M]]5.*JP-$WMJ/.,FU!Y0Q$8$G,VMWMFDK8FFFHK]+>M[')T%CPE]DDN5]UVR +M=#Q^4KCL&\&SL/QE;;4YO8''IV*[?0^\N0C)FW[BPE2%,"J3,B_LKKN3TB90 +MI-@LMH5C1]#D6('I.3ETUJR(`E4J,%:1HXW=TR0M1-TZ,T42E4T=:\=FX+H: +MQ=6!M&)=%_GQ61%\V[#$M(ECZ)-LX]BI`YO/[&KZX0M7Q2*K9'U313`;Z#)7 +M9O`FO7LS)QYUI%PLBLYT#(:IBN96\8I8Q8!;%;<)IT'LYC1.+DJZ3V]SKG[3 +MW9^J(N*E92C*!6'TC=^R#:%-^>K-G/S6DR-*;E/7:LW1A]CL[.3<";N[7[J> +M^*R5[HPBUF4ZX:YR<"LQ7^.&[]YF3K5C4T9VM/*.VPOBQG8G9^1@P5@X>,YU +M`3/'(VH3]8).Q49,F^26X^#6[C%INQL^:IS4%CN*SO<"#WG7HY=14-A1<7.B +MQE>;C0UTH3U<$96K0V'8N]#AA1Q@ZF_(F,RGL47=6&WCUL"%UJZ7DMU[B[AF +M.N^//Y,B+D:5G>V-%M(A4F\(VQ]B:H>8'AUBZ@UA^D/,[1#IT2'F_BSV#VK, +M)/OJ(>)C0_BQOQ;=(4P[1'AT"-,;PC\Z1+'A/^V,Z1\=T_;&[!QMDB&*,=/. +MF.[1,5UOS,XQI76(S6K91X?PO2%2=X@MS9E'APB](:;^$!O.&1\=HLO_<W^( +MEO\?97_?97\S]H>(S1"/LK_OL[_I#Q&:(1YE?]]E?V/[0_AFB#[[KUKOAT(T +M_R__K61P3\?W_HM[=KR^T0NI>H"X/B"N`:0O)*SE(3V&#%3B=T^3SASMVQLR +M-J:0G+3I#SFOL^0!^>:KO0&Y6F?GK&YM&*YEZ-XZH.<!'=5FWALP<01N_S!K +M8R33@>RWS?#944K\!-\+EIC4/?C7.`SAPKQ]BC*BH?I2^_L&IB=-;.L_^?)0 +M"H2S>PL8<9WX1]>?73V]D2(Z7*=\W^`V/;EC6D_3[@%CW@$87P)##NPN+(XC +M6GNPC%N?_!T6__./]3*_?</4=J15&Y^8WX6V:;1$E?X[VQO=0WQUL.9MK!N( +M=3^[_/WUTTLID\17&>U'KFU'3*4F@)7>(J0",7`>ELYTL+=B_0_\USK*T/]O +MX8UEA,\^NWXV?/[QL,B[X9.GGW_YZ=5'O[_J?[3"JS=I=J;HNU.T]10?40CN +M[?#S#/[(X']V^?27-\/'5Y=?W#SZ"2L;]X,.0=,)7%Y@+UAE0^]D=VBV$-.C +MLV$1_PQ5C+IABLZA_#J@'1ZQ"#"8EYIBT7="F#9US];/M;L\O\/,;K@N0>@' +MKG8'<\VVAWO,8LM3NZ%%LW.O)D2]Y6,?LS1U"I=/L5'>$WLKO2@,U-QQ\*37 +M7+HG(^;RBZM+PI&S[_:%ER\V/7UYO/[PN//"[[V@J7UYM?/4;YY2[Q]>?OKI +M7N?T//\GDF;]=\7*'PY<0'I9DEOD:_^T\L],EP&XU5CB'];+]?"+-GK%_>,* +M$J_W[VEERD5>OI23QJ?BY@"N7_4`1^6$5$VZ\GLA[#N2_EQLW^3KR>7B)LID +M.;$@]<<[K?2/W*L3+J9Z*3=&C^ND+*YT7IPEFF18R?TD1QLTD?PGGE,2Z*Q< +M_D'1B9^*BPU691U6#/!1D),4Q[@M[^H*%TEN8);JV[QV>I[S):43,D96?/(= +M[Q/UNH9%7\I9OI-4NCEIXN2)JNH!$,&N0P5_S\NFMYCK/99)=RZL+*2ES,P3 +M=C5><9`[\#V-O.AZ%3G5M+A%PB#K$<=E!'GMDGPQ"4:XKMTMS8HF15D,KQ@C +M"?>/Y[M8PSICN6\!9M]KGN%$ZTQ+)41AU^7@@YP_'9!N<XL#KR?^?EKKH7*B +MFUXQ^U*2WM_01A"7"E]6Y<VAN$PI275S!^R8U1:YA4<AV`[Y,M8[*;URTLRE +M$XJ9,$,)X$3$KYDL9]!16F%:W25/<\JWD-".QZOR5DH*;_XL%3].3%&XZE/N +MYG/YJA&Y%GOMVO&T&/VT;W5+($_R\=+_'6S8GY$$Q^2PM/F92U5:`(,KNOAV +MCK!B_)X7BJB6<Y-^+F]JH=2)6RWY\AJY)8Q*G@R?USX5]Z9;6O%;;.;=ZAV$ +M;`C,PG>0)1[B*GC!ML$:);G9FP>8]4X4XDB2._ROP<WULUQ\,HF86%TD%GA\ +MGP4?ZOCI@`UH)DL;92(B6SS(960(9ESD,^86"R?^K.F[MT2=5E;2$/EP>M^= +M5`N]1:[&2>H7/.@MR@=D$3V4MRN2)W1'RAER(8":A%%GN<>#C/63;J,^2/&+ +M4WD/J0.C.=$.>ML-;AZ<44(FR>T)#I.E+(/7+&2`9:[GGP"VP^UN$9=8S/D2 +M-2$8BG>^DC(G+,46#K^CIB,4#*F>I3N]ODDN$)EED=(ZUULR$F4:*HGB*%0< +M2+_POM_/ZH4QVT8H(;GHQ:S<P/UZXA,C!)JO0*'S."\/<H)6`"?NE[M69J&D +M&1>.X?9WV1-`4OEM>7D/KERA^,K/I!EFJ@,]BTB08_-,44'X7/9\D][L8`FE +M?(+NA)1GZBZ!JT#*WHOFFW&5W3+B'<OU&4(H02P%H-VP1INQAA"`"93K82[( +MTGDH`DM"4R^BLD;T/&UQ_,3R.4*A\#TIEJH@WS$IXW)L-T-#X\8M9BC5@E[O +MKXSX"I=61[21NVE(3]V3CBCNH[RK+I:B*E%W.%,F^,"EQU8X@(65H7UIOA%= +M5H#*XYP.2+K6T\3,\'.^EOR$79,''/9YPQNK<@L;*>N5"[&R_(.S[DZH8RD+ +MZ(1X(2E%EQD`,\NRT*FP.R28W)<7K5H(.Q^@,;`F2R>B3&@IK!'='//5D%;M +M`#(Q9]R*1OD,),>$BV9H>BO(2&)-6@-)84&T!F@&BUG:JWNI1UY.4@KD-5)6 +M7B*Q\*1Y+BAT^!KY][=ETFMD:X(+K8D`()*WT"T)HC/*_341RTE!-;Y"5G57 +M)DDPKW,01U[DK%"B@Q@T5GJQO"0.`Y!C_XJY*HJ&#V(4Q"AFG:$F:RF<UT(P +M(RZ\@FWA27[@NF]KY<JN5?4YXL2$&X<H$_0-U]U$$Q@0,J.4S2OQ*SPT!04, +M3QQF$%8*)&-B5M2>E2$1XLOR_K`$P6=%R'"NZTL]RO.*6!ZN@EZ+RIIGEG_# +MBM9[*5=S0E#MC@@O0=$E^":PE=D&F>7R0LZ_/<EQUY>2DW;2&VD?)%'^)Y(K +M4.YV$L*'`K=@=A&F2>N@C.*SD>2]8X8"R3IPHYJCANR_`'>)$@-AAN-^TM7_ +M*B^O!5/C4OE9J,TX`<M2BHY`(T,Y<0F66<Y8X8!;RT&1#@3.=S=-4-54:>:N +M*/8>A$XLY<8R"[#&(8/NEK%IP*E&-%LDZ1/Y(BB5Y["3B<EO4;CGE:8%H)SL +MF[QY@M3#DY0$Y`6.JQP@@7E+0HDM&X?^R7!F@1DAB8W8RT)0Y$2+67%\[Y]^ +0]]ZO?G=^^'_[0&'EA?,``'E+ +` +end diff --git a/usr.sbin/pcvt/demo/xmas.vt.gz.uu b/usr.sbin/pcvt/demo/xmas.vt.gz.uu new file mode 100644 index 0000000..ca2ba3a --- /dev/null +++ b/usr.sbin/pcvt/demo/xmas.vt.gz.uu @@ -0,0 +1,110 @@ +begin 644 xmas.vt.gz +M'XL(".RV^BX"`WAM87,N=G0`[5U;;R.YL7X<0`A:/T`O#/9EL]A8S6NWH#B7 +M'2!HY"#8Q_-@XV`-'"N>&6EDR7/Q`H/][>&UR>IFR3.>5LXFA[W><9MB?:PB +M/Q:+U90T^\WB#XNK;G'UM\6W?UG\KEY<_4G<Z7_D=G&UF\T65\V:L>Y_%E?M +MFM%NN;B2N_WBJMY=+ZY6:U9W2T*(OJ?UFJXTBM@MS:NZ8/?++^9.OVQ*KWTI +M7=-6R^B&*@.UL<7?_C`GJ83!8VO:6'`+T+]VK36B?$U5;,M6T6AT[?'FJ<C: +MMVWDQ)I*8T*B6[BN*Z_H]G#X\^'P1E>2:\Z[=X?#V\/AO?Y3F3^-U.YP^'`X +MO)[;*E18)7.8UU:(\JXZN.OC86/_-__IUQK3?8^ZXJ/^H^V[3\,?7H?NTIVN +M.JV256AE_K`OSVSGT^[/KJ-67?63[18FNMK:R9INOJ^<AK(SVFT\HEPSWGTW +MGUD%:%=]NKP<_CC=9)=YZ7-^%E=,D^&YTMC/W'62[DU-2=W+C[;3&U-BARAT +MMG]%L\!UDA70@V-[2C/Y%\>?UM[4IL=,Y0O7,\*6"M.U04B7MMU%P"*NF^ON +MPHY'8\;,4"R07A>UH:BZ<86Z-W2]C6&YM<$*T;58:S.B6!/%$KFVVWR*@BT4 +MG`6;2-`^F*JM=Z@J04U@FVYSF>`V$)=46R<M4^E$7&GQR\0@-9)W=&W$"(`X +M!*GMNMSX0;7M#.3)+(P3L5W/0H]S#%(8FS:7'E)D(!T`PP"XM2H`<!2`8@`, +M&,40HWK.$3=\JJM^\:-58\@4V$8QU=0*`ZB!;34*T"(`&CFQ3:T0VRP)W1RA +MEE2[*I)1-1AXFYJG6E0[A0$TJ7FJ00$D!J"`>0HQCQJOZ'BH,&KK-E)C)*H+ +M1F0E@#$HD15&9(V<&L,18ZR7<YY#CY6W"N.V;BRUBJ%*8116%%B%4EAB%-;( +MJ54USD#K,DR@L1KY0]EV+_+PNMW$0+E"]<-(+-O40(F26&(DULB)@;(YY3Z" +MQY`2M4<!>Q2J#L9C*8$]*(\EQF.-G-HC4!^O5U/B@K.5IZ'$J"TYL`KUT1+C +ML63`*I3'$N.Q1DZMHHA5UJ^3L(0YJP1&;5D#JU#O+##O+%:I50(EK\#(*]K4 +M*M&>\G]NK/2"/)Q<`F.V:%+[!.J>!>:>A0+VH606&)D%B#?$B7BC\?&&CI&3 +MD$]#8S07(.X0J+L6&*<%B#L$RFF!<5J`N$,PU#,ZX\PHTD!)C.8"1!P"==<< +MX[0`$8=`.<TQ3G,0<?#5*7?HX]\827&,Z!R$&ASUTASC,@>A!D>YS#$N<Q!J +M<(6O8\Z!U'8+$^S"",Y!U,%1;\TQ&G,0=7"4QARC,0=1!\>C#NWE_7A9IIJM +ME]\#<8SA'$0?'/7:'*,S!]$'1^G,,#IS$'WP^HGX-]EWSGOS&$9U!F(/-J!Z +M]:;7#F,U`[$'&["Z.O0`&*L9B#U8DP%(]V/&SK!6LS'17SM,$($P-<8,6HU) +M?7`((`1A`U)7V^V;D!;A&`*(01ADM:Y?V3R+QIGY328)@;$WCF'`(!!A?`3\ +MV@,[F#&QW4Z:@7"$L1',P<&X_3C#Z,U`4,(H!M,GXGS\'P-)BA&?@=B$U:>@ +M7_=4IQC5*8A4Z&H$MXMPAPB'$9^"N(6V([CE`&X6R#M(Y%!L9E`0N]#AS"`C +M53&_3T$,0^%TT+\J$E7=13C,X5,0T5`YA"-5A%LF0]XGB^HX]MB:0$%H0\5( +MY4?71LQB46QUH"#(H1RW/DV*46Q!H"#DH0RW'J;*W(8W67(H-J4H"(`HS8U[ +MLWOL@;#Y0T$<1.L\3C09FS@@&EKE\FV)I318*D)TM%IC4P@$1.U8/;^OQQ)+ +M(*^$2:-I%["EQR,\'O,4-J>4+*KH]A5LJ3#%T*`>!*^8-!H*@5CAJ?2+,"M; +M/Q<Q-PR\,*90D!YR$%#P<X13V62>=6F@4W<C.2`6&ZS&34#E^HI]/1)>K#Y= +MAK8)F3BC?S)YKJRV\<&5LMUN=+_NGZ3042+?/E+9I/*Z6Z[GB03)BGP:RD`A +MUS%1;!Z?WFSFGVN)906$W6*XAC!!EN2%R4@Z&G,9[&%Y:89)LZZZW`2C1NE_ +MM>9Y/([A<8/7:R/RT@*3%L`6F9>6F+1,;<&R_FJM\K`*@U7`I"8OW6#2#3"I +M3:3]RADQ6@RC30T[D?)7ZU7$7UR]U#\1?>70W4.\E;/)53"DJWO!N1.T/X%[ +M=>>6O*2T,:65=SK*+-@>(!%/6J>6O^$%(TV-"KXQD.M7)KX@*8R3D9ER`\2Z +MR[1$N6@G(STL=@\S!V7*Q5VQK.KCS?X!]!AF(.)&:ISP5RYP!,@IM,Q`IP*] +MCU#=`.)E@J(R*+V`?;#K#37T`1`I2I-!<0*;3\FPG<K_*^-/S(;%=N#+41-M +MIHDVH46OZ,JB`%X9^14B_VD^'M0\A-U?#2`&98-G`,JM;`-NC<N:3)ER.TZ$ +M6.EK/0;+8/`!QB;!R'"\+ZN"EQ\^`%#.5V)Z90COROI5E,D3*F5([<IZ.IMX +M[#":LE")#*F-3[?K9OX!@'(5+)`[`1+6/-5=QO66-9ZBIHXY0J)=KUOC[.0- +M,DV7KK)M!$["$YZ--G3EZ+U/9?25V2<'76X@;G;M7J5V\#KH=#.0=9O2=\ZT +M9*FN4Y-T/=?TS5`\;KD'\K0#H4,^DZ],^K`B&62&(S-@F(XI=AEYWGFSPK;[ +M[0B'`PM%WD+1]5S#]!%=NOX.T_K*Y'^ST/)I:`E,U83]D,%QAZ_>1ISW(QP% +M3&WR^C2I/KGHK>D&$=0@TZ],"C\+W3X%W0)#-=%?9U#<D:SW.,HJ-5/4:3`6 +MP\NZ(_GPL@;C.$[X*_/D)0M),4B:FB587IIAT@R8P_/2')/FB3EXGE^9AV19 +M8($!"V"4S$M+3%H"HU1>6F'2JAO'NIGTOC+/-;/(#8;<`*O:O'2+2;?`JE5> +M>H5)K[KQ-BMF]95Y")T#E!B599T:(_.LE1AK)4V-D7G62HRUDD5CQDE\98X) +M9/$P'DL.;,F356)DU2^DMN3)*C&R2@GF4!+FR3QQ)49<":(*F2>GQ,@I07PA +M\^24&#EE"R?-(-VNS/F:+"#&5PE""Y4GI\+(J4!DH?+D5!@Y%85#,LJ@*W,> +M*@N),5:!@$+E^:DP?BH01J@\/Q7&3Y4&#^.4N#)'UK*`&&45"!E4GJ8*HZD" +M@8+*TU1A-%4-C&4'66]E#A-F`3'F*A`6J#Q-%493!<*!)D_3!J-I4\-H!\UZ +M*W,$-`N-<;@!84&3IVN#T;4!84&3IVN#T;6!8<$XZZW,:=TL),;A!@0$C819 +M+"_<\[4Q]\8`7UVE2:E06[GHWU2V*_X<9+F5.2,=I**0H:63,3ST\&W,/(5Z +M;GEMS(W/3S4A./(WC;FI/I4SZ^7,>CFS7LZLES/KY<QZ.;->SJR7,^OES'HY +MLU[.K/];G%F?<N-BHW:^UD.@`_8K=U3V;F:N/WSWQ]GL]'O6PV7?%[X]A.OC +MQX_]_1LRN!Y.71;IT5B_^_OM\?@S>7EWU(::XW_4_+-SK^UN'LAW1->PKPU; +MN";XM?0M..A7#^^J!-IAZI>J$2:Y/R*(Q_M$:8>IU<LH#0W*(.T/QX=A9QT/ +M>P_O<+6*J<:)&8AZ^_W]O7E#O!Z1^_N]`WO7C\[K`+7KB]Z34]<C>7001K"7 +M.?P4;S789T)$C@0MME^HQ3/&,0_SU6.7`WWFB.5T@X2'ND&]44!-I<-KHL?L +MZ&99'+T/'SY$0N1$39:%'`_W^Y17]X>C?L'D)]:T/FI/8E,L6_/Q%?JW+K>Y +MET?SL1;FMZO0=MN#K=%VYI&A3>(\$EO'W+A*C:[TT=9J=*T/MEJC7W58]LY5 +M-!_8\-'AF8]K^.`0E:G@,-VMJRQC91DKRUA9)I5%K"QB91$KBZ0RCY5YK,QC +M99Y49K$RBY59K,R2RC16IK$RC95I4KF.E>M8N8Z5ZU#9[M&7ILS\M@N**[#[ +MZZ5?.EV1W_93D\0RJY"M0H(P,6UX$!TZA*V_K>Q`[&>0.!028"!*A%^ZX-BA +M!`S:[_EW2Y+`DJ77>X`Z!/6QF[/&H#N-`JYF=E0V!0.&!U!35Z7U/#CH(M=( +M8JWOA]";H:/)4-.T,WEH+BJ:Z$7ZL?(8RZ`8Z85[<X>*D.&HDMAUH6;C*YXV +MMN_0H.9#:".Q:17T:U/&^"R#WJ6ER_](=W*"`<O``!([%.B_S!D@S,;NP=XH +MT<4F29X=2]A[J[[WR'(X!DGS<1RMB<=X8819A4Y<Q4XD"!M'TS"T)+K>D8.N +M3`9KU6'D3V?J<!+%CCOV+1P?^IF5)7WL0@+)!Z;K<,A\2U2W%,8H:>A<4]BV +M>#S:#[<1)H.ES3N>;6X+DS&Y=]=7S_6@NM.<=ZGBYW$!KD4=3H;.TA'F<5K? +MX)NI;5]H(NQT:SIZM9>^.X3B?Y'#J,,9IUVOA=,D%)_5B\QF#EZ3QOO),!NU +M#GV8OW>%37=!YON*;&;G\32N%=5=;$RS03/CQ5USK`OJF4^(<K5BQ:G\46S! +M7L%8T=H>,G[6N2A]Q?ZJN]'V:G8.%Q:FR(5IXL*U=!$T;+I4P43)(&5[;.,$ +M-U&_Z!2F=("VQ=`;&]-FU-/K>!\NY_-[[GGKQESSX=\4SC*T9?H$$$ZKYU5+ +M)N-]JAY)R'<1]7MXAI<-'GM#`-V866_[T*57RZF4[K^]6MS4OS#]Y90*L)&. +M:3?"T9[,?P<]@BT;G*S,KO</?>22F)@:Z/>"P42NH4]2N85;A&>L$:$9S3W? +M?H53F9F,L!NBX]&U9^(Q.&CALP^Y/<WC_U*Q.9.CMJ5SL`6N^E',3`<6[,D[ +MD2?6HJ3E?EA<^X$_&V1R,)/!]J-V`)>QVL8)W#X3"-9XP(O0"<CT8:D9SJBG +M5C5=0,Q&U.>%_(F<P\=08/>DQ&[L5;QUZGE]Y@-S,[-0F^L-O0=7V#?W*O@M +M=:^!WT'W"M"H@'GH8BP/XWW1<VPT7]G`.Y]:6/UHF_,_7BF?$P@Z^0Q`KQ(# +M*OGIY!E.3DU=W2F^._;@\ED*W[Q/7_C6?:ZB;YPGC?MI;1?XZ+QR4YP%^_.+ +M$_%)%:>!3[8X!7QBI6]?)(1HK)5V=J7S/OJO[,S74;8S>Y#.LCD@XG(D_@"3 +M39W8+%#??K@U2(;*?KHD/N=YGH&Z!T$Z@CUU!?<H>L:YSA4=L$-9.WPZC-C$ +MF4U\]5:HQ`KS6:4D,<+=YQS-:3_CDW-D=_`).[(]^.2<33:I_LZU&AQ)<&&P +M"[_,%_GT(=GYA*(Y&&;3A]Y>=^,Z[L(/3*!-11)-+K[$U?BT)O%I3N+3FL2G +M.4EH<4-27]V3P;!R\R6>91[>C^3>1_4-)R_O;F^/#[\UG>_>=_6-Z,O\!P@' +MMEP`KEZ$?MWX->YS/4D8O4T8N,J^N.E[:O,EOB%R(6EX$[G\C%D^[=2<>HJ< +M@_K3TWI:VA82%A(6$A82%A(6$A82%A(6$A82%A(6$OY'DM!]+-E_+;Z1=D^> +M_/'KIV>][@N7,$.XOYZ>OK&UI3L!&DZ"FM.:T_,[-O=(R+<FT_;PX\/B:O<[ +M,OSS\5S3`:C@KI_ZHWWGF2_)D%[KG_[)U-*<>IUZ/L'V!D=NEV=Q^6E[B7G: +MP.EG'&C+GZ&U#XW./QVS[9UE+F*FG6$>XKUXIEF7;_!\,PYI[DS3#31VAKG6 +M+?[^E/.:;K*EC7VVLYYP\O7MXVO3=-.O;VR\[)+))Z!N[$PS+2)/.Z52W.GF +M3HIZKA4IOP*>:TG*+W]E32IKTI/+Q*33ZBG'>9Y5Z93OG'!5.MMR4R90F4#D +M\P@]]00J\^2I1?0_<*(LKH[_'BDZ8?#F+U[\[=7;:NH)X.#;;OZ/[6TUZ328 +MGO^3$G]29MM>U`7S%S_<;K</WU=G(//D7)V8JF=@9B'C\\FX&GB,B:EHW^&4 +M.HW"RV?R4IC/SLHYCO\/1"U.\M=%1CD.-::EHAP&&X67S^6E=!''S79;E:7\ +MJVDIC1-^=U=X.0$O5:W[\N/-S]\78I:E^_^2BLHM9S_>_;8P\6N9:+^48?[B +MO^]NWA4?^?7$E(:8F_=O"S$G(*;=[+Z:GI?VJQ7FKQZJ<MIPDM2^_78''6;M +MJW+\]:O3]O;;)>8OCJ_^]_;[0M")SA,53GX5)QN?/_CQ[?2,M%\Z-;^I"CFG +M(F?C0KH7^[>WOZ\F)ZO]+JKYW?[X<%N5MQ,4BOX*_&?C4A,O]O=G8J3];JWY +M[=NJL+.P\U>PNC<NX'[8WK[ZQ]U%865A97D;8.%@X6#A8.%@X6"&@P1\9&*9 +M<V7.E3E7.%@X6#A8.%@X6#A8.%@X6#A8./BOW8.!\7V2A&1(PLP0)R0D@(1) +M7ZZ@+"$G*(-0,*)YRIQ$F\\&G^T-5`_OA#.?)W5E)?OO'W3?]!?.K^L*X>R? +LK:O,4Y_?D[\>]SORP^WQS>WV]N?PK-K59<Q^3M6?Q'9Q/?LG-?=D49*R``"? +` +end diff --git a/usr.sbin/pcvt/fed/Makefile b/usr.sbin/pcvt/fed/Makefile new file mode 100644 index 0000000..699a146 --- /dev/null +++ b/usr.sbin/pcvt/fed/Makefile @@ -0,0 +1,29 @@ + +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else +#CFLAGS = -g -Wall -pipe +CFLAGS = -O -Wall -pipe -I/usr/local/include +OBJS = fed.o select.o edit.o misc.o +LIB = ncurses +DEST = /usr/local/bin + +fed: $(OBJS) + $(CC) -o fed $(OBJS) -l$(LIB) -L/usr/local/lib + +$(OBJS): fed.h + +clean: + rm -f *.o fed *core* trace* + +install: fed + install -c -s -o bin -g bin fed $(DEST) + +.endif diff --git a/usr.sbin/pcvt/fed/edit.c b/usr.sbin/pcvt/fed/edit.c new file mode 100644 index 0000000..c15a90c --- /dev/null +++ b/usr.sbin/pcvt/fed/edit.c @@ -0,0 +1,340 @@ +/* + * Copyright (c) 1992, 1993, 1994 by Hellmuth Michaelis + * + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Hellmuth Michaelis. + * 4. The name of the developer may not be used to endorse or promote + * products derived from this software without specific prior written + * permission. + * + * THIS SOFTWARE IS PROVIDED BY THE DEVELOPER ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + * edit.c, 3.00, last edit-date: [Sun Jan 2 20:08:27 1994] + */ + +/*--------------------------------------------------------------------------- + * + * edit.c font editor edit character + * ------------------------------------------ + * + * written by Hellmuth Michaelis, hm@hcshh.hcs.de + * + * -hm first public release + * -hm some debugging & cleanup + * + *---------------------------------------------------------------------------*/ + +#include "fed.h" + +#define UP 0 +#define DOWN 1 + +static int pen; + +/*---------------------------------------------------------------------------* + * fill edit mode command window + *---------------------------------------------------------------------------*/ +void edit_mode(void) +{ + mvwprintw(cmd_win,1,1,"(W)hite "); + mvwprintw(cmd_win,2,1,"(Black "); + mvwprintw(cmd_win,3,1,"(I)nvert "); + mvwprintw(cmd_win,4,1,"(R)ow BLACK "); + mvwprintw(cmd_win,5,1,"(r)ow WHITE "); + mvwprintw(cmd_win,6,1,"(C)ol BLACK "); + mvwprintw(cmd_win,7,1,"(c)ol WHITE "); + mvwprintw(cmd_win,8,1,"(Q)uit/Save "); + + mvwprintw(cmd_win,9 ,1,"e(X)it/undo "); + mvwprintw(cmd_win,10,1,"Pen (U)p "); + mvwprintw(cmd_win,11,1,"Pen (D)own "); + mvwprintw(cmd_win,12,1," "); + mvwprintw(cmd_win,13,1,"(^P)rev Line"); + mvwprintw(cmd_win,14,1,"(^N)ext Line"); + mvwprintw(cmd_win,15,1,"(^F)orwd Col"); + mvwprintw(cmd_win,16,1,"(^B)ack Col"); + wrefresh(cmd_win); +} + +/*---------------------------------------------------------------------------* + * edit mode command loop + *---------------------------------------------------------------------------*/ +int edit(void) +{ + int c, r; + char l; + unsigned int k_ch; + + c = r = 0; + + pen = UP; + + for(;;) + { + if(pen == DOWN) + dis_cmd(" Edit Mode, the Pen is DOWN"); + else + dis_cmd(" Edit Mode, the Pen is UP"); + + l = ((mvwinch(ch_win,(r+1),(c+1))) & A_CHARTEXT); + wattron(ch_win,A_REVERSE); + mvwprintw(ch_win,(r+1),(c+1),"%c",l); + wattroff(ch_win,A_REVERSE); + wmove(ch_win,(r+1),(c+1)); + wrefresh(ch_win); + + k_ch = wgetch(ch_win); + + switch(k_ch) + { + case K_LEFT: + case KEY_LEFT: + if(c > 0) + { + normal_ch(r,c); + c--; + } + break; + + case K_DOWN: + case KEY_DOWN: + if(r < (ch_height-1)) + { + normal_ch(r,c); + r++; + } + break; + + case K_UP: + case KEY_UP: + if(r > 0) + { + normal_ch(r,c); + r--; + } + break; + + case K_RIGHT: + case KEY_RIGHT: + if(c < (ch_width-1)) + { + normal_ch(r,c); + c++; + } + break; + + case KEY_HOME: + normal_ch(r,c); + c = r = 0; + break; + + case KEY_LL: + normal_ch(r,c); + c = ch_width-1; + r = ch_height-1; + break; + + case 0x0c: + wrefresh(curscr); + break; + + case '\n': + case '\r': + case ' ' : + chg_pt(r,c); + break; + + case 'q': + pen = UP; + normal_ch(r,c); + wrefresh(ch_win); + return(1); + break; + + case 'x': + pen = UP; + normal_ch(r,c); + wrefresh(ch_win); + return(0); + break; + + case 'w': + case 'W': + setchr(WHITE); + break; + + case 'b': + case 'B': + setchr(BLACK); + break; + + case 'i': + case 'I': + invert(); + break; + + case 'r': + setrow(WHITE); + break; + + case 'R': + setrow(BLACK); + break; + + case 'c': + setcol(WHITE); + break; + + case 'C': + setcol(BLACK); + break; + + case 'u': + case 'U': + pen = UP; + break; + + case 'd': + case 'D': + pen = DOWN; + break; + + default: + beep(); + break; + + } + } +} + +/*---------------------------------------------------------------------------* + * + *---------------------------------------------------------------------------*/ +void normal_ch(int r, int c) +{ + char l = ((mvwinch(ch_win,(r+1),(c+1))) & A_CHARTEXT); + wattroff(ch_win,A_REVERSE); + if(pen == DOWN) + mvwprintw(ch_win,(r+1),(c+1),"*"); + else + mvwprintw(ch_win,(r+1),(c+1),"%c",l); + wmove(ch_win,(r+1),(c+1)); +} + +/*---------------------------------------------------------------------------* + * + *---------------------------------------------------------------------------*/ +void chg_pt(int r, int c) +{ + char l; + l = ((mvwinch(ch_win,(r+1),(c+1))) & A_CHARTEXT); + if(l == WHITE) + l = BLACK; + else + l = WHITE; + mvwprintw(ch_win,(r+1),(c+1),"%c",l); + wmove(ch_win,(r+1),(c+1)); +} + +/*---------------------------------------------------------------------------* + * invert current character + *---------------------------------------------------------------------------*/ +void invert(void) +{ + int r,c; + + r = 1; + + while(r <= ch_height) + { + c = 1; + while(c <= ch_width) + { + if(WHITE == mvwinch(ch_win, r, c)) + mvwaddch(ch_win, r, c, BLACK); + else + mvwaddch(ch_win, r, c, WHITE); + c++; + } + r++; + } +} + +/*---------------------------------------------------------------------------* + * fill current character black/white + *---------------------------------------------------------------------------*/ +void setchr(char type) +{ + int r,c; + + r = 1; + + while(r <= ch_height) + { + c = 1; + while(c <= ch_width) + { + mvwaddch(ch_win, r, c, type); + c++; + } + r++; + } +} + +/*---------------------------------------------------------------------------* + * set current row to black/white + *---------------------------------------------------------------------------*/ +void setrow(char type) +{ + int r,c; + + getyx(ch_win,r,c); + + c = 1; + + while(c <= ch_width) + { + mvwaddch(ch_win, r, c, type); + c++; + } +} + +/*---------------------------------------------------------------------------* + * set current column to black/white + *---------------------------------------------------------------------------*/ +void setcol(char type) +{ + int r,c; + + getyx(ch_win,r,c); + + r = 1; + + while(r <= ch_height) + { + mvwaddch(ch_win, r, c, type); + r++; + } +} + +/*---------------------------------- E O F ----------------------------------*/ diff --git a/usr.sbin/pcvt/fed/fed.c b/usr.sbin/pcvt/fed/fed.c new file mode 100644 index 0000000..aa577ab --- /dev/null +++ b/usr.sbin/pcvt/fed/fed.c @@ -0,0 +1,168 @@ +/* + * Copyright (c) 1992, 1993, 1994 by Hellmuth Michaelis + * + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Hellmuth Michaelis. + * 4. The name of the developer may not be used to endorse or promote + * products derived from this software without specific prior written + * permission. + * + * THIS SOFTWARE IS PROVIDED BY THE DEVELOPER ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + * fed.c, 3.00, last edit-date: [Sun Jan 2 20:08:45 1994] + */ + +/*--------------------------------------------------------------------------- + * + * fed.c font editor main file + * ------------------------------------- + * + * written by Hellmuth Michaelis, hm@hcshh.hcs.de + * + * -hm first public release + * -hm activating font save + * + *---------------------------------------------------------------------------*/ + +#define FED + +#include "fed.h" + +void main(int argc, char *argv[]) +{ + int i; + int row, col; + int ret; + + if(argc != 2) + { + fprintf(stderr,"EGA/VGA Fonteditor, Rel 1.00\n"); + fprintf(stderr,"usage: %s <fontfilename>\n",argv[0]); + exit(1); + } + + readfont(argv[1]); /* read fontfile into memory */ + + initscr(); + cbreak(); + noecho(); + nonl(); + keypad(stdscr,TRUE); + idlok(stdscr, TRUE); + + move(0,0); + standout(); + addstr(" Interactive EGA/VGA Fonteditor - (c) 1993, 1994 Hellmuth Michaelis "); + standend(); + +/* character horizontal ruler */ + + move(WINROW-1, CHCOL + ((WIDTH16 - ch_width)/2) + 1); + if(ch_width == WIDTH16) + addstr("1234567890123456"); + else + addstr("12345678"); + +/* charcater vertical ruler */ + + for(i=1; i < ch_height+1; i++) + mvprintw((WINROW+i), (CHCOL + ((WIDTH16 - ch_width)/2) - 2), "%2d", i); + + +/* select horizontal ruler */ + + move(WINROW-1,SETCOL+2); + addstr("0 1 2 3 4 5 6 7 8 9 A B C D E F "); + +/* select vertical ruler */ + + for(i=0; i<10; i++) + mvaddch((WINROW+i+1),(SETCOL-1),(i+'0')); + for(i=0; i<6; i++) + mvaddch((WINROW+10+i+1),(SETCOL-1),(i+'A')); + +/* label available commands window */ + + move(WINROW-1,CMDCOL+1); + addstr("Commands"); + + refresh(); + +/* command window */ + + cmd_win = newwin(((WSIZE)+(2*WBORDER)),(CMDSIZE+(2*WBORDER)), + WINROW,CMDCOL); + keypad(cmd_win,TRUE); + idlok(cmd_win, TRUE); + box(cmd_win,'|','-'); + + sel_mode(); + +/* character font window */ + + ch_win = newwin((ch_height+(2*WBORDER)),(ch_width+(2*WBORDER)), + WINROW, CHCOL+((WIDTH16 - ch_width)/2)); + keypad(ch_win,TRUE); + idlok(ch_win, TRUE); + + box(ch_win,'|','-'); + wrefresh(ch_win); + +/* character select window */ + + set_win = newwin((WSIZE+(2*WBORDER)),((WSIZE*2)+(2*WBORDER)), + WINROW,SETCOL); /* whole character set */ + keypad(set_win,TRUE); + idlok(set_win, TRUE); + + box(set_win,'|','-'); + + row = 0; + col = 0; + + for(i=0; i<256; i++) + { + mvwprintw(set_win,row+1,col+1,"%02.2X",i); + if(++row > 15) + { + row = 0; + col += 2; + } + } + wmove(set_win,1,1); + wrefresh(set_win); + +/* start */ + + clr_cmd(); + + curchar = 0; + + if((ret = selectc()) == 1) + { + writefont(); + } + endwin(); +} + +/*---------------------------------- E O F ----------------------------------*/ diff --git a/usr.sbin/pcvt/fed/fed.h b/usr.sbin/pcvt/fed/fed.h new file mode 100644 index 0000000..27a32c3 --- /dev/null +++ b/usr.sbin/pcvt/fed/fed.h @@ -0,0 +1,127 @@ +/* + * Copyright (c) 1992, 1993, 1994 by Hellmuth Michaelis + * + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Hellmuth Michaelis. + * 4. The name of the developer may not be used to endorse or promote + * products derived from this software without specific prior written + * permission. + * + * THIS SOFTWARE IS PROVIDED BY THE DEVELOPER ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + * fed.h, 3.00, last edit-date: [Sun Jan 2 20:10:31 1994] + */ + +#include <ncurses.h> +#include <stdlib.h> +#include <string.h> +#include <unistd.h> + +#ifdef FED + +int ch_height; +int ch_width; + +int curchar; + +WINDOW *ch_win; +WINDOW *set_win; +WINDOW *cmd_win; + +#else + +extern int ch_height; /* current fontfile character dimensions */ +extern int ch_width; + +extern int curchar; /* character being edited */ + +extern WINDOW *ch_win; /* windows */ +extern WINDOW *set_win; +extern WINDOW *cmd_win; + +#endif + +#define FONTCHARS 256 /* no of chars in a fontfile */ + +#define WHITE ('.') +#define BLACK ('*') + +#define K_UP 0x10 /* ^P */ +#define K_DOWN 0x0e /* ^N */ +#define K_RIGHT 0x06 /* ^F */ +#define K_LEFT 0x02 /* ^B */ + +#define WINROW 3 +#define CMDCOL 3 +#define CHCOL 20 +#define SETCOL 41 +#define WSIZE 16 +#define CMDSIZE 12 +#define WBORDER 1 + +/* fonts */ + +#define WIDTH8 8 /* 8 bits wide font */ +#define WIDTH16 16 /* 16 bits wide font */ + +#define FONT8X8 2048 /* filesize for 8x8 font */ +#define HEIGHT8X8 8 /* 8 scan lines char cell height */ + +#define FONT8X10 2560 /* filesize for 8x10 font */ +#define HEIGHT8X10 10 /* 10 scan lines char cell height */ + +#define FONT8X14 3584 /* filesize for 8x14 font */ +#define HEIGHT8X14 14 /* 14 scan lines char cell height */ +#define WIDTH8X14 8 /* 8 bits wide font */ + +#define FONT8X16 4096 /* filesize for 8x16 font */ +#define HEIGHT8X16 16 /* 16 scan lines char cell height */ + +#define FONT16X16 8192 /* filesize for 16x16 font */ +#define HEIGHT16X16 16 /* 16 scan lines char cell height */ + + +void edit_mode ( void ); +int edit ( void ); +void normal_ch ( int r, int c ); +void chg_pt ( int r, int c ); +void invert ( void ); +void setchr ( char type ); +void setrow ( char type ); +void setcol ( char type ); +void main ( int argc, char *argv[] ); +void readfont ( char *filename ); +void dis_cmd ( char *strg ); +void clr_cmd ( void ); +void save_ch ( void ); +void move_ch ( int src, int dest ); +void xchg_ch ( int src, int dest ); +void display ( int no ); +void sel_mode ( void ); +int selectc ( void ); +void normal_set ( int r, int c ); +int sel_dest ( void ); +void normal_uset ( int r, int c ); +void writefont( void ); + +/* ------------------------------ EOF ----------------------------------- */ diff --git a/usr.sbin/pcvt/fed/misc.c b/usr.sbin/pcvt/fed/misc.c new file mode 100644 index 0000000..a0dff32 --- /dev/null +++ b/usr.sbin/pcvt/fed/misc.c @@ -0,0 +1,353 @@ +/* + * Copyright (c) 1992, 1993, 1994 by Hellmuth Michaelis + * + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Hellmuth Michaelis. + * 4. The name of the developer may not be used to endorse or promote + * products derived from this software without specific prior written + * permission. + * + * THIS SOFTWARE IS PROVIDED BY THE DEVELOPER ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + * misc.c, 3.00, last edit-date: [Sun Jan 2 20:09:21 1994] + */ + +/*--------------------------------------------------------------------------- + * + * misc.c font editor misc routines + * ----------------------------------------- + * + * written by Hellmuth Michaelis, hm@hcshh.hcs.de + * + * -hm first public release + * -hm writefont routine + * + *---------------------------------------------------------------------------*/ + +#include "fed.h" + +#include <stdlib.h> +#include <string.h> +#include <sys/types.h> +#include <sys/stat.h> + +static unsigned char *fonttab; /* ptr to font in core memory */ + +static char *bitmask[] = { + "....", /* 0 */ + "...*", /* 1 */ + "..*.", /* 2 */ + "..**", /* 3 */ + ".*..", /* 4 */ + ".*.*", /* 5 */ + ".**.", /* 6 */ + ".***", /* 7 */ + "*...", /* 8 */ + "*..*", /* 9 */ + "*.*.", /* A */ + "*.**", /* B */ + "**..", /* C */ + "**.*", /* D */ + "***.", /* E */ + "****", /* F */ + NULL }; + +static char lfilename[1024]; /* current filename */ +static unsigned int lfilesize; /* current filename's size */ + +/*---------------------------------------------------------------------------* + * read fontfile into memory + *---------------------------------------------------------------------------*/ +void readfont(char *filename) +{ + FILE *in; + struct stat sbuf, *sbp; + int ret; + char buffer[1024]; + + sbp = &sbuf; + + if((in = fopen(filename, "r")) == NULL) + { + sprintf(buffer, "cannot open file %s for reading", filename); + perror(buffer); + exit(1); + } + + if((fstat(fileno(in), sbp)) != 0) + { + sprintf(buffer, "cannot fstat file %s", filename); + perror(buffer); + exit(1); + } + + switch(sbp->st_size) + { + case FONT8X8: + ch_height = HEIGHT8X8; + ch_width = WIDTH8; + break; + + case FONT8X10: + ch_height = HEIGHT8X10; + ch_width = WIDTH8; + break; + + case FONT8X14: + ch_height = HEIGHT8X14; + ch_width = WIDTH8; + break; + + case FONT8X16: + ch_height = HEIGHT8X16; + ch_width = WIDTH8; + break; + + case FONT16X16: + ch_height = HEIGHT16X16; + ch_width = WIDTH16; + break; + + default: + fprintf(stderr,"error, file %s is no valid font file, size=%d\n",filename,sbp->st_size); + exit(1); + } + + if((fonttab = (unsigned char *)malloc((size_t)sbp->st_size)) == NULL) + { + fprintf(stderr,"error, malloc failed\n"); + exit(1); + } + + strcpy(lfilename, filename); /* save for write */ + lfilesize = sbp->st_size; /* save for write */ + + if((ret = fread(fonttab, sizeof(*fonttab), sbp->st_size, in)) != sbp->st_size) + { + sprintf(buffer,"error reading file %s, size = %d, ret = %d\n",filename,sbp->st_size, ret); + perror(buffer); + exit(1); + } +} + +/*---------------------------------------------------------------------------* + * write fontfile to disk + *---------------------------------------------------------------------------*/ +void writefont() +{ + FILE *in, *out; + int ret; + char buffer[1024]; + + if((in = fopen(lfilename, "r")) != NULL) + { + int c; + char wfn[1024]; + + strcpy(wfn, lfilename); + strcat(wfn, ".BAK"); + if((out = fopen(wfn, "w")) == NULL) + { + sprintf(buffer, "cannot open file %s for writing", wfn); + perror(buffer); + exit(1); + } + + while(( c = fgetc(in) ) != EOF ) + fputc(c, out); + + fclose(out); + fclose(in); + } + + if((out = fopen(lfilename, "w")) == NULL) + { + sprintf(buffer, "cannot open file %s for writing", lfilename); + perror(buffer); + exit(1); + } + + if((ret = fwrite(fonttab, sizeof(*fonttab), lfilesize, out)) != lfilesize) + { + sprintf(buffer,"error writing file %s, size=%d, ret=%d\n",lfilename,lfilesize, ret); + perror(buffer); + exit(1); + } +} + +/*---------------------------------------------------------------------------* + * display a string + *---------------------------------------------------------------------------*/ +void dis_cmd(char *strg) +{ + move(22,0); + clrtoeol(); + mvaddstr(22,0,strg); + refresh(); +} + +/*---------------------------------------------------------------------------* + * clear a command string + *---------------------------------------------------------------------------*/ +void clr_cmd(void) +{ + move(22,0); + clrtoeol(); + refresh(); +} + +/*---------------------------------------------------------------------------* + * move char from src to dest + *---------------------------------------------------------------------------*/ +void move_ch(int src, int dst) +{ + unsigned char *s, *d; + int offset = 0; + + if(ch_width == WIDTH16) + offset = 2; + else + offset = 1; + + s = &(fonttab[ch_height * offset * src]); + d = &(fonttab[ch_height * offset * dst]); + + bcopy(s, d, (ch_height*offset)); /* src -> dst */ +} + +/*---------------------------------------------------------------------------* + * exchange char's src and dest + *---------------------------------------------------------------------------*/ +void xchg_ch(int src, int dst) +{ + unsigned char *s, *d; + unsigned char buf[32]; + int offset = 0; + + if(ch_width == WIDTH16) + offset = 2; + else + offset = 1; + + s = &(fonttab[ch_height * offset * src]); + d = &(fonttab[ch_height * offset * dst]); + + bcopy(s, buf, (ch_height*offset)); /* src -> tmp */ + bcopy(d, s, (ch_height*offset)); /* dst -> src */ + bcopy(buf, d, (ch_height*offset)); /* tmp -> dst */ +} + +/*---------------------------------------------------------------------------* + * display the current selected character + *---------------------------------------------------------------------------*/ +void display(int no) +{ + unsigned char *fontchar; + char line[32]; + int ln_no; + unsigned char hibyte; + unsigned char lobyte; + int offset; + int r; + + offset = 0; + r = 1; + lobyte = 0; + + if(ch_width == WIDTH16) + fontchar = &(fonttab[ch_height * 2 * no]); + else + fontchar = &(fonttab[ch_height * no]); + + for (ln_no = 0; ln_no < ch_height; ln_no++) + { + hibyte = *(fontchar + (offset++)); + + if(ch_width == WIDTH16) + { + lobyte = *(fontchar + offset++); + } + + strcpy(line,bitmask[(int)((hibyte >> 4) & 0x0f)]); + strcat(line,bitmask[(int)(hibyte & 0x0f)]); + + if(ch_width == WIDTH16) + { + strcat(line,bitmask[(int)((lobyte >> 4) & 0x0f)]); + strcat(line,bitmask[(int)(lobyte & 0x0f)]); + mvwprintw(ch_win, r, 1, "%16.16s", line); + } + else + { + mvwprintw(ch_win, r, 1, "%8.8s", line); + } + r++; + } + wmove(ch_win, 1, 1); + wrefresh(ch_win); +} + +/*---------------------------------------------------------------------------* + * save character + *---------------------------------------------------------------------------*/ +void save_ch(void) +{ + unsigned char *s; + int offset = 0; + int r, c; + unsigned short byte; + unsigned short shift; + + if(ch_width == WIDTH16) + offset = 2; + else + offset = 1; + + s = &(fonttab[ch_height * offset * curchar]); + + r = 1; + + while(r <= ch_height) + { + c = 1; + byte = 0; + if(offset == 2) + shift = 0x8000; + else + shift = 0x80; + + while(c <= ch_width) + { + if(mvwinch(ch_win, r, c) == BLACK) + byte |= shift; + shift = (shift >> 1); + c++; + } + *s++ = byte; + r++; + } +} + +/*---------------------------------- E O F ----------------------------------*/ + + diff --git a/usr.sbin/pcvt/fed/select.c b/usr.sbin/pcvt/fed/select.c new file mode 100644 index 0000000..6b9d385 --- /dev/null +++ b/usr.sbin/pcvt/fed/select.c @@ -0,0 +1,334 @@ +/* + * Copyright (c) 1992, 1993, 1994 by Hellmuth Michaelis + * + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Hellmuth Michaelis. + * 4. The name of the developer may not be used to endorse or promote + * products derived from this software without specific prior written + * permission. + * + * THIS SOFTWARE IS PROVIDED BY THE DEVELOPER ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + * select.c, 3.00, last edit-date: [Sun Jan 2 20:09:36 1994] + */ + +/*--------------------------------------------------------------------------- + * + * select.c font editor select character + * ---------------------------------------------------- + * + * written by Hellmuth Michaelis, hm@hcshh.hcs.de + * + * -hm first public release + * -hm debugging + * + *---------------------------------------------------------------------------*/ + +#include "fed.h" + +int sc, sr, scurchar; + +int edit(); + +void sel_mode(void) +{ + mvwprintw(cmd_win,1,1,"(E)dit "); + mvwprintw(cmd_win,2,1,"(M)ove "); + mvwprintw(cmd_win,3,1,"exchan(G)e "); + mvwprintw(cmd_win,4,1,"(Q)uit/Save "); + mvwprintw(cmd_win,5,1,"e(X)it/Undo "); + mvwprintw(cmd_win,6,1," "); + mvwprintw(cmd_win,7,1," "); + mvwprintw(cmd_win,8,1," "); + + mvwprintw(cmd_win,9 ,1," "); + mvwprintw(cmd_win,10,1," "); + mvwprintw(cmd_win,11,1," "); + mvwprintw(cmd_win,12,1," "); + mvwprintw(cmd_win,13,1,"(^P)rev Line"); + mvwprintw(cmd_win,14,1,"(^N)ext Line"); + mvwprintw(cmd_win,15,1,"(^F)orwd Col"); + mvwprintw(cmd_win,16,1,"(^B)ack Col"); + wrefresh(cmd_win); +} + +int selectc() +{ + int c, r; + int ret; + char h, l; + unsigned int k_ch; + + c = (curchar / 16); + r = (curchar % 16); + + for(;;) + { + dis_cmd(" Select Character"); + + sel_mode(); + + curchar = r + (c*16); + + display(curchar); + + h = ((mvwinch(set_win,(r+1),((c*2)+1))) & A_CHARTEXT); + l = ((mvwinch(set_win,(r+1),((c*2)+2))) & A_CHARTEXT); + wattron(set_win,A_REVERSE); + mvwprintw(set_win,(r+1),((c*2)+1),"%c%c",h,l); + wattroff(set_win,A_REVERSE); + wmove(set_win,(r+1),((c*2)+1)); + wrefresh(set_win); + + k_ch = wgetch(set_win); + + switch(k_ch) + { + case K_LEFT: + case KEY_LEFT: + if(c > 0) + { + normal_set(r,c); + c--; + } + break; + + case K_DOWN: + case KEY_DOWN: + if(r < 15) + { + normal_set(r,c); + r++; + } + break; + + case K_UP: + case KEY_UP: + if(r > 0) + { + normal_set(r,c); + r--; + } + break; + + case K_RIGHT: + case KEY_RIGHT: + if(c < 15) + { + normal_set(r,c); + c++; + } + break; + + case 'e': + case 'E': + edit_mode(); + dis_cmd(" Edit Character"); + display(curchar); + ret = edit(); + if(ret == 1) + save_ch(); + break; + + case 'g': + case 'G': + dis_cmd(" Exchange: select Destination, then press RETURN or any other Key to ABORT"); + sr = r; + sc = c; + scurchar = curchar; + if((curchar = sel_dest()) == -1) + { /* failsafe */ + r = sr; + c = sc; + curchar = scurchar; + } + else + { /* valid return */ + normal_set(r,c); + c = (curchar / 16); + r = (curchar % 16); + xchg_ch(scurchar,curchar); + } + break; + + case 'm': + case 'M': + dis_cmd(" Move: select Destination, then press RETURN or any other Key to ABORT"); + sr = r; + sc = c; + scurchar = curchar; + if((curchar = sel_dest()) == -1) + { /* failsafe */ + r = sr; + c = sc; + curchar = scurchar; + } + else + { /* valid return */ + normal_set(r,c); + c = (curchar / 16); + r = (curchar % 16); + move_ch(scurchar,curchar); + } + break; + + case 'q': + case 'Q': + normal_set(r,c); + wrefresh(set_win); + return(1); + break; + + case 'x': + case 'X': + normal_set(r,c); + wrefresh(set_win); + return(0); + break; + + case 0x0c: + wrefresh(curscr); + break; + + default: + beep(); + break; + + } + } +} + +void normal_set(int r, int c) +{ + char h, l; + + h = ((mvwinch(set_win,(r+1),((c*2)+1))) & A_CHARTEXT); + l = ((mvwinch(set_win,(r+1),((c*2)+2))) & A_CHARTEXT); + wattroff(set_win,A_REVERSE); + mvwprintw(set_win,(r+1),((c*2)+1),"%c%c",h,l); + wmove(set_win,(r+1),((c*2)+1)); +} + +int sel_dest(void) +{ + int c, r; + char h, l; + unsigned int k_ch; + + c = (curchar / 16); + r = (curchar % 16); + + for(;;) + { + + curchar = r + (c*16); + + display(curchar); + + h = ((mvwinch(set_win,(r+1),((c*2)+1))) & A_CHARTEXT); + l = ((mvwinch(set_win,(r+1),((c*2)+2))) & A_CHARTEXT); + wattron(set_win,A_UNDERLINE); + mvwprintw(set_win,(r+1),((c*2)+1),"%c%c",h,l); + wattroff(set_win,A_UNDERLINE); + wmove(set_win,(r+1),((c*2)+1)); + wrefresh(set_win); + + k_ch = wgetch(set_win); + + switch(k_ch) + { + case K_LEFT: + case KEY_LEFT: + if(c > 0) + { + normal_uset(r,c); + c--; + } + break; + + case K_DOWN: + case KEY_DOWN: + if(r < 15) + { + normal_uset(r,c); + r++; + } + break; + + case K_UP: + case KEY_UP: + if(r > 0) + { + normal_uset(r,c); + r--; + } + break; + + case K_RIGHT: + case KEY_RIGHT: + if(c < 15) + { + normal_uset(r,c); + c++; + } + break; + + case '\r': + case '\n': + normal_uset(r,c); + return(r + (c*16)); + + case 0x0c: + wrefresh(curscr); + break; + + default: + normal_uset(r,c); + return(-1); + } + } +} + +void normal_uset(int r, int c) +{ + char h, l; + + h = ((mvwinch(set_win,(r+1),((c*2)+1))) & A_CHARTEXT); + l = ((mvwinch(set_win,(r+1),((c*2)+2))) & A_CHARTEXT); + + wattroff(set_win,A_UNDERLINE); + mvwprintw(set_win,(r+1),((c*2)+1),"%c%c",h,l); + wmove(set_win,(r+1),((c*2)+1)); + + if((r==sr) && (c==sc)) + { + wattron(set_win,A_REVERSE); + mvwprintw(set_win,(r+1),((c*2)+1),"%c%c",h,l); + wattroff(set_win,A_REVERSE); + wmove(set_win,(r+1),((c*2)+1)); + } +} + + + +/*---------------------------------- E O F ----------------------------------*/ diff --git a/usr.sbin/pcvt/fontedit/Makefile b/usr.sbin/pcvt/fontedit/Makefile new file mode 100644 index 0000000..94463aa --- /dev/null +++ b/usr.sbin/pcvt/fontedit/Makefile @@ -0,0 +1,20 @@ +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +PROG= fontedit +CLEANFILES+= core.fontedit fontedit.core + +.include <bsd.prog.mk> + +.endif + + + diff --git a/usr.sbin/pcvt/fontedit/README b/usr.sbin/pcvt/fontedit/README new file mode 100644 index 0000000..1854129 --- /dev/null +++ b/usr.sbin/pcvt/fontedit/README @@ -0,0 +1,36 @@ +When I first saw this posted to rn, I tried to compile this on a machine +running BSD UNIX. Much to my dissapointment, It said "unable to find +/usr/include/termio.h" and thus it sat for a couple months. I was able to +compile it on a 3b5, but I didn't have a vt220 hooked up to it. I was doing +some unrelated work with ioctl calls and finally realized that it would not be +too hard to convert it from System V to BSD. It also looked kind of strange +with the cursor on, so I turned this off. To implement this, compile with +the "-DCURFIX" flag in the Makefile. +I am working on a new version that uses curses and that would enable you to +change the file that your are working on without leaving the program. +I thought I'd post it as it is now, since it has a lot of uses right away. +Imagine changing your favorite game to have objects that look like what they +are instead of the regular characters. Also, I think people should post their +own character sets, if they come up with some neat stuff. + Please send any comments or suggestions to: + + UUCP : ..!harvard!bu-cs!bucsb!eap + ARPANET: eap@bucsb.bu.edu + CSNET : eap%bucsb@bu-cs + + Have fun, + + - Eric Pearce + Boston University + + + + + + + + + + + + diff --git a/usr.sbin/pcvt/fontedit/fontedit.1 b/usr.sbin/pcvt/fontedit/fontedit.1 new file mode 100644 index 0000000..8b55edb --- /dev/null +++ b/usr.sbin/pcvt/fontedit/fontedit.1 @@ -0,0 +1,58 @@ +.TH FONTEDIT 1 LOCAL +.SH NAME +fontedit \- Edit fonts. +.SH SYNOPSIS +.B fontedit file +.SH DESCRIPTION +.I Fontedit +is used to edit the down line reloadable character set (DRCS) of a VT220 +terminal. The editor has two display areas, one for displaying the +entry currently being manipulated, and one for displaying the complete +DRCS. Commands to the editor take the form of function keys. +.PP +.I Fontedit +takes one command line parameter, a file name. This file is +used to save the character set. If the file exists when \fIfontedit\fP +is invoked, it is read in to initialize the DRCS. The file is written +to when \fIfontedit\fP exits. +.PP +Commands to fontedit take the form of function keys. The current +definitions are: +.IP \fBHELP\fP +Display a help screen. +.IP \fBF6\fP +Turn the pixel under the cursor on. +.IP \fBF7\fP +Turn the pixel under the cursor off. +.IP \fBF13\fP +Clear the display area. +.IP \fBFind\fP +Save the current font in the font table. Update the DRCS display. +.IP \fBSelect\fP +Extract the entry selected by the cursor in the DRCS display. +.IP \fBPrev\fP +Move the cursor to the previous entry in the DRCS display. +.IP \fBNext\fP +Move the cursor to the next entry in the DRCS display. +.IP \fBInsert\fP +Insert a blank line at the current cursor position. The bottom row is lost. +.IP \fBRemove\fP +Remove the row at the current cursor position. All rows below the +current one are shifted up. +.IP \fBCursors\fP +Move the cursor in the main display area. +.PP +If the screen gets garbled, press <control-L>. +.PP +To exit \fIfontedit\fP, press <control-D>. The DRCS will be saved in +\fIfile\fP. To exit without saving the DRCS, hit interrupt (usually +DEL). +.SH DIAGNOSTICS +.I Fontedit +will issue a warning when the entry being worked on is not saved, and +some potentially destructive command, like \fBSelect\fP is used. To +override the warning message, immediately reissue the command. +.SH AUTHOR +Greg Franks. + + diff --git a/usr.sbin/pcvt/fontedit/fontedit.c b/usr.sbin/pcvt/fontedit/fontedit.c new file mode 100644 index 0000000..479ba74 --- /dev/null +++ b/usr.sbin/pcvt/fontedit/fontedit.c @@ -0,0 +1,925 @@ +/* + * fontedit + * Fonteditor for VT220 + * + * BUGS: + * o Cursor motion is less than optimal (but who cares at 9600), + * + * COMPILE: + * cc -O fontedit.c -o fontedit + * (use Makefile) + * + * Copyright (c) 1987 by Greg Franks. + * + * Permission is granted to do anything you want with this program + * except claim that you wrote it. + * + * + * REVISION HISTORY: + * + * Nov 21, 1987 - Fixed man page to say "Fontedit" instead of "Top" + * Nov 22, 1987 - Added BSD Compatible ioctl, turned cursor on/off + * - eap@bucsf.bu.edu + */ + +void clear_screen(); +#include <stdio.h> +#ifdef SYSV +#include <sys/termio.h> +#endif SYSV +#ifdef BSD +#include <sys/ioctl.h> +#endif BSD +#if defined (__386BSD__) || defined (__NetBSD__) || defined (__FreeBSD__) +#include <sys/termios.h> +#include <sys/ioctl.h> +#endif /* __386BSD__ || __NetBSD__ || __FreeBSD__ */ +#include <signal.h> + +#ifdef CURFIX +#define CURSORON "\033[?25h" +#define CURSOROFF "\033[?25l" +#endif CURFIX + +#define MAX_ROWS 10 +#define MAX_COLS 8 + +typedef enum { false, true } bool; + +#define KEY_FIND 0x0100 +#define KEY_INSERT 0x0101 +#define KEY_REMOVE 0x0102 +#define KEY_SELECT 0x0103 +#define KEY_PREV 0x0104 +#define KEY_NEXT 0x0105 +#define KEY_F6 0X0106 +#define KEY_F7 0x0107 +#define KEY_F8 0x0108 +#define KEY_F9 0x0109 +#define KEY_F10 0x010a +#define KEY_F11 0x010b +#define KEY_F12 0x010c +#define KEY_F13 0x010d +#define KEY_F14 0x010e +#define KEY_HELP 0x010f +#define KEY_DO 0x0110 +#define KEY_F17 0x0111 +#define KEY_F18 0x0112 +#define KEY_F19 0x0113 +#define KEY_F20 0x0114 +#define KEY_UP 0x0115 +#define KEY_DOWN 0x0116 +#define KEY_RIGHT 0x0117 +#define KEY_LEFT 0x0118 + +/* + * Position of main drawing screen. + */ + +#define ROW_OFFSET 3 +#define COL_OFFSET 10 + +/* + * Position of the DRCS table. + */ + +#define TABLE_ROW 4 +#define TABLE_COL 50 + +/* + * + */ + +#define ERROR_ROW 20 +#define ERROR_COL 40 + +bool display_table[MAX_ROWS][MAX_COLS]; + +#define TOTAL_ENTRIES (128 - 32) +#define SIXELS_PER_CHAR 16 + +char font_table[TOTAL_ENTRIES][SIXELS_PER_CHAR]; +unsigned int current_entry; + +#ifdef SYSV +struct termio old_stty, new_stty; +#endif SYSV +#ifdef BSD +struct sgttyb old_stty, new_stty; +#endif BSD +#if defined (__386BSD__) || defined (__NetBSD__) || defined (__FreeBSD__) +struct termios old_stty, new_stty; +#endif /* __386BSD__ || __NetBSD__ || __FreeBSD__ */ +FILE * font_file = (FILE *)0; + + +/* + * Interrupt + * Exit gracefully. + */ + +interrupt() +{ + void clear_screen(); +#ifdef CURFIX + printf("%s\n",CURSORON); +#endif CURFIX +#ifdef SYSV + ioctl( 0, TCSETA, &old_stty ); +#endif SYSV +#ifdef BSD + ioctl( 0, TIOCSETP, &old_stty ); +#endif BSD +#if defined (__386BSD__) || defined (__NetBSD__) || defined (__FreeBSD__) + ioctl( 0, TIOCSETA, &old_stty ); +#endif /* __386BSD__ || __NetBSD__ || __FreeBSD__ */ + clear_screen(); + exit( 0 ); +} + + +/* + * Main + * Grab input/output file and call main command processor. + */ + +main( argc, argv ) +int argc; +char *argv[]; +{ + void command(), init_restore(), clear_screen(); + void save_table(), get_table(), extract_entry(); + + if ( argc != 2 ) { + fprintf( stderr, "usage: fontedit filename\n" ); + exit( 1 ); + } + + printf( "Press HELP for help\n" ); + printf( "\033P1;1;2{ @\033\\" ); /* Clear font buffer */ + fflush( stdout ); + sleep( 1 ); /* Let terminal catch up */ + /* otherwise we get frogs */ + + if ( ( font_file = fopen( argv[1], "r" ) ) == (FILE *)0 ) { + if ( ( font_file = fopen( argv[1], "w" ) ) == (FILE *)0 ) { + fprintf( stderr, "Cannot create file %s \n", argv[1] ); + exit( 1 ); + } + } + fclose( font_file ); + + if ( ( font_file = fopen( argv[1], "r" ) ) != (FILE *)0 ) { + get_table( font_file ); + fclose( font_file ); + } + + if ( ( font_file = fopen( argv[1], "r+" ) ) == (FILE *)0 ) { + fprintf( stderr, "Cannot open %s for writing\n", argv[1] ); + exit( 1 ); + } +#ifdef CURFIX + printf("%s\n",CURSOROFF); +#endif CURFIX +#ifdef SYSV + ioctl( 0, TCGETA, &old_stty ); +#endif SYSV +#ifdef BSD + ioctl( 0, TIOCGETP, &old_stty ); +#endif BSD +#if defined (__386BSD__) || defined (__NetBSD__) || defined (__FreeBSD__) + ioctl( 0, TIOCGETA, &old_stty ); +#endif /* __386BSD__ || __NetBSD__ || __FreeBSD__ */ + signal( SIGINT, (void *) interrupt ); + new_stty = old_stty; +#ifdef SYSV + new_stty.c_lflag &= ~ICANON; + new_stty.c_cc[VMIN] = 1; + ioctl( 0, TCSETA, &new_stty ); +#endif SYSV +#if defined (__386BSD__) || defined (__NetBSD__) || defined (__FreeBSD__) + new_stty.c_lflag &= ~ICANON; + new_stty.c_lflag &= ~ECHO; + new_stty.c_cc[VMIN] = 1; + ioctl( 0, TIOCSETA, &new_stty ); +#endif /* __386BSD__ || __NetBSD__ || __FreeBSD__ */ +#ifdef BSD + new_stty.sg_flags |= CBREAK; + new_stty.sg_flags &= ~ECHO; + ioctl( 0, TIOCSETP, &new_stty ); +#endif BSD + current_entry = 1; + extract_entry( current_entry ); + init_restore(); + command(); +#ifdef SYSV + ioctl( 0, TCSETA, &old_stty ); +#endif SYSV +#ifdef BSD + ioctl( 0, TIOCSETP, &old_stty ); +#endif BSD +#if defined (__386BSD__) || defined (__NetBSD__) || defined (__FreeBSD__) + ioctl( 0, TIOCSETA, &old_stty ); +#endif /* __386BSD__ || __NetBSD__ || __FreeBSD__ */ + clear_screen(); + + /* Overwrite the old file. */ + + fseek( font_file, 0L, 0 ); + save_table( font_file ); + fclose( font_file ); +#ifdef CURFIX + printf("%s\n",CURSORON); +#endif CURFIX +} + + + +/* + * Command + * Process a function key. + * + * The user cannot fill in slots 0 or 95 (space and del respecitively). + */ + +void +command() +{ + register int c; + register int row, col; + register int i, j; + bool change, error, override; + + void build_entry(), extract_entry(), send_entry(), print_entry(); + void highlight(), draw_current(), init_restore(), help(); + void warning(); + + change = false; + error = false; + override = false; + row = 0; col = 0; + highlight( row, col, true ); + + for ( ;; ) { + c = get_key(); + highlight( row, col, false ); /* turn cursor off */ + + if ( error ) { + move ( ERROR_ROW, ERROR_COL ); + printf( "\033[K" ); /* Clear error message */ + move ( ERROR_ROW+1, ERROR_COL ); + printf( "\033[K" ); /* Clear error message */ + error = false; + } else { + override = false; + } + + switch ( c ) { + + case KEY_FIND: /* update DRCS */ + if ( !change && !override ) { + warning( "No changes to save" ); + override = true; + error = true; + } else { + build_entry( current_entry ); + send_entry( current_entry ); + print_entry( current_entry, true ); + change = false; + } + break; + + case KEY_F6: /* Turn on pixel */ + change = true; + display_table[row][col] = true; + highlight( row, col, false ); + col = ( col + 1 ) % MAX_COLS; + if ( col == 0 ) + row = ( row + 1 ) % MAX_ROWS; + break; + + case KEY_F7: /* Turn off pixel */ + change = true; + display_table[row][col] = false; + highlight( row, col, false ); + col = ( col + 1 ) % MAX_COLS; + if ( col == 0 ) + row = ( row + 1 ) % MAX_ROWS; + break; + + case KEY_INSERT: /* Insert a blank row */ + change = true; + for ( j = 0; j < MAX_COLS; ++j ) { + for ( i = MAX_ROWS - 1; i > row; --i ) { + display_table[i][j] = display_table[i-1][j]; + } + display_table[row][j] = false; + } + draw_current(); + break; + + case KEY_REMOVE: /* Remove a row */ + change = true; + for ( j = 0; j < MAX_COLS; ++j ) { + for ( i = row; i < MAX_ROWS - 1; ++i ) { + display_table[i][j] = display_table[i+1][j]; + } + display_table[MAX_ROWS-1][j] = false; + } + draw_current(); + break; + + case KEY_F13: /* Clear buffer */ + if ( change && !override ) { + warning( "Changes not saved" ); + error = true; + override = true; + } else { + for ( j = 0; j < MAX_COLS; ++j ) { + for ( i = 0; i < MAX_ROWS; ++i ) { + display_table[i][j] = false; + } + } + draw_current(); + } + break; + + case KEY_SELECT: /* Select font from DRCS */ + if ( change && !override ) { + warning( "Changes not saved" ); + error = true; + override = true; + } else { + extract_entry( current_entry ); + draw_current(); + } + break; + + case KEY_PREV: /* Move to prev entry in DRCS */ + if ( change && !override ) { + warning( "Changes not saved" ); + override = true; + error = true; + } else { + print_entry( current_entry, false ); + current_entry = current_entry - 1; + if ( current_entry == 0 ) + current_entry = TOTAL_ENTRIES - 2; + print_entry( current_entry, true ); + } + break; + + case KEY_NEXT: /* Move to next entry in DRCS */ + if ( change && !override ) { + warning( "Changes not saved" ); + override = true; + error = true; + } else { + print_entry( current_entry, false ); + current_entry = current_entry + 1; + if ( current_entry == TOTAL_ENTRIES - 1 ) + current_entry = 1; + print_entry( current_entry, true ); + } + break; + + case KEY_UP: /* UP one row. */ + if ( row == 0 ) + row = MAX_ROWS; + row = row - 1; + break; + + case KEY_DOWN: /* Guess. */ + row = ( row + 1 ) % MAX_ROWS; + break; + + case KEY_RIGHT: + col = ( col + 1 ) % MAX_COLS; + break; + + case KEY_LEFT: + if ( col == 0 ) + col = MAX_COLS; + col = col - 1; + break; + + case KEY_HELP: /* Display helpful info */ + clear_screen(); + help(); + c = getchar(); + init_restore(); + break; + + case '\004': /* All done! */ + return; + + case '\f': /* Redraw display */ + init_restore(); + break; + + default: /* user is a klutzy typist */ + move ( ERROR_ROW, ERROR_COL ); + printf( "Unknown key: " ); + if ( c < 0x20 ) { + printf( "^%c", c ); + } else if ( c < 0x0100 ) { + printf( "%c", c ); + } else { + printf( "0x%04x", c ); + } + fflush( stdout ); + error = true; + } + + highlight( row, col, true ); /* turn cursor on */ + } +} + + + +char *key_table[] = { + "\033[1~", /* Find */ + "\033[2~", /* Insert */ + "\033[3~", /* Remove */ + "\033[4~", /* Select */ + "\033[5~", /* Prev */ + "\033[6~", /* Next */ + "\033[17~", + "\033[18~", + "\033[19~", + "\033[20~", + "\033[21~", + "\033[23~", + "\033[24~", + "\033[25~", + "\033[26~", + "\033[28~", + "\033[29~", + "\033[31~", + "\033[32~", + "\033[33~", + "\033[34~", + "\033[A", + "\033[B", + "\033[C", + "\033[D", + (char *)0 }; + +/* + * get_key + * Convert VT220 escape sequence into something more reasonable. + */ + +int +get_key() +{ + register char *p; + char s[10]; + register int i, j; + + p = s; + for ( i = 0; i < 10; ++i ) { + *p = getchar(); + if ( i == 0 && *p != '\033' ) + return( (int)*p ); /* Not an escape sequence */ + if ( *p != '\033' && *p < 0x0020 ) + return( (int)*p ); /* Control character */ + *++p = '\0'; /* Null terminate */ + for ( j = 0; key_table[j]; ++j ) { + if ( strcmp( s, key_table[j] ) == 0 ) { + return( j | 0x0100 ); + } + } + } + return( -1 ); +} + + + +/* + * pad + * Emit nulls so that the terminal can catch up. + */ + +pad() +{ + int i; + + for ( i = 0; i < 20; ++i ) + putchar( '\000' ); + fflush( stdout ); +} + + + +/* + * init_restore + * refresh the main display table. + */ + +void +init_restore() +{ + register int row, col; + register int i; + + void draw_current(), clear_screen(), print_entry(); + + clear_screen(); + + for ( col = 0; col < MAX_COLS; ++col ) { + move( ROW_OFFSET - 2, col * 3 + COL_OFFSET + 1 ); + printf( "%d", col ); + } + move( ROW_OFFSET - 1, COL_OFFSET ); + printf( "+--+--+--+--+--+--+--+--+" ); + move( ROW_OFFSET + MAX_ROWS * 2, COL_OFFSET ); + printf( "+--+--+--+--+--+--+--+--+" ); + + for ( row = 0; row < MAX_ROWS; ++row ) { + if ( row != 0 && row != 7 ) { + move( row * 2 + ROW_OFFSET, COL_OFFSET - 2 ); + printf( "%d|", row ); + move( row * 2 + ROW_OFFSET + 1, COL_OFFSET - 1 ); + printf( "|" ); + move( row * 2 + ROW_OFFSET, COL_OFFSET + MAX_COLS * 3 ); + printf( "|" ); + move( row * 2 + ROW_OFFSET + 1, COL_OFFSET + MAX_COLS * 3 ); + printf( "|" ); + } else { + move( row * 2 + ROW_OFFSET, COL_OFFSET - 2 ); + printf( "%d*", row ); + move( row * 2 + ROW_OFFSET + 1, COL_OFFSET - 1 ); + printf( "*" ); + move( row * 2 + ROW_OFFSET, COL_OFFSET + MAX_COLS * 3 ); + printf( "*" ); + move( row * 2 + ROW_OFFSET + 1, COL_OFFSET + MAX_COLS * 3 ); + printf( "*" ); + } + } + draw_current(); + + move( TABLE_ROW - 1, TABLE_COL - 1 ); + printf( "+-+-+-+-+-+-+-+-+-+-+-+-+" ); + move( TABLE_ROW + 8 * 2 - 1, TABLE_COL - 1 ); + printf( "+-+-+-+-+-+-+-+-+-+-+-+-+" ); + for ( i = 0; i < 8; ++i ) { + move ( TABLE_ROW + i * 2, TABLE_COL - 1 ); + printf( "|" ); + move ( TABLE_ROW + i * 2 + 1, TABLE_COL - 1 ); + printf( "+" ); + move ( TABLE_ROW + i * 2, TABLE_COL + 12 * 2 - 1); + printf( "|" ); + move ( TABLE_ROW + i * 2 + 1, TABLE_COL +12 * 2 - 1); + printf( "+" ); + } + for ( i = 0; i < TOTAL_ENTRIES; ++i ) + print_entry( i, (i == current_entry) ? true : false ); +} + + + +/* + * draw_current + * Draw the complete current entry. + */ + +void +draw_current() +{ + register int row, col; + + printf( "\033)0" ); /* Special graphics in G1 */ + printf( "\016" ); /* Lock in G1 (SO) */ + + for ( row = 0; row < MAX_ROWS; ++row ) { + for ( col = 0; col < MAX_COLS; ++col ) { + if ( display_table[row][col] ) { + move( row * 2 + ROW_OFFSET, col * 3 + COL_OFFSET ); + printf( "\141\141\141" ); + move( row * 2 + ROW_OFFSET + 1, col * 3 + COL_OFFSET ); + printf( "\141\141\141" ); + } else { + move( row * 2 + ROW_OFFSET, col * 3 + COL_OFFSET ); + printf( " " ); /* erase splat */ + move( row * 2 + ROW_OFFSET + 1, col * 3 + COL_OFFSET ); + printf( " " ); /* erase splat */ + } + } + pad(); + } + printf( "\017" ); /* Lock in G0 (SI) */ + fflush( stdout ); +} + + + +/* + * highlight + * Draw the cursor in the main display area. + */ + +void +highlight( row, col, on ) +unsigned int row, col; +bool on; +{ + + printf( "\033)0" ); /* Special graphics in G1 */ + printf( "\016" ); /* Lock in G1 (SO) */ + if ( on ) { + printf( "\033[7m" ); /* Reverse video cursor */ + } + + if ( display_table[row][col] ) { + move( row * 2 + ROW_OFFSET, col * 3 + COL_OFFSET ); + printf( "\141\141\141" ); + move( row * 2 + ROW_OFFSET + 1, col * 3 + COL_OFFSET ); + printf( "\141\141\141" ); + } else { + move( row * 2 + ROW_OFFSET, col * 3 + COL_OFFSET ); + printf( " " ); /* erase splat */ + move( row * 2 + ROW_OFFSET + 1, col * 3 + COL_OFFSET ); + printf( " " ); /* erase splat */ + } + pad(); + printf( "\017" ); /* Lock in G0 (SI) */ + printf( "\033[0m" ); /* normal video */ + printf( "\b" ); /* Back up one spot */ + fflush( stdout ); +} + + + +/* + * Clear_screen + */ + +void +clear_screen() +{ + printf( "\033[H\033[J" ); /* Clear screen. */ + fflush( stdout ); +} + + + +/* + * move + */ + +move( y, x ) +int y, x; +{ + printf( "\033[%d;%df", y, x ); +} + + + +/* + * Build_entry + * Convert the bit pattern used in the main display area into something + * that the vt220 can digest - namely sixels... + */ + +void +build_entry( entry_no ) +unsigned int entry_no; +{ + register int row, col; + register unsigned int mask; + + for ( col = 0; col < 8; ++col ) { + + /* Top set of sixels */ + + mask = 0; + for ( row = 5; row >= 0; --row ) { + mask = mask << 1; + if ( display_table[row][col] ) + mask |= 1; + } + font_table[entry_no][col] = mask + 077; + + /* Bottom set of sixels */ + + mask = 0; + for ( row = 9; row >= 6; --row ) { + mask = mask << 1; + if ( display_table[row][col] ) + mask |= 1; + } + font_table[entry_no][col+8] = mask + 077; + } + +} + + + +/* + * Extract_engry + * convert sixel representation into an array of bits. + */ + +void +extract_entry( entry_no ) +unsigned int entry_no; +{ + register int row, col; + register unsigned int mask; + + for ( col = 0; col < 8; ++col ) { + + /* Top set of sixels */ + + mask = font_table[entry_no][col]; + if ( mask >= 077 ) + mask -= 077; + else + mask = 0; /* Bogus entry */ + + for ( row = 0; row <= 5; ++row ) { + display_table[row][col] = (bool)(mask & 0x0001); + mask = mask >> 1; + } + + /* Bottom set of sixels */ + + mask = font_table[entry_no][col+8]; + if ( mask >= 077 ) + mask -= 077; + else + mask = 0; + + for ( row = 6; row <= 9; ++row ) { + display_table[row][col] = (bool)(mask & 0x0001); + mask = mask >> 1; + } + } + +} + + + +/* + * Send_entry + * Emit the stuff used by the VT220 to load a character into the + * DRCS. We could, of course, send more than one entry at a time... + */ + +void +send_entry( entry_no ) +int entry_no; +{ + register char *fp = font_table[entry_no]; + + printf( "\033P1;%d;1;0;0;0{ @%c%c%c%c%c%c%c%c/%c%c%c%c%c%c%c%c\033\\", + entry_no, + fp[ 0], fp[ 1], fp[ 2], fp[ 3], fp[ 4], fp[ 5], fp[ 6], fp[ 7], + fp[ 8], fp[ 9], fp[10], fp[11], fp[12], fp[13], fp[14], fp[15] ); +} + + + +/* + * Print_entry + * The terminal normally has G0 in GL. We don't want to change + * this, nor do we want to use GR. Sooooo send out the necessary + * magic for shifting in G2 temporarily for the character that we + * want to display. + */ + +void +print_entry( entry_no, highlight ) +register unsigned int entry_no; +bool highlight; +{ + + register int y, x; + + y = entry_no & 0x07; + x = entry_no >> 3 & 0x1f; + entry_no += 32; /* Map up to G set */ + + move( y * 2 + TABLE_ROW, x * 2 + TABLE_COL ); + + if ( highlight ) + printf( "\033[7m" ); + + printf( "\033* @" ); /* select DRCS into G2 */ + printf( "\033N" ); /* select single shift */ + printf( "%c", entry_no ); /* Draw the character */ + + if ( highlight ) + printf( "\033[0m" ); +} + + + +/* + * Save_table + * Save a font table + */ + +void +save_table( font_file ) +FILE *font_file; +{ + register char *fp; + register int i; + + for ( i = 0; i < TOTAL_ENTRIES; ++i ) { + fp = font_table[i]; + fprintf( font_file, "\033P1;%d;1;0;0;0{ @%c%c%c%c%c%c%c%c/%c%c%c%c%c%c%c%c\033\\\n", + i, + fp[ 0], fp[ 1], fp[ 2], fp[ 3], fp[ 4], fp[ 5], fp[ 6], fp[ 7], + fp[ 8], fp[ 9], fp[10], fp[11], fp[12], fp[13], fp[14], fp[15] ); + } +} + + + +/* + * Get_table + * Extract font table entries from a file + */ + +void +get_table( font_file ) +FILE *font_file; +{ + char s[256]; + register char *p; + char *fp; + int i; + register int j; + + while( fgets( s, 255, font_file ) ) { + if ( strncmp( s, "\033P1;", 4 ) != 0 ) + continue; /* Bogus line */ + p = &s[4]; + if ( sscanf( p, "%d", &i ) != 1 ) + continue; /* Illegal entry number */ + + if ( i <= 0 || TOTAL_ENTRIES <= i ) + continue; /* Bogues entry */ + + fp = font_table[i]; + + while ( *p && *p != '@' ) + ++p; /* Skip to font definition */ + if ( ! *p++ ) + continue; /* Skip @ */ + + for ( j = 0; *p && *p != '\033' && j < 16; ++j, ++p ) { + if ( *p == '/' ) { + j = 8; + ++p; + } + fp[j] = *p; + } + send_entry( i ); + } +} + + + +/* + * Help + * Print out help information. + */ + +void +help() +{ + printf( "Font editor\n\n" ); + printf( "F6 - Pixel on\n" ); + printf( "F7 - Pixel off\n" ); + printf( "F13 - Clear display area\n" ); + printf( "HELP - This screen\n" ); + printf( "FIND - Update font table\n" ); + printf( "INSERT - Insert a blank row\n" ); + printf( "REMOVE - Remove a row\n" ); + printf( "SELECT - Select current font table entry\n" ); + printf( "PREV - Move to previous font table entry\n" ); + printf( "NEXT - Move to next font table entry\n" ); + printf( "^D - Exit\n" ); + printf( "\n\n\n\nPress any key to continue\n" ); +} + + + +/* + * Warning + * Issue a warning to the regarding the current status. + */ + +void +warning( s ) +char *s; +{ + move( ERROR_ROW, ERROR_COL ); + printf( "Warning: %s!\n", s ); + move( ERROR_ROW+1, ERROR_COL ); + printf( " Reissue command to override\n" ); +} diff --git a/usr.sbin/pcvt/fonts/COPYRIGHT b/usr.sbin/pcvt/fonts/COPYRIGHT new file mode 100644 index 0000000..175f7b8 --- /dev/null +++ b/usr.sbin/pcvt/fonts/COPYRIGHT @@ -0,0 +1,38 @@ +The font files: + + vt100pc.814.uu, vt100sg.814.uu, vt220h.808.uu, vt220h.810.uu, + vt220h.814.uu, vt220h.816.uu, vt220l.808.uu, vt220l.810.uu, + vt220l.814.uu and vt220l.816.uu + +in this directory are + + Copyright (c) 1992, 1993, 1994 Hellmuth Michaelis and Joerg Wunsch + + All rights reserved. + + Redistribution and use in source and binary forms, with or without + modification, are permitted provided that the following conditions + are met: + 1. Redistributions of source code must retain the above copyright + notice, this list of conditions and the following disclaimer. + 2. Redistributions in binary form must reproduce the above copyright + notice, this list of conditions and the following disclaimer in the + documentation and/or other materials provided with the distribution. + 3. All advertising materials mentioning features or use of this software + must display the following acknowledgement: + This product includes software developed by + Hellmuth Michaelis and Joerg Wunsch + 4. The name authors may not be used to endorse or promote products + derived from this software without specific prior written permission. + + THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR + IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, + INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + diff --git a/usr.sbin/pcvt/fonts/Makefile b/usr.sbin/pcvt/fonts/Makefile new file mode 100644 index 0000000..d707aa8 --- /dev/null +++ b/usr.sbin/pcvt/fonts/Makefile @@ -0,0 +1,71 @@ + +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +#FONTS = vt100pc.814 vt100sg.814 vt220l.814 vt220h.814 vt220l.808\ +# vt220h.808 vt220l.816 vt220h.816 vt220l.810 vt220h.810 + +FONTS = vt220l.814 vt220h.814 vt220l.808 vt220h.808 \ + vt220l.816 vt220h.816 vt220l.810 vt220h.810 + +LIBMODE = 644 +LIBOWN = bin +LIBGRP = bin +CLEANFILES= ${FONTS} + +all: $(FONTS) + +install: ${FONTS} + @if [ ! -d ${FONTDIR} ]; then mkdir ${FONTDIR};fi + @for i in ${FONTS}; do \ + echo "installing font $$i into ${FONTDIR}"; \ + install -c -m ${LIBMODE} -o ${LIBOWN} -g ${LIBGRP} \ + $$i ${FONTDIR}; \ + done + +clean: + rm -f ${CLEANFILES} + +.include <bsd.prog.mk> + +# this seems to be the lowest common denominator + +vt100pc.814: ${.CURDIR}/vt100pc.814.uu + uudecode ${.CURDIR}/$@.uu + +vt100sg.814: ${.CURDIR}/vt100sg.814.uu + uudecode ${.CURDIR}/$@.uu + +vt220l.814: ${.CURDIR}/vt220l.814.uu + uudecode ${.CURDIR}/$@.uu + +vt220h.814: ${.CURDIR}/vt220h.814.uu + uudecode ${.CURDIR}/$@.uu + +vt220l.808: ${.CURDIR}/vt220l.808.uu + uudecode ${.CURDIR}/$@.uu + +vt220h.808: ${.CURDIR}/vt220h.808.uu + uudecode ${.CURDIR}/$@.uu + +vt220l.816: ${.CURDIR}/vt220l.816.uu + uudecode ${.CURDIR}/$@.uu + +vt220h.816: ${.CURDIR}/vt220h.816.uu + uudecode ${.CURDIR}/$@.uu + +vt220l.810: ${.CURDIR}/vt220l.810.uu + uudecode ${.CURDIR}/$@.uu + +vt220h.810: ${.CURDIR}/vt220h.810.uu + uudecode ${.CURDIR}/$@.uu + +.endif diff --git a/usr.sbin/pcvt/fonts/vt100pc.814.uu b/usr.sbin/pcvt/fonts/vt100pc.814.uu new file mode 100644 index 0000000..470f9c9 --- /dev/null +++ b/usr.sbin/pcvt/fonts/vt100pc.814.uu @@ -0,0 +1,83 @@ +begin 644 vt100pc.814 +M`$1D5$Q$`"`@("`^````/$`X!'@`(B(^(B(````\0#@$>``B%`@4(@```'Q` +M>$!\`"(4"!0B````?$!X0'P`/@@("`@```!\0'A`?``<(B(J'`(``#A$?$1$ +M`"0H,"@D````>$1X1'@`("`@(#X```!X1'A$>``>(!P"/````$1$?$1$`#X( +M"`@(````0$!`0'P`/B`\("````!$1$0H$``^"`@("````'Q`>$!``#X@/"`@ +M````/$!`0#P`/"(\)"(````\0#@$>``<(B(B'````#Q`.`1X`!P("`@<```` +M>$1$1'@`("`@(#X```!X1$1$>``$#`0$#@```'A$1$1X`!PB#!`^````>$1$ +M1'@`'`(,`AP```!X1$1$>``$"!(^`@```$1D5$Q$`"(D."0B````/$`X!'@` +M(A0("`@```!\0'A`?``\(CPB/````#Q`0$`\`"(R*B8B````?$!X0'P`(C8J +M(B(````\0#@$>``B(B(B'````'Q`>$!\`!X@("`>````?$!X0$``'B`<`CP` +M```\0$Q$/``>(!P"/````'A$>$A$`!X@'`(\````1$1$1#@`'B`<`CP````` +M```````````````````8/#P\&!@`&!@`````8V-C(@``````````````-C9_ +M-C8V?S8V````#`P^8V%@/@-#8SX,#```````86,&#!@S8P``````'#8V'#MN +M9F8[`````#`P,&````````````````P8,#`P,#`8#```````&`P&!@8&!@P8 +M`````````&8\_SQF```````````8&!C_&!@8````````````````&!@8,``` +M````````_P`````````````````````8&````````0,&#!@P8$`````````^ +M8V=O>W-C8SX```````P</`P,#`P,/P``````/F,#!@P8,&-_```````^8P,# +M'@,#8SX```````8.'C9F?P8&#P``````?V!@8'X#`V,^```````<,&!@?F-C +M8SX``````']C`P8,&!@8&```````/F-C8SYC8V,^```````^8V-C/P,#!CP` +M```````8&````!@8`````````!@8````&!@P```````&#!@P8#`8#`8````` +M`````'X``'X`````````8#`8#`8,&#!@```````^8V,&#`P`#`P``````#YC +M8V]O;VY@/@``````"!PV8V-_8V-C``````!^,S,S/C,S,WX``````!XS86!@ +M8&$S'@``````?#8S,S,S,S9\``````!_,3$T/#0Q,7\``````'\Q,30\-#`P +M>```````'C-A8&!O8S,=``````!C8V-C?V-C8V,``````#P8&!@8&!@8/``` +M````#P8&!@8&9F8\``````!S,S8V/#8V,W,``````'@P,#`P,#$Q?P`````` +MP^?_V\/#P\/#``````!C<WM_;V=C8V,``````!PV8V-C8V,V'```````?C,S +M,SXP,#!X```````^8V-C8VMO/@8'`````'XS,S,^-C,S<P``````/F-C,!P& +M8V,^``````#_F9D8&!@8&#P``````&-C8V-C8V-C/@``````P\/#P\/#9CP8 +M``````##P\/#V]O_9F8``````,/#9CP8/&;#PP``````P\/#9CP8&!@\```` +M``#_@X8,&#!AP?\``````#PP,#`P,#`P/```````0&!P.!P.!P,!```````\ +M#`P,#`P,##P````('#9C`````````````````````````````/\`&!@,```` +M`````````````````#P&/F9F.P``````<#`P/#8S,S-N```````````^8V!@ +M8SX```````X&!AXV9F9F.P``````````/F-_8&,^```````<-C(P?#`P,'@` +M`````````#MF9F8^!F8\````<#`P-CLS,S-S```````,#``<#`P,#!X````` +M``8&``X&!@8&9F8\````<#`P,S8\-C-S```````<#`P,#`P,#!X````````` +M`.;_V]O;VP``````````;C,S,S,S```````````^8V-C8SX``````````&XS +M,S,^,#!X````````.V9F9CX&!@\```````!N.S,P,'@``````````#YC.`YC +M/@``````"!@8?A@8&!L.``````````!F9F9F9CL``````````,/#PV8\&``` +M````````P\/;V_]F``````````!C-AP<-F,``````````&-C8V,_`P8\```` +M````?V8,&#-_```````.&!@8<!@8&`X``````!@8&!@`&!@8&```````<!@8 +M&`X8&!AP```````[;@``````````````J@"J`*H`J@"J`*H`J@``/&;"P,#" +M9CP,!GP```#,S`#,S,S,S'8`````#!@P`'S&_L#&?``````0.&P`>`Q\S,QV +M``````#,S`!X#'S,S'8`````8#`8`'@,?,S,=@`````X;#@`>`Q\S,QV```` +M`````'C,P,QX&`QX````$#AL`'S&_L#&?```````S,P`?,;^P,9\`````&`P +M&`!\QO[`QGP``````,S,`'`P,#`P>``````P>,P`<#`P,#!X`````,!@,`!P +M,#`P,'@`````QL80.&S&QO[&Q@```#AL.``X;,;&_L;&````&#!@`/YB8'Q@ +M8OX`````````;+H2?I"8?@``````/FS,S/[,S,S.`````!`X;`!\QL;&QGP` +M`````,;&`'S&QL;&?`````!@,!@`?,;&QL9\`````#!XS`#,S,S,S'8````` +M8#`8`,S,S,S,=@``````QL8`QL;&QGX&#'@``,;&.&S&QL;&;#@`````QL8` +MQL;&QL;&?``````("'[(R,C(?@@(`````#AL9&#P8&!@YOP``````,9L.!#^ +M$/X0$`````#XS,SXQ,S>S,SF`````!PT,#`P_#`P,#"PX```&#!@`'@,?,S, +M=@`````,&#``.!@8&!@\`````!@P8`!\QL;&QGP`````&#!@`,S,S,S,=@`` +M````=MP`W&9F9F9F````=MP`QN;V_M[.QL8`````/&QL/@!^```````````X +M;&PX`'P````````````P,``P,&#&QGP```````````!_8&!@```````````` +M`'\!`0$``````,#`QLS8,&#<A@P8/@``P,#&S-@P9LZ:/@8&````&!@`&!@\ +M/#P8`````````#9LV&PV````````````V&PV;-@``````"*((H@BB"*((H@B +MB"*(JE2J5*I4JE2J5*I4JE2Z[KKNNNZZ[KKNNNZZ[A@8&!@8&!@8&!@8&!@8 +M&!@8&!@8&/@8&!@8&!@8&!@8&/@8^!@8&!@8V-C8V-C;V-C8V-C8V```` +M`````/XV-C8V-C8``````/@8^!@8&!@8V-C8V]@;V-C8V-C8V-C8V-C8V +M-C8V-C8V-C8``````/X&]C8V-C8V-C8V-C8V]@;^````````-C8V-C8V-OX` +M```````8&!@8&/@8^`````````````````#X&!@8&!@8&!@8&!@8&!\````` +M```8&!@8&!@8_P````````````````#_&!@8&!@8&!@8&!@8&!\8&!@8&!@` +M````````_P```````!@8&!@8&!C_&!@8&!@8&!@8&!@?&!\8&!@8&!@V-C8V +M-C8V-S8V-C8V-C8V-C8V-S`_```````````````_,#<V-C8V-C8V-C8V-O<` +M_P``````````````_P#W-C8V-C8V-C8V-C8W,#<V-C8V-C8``````/\`_P`` +M`````#8V-C8V]P#W-C8V-C8V&!@8&!C_`/\````````V-C8V-C8V_P`````` +M````````_P#_&!@8&!@8`````````/\V-C8V-C8V-C8V-C8V/P```````!@8 +M&!@8'Q@?```````````````?&!\8&!@8&!@`````````/S8V-C8V-C8V-C8V +M-C;_-C8V-C8V&!@8&!C_&/\8&!@8&!@8&!@8&!@8^``````````````````? +M&!@8&!@8__________________\`````````__________#P\/#P\/#P\/#P +M\/#P#P\/#P\/#P\/#P\/#P__________````````````````=MS8V-QV```` +M`````'S&_,;&_,#`0````/[&QL#`P,#`P`````````#^;&QL;&QL``````#^ +MQF`P&#!@QOX``````````'[8V-C8<`````````!F9F9F?&!@P````````';< +M&!@8&!@``````/PP>,S,S'@P_```````.&S&QO[&QFPX```````X;,;&QFQL +M;.X``````#Q@,!A\S,S,>```````````?-;6?``````````&#'S.UN9\8,`` +M`````#A@P,#XP,!@.````````'S&QL;&QL;&````````_@``_@``_@`````` +M`#`P,/PP,#``_```````8#`8#!@P8`#\```````8,&#`8#`8`/P```````X: +M&A@8&!@8&!@8&!@8&!@8&!@86%AP```````P,```_```,#``````````=MP` +M=MP```````!PV-AP````````````````````&!@`````````````````&``` +M```````>&!@8&!C8V'@X`````-AL;&QL;```````````<-@P8,CX```````` +=```````^/CX^/CX````````````````````````` +` +end diff --git a/usr.sbin/pcvt/fonts/vt100sg.814.uu b/usr.sbin/pcvt/fonts/vt100sg.814.uu new file mode 100644 index 0000000..24ea4c7 --- /dev/null +++ b/usr.sbin/pcvt/fonts/vt100sg.814.uu @@ -0,0 +1,83 @@ +begin 644 vt100sg.814 +M`$1D5$Q$`"`@("`^````/$`X!'@`(B(^(B(````\0#@$>``B%`@4(@```'Q` +M>$!\`"(4"!0B````?$!X0'P`/@@("`@```!\0'A`?``<(B(J'`(``#A$?$1$ +M`"0H,"@D````>$1X1'@`("`@(#X```!X1'A$>``>(!P"/````$1$?$1$`#X( +M"`@(````0$!`0'P`/B`\("````!$1$0H$``^"`@("````'Q`>$!``#X@/"`@ +M````/$!`0#P`/"(\)"(````\0#@$>``<(B(B'````#Q`.`1X`!P("`@<```` +M>$1$1'@`("`@(#X```!X1$1$>``$#`0$#@```'A$1$1X`!PB#!`^````>$1$ +M1'@`'`(,`AP```!X1$1$>``$"!(^`@```$1D5$Q$`"(D."0B````/$`X!'@` +M(A0("`@```!\0'A`?``\(CPB/````#Q`0$`\`"(R*B8B````?$!X0'P`(C8J +M(B(````\0#@$>``B(B(B'````'Q`>$!\`!X@("`>````?$!X0$``'B`<`CP` +M```\0$Q$/``>(!P"/````'A$>$A$`!X@'`(\````1$1$1#@`'B`<`CP````` +M```````````````````8/#P\&!@`&!@`````8V-C(@``````````````-C9_ +M-C8V?S8V````#`P^8V%@/@-#8SX,#```````86,&#!@S8P``````'#8V'#MN +M9F8[`````#`P,&````````````````P8,#`P,#`8#```````&`P&!@8&!@P8 +M`````````&8\_SQF```````````8&!C_&!@8````````````````&!@8,``` +M````````_P`````````````````````8&````````0,&#!@P8$`````````^ +M8V=O>W-C8SX```````P</`P,#`P,/P``````/F,#!@P8,&-_```````^8P,# +M'@,#8SX```````8.'C9F?P8&#P``````?V!@8'X#`V,^```````<,&!@?F-C +M8SX``````']C`P8,&!@8&```````/F-C8SYC8V,^```````^8V-C/P,#!CP` +M```````8&````!@8`````````!@8````&!@P```````&#!@P8#`8#`8````` +M`````'X``'X`````````8#`8#`8,&#!@```````^8V,&#`P`#`P``````#YC +M8V]O;VY@/@``````"!PV8V-_8V-C``````!^,S,S/C,S,WX``````!XS86!@ +M8&$S'@``````?#8S,S,S,S9\``````!_,3$T/#0Q,7\``````'\Q,30\-#`P +M>```````'C-A8&!O8S,=``````!C8V-C?V-C8V,``````#P8&!@8&!@8/``` +M````#P8&!@8&9F8\``````!S,S8V/#8V,W,``````'@P,#`P,#$Q?P`````` +MP^?_V\/#P\/#``````!C<WM_;V=C8V,``````!PV8V-C8V,V'```````?C,S +M,SXP,#!X```````^8V-C8VMO/@8'`````'XS,S,^-C,S<P``````/F-C,!P& +M8V,^``````#_F9D8&!@8&#P``````&-C8V-C8V-C/@``````P\/#P\/#9CP8 +M``````##P\/#V]O_9F8``````,/#9CP8/&;#PP``````P\/#9CP8&!@\```` +M``#_@X8,&#!AP?\``````#PP,#`P,#`P/```````0&!P.!P.!P,!```````\ +M#`P,#`P,##P````('#9C```````````````````````````````````0.'S^ +M_GPX$```````_H*"_H*"_H*"_@````!$1'Q$1``^"`@("````'Q`>$!\`#X@ +M."`@````/$!`0#P`/"(\)"(```!`0$!`?``^(#P@(````'#8V'`````````` +M`````#`P,/PP,#``_`````!$9%1,1``@("`@/@```$1$1"@0`#X("`@(```8 +M&!@8&!@8^`````````````````#X&!@8&!@8`````````!\8&!@8&!@8&!@8 +M&!@8'P```````!@8&!@8&!C_&!@8&!@8``#_````````````````````_P`` +M`````````````````/\```````````````````#_```````````````````` +M_P```!@8&!@8&!@?&!@8&!@8&!@8&!@8&/@8&!@8&!@8&!@8&!@8_P`````` +M``````````#_&!@8&!@8&!@8&!@8&!@8&!@8&!@``!@P8,!@,!@`_``````` +M8#`8#!@P8`#\`````````/YL;&QL;&P````````"!'X($'X@0``````X;&1@ +M\&!@8.;\`````````````!@`````````J@"J`*H`J@"J`*H`J@`````````` +M```````````````````````````````````````````````````````````` +M```````````````````````````````````````````````````````````` +M```````````````````````````````````````````````````````````` +M```````````````````````````````````````````````````````````` +M```````````````````````````````````````````````````````````` +M```````````````````````````````````````````````````````````` +M```````````````````````````````````````````````````````````` +M```````````````````````````````````````````````````````````` +M```````````````````````````````````````````````````````````` +M```````````````````````````````````````````````````````````` +M````````&!@`&!@\/#P8``````@(?LC(R,A^"`@`````.&QD8/!@8&#F_``` +M``````````````````````#&;#@0$/X0$!````````````````````````!\ +MQF`X;,;&;#@,QGP```"!F3QF9F8\F8$``````'R"FJ*BHIJ"?``````\;&P^ +M`'X``````````````#9LV&PV```````````````````````````````````` +M```````````````````````````````````````````````````\)"0\```` +M````````&!A^&!@`?@```````'S&!@0,&##&_@``````?,8&!CP&!L9\```` +M````````````````````````9F9F9GQ@8,``````?O3T]'04%!04```````` +M```8&```````````````````````````````"!@X&!@8&!A^`````#AL;#@` +M?```````````````V&PV;-@```````#`P,;,V#!FSIH^!@8``,#`QLS8,&#< +MA@P8/@``````-FS8;#8`````````,#``,#!@QL9\````,!@`$#ALQL;^QL8` +M```,&``0.&S&QO[&Q@```!!LQA`X;,;&_L;&````=MP`$#ALQL;^QL8````` +MQL80.&S&QO[&Q@```#AL.``X;,;&_L;&```````^;,S,_LS,S,X``````#QF +MPL#`PF8\#`9\`#`8#`#^8F!\8&+^````&#!@`/YB8'Q@8OX````0;,8`_F)@ +M?&!B_@````#&Q@#^8F!\8&+^````,!@`/!@8&!@8&#P````,&``\&!@8&!@8 +M/````#QF`#P8&!@8&!@\````9F8`/!@8&!@8&#P````````````````````` +M`';<`,;F]O[>SL;&````8#``.&S&QL;&;#@````,&``X;,;&QL9L.````!!L +M@CALQL;&QFPX````=MP`.&S&QL;&;#@`````QL8X;,;&QL9L.```````?LS, +MS,[,S,Q^```````".FS.UM;F;+B```!@,!@`QL;&QL;&?`````8,&`#&QL;& +MQL9\`````';<`,;&QL;&QGP`````QL8`QL;&QL;&?````,;&`,;&;#@0$!`X +M`````````````````````````'S&QMS&QOS`P,````!@,!@`>`Q\S,QV```` +M`!@P8`!X#'S,S'8`````$#AL`'@,?,S,=@``````=MP`>`Q\S,QV``````#, +MS`!X#'S,S'8`````.&PX`'@,?,S,=@````````!LNA)^D)A^`````````'C, +MP,QX&`QX````8#`8`'S&_L#&?``````,&#``?,;^P,9\`````!`X;`!\QO[` +MQGP``````,S,`'S&_L#&?`````#`8#``<#`P,#!X``````P8,``X&!@8&#P` +M````,'C,`'`P,#`P>```````S,P`<#`P,#!X```````````````````````` +M`';<`-QF9F9F9@````!@,!@`?,;&QL9\`````!@P8`!\QL;&QGP`````.&S& +M`'S&QL;&?```````=MP`?,;&QL9\``````#&Q@!\QL;&QGP``````````'R2 +MDIR0?@````````)\SM;6YGR``````&`P&`#,S,S,S'8`````&#!@`,S,S,S, +M=@`````P>,P`S,S,S,QV``````#,S`#,S,S,S'8``````,;&`,;&QL9^!@QX +=```````````````````````````````````````` +` +end diff --git a/usr.sbin/pcvt/fonts/vt220h.808.uu b/usr.sbin/pcvt/fonts/vt220h.808.uu new file mode 100644 index 0000000..98ae5f3 --- /dev/null +++ b/usr.sbin/pcvt/fonts/vt220h.808.uu @@ -0,0 +1,49 @@ +begin 644 vt220h.808 +M9%1,1"`@(#X\0#@$>"(^(CQ`.`1X-@@V?$!X0'PV"#9\0'A`?#X("'Q`>'P< +M(BH<.$1\1"PP*"1X1'A$>"`@/GA$>$1^$`P\1$1\1#X("`A`0$!\/B`\($1$ +M*!`^"`@(?$!X0#X@/"`\0$`\/"(\)CQ`.`1X'"(</$`X!'@<"!QX1$1X("`@ +M/GA$1'@$#`0.>$1X'"(,$#YX1'@<`@P"''A$1'@,$CX"9%1,(B0X)"(\0#@$ +M>"(<"'Q`>'P\(CP^/$`\(C(J)B)\0'A`?"(V*CQ`.`1X(B(<?$!X0'P>(!Y\ +M0'A`'B`>/#Q`3#P>(!X\>$1X3!X@'CQ$1#@>(!P"/'"(<(AP#!(,<(APB'`, +M!`YPB'"(?"0(/'"(<(QB#@(<<(APC'@2/@)PB'"><!P"''"(<(YP/"(<<(AP +MCG($"`APB'"<<APB''"(<)QR#@(<<(APB'P2'A)PB'"<<AP2''"(<(AP#A`. +M<(APB'`<$AQPB'"><!P0'G"(<)YP'!`0<(AX"'`,$@QPB'@(<`P$#G"(>`A\ +M)`@\<(AX#&(.`AQPB'@,>!(^`G"(>!YP'`(<<(AX#G`\(AQPB'@><@0("'"( +M>!QR'"(<<(AX''(.`AQPB'@(?!(>$G"(>!QR'!(<<(AX"'`.$`YPB'@(<!P2 +M''"(>!YP'!`><(AX'G`<$!```'S&QOS`P````,945'P8`'S&!G[&?```8+`8 +M+$V&`````!@X&!H,````_+8V-@0``'SD<.1\````PJ08*L8``$1$*"@0$``` +M$!`H*$1$``#&QL;&QGP```#\!@8&_````'[`P,!^````PD(D&"08`/Z"*#BJ +M_@``QE14?!@\`````/YL;.X````$_@'^!````"1^@7XD````$!`H1.X`.$2" +MJKJJ1#@``-QV`/X``/Z"Q,1H:#``&"PL1$:&_@`````VS,PV```8&`!F9@`` +M`!PT,#`PL.`!`@0($"!`@(!`(!`(!`(!`0($"!`@0/\``#\0"`0"`1@8,&`P +M&!@8&!@,!@P8&!@```X8&!@8&!@8&!@8&`X```!P&!@8&!@8&!@8&!AP```" +M`@(B$@H&``#NQM;6?```9F8\&'X8`%@D&"0X8`QX`!@`QL9^#'@`P,#XS/C` +MP%`@4`P\9CP`\&!X;'A@\``.`&9F/!@\````1"@0*$0`_&9F]F9F_`#P$'(6 +M_CINP@``````&`QX&#!@````````````_@```'R"NJJRJH)\`````'@````` +M``!X"`@``,;&``````````($?AA^($``````````_P```````/\```````#_ +M````````_P```````/\```````#N9F8L&````GS.UN9\@```?-;<T'P``/X` +M?,;&?`#^`'@,?,QV`,P`S$AX,'@`.&P`QL;&?``<`,;&QL9\`'``QL;&QGP` +M`CILUM9LN(``?LS.S,Q^`/XX;,;&;#@`.,8X;,9L.``.`#ALQFPX`'``.&S& +M;#@`9@`\&!@8/``8)``\&!@\``X`/!@8&#P`<``\&!@8/`#&`/YB>&+^`#A$ +M_F)X8OX`<`#^8GAB_@#^`#ALQO[&`#AL$&S&_L8`#@`X;,;^Q@!P`#ALQO[& +M```<#!X`````````&!@````('CIB>#P$&'@,.`QX````?(*:HJ*:@GP`P]L\ +M9CS;PP``S%1@4$P``'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,``` +M?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#`` +M,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S& +M8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#`` +M`'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P +M`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\ +MQF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P +M``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@ +M,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,``` +M?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#`` +M,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S& +M8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#`` +M`'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P +M`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\ +MQF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@,``P +M``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,```?,9@ +M,``P``!\QF`P`#```'S&8#``,```?,9@,``P``!\QF`P`#```'S&8#``,``` +7?,9@,``P``!\QF`P`#```'S&8#``,`!@ +` +end diff --git a/usr.sbin/pcvt/fonts/vt220h.810.uu b/usr.sbin/pcvt/fonts/vt220h.810.uu new file mode 100644 index 0000000..04689b1 --- /dev/null +++ b/usr.sbin/pcvt/fonts/vt220h.810.uu @@ -0,0 +1,60 @@ +begin 644 vt220h.810 +M1&143$0@("`@/CQ`.`1X(B(^(B(\0#@$>"(4"!0B?$!X0'PB%`@4(GQ`>$!\ +M/@@("`A\0'A`?!PB(BH<.$1\1$0D*#`H)'A$>$1X("`@(#YX1'A$>!X@'`(\ +M1$1\1$0^"`@("$!`0$!\/B`\("!$1$0H$#X("`@(?$!X0$`^(#P@(#Q`0$`\ +M/"(\)"(\0#@$>!PB(B(</$`X!'@<"`@(''A$1$1X("`@(#YX1$1$>`0,!`0. +M>$1$1'@<(@P0/GA$1$1X'`(,`AQX1$1$>`0($CX"1&143$0B)#@D(CQ`.`1X +M(A0("`A\0'A`?#PB/"(\/$!`0#PB,BHF(GQ`>$!\(C8J(B(\0#@$>"(B(B(< +M?$!X0'P>("`@'GQ`>$!`'B`<`CP\0$Q$/!X@'`(\>$1X2$0>(!P"/$1$1$0X +M'B`<`CQPB'"(<`P2$A(,<(APB'`$#`0$#G"(<(AP'"(,$#YPB'"(<!P"#`(< +M<(APB'`$"!(^`G"(<(AP'A`<`AQPB'"(<!P@/"(<<(APB'`^`@0("'"(<(AP +M'"(<(AQPB'"(<!PB'@(<<(APB'`,$AX2$G"(<(AP'!(<$AQPB'"(<`X0$!`. +M<(APB'`<$A(2''"(<(AP'A`<$!YPB'"(<!X0'!`0<(AX"'`,$A(2#'"(>`AP +M!`P$!`YPB'@(<!PB#!`^<(AX"'`<`@P"''"(>`AP!`@2/@)PB'@(<!X0'`(< +M<(AX"'`<(!PB''"(>`AP/@($"`APB'@(<!PB'"(<<(AX"'`<(AX"''"(>`AP +M#!(>$A)PB'@(<!P2'!(<<(AX"'`.$!`0#G"(>`AP'!(2$AQPB'@(<!X0'!`> +M<(AX"'`>$!P0$```?,;&QOS`P,````#&5%14?!@8`'S&!@9^QL9\``!@L#`8 +M&"Q-A@`````8.!@8&!H,````_+8V-C8&!`````!\Y'#D?`````#"I!@8*L8` +M``""@D1$*"@0$```$!`H*$1$@H(``,;&QL;&QGP`````_`8&!@;\`````'[` +MP,#`?@```,)")!@8)!@```#^@B@X*(+^``#&5%14?#@0.````/YL;&QL;.X` +M````!/X!_@0``````"1^@7XD`````!`0*"A$1.X``#A$@JJZJH)$.````-QV +M`/X``````/Z"Q,1H:#```!@8+"Q$1H;^```````V2$@V`````!@8``!F9@`` +M`!PT,#`P,+#@```!`@0($"!`@```@$`@$`@$`@$```$"!`@0($#_`````#\0 +M"`0"`0`8&!@P8#`8&!@8&!@8#`8,&!@8&```#A@8&!@8&!@8&!@8&!@8&`X` +M``!P&!@8&!@8&!@8&!@8&!@8<`````("`B(2"@8``````.[&UM9\``!F9CP8 +M&'X8&`!8)!@8)#A@>`1X`!@P`,;&QGX,>`#`P/C,S/C`P```4"!0&`P\9F8\ +M`/!@>&QX8&#P``8,`&9F/!@8/`````!$*!`H1````/QF9O9F9F;\`/`0<!;N +M&C9JSH(`````````&`QX&#!@````````````````_@``````?(*ZJKJRJH)\ +M``````!X``````````!X"`@```#&Q@````````````($?@@0?B!````````` +M`````/\`````````_P````````#_`````````/\`````````_P`````````` +M````[FYF9BP8```"?,[6UN9\@`````!\UM;<T'P``';<`'S&QL9\`';<`'@, +M?,S,=@#,`,S,2'@P,'@`.&P`QL;&QL9\``P8`,;&QL;&?``P&`#&QL;&QGP` +M`CILSM;F;+B```!^S,S.S,S,?@!VS#ALQL;&;#@`.,8X;,;&QFPX``X`.&S& +MQL9L.`!P`#ALQL;&;#@`9@`\&!@8&!@\`!@D`#P8&!@8/``,&``\&!@8&#P` +M,!@`/!@8&!@\`,8`_F9B>&!B_@`X;`#^8GA@8OX`,!@`_F)X8&+^`';<`!`X +M;,;^Q@`X;``0.&S&_L8`#!@`$#ALQO[&`&`P`!`X;,;^Q@``#!P,#!X````` +M`````!@8```````('CID8'@\!!@`>`PX#'@``````'R"FJ*BHIJ"?`##VSQF +M9CS;PP``````S%1@4$P``'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#`` +M`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@ +M,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#`` +M`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@ +M,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#`` +M`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@ +M,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#`` +M`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@ +M,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#`` +M`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@ +M,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#`` +M`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@ +M,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#`` +M`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@ +M,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#`` +M`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@ +M,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#`` +M`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@ +M,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#`` +M`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@ +M,#``,```?,;&8#`P`#```'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#`` +H`'S&QF`P,``P``!\QL9@,#``,```?,;&8#`P`#```'S&QF`P,``P`#`P +` +end diff --git a/usr.sbin/pcvt/fonts/vt220h.814.uu b/usr.sbin/pcvt/fonts/vt220h.814.uu new file mode 100644 index 0000000..470e887 --- /dev/null +++ b/usr.sbin/pcvt/fonts/vt220h.814.uu @@ -0,0 +1,83 @@ +begin 644 vt220h.814 +M`$1D5$Q$`"`@("`^````/$`X!'@`(B(^(B(````\0#@$>``B%`@4(@```'Q` +M>$!\`"(4"!0B````?$!X0'P`/@@("`@```!\0'A`?``<(B(J'`(``#A$?$1$ +M`"0H,"@D````>$1X1'@`("`@(#X```!X1'A$>``>(!P"/````$1$?$1$`#X( +M"`@(````0$!`0'P`/B`\("````!$1$0H$``^"`@("````'Q`>$!``#X@/"`@ +M````/$!`0#P`/"(\)"(````\0#@$>``<(B(B'````#Q`.`1X`!P("`@<```` +M>$1$1'@`("`@(#X```!X1$1$>``$#`0$#@```'A$1$1X`!PB#!`^````>$1$ +M1'@`'`(,`AP```!X1$1$>``$"!(^`@```$1D5$Q$`"(D."0B````/$`X!'@` +M(A0("`@```!\0'A`?``\(CPB/````#Q`0$`\`"(R*B8B````?$!X0'P`(C8J +M(B(````\0#@$>``B(B(B'````'Q`>$!\`!X@("`>````?$!X0$``'B`<`CP` +M```\0$Q$/``>(!P"/````'A$>$A$`!X@'`(\````1$1$1#@`'B`<`CP```!P +MB'"(<``,$A(2#````'"(<(AP``0,!`0.````<(APB'``'"(,$#X```!PB'"( +M<``<`@P"'````'"(<(AP``0($CX"````<(APB'``'A`<`AP```!PB'"(<``< +M(#PB'````'"(<(AP`#X"!`@(````<(APB'``'"(<(AP```!PB'"(<``<(AX" +M'````'"(<(AP``P2'A(2````<(APB'``'!(<$AP```!PB'"(<``.$!`0#@`` +M`'"(<(AP`!P2$A(<````<(APB'``'A`<$!X```!PB'"(<``>$!P0$````'"( +M>`AP``P2$A(,````<(AX"'``!`P$!`X```!PB'@(<``<(@P0/@```'"(>`AP +M`!P"#`(<````<(AX"'``!`@2/@(```!PB'@(<``>$!P"'````'"(>`AP`!P@ +M'"(<````<(AX"'``/@($"`@```!PB'@(<``<(APB'````'"(>`AP`!PB'@(< +M````<(AX"'``#!(>$A(```!PB'@(<``<$AP2'````'"(>`AP``X0$!`.```` +M<(AX"'``'!(2$AP```!PB'@(<``>$!P0'@```'"(>`AP`!X0'!`0```````` +M`'S&QL;&_,#`P``````8V]O;V]M^&!@8````?,8&!G[&QGP``````,#`8#`8 +M'#9C00`````````P<#`P,#08``````````#<9F9F9F8&!@8``````'S&\,#& +M?`````````#BMAP8.&S&````````@L;&;&PX.!`````````0.#AL;,;&@@`` +M`````,;&QL;&QL9\`````````/P&!@8&_```````````?L#`P,!^```````` +M``#&9CP8/&8\``````#^Q@!L?&P`QOX``````#P8V]O;VWX8/```````_FQL +M;&QL;&SN````````"`S^`_X,"``````````D9G[#?F8D```````````0$"@H +M1$3N```````\9L/G_^?#9CP``````````-QV`/X``````````/[&QLQL:#@P +M````````&#@L;$3&QOX``````````&[8V&X````````````8&```9F8````` +M```<-#`P,#`PL.`````````!`@0($"!`@````````(!`(!`(!`(!```````` +M``$"!`@0('\````````````_$`@$`@$``!@8&!@8,&`P&!@8&!@8&!@8&!@, +M!@P8&!@8&!@```X8&!@8&!@8&!@8&!@8&!@8&!@8&!@.``````!P&!@8&!@8 +M&!@8&!@8&!@8&!@8&!@8<````````@("`B(2"@8"``````````!LQM;6UFP` +M`````,S,>#`P_#`P,```````X'S@P'C`P&`X#'@```P8,`#&QL;&?@8,>``` +M`,#`^,S,^,#`P`````#8<.`P&`P^9F8\``````#P8'AL>&!@8/`````,&`#, +MS,QX,#`P>`````````!$*!`H1`````````#\9F9F]F9F9OP```#P$'`6_!@P +M9LZ:/@8&```````````````8#'@`&#!@``````````````````````#^```` +M````````?(*ZJKJRJH)\````````````>````````````````'@("``````` +M`,;&`````````````````````@9^"!!^8$``````````````````_P`````` +M````````_P``````````````_P``````````````_P``````````````_P`` +M``````````````````#N;F9F;#@````````&?,[>]N9\P```````````?-;6 +MW-!^``````!VW`!\QL;&QGP``````';<`'@,?,S,=@```,S,`,S,2'@P,#!X +M````.&S&`,;&QL;&QGP````&#!@`QL;&QL;&?````&`P&`#&QL;&QL9\```` +M```&/FS.UM;F;/C``````'[,S,S.S,S,?@```';<`#ALQL;&QFPX````.&S& +M.&S&QL;&;#@````,&``X;,;&QL9L.````&`P`#ALQL;&QFPX````9F8`/!@8 +M&!@8&#P````\9@`\&!@8&!@8/`````P8`#P8&!@8&!@\````,!@`/!@8&!@8 +M&#P```#&Q@#^9F)X8&)F_@```#ALQ@#^9F!X8&;^````,!@,`/YF8'A@9OX` +M``!VW``0.&S&QO[&Q@```#ALQA`X;,;&_L;&````#!@`$#ALQL;^QL8````P +M&``0.&S&QO[&Q@`````,'`P,'@`````````````````8&````````````.`\ +M8,#`P,!@.`QX```\!AP&/`````````````!\@IJBHJ*:@GP```````##VSQF +M9CS;PP``````````YFQX;&9F``````!\QL9@,#``,#```````'S&QF`P,``P +M,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,``` +M````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,``````` +M?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;& +M8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P +M`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P +M``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P```` +M``!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\ +MQL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@ +M,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#`` +M,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#`` +M`````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#`````` +M`'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S& +MQF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P +M,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P +M,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,``` +M````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,``````` +M?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;& +M8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P +M`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P +M``````!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P```` +M``!\QL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\ +MQL9@,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@ +M,#``,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#`` +M,#```````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#`` +M`````'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#`````` +M`'S&QF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S& +MQF`P,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P +M,``P,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P +M,```````?,;&8#`P`#`P``````!\QL9@,#``,#```````'S&QF`P,``P,``` +=````?,;&8#`P`#`P``````!\QL9@,#``,#`````` +` +end diff --git a/usr.sbin/pcvt/fonts/vt220h.816.uu b/usr.sbin/pcvt/fonts/vt220h.816.uu new file mode 100644 index 0000000..401db37 --- /dev/null +++ b/usr.sbin/pcvt/fonts/vt220h.816.uu @@ -0,0 +1,95 @@ +begin 644 vt220h.816 +M``!$9%1,1``@("`@/@``````/$`X!'@`(B(^(B(``````#Q`.`1X`"(4"!0B +M``````!\0'A`?``B%`@4(@``````?$!X0'P`/@@("`@``````'Q`>$!\`!PB +M(BH<`@`````X1'Q$1``D*#`H)```````>$1X1'@`("`@(#X``````'A$>$1X +M`!X@'`(\``````!$1'Q$1``^"`@("```````0$!`0'P`/B`\("```````$1$ +M1"@0`#X("`@(``````!\0'A`0``^(#P@(```````/$!`0#P`/"(\)"(````` +M`#Q`.`1X`!PB(B(<```````\0#@$>``<"`@('```````>$1$1'@`("`@(#X` +M`````'A$1$1X``0,!`0.``````!X1$1$>``<(@P0/@``````>$1$1'@`'`(, +M`AP``````'A$1$1X``0($CX"``````!$9%1,1``B)#@D(@``````/$`X!'@` +M(A0("`@``````'Q`>$!\`#PB/"(\```````\0$!`/``B,BHF(@``````?$!X +M0'P`(C8J(B(``````#Q`.`1X`"(B(B(<``````!\0'A`?``>("`@'@`````` +M?$!X0$``'B`<`CP``````#Q`3$0\`!X@'`(\``````!X1'A(1``>(!P"/``` +M````1$1$1#@`'B`<`CP`````<(APB'``#!(2$@P``````'"(<(AP``0,!`0. +M``````!PB'"(<``<(@P0/@``````<(APB'``'`(,`AP``````'"(<(AP``0( +M$CX"``````!PB'"(<``>$!P"'```````<(APB'``'"`\(AP``````'"(<(AP +M`#X"!`@(``````!PB'"(<``<(APB'```````<(APB'``'"(>`AP``````'"( +M<(AP``P2'A(2``````!PB'"(<``<$AP2'```````<(APB'``#A`0$`X````` +M`'"(<(AP`!P2$A(<``````!PB'"(<``>$!P0'@``````<(APB'``'A`<$!`` +M`````'"(>`AP``P2$A(,``````!PB'@(<``$#`0$#@``````<(AX"'``'"(, +M$#X``````'"(>`AP`!P"#`(<``````!PB'@(<``$"!(^`@``````<(AX"'`` +M'A`<`AP``````'"(>`AP`!P@/"(<``````!PB'@(<``^`@0("```````<(AX +M"'``'"(<(AP``````'"(>`AP`!PB'@(<``````!PB'@(<``,$AX2$@`````` +M<(AX"'``'!(<$AP``````'"(>`AP``X0$!`.``````!PB'@(<``<$A(2'``` +M````<(AX"'``'A`<$!X``````'"(>`AP`!X0'!`0`````````````#YC8V-C +M?F!@8&```````!C;V]O;VWX8&!@8`````'S&!@9^QL9\`````````,#`8#`8 +M'#9C00```````````#!P,#`P-!@`````````````W&9F9F9F!@8&!@`````` +M``!\Y'#D?````````````.:V'!@X;,8```````````""QD1L*#@0```````` +M````$#@H;$3&@@````````#&QL;&QL;&QGP``````````/P&!@8&_``````` +M``````!^P,#`P'X``````````````,9F/!@\9CP```````#^Q@!L?'QL`,;^ +M```````\&-O;V]O;?A@8/````````/YL;&QL;&QL;.X```````````@,_@/^ +M#`@````````````D9G[#?F8D````````````$!`X*&Q$1.X````````X1(*J +MNKJJ@D0X````````````W'8`_@``````````````_H+$Q&AH,#`````````` +M`!@8+"Q$1H;^````````````=HB(=@``````````````&!@``&9F```````` +M```,'A@8&!@8&'@P```````````!`@0($"!`@```````````@$`@$`@$`@$` +M```````````!`@0($"!_```````````````_$`@$`@$````8&!@8&!@P8#`8 +M&!@8&!@8&!@8&!@8#`8,&!@8&!@8&```#A@8&!@8&!@8&!@8&!@8&!@8&!@8 +M&!@8&`X```````!P&!@8&!@8&!@8&!@8&!@8&!@8&!@8&!@8<``````````" +M`@("(A(*!@(``````````````&S&UM9L````````9F9F/!@8?A@8&``````` +M<#YP8#Q@8#`<!CP`````````#!@P`,;&QL9^!@QX````P,#XS,S,^,#`P``` +M`````+!@X+`8##YF9CP```````#P8'QF9GQ@8&#P``````P8`,S,S'@P,#`P +M>```````````1"@0*$0```````````#\9F9F]F9F9F;\`````.`0<!#F#!@P +M9LJ2/@(``````````````````!@,>```&#!@```````````````````````` +M``#^`````````````'R"NJJJLJJJ@GP``````````````'@````````````` +M`````'@("`````````#&Q@```````````````````````@9^"!!^8$`````` +M````````````````_P````````````````#_`````````````````/\````` +M````````````_P````````````````#_````````````````````````YF9B +M8C08```````````&?,[>]N9\P`````````````!\UM;<T'X`````````=MP` +M?,;&QL9\`````````';<`'@,?,S,=@````#,S`#,S,QX,#`P,'@`````.&S& +M`,;&QL;&QL9\``````8,&`#&QL;&QL;&?`````!@,!@`QL;&QL;&QGP````` +M```&/FS.WO;F;/C`````````?MC8V-[>V-C8?@````!VW``X;,;&QL;&;#@` +M````.&S&.&S&QL;&QFPX``````P8`#ALQL;&QL9L.`````!@,``X;,;&QL;& +M;#@`````9F8`/!@8&!@8&!@\`````!@\9@`\&!@8&!@8/``````&#!@`/!@8 +M&!@8&#P`````8#`8`#P8&!@8&!@\`````,;&`/YB8&!\8&!B_@`````X;,8` +M_F)@?&!@8OX`````8#`8`/YB8'Q@8&+^`````';<`!`X;,;&_L;&Q@`````X +M;,80.&S&QO[&QL8`````&#!@$#ALQL;^QL;&`````#`8#!`X;,;&_L;&Q@`` +M````"!@("!P`````````````````````&!@`````````````X#Q@P,#`8#@, +M>```````.`08!#@```````````````!\@IJBHJ*BFH)\``````````##VSQF +M9CS;PP``````````````YFYX;&8```````!\QL9@,#`P`#`P```````````` +M`````````````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P```````` +M?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P```` +M````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P +M````````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P +M`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@ +M,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\ +MQL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#`````` +M``!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#`` +M``````!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#`` +M,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P +M,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S& +MQF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,``````` +M`'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,``` +M`````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P +M,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P +M,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;& +M8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P```````` +M?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P```` +M````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P +M````````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P +M`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@ +M,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#````````!\ +MQL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#`````` +M``!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#``,#`` +M``````!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P,#`` +M,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S&QF`P +M,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,````````'S& +MQF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,``````` +M`'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P,``` +M`````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P,``P +M,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;&8#`P +M,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P````````?,;& +M8#`P,``P,````````'S&QF`P,#``,#````````!\QL9@,#`P`#`P```````` +M?,;&8#`P,``P,````````'S&QF`P,#``,#`````````````````````````` +!`,;& +` +end diff --git a/usr.sbin/pcvt/fonts/vt220l.808.uu b/usr.sbin/pcvt/fonts/vt220l.808.uu new file mode 100644 index 0000000..02ad944 --- /dev/null +++ b/usr.sbin/pcvt/fonts/vt220l.808.uu @@ -0,0 +1,49 @@ +begin 644 vt220l.808 +M``````````!^@:6!O9F!?G[_V__#Y_]^;/[^_GPX$``0.'S^?#@0`#A\./[^ +MUA`X$#A\_OY\$#@``!@\/!@``/__Y\/#Y___/&;#P\/#9CS_PYF]O9G#_Q\' +M#7G-S,QX/&9F9CP8?A@X/#8R-'#PX']C?V-C9^;`&-L\Y^<\VQB`X/C^^."` +M``(./OX^#@(`&#Q^&!A^/!AF9F9F9@!F`'_;VWL;&QL`?L/\9F8_PWX``'Y^ +M?@```!@\?AA^/!C_&#Q^&!@8&``8&!@8?CP8```8#/X,&````#!@_F`P```` +M`&!@8'X````D9O]F)````!`X?/[^````_OY\.!``````````````&#P\&!@` +M&`!L;&P``````&QL_FS^;&P`,'S`?`;\,```QLP8,&;&`#AL.';<SGL`8&#` +M```````8,&!@8#`8`#`8#`P,&#```&PX_CAL````,##\,#``````````,#!@ +M````_````````````!@8``8,&#!@P(``?,[>]N;&?``P<+`P,##\`'C,##A@ +MP/P`>,P,.`S,>``</&S,_@P>`/S`^`P,S'@`>,S`^,S,>`#\S`P8,#`P`'C, +MS'C,S'@`>,S,?`S,>```,#```#`P```P,```,#!@&#!@P&`P&````'X``'X` +M`#`8#`8,&#``/&8&#!@`&`!\QM[>WL!^`#!XS,S\S,P`_&9F?&9F_``\9L#` +MP&8\`/AL9F9F;/@`_F)H>&AB_@#^8FAX:&#P`#QFP,#.9CX`S,S,_,S,S`!X +M,#`P,#!X`!X,#`S,S'@`YFQX<'ALY@#P8&!@8F;^`,;N_M;&QL8`QN;VWL[& +MQ@`X;,;&QFPX`/QF9GQ@8/``>,S,S-QX'`#\9F9\;&;F`'C,P'@,S'@`_+0P +M,#`P>`#,S,S,S,QX`,S,S,S,>#``QL;&UO[^Q@#&QFPX.&S&`,S,S'@P,'@` +M_,R8,&3,_`!X8&!@8&!X`,!@,!@,!@(`>!@8&!@8>``0.&S&```````````` +M``#_,#`8`````````'@,?,QV`.!@8'QF9OP```!XS,#,>``<#`Q\S,Q^```` +M>,S\P'@`.&Q@^&!@\````';,S'P,^.!@;'9F9N8`,`!P,#`P>``,`!P,#,S, +M>.!@9FQX;.8`<#`P,#`P>````,S^_M;&````^,S,S,P```!XS,S,>````-QF +M9GQ@\```=LS,?`P>``#<=F!@\````'S`?`;\`!`P?#`P-AP```#,S,S,=@`` +M`,;&QGPX````QM;^_FP```#&;#ALQ@```,S,S'P,^```_)@P9/P`'#`PX#`P +M'``8&!@`&!@8`.`P,!PP,.``=MP````````0.&QLQL;^`'C,P,QX&`QX`,P` +MS,S,?@`<`'C,_,!X`'[#/`8^9C\`S`!X#'S,?@#@`'@,?,Q^`#`P>`Q\S'X` +M``!XP,!X##A^PSQF?F`\`,P`>,S\P'@`X`!XS/S`>`#,`'`P,#!X`'S&.!@8 +M&#P`X`!P,#`P>`#&.&S&_L;&`#`P`'C,_,P`'`#\8'A@_````'\,?\Q_`#YL +MS/[,S,X`>,P`>,S,>```S`!XS,QX``#@`'C,S'@`>,P`S,S,?@``X`#,S,Q^ +M``#,`,S,?`SXPQ@\9F8\&`#,`,S,S,QX`!@8?L#`?A@8.&QD\&#F_`#,S'C\ +M,/PP,/C,S/K&S\;'#AL8/!@8V'`<`'@,?,Q^`#@`<#`P,'@``!P`>,S,>``` +M'`#,S,Q^``#X`/C,S,P`_`#,[/S<S``\;&P^`'X``#AL;#@`?```,``P8,#, +M>`````#\P,```````/P,#```P\;,WC-FS`_#QLS;-V_/`Q@8`!@8&!@``#-F +MS&8S````S&8S9LP``"*((H@BB"*(5:I5JE6J5:K;=]ONVW?;[A@8&!@8&!@8 +M&!@8&/@8&!@8&/@8^!@8V-C;V-C8V`````/XV-C8``/@8^!@8V]@;V +M-C8V-C8V-C8V-C8``/X&]C8V-C8V]@;^````-C8V-OX````8&/@8^``````` +M``#X&!@8&!@8&!\````8&!@8_P````````#_&!@8&!@8&!\8&!@`````_P`` +M`!@8&!C_&!@8&!@?&!\8&!@V-C8V-S8V-C8V-S`_```````_,#<V-C8V-O<` +M_P``````_P#W-C8V-C8W,#<V-C8``/\`_P```#8V]P#W-C8V&!C_`/\````V +M-C8V_P``````_P#_&!@8`````/\V-C8V-C8V/P```!@8'Q@?```````?&!\8 +M&!@`````/S8V-C8V-C;_-C8V&!C_&/\8&!@8&!@8^``````````?&!@8____ +M______\`````______#P\/#P\/#P#P\/#P\/#P______````````=MS(W'8` +M`'C,^,SXP,``_,S`P,#```#^;&QL;&P`_,Q@,&#,_````'[8V-AP``!F9F9F +M?&#``';<&!@8&`#\,'C,S'@P_#ALQO[&;#@`.&S&QFQL[@`<,!A\S,QX```` +M?MO;?@``!@Q^V]M^8,`\8,#\P&`\`'C,S,S,S,P``/P`_`#\```P,/PP,`#\ +M`&`P&#!@`/P`&#!@,!@`_``.&QL8&!@8&!@8&!@8V-AP,#``_``P,```=MP` +M=MP``#AL;#@`````````&!@`````````&`````\,#`SL;#P<>&QL;&P```!P +7&#!@>```````/#P\/``````````````` +` +end diff --git a/usr.sbin/pcvt/fonts/vt220l.810.uu b/usr.sbin/pcvt/fonts/vt220l.810.uu new file mode 100644 index 0000000..7cba2cb --- /dev/null +++ b/usr.sbin/pcvt/fonts/vt220l.810.uu @@ -0,0 +1,60 @@ +begin 644 vt220l.810 +M`````````````'Z!I:6!@;V9@7Y^_]O;___#Y_]^;/[^?'PX.!`0````$#A\ +M_GPX$``X?'PX?/[^?#A\$!`X.'S^_GPX?````!@\/!@```#____GP\/G____ +M```\9D)"9CP``/__PYF]O9G#__\`#P</?<S,S'@``#QF9F8\&'X8`#\S/S`P +M,'#PX`!_8W]C8V-GYL```-M^/.?G/'[;````@.#X_OC@@`````(./OX^#@(` +M&!@\?A@8?CP8&&9F9F9F9@!F9@!_V]O;>QL;&QL`/&8P;,9L&,QX```````` +M?GY^?@`8&#Q^&!A^/!C_&!@\/'X8&!@8&!@8&!@8?CP\&!@`````&`S^#!@` +M`````#!@_F`P``````#`P,#`_@``````)&;_9B0``!@8/#Q^?O__``#__WY^ +M/#P8&```````````````,'AX>#`P`#`P`&QL;"@```````!L;/YL;&S^;&P` +M&'[8V'PV-OPP`,;,#!@X,&!FQ@`X;&PX,';<S'8`X.!@8,````````P8,#`P +M,#`8#`!@,!@8&!@8,&````#&;#C^.&S&`````#`P_#`P````````<'`P,&`` +M``````#^```````````````P,```#`P8&#`P8&``?,;.WM;VYL9\`#!P,#`P +M,#`P_`!\QL8&##A@QOX`?,;&!CP&QL9\``P,'#QLS/X,'@#^P,#\!@8&QGP` +M'#!@P/S&QL9\`/[&!@P,&!@8&`!\QL;&?,;&QGP`?,;&QGX&#!AP`````#`P +M```P,````#`P```P,&`````8,&#`8#`8``````#\``#\`````&`P&`P8,&`` +M?,;&!@P8&``8`'S&SMK6WL#&?``X?,;&QO[&QL8`_&9F9GQF9F;\`#QFP,#` +MP,!F/`#X;&9F9F9F;/@`_F)@:'AH8&+^`/YB8&AX:&!@\``\9L#`P,[&9CP` +MQL;&QO[&QL;&`#P8&!@8&!@8/``>#`P,#`S,S'@`YF9L;'AL;&;F`/!@8&!@ +M8&)F_@#&[O[^UL;&QL8`QN;F]M[.SL;&`#ALQL;&QL9L.`#\9F9F?&!@8/`` +M?,;&QL;&SGP.`/QF9F9X;&QFY@!\QL!@.`P&QGP`?EH8&!@8&!@\`,;&QL;& +MQL;&?`!F9F9F9F9F/!@`QL;&QL;6_N[&`,;&;#@0.&S&Q@#,S,S,>#`P,'@` +M_L:,&#!@PL;^`!X8&!@8&!@8'@``8&`P,!@8#`P`\#`P,#`P,##P`!`X;,8` +M``````````````````#_,#`8`````````````'@,?,S,=@#@8&!\9F9F9MP` +M````?,;`P,9\`!P,#'S,S,S,=@````!\QO[`P'P`.&Q@\&!@8&#P`````';, +MS'P,S'C@8&!L=F9F9N8`,#``<#`P,#!X``P,``P,#`S,S'C@8&!F;'AX;.8` +M<#`P,#`P,#!X`````,S^_M;6U@````#<YL;&QL8`````?,;&QL9\`````-QF +M9F9\8/````!VS,S,?`P>````W'9F8&#P`````'S&<!S&?``@8&#\8&!@;#@` +M````S,S,S,QV`````,;&QL9L.`````#&UM;^_FP`````QFPX.&S&`````,;& +MQGX&!OP```#^C!@P8OX`#A@8&'`8&!@.`!@8&!@`&!@8&`#@,#`P'#`P,.`` +M=MP``````````````!`X;,;&_@!\QL#`P,9\#`8\`,P`S,S,S,QV```.`'S& +M_L#`?``\9@`\!CYF9C\``,P`>`Q\S,QV``!P`'@,?,S,=@`P,`!X#'S,S'8` +M````?L#`P'X&/#QF`#QF?F!@/`#,``!\QO[`P'P``'``?,;^P,!\``#,`'`P +M,#`P>``X;``X&!@8&#P``.``<#`P,#!X`,8`.&S&_L;&Q@`P,`!XS/S,S,P` +M'`#\8&!X8&#\`````'X;?MC8?P`^;,S,_LS,S,X`.&P`?,;&QL9\``#&`'S& +MQL;&?```<`!\QL;&QGP`>,P`S,S,S,QV``!P`,S,S,S,=@``Q@#&QL9^!@;\ +MQCALQL;&QFPX`,8`QL;&QL;&?``8&'[`P,#`?A@8.&QD8/A@8.;\`,S,>##\ +M,/PP,`#XS,S,^L;/QL<`#AL8&#P8&!C8<``<`'@,?,S,=@``.`!P,#`P,'@` +M`!P`?,;&QL9\```<`,S,S,S,=@!P_AP`W.;&QL8`_@#&YO;^WL[&`#QL;&P^ +M`'X````X;&QL.`!\````,``P,&#`QL9\``````#^P,``````````_@8&```` +MP\;,V#Y[PP8,#\/&S-DS9\T/`P,8&``8&#P\/!@`````,V;,9C,``````,QF +M,V;,```BB"*((H@BB"*(5:I5JE6J5:I5JMMWV^[;=]ONVW<8&!@8&!@8&!@8 +M&!@8&!CX&!@8&!@8&/@8^!@8&!@V-C8V-O8V-C8V``````#^-C8V-@```/@8 +M^!@8&!@V-C;V!O8V-C8V-C8V-C8V-C8V-@```/X&]C8V-C8V-C;V!OX````` +M-C8V-C;^`````!@8&/@8^````````````/@8&!@8&!@8&!@?`````!@8&!@8 +M_P```````````/\8&!@8&!@8&!@?&!@8&```````_P`````8&!@8&/\8&!@8 +M&!@8'Q@?&!@8V-C8V-S8V-C8V-C8W,#\`````````/S`W-C8V-C8V-O<` +M_P````````#_`/<V-C8V-C8V-S`W-C8V-@```/\`_P`````V-C;W`/<V-C8V +M&!@8_P#_`````#8V-C8V_P````````#_`/\8&!@8``````#_-C8V-C8V-C8V +M/P`````8&!@?&!\`````````'Q@?&!@8&```````/S8V-C8V-C8V-O\V-C8V +M&!@8_QC_&!@8&!@8&!@8^````````````!\8&!@8_____________P`````` +M_______P\/#P\/#P\/#P#P\/#P\/#P\/#_______``````````!VW-C,W'8` +M`'S&QMS&QMS`P/YF9&!@8&!@\`#^;&QL;&QL;.X`_L9@,!@P8,;^`````'_, +MS,S,>`````!F9F9V;&#`````=MP8&!@8`#P8?MO;VWX8/``X;,;&_L;&;#@` +M.&S&QL9L;&SN`!PR,!A\S,S,>`````!VV]O;;@```P9\S]O;\SY@P```'#!@ +M?&`P'````'S&QL;&QL8`````_@#^`/X`````,##\,#``_`!@,!@,&#!@`/X` +M#!@P8#`8#`#^``X;&Q@8&!@8&!@8&!@8&!@8V-AP```P,`#\`#`P`````';< +M`';<```X;&QL.````````````!@8````````````&``````/#`P,[&QL-#P< +H>&QL;&QL`````'#8&'#`^``````````\/#P\`````````````````&QL +` +end diff --git a/usr.sbin/pcvt/fonts/vt220l.814.uu b/usr.sbin/pcvt/fonts/vt220l.814.uu new file mode 100644 index 0000000..7d918bb --- /dev/null +++ b/usr.sbin/pcvt/fonts/vt220l.814.uu @@ -0,0 +1,83 @@ +begin 644 vt220l.814 +M`````````````````````'Z!I8&!O9F!?@``````?O_;___#Y_]^```````` +M;/[^_OY\.!`````````0.'S^?#@0````````&#P\Y^?G&!@\```````8/'[_ +M_WX8&#P``````````!@\/!@``````/______Y\/#Y_______`````#QF0D)F +M/`````#_____PYF]O9G#_____P``'@X:,GC,S,QX```````\9F9F/!A^&!@` +M`````#\S/S`P,'#PX```````?V-_8V-C9^?FP``````8&-L\YSS;&!@````` +M`(#`X/C^^.#`@````````@8./OX^#@8"```````8/'X8&!A^/!@``````&9F +M9F9F9@!F9@``````?]O;VWL;&QL;`````'S&8#ALQL9L.`S&?``````````` +M`/[^_@``````&#Q^&!@8?CP8?@`````8/'X8&!@8&!@``````!@8&!@8&'X\ +M&``````````8#/X,&````````````#!@_F`P`````````````,#`P/X````` +M```````H;/YL*```````````$#@X?'S^_@````````#^_GQ\.#@0```````` +M```````````````````8/#P\&!@`&!@`````9F9F)```````````````;&S^ +M;&QL_FQL````&!A\QL+`?`:&QGP8&```````PL8,&#!FQ@``````.&QL.';< +MS,QV`````#`P,&````````````````P8,#`P,#`8#```````,!@,#`P,#!@P +M`````````&8\_SQF````````````&!A^&!@`````````````````&!@8,``` +M````````_@`````````````````````8&````````@8,&#!@P(````````!\ +MQL[>]N;&QGP``````!@X>!@8&!@8?@``````?,8&#!@P8,;^``````!\Q@8& +M/`8&QGP```````P</&S,_@P,'@``````_L#`P/P&!L9\```````X8,#`_,;& +MQGP``````/[&!@P8,#`P,```````?,;&QGS&QL9\``````!\QL;&?@8&#'@` +M```````8&````!@8`````````!@8````&!@P```````&#!@P8#`8#`8````` +M`````'X``'X`````````8#`8#`8,&#!@``````!\QL8,&!@`&!@``````'S& +MQM[>WMS`?```````$#ALQL;^QL;&``````#\9F9F?&9F9OP``````#QFPL#` +MP,)F/```````^&QF9F9F9FSX``````#^9F)H>&AB9OX``````/YF8FAX:&!@ +M\```````/&;"P,#>QF8Z``````#&QL;&_L;&QL8``````#P8&!@8&!@8/``` +M````'@P,#`P,S,QX``````#F9FQL>&QL9N8``````/!@8&!@8&)F_@`````` +MQN[^_M;&QL;&``````#&YO;^WL[&QL8``````#ALQL;&QL9L.```````_&9F +M9GQ@8&#P``````!\QL;&QM;>?`P.`````/QF9F9\;&9FY@``````?,;&8#@, +MQL9\``````!^?EH8&!@8&#P``````,;&QL;&QL;&?```````QL;&QL;&;#@0 +M``````#&QL;&UM;^?&P``````,;&;#@X.&S&Q@``````9F9F9CP8&!@\```` +M``#^QHP8,&#"QOX``````#PP,#`P,#`P/```````@,#@<#@<#@8"```````\ +M#`P,#`P,##P````0.&S&`````````````````````````````/\`,#`8```` +M`````````````````'@,?,S,=@``````X&!@>&QF9F9\``````````!\QL#` +MQGP``````!P,##QLS,S,=@``````````?,;^P,9\```````X;&1@\&!@8/`` +M`````````';,S,Q\#,QX````X&!@;'9F9F;F```````8&``X&!@8&#P````` +M``8&``X&!@8&9F8\````X&!@9FQX;&;F```````X&!@8&!@8&#P````````` +M`.S^UM;6Q@``````````W&9F9F9F``````````!\QL;&QGP``````````-QF +M9F9\8&#P````````=LS,S'P,#!X```````#<=F9@8/```````````'S&<!S& +M?```````$#`P_#`P,#8<``````````#,S,S,S'8``````````,;&QFPX$``` +M````````QL;6UOYL``````````#&;#@X;,8``````````,;&QL9^!@SX```` +M````_LP8,&;^```````.&!@8<!@8&`X``````!@8&!@`&!@8&```````<!@8 +M&`X8&!AP``````!VW```````````````````$#ALQL;^````````/&;"P,#" +M9CP,!GP```#,S`#,S,S,S'8`````#!@P`'S&_L#&?``````0.&P`>`Q\S,QV +M``````#,S`!X#'S,S'8`````8#`8`'@,?,S,=@`````X;#@`>`Q\S,QV```` +M`````#QF8&8\#`8\````$#AL`'S&_L#&?```````S,P`?,;^P,9\`````&`P +M&`!\QO[`QGP``````&9F`#@8&!@8/``````8/&8`.!@8&!@\`````&`P&``X +M&!@8&#P`````QL80.&S&QO[&Q@```#AL.``X;,;&_L;&````&#!@`/YF8'Q@ +M9OX`````````S'8V?MC8;@``````/FS,S/[,S,S.`````!`X;`!\QL;&QGP` +M`````,;&`'S&QL;&?`````!@,!@`?,;&QL9\`````#!XS`#,S,S,S'8````` +M8#`8`,S,S,S,=@``````QL8`QL;&QGX&#'@`QL8`.&S&QL;&;#@```#&Q@#& +MQL;&QL;&?``````8&#QF8&!F/!@8`````#AL9&#P8&!@YOP``````&9F/!A^ +M&'X8&`````#XS,SXQ,S>S,S&``````X;&!@8?A@8&!C8<```&#!@`'@,?,S, +M=@`````,&#``.!@8&!@\`````!@P8`!\QL;&QGP`````&#!@`,S,S,S,=@`` +M````=MP`W&9F9F9F````=MP`QN;V_M[.QL8`````/&QL/@!^```````````X +M;&PX`'P````````````P,``P,&#&QGP```````````#^P,#````````````` +M`/X&!@8``````,#`QLS8,&#<A@P8/@``P,#&S-@P9LZ>/@8&````&!@`&!@\ +M/#P8`````````#9LV&PV````````````V&PV;-@``````!%$$4011!%$$401 +M1!%$5:I5JE6J5:I5JE6J5:K==]UWW7?==]UWW7?==Q@8&!@8&!@8&!@8&!@8 +M&!@8&!@8&/@8&!@8&!@8&!@8&/@8^!@8&!@8V-C8V-C;V-C8V-C8V```` +M`````/XV-C8V-C8``````/@8^!@8&!@8V-C8V]@;V-C8V-C8V-C8V-C8V +M-C8V-C8V-C8``````/X&]C8V-C8V-C8V-C8V]@;^````````-C8V-C8V-OX` +M```````8&!@8&/@8^`````````````````#X&!@8&!@8&!@8&!@8&!\````` +M```8&!@8&!@8_P````````````````#_&!@8&!@8&!@8&!@8&!\8&!@8&!@` +M````````_P```````!@8&!@8&!C_&!@8&!@8&!@8&!@?&!\8&!@8&!@V-C8V +M-C8V-S8V-C8V-C8V-C8V-S`_```````````````_,#<V-C8V-C8V-C8V-O<` +M_P``````````````_P#W-C8V-C8V-C8V-C8W,#<V-C8V-C8``````/\`_P`` +M`````#8V-C8V]P#W-C8V-C8V&!@8&!C_`/\````````V-C8V-C8V_P`````` +M````````_P#_&!@8&!@8`````````/\V-C8V-C8V-C8V-C8V/P```````!@8 +M&!@8'Q@?```````````````?&!\8&!@8&!@`````````/S8V-C8V-C8V-C8V +M-C;_-C8V-C8V&!@8&!C_&/\8&!@8&!@8&!@8&!@8^``````````````````? +M&!@8&!@8__________________\`````````__________#P\/#P\/#P\/#P +M\/#P#P\/#P\/#P\/#P\/#P__________````````````````=MS8V-QV```` +M`````'S&_,;&_,#`0````/[&QL#`P,#`P`````````#^;&QL;&QL``````#^ +MQF`P&#!@QOX``````````'[8V-C8<`````````!F9F9F?&!@P````````';< +M&!@8&!@``````'X8/&9F9CP8?@``````.&S&QO[&QFPX```````X;,;&QFQL +M;.X``````!XP&`P^9F9F/```````````?MO;?@`````````#!G[;V_-^8,`` +M`````!XP8&!^8&`P'@```````'S&QL;&QL;&````````_@``_@``_@`````` +M```8&'X8&```_P``````,!@,!@P8,`!^```````,&#!@,!@,`'X```````X; +M&Q@8&!@8&!@8&!@8&!@8&!@8V-AP````````&!@`?@`8&```````````=MP` +M=MP````````X;&PX````````````````````&!@`````````````````&``` +M```````/#`P,#`SL;#P<`````-AL;&QL;```````````<-@P8,CX```````` +=``````!\?'Q\?'P````````````````````````` +` +end diff --git a/usr.sbin/pcvt/fonts/vt220l.816.uu b/usr.sbin/pcvt/fonts/vt220l.816.uu new file mode 100644 index 0000000..62393e1 --- /dev/null +++ b/usr.sbin/pcvt/fonts/vt220l.816.uu @@ -0,0 +1,95 @@ +begin 644 vt220l.816 +M````````````````````````?H&E@8&]F8&!?@```````'[_V___P^?__WX` +M`````````&S^_O[^?#@0```````````0.'S^?#@0```````````8/#SGY^<8 +M&#P`````````&#Q^__]^&!@\`````````````!@\/!@```````#________G +MP\/G________```````\9D)"9CP``````/______PYF]O9G#______\``!X. +M&C)XS,S,S'@````````\9F9F9CP8?A@8````````/S,_,#`P,'#PX``````` +M`']C?V-C8V-GY^;`````````&!C;/.<\VQ@8``````"`P.#P^/[X\.#`@``` +M`````@8.'C[^/AX.!@(````````8/'X8&!A^/!@`````````9F9F9F9F9@!F +M9@```````'_;V]M[&QL;&QL``````'S&8#ALQL9L.`S&?``````````````` +M_O[^_@```````!@\?A@8&'X\&'X````````8/'X8&!@8&!@8````````&!@8 +M&!@8&'X\&````````````!@,_@P8```````````````P8/Y@,``````````` +M`````,#`P/X``````````````"AL_FPH`````````````!`X.'Q\_OX````` +M``````#^_GQ\.#@0```````````````````````````````8/#P\&!@8`!@8 +M``````!F9F8D``````````````````!L;/YL;&S^;&P``````!@8?,;"P'P& +MAL9\&!@```````#"Q@P8,&#&A@```````#AL;#AVW,S,S'8``````#`P,&`` +M````````````````#!@P,#`P,#`8#````````#`8#`P,#`P,&#`````````` +M``!F//\\9@``````````````&!A^&!@````````````````````8&!@P```` +M`````````'X````````````````````````8&````````````@8,&#!@P(`` +M``````!\QL;.WO;FQL9\````````&#AX&!@8&!@8?@```````'S&!@P8,&#` +MQOX```````!\Q@8&/`8&!L9\````````#!P\;,S^#`P,'@```````/[`P,#\ +M!@8&QGP````````X8,#`_,;&QL9\````````_L8&!@P8,#`P,````````'S& +MQL9\QL;&QGP```````!\QL;&?@8&!@QX```````````8&````!@8```````` +M````&!@````8&#``````````!@P8,&`P&`P&````````````?@``?@`````` +M``````!@,!@,!@P8,&````````!\QL8,&!@8`!@8````````?,;&QM[>WMS` +M?````````!`X;,;&_L;&QL8```````#\9F9F?&9F9F;\````````/&;"P,#` +MP,)F/````````/AL9F9F9F9F;/@```````#^9F)H>&A@8F;^````````_F9B +M:'AH8&!@\````````#QFPL#`WL;&9CH```````#&QL;&_L;&QL;&```````` +M/!@8&!@8&!@8/````````!X,#`P,#,S,S'@```````#F9F9L>'AL9F;F```` +M````\&!@8&!@8&)F_@```````,;N_O[6QL;&QL8```````#&YO;^WL[&QL;& +M````````?,;&QL;&QL;&?````````/QF9F9\8&!@8/````````!\QL;&QL;& +MUMY\#`X`````_&9F9GQL9F9FY@```````'S&QF`X#`;&QGP```````!^?EH8 +M&!@8&!@\````````QL;&QL;&QL;&?````````,;&QL;&QL9L.!````````#& +MQL;&UM;6_NYL````````QL9L?#@X?&S&Q@```````&9F9F8\&!@8&#P````` +M``#^QH8,&#!@PL;^````````/#`P,#`P,#`P/`````````"`P.!P.!P.!@(` +M```````\#`P,#`P,#`P\`````!`X;,8````````````````````````````` +M````_P``,#`8````````````````````````>`Q\S,S,=@```````.!@8'AL +M9F9F9GP```````````!\QL#`P,9\````````'`P,/&S,S,S,=@`````````` +M`'S&_L#`QGP````````X;&1@\&!@8&#P````````````=LS,S,S,?`S,>``` +M`.!@8&QV9F9F9N8````````8&``X&!@8&!@\````````!@8`#@8&!@8&!F9F +M/````.!@8&9L>'AL9N8````````X&!@8&!@8&!@\````````````[/[6UM;6 +MQ@```````````-QF9F9F9F8```````````!\QL;&QL9\````````````W&9F +M9F9F?&!@\````````';,S,S,S'P,#!X```````#<=F9@8&#P```````````` +M?,9@.`S&?````````!`P,/PP,#`P-AP```````````#,S,S,S,QV```````` +M````QL;&QFPX$````````````,;&UM;6_FP```````````#&;#@X.&S&```` +M````````QL;&QL;&?@8,^````````/[,&#!@QOX````````.&!@8<!@8&!@. +M````````&!@8&``8&!@8&````````'`8&!@.&!@8&'````````!VW``````` +M```````````````0.&S&QL;^`````````#QFPL#`P,)F/`P&?`````#,``#, +MS,S,S,QV```````,&#``?,;^P,#&?```````$#AL`'@,?,S,S'8```````#, +M``!X#'S,S,QV``````!@,!@`>`Q\S,S,=@``````.&PX`'@,?,S,S'8````` +M`````#QF8&!F/`P&/``````0.&P`?,;^P,#&?````````,8``'S&_L#`QGP` +M`````&`P&`!\QO[`P,9\````````9@``.!@8&!@8/```````&#QF`#@8&!@8 +M&#P``````&`P&``X&!@8&!@\``````#&`!`X;,;&_L;&Q@`````X;#@`.&S& +MQO[&QL8`````&#!@`/YF8'Q@8&;^``````````!L_K(R?MC8;@```````#YL +MS,S^S,S,S,X``````!`X;`!\QL;&QL9\````````Q@``?,;&QL;&?``````` +M8#`8`'S&QL;&QGP``````#!XS`#,S,S,S,QV``````!@,!@`S,S,S,S,=@`` +M````QL8``,;&QL;&QGX&#'@`QL8`?,;&QL;&QL9\`````,;&`,;&QL;&QL;& +M?```````&!@\9F!@8&8\&!@``````#AL9&#P8&!@8.;\````````9F8\&'X8 +M?A@8&```````^,S,^,3,WLS,S,8```````X;&!@8?A@8&!@8V'`````8,&`` +M>`Q\S,S,=@``````#!@P`#@8&!@8&#P``````!@P8`!\QL;&QL9\```````8 +M,&``S,S,S,S,=@```````';<`-QF9F9F9F8`````=MP`QN;V_M[.QL;&```` +M```\;&P^`'X`````````````.&QL.`!\```````````````P,``P,&#`QL9\ +M`````````````/[`P,#```````````````#^!@8&!@```````,#`PL;,&#!@ +MW(8,&#X```#`P,+&S!@P9LZ>/@8&`````!@8`!@8&#P\/!@````````````V +M;-AL-@``````````````V&PV;-@````````11!%$$4011!%$$4011!%$5:I5 +MJE6J5:I5JE6J5:I5JMUWW7?==]UWW7?==]UWW7<8&!@8&!@8&!@8&!@8&!@8 +M&!@8&!@8&/@8&!@8&!@8&!@8&!@8^!CX&!@8&!@8&!@V-C8V-C8V]C8V-C8V +M-C8V`````````/XV-C8V-C8V-@``````^!CX&!@8&!@8&!@V-C8V-O8&]C8V +M-C8V-C8V-C8V-C8V-C8V-C8V-C8V-@``````_@;V-C8V-C8V-C8V-C8V-O8& +M_@``````````-C8V-C8V-OX``````````!@8&!@8^!CX```````````````` +M````^!@8&!@8&!@8&!@8&!@8&!\``````````!@8&!@8&!C_```````````` +M````````_Q@8&!@8&!@8&!@8&!@8&!\8&!@8&!@8&`````````#_```````` +M```8&!@8&!@8_Q@8&!@8&!@8&!@8&!@?&!\8&!@8&!@8V-C8V-C8W-C8V +M-C8V-C8V-C8V-C<P/P`````````````````_,#<V-C8V-C8V-C8V-C8V]P#_ +M`````````````````/\`]S8V-C8V-C8V-C8V-C8W,#<V-C8V-C8V-@`````` +M_P#_```````````V-C8V-O<`]S8V-C8V-C8V&!@8&!C_`/\``````````#8V +M-C8V-C;_`````````````````/\`_Q@8&!@8&!@8`````````/\V-C8V-C8V +M-C8V-C8V-C8_```````````8&!@8&!\8'P`````````````````?&!\8&!@8 +M&!@8&``````````_-C8V-C8V-C8V-C8V-C8V_S8V-C8V-C8V&!@8&!C_&/\8 +M&!@8&!@8&!@8&!@8&!CX````````````````````'Q@8&!@8&!@8________ +M_____________P````````#____________P\/#P\/#P\/#P\/#P\/#P#P\/ +M#P\/#P\/#P\/#P\/#_________\``````````````````';<V-C8W'8````` +M``!XS,S,V,S&QL;,````````_L;&P,#`P,#`P```````````_FQL;&QL;&P` +M````````_L9@,!@P8,;^````````````?MC8V-C8<```````````9F9F9F9\ +M8&#``````````';<&!@8&!@8`````````'X8/&9F9CP8?@`````````X;,;& +M_L;&;#@````````X;,;&QFQL;&SN````````'C`8##YF9F9F/``````````` +M`'[;V]M^`````````````P9^V]OS?F#`````````'C!@8'Y@8&`P'@`````` +M``!\QL;&QL;&QL8``````````/X``/X``/X````````````8&'X8&```_P`` +M```````P&`P&#!@P`'X`````````#!@P8#`8#`!^````````#AL;&Q@8&!@8 +M&!@8&!@8&!@8&!@8&-C8V'```````````!@8`'X`&!@`````````````=MP` +M=MP`````````.&QL.````````````````````````!@8```````````````` +M````&```````````#PP,#`P,[&QL/!P``````-AL;&QL;`````````````!P +MV#!@R/@`````````````````?'Q\?'Q\?``````````````````````````` +!`#!@ +` +end diff --git a/usr.sbin/pcvt/ispcvt/Makefile b/usr.sbin/pcvt/ispcvt/Makefile new file mode 100644 index 0000000..1787cc2 --- /dev/null +++ b/usr.sbin/pcvt/ispcvt/Makefile @@ -0,0 +1,27 @@ + +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +PROG = ispcvt +MAN8 = ispcvt.${MAN8EXT} + +.include <bsd.prog.mk> + +# special bindir, this MUST stand after include <bsd.prog.mk> +BINDIR = /usr/sbin + +$(PROG): $(INCDIR)/pcvt_ioctl.h + +beforeinstall: + @if [ ! -d $(MANDIR)8 ] ; then \ + echo making $(MANDIR)8; mkdir $(MANDIR)8; fi + +.endif diff --git a/usr.sbin/pcvt/ispcvt/ispcvt.8 b/usr.sbin/pcvt/ispcvt/ispcvt.8 new file mode 100644 index 0000000..35cdda4 --- /dev/null +++ b/usr.sbin/pcvt/ispcvt/ispcvt.8 @@ -0,0 +1,88 @@ +.\" Copyright (c) 1992,1993,1994 Hellmuth Michaelis +.\" +.\" All rights reserved. +.\" +.\" Redistribution and use in source and binary forms, with or without +.\" modification, are permitted provided that the following conditions +.\" are met: +.\" 1. Redistributions of source code must retain the above copyright +.\" notice, this list of conditions and the following disclaimer. +.\" 2. Redistributions in binary form must reproduce the above copyright +.\" notice, this list of conditions and the following disclaimer in the +.\" documentation and/or other materials provided with the distribution. +.\" 3. All advertising materials mentioning features or use of this software +.\" must display the following acknowledgement: +.\" This product includes software developed by Hellmuth Michaelis +.\" 4. The name authors may not be used to endorse or promote products +.\" derived from this software without specific prior written permission. +.\" +.\" THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR +.\" IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES +.\" OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. +.\" IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, +.\" INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT +.\" NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, +.\" DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY +.\" THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +.\" (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF +.\" THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +.\" +.\" @(#)ispcvt.1, 3.00, Last Edit-Date: [Mon Jan 10 21:19:00 1994] +.\" +.Dd December 30, 1993 +.Dt ISPCVT 1 +.Sh NAME +.Nm ispcvt +.Nd verify if current video driver is pcvt driver +.Sh SYNOPSIS +.Nm ispcvt +.Op Fl v +.Op Fl c +.Sh DESCRIPTION +The +.Nm ispcvt +utility allows the user to check whether the current video driver compiled +into the kernel is a pcvt driver. The major and minor release numbers of +the driver are also checked. +Furthermore +.Nm ispcvt +is also able to print out the values of all the +.Dq Ar PCVT_XXXXXX +compile time options, the driver in the current running kernel was +compiled with. +.Pp +The options are as follows: +.Bl -tag -width Ds +.It Fl v +Specifies being verbose. On success the name and revision is reported, on +failure which comparison failed. +.It Fl c +This options prints out the values of all +.Dq Ar PCVT_XXXXXX +#defines which were given to the compiler at the time the currently running +kernel was compiled. Specifying +.Fl v +with the +.Fl c +option gives a verbose listing of the compile-time options. +.Sh RETURN VALUE +.Bl -tag -width Ds +.Pp +.It Sy 0 +driver is pcvt and major and minor numbers match +.It Sy 1 +ioctl system call failed +.It Sy 2 +driver name mismatch +.It Sy 3 +name matched, release major number mismatch +.It Sy 4 +name & major number matched, release minor number mismatch +.It Sy 5 +usage error +.El +.Pp +.Sh BUGS +No known bugs +.Sh SEE ALSO +.Xr pcvt 8 diff --git a/usr.sbin/pcvt/ispcvt/ispcvt.c b/usr.sbin/pcvt/ispcvt/ispcvt.c new file mode 100644 index 0000000..dc630f1 --- /dev/null +++ b/usr.sbin/pcvt/ispcvt/ispcvt.c @@ -0,0 +1,268 @@ +/* + * Copyright (c) 1992,1993,1994 Hellmuth Michaelis + * + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Hellmuth Michaelis + * 4. The name authors may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + */ + +static char *id = + "@(#)ispcvt.c, 3.20, Last Edit-Date: [Mon Dec 19 14:15:37 1994]"; + +/*---------------------------------------------------------------------------* + * + * history: + * + * -hm upgraded to report pcvt compile time configuration + * -hm PCVT_INHIBIT_NUMLOCK patch from Joerg + * -hm PCVT_META_ESC patch from Joerg + * -hm PCVT_PCBURST + * -hm new ioctl VGAPCVTINFO + * -hm new CONF_ values for 3.10 + * -hm new CONF_ values for 3.20 + * + *---------------------------------------------------------------------------*/ + +#include <stdio.h> +#include <machine/pcvt_ioctl.h> + +main(argc,argv) +int argc; +char *argv[]; +{ + extern int optind; + extern int opterr; + extern char *optarg; + + struct pcvtid pcvtid; + struct pcvtinfo pcvtinfo; + int c; + char *p; + int verbose = 0; + int config = 0; + + while( (c = getopt(argc, argv, "vc")) != EOF) + { + switch(c) + { + case 'v': + verbose = 1; + break; + + case 'c': + config = 1; + break; + + case '?': + default: + usage(); + break; + } + } + + if(ioctl(0, VGAPCVTID, &pcvtid) == -1) + { + if(verbose) + perror("ispcvt - ioctl VGAPCVTID failed, error"); + exit(1); + } + + if(!strcmp(pcvtid.name, PCVTIDNAME)) + { + if(pcvtid.rmajor == PCVTIDMAJOR) + { + if(pcvtid.rminor != PCVTIDMINOR) + { + if(verbose) + fprintf(stderr,"ispcvt - minor revision: expected %d, got %d\n", PCVTIDMINOR, pcvtid.rminor); + exit(4); /* minor revision mismatch */ + } + } + else + { + if(verbose) + fprintf(stderr,"ispcvt - major revision: expected %d, got %d\n", PCVTIDMAJOR, pcvtid.rmajor); + exit(3); /* major revision mismatch */ + } + } + else + { + if(verbose) + fprintf(stderr,"ispcvt - name check: expected %s, got %s\n", PCVTIDNAME, pcvtid.name); + exit(2); /* name mismatch */ + } + + if(verbose) + { + fprintf(stderr,"\nispcvt: kernel and utils match, driver name [%s], release [%1.1d.%02.2d]\n\n",pcvtid.name,pcvtid.rmajor,pcvtid.rminor); + } + + if(config == 0) + exit(0); + + if(ioctl(0, VGAPCVTINFO, &pcvtinfo) == -1) + { + if(verbose) + perror("ispcvt - ioctl VGAPCVTINFO failed, error"); + exit(1); + } + + + if(verbose) + { + switch(pcvtinfo.opsys) + { + case CONF_386BSD: + p = "PCVT_386BSD"; + break; + + case CONF_NETBSD: + p = "PCVT_NETBSD"; + break; + + case CONF_FREEBSD: + p = "PCVT_FREEBSD"; + break; + + default: + case CONF_UNKNOWNOPSYS: + p = "UNKNOWN"; + break; + + } + fprintf(stderr,"Operating System = %s\t", p); + fprintf(stderr,"OS Release Id = %u\n", pcvtinfo.opsysrel); + fprintf(stderr,"PCVT_NSCREENS = %u\t\t", pcvtinfo.nscreens); + fprintf(stderr,"PCVT_UPDATEFAST = %u\n", pcvtinfo.updatefast); + fprintf(stderr,"PCVT_UPDATESLOW = %u\t\t", pcvtinfo.updateslow); + fprintf(stderr,"PCVT_SYSBEEPF = %u\n", pcvtinfo.sysbeepf); + fprintf(stderr,"PCVT_PCBURST = %u\t\t", pcvtinfo.pcburst); + fprintf(stderr,"PCVT_KBD_FIFO_SZ = %u\n\n", pcvtinfo.kbd_fifo_sz); + + /* config booleans */ + + fprintf(stderr,"PCVT_VT220KEYB = %s\t\t", + ((u_int)pcvtinfo.compile_opts & (u_int)CONF_VT220KEYB) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_SCREENSAVER = %s\n", + (pcvtinfo.compile_opts & CONF_SCREENSAVER) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_PRETTYSCRNS = %s\t\t", + (pcvtinfo.compile_opts & CONF_PRETTYSCRNS) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_CTRL_ALT_DEL = %s\n", + (pcvtinfo.compile_opts & CONF_CTRL_ALT_DEL) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_USEKBDSEC = %s\t\t", + (pcvtinfo.compile_opts & CONF_USEKBDSEC) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_24LINESDEF = %s\n", + (pcvtinfo.compile_opts & CONF_24LINESDEF) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_EMU_MOUSE = %s\t\t", + (pcvtinfo.compile_opts & CONF_EMU_MOUSE) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_SHOWKEYS = %s\n", + (pcvtinfo.compile_opts & CONF_SHOWKEYS) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_KEYBDID = %s\t\t", + (pcvtinfo.compile_opts & CONF_KEYBDID) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_SIGWINCH = %s\n", + (pcvtinfo.compile_opts & CONF_SIGWINCH) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_NULLCHARS = %s\t\t", + (pcvtinfo.compile_opts & CONF_NULLCHARS) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_BACKUP_FONTS = %s\n", + (pcvtinfo.compile_opts & CONF_BACKUP_FONTS) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_SW0CNOUTP = %s\t\t", + (pcvtinfo.compile_opts & CONF_SW0CNOUTP) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_NEEDPG = %s\n", + (pcvtinfo.compile_opts & CONF_NEEDPG) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_SETCOLOR = %s\t\t", + (pcvtinfo.compile_opts & CONF_SETCOLOR) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_132GENERIC = %s\n", + (pcvtinfo.compile_opts & CONF_132GENERIC) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_PALFLICKER = %s\t\t", + (pcvtinfo.compile_opts & CONF_PALFLICKER) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_WAITRETRACE = %s\n", + (pcvtinfo.compile_opts & CONF_WAITRETRACE) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_XSERVER = %s\t\t", + (pcvtinfo.compile_opts & CONF_XSERVER) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_USL_VT_COMPAT = %s\n", + (pcvtinfo.compile_opts & CONF_USL_VT_COMPAT) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_FAKE_SYSCONS10 = %s\t\t", + (pcvtinfo.compile_opts & CONF_FAKE_SYSCONS10) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_INHIBIT_NUMLOCK = %s\n", + (pcvtinfo.compile_opts & CONF_INHIBIT_NUMLOCK) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_META_ESC = %s\t\t", + (pcvtinfo.compile_opts & CONF_META_ESC) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_NOFASTSCROLL = %s\n", + (pcvtinfo.compile_opts & CONF_NOFASTSCROLL) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_SLOW_INTERRUPT = %s\t\t", + (pcvtinfo.compile_opts & CONF_SLOW_INTERRUPT) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_KBD_FIFO = %s\n", + (pcvtinfo.compile_opts & CONF_KBD_FIFO) ? "ON" : "OFF"); + + fprintf(stderr,"PCVT_NO_LED_UPDATE = %s\n\n", + (pcvtinfo.compile_opts & CONF_NO_LED_UPDATE) ? "ON" : "OFF"); + } + else /* !verbose */ + { + fprintf(stderr,"BSD Version = %u\n", pcvtinfo.opsys); + fprintf(stderr,"PCVT_NSCREENS = %u\n", pcvtinfo.nscreens); + fprintf(stderr,"PCVT_UPDATEFAST = %u\n", pcvtinfo.updatefast); + fprintf(stderr,"PCVT_UPDATESLOW = %u\n", pcvtinfo.updateslow); + fprintf(stderr,"PCVT_SYSBEEPF = %u\n", pcvtinfo.sysbeepf); + fprintf(stderr,"Compile options = 0x%08X\n", pcvtinfo.compile_opts); + } +} + +usage() +{ + fprintf(stderr,"\nispcvt - verify current video driver is the pcvt-driver\n"); + fprintf(stderr,"usage: ispcvt [-v] [-c]\n"); + fprintf(stderr," -v be verbose\n"); + fprintf(stderr," -c print compile time configuration\n\n"); + exit(5); +} + diff --git a/usr.sbin/pcvt/kbdio/Makefile b/usr.sbin/pcvt/kbdio/Makefile new file mode 100644 index 0000000..147e6ad --- /dev/null +++ b/usr.sbin/pcvt/kbdio/Makefile @@ -0,0 +1,38 @@ + +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +PROG= kbdio +SRCS= kbdio.y lex.l + +#YACC= bison +#YFLAGS+= -yd # Bison only + +YFLAGS+= -v # verbose +LFLAGS+= -I +LDADD= -lm -ly -ll + +NOMAN= +NOSHARED= no shared linkage + +CFLAGS+= -I ${.CURDIR}/obj -I ${.CURDIR} #-g + +CLEANFILES+= y.tab.h +CLEANFILES+= y.output # comment file from bison + +install: + @echo "kbdio is not installed automatically ...." + +.include <bsd.prog.mk> + +lex.o: y.tab.h lex.l + +.endif diff --git a/usr.sbin/pcvt/kbdio/kbdio.y b/usr.sbin/pcvt/kbdio/kbdio.y new file mode 100644 index 0000000..ea9a55f --- /dev/null +++ b/usr.sbin/pcvt/kbdio/kbdio.y @@ -0,0 +1,298 @@ +/* Hello emacs, this should be edited in -*- Fundamental -*- mode */ +%{ +/* + * Copyright (c) 1994 Joerg Wunsch + * + * All rights reserved. + * + * This program is free software. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Joerg Wunsch + * 4. The name of the developer may not be used to endorse or promote + * products derived from this software without specific prior written + * permission. + * + * THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + */ + +#ident "$Header: /home/joerg/src/kbdio/RCS/kbdio.y,v 1.2 1994/09/18 19:49:22 j Exp $" + +/* + * $Log: kbdio.y,v $ + * Revision 1.2 1994/09/18 19:49:22 j + * Refined expr handling; can now set/clear bits. + * + * Revision 1.1 1994/09/18 12:57:13 j + * Initial revision + * + * + */ + +#include <stdio.h> +#include <stdlib.h> +#include <math.h> +#include <sys/fcntl.h> +#include <machine/cpufunc.h> +#include <machine/pcvt_ioctl.h> + +#ifdef __NetBSD__ +#include <machine/pio.h> +#endif + +#define YYDEBUG 1 + +void yyerror(const char *msg); + +static void help(int), status(void), data(int), kbd(int), cmdbyte(int), + kbc(int); +static int kbget(void); +%} + +%union { + int num; +} + +%token NEWLINE +%token ALL CMD DATA DEFAULTS ECHOC ENABLE EXPR HELP ID LED +%token MAKE ONLY RELEASE RESEND RESET SCAN STATUS TYPEMATIC +%token <num> NUM + +%type <num> expr opr + +%% + +interpret: lines ; + +lines: line + | lines line + ; + +line: statements NEWLINE + | NEWLINE + | error NEWLINE { fprintf(stderr, "bing!\n"); } + ; + +statements: statement + | statements ';' statement + ; + +statement: '?' { help(0); } + | HELP { help(0); } + | HELP EXPR { help(1); } + | STATUS '?' { status(); } + | DATA '?' { data(kbget()); } + | LED '=' NUM { kbd(0xed); kbd($3); } + | ECHOC { kbd(0xee); kbget(); } + | SCAN '=' NUM { kbd(0xf0); kbd($3); + if($3 == 0) data(kbget()); } + | SCAN '?' { kbd(0xf0); kbd(0); data(kbget()); } + | ID '?' { kbd(0xf2); data(kbget()); + data(kbget()); } + | TYPEMATIC '=' NUM ',' NUM + { kbd(0xf3); + if($3 > 1000) $3 = 1000; + if($5 > 30) $5 = 30; + if($5 < 2) $5 = 2; + kbd( + (int) + (8.0 * log(30.0 / (double)$5) + / log(2)) + | ((($3 / 250) - 1) * 32) + ); + } + | ENABLE { kbd(0xf4); } + | DEFAULTS { kbd(0xf6); } + | ALL TYPEMATIC { kbd(0xf7); } + | ALL MAKE RELEASE { kbd(0xf8); } + | ALL MAKE ONLY { kbd(0xf9); } + | ALL TYPEMATIC MAKE RELEASE + { kbd(0xfa); } + | NUM TYPEMATIC { kbd(0xfb); kbd($1); } + | NUM MAKE RELEASE { kbd(0xfc); kbd($1); } + | NUM MAKE ONLY { kbd(0xfd); kbd($1); } + | RESEND { kbd(0xfe); } + | RESET { kbd(0xff); } + | CMD '?' { kbc(0x20); cmdbyte(kbget()); } + | CMD '=' expr { kbc(0x60); kbd($3); } + | /* lambda */ + ; + +expr: opr { $$ = $1; } + | expr '+' opr { $$ = $1 | $3; } + | expr '-' opr { $$ = $1 & ~($3); } + ; + +opr: NUM { $$ = $1; } + | CMD { kbc(0x20); $$ = kbget(); } + ; + +%% + +static void +help(int topic) { + switch(topic) { + case 0: + printf( + "Input consists of lines, containing one or more semicolon-separated\n" + "statements. Numbers are implicitly hexadecimal, append a dot for\n" + "decimal numbers. Valid statements include:\n" + "help [expr]; give help [to expression syntax]\n" + "status ? interpret kbd ctrl status byte\n" + "data ? get one byte of data\n" + "led = NUM set kbd LEDs\n" + "echo = NUM echo byte to kbd\n" + "scan = NUM; scan ? set scan code set; return current set\n" + "id ? get two id bytes\n" + "typematic=delay,rate set typematic delay(ms)&rate(1/s)\n" + "enable; defaults enable kbd; back to defaults\n" + "all typematic make all keys typematic\n" + "all make release make all keys sending make/release\n" + "all make only make all keys sending make only\n" + "all typematic make release make all keys typematic & make/release\n" + "NUM typematic make specific key typematic\n" + "NUM make release make specific key sending make/release\n" + "NUM make only make specific key sending make only\n" + "resend; reset resend last byte from kbd; reset kbd\n" + "cmd ? fetch kbd ctrl command byte\n" + "cmd = expr set kbd ctrl command byte\n" + "\n"); + break; + + case 1: + printf( + "Expressions can either consist of a number, possibly followed\n" + "by a + or - sign and bit values in numeric or symbolic form.\n" + "Symbolic bit values are:\n" + "SCCONV IGNPAR CLKLOW OVRINH TEST IRQ\n" + "\n"); + break; + } +} + +static void +status(void) { + int c = inb(0x64); + if(c&0x80) printf("parity error | "); + if(c&0x40) printf("rx timeout | "); + if(c&0x20) printf("tx timeout | "); + if(c&0x10) printf("kbd released "); + else printf("kbd locked "); + if(c&0x08) printf("| cmd last sent "); + else printf("| data last sent "); + if(c&0x04) printf("| power-on "); + else printf("| test ok "); + if(c&0x02) printf("| ctrl write busy "); + else printf("| ctrl write ok "); + if(c&0x01) printf("| ctrl read ok\n"); + else printf("| ctrl read empty\n"); +} + +static void +kbd(int d) { + int i = 100000; + while(i && (inb(0x64) & 2)) i--; + if(i == 0) { printf("kbd write: timed out\n"); return; } + outb(0x60, d); +} + +static void +kbc(int d) { + int i = 100000; + while(i && (inb(0x64) & 2)) i--; + if(i == 0) { printf("ctrl write: timed out\n"); return; } + outb(0x64, d); +} + +static int +kbget(void) { + int i, c; + for(;;) { + i = 10000; + while(i && (inb(0x64) & 1) == 0) i--; + if(i == 0) { printf("data read: timed out\n"); return -1; } + c = (unsigned char)inb(0x60); + switch(c) { + case 0: case 0xff: + printf("got kbd overrun\n"); break; + case 0xaa: + printf("got self-test OK\n"); break; + case 0xee: + printf("got ECHO byte\n"); break; + case 0xfa: + printf("got ACK\n"); break; + case 0xfc: + printf("got self-test FAIL\n"); break; + case 0xfd: + printf("got internal failure\n"); break; + case 0xfe: + printf("got RESEND request\n"); break; + default: + goto done; + } + } +done: + return c; +} + +static void +cmdbyte(int d) { + if(d&0x40) printf("scan conv "); + else printf("pass thru "); + if(d&0x20) printf("| ign parity "); + else printf("| check parity "); + if(d&0x10) printf("| kbd clk low "); + else printf("| enable kbd "); + if(d&0x08) printf("| override kbd inh "); + if(d&0x04) printf("| test ok "); + else printf("| power-on "); + if(d&0x01) printf("| irq 1 enable\n"); + else printf("| no irq\n"); +} + +static void +data(int d) { + if(d < 0) return; + printf("data: 0x%02x\n", d); +} + +void yyerror(const char *msg) { + fprintf(stderr, "yyerror: %s\n", msg); +} + +int main(int argc, char **argv) { + int fd; + + if(argc > 1) yydebug = 1; + + if((fd = open("/dev/console", O_RDONLY)) < 0) + fd = 0; + + if(ioctl(fd, KDENABIO, 0) < 0) { + perror("ioctl(KDENABIO)"); + return 1; + } + yyparse(); + + (void)ioctl(fd, KDDISABIO, 0); + return 0; +} + diff --git a/usr.sbin/pcvt/kbdio/lex.l b/usr.sbin/pcvt/kbdio/lex.l new file mode 100644 index 0000000..c37a73c --- /dev/null +++ b/usr.sbin/pcvt/kbdio/lex.l @@ -0,0 +1,97 @@ +%{ +/* + * Copyright (c) 1994 Joerg Wunsch + * + * All rights reserved. + * + * This program is free software. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Joerg Wunsch + * 4. The name of the developer may not be used to endorse or promote + * products derived from this software without specific prior written + * permission. + * + * THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + */ + +#ident "$Header: /home/joerg/src/kbdio/RCS/lex.l,v 1.2 1994/09/18 19:48:45 j Exp $" + +/* + * $Log: lex.l,v $ + * Revision 1.2 1994/09/18 19:48:45 j + * Added the symbolic values for kbd cmd byte. + * + * Revision 1.1 1994/09/18 12:57:13 j + * Initial revision + * + * + */ + +#include <stdio.h> +#include <stdlib.h> + +#include "y.tab.h" + +extern YYSTYPE yylval; + +%} + +D [0-9a-fA-F] + +%% + +all { return ALL; } +cmd { return CMD; } +data { return DATA; } +defaults { return DEFAULTS; } +echo { return ECHOC; } +enable { return ENABLE; } +expr { return EXPR; } +help { return HELP; } +id { return ID; } +led { return LED; } +make { return MAKE; } +only { return ONLY; } +release { return RELEASE; } +resend { return RESEND; } +reset { return RESET; } +scan { return SCAN; } +status { return STATUS; } +typematic { return TYPEMATIC; } + + /* numeric values */ +clklow { yylval.num = 0x10; return NUM; } +ignpar { yylval.num = 0x20; return NUM; } +irq { yylval.num = 0x01; return NUM; } +ovrinh { yylval.num = 0x08; return NUM; } +scconv { yylval.num = 0x40; return NUM; } +test { yylval.num = 0x04; return NUM; } + +{D}({D}*)\. { sscanf(yytext, "%d", &yylval.num); return NUM; } + +{D}({D}*) { sscanf(yytext, "%x", &yylval.num); return NUM; } + +[ \t] { /* ignore */ } + +\n { return NEWLINE; } + +. { return yytext[0]; } diff --git a/usr.sbin/pcvt/kcon/Makefile b/usr.sbin/pcvt/kcon/Makefile new file mode 100644 index 0000000..31c5acc --- /dev/null +++ b/usr.sbin/pcvt/kcon/Makefile @@ -0,0 +1,26 @@ + +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +PROG = kcon +DEVICE = /dev/ttyv0 +CFLAGS += -I${.CURDIR}/../keycap -DKEYB_DEVICE=\"${DEVICE}\" + +# the -Lfoo could be omitted if libkeycap.a were installed before +# making those programs here + +LDADD = -L${.CURDIR}/../keycap -L${.CURDIR}/../keycap/obj -lkeycap + +.include <bsd.prog.mk> + +$(PROG): $(INCDIR)/pcvt_ioctl.h + +.endif diff --git a/usr.sbin/pcvt/kcon/kcon.1 b/usr.sbin/pcvt/kcon/kcon.1 new file mode 100644 index 0000000..2697ad4 --- /dev/null +++ b/usr.sbin/pcvt/kcon/kcon.1 @@ -0,0 +1,122 @@ +.\" Copyright (c) 1992,1993,1994 Hellmuth Michaelis +.\" +.\" All rights reserved. +.\" +.\" Redistribution and use in source and binary forms, with or without +.\" modification, are permitted provided that the following conditions +.\" are met: +.\" 1. Redistributions of source code must retain the above copyright +.\" notice, this list of conditions and the following disclaimer. +.\" 2. Redistributions in binary form must reproduce the above copyright +.\" notice, this list of conditions and the following disclaimer in the +.\" documentation and/or other materials provided with the distribution. +.\" 3. All advertising materials mentioning features or use of this software +.\" must display the following acknowledgement: +.\" This product includes software developed by Hellmuth Michaelis +.\" 4. The name authors may not be used to endorse or promote products +.\" derived from this software without specific prior written permission. +.\" +.\" THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR +.\" IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES +.\" OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. +.\" IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, +.\" INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT +.\" NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, +.\" DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY +.\" THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +.\" (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF +.\" THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +.\" +.\" @(#)kcon.1, 3.20, Last Edit-Date: [Wed Jan 25 16:34:56 1995] +.\" +.Dd January 25, 1995 +.Dt KCON 1 +.Sh NAME +.Nm kcon +.Nd keyboard control and remapping +.Sh SYNOPSIS +.Nm kcon +.Op Fl d Ar delay +.Op Fl l +.Op Fl m Ar map +.Op Fl o +.Op Fl p +.Op Fl R +.Op Fl r Ar rate +.Op Fl s +.Op Fl t Ns Ar +/- +.Op Fl x +.Sh DESCRIPTION +.Nm kcon +is used for controlling all aspects of keyboard configuration for the 'pcvt' +video driver. +.Pp +The available options are: +.Bl -tag -width flag +.It Fl d Ar delay +Specifies the delay after which the last key entered will be repeated by the +Keyboard. Valid values are 0..3 corresponding to delays of 250, 500, 750 and +1000 milliseconds. +.It Fl l +Displays the current keyboard map in use by the driver. +.It Fl m Ar map +Specifies the map entry to be searched in the keyboard capabilities database +.Nm keycap. +The database is searched for the entry and if found, the mapping +is loaded and is used in the driver from then on. +.It Fl o +Switches display of control codes to octal in the listing of the current map. +To be used in conjunction with the +.Fl l +option. +.It Fl p +Uses 'pure' output when listing - the Escape character is displayed in either +octal or hexadecimal and not as 'ESC'. To be used in conjunction with the +.Fl l +option. +.It Fl r Ar rate +Specifies the character repetition rate. Valid argument values are 0...31 +corresponding to rates of 30 characters/second ... 2 characters/second. +.It Fl R +Reset the Keyboard. +.It Fl s +Displays the current settings of the rate and delay values. +.It Fl t Ar +/- +Specify this option to enable ( +.Ar + +) or disable ( +.Ar - +) the repetition of keys. +.It Fl x +Switches display of control codes to hexadecimal in the listing of the current map. +To be used in conjunction with the +.Fl l +option. This is the default behaviour. +.Sh FILES +.Bl -tag -width /usr/share/misc/keycap -compact +.It Pa /usr/share/misc/keycap +Keyboard capabilities data base file if nothing else was chosen during installation. +.It Pa /dev/console +Keyboard raw device. +.Sh SEE ALSO +.Xr keycap 3 , +.Xr keycap 5 +.Sh BUGS +.Nm kcon +detects several inconsistencies in the keycap database. In case of errors +.Nm kcon +exits with an error message. If this happens, the keyboard may remain in +an undefined state. To recover from such situation, execute +.Nm kcon -m default +.Sh EXAMPLES +The command +.Dq Li kcon -m gb +loads the entry 'gb' from the keycap file into the keyboard to switch to +a british keyboard behaviour. + +The command +.Dq Li kcon -r 0 -d 0 +switches the keyboard to emit characters at a rate of 30 characters per second +after a key has been held down for 250 milliseconds. + + diff --git a/usr.sbin/pcvt/kcon/kcon.c b/usr.sbin/pcvt/kcon/kcon.c new file mode 100644 index 0000000..8393e86 --- /dev/null +++ b/usr.sbin/pcvt/kcon/kcon.c @@ -0,0 +1,753 @@ +/* + * Copyright (c) 1992,1993,1994 Hellmuth Michaelis + * + * Copyright (c) 1992,1993 Holger Veit. + * + * All rights reserved. + * + * This code is derived from software contributed to 386BSD by + * Holger Veit + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by + * Hellmuth Michaelis and Holger Veit + * 4. The name authors may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + */ + +static char *id = + "@(#)kcon.c, 3.20, Last Edit-Date: [Wed Jan 25 16:33:08 1995]"; + +/*---------------------------------------------------------------------------* + * + * kcon.c Keyboard control and remapping + * ---------------------------------------------- + * + * based on "keymap" which was written by + * Holger Veit (veit@du9ds3.uni-duisburg.de) + * + * -hm a first rewrite + * -hm rewrite for pcvt 2.0 distribution + * -hm adding show current typematic values + * -hm hex/octal/esc output choices + * -hm remapping debugging + * -hm garbage output for remapped keys bugfix + * -hm patch from Lon Willet, adding -R + * + *---------------------------------------------------------------------------*/ + +#include <stdio.h> +#include <string.h> +#include <sys/types.h> +#include <sys/ioctl.h> +#include <machine/pcvt_ioctl.h> + +#include "keycap.h" + +int Rf = 0; +int df = 0; +int lf = 0; +int mf = 0; +int of = 0; +int pf = 0; +int rf = 0; +int tf = 0; +int xf = 0; +int sf = 0; + +/*---------------------------------------------------------------------------* + * main entry + *---------------------------------------------------------------------------*/ +main(argc, argv) +int argc; +char *argv[]; +{ + extern char *optarg; + extern int optind; + + int c = 0; + + int errf = 0; + + int rate = -1; + int delay = -1; + char *map; + int kbfd; + + while((c = getopt(argc, argv, "Rd:lm:opr:st:x")) != EOF) + { + switch(c) + { + case 'R': + Rf = 1; + break; + + case 'd': + df = 1; + delay = atoi(optarg); + break; + + case 'l': + lf = 1; + break; + + case 'm': + mf = 1; + map = optarg; + break; + + case 'o': + if(xf) + errf = 1; + else + of = 1; + break; + + case 'p': + pf = 1; + break; + + case 'r': + rf = 1; + rate = atoi(optarg); + break; + + case 's': + sf = 1; + break; + + case 't': + if(*optarg == '+') + tf = 1; + else if(*optarg == '-') + tf = -1; + else + errf = 1; + break; + + case 'x': + if(of) + errf = 1; + else + xf = 1; + break; + + default: + usage(); + } + } + + if((Rf == 0 && df == 0 && lf == 0 && tf == 0 && sf == 0 && + rf == 0 && mf == 0 ) || errf) + { + usage(); + } + + if((kbfd = open(KEYB_DEVICE, 0)) < 0) + { + perror("kcon: keyboard open failiure"); + exit(1); + } + + if(sf) + { + showtypeamatic(kbfd); + exit(0); + } + + if(lf) + { + listcurrent(kbfd); + exit(0); + } + + if (Rf) + { + if (ioctl(kbfd, KBDRESET, 0) < 0) { + perror ("kcon: ioctl KBDRESET failed"); + exit (1); + } + } + + if(tf) + { + setrepeat(kbfd, tf); + } + + if(df || rf) + { + if(delay > 3) + { + fprintf(stderr,"Delay value (%d) out of range, possible values are 0..3!\n",delay); + exit(1); + } + if(rate > 31) + { + fprintf(stderr,"Rate value (%d) out of range, possible values are 0..31!\n",rate); + exit(1); + } + settypeam(kbfd, delay, rate); + } + + if(mf) + { + remapkeys(kbfd, map); + } + + close(kbfd); + exit(0); +} + +/*---------------------------------------------------------------------------* + * display usage info & exit + *---------------------------------------------------------------------------*/ +usage() +{ + fprintf(stderr, "\nkcon: keyboard control and remapping utility for pcvt video driver\n"); + fprintf(stderr, "usage: [-R] [-d delay] [-l] [-m map] [-o] [-p] [-r rate] [-t +/-] [-x]\n"); + fprintf(stderr, " -R full reset of keyboard\n"); + fprintf(stderr, " -d delay until a key is repeated (range: 0...3 => 250...1000ms)\n"); + fprintf(stderr, " -l produce listing of current keyboard mapping\n"); + fprintf(stderr, " -m set keyboard remapping from a keycap entry\n"); + fprintf(stderr, " -o set octal output for listing\n"); + fprintf(stderr, " -p pure, don't display escape as 'ESC' for listing\n"); + fprintf(stderr, " -r chars/second repeat value (range: 0...31 => 30...2 chars/sec)\n"); + fprintf(stderr, " -s show, display the current keyboard typematic values\n"); + fprintf(stderr, " -t switch repeat on(+) or off(-)\n"); + fprintf(stderr, " -x set hexadecimal output for listing\n\n"); + exit(1); +} + +/*---------------------------------------------------------------------------* + * convert control char in string to printable values + *---------------------------------------------------------------------------*/ +char *showcntrl(s) +u_char *s; +{ + static char res_str[80]; + static char conv_buf[80]; + int i; + + res_str[0] = '\0'; + + for(i = 0; s[i]; i++) + { + if(((s[i] > 0x20) && (s[i] <= 0x7e)) || ((s[i] >= 0xa0) && (s[i] <= 0xff))) + { + conv_buf[0] = s[i]; + conv_buf[1] = '\0'; + } + else if((s[i] == 0x1b) && (pf == 0)) + { + strcpy(conv_buf,"ESC "); + } + else if(of) + { + sprintf(conv_buf,"\\%03.3o ", s[i]); + } + else + { + sprintf(conv_buf,"0x%02.2X ", s[i]); + } + strcat(res_str, conv_buf); + } + return(res_str); +} + +/*---------------------------------------------------------------------------* + * list the current keyboard mapping + *---------------------------------------------------------------------------*/ +listcurrent(kbfd) +int kbfd; +{ + static char *keytypetab[] = { + "NONE ", + "SHIFT ", + "ALT/META ", + "NUMLOCK ", + "CONTROL ", + "CAPSLOCK ", + "ASCII ", + "SCROLL ", + "FUNCTION ", + "KEYPAD ", + "BREAK ", + "ALTGR ", + "SHIFTLOCK", + "CURSOR ", + "RETURN " + }; + + struct kbd_ovlkey keyboardmap[KBDMAXKEYS]; + struct kbd_ovlkey *kbmapp; + int keytype; + int altgr_defined; + int i; + + altgr_defined = 0; + kbmapp = keyboardmap; + + for (i = 0; i < KBDMAXKEYS; i++) + { + kbmapp->keynum = i; + + if(ioctl(kbfd, KBDGCKEY, kbmapp) < 0) + { + perror("kcon: ioctl KBDGCKEY failed"); + exit(1); + } + + if((kbmapp->type & KBD_MASK) == KBD_ALTGR) + altgr_defined = i; + + kbmapp++; + } + + if(altgr_defined) + { + printf("S Key KeyType Normal Shift Control Altgr \n"); + printf("- --- --------- --------------- --------------- --------------- ---------------\n"); + } + else + { + printf("S Key KeyType Normal Shift Control \n"); + printf("- --- --------- --------------- --------------- ---------------\n"); + } + + kbmapp = &keyboardmap[1]; + + for(i = 1; i < KBDMAXKEYS; i++) + { + keytype = kbmapp->type; + + if(keytype) + { + if(keytype & KBD_OVERLOAD) + printf("! %3.3d %9.9s ", i, keytypetab[keytype & KBD_MASK]); + else + printf("- %3.3d %9.9s ", i, keytypetab[keytype & KBD_MASK]); + + switch(keytype & KBD_MASK) + { + + case KBD_NUM: + case KBD_ASCII: + case KBD_FUNC: + case KBD_KP: + case KBD_CURSOR: + case KBD_RETURN: /* ??? */ + + if(kbmapp->subu == KBD_SUBT_STR) + printf("%-15s ",showcntrl(kbmapp->unshift)); + else + printf("Function() "); + + if(kbmapp->subs == KBD_SUBT_STR) + printf("%-15s ",showcntrl(kbmapp->shift)); + else + printf("Function() "); + + if(kbmapp->subc == KBD_SUBT_STR) + printf("%-15s ",showcntrl(kbmapp->ctrl)); + else + printf("Function() "); + + if(altgr_defined) + { + if(kbmapp->suba == KBD_SUBT_STR) + printf("%-15s ",showcntrl(kbmapp->altgr)); + else + printf("Function() "); + } + break; + } + putchar('\n'); + } + kbmapp++; + } +} + +/*---------------------------------------------------------------------------* + * show delay and rate values for keyboard + *---------------------------------------------------------------------------*/ +showtypeamatic(kbfd) +int kbfd; +{ + static char *delaytab[] = { + "250", + "500", + "750", + "1000" + }; + + static char *ratetab[] = { + "30.0", + "26.7", + "24.0", + "21.8", + "20.0", + "18.5", + "17.1", + "16.0", + "15.0", + "13.3", + "12.0", + "10.9", + "10.0", + "9.2", + "8.6", + "8.0", + "7.5", + "6.7", + "6.0", + "5.5", + "5.0", + "4.6", + "4.3", + "4.0", + "3.7", + "3.3", + "3.0", + "2.7", + "2.5", + "2.3", + "2.1", + "2.0" + }; + + int cur_typemat_val; + int delay, rate; + + if((ioctl(kbfd, KBDGTPMAT, &cur_typemat_val)) < 0) + { + perror("kcon: ioctl KBDGTPMAT failed"); + exit(1); + } + + delay = ((cur_typemat_val & 0x60) >> 5); + rate = cur_typemat_val & 0x1f; + + printf("\nDisplaying the current keyboard typematic values:\n\n"); + printf("The delay-until-repeat time is [ %s ] milliseconds\n",delaytab[delay]); + printf("The repeat-rate is [ %s ] characters per second\n\n",ratetab[rate]); +} + +/*---------------------------------------------------------------------------* + * set repeat feature on/off + *---------------------------------------------------------------------------*/ +setrepeat(kbfd, tf) +int kbfd; +int tf; +{ + int srepsw_val; + + if(tf == 1) + srepsw_val = KBD_REPEATON; + else + srepsw_val = KBD_REPEATOFF; + + if(ioctl(kbfd, KBDSREPSW, &srepsw_val) < 0) + { + perror("kcon: ioctl KBDREPSW failed"); + exit(1); + } +} + +/*---------------------------------------------------------------------------* + * set delay and rate values for keyboard + *---------------------------------------------------------------------------*/ +settypeam(kbfd, delay, rate) +int kbfd; +int delay; +int rate; +{ + int cur_typemat_val; + int new_typemat_val; + + if((ioctl(kbfd, KBDGTPMAT, &cur_typemat_val)) < 0) + { + perror("kcon: ioctl KBDGTPMAT failed"); + exit(1); + } + + if(delay == -1) + delay = (cur_typemat_val & 0x60); + else + delay = ((delay << 5) & 0x60); + + if(rate == -1) + rate = (cur_typemat_val & 0x1f); + else + rate &= 0x1f; + + new_typemat_val = delay | rate; + + if((ioctl(kbfd, KBDSTPMAT, &new_typemat_val)) < 0) + { + perror("kcon: ioctl KBDSTPMAT failed"); + exit(1); + } +} + +/*---------------------------------------------------------------------------* + * remap keyboard from keycap entry + *---------------------------------------------------------------------------*/ +remapkeys(kbfd, map) +int kbfd; +char *map; +{ + char cap_entry[1024]; + int ret; + char keyflag[128]; + int i; + + /* try to find the entry */ + + ret = kgetent(cap_entry, map); + + if(ret == -1) + { + fprintf(stderr, "kcon: keycap database not found or not accessible!\n"); + exit(1); + } + else if(ret == 0) + { + fprintf(stderr, "kcon: keycap entry [%s] not found in database!\n", map); + exit(1); + } + + /* set default mapping */ + + if((ioctl(kbfd, KBDDEFAULT)) < 0) + { + perror("kcon: ioctl KBDDEFAULT failed"); + exit(1); + } + + /* DE flag present? */ + + if(kgetflag("de")) + return; + + for(i = 0; i < KBDMAXKEYS; i++) + keyflag[i] = 0; + + set_lock(keyflag, kbfd); + + set_shift(keyflag, kbfd); + + set_char(keyflag, kbfd); +} + +/*---------------------------------------------------------------------------* + * care for lock keys + *---------------------------------------------------------------------------*/ +set_lock(keyflag, kbfd) +char keyflag[]; +int kbfd; +{ + int i, j; + char cap[16]; + struct kbd_ovlkey entry; + + struct { + char *ch; + u_short typ; + } lock[] = + { + "ca", KBD_CAPS, + "sh", KBD_SHFTLOCK, + "nl", KBD_NUMLOCK, + "sc", KBD_SCROLL + }; + + + for(i = 0; i < 4; i++) + { + int n; + + sprintf(cap, "%s", lock[i].ch); + + n = kgetnum(cap); + + if(n > 0) + { + if (keyflag[n]) + { + fprintf(stderr,"kcon: duplicate key definition for key [%d]!\n",n); + exit(1); + } + keyflag[n] = 1; + + entry.keynum = n; + entry.type = lock[i].typ; + + if((ioctl(kbfd, KBDSCKEY, &entry)) < 0) + { + perror("kcon: ioctl KBDSCKEY failed"); + exit(1); + } + } + } +} + +/*---------------------------------------------------------------------------* + * care for shifting keys + *---------------------------------------------------------------------------*/ +set_shift(keyflag, kbfd) +char keyflag[]; +int kbfd; +{ + int i, j; + char cap[16]; + struct kbd_ovlkey entry; + + struct { + char ch; + u_short typ; + } shift[] = + { + 'm', KBD_META, + 'l', KBD_ALTGR, + 'h', KBD_SHIFT, + 't', KBD_CTL + }; + + for(i = 0; i < 4; i++) + { + for(j = 1; j < 10; j++) + { + int n; + + sprintf(cap, "%c%d", shift[i].ch,j); + + n = kgetnum(cap); + + if (n >= 0) + { + if (keyflag[n]) + { + fprintf(stderr,"kcon: duplicate key definition for key [%d]!\n",n); + exit(1); + } + keyflag[n] = 1; + + entry.keynum = n; + entry.type = shift[i].typ; + if((ioctl(kbfd, KBDSCKEY, &entry)) < 0) + { + perror("kcon: ioctl KBDSCKEY failed"); + exit(1); + } + } + } + } +} + +/*---------------------------------------------------------------------------* + * care for normal keys + *---------------------------------------------------------------------------*/ +set_char(keyflag, kbfd) +char keyflag[]; +int kbfd; +{ + int i, j; + char cap[16]; + int setflag; + char *addr_str; + char *new_str; + struct kbd_ovlkey entry; + + struct { + char *addr; + char ch; + } standard[] = { + 0, 'D', + &entry.unshift[0], 'K', + &entry.shift[0], 'S', + &entry.ctrl[0], 'C', + &entry.altgr[0], 'A' + }; + + for(i = 1; i < KBDMAXKEYS; i++) + { + setflag = 0; + + entry.keynum = i; + + if((ioctl(kbfd, KBDGOKEY, &entry)) < 0) + { + perror("kcon: ioctl KBDGOKEY failed"); + exit(1); + } + + entry.type = KBD_ASCII; + + for(j = 0; j < 5; j++) + { + sprintf(cap, "%c%d", standard[j].ch,i); + + if((j == 0) && (kgetflag(cap))) + { + /* delete a key */ + + entry.type = KBD_NONE; + setflag = 1; + goto setit; + + } + else + { + addr_str = standard[j].addr; + if(new_str = kgetstr(cap, &addr_str)) + { + if(strlen(new_str) > KBDMAXOVLKEYSIZE) + { + fprintf(stderr, "kcon: database entry string [%s] longer than max [%d]!\n",new_str,KBDMAXOVLKEYSIZE); + exit(1); + } + setflag = 1; + } + } + } + +setit: if (setflag) + { + if (keyflag[i]) + { + fprintf(stderr,"kcon: duplicate key definition for key [%d]!\n",i); + exit(1); + } + keyflag[i] = 1; + + if((ioctl(kbfd, KBDSCKEY, &entry)) < 0) + { + perror("kcon: ioctl KBDSCKEY failed"); + exit(1); + } + } + } +} + +/*------------------- EOF ------------------------------------------------*/ diff --git a/usr.sbin/pcvt/keycap/Makefile b/usr.sbin/pcvt/keycap/Makefile new file mode 100644 index 0000000..e151ab9 --- /dev/null +++ b/usr.sbin/pcvt/keycap/Makefile @@ -0,0 +1,32 @@ + +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +LIB = keycap +CAPDIR = /usr/share/misc +CAPPATH = $(CAPDIR)/keycap.pcvt +KEYCAPSRC= keycap.src +CFLAGS += -DKEYCAP_PATH=\"$(CAPPATH)\" +SRCS = keycap.c +MAN3 = keycap.${MAN3EXT} +MAN5 = man5/keycap.${MAN5EXT} +#CLEANFILES+= keycap.0 man5/keycap.0 + +beforeinstall: + @if [ ! -d ${LIBDIR} ]; then mkdir ${LIBDIR};fi + @echo "Saving old keycap database" + -mv -f ${CAPPATH} ${CAPPATH}.BAK + install -c -m ${LIBMODE} -o ${LIBOWN} -g ${LIBGRP} \ + ${.CURDIR}/${KEYCAPSRC} ${CAPPATH} + +.include <bsd.lib.mk> + +.endif diff --git a/usr.sbin/pcvt/keycap/keycap.3 b/usr.sbin/pcvt/keycap/keycap.3 new file mode 100644 index 0000000..7eb59dc --- /dev/null +++ b/usr.sbin/pcvt/keycap/keycap.3 @@ -0,0 +1,121 @@ +.\" +.\" Copyright (c) 1992,1993,1994 Hellmuth Michaelis +.\" +.\" Copyright (c) 1990 The Regents of the University of California. +.\" +.\" All rights reserved. +.\" +.\" Redistribution and use in source and binary forms, with or without +.\" modification, are permitted provided that the following conditions +.\" are met: +.\" 1. Redistributions of source code must retain the above copyright +.\" notice, this list of conditions and the following disclaimer. +.\" 2. Redistributions in binary form must reproduce the above copyright +.\" notice, this list of conditions and the following disclaimer in the +.\" documentation and/or other materials provided with the distribution. +.\" 3. All advertising materials mentioning features or use of this software +.\" must display the following acknowledgement: +.\" This product includes software developed by the University of +.\" California, Berkeley and its contributors. +.\" 4. Neither the name of the University nor the names of its contributors +.\" may be used to endorse or promote products derived from this software +.\" without specific prior written permission. +.\" +.\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND +.\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE +.\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE +.\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE +.\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL +.\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS +.\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) +.\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT +.\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY +.\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF +.\" SUCH DAMAGE. +.\" +.\" @(#)keycap.3, 3.00, Last Edit-Date: [Sun Jan 2 13:46:43 1994] +.\" +.Dd January 3, 1993 +.Dt KEYCAP 3 +.Sh NAME +.Nm kgetent , +.Nm kgetnum , +.Nm kgetflag , +.Nm kgetstr +.Nd routines for accessing the keycap database +.Sh SYNOPSIS +.Fn kgetent "char *bp" "char *name" +.Fn kgetnum "char *id" +.Fn kgetflag "char *id" +.Ft char * +.Fn kgetstr "char *id" "char *area" +.Sh DESCRIPTION +These functions extract and use capabilities from a keyboard capability data +base, usually +.Pa /usr/share/misc/keycap , +the format of which is described in +.Xr keycap 5 . +.Pp +The +.Fn kgetent +function +extracts the entry for keyboard mapping +.Fa name +into the buffer at +.Fa bp . +The +.Fa bp +argument +should be a character buffer of size +1024 and must be retained through all subsequent calls to +.Fn kgetnum , +.Fn kgetflag , +and +.Fn kgetstr . +The +.Fn kgetent +function +returns \-1 if none of the +.Nm keycap +data base files could be opened, +0 if the map name given does not have an entry, +and 1 if all goes well. +.Pp +The +.Fn kgetnum +function +gets the numeric value of capability +.Fa id , +returning \-1 if is not given for the map. +.Pp +The +.Fn kgetflag +function +returns 1 if the specified capability is present in +the map's entry, 0 if it is not. +.Pp +The +.Fn kgetstr +function +returns the string value of the capability +.Fa id , +places it in the buffer at +.Fa area , +and advances the +.Fa area +pointer. +The +.Fn kgetstr +function +returns +.Dv NULL +if the capability was not found. +.Pp +.Sh FILES +.Bl -tag -width /usr/share/misc/keycap -compact +.It Pa /usr/share/misc/keycap +Keyboard capabilities database (if nothing else chosen during installation). +.El +.Sh SEE ALSO +.Xr kcon 1 , +.Xr keycap 5 diff --git a/usr.sbin/pcvt/keycap/keycap.c b/usr.sbin/pcvt/keycap/keycap.c new file mode 100644 index 0000000..f70e987 --- /dev/null +++ b/usr.sbin/pcvt/keycap/keycap.c @@ -0,0 +1,377 @@ +/*- + * Copyright (c) 1992, 1993 The Regents of the University of California. + * All rights reserved. + * + * This code is derived from software contributed to Berkeley by + * Holger Veit + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + */ + +static char *id = + "@(#)keycap.c, 3.20, Last Edit-Date: [Tue Dec 20 14:51:50 1994]"; + +/*---------------------------------------------------------------------------* + * + * keycap.c Keyboard capabilities database handling + * ------------------------------------------------------- + * + * converted from printcap by Holger Veit (veit@du9ds3.uni-duisburg.de) + * + * BUG: Should use a "last" pointer in tbuf, so that searching + * for capabilities alphabetically would not be a n**2/2 + * process when large numbers of capabilities are given. + * + * Note: If we add a last pointer now we will screw up the + * tc capability. We really should compile termcap. + * + * modified by Hellmuth Michaelis (hm@hcshh.hcs.de) to fit into the + * vt220 driver pcvt 2.0 distribution + * + * -hm header conversion & cosmetic changes for pcvt 2.0 distribution + * -hm debugging remapping + * -hm cleaning up from termcap .... + * -hm split off header file keycap.h + * + *---------------------------------------------------------------------------*/ + +#include <stdio.h> +#include <ctype.h> + +#include "keycap.h" + +#define KEYCAP_BUFSIZ 1024 + +#define MAXHOP 32 /* max number of tc= indirections */ + +char *getenv(); + +static FILE *pfp = NULL; /* keycap data base file pointer */ +static char *tbuf; +static int hopcount; /* detect infinite loops in keycap, init 0 */ + +static int knchktc(); +static int knamatch(); +static char *kdecode(); + +/*---------------------------------------------------------------------------* + * match a name + *---------------------------------------------------------------------------*/ +static char *nmatch(id,cstr) +char *id,*cstr; +{ + register n = strlen(id); + register char *c = cstr+n; + + if (strncmp(id,cstr,n)==0 && + (*c==':' || *c=='|' || *c=='=' || *c=='#') || *c=='@') + return c; + return 0; +} + +/*---------------------------------------------------------------------------* + * Get an entry for keyboard name in buffer bp from the keycap file. + * Parse is very rudimentary, we just notice escaped newlines. + *---------------------------------------------------------------------------*/ +kgetent(bp, name) +char *bp, *name; +{ + register char *cp; + register int c; + register int i = 0, cnt = 0; + char ibuf[KEYCAP_BUFSIZ]; + char *cp2; + int tf; + + tbuf = bp; + tf = 0; + + tf = open(KEYCAP_PATH, 0); + + if (tf < 0) + return (-1); + for (;;) { + cp = bp; + for (;;) { + if (i == cnt) { + cnt = read(tf, ibuf, KEYCAP_BUFSIZ); + if (cnt <= 0) { + close(tf); + return (0); + } + i = 0; + } + c = ibuf[i++]; + if (c == '\n') { + if (cp > bp && cp[-1] == '\\'){ + cp--; + continue; + } + break; + } + if (cp >= bp+KEYCAP_BUFSIZ) { + write(2,"Keycap entry too long\n", 23); + break; + } else + *cp++ = c; + } + *cp = 0; + + /* + * The real work for the match. + */ + if (knamatch(name)) { + close(tf); + return(knchktc()); + } + } +} + +/*---------------------------------------------------------------------------* + * knchktc: check the last entry, see if it's tc=xxx. If so, recursively + * find xxx and append that entry (minus the names) to take the place of + * the tc=xxx entry. Note that this works because of the left to right scan. + *---------------------------------------------------------------------------*/ +static int knchktc() +{ + register char *p, *q; + char tcname[16]; /* name of similar keyboard */ + char tcbuf[KEYCAP_BUFSIZ]; + char *holdtbuf = tbuf; + int l; + + p = tbuf + strlen(tbuf) - 2; /* before the last colon */ + while (*--p != ':') + if (p<tbuf) { + write(2, "Bad keycap entry\n", 18); + return (0); + } + p++; + /* p now points to beginning of last field */ + if (p[0] != 't' || p[1] != 'c') + return(1); + strcpy(tcname,p+3); + q = tcname; + while (q && *q != ':') + q++; + *q = 0; + if (++hopcount > MAXHOP) { + write(2, "Infinite tc= loop\n", 18); + return (0); + } + if (kgetent(tcbuf, tcname) != 1) + return(0); + for (q=tcbuf; *q != ':'; q++) + ; + l = p - holdtbuf + strlen(q); + if (l > KEYCAP_BUFSIZ) { + write(2, "Keycap entry too long\n", 23); + q[KEYCAP_BUFSIZ - (p-tbuf)] = 0; + } + strcpy(p, q+1); + tbuf = holdtbuf; + return(1); +} + +/*---------------------------------------------------------------------------* + * knamatch deals with name matching. The first field of the keycap entry + * is a sequence of names separated by |'s, so we compare against each such + * name. The normal : terminator after the last name (before the first field) + * stops us. + *---------------------------------------------------------------------------*/ +static int knamatch(np) +char *np; +{ + register char *Np, *Bp; + + Bp = tbuf; + if (*Bp == '#' || *Bp == 0) + return(0); + for (;;) { + for (Np = np; *Np && *Bp == *Np; Bp++, Np++) + continue; + if (*Np == 0 && (*Bp == '|' || *Bp == ':' || *Bp == 0)) + return (1); + while (*Bp && *Bp != ':' && *Bp != '|') + Bp++; + if (*Bp == 0 || *Bp == ':') + return (0); + Bp++; + } +} + +/*---------------------------------------------------------------------------* + * Skip to the next field. Notice that this is very dumb, not knowing about + * \: escapes or any such. If necessary, :'s can be put into the keycap file + * in octal. + *---------------------------------------------------------------------------*/ +static char *kskip(bp) +char *bp; +{ + while (*bp && *bp != ':') + bp++; + if (*bp == ':') + bp++; + return (bp); +} + +/*---------------------------------------------------------------------------* + * Return the (numeric) option id. Numeric options look like 'li#80' i.e. + * the option string is separated from the numeric value by a # character. + * If the option is not found we return -1. Note that we handle octal + * numbers beginning with 0. + *---------------------------------------------------------------------------*/ +int kgetnum(id) +char *id; +{ + register int i, base; + register char *bp = tbuf,*xp; + + for (;;) { + bp = kskip(bp); + if (*bp == 0) + return (-1); + if ((xp=nmatch(id,bp)) == 0) + continue; + bp = xp; /* we have an entry */ + if (*bp == '@') + return(-1); + if (*bp != '#') + continue; + bp++; + base = 10; + if (*bp == '0') + base = 8; + i = 0; + while (isdigit(*bp)) + i *= base, i += *bp++ - '0'; + return (i); + } +} + +/*---------------------------------------------------------------------------* + * Handle a flag option. Flag options are given "naked", i.e. followed by + * a : or the end of the buffer. Return 1 if we find the option, or 0 if + * it is not given. + *---------------------------------------------------------------------------*/ +int kgetflag(id) +char *id; +{ + register char *bp = tbuf,*xp; + + for (;;) { + bp = kskip(bp); + if (!*bp) + return (0); + if ((xp=nmatch(id,bp)) != 0) { + bp = xp; + if (!*bp || *bp == ':') + return (1); + else if (*bp == '@') + return(0); + } + } +} + +/*---------------------------------------------------------------------------* + * Get a string valued option. These are given as 'cl=^Z'. Much decoding + * is done on the strings, and the strings are placed in area, which is a + * ref parameter which is updated. No checking on area overflow. + *---------------------------------------------------------------------------*/ +char *kgetstr(id, area) +char *id; +char **area; +{ + register char *bp = tbuf,*xp; + + for (;;) { + bp = kskip(bp); + if (!*bp) + return (0); + if ((xp = nmatch(id,bp)) == 0) + continue; + bp = xp; + if (*bp == '@') + return(0); + if (*bp != '=') + continue; + bp++; + return (kdecode(bp, area)); + } +} + +/*---------------------------------------------------------------------------* + * kdecode does the grung work to decode the string capability escapes. + *---------------------------------------------------------------------------*/ +static char *kdecode(str, area) +char *str; +char **area; +{ + register char *cp; + register int c; + register char *dp; + int i; + + cp = *area; + while ((c = *str++) && c != ':') { + switch (c) { + + case '^': + c = *str++ & 037; + break; + + case '\\': + dp = "E\033^^\\\\::n\nr\rt\tb\bf\f"; + c = *str++; +nextc: + if (*dp++ == c) { + c = *dp++; + break; + } + dp++; + if (*dp) + goto nextc; + if (isdigit(c)) { + c -= '0', i = 2; + do + c <<= 3, c |= *str++ - '0'; + while (--i && isdigit(*str)); + } + break; + } + *cp++ = c; + } + *cp++ = 0; + str = *area; + *area = cp; + return (str); +} + +/*-------------------------------- EOF --------------------------------------*/ diff --git a/usr.sbin/pcvt/keycap/keycap.h b/usr.sbin/pcvt/keycap/keycap.h new file mode 100644 index 0000000..1dc4c3e --- /dev/null +++ b/usr.sbin/pcvt/keycap/keycap.h @@ -0,0 +1,49 @@ +/*- + * Copyright (c) 1992, 1993 The Regents of the University of California. + * All rights reserved. + * + * This code is derived from software contributed to Berkeley by + * Holger Veit + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * @(#)keycap.h, 3.20, Last Edit-Date: [Tue Dec 20 14:52:11 1994] + */ + +#ifndef _KEYCAP_H_ +#define _KEYCAP_H_ + +int kgetent( char*, char* ); +int kgetnum( char* ); +int kgetflag( char* ); +char *kgetstr( char*, char** ); + +#endif /* _KEYCAP_H_ */ + +/*-------------------------------- EOF -------------------------------------*/ diff --git a/usr.sbin/pcvt/keycap/keycap.src b/usr.sbin/pcvt/keycap/keycap.src new file mode 100644 index 0000000..14ceade --- /dev/null +++ b/usr.sbin/pcvt/keycap/keycap.src @@ -0,0 +1,612 @@ +# Copyright (c) 1992, 1993, 1994 Hellmuth Michaelis, Joerg Wunsch and +# Holger Veit. +# +# All rights reserved. +# +# Redistribution and use in source and binary forms, with or without +# modification, are permitted provided that the following conditions +# are met: +# 1. Redistributions of source code must retain the above copyright +# notice, this list of conditions and the following disclaimer. +# 2. Redistributions in binary form must reproduce the above copyright +# notice, this list of conditions and the following disclaimer in the +# documentation and/or other materials provided with the distribution. +# 3. All advertising materials mentioning features or use of this software +# must display the following acknowledgement: +# This product includes software developed by Hellmuth Michaelis, +# Joerg Wunsch and Holger Veit. +# 4. The names of the Authors may not be used to endorse or promote +# products derived from this software without specific prior written +# permission. +# +# THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND +# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE +# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE +# ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE +# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL +# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS +# OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) +# HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT +# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY +# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF +# SUCH DAMAGE. +# +# @(#)keycap.src, 3.20, Last Edit-Date: [Tue Jan 17 19:35:09 1995] +# +#--------------------------------------------------------------------------- +# +# keyboard mappings for vt220 emulator pcvt 3.00 +# ---------------------------------------------- +# +# DEC MCS and/or ISO-Latin-1 Characterset used +# +# MF II Keyboards fully supported +# AT Keyboards lack a ALTGR Key, so they cannot be handled by +# the current driver implementation .... sorry +# +# If you design a new entry for national keyboards, please +# send it to hm@hcshh.hcs.de, thank you ! +# +# Many entries are taken from the 386BSD patchkit 0.2.4 codrv +# +#--------------------------------------------------------------------------- +# +# -hm patch from Thomas Gellekum +# +#--------------------------------------------------------------------------- + +df|default|default entry:\ + :de: + +tt|test|Test entry which swaps y and z:\ + :K22=z:S22=Z:C22=\032:\ + :K46=y:S46=Y:C46=\031: + +# from codrv, untested +be|belgium|Belgian mapping:\ + :K1=\262:S1=\263:\ + :K2=&:S2=1:A2=|:\ + :K3=\351:S3=2:A3=@:\ + :K4=":S4=3:A4=#:\ + :K5=':S5=4:\ + :K6=(:S6=5:\ + :K7=\247:S7=6:A7=\136:\ + :K8=\350:S8=7:\ + :K9=!:S9=8:\ + :K10=\347:S10=9:A10={:\ + :K11=\340:S11=0:A11=}:\ + :K12=):S12=\260:\ + :K13=-:S13=_:\ + :K17=a:S17=A:C17=^A:\ + :K18=z:S18=Z:C18=^z:\ + :K27=\136:S27=\250:A27=[:p1#27:\ + :K28=$:S28=*:A28=]:\ + :K31=q:S31=Q:C31=^q:\ + :K40=m:S40=M:C40=^m:\ + :K41=\371:S41=%:A41=':p2#41:\ + :K42=\265:S42=\243:A42=\264:p3#42:\ + :K45=<:S45=>:A45=\\:\ + :K46=w:S46=W:C46=^w:\ + :K52=,:S52=\077:\ + :K53=;:S53=.:\ + :K54=\072:S54=/:\ + :K55==:S55=+:A55=~:\ + :l1#62:a0: + +# from codrv, untested +ca|canadafr|Canadian French mapping:\ + :K1=#:S1=|:A1=\\:\ + :A2=\261:S3=":A3=@:S4=/:A4=\243:A5=\242:\ + :A6=\244:S7=\077:A7=\254:S8=&:A8=\246:S9=*:A9=\262:\ + :S10=(:A10=\263:S11=):A11=\274:\ + :K12=-:S12=_:A12=\275:\ + :K13==:S13=+:A13=\276:\ + :A25=\247:A26=\266:\ + :K27=\136:S27=\136:A27=[:\ + :K28=\270:S28=\250:A28=]:p1#28:\ + :A40=~:K41=`:S41=`:A41={:\ + :K42=<:S42=>:A42=}:\ + :K45=\253:S45=\273:A45=\260:\ + :A49=\253:A50=\273:A51=\260:\ + :A52=\265:K53=,:S53=,:A53=-:\ + :K54=\351:S54=\311:A54=':\ + :l1#62:a0: + +# from codrv, untested +c1|swissde|Swiss German mapping:\ + :K1=\247:S1=\260:p1#1:\ + :S2=+:A2=|:S3=":A3=@:S4=*:A4=#:S5=\347:S7=&:A7=\254:\ + :S8=/:A8=\246:S9=(:A9=\242:S10=):S11==:\ + :K12=`:S12=\077:A12=':p2#12:\ + :K13=^:S13=\\:A13=~:p3#13:\ + :K22=z:S22=Z:C22=\032:\ + :S27=\350:K27=\374:A27=[:\ + :K28=\250:S28=!:A28=]:\ + :S40=\351:K40=\366:\ + :S41=\340:K41=\344:A41={:\ + :K42=$:S42=\243:A42=}:\ + :K45=<:S45=>:A45=\\:\ + :K46=y:S46=Y:C46=\031: + :S53=;:S54=\072:K55=-:S55=_:\ + :l1#62:a0: + +# from codrv, untested +c2|swissfr|Swiss French mapping:\ + :K27=\350:S27=\374:A27=[:\ + :K40=\351:S40=\366:\ + :K41=\340:S41=\344:A41={:\ + :tc=swissde: + +# more programmer-like than an original German kbd, you needn't +# have gum-fingers to get `{}' and the like:-) +# maps: ae -> [, oe -> \, ue -> ], Ae -> {, Oe -> |, Ue -> } +# umlaute are available as AltGr- and Control-Mappings +# also maps Pause -> ^Z +# +# (from Joerg Wunsch) +# +# l1/m1 bindings: left Alt is AltGr +# Emacs functions: +# C79/C89: ctrl-{leftarrow,rightarrow} {backward,forward} word +# A79/A89: {backward,forward} sexp +# C83/C84: ctrl-{uparrow,downarrow} {backward,forward} window +# +de-prog|germany-prog|programmer's mapping for german keyboard:\ + :K27=]:S27=}:A27=\374:C27=\334:\ + :K40=\\:S40=|:A40=\366:C40=\326:\ + :K41=[:S41={:A41=\344:C41=\304:\ + :K126=\032:C126=\003:\ + :tc=de: +# :l1#60:l2#62:\ +# :C79=^[B:K79=^[[D:S79=^[OD:A79=^[^B:\ +# :C89=^[F:K89=^[[C:S89=^[OC:A89=^[^F:\ +# :C83=^U-1^XO:K83=^[[A:S84=^[OA:\ +# :C84=^XO:K84=^[[B:S84=^[OB:\ + +de|germany|German mapping for MF II-Keyboard:\ + :K1=\136:S1=\260:\ + :S3=\042:S4=\247:S7=&:S8=/:S9=(:S10=):S11=\075:\ + :A3=\262:A4=\263:A8={:A9=[:A10=]:A11=}:A12=\134:\ + :K12=\337:S12=?:C12=\034:\ + :K13=':S13=`:\ + :A17=\100:\ + :K22=z:S22=Z:C22=\032:\ + :K27=\374:S27=\334:\ + :K28=+:S28=*:A28=\176:\ + :K29=\043:S29=':A29=\174:\ + :K40=\366:S40=\326:\ + :K41=\344:S41=\304:\ + :A45=\174:\ + :K46=y:S46=Y:C46=\031:\ + :A52=\265:\ + :S53=;:S54=\072:\ + :K55=-:S55=_:\ + :l1#62: + +de-at|germany-at|German mapping for AT-Keyboard:\ + :K1=<:S1=>:\ + :S3=\042:\ + :S4=\247:\ + :S7=&:\ + :S8=/:\ + :S9=(:\ + :S10=):\ + :S11=\075:\ + :K12=\337:S12=?:C12=\034:\ + :K13=':S13=`:\ + :K14=#:S14=\136:\ + :K22=z:S22=Z:C22=\032:\ + :K27=\374:S27=\334:\ + :K28=+:S28=*:\ + :K29=\043:S29=':\ + :K40=\366:S40=\326:\ + :K41=\344:S41=\304:\ + :K46=y:S46=Y:C46=\031:\ + :S53=;:S54=\072:\ + :K55=-:S55=_:\ + +# from codrv, untested +# Includes improvements by Thomas Hiller (hiller@fzi.de) +# and Andreas Israel (ai@hrz.tu-chemnitz.de) +de-hi|germany-hiller|yet another German mapping:\ + :K1=\136:S1=\260:C1=|:\ + :S3=\042:S4=#:S7=&:S8=/:S9=(:S10=):S11=\075:\ + :A8={:A9=[:A10=]:A11=}:A17=@:A28=~:\ + :K12=\337:S12=\077:C12=\036:A12=\\:\ + :K13=':S13=`:C13=\134:p1#13:\ + :K22=z:S22=Z:C22=\032:\ + :K27=\374:S27=\334:C27=\035:\ + :K28=+:S28=*:C28=\000:\ + :K29=<:S29=>:C29=\134:\ + :K40=\366:S40=\326:C40=\034:\ + :K41=\344:S41=\304:C41=\033:\ + :K46=y:S46=Y:C46=\031:\ + :S53=;:S54=\072:\ + :K55=-:S55=_:\ + :l1#62:a0: + +# from codrv, untested +# Contribution by Thomas Hiller (hiller@fzi.de) +# "K42 may not work on 102 keys kbds, K29 seems to work" +d1|de-102|german with mf2:\ + :K29=#:\ + :K42=#:\ + :K45=<:S45=>:A45=|:\ + :tc=germany: + +# from codrv, untested +hv|holgi|Holgi's special MF1 keyboard mapping:\ + :K1=<:S1=>:C1=|:\ + :K29=#:S29=\136:A29=\\:C29=~:\ + :tc=germany: + +# from codrv, untested +# Contributed by Andreas Israel (ai@hrz.tu-chemnitz.de) +de-ai|nixmf2|ct22|nix|nix7|German Nixdorf MF2:\ + :A28=~:\ + :K29=#:S29=':\ + :K45=<:S45=>:A45=|:\ + :tc=germany: + +# from codrv, untested +dk|denmark|Danish mapping:\ + :K1=\275:S1=\247:\ + :S3=":A3=@:\ + :A4=\243:\ + :S5=\244:A5=$:\ + :S7=&:S8=/:A8={:S9=(:A9=[:S10=):A10=]:S11==:A11=}:\ + :K12=+:S12=\077:\ + :K13=':S13=`:A13=|:p1#13:\ + :K27=\345:S27=\305:\ + :K28=\250:S28=\136:A28=~:p2#28:\ + :K40=\346:S40=\306:\ + :K41=\370:S41=\330:\ + :K42=:S42=*:\ + :K45=<:S45=>:A45=\\:\ + :S53=;:S54=\072:\ + :K55=-:S55=_:\ + :l1#62:a0: + +# from codrv, untested +# Finnish keyboard map with 7-bit versions of the national +# chars. The Latin1 chars are available with Alt-7, Alt-8, etc +# (where normally you would have the 7-bit ones). +# Makes C/C++ programming more comfortable, since the 7-bit chars +# (|\{[}]) are needed much more often than the Latin1 chars. +# -- Petri.Wessman@hut.fi +fi|finland|finland7b|finland-ascii|Finnish ASCII mapping:\ + :l1#60:l2#62:\ + :A8=\344:A9=\304:A10=\305:A11=\345:A12=\326:A13=\366:\ + :K40=|:S40=\\:K41={:S41=[:K27=}:S27=]:\ + :S1=\275:K1=\247:\ + :S3=":A3=@:\ + :A4=\243:\ + :S5=$:A5=$:\ + :S7=&:S8=/:S9=(:S10=):S11==:\ + :K12=+:S12=\077:\ + :K13=':S13=`:\ + :K28=~:S28=\136:A28=~:\ + :K29=':S29=*:\ + :K45=<:S45=>:A45=|:\ + :S53=;:S54=\072:\ + :K55=-:S55=_:\ + :a0: + +# from codrv, untested +# Finnish keyboard map with the Latin1 national chars in +# their "right" place. --Petri.Wessman@hut.fi +f8|finland8b|finland-latin1|Finnish Latin1 mapping:\ + :A8={:A9=[:A10=]:A11=}:A12=\\:\ + :K40=\366:S40=\326:K41=\344:S41=\304:K27=\345:S27=\305:\ + :tc=finland: + + +# French keyboard mapping +# From Matthieu Herrb <matthieu@laas.fr> +# For 102 keys keyboards, produces 8 bits characters +# with ISO Latin-1 encoding +f8|france-iso-8859-1|French ISO 8859-1 102 keys keyboard:\ + :l1#62:\ + :K1=\262:S1=:\ + :K2=&:S2=1:\ + :K3=\351:S3=2:C3=\211:A3=~:\ + :K4=":S4=3:A4=#:\ + :K5=':S5=4:A5={:\ + :K6=(:S6=5:A6=[:\ + :K7=-:S7=6:C7=\036:A7=|:\ + :K8=\350:S8=7:C8=\210:A8=`:\ + :K9=_:S9=8:C9=\037:A9=\\:\ + :K10=\347:S10=9:C10=\207:A10=\136:\ + :K11=\340:S11=0:C11=\340:A11=@:\ + :K12=):S12=\260:A12=]:\ + :A13=}:\ + :K17=a:S17=A:C17=\001:\ + :K18=z:S18=Z:C18=\032:\ + :D27:\ + :K28=$:S28=\243:\ + :K29=*:S29=\265:\ + :K31=q:S31=Q:C31=\021:\ + :K40=m:S40=M:C40=\015;\ + :K41=\371:C41=\231:S41=%:\ + :K42=*:S42=\265:\ + :K46=w:S46=W:C46=\027:\ + :K52=,:S52=?:\ + :K53=;:S53=.:\ + :K54=\072:S54=/:C54=\037\ + :K55=!:S55=\266: + +# fr|france|French mapping:\ +# :de: +# +# from codrv, untested +# f1|france120|French 120 mapping:\ +# :tc=belgium: +# +# +# from codrv, untested +#f2|france189|French 189 mapping:\ +# :S1=:A1=':p3#1:\ +# :A2=:A3=~:A5={:A6=[:A7=|:A8=`:\ +# :S9=_:A9=\\:A10=\136:A11=@:A12=]:A13=}:\ +# :A27=:A28=\244:A41=:A42=:\ +# :A45=:!:S45=\247:\ +# :tc=belgium: + +# From: Andy Duplain, duplain@rtf.bt.co.uk +gb|greatbritain|British mapping for MF-2 keyboard:\ + :S1=|:S3=":C3=2:C12=-:S41=@:K42=#:S42=~:C42=#:K45=\\:S45=|:C45=\\: + +# from codrv, untested +# This entry has been corrected by Mike Trim (mtrim@crucible.demon.co.uk) +# (hv's comment: For the keys # and ~ you might also check the following +# line +# :K42=#:S42=~:\ +# Also I think I was wrong with the ALTGR key. If you need one, add this: +# :l1#62: +g1|greatbritain166|British 166 mapping:\ + :K1=`:S1=\254:A1=|:\ + :S3=":S4=\243:\ + :K41=':S41=@:\ + :K29=#:S29=~:\ + :K45=\\:S45=|: + +# from codrv, untested +g2|greatbritain168|British 168 mapping:\ + :K1=\\:S1=|:\ + :S3=":S4=\243:S7=&:S8=:S9=(:S10=):A10=\261:\ + :S11=#:A11=\260:S12=:K13=\254:S13=-:\ + :K27=@:S27=`:\ + :K28=[:S28={:A28=~:\ + :K40=;:S40=+:\ + :K41=\072:S41=*:A41=\136:\ + :K42=]:S42=}:\ + :K45=|:S45=_:\ + :A52=\265:\ + :l1#62:a0: + +# from codrv, untested +is:iceland:Island mapping:\ + :K1=\260:S1=\250:p1#1:\ + :S2=":S7=&:S8=/:A8={:S9=(:A9=[:S10=):A10=]:S11==:A11=}:\ + :K12=\\:S12=\326:\ + :K13=':S13=`:A13=|:\ + :A17=@:K27=\360:S27=\320:\ + :K28=':S28=\077:A28=~:\ + :K40=\346:S40=\306:\ + :K41=':S41=':A41=\136:p2#41:\ + :K42=+:S42=*:A42=`:p3#42:\ + :K45=<:S45=>:A45=|:\ + :S53=;:S54=\072:\ + :K54=\376:S54=\336:\ + :K104=,:104=,:\ + :l1#62:a0: + +# from codrv, untested +i1|italy141|Italian 141 mapping:\ + :K1=\\:S1=|:\ + :S3=":S4=\243:S7=&:S8=/:S9=(:S10=):S11==:\ + :K12=':S12=\077:\ + :K13=\354:S13=\136:\ + :K27=\350:S27=\351:\A27=[:\ + :K28=+:S28=*:A28=]:\ + :K40=\362:S40=\347:A40=@:\ + :K41=\340:S41=\260:A41=#:\ + :K42=\371:S42=\247:\ + :K45=<:S45=>:\ + :S53=;:S54=\072:\ + :K55=-:S55=_:\ + :l1#62:a0: + +# from codrv, untested +i2|italy142|Italian 142 mapping:\ + :A8={:A9=[:A10=]:A11=}:\ + :A17=@:A27=:A28=~:A40=:A41=:\ + :tc=italy141:a0: + +# from codrv, untested +nl|netherlands|Dutch mapping:\ + :K1=@:S1=\247:A1=\254:\ + :A2=\271:S3=":A3=\262:S4=#:A4=\263:A5=\274:A6=\275:S7=&:\ + :A7=\276:S8=_:A8=\243:S9=(:A9={:S10=):A10=}:S11=':\ + :K12=/:S12=\077:A12=\\:\ + :K13=\260:S13=~:A13=\270:p1#13:\ + :K20=\266:K27=\250:S27=^:p2#27:\ + :K28=*:S28=|:\ + :K40=+:S40=\261:\ + :K41=':S41=`:\ + :K42=<:S42=>:\ + :K45=[:S45=]:A45=|:\ + :S53=;:S54=\072:K55=-:S55=_:\ + :K104=,:S104=,:\ + :l1#62:a0: + +# from codrv, untested +no|norway|Norwegian mapping:\ + :K1=|:\ + :K13=\\:S13=`:A13=':p1#13:\ + :K41=\346:S41=\306:\ + :K40=\370:S40=\330:\ + :A45=:\ + :tc=denmark: + +# from codrv, untested +pt|portugal|Portugesian mapping:\ + :K1=\\:S1=|:\ + :S3=":A3=@:A4=\243:A5=\247:S7=&:S8=/:A8={:S9=(:A9=[:\ + :S10=):A10=]:S11=}:A11==:\ + :K12=':S12=\077:\ + :K13=\253:S13=\273:\ + :K40=\347:S40=\307:\ + :K41=\272:S41=\252:\ + :K42=~:S42=^:p1#42:\ + :K45=<:S45=>:\ + :S53=;:S54=\072:K55=-:S55=_:\ + :l1#62:a0: + +# from codrv, untested +es|spain|Spainish mapping:\ + :K1=\272:S1=\252:A1=\\:\ + :A2=|:S3=":A3=@:S4=:A4=#:S7=&:A7=\254:S8=/:S9=(:S10=):S11==:\ + :K12=':S12=\077:p1#12:\ + :K13=\277:S13=\241:\ + :K27=`:S27=^:A27=[:p2#27:\ + :K28=+:S28=*:A28=]:\ + :K40=\361:S41=\321:\ + :K41=/:S41=\250:A41={:p3#41:\ + :K42=\347:S42=\307:A42=}:\ + :K45=<:S45=>:\ + :S53=;:S54=\072:\ + :K55=-:S55=_:\ + :K104=,:S104=,:\ + :l1#62:a0: + +# from codrv, untested +# Contributed by Mats O Jansson, moj@stacken.kth.se +# "Here is my map, rather large, but i want ALTGR normaly to be dead. +# Only seven bit national characters have been placed where national characters +# is on the keyboard." +# We can help this man, just use the 'a0' capability -hv- +s1|sweden1|Swedish mapping:\ + :l1#62:a0:\ + :D1:\ + :K12=+:K13=':K29=':\ + :S2=!:S3=":S4=#:S5=$:S6=%:S7=&:S8=/:\ + :S9=(:S10=):S11=\075:S12=\077:S13=`:S29=*:\ + :C2=:C3=\000:C4=\033:C5=\034:C6=\035:C7=:C8=:C9=:\ + :C10=:C11=:C12=:C13=:C29=:\ + :A3=\100:A5=$:A8={:\ + :A9=[:A10=]:A11=}:A12=\134:\ + :K27=]:K28=:\ + :S27=}:S28=\136:\ + :C27=\035:C28=:\ + :A28=\176:\ + :K40=\134:K41=[:\ + :S40=|:S41={:\ + :C40=\034:C41=\033:\ + :K45=<:K53=,:K54=.:K55=-:\ + :S45=>:S53=;:S54=\072:S55=_:\ + :C45=\034:C53=:C54=:C55=:\ + :A45=|:\ + :C61=\000: + +# from codrv, untested +# Contributed by Mats O Jansson, moj@stacken.kth.se +# "Here is my map, rather large, but i want ALTGR normaly to be dead. +# Only seven bit national characters have been placed where national +# characters is on the keyboard." +# We can help this man, just use the 'a0' capability -hv- +# Corrected by Paul Pries, 5322@msg.abc.se (Some national shifts were +# wrong). +sa|sweden1a|Swedish 7bit mapping ISO 646:\ + :l1#62:a0:\ + :D1:\ + :K12=+:K13=':K29=':\ + :S2=!:S3=":S4=#:S5=$:S6=%:S7=&:S8=/:\ + :S9=(:S10=):S11=\075:S12=\077:S13=`:S29=*:\ + :C2=:C3=\000:C4=\033:C5=\034:C6=\035:C7=:C8=:C9=:\ + :C10=:C11=:C12=:C13=:C29=:\ + :A3=\100:A5=$:A8={:\ + :A9=[:A10=]:A11=}:A12=\134:\ + :K27=}:K28=:\ + :S27=]:S28=\136:\ + :C27=\035:C28=:\ + :A28=\176:\ + :S40=\134:S41=[:\ + :K40=|:K41={:\ + :C40=\034:C41=\033:\ + :K45=<:K53=,:K54=.:K55=-:\ + :S45=>:S53=;:S54=\072:S55=_:\ + :C45=\034:C53=:C54=:C55=:\ + :A45=|:\ + :C61=\000: + +# from codrv, untested +# Swedish keyboard map with national characters. +# Paul Pries, 5322@msg.abc.se +s2|sweden2|Swedish 8bit mapping ISO 8859-1:\ + :l1#62:\ + :K1=\247:S1=:\ + :K12=+:K13=':K29=':\ + :S2=!:S3=":S4=#:S5=$:S6=%:S7=&:S8=/:\ + :S9=(:S10=):S11=\075:S12=\077:S13=`:S29=*:\ + :C2=:C3=\000:C4=\033:C5=\034:C6=\035:C7=:C8=:C9=:\ + :C10=:C11=:C12=:C13=:C29=:\ + :A3=\100:A4=\234:A5=$:A8={:\ + :A9=[:A10=]:A11=}:A12=\134:\ + :K27=\206:K28=:\ + :S27=\217:S28=\136:\ + :C27=\035:C28=:\ + :A28=\176:\ + :S40=\231:S41=\216:\ + :K40=\224:K41=\204:\ + :C40=\034:C41=\033:\ + :K45=<:K53=,:K54=.:K55=-:\ + :S45=>:S53=;:S54=\072:S55=_:\ + :C45=\034:C53=:C54=:C55=:\ + :A45=|:\ + :C61=\000: + +# +# tg: my idiosyncratic mappings (thomas@ghpc8.ihf.rwth-aachen.de) +# +# the six function keys above the cursor keys are arranged +# identical to a real VT220: +# +# find insert remove +# select up down +# +# since i don't have a use for the numbers on the keypad, +# i map NumLock, /, *, - to PF1-PF4; +# + is mapped to SS3 l, shifted + is mapped to SS3 m +# +# they convinced me finally to add some support for german umlauts. +# so, i stole the mapping from jörg wunsch's de-prog entry. +# +# tg +# + +tg:\ + :l1#62:\ + :A12=\337:\ + :A27=\374:C27=\334:\ + :A40=\366:C40=\326:\ + :A41=\344:C41=\304:\ + :K126=\032:C126=\003:\ + :K75=[1~:S75=[1~:C75=[1~:\ + :K76=[4~:S76=[4~:C76=[4~:\ + :K80=[2~:S80=[2~:C80=[2~:\ + :K81=[5~:S81=[5~:C81=[5~:\ + :K85=[3~:S85=[3~:C85=[3~:\ + :K86=[6~:S86=[6~:C86=[6~:\ + :K90=OP:S90=OP:C90=OP:\ + :K95=OQ:S95=OQ:C95=OQ:\ + :K100=OR:S100=OR:C100=OR:\ + :K104=On:S104=On:C104=On:\ + :K105=OS:S105=OS:C105=OS:\ + :K106=Ol:S106=Om:\ + :K108=OM:S108=OM:C108=OM: + +us|usa|United States mapping:\ + :de: + +# EOF diff --git a/usr.sbin/pcvt/keycap/man5/keycap.5 b/usr.sbin/pcvt/keycap/man5/keycap.5 new file mode 100644 index 0000000..8a11f59 --- /dev/null +++ b/usr.sbin/pcvt/keycap/man5/keycap.5 @@ -0,0 +1,133 @@ +.\" +.\" Copyright (c) 1992,1993,1994 Hellmuth Michaelis +.\" +.\" Copyright (c) 1990 The Regents of the University of California. +.\" +.\" All rights reserved. +.\" +.\" Redistribution and use in source and binary forms, with or without +.\" modification, are permitted provided that the following conditions +.\" are met: +.\" 1. Redistributions of source code must retain the above copyright +.\" notice, this list of conditions and the following disclaimer. +.\" 2. Redistributions in binary form must reproduce the above copyright +.\" notice, this list of conditions and the following disclaimer in the +.\" documentation and/or other materials provided with the distribution. +.\" 3. All advertising materials mentioning features or use of this software +.\" must display the following acknowledgement: +.\" This product includes software developed by the University of +.\" California, Berkeley and its contributors. +.\" 4. Neither the name of the University nor the names of its contributors +.\" may be used to endorse or promote products derived from this software +.\" without specific prior written permission. +.\" +.\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND +.\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE +.\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE +.\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE +.\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL +.\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS +.\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) +.\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT +.\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY +.\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF +.\" SUCH DAMAGE. +.\" +.\" @(#)keycap.5, 3.00, Last Edit-Date: [Sun Jan 2 13:45:59 1994] +.\" +.Dd January 3, 1993 +.Dt KEYCAP 5 +.Sh NAME +.Nm keycap +.Nd keyboard mapping data base +.Sh SYNOPSIS +.Nm keycap +.Sh DESCRIPTION +The +.Nm keycap +file +is a data base describing keyboard mappings, used by +.Xr kcon 1 . +.Pp +Entries in +.Nm keycap +consist of a number of `:'-separated fields. +The first entry for each mapping gives the names that are known for the +mapping, separated by `|' characters. +All names but the first and last +should be in lower case and contain no blanks; +the last name may well contain +upper case and blanks for readability. +.Sh CAPABILITIES +.Pp +.Bl -column indent indent +.Sy Name Type Description +.It "de bool Resets Keyboard mapping to compiled-in default" +.It "D<n> bool Disables key <n> completely" + +.It "m<n> num specify key numbers for ALT keys +.It "l<n> num specify key numbers for ALTGR keys +.It "h<n> num specify key numbers for SHIFT keys +.It "t<n> num specify key numbers for CONTROL keys +.It "ca<n> num specify key number for the CAPS LOCK key +.It "sh<n> num specify key number for the SHIFT LOCK key +.It "nl<n> num specify key number for the NUM LOCK key +.It "sc<n> num specify key number for the SCROLL LOCK key + +.It "K<n> str bind a string to a unshifted (normal) key +.It "S<n> str bind a string to a shifted key +.It "C<n> str bind a string to a control key +.It "A<n> str bind a string to a altgr key + +.It "tc str Entry of similar map \- must be last." +.El + +Parameter <n> describing the key number can have values from 1 to 128. + +A string parameter may have up to 15 characters. + +.Pp +.Ss A Sample Entry +The following entry, which describes a test entry, is among the very +easy entries in the +.Nm keycap +file as of this writing. +.Pp +.Bd -literal +tt\||test\||Test entry which swaps y and z:\e + :K22=z:S22=Z:C22=\e032:\e + :K46=y:S46=Y:C46=\e031: + +.Ed +.Pp +Entries may continue onto multiple lines by giving a \e as the last +character of a line. Comments may be included on lines beginning with +.Dq # . +.Sh FILES +.Bl -tag -width /usr/share/misc/keycap -compact +.It Pa /usr/share/misc/keycap +File containing keyboard mapping descriptions. +.El +.Sh SEE ALSO +.Xr kcon 1 , +.Xr keycap 3 , +.Sh EXAMPLES +The entry +.Dq Li l1#60 +sets the keynumber for the ALTGR key to 60. + +The entry +.Dq Li K100=hugo +binds the string 'hugo' to the key number 100. + +The entry +.Dq Li K100=^D +binds the control character EOT (0x04) to the key number 100. + +The entry +.Dq Li K100=\e000 +binds the control character NUL (0x00) to the key number 100. + + + + diff --git a/usr.sbin/pcvt/loadfont/Makefile b/usr.sbin/pcvt/loadfont/Makefile new file mode 100644 index 0000000..4a45ff7 --- /dev/null +++ b/usr.sbin/pcvt/loadfont/Makefile @@ -0,0 +1,19 @@ + +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +PROG = loadfont + +.include <bsd.prog.mk> + +$(PROG): $(INCDIR)/pcvt_ioctl.h + +.endif diff --git a/usr.sbin/pcvt/loadfont/loadfont.1 b/usr.sbin/pcvt/loadfont/loadfont.1 new file mode 100644 index 0000000..f799574 --- /dev/null +++ b/usr.sbin/pcvt/loadfont/loadfont.1 @@ -0,0 +1,87 @@ +.\" Copyright (c) 1992,1993,1994 Hellmuth Michaelis +.\" +.\" All rights reserved. +.\" +.\" Redistribution and use in source and binary forms, with or without +.\" modification, are permitted provided that the following conditions +.\" are met: +.\" 1. Redistributions of source code must retain the above copyright +.\" notice, this list of conditions and the following disclaimer. +.\" 2. Redistributions in binary form must reproduce the above copyright +.\" notice, this list of conditions and the following disclaimer in the +.\" documentation and/or other materials provided with the distribution. +.\" 3. All advertising materials mentioning features or use of this software +.\" must display the following acknowledgement: +.\" This product includes software developed by Hellmuth Michaelis +.\" 4. The name authors may not be used to endorse or promote products +.\" derived from this software without specific prior written permission. +.\" +.\" THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR +.\" IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES +.\" OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. +.\" IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, +.\" INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT +.\" NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, +.\" DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY +.\" THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +.\" (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF +.\" THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +.\" +.\" @(#)loadfont.1, 3.00, Last Edit-Date: [Mon Jan 10 21:25:01 1994] +.\" +.Dd January 3, 1993 +.Dt LOADFONT 1 +.Sh NAME +.Nm loadfont +.Nd is used to load fonts into EGA or VGA boards for use by the 'pcvt' video +driver. +.Sh SYNOPSIS +.Nm loadfont +.Op Fl c Ar charsetno +.Op Fl f Ar fontfilename +.Op Fl i +.Sh DESCRIPTION +The +.Nm loadfont +utility is used to load fonts needed for proper operation of the pcvt +VT220 driver on EGA and VGA boards into the font ram of this boards. +.Pp +The options are as follows: +.Bl -tag -width Ds +.It Fl c +Specifies the slot, the font is to load into. EGA boards have four +slots and VGA boards have eight slots available for downloading fonts. +.It Fl f +Specifies the file which contains the font to be downloaded. +.It Fl i +Gives information what type(s) of font do currently reside in which slot. +This is also the default behaviour if no options are specified on the commandline. +.El +.Pp +This utility is used only on EGA and VGA boards, as MDA, HCG and CGA boards +do not have downloadable charactersets available. +.Sh FILES +Unless otherwise specified in the Makefile, the following fontfiles are +available for the pcvt 2.0 distribution: + +.nf +/usr/share/misc/vgafonts/vt220l.808: 8x8 IBM II font +/usr/share/misc/vgafonts/vt220h.808: 8x8 Extension font +/usr/share/misc/vgafonts/vt220l.810: 8x10 IBM II font +/usr/share/misc/vgafonts/vt220h.810: 8x10 Extension font +/usr/share/misc/vgafonts/vt220l.814: 8x14 IBM II font +/usr/share/misc/vgafonts/vt220h.814: 8x14 Extension font +/usr/share/misc/vgafonts/vt220l.816: 8x16 IBM II font +/usr/share/misc/vgafonts/vt220h.816: 8x16 Extension font +.fi +.Sh EXAMPLES +The command +.Dq Li loadfont -c0 -f/usr/share/misc/vgafonts/vt220l.816 +loads a 8x16 font containing the standard IBM characterset II into font slot +0 on a VGA or EGA board. +.Sh BUGS +No known bugs +.Sh SEE ALSO +.Xr cursor 1 , +.Xr scon 1 , +.Xr pcvt 8 diff --git a/usr.sbin/pcvt/loadfont/loadfont.c b/usr.sbin/pcvt/loadfont/loadfont.c new file mode 100644 index 0000000..0dfb054 --- /dev/null +++ b/usr.sbin/pcvt/loadfont/loadfont.c @@ -0,0 +1,317 @@ +/* + * Copyright (c) 1992,1993,1994 Hellmuth Michaelis and Brian Dunford-Shore + * + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by + * Hellmuth Michaelis and Brian Dunford-Shore + * 4. The name authors may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + */ + +static char *id = + "@(#)loadfont.c, 3.20, Last Edit-Date: [Tue Dec 20 14:52:58 1994]"; + +/*---------------------------------------------------------------------------* + * + * load a font into vga character font memory + * + * -hm removing explicit HGC support (same as MDA ..) + * -hm new pcvt_ioctl.h SIZ_xxROWS + * + *---------------------------------------------------------------------------*/ + +#include <stdio.h> +#include <sys/types.h> +#include <sys/stat.h> +#include <machine/pcvt_ioctl.h> + +#define FONT8X8 2048 /* filesize for 8x8 font */ +#define HEIGHT8X8 8 /* 8 scan lines char cell height */ +#define SSCAN8X8 143 /* 400 scan lines on screen - 256 - 1 */ +#define SROWS8X8 50 /* 50 character lines on screen */ + +#define FONT8X10 2560 /* filesize for 8x10 font */ +#define HEIGHT8X10 10 /* 10 scan lines char cell height */ +#define SSCAN8X10 143 /* 400 scan lines on screen - 256 - 1 */ +#define SROWS8X10 40 /* 50 character lines on screen */ + +#define FONT8X14 3584 /* filesize for 8x14 font */ +#define HEIGHT8X14 14 /* 14 scan lines char cell height */ +#define SSCAN8X14 135 /* 392 scan lines on screen - 256 - 1 */ +#define SROWS8X14 28 /* 28 character lines on screen */ + +#define FONT8X16 4096 /* filesize for 8x16 font */ +#define HEIGHT8X16 16 /* 16 scan lines char cell height */ +#define SSCAN8X16 143 /* 400 scan lines on screen - 256 - 1 */ +#define SROWS8X16 25 /* 25 character lines on screen */ + +struct screeninfo screeninfo; + +main(argc,argv) +int argc; +char *argv[]; +{ + extern int optind; + extern int opterr; + extern char *optarg; + + FILE *in; + struct stat sbuf, *sbp; + unsigned char *fonttab; + int ret; + int chr_height; + int scr_scan; + int scr_rows; + int c; + int chr_set = -1; + char *filename; + int fflag = -1; + int info = -1; + + while( (c = getopt(argc, argv, "c:f:i")) != EOF) + { + switch(c) + { + case 'c': + chr_set = atoi(optarg); + break; + + case 'f': + filename = optarg; + fflag = 1; + break; + + case 'i': + info = 1; + break; + + case '?': + default: + usage(); + break; + } + } + + if(chr_set == -1 || fflag == -1) + info = 1; + + if(info == 1) + { + int i; + + if(ioctl(0, VGAGETSCREEN, &screeninfo) == -1) + { + perror("ioctl VGAGETSCREEN failed"); + exit(1); + } + + switch(screeninfo.adaptor_type) + { + case UNKNOWN_ADAPTOR: + case MDA_ADAPTOR: + case CGA_ADAPTOR: + printf("Adaptor does not support Downloadable Fonts!\n"); + break; + case EGA_ADAPTOR: + printheader(); + for(i = 0;i < 4;i++) + { + printvgafontattr(i); + } + break; + case VGA_ADAPTOR: + printheader(); + for(i = 0;i < 8;i++) + { + printvgafontattr(i); + } + } + printf("\n"); + exit(0); + } + + if(chr_set < 0 || chr_set > 7) + usage(); + + sbp = &sbuf; + + if((in = fopen(filename, "r")) == NULL) + { + char buffer[80]; + sprintf(buffer, "cannot open file %s for reading", filename); + perror(buffer); + exit(1); + } + + if((fstat(fileno(in), sbp)) != 0) + { + char buffer[80]; + sprintf(buffer, "cannot fstat file %s", filename); + perror(buffer); + exit(1); + } + + switch(sbp->st_size) + { + case FONT8X8: + chr_height = HEIGHT8X8; + scr_scan = SSCAN8X8; + scr_rows = SIZ_50ROWS; + break; + + case FONT8X10: + chr_height = HEIGHT8X10; + scr_scan = SSCAN8X10; + scr_rows = SIZ_40ROWS; + break; + + case FONT8X14: + chr_height = HEIGHT8X14; + scr_scan = SSCAN8X14; + scr_rows = SIZ_28ROWS; + break; + + case FONT8X16: + chr_height = HEIGHT8X16; + scr_scan = SSCAN8X16; + scr_rows = SIZ_25ROWS; + break; + + default: + fprintf(stderr,"error, file %s is no valid font file, size=%d\n",argv[1],sbp->st_size); + exit(1); + } + + if((fonttab = (unsigned char *)malloc((size_t)sbp->st_size)) == NULL) + { + fprintf(stderr,"error, malloc failed\n"); + exit(1); + } + + if((ret = fread(fonttab, sizeof(*fonttab), sbp->st_size, in)) != sbp->st_size) + { + fprintf(stderr,"error reading file %s, size = %d, read = is no valid font file, size=%d\n",argv[1],sbp->st_size, ret); + exit(1); + } + + loadfont(chr_set, chr_height, fonttab); + setfont(chr_set, 1, chr_height - 1, scr_scan, scr_rows); + + exit(0); +} + +setfont(charset, fontloaded, charscan, scrscan, scrrow) +int charset, fontloaded, charscan, scrscan, scrrow; +{ + struct vgafontattr vfattr; + + vfattr.character_set = charset; + vfattr.font_loaded = fontloaded; + vfattr.character_scanlines = charscan; + vfattr.screen_scanlines = scrscan; + vfattr.screen_size = scrrow; + + if(ioctl(1, VGASETFONTATTR, &vfattr) == -1) + { + perror("loadfont - ioctl VGASETFONTATTR failed, error"); + exit(1); + } +} + +loadfont(fontset,charscanlines,font_table) +int fontset; +int charscanlines; +unsigned char *font_table; +{ + int i, j; + struct vgaloadchar vlc; + + vlc.character_set = fontset; + vlc.character_scanlines = charscanlines; + + for(i = 0; i < 256; i++) + { + vlc.character = i; + for (j = 0; j < charscanlines; j++) + { + vlc.char_table[j] = font_table[j]; + } + font_table += charscanlines; + if(ioctl(1, VGALOADCHAR, &vlc) == -1) + { + perror("loadfont - ioctl VGALOADCHAR failed, error"); + exit(1); + } + } +} + +printvgafontattr(charset) +int charset; +{ + struct vgafontattr vfattr; + static int sizetab[] = { 25, 28, 35, 40, 43, 50 }; + + vfattr.character_set = charset; + + if(ioctl(1, VGAGETFONTATTR, &vfattr) == -1) + { + perror("loadfont - ioctl VGAGETFONTATTR failed, error"); + exit(1); + } + printf(" %d ",charset); + if(vfattr.font_loaded) + { + + printf("Loaded "); + printf(" %2.2d ", sizetab[vfattr.screen_size]); + printf(" %2.2d ", + (((int)vfattr.character_scanlines) & 0x1f) + 1); + printf(" %3.3d", + ((int)vfattr.screen_scanlines+0x101)); + } + else + { + printf("Empty"); + } + printf("\n"); +} + +printheader() +{ + printf("\nEGA/VGA Charactersets Status Info:\n\n"); + printf("Set Status Lines CharScanLines ScreenScanLines\n"); + printf("--- ------ ----- ------------- ---------------\n"); +} + +usage() +{ + fprintf(stderr,"\nloadfont - load font into ega/vga font ram for pcvt video driver\n"); + fprintf(stderr,"usage: loadfont -c<cset> -f<filename> -i\n"); + fprintf(stderr," -c <cset> characterset to load (ega 0..3, vga 0..7)\n"); + fprintf(stderr," -f <name> filename containing binary font data\n"); + fprintf(stderr," -i print status and types of loaded fonts (default)\n"); + exit(1); +} diff --git a/usr.sbin/pcvt/mcon/Makefile b/usr.sbin/pcvt/mcon/Makefile new file mode 100644 index 0000000..156e431 --- /dev/null +++ b/usr.sbin/pcvt/mcon/Makefile @@ -0,0 +1,19 @@ + +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +PROG= mcon + +.include <bsd.prog.mk> + +$(PROG): $(INCDIR)/pcvt_ioctl.h + +.endif diff --git a/usr.sbin/pcvt/mcon/mcon.1 b/usr.sbin/pcvt/mcon/mcon.1 new file mode 100644 index 0000000..e59e64d --- /dev/null +++ b/usr.sbin/pcvt/mcon/mcon.1 @@ -0,0 +1,166 @@ +.\" Copyright (c) 1994 Joerg Wunsch +.\" +.\" All rights reserved. +.\" +.\" Redistribution and use in source and binary forms, with or without +.\" modification, are permitted provided that the following conditions +.\" are met: +.\" 1. Redistributions of source code must retain the above copyright +.\" notice, this list of conditions and the following disclaimer. +.\" 2. Redistributions in binary form must reproduce the above copyright +.\" notice, this list of conditions and the following disclaimer in the +.\" documentation and/or other materials provided with the distribution. +.\" 3. All advertising materials mentioning features or use of this software +.\" must display the following acknowledgement: +.\" This product includes software developed by Joerg Wunsch +.\" 4. The name authors may not be used to endorse or promote products +.\" derived from this software without specific prior written permission. +.\" +.\" THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR +.\" IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES +.\" OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. +.\" IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, +.\" INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT +.\" NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, +.\" DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY +.\" THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +.\" (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF +.\" THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +.\" +.\" @(#)mcon.1, 3.00, Last Edit-Date: [Mon Jan 10 21:28:22 1994] +.\" +.Dd January 3, 1994 +.Dt MCON 1 +.Sh NAME +.Nm mcon +.Nd controls pcvt mouse emulator +.Sh SYNOPSIS +.Nm mcon +.Op Fl l Ar left-button-key +.Op Fl m Ar mid-button-key +.Op Fl r Ar right-button-key +.Op Fl a Ar accel-time +.Op Fl s Ar 0 | false | \&no +.Op Fl s Ar 1 | true | yes +.Ar device +.Sh DESCRIPTION +The +.Nm mcon +utility controls the configurable parameters for the mouse emulator of +.Xr pcvt 4 . +.br +.Em NB : +The mouse emulator is not configured in by default; the system's config +file needs to specify an option line + +.Em options Dq PCVT_EMU_MOUSE + +in order to get its functionality. +.Pp +Either way, the +.Nm +program must be called with an argument +.Ar device +that specifies the device node used for the mouse emulation. This is +usually the first device node of the +.Xr pcvt 4 +driver not being used as a virtual terminal device. E.\ g., if you +have configured eight virtual terminals +.Pq the default value , +named +.Pa /dev/ttyv0 +through +.Pa /dev/ttyv7 , +the mouse emulator would allocate +.Pa /dev/ttyv8 . + +If +.Nm +is called without any option, it will print the actual values of the +configurable parameters. + +If called with an option, the program attempts to set up the new value. +.Pp +The options are as follows: +.Bl -tag -width Ds +.It Fl l Ar left-button-key +.It Fl m Ar mid-button-key +.It Fl r Ar right-button-key +Maps the named +.Ar button key +to emulate either the left, middle, or right mouse button. +.Ar Button key +is the usual name for that key. Normal ASCII keys are denoted by the +character they're labeled with, function keys are named +.Em f1 +through +.Em f10 . +Note that the AT function keys +.Em f11 +and +.Em f12 +are +.Em extended +keys that cannot be mapped to be used with the mouse emulator since +it only allows basic PC-scancode keys to be used. + +.It Fl a Ar accel-time +Set the time limit for the internal accelerator to +.Ar accel-time +milliseconds. Key events occurring after a longer time than this limit +will move the mouse cursor in single steps. Key events arriving more +frequently will move the cursor accelerated by a factor of 6. Note that +despite of +.Em milliseconds +being the unit of choice here, the time resolution is restricted by the +timer tick distance of the underlying operating system, usually to a +granularity of 10 milliseconds. + +.It Fl s Ar 0 | false | \&no +.It Fl s Ar 1 | true | yes +The first form disables, the second form enables the +.Em sticky +behaviour of the mouse buttons. Sticky mouse keys behave much like +toggle-buttons: on first press, they become active, on second press, +they're deactivated. Pressing another button will deactivate any +other sticky button anyway. + +Sticky buttons might be more convenient since you don't need 20 fingers +at all; on the other hand, they make it virtually impossible to initiate +double or triple mouse clicks. +.El +.Sh EXAMPLES +The following example would install the default behaviour of the +mouse emulator: + +.Nm mcon +.Fl l Ar f1 +.Fl m Ar f2 +.Fl r Ar f3 +.Fl a Ar 250 +.Fl s Ar \&no +.Pa /dev/ttyv8 +.Sh BUGS +The key names used to map the button-emulating keys to scan codes +.Pq and vica verse +are based on the American keyboard layout. This would usually not +cause any trouble since the +.Dq button-of-choice +is certainly some function key that should be equal for any national +keyboard layout. +.Pp +The mouse emulator is a rude hack at all; its only purpose is to provide +a device to move the pointer within an X-windowing environment. +.Sh SEE ALSO +.Xr pcvt 4 , +.Xr X 1x . +.Sh HISTORY +The +.Nm +utility appeared in +.Xr pcvt 4 , +release 3.00. +.Sh AUTHOR +The mouse emulator has been contributed by +.if n Joerg Wunsch. +.if t J\(:org Wunsch. diff --git a/usr.sbin/pcvt/mcon/mcon.c b/usr.sbin/pcvt/mcon/mcon.c new file mode 100644 index 0000000..89989d9 --- /dev/null +++ b/usr.sbin/pcvt/mcon/mcon.c @@ -0,0 +1,192 @@ +/* + * Copyright (c) 1994 Joerg Wunsch + * + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Joerg Wunsch + * 4. The name authors may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + * + * @(#)mcon.c, 3.20, Last Edit-Date: [Tue Dec 20 14:53:15 1994] + */ + +/*---------------------------------------------------------------------------* + * + * history: + * + * -jw initial version; includes a basic mapping between PeeCee + * scan codes and key names + * -hm changed sys/pcvt_ioctl.h -> machine/pcvt_ioctl.h + * + *---------------------------------------------------------------------------*/ + +/* + * Utility program to wire the mouse emulator control ioctl to the + * user level. Allows setting of any configurable parameter, or + * display the current configuration. + */ + +#include <machine/pcvt_ioctl.h> +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <sys/fcntl.h> + +static const char *keynames[] = { + "", "esc", "1", "2", "3", "4", "5", "6", "7", "8", "9", "0", + "-", "+", "bksp", "tab", "q", "w", "e", "r", "t", "y", "u", + "i", "o", "p", "[", "]", "enter", "ctrl", "a", "s", "d", "f", + "g", "h", "j", "k", "l", ";", "\"", "`", "lshift", "\\", + "z", "x", "c", "v", "b", "n", "m", ",", ".", "/", "rshift", + "prtscr", "alt", "space", "caps", "f1", "f2", "f3", "f4", + "f5", "f6", "f7", "f8", "f9", "f10", "numlock", "scrolllock", + "kp7", "kp8", "kp9", "kp-", "kp4", "kp5", "kp6", "kp+", + "kp1", "kp2", "kp3", "kp0", "kp." +}; + + +const char *scantoname(int scan) { + if(scan >= sizeof keynames / sizeof(const char *)) + return "???"; + else + return keynames[scan]; +} + +int nametoscan(const char *name) { + int i; + for(i = 0; i < sizeof keynames / sizeof(const char *); i++) + if(strcmp(keynames[i], name) == 0) + return i; + return -1; +} + + +int main(int argc, char **argv) { + int c, errs = 0, fd, do_set = 0; + int left = 0, mid = 0, right = 0, accel = 0, sticky = -1; + struct mousedefs mdef; + + while((c = getopt(argc, argv, "l:m:r:a:s:")) != EOF) + switch(c) { + case 'l': + left = nametoscan(optarg); + do_set = 1; + if(left == -1) goto keynameerr; + break; + + case 'm': + mid = nametoscan(optarg); + do_set = 1; + if(mid == -1) goto keynameerr; + break; + + case 'r': + right = nametoscan(optarg); + do_set = 1; + if(right == -1) goto keynameerr; + break; + + keynameerr: + { + fprintf(stderr, "unknown key name: %s\n", + optarg); + errs++; + } + break; + + case 'a': + accel = 1000 * strtol(optarg, 0, 10); + do_set = 1; + break; + + case 's': + if(strcmp(optarg, "0") == 0 + || strcmp(optarg, "false") == 0 + || strcmp(optarg, "no") == 0) + sticky = 0; + else if(strcmp(optarg, "1") == 0 + || strcmp(optarg, "true") == 0 + || strcmp(optarg, "yes") == 0) + sticky = 1; + else { + fprintf(stderr, "invalid argument to -s: %s\n", + optarg); + errs++; + } + do_set = 1; + break; + + default: + errs++; + } + + argc -= optind; + argv += optind; + + if(errs || argc != 1) { + fprintf(stderr, "usage: " + "mouse [-l key][-m key][-r key][-a acctime][-s 0|1] " + "mousedev\n"); + return 2; + } + + if((fd = open(argv[0], O_RDONLY)) < 0) { + perror("open(mousedev)"); + return 2; + } + if(ioctl(fd, KBDMOUSEGET, &mdef) < 0) { + perror("ioctl(KBDMOUSEGET)"); + return 1; + } + + if(!do_set) { + printf("Current mouse emulator definitions:\n" + "left button: %s\n" + "middle button: %s\n" + "right button: %s\n" + "acceleration limit: %d msec\n" + "sticky buttons: %s\n", + scantoname(mdef.leftbutton), + scantoname(mdef.middlebutton), + scantoname(mdef.rightbutton), + mdef.acceltime / 1000, + mdef.stickybuttons? "yes": "no"); + return 0; + } + + if(left) mdef.leftbutton = left & 0x7f; + if(mid) mdef.middlebutton = mid & 0x7f; + if(right) mdef.rightbutton = right & 0x7f; + + if(accel) mdef.acceltime = accel; + if(sticky != -1) mdef.stickybuttons = sticky; + + if(ioctl(fd, KBDMOUSESET, &mdef) < 0) { + perror("ioctl(KBDMOUSESET)"); + return 1; + } + + return 0; +} diff --git a/usr.sbin/pcvt/scon/Makefile b/usr.sbin/pcvt/scon/Makefile new file mode 100644 index 0000000..58316d3 --- /dev/null +++ b/usr.sbin/pcvt/scon/Makefile @@ -0,0 +1,19 @@ + +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +PROG = scon + +.include <bsd.prog.mk> + +$(PROG): $(INCDIR)/pcvt_ioctl.h + +.endif diff --git a/usr.sbin/pcvt/scon/scon.1 b/usr.sbin/pcvt/scon/scon.1 new file mode 100644 index 0000000..e068571 --- /dev/null +++ b/usr.sbin/pcvt/scon/scon.1 @@ -0,0 +1,214 @@ +.\" Copyright (c) 1992,1993,1994 Hellmuth Michaelis and Joerg Wunsch +.\" +.\" All rights reserved. +.\" +.\" Redistribution and use in source and binary forms, with or without +.\" modification, are permitted provided that the following conditions +.\" are met: +.\" 1. Redistributions of source code must retain the above copyright +.\" notice, this list of conditions and the following disclaimer. +.\" 2. Redistributions in binary form must reproduce the above copyright +.\" notice, this list of conditions and the following disclaimer in the +.\" documentation and/or other materials provided with the distribution. +.\" 3. All advertising materials mentioning features or use of this software +.\" must display the following acknowledgement: +.\" This product includes software developed by +.\" Hellmuth Michaelis and Joerg Wunsch +.\" 4. The name authors may not be used to endorse or promote products +.\" derived from this software without specific prior written permission. +.\" +.\" THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR +.\" IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES +.\" OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. +.\" IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, +.\" INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT +.\" NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, +.\" DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY +.\" THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +.\" (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF +.\" THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +.\" +.\" @(#)scon.1, 3.00, Last Edit-Date: [Mon Jan 10 21:30:48 1994] +.\" +.Dd December 31, 1993 +.Dt SCON 1 +.Sh NAME +.Nm scon +.Nd controls screen modes for pcvt video driver +.Sh SYNOPSIS +.Nm scon +.Op Fl a +.Op Fl c Ar screenno +.Op Fl d Ar device +.Op Fl f Ar on|off +.Op Fl h +.Op Fl H +.Op Fl l +.Op Fl m +.Op Fl v +.Op Fl V +.Op Fl s Ar lines +.br +.Nm scon +.Op Fl v +.Op Fl d Ar device +.Fl p Ar entry,red,green,blue +.br +.Nm scon +.Op Fl v +.Op Fl d Ar device +.Fl p Ar default +.br +.Nm scon +.Op Fl v +.Op Fl d Ar device +.Fl p Ar list +.Nm scon +.Op Fl v +.Fl t Ar timeout +.Nm scon +.Op Fl v +.Fl 1 | Fl 8 +.Sh DESCRIPTION +The +.Nm scon +utility controls several aspects of the runtime behaviour of the pcvt vt220 +driver. +.Pp +The options are as follows: +.Bl -tag -width Ds +.It Fl a +Returns a string describing the video adaptor found by pcvt, the string +returned could be MDA, HGC, CGA, EGA, VGA or UNKNOWN. +.It Fl c +Specify the screen number the current (displayed) screen should be switched +to. +.It Fl d +Specify the device filename (i.e. /dev/ttyv2) further operations specified on +the command line should be applied to. +.It Fl f +Some programs which silently assume 24 lines when they run on a VT220 show +incorrect behaviour when the terminal has really 25 lines. To support full +VT220 behaviour, it is possible to force pcvt to select only 24 lines when +it is running in 25-lines pure VT mode and/or in 28-lines HP-mode. The +.Fl f +option requires one additional parameter, the string 'on' or 'off' to switch +this mode for a virtual screen on or off respectively. This mode has no effect +if any other vertical resolutions are selected than the two above mentioned. +.It Fl h +Prints a usage/help text. +.It Fl l +Lists the current configuration of runtime changeable options and fixed +parameters (such as the type of the adaptor, and in case of a VGA adaptor, +the Manufacturer, Chipset and 132 column support) of the output portion +of the pcvt driver. +.It Fl m +Returns a string describing the connected display monitor type found by pcvt, +the string returned can be MONO, COLOR or UNKNOWN. +.It Fl v +Specify verbose operation of the program. +.It Fl V +Switch the specified/current screen into a pure VT220 mode without recognizing +any HP escape sequences and without displaying function key labels. +.It Fl H +Switch the specified/current screen into a mixed HP/VT220 mode. That is, that +in addition to the full VT220 emulation, the HP function key labels and the +escape sequences for handling the labels are available to the user. +.It Fl s +Specify the number of character lines on the screen. Possible parameters are +25, 28, 35, 40, 43 or 50. To use all this screen sizes, the fonts required +for proper operation of a desired size have to be downloaded to the EGA/VGA +font ram. This option is available only for EGA and VGA boards. +.It Fl p +Modify VGA palette +.Pq DAC . +The +.Fl p +is mutually exclusive with +.Fl s , +.Fl H , +and +.Fl V . +Naturally, option +.Fl p +is available only for VGA boards. Three flavors are available. + +If used with argument +.Dq Ar default , +this flag will restore the default palette +.Po +as installed by VGA ROM BIOS after hardware reset +.Pc . + +If used with argument +.Dq Ar list , +the current VGA DAC palette entries are listed. Each entry contains +the table index, values for red, green, and blue, and if there's a +known name for this entry, the color name. Trailing empty table +slots (RGB values all zero) are omitted. + +Otherwise, four comma-separated arguments are expected. The first +denotes the number of palette entry to be modified. This may be either +a number between 0 and 255, or the usual name of an associated color +.Pq case-insensitive . +The following values for red, green and blue are restricted to 0 through 63 +due to VGA DAC conventions. +Note that the first delimiter within such an argument may be a colon +.Dq \&: +instead of a comma +.Dq \&, +for better readability, but this violates common command argument +conventions. +Multiple +.Fl p +options may be specified if unambiguous. +.It Fl t +Specifying +.Fl t +will activate the screen saver. The behaviour depends on +.Ar timeout : +if +.Ar timeout +is given as 0, the screen saver is turned off. Otherwise, +.Ar timeout +is taken as a number of seconds to wait until activating the +screen saver. +NOTE: the +.Fl t +option is only available if screen saver support has been compiled into +the driver ! +.It Fl 1 +Sets 132 columns mode +.Pq only available on VGA adaptors . +.It Fl 8 +Sets 80 columns mode. +.El +.Pp +When switching between HP and VT mode, when switching the force 24 lines +mode on and off, or when switching between 80 and 132 columns operation, +the screen is cleared, the scrolling +region is reset and the cursor is placed in the home position. +.Sh EXAMPLES +The command +.Dq Li scon Fl H s Ar 28 +places the current screen into HP mode and sets the screen size to 28x80. + +Invoking +.Do +.Li scon Fl p +.Ar lightgray,0,15,0 +.Fl p +.Ar 0:45,45,45 +.Dc +will result in green on gray output for normal text. +Note that normal text color is light gray, and not white as one might expect. +.Sh BUGS +the +.Fl c +and +.Fl d +options collide somehow, this will change in a future release. +.Sh SEE ALSO +.Xr loadfont 1 , +.Xr cursor 1 , +.Xr pcvt 8 diff --git a/usr.sbin/pcvt/scon/scon.c b/usr.sbin/pcvt/scon/scon.c new file mode 100644 index 0000000..5237d07 --- /dev/null +++ b/usr.sbin/pcvt/scon/scon.c @@ -0,0 +1,856 @@ +/* + * Copyright (c) 1992,1993,1994 Hellmuth Michaelis and Joerg Wunsch + * + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by + * Hellmuth Michaelis and Joerg Wunsch + * 4. The name authors may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + */ + +static char *id = + "@(#)scon.c, 3.20, Last Edit-Date: [Sun Sep 25 12:33:21 1994]"; + +/*---------------------------------------------------------------------------* + * + * history: + * + * -hm moving fd for default device from 1 -> 0 for such things + * as "scon -p list | more" to be possible + * (reported by Gordon L. Burditt, gordon@sneaky.lonestar.org) + * -hm adding option "a" for just returning the type of video adaptor + * -hm removing explicit HGC support, same as MDA ... + * -hm vga type/family/132col support info on -l + * -hm force 24 lines in DEC 25 lines mode and HP 28 lines mode + * -hm fixed bug with 132 column mode display status display + * -jw added 132/80 col mode switching + * -hm removed -h flag, use -? now ... ;-) + * -hm S3 chipsets .. + * -hm Cirrus chipsets support from Onno van der Linden + * -hm -m option, display monitor type + * -hm bugfix, scon -c <screen-num> cleared dest screen, fixed + * + *---------------------------------------------------------------------------*/ + +#include <stdio.h> +#include <fcntl.h> +#include <machine/pcvt_ioctl.h> + +#define DEFAULTFD 0 + +int aflag = -1; +int lflag = -1; +int mflag = -1; +int current = -1; +int pflag = -1; +int hflag = -1; +int res = -1; +char *device; +int dflag = -1; +int vflag = 0; +int Pflag = 0; +int tflag = 0; +int fflag = -1; +int colms = 0; +char *onoff; + +unsigned timeout; +struct screeninfo screeninfo; + +#define NVGAPEL 256 + +struct rgb { + unsigned r, g, b; + int dothis; +}; + +static struct rgb palette[NVGAPEL] = { + { 0x00, 0x00, 0x00, 0}, /* 0 - black */ + { 0x00, 0x00, 0x2a, 0}, /* 1 - blue */ + { 0x00, 0x2a, 0x00, 0}, /* 2 - green */ + { 0x00, 0x2a, 0x2a, 0}, /* 3 - cyan */ + { 0x2a, 0x00, 0x00, 0}, /* 4 - red */ + { 0x2a, 0x00, 0x2a, 0}, /* 5 - magenta */ + { 0x2a, 0x2a, 0x00, 0}, /* 6 */ + { 0x2a, 0x2a, 0x2a, 0}, /* 7 - lightgray */ + { 0x00, 0x00, 0x15, 0}, /* 8 */ + { 0x00, 0x00, 0x3f, 0}, /* 9 */ + { 0x00, 0x2a, 0x15, 0}, /* 10 */ + { 0x00, 0x2a, 0x3f, 0}, /* 11 */ + { 0x2a, 0x00, 0x15, 0}, /* 12 */ + { 0x2a, 0x00, 0x3f, 0}, /* 13 */ + { 0x2a, 0x2a, 0x15, 0}, /* 14 */ + { 0x2a, 0x2a, 0x3f, 0}, /* 15 */ + { 0x00, 0x15, 0x00, 0}, /* 16 */ + { 0x00, 0x15, 0x2a, 0}, /* 17 */ + { 0x00, 0x3f, 0x00, 0}, /* 18 */ + { 0x00, 0x3f, 0x2a, 0}, /* 19 */ + { 0x2a, 0x15, 0x00, 0}, /* 20 - brown */ + { 0x2a, 0x15, 0x2a, 0}, /* 21 */ + { 0x2a, 0x3f, 0x00, 0}, /* 22 */ + { 0x2a, 0x3f, 0x2a, 0}, /* 23 */ + { 0x00, 0x15, 0x15, 0}, /* 24 */ + { 0x00, 0x15, 0x3f, 0}, /* 25 */ + { 0x00, 0x3f, 0x15, 0}, /* 26 */ + { 0x00, 0x3f, 0x3f, 0}, /* 27 */ + { 0x2a, 0x15, 0x15, 0}, /* 28 */ + { 0x2a, 0x15, 0x3f, 0}, /* 29 */ + { 0x2a, 0x3f, 0x15, 0}, /* 30 */ + { 0x2a, 0x3f, 0x3f, 0}, /* 31 */ + { 0x15, 0x00, 0x00, 0}, /* 32 */ + { 0x15, 0x00, 0x2a, 0}, /* 33 */ + { 0x15, 0x2a, 0x00, 0}, /* 34 */ + { 0x15, 0x2a, 0x2a, 0}, /* 35 */ + { 0x3f, 0x00, 0x00, 0}, /* 36 */ + { 0x3f, 0x00, 0x2a, 0}, /* 37 */ + { 0x3f, 0x2a, 0x00, 0}, /* 38 */ + { 0x3f, 0x2a, 0x2a, 0}, /* 39 */ + { 0x15, 0x00, 0x15, 0}, /* 40 */ + { 0x15, 0x00, 0x3f, 0}, /* 41 */ + { 0x15, 0x2a, 0x15, 0}, /* 42 */ + { 0x15, 0x2a, 0x3f, 0}, /* 43 */ + { 0x3f, 0x00, 0x15, 0}, /* 44 */ + { 0x3f, 0x00, 0x3f, 0}, /* 45 */ + { 0x3f, 0x2a, 0x15, 0}, /* 46 */ + { 0x3f, 0x2a, 0x3f, 0}, /* 47 */ + { 0x15, 0x15, 0x00, 0}, /* 48 */ + { 0x15, 0x15, 0x2a, 0}, /* 49 */ + { 0x15, 0x3f, 0x00, 0}, /* 50 */ + { 0x15, 0x3f, 0x2a, 0}, /* 51 */ + { 0x3f, 0x15, 0x00, 0}, /* 52 */ + { 0x3f, 0x15, 0x2a, 0}, /* 53 */ + { 0x3f, 0x3f, 0x00, 0}, /* 54 */ + { 0x3f, 0x3f, 0x2a, 0}, /* 55 */ + { 0x15, 0x15, 0x15, 0}, /* 56 - darkgray */ + { 0x15, 0x15, 0x3f, 0}, /* 57 - lightblue */ + { 0x15, 0x3f, 0x15, 0}, /* 58 - lightgreen */ + { 0x15, 0x3f, 0x3f, 0}, /* 59 - lightcyan */ + { 0x3f, 0x15, 0x15, 0}, /* 60 - lightred */ + { 0x3f, 0x15, 0x3f, 0}, /* 61 - lightmagenta */ + { 0x3f, 0x3f, 0x15, 0}, /* 62 - yellow */ + { 0x3f, 0x3f, 0x3f, 0}, /* 63 - white */ + { 0x00, 0x00, 0x00, 0} /* 64 ... - empty */ +}; + +static struct colname { + const char *name; + unsigned idx; +} colnames[] = { + {"black", 0}, + {"blue", 1}, + {"green", 2}, + {"cyan", 3}, + {"red", 4}, + {"magenta", 5}, + {"brown", 20}, + {"lightgray", 7}, + {"lightgrey", 7}, + {"darkgray", 56}, + {"darkgrey", 56}, + {"lightblue", 57}, + {"lightgreen", 58}, + {"lightcyan", 59}, + {"lightred", 60}, + {"lightmagenta", 61}, + {"yellow", 62}, + {"white", 63}, + /* must be terminator: */ {(const char *)NULL, 0} +}; + + +static void parsepopt(char *arg, unsigned *idx, + unsigned *r, unsigned *g, unsigned *b); +static void printpalette(int fd); + +main(argc,argv) +int argc; +char *argv[]; +{ + extern int optind; + extern int opterr; + extern char *optarg; + + int c; + int fd; + + while( (c = getopt(argc, argv, "ac:d:f:HVlms:t:vp:18")) != EOF) + { + switch(c) + { + case 'a': + aflag = 1; + break; + + case 'l': + lflag = 1; + break; + + case 'm': + mflag = 1; + break; + + case 'c': + current = atoi(optarg); + break; + + case 'd': + device = optarg; + dflag = 1; + break; + + case 'f': + onoff = optarg; + fflag = 1; + break; + + case 'V': + pflag = 1; + break; + + case 'H': + hflag = 1; + break; + + case 's': + if (!strncmp(optarg, "25", 2)) + res = SIZ_25ROWS; + else if(!strncmp(optarg, "28", 2)) + res = SIZ_28ROWS; + else if(!strncmp(optarg, "35", 2)) + res = SIZ_35ROWS; + else if(!strncmp(optarg, "40", 2)) + res = SIZ_40ROWS; + else if(!strncmp(optarg, "43", 2)) + res = SIZ_43ROWS; + else if(!strncmp(optarg, "50", 2)) + res = SIZ_50ROWS; + break; + + case 'v': + vflag++; + break; + + case 'p': + if(!strcmp(optarg, "list")) + { + if(Pflag) + { + fprintf(stderr, + "-p list is mutual exclusive " + "with other -p options\n"); + return 2; + } + Pflag = 3; + } + else if(!strcmp(optarg, "default")) + { + if(Pflag) + { + fprintf(stderr, + "multiple -p default not " + "allowed\n"); + return 2; + } + Pflag = 2; + } else { + unsigned idx, r, g, b; + + if(Pflag > 1) + { + fprintf(stderr, + "-p default and -p i,r,g,b " + "ambiguous\n"); + return 2; + } + Pflag = 1; + parsepopt(optarg, &idx, &r, &g, &b); + if(idx >= NVGAPEL) + { + fprintf(stderr, + "index %u in -p option " + "out of range\n", idx); + return 2; + } + palette[idx].r = r; + palette[idx].g = g; + palette[idx].b = b; + palette[idx].dothis = 1; + } + break; + + case 't': + tflag++; + timeout = atoi(optarg); + break; + + case '1': + colms = 132; + break; + + case '8': + colms = 80; + break; + + case '?': + default: + usage(); + break; + } + } + + if((pflag == 1) && (hflag == 1)) + usage(); + + if(dflag == -1 && lflag == -1 && current == -1 && pflag == -1 && + hflag == -1 && res == -1 && Pflag == 0 && tflag == 0 && fflag == -1 + && colms == 0 && mflag == -1) + { + lflag = 1; + } + + if(dflag == -1) + { + if(vflag) + printf("using current device\n"); + fd = DEFAULTFD; /* -hm, Feb 12 1993 */ + } + else + { + if((fd = open(device, O_RDWR)) == -1) + { + char buffer[80]; + strcpy(buffer,"ERROR opening "); + strcat(buffer,device); + perror(buffer); + exit(1); + } + if(vflag) + printf("using device %s\n",device); + } + + if(aflag == 1) /* return adaptor type */ + { + printadaptor(fd); + exit(0); + } + + if(mflag == 1) /* return monitor type */ + { + printmonitor(fd); + exit(0); + } + + if(lflag == 1) /* list information */ + { + if(vflag) + printf("processing option -l, listing screen info\n"); + printinfo(fd); + exit(0); + } + + if(tflag) /* set screen saver timeout */ + { + if(vflag) + { + printf( + "processing option -t, setting screen saver timeout: " + ); + if(timeout) + printf("new timeout = %d s\n", timeout); + else + printf("turned off\n"); + } + + if(ioctl(fd, VGASCREENSAVER, &timeout) < 0) + { + perror("ioctl(VGASCREENSAVER)"); + fprintf(stderr, "Check the driver, the screensaver is probably not compiled in!\n"); + exit(2); + } + goto success; + } + + if(colms) + { + if(vflag) + printf("Setting number of columns to %d\n", colms); + if(ioctl(fd, VGASETCOLMS, &colms) < 0) + { + perror("ioctl(VGASETCOLMS)"); + exit(2); + } + goto success; + } + + if(Pflag == 3) + { + /* listing VGA palette */ + if(vflag) + printf("processing option -p list, " + "listing VGA palette\n"); + + printpalette(fd); + goto success; + } + + if(Pflag) + { + unsigned int idx; + + /* setting VGA palette */ + if(vflag) + printf("processing option -p, setting VGA palette%s\n", + Pflag == 2? " to default": ""); + + for(idx = 0; idx < NVGAPEL; idx++) + if(Pflag == 2 || palette[idx].dothis) + { + struct vgapel p; + p.idx = idx; + p.r = palette[idx].r; + p.g = palette[idx].g; + p.b = palette[idx].b; + if(ioctl(fd, VGAWRITEPEL, (caddr_t)&p) < 0) + { + perror("ioctl(fd, VGAWRITEPEL)"); + return 2; + } + } + goto success; + } + + screeninfo.screen_no = -1; /* We are using fd */ + screeninfo.current_screen = current; + screeninfo.pure_vt_mode = -1; + screeninfo.screen_size = res; + screeninfo.force_24lines = -1; + + if(current != -1) /* set current screen */ + { + if(vflag) + printf("processing option -c, setting current screen to %d\n",current); + + if(ioctl(1, VGASETSCREEN, &screeninfo) == -1) + { + perror("ioctl VGASETSCREEN failed"); + exit(1); + } + exit(0); + } + + if(pflag == 1) + { + if(vflag) + printf("processing option -V, setting emulation to pure VT220\n"); + screeninfo.pure_vt_mode = M_PUREVT; + } + else if(hflag == 1) + { + if(vflag) + printf("processing option -H, setting emulation to VT220 + HP Labels\n"); + screeninfo.pure_vt_mode = M_HPVT; + } + else + { + if(vflag) + printf("no change in terminal emulation\n"); + } + + if(vflag) + { + if(res == -1) + printf("no change in screen resolution\n"); + else if(res == SIZ_25ROWS) + printf("change screen resolution to 25 lines\n"); + else if(res == SIZ_28ROWS) + printf("change screen resolution to 28 lines\n"); + else if(res == SIZ_35ROWS) + printf("change screen resolution to 35 lines\n"); + else if(res == SIZ_40ROWS) + printf("change screen resolution to 40 lines\n"); + else if(res == SIZ_43ROWS) + printf("change screen resolution to 43 lines\n"); + else if(res == SIZ_50ROWS) + printf("change screen resolution to 50 lines\n"); + } + + if(fflag == 1) /* force 24 lines on/off */ + { + if(!strcmp(onoff, "on")) + { + fflag = 1; + } + else if(!strcmp(onoff, "off")) + { + fflag = 0; + } + else + { + fprintf(stderr,"you must specify 'on' or 'off' with -f option!\n"); + exit(1); + } + } + screeninfo.force_24lines = fflag; + + if(ioctl(fd, VGASETSCREEN, &screeninfo) == -1) + { + perror("ioctl VGASETSCREEN failed"); + exit(1); + } +success: + if(vflag) + printf("successful execution of ioctl VGASETSCREEN!\n"); + exit(0); +} + +usage() +{ + fprintf(stderr,"\nscon - screen control utility for the pcvt video driver\n"); + fprintf(stderr,"usage: scon -a -l -m -v -c [n] -d [dev] -f [on|off] -V -H -s [n]\n"); + fprintf(stderr,"usage: scon -p [default | list | i,r,g,b] | -t [sec] | -1 | -8\n"); + fprintf(stderr," -a list video adaptor type (MDA,CGA,EGA or VGA)\n"); + fprintf(stderr," -c <screen no> switch current virtual screen to <screen no>\n"); + fprintf(stderr," -d <device> set parameters(-V|-H|-s) for virtual device\n"); + fprintf(stderr," -f <on|off> force 24 lines in VT 25 lines and HP 28 lines mode\n"); + fprintf(stderr," -H set VT220/HP emulation mode for a virtual screen\n"); + fprintf(stderr," -l list current parameters for a virtual screen\n"); + fprintf(stderr," -m report monitor type (MONO/COLOR)\n"); + fprintf(stderr," -p default set default VGA palette\n"); + fprintf(stderr," -p list list current VGA palette\n"); + fprintf(stderr," -p <i,r,g,b> set VGA palette entry i to r/g/b\n"); + fprintf(stderr," -p <name,r,g,b> set VGA palette entry for color name to r/g/b\n"); + fprintf(stderr," -s <lines> set 25, 28, 35, 40, 43 or 50 lines for a virtual screen\n"); + fprintf(stderr," -t <timeout> set screen saver timeout [seconds]\n"); + fprintf(stderr," -1 set 132 columns mode\n"); + fprintf(stderr," -8 set 80 columns mode\n"); + fprintf(stderr," -v verbose mode\n"); + fprintf(stderr," -V set pure VT220 emulation for a virtual screen\n"); + fprintf(stderr," -? display help (this message)\n\n"); + exit(1); +} + +printadaptor(fd) +int fd; +{ + if(ioctl(fd, VGAGETSCREEN, &screeninfo) == -1) + { + perror("ioctl VGAGETSCREEN failed"); + exit(1); + } + switch(screeninfo.adaptor_type) + { + default: + case UNKNOWN_ADAPTOR: + printf("UNKNOWN\n"); + break; + + case MDA_ADAPTOR: + printf("MDA\n"); + break; + + case CGA_ADAPTOR: + printf("CGA\n"); + break; + + case EGA_ADAPTOR: + printf("EGA\n"); + break; + + case VGA_ADAPTOR: + printf("VGA\n"); + break; + } +} + +printmonitor(fd) +int fd; +{ + if(ioctl(fd, VGAGETSCREEN, &screeninfo) == -1) + { + perror("ioctl VGAGETSCREEN failed"); + exit(1); + } + switch(screeninfo.monitor_type) + { + default: + printf("UNKNOWN\n"); + break; + + case MONITOR_MONO: + printf("MONO\n"); + break; + + case MONITOR_COLOR: + printf("COLOR\n"); + break; + } +} + +char *vga_type(int number) +{ + static char *vga_tab[] = { + "Generic VGA", + "ET4000", + "ET3000", + "PVGA1A", + "WD90C00", + "WD90C10", + "WD90C11", + "VIDEO 7 VEGA", + "VIDEO 7 FAST", + "VIDEO 7 VER5", + "VIDEO 7 1024I", + "Unknown VIDEO 7", + "TVGA 8800BR", + "TVGA 8800CS", + "TVGA 8900B", + "TVGA 8900C", + "TVGA 8900CL", + "TVGA 9000", + "TVGA 9100", + "TVGA 9200", + "Unknown TRIDENT", + "S3 80C911", + "S3 80C924", + "S3 80C801/80C805", + "S3 80C928", + "Unknown S3", + "CL-GD5402", + "CL-GD5402r1", + "CL-GD5420", + "CL-GD5420r1", + "CL-GD5422", + "CL-GD5424", + "CL-GD5426", + "CL-GD5428", + + }; + return(vga_tab[number]); +} + +char *vga_family(int number) +{ + static char *vga_tab[] = { + "Generic VGA", + "Tseng Labs", + "Western Digital", + "Video Seven", + "Trident", + "S3 Incorporated", + "Cirrus Logic", + }; + return(vga_tab[number]); +} + +printinfo(fd) +int fd; +{ + if(ioctl(fd, VGAGETSCREEN, &screeninfo) == -1) + { + perror("ioctl VGAGETSCREEN failed"); + exit(1); + } + + printf( "\nVideo Adaptor Type = "); + + switch(screeninfo.adaptor_type) + { + default: + case UNKNOWN_ADAPTOR: + printf("UNKNOWN Video Adaptor\n"); + break; + + case MDA_ADAPTOR: + printf("MDA - Monochrome Display Adaptor\n"); + break; + + case CGA_ADAPTOR: + printf("CGA - Color Graphics Adaptor\n"); + break; + + case EGA_ADAPTOR: + printf("EGA - Enhanced Graphics Adaptor\n"); + break; + + case VGA_ADAPTOR: + printf("VGA - Video Graphics Adaptor/Array\n"); + printf(" VGA Chipset Manufacturer = %s\n", + vga_family(screeninfo.vga_family)); + printf(" VGA Chipset Type = %s\n", + vga_type(screeninfo.vga_type)); + printf(" Support for 132 Column Mode = %s\n", + screeninfo.vga_132 ? "Yes" : "No"); + break; + } + + printf( "Display Monitor Type = "); + + switch(screeninfo.monitor_type) + { + default: + printf("UNKNOWN Monitor Type\n"); + break; + + case MONITOR_MONO: + printf("Monochrome Monitor\n"); + break; + + case MONITOR_COLOR: + printf("Color Monitor\n"); + break; + } + + printf( "Number of Downloadable Fonts = %d\n",screeninfo.totalfonts); + printf( "Number of Virtual Screens = %d\n",screeninfo.totalscreens); + printf( "Info Request Screen Number = %d\n",screeninfo.screen_no); + printf( "Current Displayed Screen = %d\n",screeninfo.current_screen); + + if(screeninfo.pure_vt_mode == M_PUREVT) + printf( "Terminal Emulation Mode = VT220\n"); + else + printf( "Terminal Emulation Mode = VT220 with HP Features\n"); + + printf( "Lines = "); + + switch(screeninfo.screen_size) + { + case SIZ_25ROWS: + printf( "25\n"); + break; + + case SIZ_28ROWS: + printf( "28\n"); + break; + + case SIZ_35ROWS: + printf( "35\n"); + break; + + case SIZ_40ROWS: + printf( "40\n"); + break; + + case SIZ_43ROWS: + printf( "43\n"); + break; + + case SIZ_50ROWS: + printf( "50\n"); + break; + + default: + printf( "UNKNOWN\n"); + break; + } + printf( "Force 24 Lines = %s", + screeninfo.force_24lines ? "Yes" : "No"); + + printf("\n\n"); +} + +static const char *findname(unsigned idx) +{ + /* try to find a name for palette entry idx */ + /* if multiple names exist, returns first matching */ + register struct colname *cnp; + + for(cnp = colnames; cnp->name; cnp++) + if(cnp->idx == idx) + return cnp->name; + + /* not found */ + return (const char *)NULL; +} + +static void printpalette(int fd) +{ + register unsigned idx, last; + + for(idx = 0; idx < NVGAPEL; idx++) + { + struct vgapel p; + p.idx = idx; + if(ioctl(fd, VGAREADPEL, &p) < 0) + { + perror("ioctl(VGAREADPEL)"); + exit(2); + } + palette[idx].r = p.r; + palette[idx].g = p.g; + palette[idx].b = p.b; + } + + /* find last non-empty entry */ + for(last = NVGAPEL - 1; last; last--) + if(palette[last].r || palette[last].g || palette[last].b) + break; + + if(last != NVGAPEL - 1) + last++; + + /* now, everything's collected. print out table */ + printf("VGA palette status\n"); + printf("index red green blue name\n"); + for(idx = 0; idx < last; idx++) + { + const char *cp; + printf("%5d %5d %5d %5d", + idx, palette[idx].r, palette[idx].g, palette[idx].b); + if(cp = findname(idx)) + printf(" %s\n", cp); + else + putchar('\n'); + } + putchar('\n'); +} + + +static void parsepopt(char *arg, unsigned *idx, + unsigned *r, unsigned *g, unsigned *b) +{ + char firstarg[21]; + register unsigned i; + + if(sscanf(arg, "%20[a-zA-Z0-9]%*[,:]%u,%u,%u", firstarg, r, g, b) < 4 + || strlen(firstarg) == 0) { + fprintf(stderr, "too few args in -p i,r,g,b\n"); + exit(2); + } + + if(firstarg[0] >= '0' && firstarg[0] <= '9') { + *idx = strtoul(firstarg, NULL, 10); + return; + } + + for(i = 0; colnames[i].name; i++) + if(strcasecmp(colnames[i].name, firstarg) == 0) { + *idx = colnames[i].idx; + return; + } + fprintf(stderr, "arg ``%s'' in -p option not recognized\n", + firstarg); + exit(2); +} diff --git a/usr.sbin/pcvt/set2061/CAUTION b/usr.sbin/pcvt/set2061/CAUTION new file mode 100644 index 0000000..e1eba06 --- /dev/null +++ b/usr.sbin/pcvt/set2061/CAUTION @@ -0,0 +1,28 @@ +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION + + THE USE OF THIS PROGRAM MAY DESTROY YOUR MONITOR !!! + ==================================================== + + IF YOU DON'T KNOW WHAT YOU ARE DOING, STAY AWAY FROM IT !!! + =========================================================== + + THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND + ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT + LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY + AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, + INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF + SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR + PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND + ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) + ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, + EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION + diff --git a/usr.sbin/pcvt/set2061/ICD2061Aalt.c b/usr.sbin/pcvt/set2061/ICD2061Aalt.c new file mode 100644 index 0000000..248476a --- /dev/null +++ b/usr.sbin/pcvt/set2061/ICD2061Aalt.c @@ -0,0 +1,297 @@ +/* + * This code is derived from code available from the STB bulletin board + */ + +/* $XFree86: mit/server/ddx/x386/common_hw/ICD2061Aalt.c,v 2.6 1994/04/15 05:10:30 dawes Exp $ */ + +#ifndef KERNEL +#include "compiler.h" +#else +#define GCCUSESGAS +#define PCVT_STANDALONE 1 +#endif + +#define SEQREG 0x03C4 +#define MISCREG 0x03C2 +#define MISCREAD 0x03CC + +double fref = 14.31818 * 2.0; +char ascclk[] = "VIDEO CLOCK ?"; + +unsigned short clknum; +unsigned short vlbus_flag; +unsigned short card; +unsigned short crtcaddr; +unsigned short clockreg; + +static double range[15] = {50.0, 51.0, 53.2, 58.5, 60.7, 64.4, 66.8, 73.5, + 75.6, 80.9, 83.2, 91.5, 100.0, 120.0, 120.0}; + +#ifdef __STDC__ +static double genratio(unsigned int *p, unsigned int *q, double tgt); +static double f(unsigned int p, unsigned int q, double basefreq); +#if 0 +static void prtbinary(unsigned int size, unsigned int val); +#endif +static void wait_vb(); +static void wrt_clk_bit(unsigned int value); +static void init_clock(unsigned long setup, unsigned short crtcport); +#else +static double genratio(); +static double f(); +#if 0 +static void prtbinary(); +#endif +static void wait_vb(); +static void wrt_clk_bit(); +static void init_clock(); +#endif + +void AltICD2061SetClock(frequency, select) +register long frequency; /* in Hz */ +int select; +{ + unsigned int m, mval, ival; + int i; + long dwv; + double realval; + double freq, fvco; + double dev, devx; + double delta, deltax; + unsigned int p, q; + unsigned int bestp, bestq; + unsigned char tmp; + + crtcaddr=(inb(0x3CC) & 0x01) ? 0x3D4 : 0x3B4; + + + outb(crtcaddr, 0x11); /* Unlock CRTC registers */ + tmp = inb(crtcaddr + 1); + outb(crtcaddr + 1, tmp & ~0x80); + + outw(crtcaddr, 0x4838); /* Unlock S3 register set */ + outw(crtcaddr, 0xA039); + + clknum = select; + + freq = ((double)frequency)/1000000.0; + if (freq > range[14]) + freq =range[14]; + else if (freq <= 6.99) + freq = 7.0; + +/* + * Calculate values to load into ICD 2061A clock chip to set frequency + */ + delta = 999.0; + dev = 999.0; + ival = 99; + mval = 99; + + fvco = freq / 2; + for (m = 0; m < 8; m++) { + fvco *= 2.0; + for (i = 14; i >= 0; i--) + if (fvco >= range[i]) + break; + if (i < 0) + continue; + if (i == 14) + break; + devx = (fvco - (range[i] + range[i+1])/2)/fvco; + if (devx < 0) + devx = -devx; + deltax = genratio(&p, &q, fvco); + if (delta < deltax) + continue; + if (deltax < delta || devx < dev) { + bestp = p; + bestq = q; + delta = deltax; + dev = devx; + ival = i; + mval = m; + } + } + fvco = fref; + for (m=0; m<mval; m++) + fvco /= 2.0; + realval = f(bestp, bestq, fvco); + dwv = ((((((long)ival << 7) | bestp) << 3) | mval) << 7) | bestq; + +/* + * Write ICD 2061A clock chip + */ + init_clock(((unsigned long)dwv) | (((long)clknum) << 21), crtcaddr); + + wait_vb(); + wait_vb(); + wait_vb(); + wait_vb(); + wait_vb(); + wait_vb(); + wait_vb(); /* 0.10 second delay... */ +} + +static double f(p, q, base) + unsigned int p; + unsigned int q; + double base; + { + return(base * (p + 3)/(q + 2)); + } + +static double genratio(p, q, tgt) + unsigned int *p; + unsigned int *q; + double tgt; + { + int k, m; + double test, mindiff; + unsigned int mmax; + + mindiff = 999999999.0; + for (k = 13; k < 69; k++) { /* q={15..71}:Constraint 2 on page 14 */ + m = 50.0*k/fref - 3; + if (m < 0) + m = 0; + mmax = 120*k/fref - 3; /* m..mmax is constraint 3 on page 14 */ + if (mmax > 128) + mmax = 128; + while (m < mmax) { + test = f(m, k, fref) - tgt; + if (test < 0) test = -test; + if (mindiff > test) { + mindiff = test; + *p = m; + *q = k; + } + m++; + } + } + return (mindiff); + } + +#if 0 +static void prtbinary(size, val) + unsigned int size; + unsigned int val; + { + unsigned int mask; + int k; + + mask = 1; + + for (k=size; --k > 0 || mask <= val/2;) + mask <<= 1; + + while (mask) { + fputc((mask&val)? '1': '0' , stderr); + mask >>= 1; + } + } +#endif + +static void wait_vb() + { + while ((inb(crtcaddr+6) & 0x08) == 0) + ; + while (inb(crtcaddr+6) & 0x08) + ; + } + + +#ifdef __STDC__ +static void init_clock(unsigned long setup, unsigned short crtcport) +#else +static void init_clock(setup, crtcport) + unsigned long setup; + unsigned short crtcport; +#endif + { + unsigned char nclk[2], clk[2]; + unsigned short restore42; + unsigned short oldclk; + unsigned short bitval; + int i; + unsigned char c; + +#ifndef PCVT_STANDALONE + (void)xf86DisableInterrupts(); +#endif + + oldclk = inb(0x3CC); + + outb(crtcport, 0x42); + restore42 = inb(crtcport+1); + + outw(0x3C4, 0x0100); + + outb(0x3C4, 1); + c = inb(0x3C5); + outb(0x3C5, 0x20 | c); + + outb(crtcport, 0x42); + outb(crtcport+1, 0x03); + + outw(0x3C4, 0x0300); + + nclk[0] = oldclk & 0xF3; + nclk[1] = nclk[0] | 0x08; + clk[0] = nclk[0] | 0x04; + clk[1] = nclk[0] | 0x0C; + + outb(crtcport, 0x42); + i = inw(crtcport); + + outw(0x3C4, 0x0100); + + wrt_clk_bit(oldclk | 0x08); + wrt_clk_bit(oldclk | 0x0C); + for (i=0; i<5; i++) { + wrt_clk_bit(nclk[1]); + wrt_clk_bit(clk[1]); + } + wrt_clk_bit(nclk[1]); + wrt_clk_bit(nclk[0]); + wrt_clk_bit(clk[0]); + wrt_clk_bit(nclk[0]); + wrt_clk_bit(clk[0]); + for (i=0; i<24; i++) { + bitval = setup & 0x01; + setup >>= 1; + wrt_clk_bit(clk[1-bitval]); + wrt_clk_bit(nclk[1-bitval]); + wrt_clk_bit(nclk[bitval]); + wrt_clk_bit(clk[bitval]); + } + wrt_clk_bit(clk[1]); + wrt_clk_bit(nclk[1]); + wrt_clk_bit(clk[1]); + + outb(0x3C4, 1); + c = inb(0x3C5); + outb(0x3C5, 0xDF & c); + + outb(crtcport, 0x42); + outb(crtcport+1, restore42); + + outb(0x3C2, oldclk); + + outw(0x3C4, 0x0300); + +#ifndef PCVT_STANDALONE + xf86EnableInterrupts(); +#endif + + } + +static void wrt_clk_bit(value) + unsigned int value; + { + int j; + + outb(0x3C2, value); + for (j=2; --j; ) + inb(0x200); + } diff --git a/usr.sbin/pcvt/set2061/Makefile b/usr.sbin/pcvt/set2061/Makefile new file mode 100644 index 0000000..ac9d317 --- /dev/null +++ b/usr.sbin/pcvt/set2061/Makefile @@ -0,0 +1,13 @@ +PROG= set2061 +SRCS= main.c ICD2061Aalt.c +CFLAGS+= -DGCCUSESGAS -DPCVT_STANDALONE +NOMAN= + +all: $(PROG) + +install: ${DEMOS} + @echo "set2061 is not installed automatically ...." + +.include <bsd.prog.mk> + +$(PROG): compiler.h diff --git a/usr.sbin/pcvt/set2061/README b/usr.sbin/pcvt/set2061/README new file mode 100644 index 0000000..76109f9 --- /dev/null +++ b/usr.sbin/pcvt/set2061/README @@ -0,0 +1,22 @@ +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION + + THE USE OF THIS PROGRAM MAY DESTROY YOUR MONITOR !!! + ==================================================== + + IF YOU DON'T KNOW WHAT YOU ARE DOING, STAY AWAY FROM IT !!! + =========================================================== + +Read the file "CAUTION" before proceeding !!! + +The files: + + ICD2061Aalt.c and + compiler.h + +come from the Xfree86 2.1 distribution and have been slightly modified to +fit in a non-XFree environment. + +I use it to program the clock generator ICD2061a on my S3 928 based ELSA +Winner VGA board to 40MHz for clock generator #2: set2061 -n2 -f40000000. + +This enables me to use 132 columns mode on this VGA board. diff --git a/usr.sbin/pcvt/set2061/compiler.h b/usr.sbin/pcvt/set2061/compiler.h new file mode 100644 index 0000000..3a0e99a --- /dev/null +++ b/usr.sbin/pcvt/set2061/compiler.h @@ -0,0 +1,341 @@ +/* $XFree86: mit/server/ddx/x386/common/compiler.h,v 2.3 1993/10/03 14:55:28 dawes Exp $ */ +/* + * Copyright 1990,91 by Thomas Roell, Dinkelscherben, Germany. + * + * Permission to use, copy, modify, distribute, and sell this software and its + * documentation for any purpose is hereby granted without fee, provided that + * the above copyright notice appear in all copies and that both that + * copyright notice and this permission notice appear in supporting + * documentation, and that the name of Thomas Roell not be used in + * advertising or publicity pertaining to distribution of the software without + * specific, written prior permission. Thomas Roell makes no representations + * about the suitability of this software for any purpose. It is provided + * "as is" without express or implied warranty. + * + * THOMAS ROELL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, + * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO + * EVENT SHALL THOMAS ROELL BE LIABLE FOR ANY SPECIAL, INDIRECT OR + * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, + * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER + * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR + * PERFORMANCE OF THIS SOFTWARE. + * + * $Header: /proj/X11/mit/server/ddx/x386/RCS/compiler.h,v 1.2 1991/06/27 00:01:11 root Exp $ + */ + + +#ifndef _COMPILER_H +#define _COMPILER_H + +#ifndef __STDC__ +# ifdef signed +# undef signed +# endif +# ifdef volatile +# undef volatile +# endif +# ifdef const +# undef const +# endif +# define signed /**/ +# ifdef __GNUC__ +# define volatile __volatile__ +# define const __const__ +# else +# define const /**/ +# endif /* __GNUC__ */ +#endif /* !__STDC__ */ + +#ifdef NO_INLINE + +extern void outb(); +extern void outw(); +extern unsigned int inb(); +extern unsigned int inw(); +#if NeedFunctionPrototypes +extern unsigned char rdinx(unsigned short, unsigned char); +extern void wrinx(unsigned short, unsigned char, unsigned char); +extern void modinx(unsigned short, unsigned char, unsigned char, unsigned char); +extern int testrg(unsigned short, unsigned char); +extern int textinx2(unsigned short, unsigned char, unsigned char); +extern int textinx(unsigned short, unsigned char); +#else /* NeedFunctionProtoypes */ +extern unsigned char rdinx(); +extern void wrinx(); +extern void modinx(); +extern int testrg(); +extern int textinx2(); +extern int textinx(); +#endif /* NeedFunctionProtoypes */ + +#else /* NO_INLINE */ + +#ifdef __GNUC__ + +#ifndef FAKEIT +#ifdef GCCUSESGAS + +/* + * If gcc uses gas rather than the native assembler, the syntax of these + * inlines has to be different. DHD + */ + +static __inline__ void +outb(port, val) +short port; +char val; +{ + __asm__ __volatile__("outb %0,%1" : :"a" (val), "d" (port)); +} + + +static __inline__ void +outw(port, val) +short port; +short val; +{ + __asm__ __volatile__("outw %0,%1" : :"a" (val), "d" (port)); +} + +static __inline__ unsigned int +inb(port) +short port; +{ + unsigned char ret; + __asm__ __volatile__("inb %1,%0" : + "=a" (ret) : + "d" (port)); + return ret; +} + +static __inline__ unsigned int +inw(port) +short port; +{ + unsigned short ret; + __asm__ __volatile__("inw %1,%0" : + "=a" (ret) : + "d" (port)); + return ret; +} + +#else /* GCCUSESGAS */ + +static __inline__ void +outb(port, val) + short port; + char val; +{ + __asm__ __volatile__("out%B0 (%1)" : :"a" (val), "d" (port)); +} + +static __inline__ void +outw(port, val) + short port; + short val; +{ + __asm__ __volatile__("out%W0 (%1)" : :"a" (val), "d" (port)); +} + +static __inline__ unsigned int +inb(port) + short port; +{ + unsigned char ret; + __asm__ __volatile__("in%B0 (%1)" : + "=a" (ret) : + "d" (port)); + return ret; +} + +static __inline__ unsigned int +inw(port) + short port; +{ + unsigned short ret; + __asm__ __volatile__("in%W0 (%1)" : + "=a" (ret) : + "d" (port)); + return ret; +} + +#endif /* GCCUSESGAS */ + +#else /* FAKEIT */ + +static __inline__ void +outb(port, val) + short port; + char val; +{ +} + +static __inline__ void +outw(port, val) + short port; + short val; +{ +} + +static __inline__ unsigned int +inb(port) + short port; +{ + return 0; +} + +static __inline__ unsigned int +inw(port) + short port; +{ + return 0; +} + +#endif /* FAKEIT */ + +#else /* __GNUC__ */ +#if !defined(AMOEBA) && !defined(_MINIX) +# if defined(__STDC__) && (__STDC__ == 1) +# define asm __asm +# endif +# ifdef SVR4 +# include <sys/types.h> +# ifndef __USLC__ +# define __USLC__ +# endif +# endif +# include <sys/inline.h> +#endif +#endif + +/* + *----------------------------------------------------------------------- + * Port manipulation convenience functions + *----------------------------------------------------------------------- + */ + +#ifndef __GNUC__ +#define __inline__ /**/ +#endif + +/* + * rdinx - read the indexed byte port 'port', index 'ind', and return its value + */ +static __inline__ unsigned char +#ifdef __STDC__ +rdinx(unsigned short port, unsigned char ind) +#else +rdinx(port, ind) +unsigned short port; +unsigned char ind; +#endif +{ + if (port == 0x3C0) /* reset attribute flip-flop */ + (void) inb(0x3DA); + outb(port, ind); + return(inb(port+1)); +} + +/* + * wrinx - write 'val' to port 'port', index 'ind' + */ +static __inline__ void +#ifdef __STDC__ +wrinx(unsigned short port, unsigned char ind, unsigned char val) +#else +wrinx(port, ind, val) +unsigned short port; +unsigned char ind, val; +#endif +{ + outb(port, ind); + outb(port+1, val); +} + +/* + * modinx - in register 'port', index 'ind', set the bits in 'mask' as in 'new'; + * the other bits are unchanged. + */ +static __inline__ void +#ifdef __STDC__ +modinx(unsigned short port, unsigned char ind, + unsigned char mask, unsigned char new) +#else +modinx(port, ind, mask, new) +unsigned short port; +unsigned char ind, mask, new; +#endif +{ + unsigned char tmp; + + tmp = (rdinx(port, ind) & ~mask) | (new & mask); + wrinx(port, ind, tmp); +} + +/* + * tstrg - returns true iff the bits in 'mask' of register 'port' are + * readable & writable. + */ + +static __inline__ int +#ifdef __STDC__ +testrg(unsigned short port, unsigned char mask) +#else +tstrg(port, mask) +unsigned short port; +unsigned char mask; +#endif +{ + unsigned char old, new1, new2; + + old = inb(port); + outb(port, old & ~mask); + new1 = inb(port) & mask; + outb(port, old | mask); + new2 = inb(port) & mask; + outb(port, old); + return((new1 == 0) && (new2 == mask)); +} + +/* + * testinx2 - returns true iff the bits in 'mask' of register 'port', index + * 'ind' are readable & writable. + */ +static __inline__ int +#ifdef __STDC__ +testinx2(unsigned short port, unsigned char ind, unsigned char mask) +#else +testinx2(port, ind, mask) +unsigned short port; +unsigned char ind, mask; +#endif +{ + unsigned char old, new1, new2; + + old = rdinx(port, ind); + wrinx(port, ind, old & ~mask); + new1 = rdinx(port, ind) & mask; + wrinx(port, ind, old | mask); + new2 = rdinx(port, ind) & mask; + wrinx(port, ind, old); + return((new1 == 0) && (new2 == mask)); +} + +/* + * testinx - returns true iff all bits of register 'port', index 'ind' are + * readable & writable. + */ +static __inline__ int +#ifdef __STDC__ +testinx(unsigned short port, unsigned char ind) +#else +testinx(port, ind, mask) +unsigned short port; +unsigned char ind; +#endif +{ + return(testinx2(port, ind, 0xFF)); +} + +#endif /* NO_INLINE */ +#endif /* _COMPILER_H */ diff --git a/usr.sbin/pcvt/set2061/main.c b/usr.sbin/pcvt/set2061/main.c new file mode 100644 index 0000000..03a482d --- /dev/null +++ b/usr.sbin/pcvt/set2061/main.c @@ -0,0 +1,112 @@ +/* + * Copyright (c) 1994 Hellmuth Michaelis + * + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by + * Hellmuth Michaelis + * 4. The name authors may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + * + */ + +static char *id = + "@(#)set2061.c, 1.00, Last Edit-Date: [Sun Jan 15 19:52:05 1995]"; + +/*---------------------------------------------------------------------------* + * + * history: + * + * -hm start using 132 columns on my Elsa Winner + * + *---------------------------------------------------------------------------*/ + +#include <stdio.h> +#include <fcntl.h> +#include <machine/pcvt_ioctl.h> + +#define DEFAULTFD 0 + +void AltICD2061SetClock(long frequency, int select); + +main(argc,argv) +int argc; +char *argv[]; +{ + extern int optind; + extern int opterr; + extern char *optarg; + + int fd; + int c; + long freq = -1; + int no = -1; + + while( (c = getopt(argc, argv, "f:n:")) != EOF) + { + switch(c) + { + case 'f': + freq = atoi(optarg); + break; + + case 'n': + no = atoi(optarg); + break; + + case '?': + default: + usage(); + break; + } + } + + if(freq == -1 || no == -1) + usage(); + + if((fd = open("/dev/console", O_RDONLY)) < 0) + fd = DEFAULTFD; + + if(ioctl(fd, KDENABIO, 0) < 0) + { + perror("ioctl(KDENABIO)"); + return 1; + } + + AltICD2061SetClock(freq, no); + + (void)ioctl(fd, KDDISABIO, 0); + + exit(0); +} + +usage() +{ + fprintf(stderr,"\nset2061 - program the ICD2061 video clock chip\n"); + fprintf(stderr,"usage: set2061 -f <freq> -n <no>\n"); + fprintf(stderr," -f <freq> frequency in Hz\n"); + fprintf(stderr," -n <no> clock generator number\n"); + exit(1); +} + diff --git a/usr.sbin/pcvt/userkeys/Makefile b/usr.sbin/pcvt/userkeys/Makefile new file mode 100644 index 0000000..b405546 --- /dev/null +++ b/usr.sbin/pcvt/userkeys/Makefile @@ -0,0 +1,18 @@ + +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +PROG= vt220keys +CLEANFILES+= core.vt220keys vt220keys.core + +.include <bsd.prog.mk> + +.endif diff --git a/usr.sbin/pcvt/userkeys/vt220keys.1 b/usr.sbin/pcvt/userkeys/vt220keys.1 new file mode 100644 index 0000000..cff95bf --- /dev/null +++ b/usr.sbin/pcvt/userkeys/vt220keys.1 @@ -0,0 +1,131 @@ +.TH VT220 1 +.UC 4 +.SH NAME +vt220 \- define SHIFTED function keys on VT220 terminal +.SH SYNTAX +.B vt220 +[ +.B \-cil +] +[ keyname keystring ] ... +.SH DESCRIPTION +.I Vt220 +sets up a "vt220 terminal" in vt200 mode to allow user +definition of the SHIFTED function keys. Each +\f2keyname\f1 specified on the command line will be loaded with +the corresponding \f2keystring\f1. +A \f2keyname\f1 is one of the following "words": +F6 F7 F8 F9 F10 F11 ESC F12 BS F13 LF F14 HELP DO F17 F18 F19 F20. +\f2Keystrings\f1 +must be quoted if spaces, tabs, or shell metacharacters are included. +.PP +.B Vt220 +expects to receive some combination of option flags and/or +argument pair(s), otherwised an usage message +is printed. +.PP +The options are: +.TP +.B \-c +Clears all SHIFTED function key definitions before setting them to user +defined strings. +.TP +.B \-i +Read the initialization file +.I $HOME/.vt220rc +for SHIFTED function key definitions. This is done before any +argument pair specified on the command line is processed. +Each line in the file must consist of two fields (separated by spaces +or tabs) where the first field is the +\f2keyname\f1 and the second field is the \f2keystring\f1. +The second field extends to the end of the line, thus a +\f2keystring\f1 +may include spaces or tabs. A newline (return) may be specified +within the string by using the C Language notation for newline (\\n). +.TP +.B \-l +Locks the function keys from further definition. +Locking occurs after processing the initialization file (if the "i" +option is specified) and any argument +pairs. +The only way +to unlock is by turning the power off. +.SH EXAMPLES +vt220 -ci +.br +vt220 F6 'nroff -ms ' +.br +vt220 -i F20 'cc -O -c ' +.br +vt220 -l HELP man +.SH "OTHER FEATURES" +Pressing the function keys without using the shift key, generates +a string of characters. With +\f2csh\f1(1) this string can be aliased to some command. For example: +.br + alias ^[[17~ "ls -CR | more" +.br +where ^[[17~ is what is generated by pressing the F6 key. Therefore +F6 can perform two commands, depending if pressed with/without the SHIFT +key. +.PP +.B Vt220 +can be called from your .login or .profile file. Typically an user +will create a initialization file and include a line like +.br + vt220 -ci +.br +OR +.br + vt220 -cil +.br +in the above mentioned files. This way the SHIFTED function keys +will be set to your favorite commands when logging in. +.SH CAVEATS +If the SHIFTED function keys are unlocked, redefinition of a SHIFTED +function key will rewrite the old string. +.PP +There are 256 bytes available for the SHIFTED function keys. Space is +supplied on a first-come/first-serve basis. After the 256 bytes are +used, you can't define any more keys unless space is cleared. This +can be done by redefining a key to contain a string of fewer bytes. +.PP +All key definitions are stored in volatile RAM, and are lost when +terminal power is lost. +.PP +The ESC key (unshifted) no longer generates the proper escape character. This +is of particular importance since many editors require use of the +ESC key. Here are some available alternatives: +.sp +.in +.5i +The escape character can be generated by typing ^[ (control-[). +.sp +Use +.B vt220 +as follows (note ^[ is control-[) +.br +.in +.5i +vt220 ESC '^[' +.in +.br +This will require you +to press the SHIFT key and ESC to generate the escape sequence. +.sp +Some editors, allow other character(s) to be substituted for the +escape character. For example with +.B emacs +include this line in your .emacs_pro: +.br + (bind-to-key "ESC-prefix" "\\033[23~") +.br +Thus when the ESC key is pressed, emacs will allow the characters +generated (^[[23~) to perform the same function as the escape +character. +.in +.SH FILES +$HOME/.vt220rc \- initialization file +.SH "SEE ALSO" +VT220 Programmer Reference Manual +.br +VT220 Programmer Pocket Guide + diff --git a/usr.sbin/pcvt/userkeys/vt220keys.c b/usr.sbin/pcvt/userkeys/vt220keys.c new file mode 100644 index 0000000..dfde51a --- /dev/null +++ b/usr.sbin/pcvt/userkeys/vt220keys.c @@ -0,0 +1,297 @@ +/* + * Trivial program to load VT220 Function keys with strings, + * note that the values only get sent when the key is shifted + * (shoulda been an option to flip the shift set like the Z19!) + * + * Typing no args gives help, basically pairs of keyname/value + * strings. + * + * Author, Author: Barry Shein, Boston University + * + * HISTORY + {1} 30-Oct-85 Kenneth J. Lester (ken) at ektools + + Added the necessary code to read an initialization file. This + should make it easier to used this program. Also added code + that will set-up the terminal in vt200 (this saves the user the + trouble of checking if the set-up is in vt200). + + Restructed the main function to use getopt, for argument + processing. + + Alterated usage function to include new "i" option (init file) + + + -hm minor modifications for pcvt 2.0 release + +*/ + +#include <stdio.h> +#include <ctype.h> + +/* + * The default toupper() macro is stupid, will toupper anything + */ + +#ifdef toupper +#undef toupper +#endif +#define toupper(c) (islower(c) ? ((c)-' ') : c) + +#define VT200_7BIT 1 +#define ESC 033 +#define INITFILE ".vt220rc" + +struct keynames { + char *name ; + char *string ; +} keys[] = { + "F6", "17", + "F7", "18", + "F8", "19", + "F9", "20", + "F10", "21", + "F11", "23", + "ESC", "23", + "F12", "24", + "BS", "24", + "F13", "25", + "LF", "25", + "F14", "26", + "HELP", "28", + "DO", "29", + "F17", "31", + "F18", "32", + "F19", "33", + "F20", "34", + NULL, NULL +}; + +char prog[BUFSIZ]; + +main(argc,argv) + int argc; + char *argv[]; +{ + /* these are defined in the getopt routine */ + extern char *optarg; /* argument give to an option */ + extern int optind; /* argv index after option processing */ + + int option; /* option character returned by getopt */ + int initf = 0; /* read initialization file */ + int lockf = 0; /* lock keys after loading strings */ + int clearf = 0; /* clear all keys before loading strings */ + char *strcpy(); + + (void) strcpy(prog, *argv); /* store program name */ + + if(argc == 1) usage(); /* program requires options */ + + /* get options */ + while ((option = getopt(argc, argv, "cli")) != EOF) + switch(option) + { + case 'c' : + clearf++; + break; + case 'l' : + lockf++; + break; + case 'i' : + initf++; + break; + case '?' : + usage(); + } + + if (VT200_7BIT) + printf("\033[62;1\"p"); /* vt200 7 bits */ + else + printf("\033[62;2\"p"); /* vt200 8 bits */ + + if(clearf) clearkeys(); + + if (initf) getinit(); + + /* process {key, key string} pairs. Note optind is index to argv + for first pair. By adding 1 to optind insures that a pair exists + i.e. the last key has a key string. */ + + while(optind + 1 < argc) + { + dokey(argv[optind], argv[optind+1]); + optind += 2; + } + + if(lockf) lockkeys(); + + exit(0); +} + +/****************************************************************************/ + +/* + * Load the VT220 SHIFT-FNKEY value, the basic pattern is + * "\EP1;1|"+KEYNAME+"/"+VAL_AS_HEX+"\E\\" + * that is, literally what is in quotes (w/o quotes) then the + * name of the key from the keytable above (a numeric string) + * then a slash, then the string value as hex pairs then ESC-BACKSLASH + * + * Note: you can gang together key defns with semicolons but that + * would complicate things, especially error handling, so do it all + * for each pair, who cares, really. + */ + +dokey(nm,val) char *nm, *val; +{ + register char *scr; + register struct keynames *kp; + + for(scr = nm; *scr = toupper(*scr); scr++) + ; + for(kp = keys; kp->name != NULL; kp++) + if(strcmp(nm,kp->name) == 0) { + printf("%cP1;1|%s/",ESC,kp->string); + while(*val) printf("%02x",*val++); + printf("%c\\",ESC); + fflush(stdout); + return; + } + fprintf(stderr,"Bad key name: %s\n",nm); + usage(); /* bad key name, give up */ +} + +/****************************************************************************/ + +clearkeys() +{ + printf("%cP0;1|%c\\",ESC,ESC); + fflush(stdout); +} + +/****************************************************************************/ + +lockkeys() +{ + printf("%cP1;0|%c\\",ESC,ESC); + fflush(stdout); +} + +/****************************************************************************/ + +usage() +{ + int i; + + fprintf(stderr,"Usage: %s [-cil] [keyname string keyname string...]\n\n",prog); + fprintf(stderr,"The following options are available\n"); + fprintf(stderr,"\t-c\tclears keys first\n"); + fprintf(stderr,"\t-l\t[sets then] locks further setting\n"); + fprintf(stderr,"\t-i\tfirst read initialization file $HOME/%s\n",INITFILE); + fprintf(stderr,"(note that the only way to unlock is via Set-Up)\n\n"); + fprintf(stderr,"Keyname is one of:\n\t"); + for(i=0; keys[i].name != NULL; i++) + fprintf(stderr,"%s ",keys[i].name); + fprintf(stderr,"\nKeyname is SHIFTED function key that sends the string\n\n"); + fprintf(stderr,"Strings may need quoting to protect from shell\n"); + fprintf(stderr,"You must specify an option or key,string pairs\n\n"); + exit(1); +} + +/****************************************************************************/ + +/* This routine process the INITFILE. This file expects lines in the format + + <ws> keyname ws string + + Where ws is white space (spaces or tabs) and <ws> is optional white space. + The string may include spaces or tabs and need not be quoted. If the + string has the sequence of "\n" then a newline character is included in + the string. + + examples: + + F6 ls -lg\n + F7 uulog -s + +*/ + +#include <sys/types.h> +#include <sys/stat.h> + +getinit() +{ + char *home; /* user's home directory */ + char path[BUFSIZ]; /* full path name of init file */ + char buf[BUFSIZ]; /* buffer to hold 1 line from init file */ + char key[BUFSIZ]; /* buffer, to hold specified fcn key */ + char keystr[BUFSIZ]; /* string associated with fcn key */ + char *ptr; /* pointer to transverse buf */ + int i, j; /* array indices */ + int statflag; /* whether init file is regular & readable */ + struct stat statbuf; /* stat of the init file */ + FILE *fp; /* file pointer to init file */ + + /* system calls and subroutines */ + FILE *fopen(); + char *strcpy(); + char *strcat(); + char *fgets(); + char *getenv(); + + /* construct full path name for init file */ + home = getenv("HOME"); + (void) strcpy(path, home); + (void) strcat(path,"/"); + (void) strcat(path,INITFILE); + + /* check status if init file */ + if (stat(path, &statbuf) != -1) + { + statflag = statbuf.st_mode & S_IFREG && statbuf.st_mode & S_IREAD; + if (!statflag || (fp = fopen(path, "r")) == NULL) + { + fprintf(stderr, "couldn't open initalization file: %s\n", path); + exit(1); + } + + /* process lines from init file */ + while (fgets(buf, BUFSIZ, fp) != NULL) + { + /* variable initializations */ + i = 0; j = 0; + key[0] = '\0'; keystr[0] = '\0'; + ptr = buf; + + while (*ptr == ' ' || *ptr == '\t') ptr++; /*skip whitespace*/ + + if (*ptr == '\n') break; /* we hit an emtpy line */ + + while (!isspace(*ptr) && *ptr != '\0') /* get keyname */ + key[i++] = *ptr++; + key[i] = '\0'; /* place EOS in buffer */ + + while (*ptr == ' ' || *ptr == '\t') ptr++; /*skip whitespace*/ + + while (*ptr != '\n' && *ptr != '\0') /* get string */ + { + /* check if string is to include newline i.e. \n */ + if (*ptr == '\\' && *(ptr+1) == 'n') + { + keystr[j] = '\012'; + ptr++; + } + else + keystr[j] = *ptr; + j++; ptr++; + } + keystr[j] = '\0'; /* place EOS in buffer */ + dokey(key, keystr); /* load key with string */ + } + } + else + { + fprintf(stderr, "init file %s not found\n\n", path); + usage(); + } +} diff --git a/usr.sbin/pcvt/vgaio/CAUTION b/usr.sbin/pcvt/vgaio/CAUTION new file mode 100644 index 0000000..e1eba06 --- /dev/null +++ b/usr.sbin/pcvt/vgaio/CAUTION @@ -0,0 +1,28 @@ +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION + + THE USE OF THIS PROGRAM MAY DESTROY YOUR MONITOR !!! + ==================================================== + + IF YOU DON'T KNOW WHAT YOU ARE DOING, STAY AWAY FROM IT !!! + =========================================================== + + THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND + ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT + LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY + AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, + INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF + SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR + PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND + ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) + ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, + EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION +CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION CAUTION + diff --git a/usr.sbin/pcvt/vgaio/Makefile b/usr.sbin/pcvt/vgaio/Makefile new file mode 100644 index 0000000..b9289f5 --- /dev/null +++ b/usr.sbin/pcvt/vgaio/Makefile @@ -0,0 +1,35 @@ + +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +PROG= vgaio +MAN8= vgaio.${MAN8EXT} + +SRCS= vgaio.y lex.l +YACC= yacc + +#YFLAGS+= -yd # Bison +#YFLAGS+= -v # verbose + +LFLAGS+= -I +LDADD= -lm -ly -ll + +CFLAGS+= -I ${.CURDIR}/obj -I ${.CURDIR} -g + +CLEANFILES+= y.tab.h +CLEANFILES+= y.output # comment file from bison + +install: + @echo "vgaio is not installed automatically ...." + +.include <bsd.prog.mk> + +.endif diff --git a/usr.sbin/pcvt/vgaio/lex.l b/usr.sbin/pcvt/vgaio/lex.l new file mode 100644 index 0000000..5ff8622 --- /dev/null +++ b/usr.sbin/pcvt/vgaio/lex.l @@ -0,0 +1,82 @@ +%{ +/* + * Copyright (c) 1994 Joerg Wunsch + * + * All rights reserved. + * + * This program is free software. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Joerg Wunsch + * 4. The name of the developer may not be used to endorse or promote + * products derived from this software without specific prior written + * permission. + * + * THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + */ + +#ident "$Header: /b/source/CVS/src/sys/arch/i386/isa/pcvt/Util/vgaio/lex.l,v 1.1 1994/03/29 02:47:20 mycroft Exp $" + +/* + * $Log: lex.l,v $ + * Revision 1.1 1994/03/29 02:47:20 mycroft + * pcvt 3.0, with some performance enhancements by Joerg Wunsch and me. + * + * Revision 1.2 1994/01/08 17:42:58 j + * cleanup + * made multiple commands per line work + * wrote man page + * + * Revision 1.3 21.12.1994 -hm + * Added mi command for accessing the misc out register + */ + +#include <stdio.h> +#include <stdlib.h> + +#include "vgaio.h" +#include "y.tab.h" + +extern YYSTYPE yylval; + +%} + +D [0-9a-fA-F] + +%% + +cr|CR { return CR; } + +ar|AR { return AR; } + +gr|GR { return GR; } + +sr|SR { return SR; } + +mi|MI { return MI; } + +{D}({D}*) { sscanf(yytext, "%x", &yylval.num); return NUM; } + +[ \t] { /* ignore */ } + +\n { return NEWLINE; } + +. { return yytext[0]; } diff --git a/usr.sbin/pcvt/vgaio/vgaio.8 b/usr.sbin/pcvt/vgaio/vgaio.8 new file mode 100644 index 0000000..aa0c93c --- /dev/null +++ b/usr.sbin/pcvt/vgaio/vgaio.8 @@ -0,0 +1,144 @@ +.\" +.\" Copyright (c) 1994 Joerg Wunsch +.\" +.\" All rights reserved. +.\" +.\" This program is free software. +.\" +.\" Redistribution and use in source and binary forms, with or without +.\" modification, are permitted provided that the following conditions +.\" are met: +.\" 1. Redistributions of source code must retain the above copyright +.\" notice, this list of conditions and the following disclaimer. +.\" 2. Redistributions in binary form must reproduce the above copyright +.\" notice, this list of conditions and the following disclaimer in the +.\" documentation and/or other materials provided with the distribution. +.\" 3. All advertising materials mentioning features or use of this software +.\" must display the following acknowledgement: +.\" This product includes software developed by Joerg Wunsch +.\" 4. The name of the developer may not be used to endorse or promote +.\" products derived from this software without specific prior written +.\" permission. +.\" +.\" THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY EXPRESS OR +.\" IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES +.\" OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. +.\" IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT, +.\" INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT +.\" NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, +.\" DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY +.\" THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +.\" (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF +.\" THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +.\" +.\" $Header: /b/source/CVS/src/sys/arch/i386/isa/pcvt/Util/vgaio/vgaio.8,v 1.1 1994/03/29 02:47:23 mycroft Exp $ +.\" -hm updated 31.12.94 +.\" +.Dd December 31, 1994 +.Dt VGAIO 8 +.Sh NAME +.Nm vgaio +.Nd perform input/output on a Video Graphics Array +.Sh SYNOPSIS +.Nm vgaio +.Op Fl d +.Sh DESCRIPTION +.Ss Purpose +.Nm Vgaio +is used to perform register-level input/output on a Video Graphics Array. +Since some of the sequences required to access those registers are very +silly, +.Nm vgaio +cares of all the things necessary and allows the user to access the +registers of several register groups with their symbolic names. + +.Ss Options +.Bl -tag -width 10n -offset indent +.It Fl d +Turn on the grammar parser debugger. + +.El +.Ss Command language +The command language of +.Nm +constitutes of some very simple tokens and rules. Commands are executed +line by line as they are entered. Each line may contain any number of +semicolon-separated input/output commands. + +Symbolic register names look like: + +.D1 Ao Em reggroup Ac Ao Em regnumber Ac + +with +.Aq Em regnumber +being any hexadecimal number +.Pq without a leading Em 0x , +and +.Aq Em reggroup +one of the strings +.Dq Em ar , +.Dq Em cr , +.Dq Em gr , +.Dq Em mi , +or +.Dq Em sr , +standing for the +.Em Attribute controller , +.Em CRT controller , +.Em Graphics controller , +.Em Miscellaneous Output Register , +or +.Em Timing sequencer , +respectively. + +An input instruction has the form + +.D1 Ao Em regname Ac ? + +and will cause +.Nm +to output a line like + +.Bd -ragged -offset indent +.Ao Em regname Ac \& = 0x Ns +.Aq Em number +.Ed + +An output instruction looks like + +.Bd -ragged -offset indent +.Ao Em regname Ac = +.Aq Em number +.Ed + +Spaces or Tabs between the +.Aq Em reggroup , +the +.Aq Em regnumber , +or any of the other tokens are ignored. They are not required anyway. + +The +.Dq Em mi +needs a single unused argument to satisfy the syntax :-) (-hm). + + +.Ss Access control +The caller must have uid 0 in order to gain the required access to +the IO registers. + +.Sh HISTORY +This program is considered +.Dq hackware . +It has been developed in order to simplify the process of developing other +software that needs to program the Video Graphics Array. + +Remember, to use this program, your kernel has to be compiled with XSERVER +being defined ! + +.Sh AUTHOR +The program has been contributed by +.if n Joerg Wunsch, +.if t J\(:org Wunsch, +Dresden +.Aq joerg_wunsch@uriah.sax.de . + diff --git a/usr.sbin/pcvt/vgaio/vgaio.h b/usr.sbin/pcvt/vgaio/vgaio.h new file mode 100644 index 0000000..e313f86 --- /dev/null +++ b/usr.sbin/pcvt/vgaio/vgaio.h @@ -0,0 +1,60 @@ +/* + * Copyright (c) 1994 Joerg Wunsch + * + * All rights reserved. + * + * This program is free software. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Joerg Wunsch + * 4. The name of the developer may not be used to endorse or promote + * products derived from this software without specific prior written + * permission. + * + * THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + */ + +/* + * $Header + * The author may be reached unter <joerg_wunsch@uriah.sax.de> + * + * $Log: vgaio.h,v $ + * Revision 1.1 1994/03/29 02:47:25 mycroft + * pcvt 3.0, with some performance enhancements by Joerg Wunsch and me. + * + * Revision 1.2 1994/01/08 17:42:58 j + * cleanup + * made multiple commands per line work + * wrote man page + * + * + */ + +/* common structure to hold the definition for a VGA register */ + +#ifndef VGAIO_H +#define VGAIO_H + +struct reg { + int group, num; +}; + +#endif /* VGAIO_H */ diff --git a/usr.sbin/pcvt/vgaio/vgaio.y b/usr.sbin/pcvt/vgaio/vgaio.y new file mode 100644 index 0000000..0e7dd79 --- /dev/null +++ b/usr.sbin/pcvt/vgaio/vgaio.y @@ -0,0 +1,251 @@ +%{ +/* + * Copyright (c) 1994 Joerg Wunsch + * + * All rights reserved. + * + * This program is free software. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Joerg Wunsch + * 4. The name of the developer may not be used to endorse or promote + * products derived from this software without specific prior written + * permission. + * + * THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY EXPRESS OR + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES + * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. + * IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT, + * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, + * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY + * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT + * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF + * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + */ + +#ident "$Header: /b/source/CVS/src/sys/arch/i386/isa/pcvt/Util/vgaio/vgaio.y,v 1.1 1994/03/29 02:47:27 mycroft Exp $" + +/* + * $Log: vgaio.y,v $ + * Revision 1.1 1994/03/29 02:47:27 mycroft + * pcvt 3.0, with some performance enhancements by Joerg Wunsch and me. + * + * Revision 1.2 1994/01/08 17:42:58 j + * cleanup + * made multiple commands per line work + * wrote man page + * + * Revision 1.3 21.12.1994 -hm + * Added mi command for accessing the misc out register + * hex values shown as 2 fixed chars, added binary output + */ + +#include <stdio.h> +#include <stdlib.h> +#include <sys/fcntl.h> +#include <machine/cpufunc.h> +#include <machine/pcvt_ioctl.h> + +#ifdef __NetBSD__ +#include <machine/pio.h> +#endif + +#include "vgaio.h" + +void setreg(struct reg r, int val); +void getreg(struct reg r); +void yyerror(const char *msg); + +#define YYDEBUG 1 + +unsigned short vgabase; + +%} + +%union { + int num; + struct reg reg; +} + +%token MI GR CR SR AR NEWLINE +%token <num> NUM + +%type <num> reggroup +%type <reg> register + +%% + +interpret: lines ; + +lines: line + | lines line + ; + +line: statements NEWLINE + | NEWLINE + | error NEWLINE { fprintf(stderr, "bing!\n"); } + ; + +statements: statement + | statements ';' statement + ; + +statement: register '?' { getreg($1); } + | register '=' NUM { setreg($1, $3); } + | /* lambda */ + ; + +register: reggroup NUM { $$.num = $2; $$.group = $1; } + ; + +reggroup: GR { $$ = GR; } + | CR { $$ = CR; } + | SR { $$ = SR; } + | AR { $$ = AR; } + | MI { $$ = MI; } + ; + +%% + +static struct { + int id; + const char *name; +} regnames[] = { + {GR, "gr"}, {CR, "cr"}, {SR, "sr"}, {AR, "ar"}, {MI, "mi"}, + {0, 0} +}; + +const char *getname(struct reg r) { + int idx; + for(idx = 0; regnames[idx].id; idx++) + if(regnames[idx].id == r.group) + return regnames[idx].name; + return "??"; +} + +/*---------------------------------------------------------------------------* + * return ptr to string of 1's and 0's for value + *---------------------------------------------------------------------------*/ +char * +bin_str(unsigned long val, int length) +{ + static char buffer[80]; + int i = 0; + + if (length > 32) + length = 32; + + val = val << (32 - length); + + while (length--) + { + if (val & 0x80000000) + buffer[i++] = '1'; + else + buffer[i++] = '0'; + if ((length % 4) == 0 && length) + buffer[i++] = '.'; + val = val << 1; + } + return (buffer); +} + +void getreg(struct reg r) { + int val; /* FreeBSD gcc ONLY accepts an int !! */ + + switch(r.group) { + case GR: + outb(0x3ce, r.num); + val = inb(0x3cf); + break; + + case AR: + r.num &= 0x1f; + (void)inb(vgabase + 0x0a); + outb(0x3c0, r.num + 0x20); + val = inb(0x3c1); + break; + + case CR: + outb(vgabase + 4, r.num); + val = inb(vgabase + 5); + break; + + case SR: + outb(0x3c4, r.num); + val = inb(0x3c5); + break; + + case MI: + val = inb(0x3cc); + break; + } + + printf("%s%02x = 0x%02x = %s (bin)\n", getname(r), r.num, val, bin_str(val,8)); +} + +void setreg(struct reg r, int val) { + switch(r.group) { + case GR: + outb(0x3ce, r.num); + outb(0x3cf, val); + break; + + case AR: + r.num &= 0x1f; + (void)inb(vgabase + 0x0a); + outb(0x3c0, r.num); + outb(0x3c0, val); + outb(0x3c0, r.num + 0x20); + break; + + case CR: + outb(vgabase + 4, r.num); + outb(vgabase + 5, val); + break; + + case SR: + outb(0x3c4, r.num); + outb(0x3c5, val); + break; + + case MI: + outb(0x3c2, val); + break; + } + + printf("%s%02x set to 0x%02x = %s (bin) now\n", getname(r), r.num, val, bin_str(val,8)); +} + +void yyerror(const char *msg) { + fprintf(stderr, "yyerror: %s\n", msg); +} + +int main(int argc, char **argv) { + int fd; + + if(argc > 1) yydebug = 1; + + if((fd = open("/dev/console", O_RDONLY)) < 0) + fd = 0; + + if(ioctl(fd, KDENABIO, 0) < 0) { + perror("ioctl(KDENABIO)"); + return 1; + } + vgabase = (inb(0x3cc) & 1)? 0x3d0: 0x3b0; + yyparse(); + + (void)ioctl(fd, KDDISABIO, 0); + return 0; +} diff --git a/usr.sbin/pcvt/vttest/Makefile b/usr.sbin/pcvt/vttest/Makefile new file mode 100644 index 0000000..0501b16 --- /dev/null +++ b/usr.sbin/pcvt/vttest/Makefile @@ -0,0 +1,19 @@ + +.if !exists(${.CURDIR}/../Makefile.inc) +error: + @echo + @echo " You MUST link/copy" + @echo + @echo " ../Makefile.inc.NetBSD or ../Makefile.inc.FreeBSD" + @echo + @echo " to ../Makefile.inc before you can proceed !" + @echo +.else + +PROG= vttest +CFLAGS+= -traditional -DUSEMYSTTY +SRCS= main.c esc.c + +.include <bsd.prog.mk> + +.endif diff --git a/usr.sbin/pcvt/vttest/README b/usr.sbin/pcvt/vttest/README new file mode 100644 index 0000000..589d08f --- /dev/null +++ b/usr.sbin/pcvt/vttest/README @@ -0,0 +1,57 @@ +NOTES FROM THE MOD.SOURCES MODERATOR: +I split the source up into the three separate pieces it now is. +In doing this, I put lines like "int reading;" in a header file +that both C modules include. If your Unix requires one of these +to be "extern int reading;" then you will have some editing to do. +Also note that this program uses FIONREAD, which must be implemented +differently in SystemV, etc., and check out the setjmp() call... + /Rich $alz +Oh, yeah: I also wrote the Makefile and manpage, such as they are. +------------------------------------------------------------------- + +This is a program to test the compatibility (or to demonstrate the +non-compatibility) of so-called "VT100-compatible" terminals. In +conformance of the good old hacker traditions, the only documentation +of this program is the source code itself. To understand it, you also +need a copy of the original VT100 manual from DEC. + +Comments and bug reports: Since this is a release (via USENET) to the +whole world, a lot of people are going to have opinions and fresh +ideas about it. (What -- bugs in MY program? Aww...) I can't deal +with everyone sending me a hacked version, but if you have found a +serious bug, or ported it to VMS, do tell me. I can't promise any new +version release, though. From this version on (1.7b) VTTEST will have +to live its own life without its father holding its hand. + +My adress is: + +Network-mail adress: (mcvax,seismo)!enea!suadb!lindberg + +Real-world-mail address: Per Lindberg + QZ, Stockholm University Computing Center + Box 27322 + S - 102 54 Stockholm + SWEDEN + +The original version of this program is written for the Sargasso C +compiler for the DECsystem-10. Many thanks to all sales persons with +quote VT100-compatible unquote terminals, who prompted me to write +this program, and also to: + +-- Bo Kleve, LIDAC, Linkoping University, Sweden + for the portation to DECSYSTEM-20 with the Sargasso C compiler + +-- Johan Widen, TTDS, Royal Institute of Technology, Stockholm, Sweden + for the portation to various UNIX systems (incl. System III and Xenix) + +-- Russ Herman, AES Data Inc., Missisauga, Ont. Canada + for fixes and code for the VT102 test + +Thanx also to JMR "Gremlin" at KTH, and Goran Wallberg at QZ +for suggestions, bug fixes, etc. + +This program does not have support for all the different variations +of VT100, like VT125, VT131 nor the new VT200 series. Feel free to +add that yourself. Happy Hacking! + + /TMP diff --git a/usr.sbin/pcvt/vttest/esc.c b/usr.sbin/pcvt/vttest/esc.c new file mode 100644 index 0000000..520946b --- /dev/null +++ b/usr.sbin/pcvt/vttest/esc.c @@ -0,0 +1,398 @@ +#include "header.h" + +println(s) char *s; { + printf("%s\n", s); +} + +esc(s) char *s; { + printf("%c%s", 27, s); +} + +esc2(s1, s2) char s1, s2; { + printf("%c%s%s", 27, s1, s2); +} + +brcstr(ps, c) char *ps, c; { + printf("%c[%s%c", 27, ps, c); +} + +brc(pn,c) int pn; char c; { + printf("%c[%d%c", 27, pn, c); +} + +brc2(pn1, pn2 ,c) int pn1, pn2; char c; { + printf("%c[%d;%d%c", 27, pn1, pn2, c); +} + +cub(pn) int pn; { /* Cursor Backward */ + brc(pn,'D'); +} +cud(pn) int pn; { /* Cursor Down */ + brc(pn,'B'); +} +cuf(pn) int pn; { /* Cursor Forward */ + brc(pn,'C'); +} +cup(pn1, pn2) int pn1, pn2; { /* Cursor Position */ + brc2(pn1, pn2, 'H'); +} +cuu(pn) int pn; { /* Cursor Up */ + brc(pn,'A'); +} +da() { /* Device Attributes */ + brc(0,'c'); +} +decaln() { /* Screen Alignment Display */ + esc("#8"); +} +decdhl(lower) int lower; { /* Double Height Line (also double width) */ + if (lower) esc("#4"); + else esc("#3"); +} +decdwl() { /* Double Wide Line */ + esc("#6"); +} +deckpam() { /* Keypad Application Mode */ + esc("="); +} +deckpnm() { /* Keypad Numeric Mode */ + esc(">"); +} +decll(ps) char *ps; { /* Load LEDs */ + brcstr(ps, 'q'); +} +decrc() { /* Restore Cursor */ + esc("8"); +} +decreqtparm(pn) int pn; { /* Request Terminal Parameters */ + brc(pn,'x'); +} +decsc() { /* Save Cursor */ + esc("7"); +} +decstbm(pn1, pn2) int pn1, pn2; { /* Set Top and Bottom Margins */ + if (pn1 || pn2) brc2(pn1, pn2, 'r'); + else esc("[r"); + /* Good for >24-line terminals */ +} +decswl() { /* Single With Line */ + esc("#5"); +} +dectst(pn) int pn; { /* Invoke Confidence Test */ + brc2(2, pn, 'y'); +} +dsr(pn) int pn; { /* Device Status Report */ + brc(pn, 'n'); +} +ed(pn) int pn; { /* Erase in Display */ + brc(pn, 'J'); +} +el(pn) int pn; { /* Erase in Line */ + brc(pn,'K'); +} +hts() { /* Horizontal Tabulation Set */ + esc("H"); +} +hvp(pn1, pn2) int pn1, pn2; { /* Horizontal and Vertical Position */ + brc2(pn1, pn2, 'f'); +} +ind() { /* Index */ + esc("D"); +} +nel() { /* Next Line */ + esc("E"); +} +ri() { /* Reverse Index */ + esc("M"); +} +ris() { /* Reset to Initial State */ + esc("c"); +} +rm(ps) char *ps; { /* Reset Mode */ + brcstr(ps, 'l'); +} +scs(g,c) int g; char c; { /* Select character Set */ + printf("%c%c%c%c%c%c%c", 27, g ? ')' : '(', c, + 27, g ? '(' : ')', 'B', + g ? 14 : 15); +} +sgr(ps) char *ps; { /* Select Graphic Rendition */ + brcstr(ps, 'm'); +} +sm(ps) char *ps; { /* Set Mode */ + brcstr(ps, 'h'); +} +tbc(pn) int pn; { /* Tabulation Clear */ + brc(pn, 'g'); +} + +vt52cup(l,c) int l,c; { + printf("%cY%c%c", 27, l + 31, c + 31); +} + +char inchar() { + + /* + * Wait until a character is typed on the terminal + * then read it, without waiting for CR. + */ + +#ifdef UNIX + int lval, waittime, getpid(); static int val; char ch; + + fflush(stdout); + lval = val; + brkrd = 0; + reading = 1; + read(0,&ch,1); + reading = 0; + if (brkrd) + val = 0177; + else + val = ch; + if ((val==0177) && (val==lval)) + kill(getpid(), (int) SIGTERM); +#endif +#ifdef SARG10 + int val, waittime; + + waittime = 0; + while(!uuo(051,2,&val)) { /* TTCALL 2, (INCHRS) */ + zleep(100); /* Wait 0.1 seconds */ + if ((waittime += ttymode) > 600) /* Time-out, in case */ + return('\177'); /* of hung in ttybin(1) */ + } +#endif +#ifdef SARG20 /* try to fix a time-out function */ + int val, waittime; + + waittime = 0; + while(jsys(SIBE,2,_PRIIN) == 0) { /* Is input empty? */ + zleep(100); + if ((waittime += ttymode) > 600) + return('\177'); + } + ejsys(BIN,_PRIIN); + val = jsac[2]; +#endif + return(val); +} + +char *instr() { + + /* + * Get an unfinished string from the terminal: + * wait until a character is typed on the terminal, + * then read it, and all other available characters. + * Return a pointer to that string. + */ + + + int i, val, crflag; long l1; char ch; + static char result[80]; + + i = 0; + result[i++] = inchar(); +/* Wait 0.1 seconds (1 second in vanilla UNIX) */ +#ifdef SARG10 + if (trmop(01031,0) < 5) zleep(500); /* wait longer if low speed */ + else zleep(100); +#else + zleep(100); +#endif +#ifdef UNIX + fflush(stdout); +#ifdef XENIX + while(rdchk(0)) { + read(0,result+i,1); + if (i++ == 78) break; + } +#else +#ifdef SIII + while(read(2,result+i,1) == 1) + if (i++ == 78) break; +#else + while(ioctl(0,FIONREAD,&l1), l1 > 0L) { + while(l1-- > 0L) { + read(0,result+i,1); + if (i++ == 78) goto out1; + } + } +out1: +#endif +#endif +#endif +#ifdef SARG10 + while(uuo(051,2,&val)) { /* TTCALL 2, (INCHRS) */ + if (!(val == '\012' && crflag)) /* TOPS-10 adds LF to CR */ + result[i++] = val; + crflag = val == '\015'; + if (i == 79) break; + zleep(50); /* Wait 0.05 seconds */ + } +#endif +#ifdef SARG20 + while(jsys(SIBE,2,_PRIIN) != 0) { /* read input until buffer is empty */ + ejsys(BIN,_PRIIN); + result[i++] = jsac[2]; + if (i == 79) break; + zleep(50); /* Wait 0.05 seconds */ + } +#endif + result[i] = '\0'; + return(result); +} + +ttybin(bin) int bin; { +#ifdef SARG10 + #define OPEN 050 + #define IO_MOD 0000017 + #define _IOPIM 2 + #define _IOASC 0 + #define _TOPAG 01021 + #define _TOSET 01000 + + int v; + static int arglst[] = { + _IOPIM, + `TTY`, + 0 + }; + arglst[0] = bin ? _IOPIM : _IOASC; + v = uuo(OPEN, 1, &arglst[0]); + if (!v) { printf("OPEN failed"); exit(); } + trmop(_TOPAG + _TOSET, bin ? 0 : 1); + ttymode = bin; +#endif +#ifdef SARG20 + /* TTYBIN will set the line in BINARY/ASCII mode + * BINARY mode is needed to send control characters + * Bit 28 must be 0 (we don't flip it). + * Bit 29 is used for the mode change. + */ + + #define _TTASC 0000100 + #define _MOXOF 0000043 + + int v; + + ejsys(RFMOD,_CTTRM); + v = ejsys(SFMOD,_CTTRM, bin ? (~_TTASC & jsac[2]) : (_TTASC | jsac[2])); + if (v) { printf("SFMOD failed"); exit(); } + v = ejsys(MTOPR,_CTTRM,_MOXOF,0); + if (v) { printf("MTOPR failed"); exit(); } +#endif +} + +#ifdef SARG20 +/* + * SUPERBIN turns off/on all input character interrupts + * This affects ^C, ^O, ^T + * Beware where and how you use it !!!!!!! + */ + +superbin(bin) int bin; { + int v; + + v = ejsys(STIW,(0//-5), bin ? 0 : -1); + if (v) { printf("STIW superbinary setting failed"); exit(); } + ttymode = bin; +} + +/* + * PAGE affects the ^S/^Q handshake. + * Set bit 34 to turn it on. Clear it for off. + */ + +page(bin) int bin; { + int v; + + #define TT_PGM 0000002 + + ejsys(RFMOD,_CTTRM); /* Get the current terminal status */ + v = ejsys(STPAR,_CTTRM, bin ? (TT_PGM | jsac[2]) : (~TT_PGM & jsac[2])); + if (v) { printf("STPAR failed"); exit(); } +} +#endif + +trmop(fc,arg) int fc, arg; { +#ifdef SARG10 + int retvalp; + int arglst[3]; + + /* TRMOP is a TOPS-10 monitor call that does things to the terminal. */ + + /* Find out TTY nbr (PA1050 barfs if TRMOP get -1 instead of udx) */ + /* A TRMNO monitor call returns the udx (Universal Device Index) */ + + arglst[0] = fc; /* function code */ + arglst[1] = calli(0115, -1); /* udx, TRMNO. UUO */ + arglst[2] = arg; /* Optional argument */ + + if (calli(0116, 3 // &arglst[0], &retvalp)) /* TRMOP. UUO */ + return (retvalp); + else { + printf("?Error return in TRMOP."); + exit(); + } +#endif +} + +inputline(s) char *s; { + scanf("%s",s); +#ifdef SARG10 + readnl(); +#endif +#ifdef SARG20 + readnl(); +#endif +} + +inflush() { + + /* + * Flush input buffer, make sure no pending input character + */ + + int val; + +#ifdef UNIX +#ifdef XENIX + while(rdchk(0)) read(0,&val,1); +#else +#ifdef SIII + while(read(2,&val,1)); +#else + long l1; + ioctl (0, FIONREAD, &l1); + while(l1-- > 0L) read(0,&val,1); +#endif +#endif +#endif +#ifdef SARG10 + while(uuo(051,2,&val)) /* TTCALL 2, (INCHRS) */ + ; +#endif +#ifdef SARG20 + ejsys(CFIBF,_PRIIN); /* Clear input buffer */ +#endif +} + +zleep(t) int t; { + +/* + * Sleep and do nothing (don't waste CPU) for t milliseconds + */ + +#ifdef SARG10 + calli(072,t); /* (HIBER) t milliseconds */ +#endif +#ifdef SARG20 + ejsys(DISMS,t); /* DISMISS for t milliseconds */ +#endif +#ifdef UNIX + t = t / 1000; + if (t == 0) t = 1; + sleep(t); /* UNIX can only sleep whole seconds */ +#endif +} diff --git a/usr.sbin/pcvt/vttest/header.h b/usr.sbin/pcvt/vttest/header.h new file mode 100644 index 0000000..c4dcf90 --- /dev/null +++ b/usr.sbin/pcvt/vttest/header.h @@ -0,0 +1,43 @@ +#define VERSION "1.7b 1985-04-19" + +/* Choose one of these */ + +/* #define XENIX /* XENIX implies UNIX */ +/* #define SIII /* SIII implies UNIX, (NDELAY a la System III) */ +#define UNIX /* UNIX */ +/* #define VMS /* VMS not done yet -- send me your version!!!! */ +/* #define SARG20 /* Sargasso C for TOPS-20 */ +/* #define SARG10 /* Sargasso C for TOPS-10 */ + +/* These #ifdef:s are implementation dependent stuff for the Sargasso C */ +/* Unix C barfs on directives like "#strings", so we keep them */ +/* indented. Then unix c can't find them, but Sargasso C *can*. */ +/* Admittedly kludgey, but it works...) */ +#ifdef SARG10 + #define _UNIXCON /* Make UNIX-flavored I/O on TOPS */ + #strings low /* put strings in lowseg mem so we can modify them. */ +#endif +#ifdef SARG20 + #define _UNIXCON /* Make UNIX-flavored I/O on TOPS */ + #strings low /* put strings in lowseg mem so we can modify them. */ + #include <TOPS20.HDR> +#endif + +#include <stdio.h> + + +#ifdef UNIX +#include <ctype.h> +#include <sgtty.h> +#include <signal.h> +#include <setjmp.h> +jmp_buf intrenv; +struct sgttyb sgttyOrg, sgttyNew; +char stdioBuf[BUFSIZ]; +int brkrd, reading; +extern onterm(), onbrk(); +#ifdef SIII +#include <fcntl.h> +#endif +#endif +int ttymode; diff --git a/usr.sbin/pcvt/vttest/main.c b/usr.sbin/pcvt/vttest/main.c new file mode 100644 index 0000000..cb67f74 --- /dev/null +++ b/usr.sbin/pcvt/vttest/main.c @@ -0,0 +1,2016 @@ +/* + VTTEST.C + + Written Novemeber 1983 - July 1984 by Per Lindberg, + Stockholm University Computer Center (QZ), Sweden. + + THE MAD PROGRAMMER STRIKES AGAIN! + + This software is (c) 1984 by QZ + Non-commercial use and copying allowed. + +If you are developing a commercial product, and use this program to do +it, and that product is successful, please send a sum of money of your +choice to the address below. + +*/ + +#include "header.h" + +char inchar(), *instr(), *lookup(); + +struct table { + int key; + char *msg; +} paritytable[] = { + { 1, "NONE" }, + { 4, "ODD" }, + { 5, "EVEN" }, + { -1, "" } +},nbitstable[] = { + { 1, "8" }, + { 2, "7" }, + { -1,"" } +},speedtable[] = { + { 0, "50" }, + { 8, "75" }, + { 16, "110" }, + { 24, "132.5"}, + { 32, "150" }, + { 40, "200" }, + { 48, "300" }, + { 56, "600" }, + { 64, "1200" }, + { 72, "1800" }, + { 80, "2000" }, + { 88, "2400" }, + { 96, "3600" }, + { 104, "4800" }, + { 112, "9600" }, + { 120, "19200" }, + { -1, "" } +}; + +#ifdef USEMYSTTY +#ifndef stty +int stty(fd,ptr) +int fd; +struct sgttyb *ptr; +{ + return(ioctl(fd, TIOCSETP, ptr)); +} +#endif +#ifndef gtty +int gtty(fd,ptr) +int fd; +struct sgttyb *ptr; +{ + return(ioctl(fd, TIOCGETP, ptr)); +} +#endif +#endif + +main() { + + int menuchoice; + + static char *mainmenu[] = { + "Exit", + "Test of cursor movements", + "Test of screen features", + "Test of character sets", + "Test of double-sized characters", + "Test of keyboard", + "Test of terminal reports", + "Test of VT52 mode", + "Test of VT102 features (Insert/Delete Char/Line)", + "Test of known bugs", + "Test of reset and self-test", + "" + }; + +#ifdef UNIX + initterminal(setjmp(intrenv)); + signal(SIGINT, onbrk); + signal(SIGTERM, onterm); + reading = 0; +#else + initterminal(0); +#endif + do { +#ifdef SARG20 + ttybin(1); /* set line to binary mode again. It's reset somehow!! */ +#endif + ed(2); + cup(5,10); printf("VT100 test program, version %s", VERSION); + cup(7,10); println("Choose test type:"); + menuchoice = menu(mainmenu); + switch (menuchoice) { + case 1: tst_movements(); break; + case 2: tst_screen(); break; + case 3: tst_characters(); break; + case 4: tst_doublesize(); break; + case 5: tst_keyboard(); break; + case 6: tst_reports(); break; + case 7: tst_vt52(); break; + case 8: tst_insdel(); break; + case 9: tst_bugs(); break; + case 10: tst_rst(); break; + } + } while (menuchoice); + bye(); +} + +tst_movements() { + + /* Test of: + CUF (Cursor Forward) + CUB (Cursor Backward) + CUD (Cursor Down) IND (Index) NEL (Next Line) + CUU (Cursor Up) RI (Reverse Index) + CUP (Cursor Position) HVP (Horizontal and Vertical Position) + ED (Erase in Display) + EL (Erase in Line) + DECALN (Screen Alignment Display) + <CR> <BS> + Cursor control characters inside CSI sequences + */ + + int i, row, col, pass, width, hlfxtra; + char c, *ctext = "This is a correct sentence"; + + for (pass = 0; pass <= 1; pass++) { + if (pass == 0) { rm("?3"); width = 80; hlfxtra = 0; } + else { sm("?3"); width = 132; hlfxtra = 26; } + + decaln(); + cup( 9,10+hlfxtra); ed(1); + cup(18,60+hlfxtra); ed(0); el(1); + cup( 9,71+hlfxtra); el(0); + for (row = 10; row <= 16; row++) { + cup(row, 10+hlfxtra); el(1); + cup(row, 71+hlfxtra); el(0); + } + cup(17,30); el(2); + for (col = 1; col <= width; col++) { + hvp(24, col); printf("*"); + hvp( 1, col); printf("*"); + } + cup(2,2); + for (row = 2; row <= 23; row++) { + printf("+"); + cub(1); + ind(); + } + cup(23,width-1); + for (row = 23; row >=2; row--) { + printf("+"); + cub(1); ri(); + } + cup(2,1); + for (row = 2; row <= 23; row++) { + printf("*"); + cup(row, width); + printf("*"); + cub(10); + if(row < 10) + nel(); + else + printf("\n"); + } + cup(2,10); + cub(42+hlfxtra); cuf(2); + for (col = 3; col <= width-2; col++) { + printf("+"); + cuf(0); cub(2); cuf(1); + } + cup(23,70+hlfxtra); + cuf(42+hlfxtra); cub(2); + for (col = width-2; col >= 3; col--) { + printf("+"); + cub(1); cuf(1); cub(0); printf("%c", 8); + } + cup( 1, 1); cuu(10); cuu(1); cuu(0); + cup(24,width); cud(10); cud(1); cud(0); + + cup(10,12+hlfxtra); + for (row = 10; row <= 15; row++) { + for (col = 12+hlfxtra; col <= 69+hlfxtra; col++) printf(" "); + cud(1); cub(58); + } + cuu(5); cuf(1); + printf("The screen should be cleared, and have an unbroken bor-"); + cup(12,13+hlfxtra); + printf("der of *'s and +'s around the edge, and exactly in the"); + cup(13,13+hlfxtra); + printf("middle there should be a frame of E's around this text"); + cup(14,13+hlfxtra); + printf("with one (1) free position around it. "); + holdit(); + } + rm("?3"); + + ed(2); + cup(1,1); + println("Test of cursor-control characters inside ESC sequences."); + println("Below should be two identical lines:"); + println(""); + println("A B C D E F G H I J K L M N O P Q R S"); + for (i = 1; i < 20; i++) { + printf("%c", 64 + i); + brcstr("2\010", 'C'); /* Two forward, one backspace */ + } + println(""); + println(""); + holdit(); + + ed(2); + cup(1,1); + println("Test of leading zeros in ESC sequences."); + printf("Two lines below you should see the sentence \"%s\".",ctext); + for (col = 1; *ctext; col++) + printf("\033[00000000004;00000000%dH%c",col,*ctext++); + cup(20,1); + holdit(); +} + +tst_screen() { + + /* Test of: + - DECSTBM (Set Top and Bottom Margins) + - TBC (Tabulation Clear) + - HTS (Horizontal Tabulation Set) + - SM RM (Set/Reset mode): - 80/132 chars + - Origin: Realtive/absolute + - Scroll: Smooth/jump + - Wraparound + - SGR (Select Graphic Rendition) + - SM RM (Set/Reset Mode) - Inverse + - DECSC (Save Cursor) + - DECRC (Restore Cursor) + */ + + int i, j, cset, row, col, down, soft, background; + + static char *tststr = "*qx`"; + static char *attr[5] = { ";0", ";1", ";4", ";5", ";7" }; + + cup(1,1); + sm("?7"); /* Wrap Around ON */ + for (col = 1; col <= 160; col++) printf("*"); + rm("?7"); /* Wrap Around OFF */ + cup(3,1); + for (col = 1; col <= 160; col++) printf("*"); + sm("?7"); /* Wrap Around ON */ + cup(5,1); + println("This should be three identical lines of *'s completely filling"); + println("the top of the screen without any empty lines between."); + println("(Test of WRAP AROUND mode setting.)"); + holdit(); + + ed(2); + tbc(3); + cup(1,1); + for (col = 1; col <= 78; col += 3) { + cuf(3); hts(); + } + cup(1,4); + for (col = 4; col <= 78; col += 6) { + tbc(0); cuf(6); + } + cup(1,7); tbc(1); tbc(2); /* no-op */ + cup(1,1); for (col = 1; col <= 78; col += 6) printf("\t*"); + cup(2,2); for (col = 2; col <= 78; col += 6) printf(" *"); + cup(4,1); + println("Test of TAB setting/resetting. These two lines"); + printf("should look the same. "); + holdit(); + for (background = 0; background <= 1; background++) { + if (background) rm("?5"); + else sm("?5"); + sm("?3"); /* 132 cols */ + ed(2); /* VT100 clears screen on SM3/RM3, but not obviously, so... */ + cup(1,1); tbc(3); + for (col = 1; col <= 132; col += 8) { + cuf(8); hts(); + } + cup(1,1); for (col = 1; col <= 130; col += 10) printf("1234567890"); + printf("12"); + for (row = 3; row <= 20; row++) { + cup(row,row); + printf("This is 132 column mode, %s background.", + background ? "dark" : "light"); + } + holdit(); + rm("?3"); /* 80 cols */ + ed(2); /* VT100 clears screen on SM3/RM3, but not obviously, so... */ + cup(1,1); for (col = 1; col <= 80; col += 10) printf("1234567890"); + for (row = 3; row <= 20; row++) { + cup(row,row); + printf("This is 80 column mode, %s background.", + background ? "dark" : "light"); + } + holdit(); + } + + ed(2); + sm("?6"); /* Origin mode (relative) */ + for (soft = -1; soft <= 0; soft++) { + if (soft) sm("?4"); + else rm("?4"); + for (row = 12; row >= 1; row -= 11) { + decstbm(row, 24-row+1); + ed(2); + for (down = 0; down >= -1; down--) { + if (down) cuu(24); + else cud(24); + for (i = 1; i <= 30; i++) { + printf("%s scroll %s region %d Line %d\n", + soft ? "Soft" : "Jump", + down ? "down" : "up", + 2*(13-row), i); + if (down) { ri(); ri(); } + } + } + holdit(); + } + } + ed(2); + decstbm(23,24); + printf( + "\nOrigin mode test. This line should be at the bottom of the screen."); + cup(1,1); + printf("%s", + "This line should be the one above the bottom of the screeen. "); + holdit(); + ed(2); + rm("?6"); /* Origin mode (absolute) */ + cup(24,1); + printf( + "Origin mode test. This line should be at the bottom of the screen."); + cup(1,1); + printf("%s", "This line should be at the top if the screen. "); + holdit(); + decstbm(1,24); + + ed(2); + cup( 1,20); printf("Graphic rendition test pattern:"); + cup( 4, 1); sgr("0"); printf("vanilla"); + cup( 4,40); sgr("0;1"); printf("bold"); + cup( 6, 6); sgr(";4"); printf("underline"); + cup( 6,45);sgr(";1");sgr("4");printf("bold underline"); + cup( 8, 1); sgr("0;5"); printf("blink"); + cup( 8,40); sgr("0;5;1"); printf("bold blink"); + cup(10, 6); sgr("0;4;5"); printf("underline blink"); + cup(10,45); sgr("0;1;4;5"); printf("bold underline blink"); + cup(12, 1); sgr("1;4;5;0;7"); printf("negative"); + cup(12,40); sgr("0;1;7"); printf("bold negative"); + cup(14, 6); sgr("0;4;7"); printf("underline negative"); + cup(14,45); sgr("0;1;4;7"); printf("bold underline negative"); + cup(16, 1); sgr("1;4;;5;7"); printf("blink negative"); + cup(16,40); sgr("0;1;5;7"); printf("bold blink negative"); + cup(18, 6); sgr("0;4;5;7"); printf("underline blink negative"); + cup(18,45); sgr("0;1;4;5;7"); printf("bold underline blink negative"); + sgr(""); + + rm("?5"); /* Inverse video off */ + cup(23,1); el(0); printf("Dark background. "); holdit(); + sm("?5"); /* Inverse video */ + cup(23,1); el(0); printf("Light background. "); holdit(); + rm("?5"); + ed(2); + cup(8,12); printf("normal"); + cup(8,24); printf("bold"); + cup(8,36); printf("underscored"); + cup(8,48); printf("blinking"); + cup(8,60); printf("reversed"); + cup(10,1); printf("stars:"); + cup(12,1); printf("line:"); + cup(14,1); printf("x'es:"); + cup(16,1); printf("diamonds:"); + for (cset = 0; cset <= 3; cset++) { + for (i = 0; i <= 4; i++) { + cup(10 + 2 * cset, 12 + 12 * i); + sgr(attr[i]); + if (cset == 0 || cset == 2) scs(0,'B'); + else scs(0,'0'); + for (j = 0; j <= 4; j++) { + printf("%c", tststr[cset]); + } + decsc(); + cup(cset + 1, i + 1); sgr(""); scs(0,'B'); printf("A"); + decrc(); + for (j = 0; j <= 4; j++) { + printf("%c", tststr[cset]); + } + } + } + sgr("0"); scs(0,'B'); cup(21,1); + println("Test of the SAVE/RESTORE CURSOR feature. There should"); + println("be ten characters of each flavour, and a rectangle"); + println("of 5 x 4 A's filling the top left of the screen."); + holdit(); +} + +tst_characters() { + /* Test of: + SCS (Select character Set) + */ + + int i, j, g, cset; + char chcode[5], *setmsg[5]; + + chcode[0] = 'A'; + chcode[1] = 'B'; + chcode[2] = '0'; + chcode[3] = '1'; + chcode[4] = '2'; + setmsg[0] = "UK / national"; + setmsg[1] = "US ASCII"; + setmsg[2] = "Special graphics and line drawing"; + setmsg[3] = "Alternate character ROM standard characters"; + setmsg[4] = "Alternate character ROM special graphics"; + + cup(1,10); printf("Selected as G0 (with SI)"); + cup(1,48); printf("Selected as G1 (with SO)"); + for (cset = 0; cset <= 4; cset++) { + scs(1,'B'); + cup(3 + 4 * cset, 1); + sgr("1"); + printf("Character set %c (%s)",chcode[cset], setmsg[cset]); + sgr("0"); + for (g = 0; g <= 1; g++) { + scs(g,chcode[cset]); + for (i = 1; i <= 3; i++) { + cup(3 + 4 * cset + i, 10 + 38 * g); + for (j = 0; j <= 31; j++) { + printf("%c", i * 32 + j); + } + } + } + } + scs(1,'B'); + cup(24,1); printf("These are the installed character sets. "); + holdit(); +} + +tst_doublesize() { + /* Test of: + DECSWL (Single Width Line) + DECDWL (Double Width Line) + DECDHL (Double Height Line) (also implicit double width) + */ + + int col, i, w, w1; + + /* Print the test pattern in both 80 and 132 character width */ + + for(w = 0; w <= 1; w++) { + w1 = 13 * w; + + ed(2); + cup(1, 1); + if (w) { sm("?3"); printf("132 column mode"); } + else { rm("?3"); printf(" 80 column mode"); } + + cup( 5, 3 + 2 * w1); + printf("v------- left margin"); + + cup( 7, 3 + 2 * w1); + printf("This is a normal-sized line"); + decdhl(0); decdhl(1); decdwl(); decswl(); + + cup( 9, 2 + w1); + printf("This is a Double-width line"); + decswl(); decdhl(0); decdhl(1); decdwl(); + + cup(11, 2 + w1); + decdwl(); decswl(); decdhl(1); decdhl(0); + printf("This is a Double-width-and-height line"); + cup(12, 2 + w1); + decdwl(); decswl(); decdhl(0); decdhl(1); + printf("This is a Double-width-and-height line"); + + cup(14, 2 + w1); + decdwl(); decswl(); decdhl(1); decdhl(0); el(2); + printf("This is another such line"); + cup(15, 2 + w1); + decdwl(); decswl(); decdhl(0); decdhl(1); + printf("This is another such line"); + + cup(17, 3 + 2 * w1); + printf("^------- left margin"); + + cup(21, 1); + printf("This is not a double-width line"); + for (i = 0; i <= 1; i++) { + cup(21,6); + if (i) { printf("**is**"); decdwl(); } + else { printf("is not"); decswl(); } + cup(23,1); holdit(); + } + } + /* Set vanilla tabs for next test */ + cup(1,1); tbc(3); for (col = 1; col <= 132; col += 8) { cuf(8); hts(); } + rm("?3"); + ed(2); + scs(0,'0'); + + cup( 8,1); decdhl(0); printf("lqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqk"); + cup( 9,1); decdhl(1); printf("lqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqk"); + cup(10,1); decdhl(0); printf("x%c%c%c%c%cx",9,9,9,9,9); + cup(11,1); decdhl(1); printf("x%c%c%c%c%cx",9,9,9,9,9); + cup(12,1); decdhl(0); printf("x%c%c%c%c%cx",9,9,9,9,9); + cup(13,1); decdhl(1); printf("x%c%c%c%c%cx",9,9,9,9,9); + cup(14,1); decdhl(0); printf("x x"); + cup(15,1); decdhl(1); printf("x x"); + cup(16,1); decdhl(0); printf("mqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqj"); + cup(17,1); decdhl(1); printf("mqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqj"); + scs(0,'B'); sgr("1;5"); + cup(12,3); + printf("* The mad programmer strikes again * "); + cup(13,3); printf("%c",9); cub(6); + printf("* The mad programmer strikes again *"); + sgr("0"); + cup(22,1); + println("Another test pattern... a frame with blinking bold text,"); + printf("all in double-height double-width size. "); + holdit(); + + decstbm(8,24); /* Absolute origin mode, so cursor is set at (1,1) */ + cup(8,1); + for (i = 1; i <= 12; i++) + ri(); + decstbm(0,0); /* No scroll region */ + cup(1,1); + printf("%s", "Exactly half of the box should remain. "); + holdit(); +} + +tst_keyboard() { + +/* Test of: + - DECLL (Load LEDs) + - Keyboard return messages + - SM RM (Set/Reset Mode) - Cursor Keys + - Auto repeat + - DECKPAM (Keypad Application Mode) + - DECKPNM (Keypad Numeric Mode) + +The standard VT100 keayboard layout: + + UP DN LE RI + +ESC 1! 2@ 3# 4$ 5% 6^ 7& 8* 9( 0) -_ =+ `~ BS + +TAB* qQ wW eE rR tT yY uU iI oO pP [{ ]} DEL + +** ** aA sS dD fF gG hH jJ kK lL ;: ," RETN \| + +** **** zZ xX cC vV bB nN mM ,< .> /? **** LF + + ****************SPACE BAR**************** + + PF1 PF2 PF3 PF4 + + *7* *8* *9* *-* + + *4* *5* *6* *,* + + *1* *2* *3* + + ***0*** *.* ENT +*/ + + char *ledmsg[6], *ledseq[6]; + + int i, j, okflag; + int kblayout; + int ckeymode; + int fkeymode; + char kbdc; + char *kbds = " "; + char *curkeystr, *fnkeystr, *abmstr; + char arptstring[500]; + + static struct key { + char c; + int row; + int col; + char *symbol; + } keytab [] = { + { 27, 1, 0, "ESC" }, + { '1', 1, 6, "1" }, { '!', 1, 7, "!" }, + { '2', 1, 11, "2" }, { '@', 1, 12, "@" }, + { '3', 1, 16, "3" }, { '#', 1, 17, "#" }, + { '4', 1, 21, "4" }, { '$', 1, 22, "$" }, + { '5', 1, 26, "5" }, { '%', 1, 27, "%" }, + { '6', 1, 31, "6" }, { '^', 1, 32, "^" }, + { '7', 1, 36, "7" }, { '&', 1, 37, "&" }, + { '8', 1, 41, "8" }, { '*', 1, 42, "*" }, + { '9', 1, 46, "9" }, { '(', 1, 47, "(" }, + { '0', 1, 51, "0" }, { ')', 1, 52, ")" }, + { '-', 1, 56, "-" }, { '_', 1, 57, "_" }, + { '=', 1, 61, "=" }, { '+', 1, 62, "+" }, + { '`', 1, 66, "`" }, { '~', 1, 67, "~" }, + { 8, 1, 70, "BS" }, + { 9, 2, 0, " TAB " }, + { 'q', 2, 8, "q" }, { 'Q', 2, 9, "Q" }, + { 'w', 2, 13, "w" }, { 'W', 2, 14, "W" }, + { 'e', 2, 18, "e" }, { 'E', 2, 19, "E" }, + { 'r', 2, 23, "r" }, { 'R', 2, 24, "R" }, + { 't', 2, 28, "t" }, { 'T', 2, 29, "T" }, + { 'y', 2, 33, "y" }, { 'Y', 2, 34, "Y" }, + { 'u', 2, 38, "u" }, { 'U', 2, 39, "U" }, + { 'i', 2, 43, "i" }, { 'I', 2, 44, "I" }, + { 'o', 2, 48, "o" }, { 'O', 2, 49, "O" }, + { 'p', 2, 53, "p" }, { 'P', 2, 54, "P" }, + { '[', 2, 58, "[" }, { '{', 2, 59, "{" }, + { ']', 2, 63, "]" }, { '}', 2, 64, "}" }, + { 127, 2, 71, "DEL" }, + { 'a', 3, 10, "a" }, { 'A', 3, 11, "A" }, + { 's', 3, 15, "s" }, { 'S', 3, 16, "S" }, + { 'd', 3, 20, "d" }, { 'D', 3, 21, "D" }, + { 'f', 3, 25, "f" }, { 'F', 3, 26, "F" }, + { 'g', 3, 30, "g" }, { 'G', 3, 31, "G" }, + { 'h', 3, 35, "h" }, { 'H', 3, 36, "H" }, + { 'j', 3, 40, "j" }, { 'J', 3, 41, "J" }, + { 'k', 3, 45, "k" }, { 'K', 3, 46, "K" }, + { 'l', 3, 50, "l" }, { 'L', 3, 51, "L" }, + { ';', 3, 55, ";" }, { ':', 3, 56, ":" }, + {'\'', 3, 60, "'" }, { '"', 3, 61,"\"" }, + { 13, 3, 65, "RETN"}, + {'\\', 3, 71,"\\" }, { '|', 3, 72, "|" }, + { 'z', 4, 12, "z" }, { 'Z', 4, 13, "Z" }, + { 'x', 4, 17, "x" }, { 'X', 4, 18, "X" }, + { 'c', 4, 22, "c" }, { 'C', 4, 23, "C" }, + { 'v', 4, 27, "v" }, { 'V', 4, 28, "V" }, + { 'b', 4, 32, "b" }, { 'B', 4, 33, "B" }, + { 'n', 4, 37, "n" }, { 'N', 4, 38, "N" }, + { 'm', 4, 42, "m" }, { 'M', 4, 43, "M" }, + { ',', 4, 47, "," }, { '<', 4, 48, "<" }, + { '.', 4, 52, "." }, { '>', 4, 53, ">" }, + { '/', 4, 57, "/" }, { '?', 4, 58, "?" }, + { 10, 4, 69, "LF" }, + { ' ', 5, 13, " SPACE BAR "}, + {'\0', 0, 0, "" } + }; + + static struct natkey { + char natc; + int natrow; + int natcol; + char *natsymbol; + } natkeytab [][29] = { + { + { '"', 1, 12, "\""}, + { '&', 1, 32, "&" }, + { '/', 1, 37, "/" }, + { '(', 1, 42, "(" }, + { ')', 1, 47, ")" }, + { '=', 1, 52, "=" }, + { '+', 1, 56, "+" }, { '?', 1, 57, "?" }, + { '`', 1, 61, "`" }, { '@', 1, 62, "@" }, + { '<', 1, 66, "<" }, { '>', 1, 67, ">" }, + { '}', 2, 58, "}" }, { ']', 2, 59, "]" }, + { '^', 2, 63, "^" }, { '~', 2, 64, "~" }, + { '|', 3, 55, "|" }, {'\\', 3, 56,"\\" }, + { '{', 3, 60, "{" }, { '[', 3, 61, "[" }, + {'\'', 3, 71, "'" }, { '*', 3, 72, "*" }, + { ',', 4, 47, "," }, { ';', 4, 48, ";" }, + { '.', 4, 52, "." }, { ':', 4, 53, ":" }, + { '-', 4, 57, "-" }, { '_', 4, 58, "_" }, + {'\0', 0, 0, "" } + }, + { + { '"', 1, 12, "\""}, + { '&', 1, 32, "&" }, + { '/', 1, 37, "/" }, + { '(', 1, 42, "(" }, + { ')', 1, 47, ")" }, + { '=', 1, 52, "=" }, + { '+', 1, 56, "+" }, { '?', 1, 57, "?" }, + { '`', 1, 61, "`" }, { '@', 1, 62, "@" }, + { '<', 1, 66, "<" }, { '>', 1, 67, ">" }, + { '}', 2, 58, "}" }, { ']', 2, 59, "]" }, + { '~', 2, 63, "~" }, { '^', 2, 64, "^" }, + { '|', 3, 55, "|" }, {'\\', 3, 56,"\\" }, + { '{', 3, 60, "{" }, { '[', 3, 61, "[" }, + {'\'', 3, 71, "'" }, { '*', 3, 72, "*" }, + { ',', 4, 47, "," }, { ';', 4, 48, ";" }, + { '.', 4, 52, "." }, { ':', 4, 53, ":" }, + { '-', 4, 57, "-" }, { '_', 4, 58, "_" }, + {'\0', 0, 0, "" } + } + }; + + static struct curkey { + char *curkeymsg[3]; + int curkeyrow; + int curkeycol; + char *curkeysymbol; + char *curkeyname; + } curkeytab [] = { + + /* A Reset, A Set, VT52 */ + + {{"\033[A","\033OA","\033A"}, 0, 56, "UP", "Up arrow" }, + {{"\033[B","\033OB","\033B"}, 0, 61, "DN", "Down arrow" }, + {{"\033[D","\033OD","\033D"}, 0, 66, "LT", "Left arrow" }, + {{"\033[C","\033OC","\033C"}, 0, 71, "RT", "Right arrow"}, + {{"", "", "" }, 0, 0, "", "" } + }; + + static struct fnkey { + char *fnkeymsg[4]; + int fnkeyrow; + int fnkeycol; + char *fnkeysymbol; + char *fnkeyname; + } fnkeytab [] = { + + /* ANSI-num,ANSI-app,VT52-nu,VT52-ap, r, c, symb name */ + + {{"\033OP","\033OP","\033P","\033P" }, 6, 59, "PF1", "PF1" }, + {{"\033OQ","\033OQ","\033Q","\033Q" }, 6, 63, "PF2", "PF2" }, + {{"\033OR","\033OR","\033R","\033R" }, 6, 67, "PF3", "PF3" }, + {{"\033OS","\033OS","\033S","\033S" }, 6, 71, "PF4", "PF4" }, + {{"7", "\033Ow","7", "\033?w"}, 7, 59, " 7 ", "Numeric 7" }, + {{"8", "\033Ox","8", "\033?x"}, 7, 63, " 8 ", "Numeric 8" }, + {{"9", "\033Oy","9", "\033?y"}, 7, 67, " 9 ", "Numeric 9" }, + {{"-", "\033Om","-", "\033?m"}, 7, 71, " - ", "Minus" }, + {{"4", "\033Ot","4", "\033?t"}, 8, 59, " 4 ", "Numeric 4" }, + {{"5", "\033Ou","5", "\033?u"}, 8, 63, " 5 ", "Numeric 5" }, + {{"6", "\033Ov","6", "\033?v"}, 8, 67, " 6 ", "Numeric 6" }, + {{",", "\033Ol",",", "\033?l"}, 8, 71, " , ", "Comma" }, + {{"1", "\033Oq","1", "\033?q"}, 9, 59, " 1 ", "Numeric 1" }, + {{"2", "\033Or","2", "\033?r"}, 9, 63, " 2 ", "Numeric 2" }, + {{"3", "\033Os","3", "\033?s"}, 9, 67, " 3 ", "Numeric 3" }, + {{"0", "\033Op","0", "\033?p"},10, 59," O ","Numeric 0"}, + {{".", "\033On",".", "\033?n"},10, 67, " . ", "Point" }, + {{"\015", "\033OM","\015", "\033?M"},10, 71, "ENT", "ENTER" }, + {{"","","",""}, 0, 0, "", "" } + }; + + static struct ckey { + int ccount; + char *csymbol; + } ckeytab [] = { + { 0, "NUL (CTRL-@ or CTRL-Space)" }, + { 0, "SOH (CTRL-A)" }, + { 0, "STX (CTRL-B)" }, + { 0, "ETX (CTRL-C)" }, + { 0, "EOT (CTRL-D)" }, + { 0, "ENQ (CTRL-E)" }, + { 0, "ACK (CTRL-F)" }, + { 0, "BEL (CTRL-G)" }, + { 0, "BS (CTRL-H) (BACK SPACE)" }, + { 0, "HT (CTRL-I) (TAB)" }, + { 0, "LF (CTRL-J) (LINE FEED)" }, + { 0, "VT (CTRL-K)" }, + { 0, "FF (CTRL-L)" }, + { 0, "CR (CTRL-M) (RETURN)" }, + { 0, "SO (CTRL-N)" }, + { 0, "SI (CTRL-O)" }, + { 0, "DLE (CTRL-P)" }, + { 0, "DC1 (CTRL-Q) (X-On)" }, + { 0, "DC2 (CTRL-R)" }, + { 0, "DC3 (CTRL-S) (X-Off)" }, + { 0, "DC4 (CTRL-T)" }, + { 0, "NAK (CTRL-U)" }, + { 0, "SYN (CTRL-V)" }, + { 0, "ETB (CTRL-W)" }, + { 0, "CAN (CTRL-X)" }, + { 0, "EM (CTRL-Y)" }, + { 0, "SUB (CTRL-Z)" }, + { 0, "ESC (CTRL-[) (ESCAPE)" }, + { 0, "FS (CTRL-\\ or CTRL-? or CTRL-_)" }, + { 0, "GS (CTRL-])" }, + { 0, "RS (CTRL-^ or CTRL-~ or CTRL-`)" }, + { 0, "US (CTRL-_ or CTRL-?)" } + }; + + static char *keyboardmenu[] = { + "Standard American ASCII layout", + "Swedish national layout D47", + "Swedish national layout E47", + /* add new keyboard layouts here */ + "" + }; + + static char *curkeymodes[3] = { + "ANSI / Cursor key mode RESET", + "ANSI / Cursor key mode SET", + "VT52 Mode" + }; + + static char *fnkeymodes[4] = { + "ANSI Numeric mode", + "ANSI Application mode", + "VT52 Numeric mode", + "VT52 Application mode" + }; + + ledmsg[0] = "L1 L2 L3 L4"; ledseq[0] = "1;2;3;4"; + ledmsg[1] = " L2 L3 L4"; ledseq[1] = "1;0;4;3;2"; + ledmsg[2] = " L2 L3"; ledseq[2] = "1;4;;2;3"; + ledmsg[3] = "L1 L2"; ledseq[3] = ";;2;1"; + ledmsg[4] = "L1"; ledseq[4] = "1"; + ledmsg[5] = ""; ledseq[5] = ""; + +#ifdef UNIX + fflush(stdout); +#endif + ed(2); + cup(10,1); + println("These LEDs (\"lamps\") on the keyboard should be on:"); + for (i = 0; i <= 5; i++) { + cup(10,52); el(0); printf("%s", ledmsg[i]); + decll("0"); + decll(ledseq[i]); + cup(12,1); holdit(); + } + + ed(2); + cup(10,1); + println("Test of the AUTO REPEAT feature"); + println(""); + println("Hold down an alphanumeric key for a while, then push RETURN."); + printf("%s", "Auto Repeat OFF: "); + rm("?8"); + inputline(arptstring); + if (strlen(arptstring) == 0) println("No characters read!??"); + else if (strlen(arptstring) == 1) println("OK."); + else println("Too many characters read."); + println(""); + println("Hold down an alphanumeric key for a while, then push RETURN."); + printf("%s", "Auto Repeat ON: "); + sm("?8"); + inputline(arptstring); + if (strlen(arptstring) == 0) println("No characters read!??"); + else if (strlen(arptstring) == 1) println("Not enough characters read."); + else println("OK."); + println(""); + holdit(); + + ed(2); + cup(5,10); + println("Choose keyboard layout:"); + kblayout = menu(keyboardmenu); + if (kblayout) { + kblayout--; + for (j = 0; natkeytab[kblayout][j].natc != '\0'; j++) { + for (i = 0; keytab[i].c != '\0'; i++) { + if (keytab[i].row == natkeytab[kblayout][j].natrow && + keytab[i].col == natkeytab[kblayout][j].natcol) { + keytab[i].c = natkeytab[kblayout][j].natc; + keytab[i].symbol = natkeytab[kblayout][j].natsymbol; + break; + } + } + } + } + + ed(2); + for (i = 0; keytab[i].c != '\0'; i++) { + cup(1 + 2 * keytab[i].row, 1 + keytab[i].col); + sgr("7"); + printf("%s", keytab[i].symbol); + sgr(""); + } + cup(22,1); +#ifdef UNIX + sgttyNew.sg_flags &= ~CRMOD; + sgttyNew.sg_flags &= ~ECHO; + stty(0, &sgttyNew); +#endif + inflush(); + printf("Press each key, both shifted and unshifted. Finish with RETURN:"); + do { /* while (kbdc != 13) */ + cup(23,1); kbdc = inchar(); + cup(23,1); el(0); + sprintf(kbds, "%c", kbdc); + chrprint(kbds); + for (i = 0; keytab[i].c != '\0'; i++) { + if (keytab[i].c == kbdc) { + cup(1 + 2 * keytab[i].row, 1 + keytab[i].col); + printf("%s", keytab[i].symbol); + break; + } + } + } while (kbdc != 13); +#ifdef SARG10 + inchar(); /* Local hack: Read LF that TOPS-10 adds to CR */ +#endif + cup(23,1); el(0); + + for (ckeymode = 0; ckeymode <= 2; ckeymode++) { + if (ckeymode) sm("?1"); + else rm("?1"); + for (i = 0; curkeytab[i].curkeysymbol[0] != '\0'; i++) { + cup(1 + 2 * curkeytab[i].curkeyrow, 1 + curkeytab[i].curkeycol); + sgr("7"); + printf("%s", curkeytab[i].curkeysymbol); + sgr(""); + } + cup(20,1); printf("<%s>%20s", curkeymodes[ckeymode], ""); + cup(22,1); el(0); + cup(22,1); printf("%s", "Press each cursor key. Finish with TAB."); + for(;;) { + cup(23,1); + if (ckeymode == 2) rm("?2"); /* VT52 mode */ + curkeystr = instr(); + esc("<"); /* ANSI mode */ + cup(23,1); el(0); + cup(23,1); chrprint(curkeystr); + if (!strcmp(curkeystr,"\t")) break; + for (i = 0; curkeytab[i].curkeysymbol[0] != '\0'; i++) { + if (!strcmp(curkeystr,curkeytab[i].curkeymsg[ckeymode])) { + sgr("7"); + printf(" (%s key) ", curkeytab[i].curkeyname); + sgr(""); + cup(1 + 2 * curkeytab[i].curkeyrow, + 1 + curkeytab[i].curkeycol); + printf("%s", curkeytab[i].curkeysymbol); + break; + } + } + if (i == sizeof(curkeytab) / sizeof(struct curkey) - 1) { + sgr("7"); + printf("%s", " (Unknown cursor key) "); + sgr(""); + } + } + } + + for (fkeymode = 0; fkeymode <= 3; fkeymode++) { + for (i = 0; fnkeytab[i].fnkeysymbol[0] != '\0'; i++) { + cup(1 + 2 * fnkeytab[i].fnkeyrow, 1 + fnkeytab[i].fnkeycol); + sgr("7"); + printf("%s", fnkeytab[i].fnkeysymbol); + sgr(""); + } + cup(20,1); printf("<%s>%20s", fnkeymodes[fkeymode], ""); + cup(22,1); el(0); + cup(22,1); printf("%s", "Press each function key. Finish with TAB."); + for(;;) { + cup(23,1); + if (fkeymode >= 2) rm("?2"); /* VT52 mode */ + if (fkeymode % 2) deckpam(); /* Application mode */ + else deckpnm(); /* Numeric mode */ + fnkeystr = instr(); + esc("<"); /* ANSI mode */ + cup(23,1); el(0); + cup(23,1); chrprint(fnkeystr); + if (!strcmp(fnkeystr,"\t")) break; + for (i = 0; fnkeytab[i].fnkeysymbol[0] != '\0'; i++) { + if (!strcmp(fnkeystr,fnkeytab[i].fnkeymsg[fkeymode])) { + sgr("7"); + printf(" (%s key) ", fnkeytab[i].fnkeyname); + sgr(""); + cup(1 + 2 * fnkeytab[i].fnkeyrow, 1 + fnkeytab[i].fnkeycol); + printf("%s", fnkeytab[i].fnkeysymbol); + break; + } + } + if (i == sizeof(fnkeytab) / sizeof(struct fnkey) - 1) { + sgr("7"); + printf("%s", " (Unknown function key) "); + sgr(""); + } + } + } + +#ifdef UNIX + sgttyNew.sg_flags |= CRMOD; + stty(0, &sgttyNew); +#endif + ed(2); + cup(5,1); + println("Finally, a check of the ANSWERBACK MESSAGE, which can be sent"); + println("by pressing CTRL-BREAK. The answerback message can be loaded"); + println("in SET-UP B by pressing SHIFT-A and typing e.g."); + println(""); + println(" \" H e l l o , w o r l d Return \""); + println(""); + println("(the double-quote characters included). Do that, and then try"); + println("to send an answerback message with CTRL-BREAK. If it works,"); + println("the answerback message should be displayed in reverse mode."); + println("Finish with a single RETURN."); + +#ifdef UNIX + sgttyNew.sg_flags &= ~CRMOD; + stty(0, &sgttyNew); +#endif + do { + cup(17,1); + inflush(); + abmstr = instr(); + cup(17,1); + el(0); + chrprint(abmstr); + } while (strcmp(abmstr,"\r")); + + ed(2); + for (i = 0; i < 32; i++) { + cup(1 + (i % 16), 1 + 40 * (i / 16)); + sgr("7"); + printf("%s", ckeytab[i].csymbol); + sgr("0"); + } + cup(19,1); +#ifdef UNIX + sgttyNew.sg_flags |= CRMOD; + stty(0, &sgttyNew); +#endif + println( + "Push each CTRL-key TWICE. Note that you should be able to send *all*"); + println( + "CTRL-codes twice, including CTRL-S (X-Off) and CTRL-Q (X-Off)!"); + println( + "Finish with DEL (also called DELETE or RUB OUT), or wait 1 minute."); +#ifdef UNIX +#ifdef SIII + sgttyNew.sg_flags &= ~CBREAK; + stty(0, &sgttyNew); +#endif + sgttyNew.sg_flags |= RAW; + stty(0, &sgttyNew); +#endif + ttybin(1); +#ifdef SARG20 + page(0); /* Turn off all character processing at input */ + superbin(1); /* Turn off ^C (among others). Keep your fingers crossed!! */ +#endif + do { + cup(23,1); kbdc = inchar(); + cup(23,1); el(0); + if (kbdc < 32) printf(" %s", ckeytab[kbdc].csymbol); + else { + sprintf(kbds, "%c", kbdc); + chrprint(kbds); + printf("%s", " -- not a CTRL key"); + } + if (kbdc < 32) ckeytab[kbdc].ccount++; + if (ckeytab[kbdc].ccount == 2) { + cup(1 + (kbdc % 16), 1 + 40 * (kbdc / 16)); + printf("%s", ckeytab[kbdc].csymbol); + } + } while (kbdc != '\177'); +#ifdef UNIX + sgttyNew.sg_flags &= ~RAW; + sgttyNew.sg_flags |= ECHO; + stty(0, &sgttyNew); +#ifdef SIII + sgttyNew.sg_flags |= CBREAK; + stty(0, &sgttyNew); +#endif +#endif + ttybin(0); +#ifdef SARG20 + superbin(0); /* Puuuh! We made it!? */ + page(1); /* Back to normal input processing */ + ttybin(1); /* This must be the mode for DEC20 */ +#endif + cup(24,1); + okflag = 1; + for (i = 0; i < 32; i++) if (ckeytab[i].ccount < 2) okflag = 0; + if (okflag) printf("%s", "OK. "); + else printf("%s", "You have not been able to send all CTRL keys! "); + holdit(); +} + +tst_reports() { + /* Test of: + <ENQ> (AnswerBack Message) + SM RM (Set/Reset Mode) - LineFeed / Newline + DSR (Device Status Report) + DA (Device Attributes) + DECREQTPARM (Request Terminal Parameters) + */ + + int parity, nbits, xspeed, rspeed, clkmul, flags; + int i, reportpos; + char *report, *report2; + static char *attributes[][2] = { + { "\033[?1;0c", "No options (vanilla VT100)" }, + { "\033[?1;1c", "VT100 with STP" }, + { "\033[?1;2c", "VT100 with AVO (could be a VT102)" }, + { "\033[?1;3c", "VT100 with STP and AVO" }, + { "\033[?1;4c", "VT100 with GPO" }, + { "\033[?1;5c", "VT100 with STP and GPO" }, + { "\033[?1;6c", "VT100 with AVO and GPO" }, + { "\033[?1;7c", "VT100 with STP, AVO and GPO" }, + { "\033[?1;11c", "VT100 with PP and AVO" }, + { "\033[?1;15c", "VT100 with PP, GPO and AVO" }, + { "\033[?4;2c", "VT132 with AVO" }, + { "\033[?4;3c", "VT132 with AVO and STP" }, + { "\033[?4;6c", "VT132 with GPO and AVO" }, + { "\033[?4;7c", "VT132 with GPO, AVO, and STP" }, + { "\033[?4;11c", "VT132 with PP and AVO" }, + { "\033[?4;15c", "VT132 with PP, GPO and AVO" }, + { "\033[?7c", "VT131" }, + { "\033[?12;5c", "VT125" }, /* VT125 also has ROM version */ + { "\033[?12;7c", "VT125 with AVO" }, /* number, so this won't work */ + { "\033[?5;0c", "VK100 (GIGI)" }, + { "\033[?5c", "VK100 (GIGI)" }, + { "", "" } + }; + +#ifdef UNIX + sgttyNew.sg_flags &= ~ECHO; + stty(0, &sgttyNew); +#endif + cup(5,1); + println("This is a test of the ANSWERBACK MESSAGE. (To load the A.B.M."); + println("see the TEST KEYBOARD part of this program). Below here, the"); + println("current answerback message in your terminal should be"); + println("displayed. Finish this test with RETURN."); + cup(10,1); + inflush(); + printf("%c", 5); /* ENQ */ + report = instr(); + cup(10,1); + chrprint(report); + cup(12,1); + holdit(); + + ed(2); + cup(1,1); + println("Test of LineFeed/NewLine mode."); + cup(3,1); + sm("20"); +#ifdef UNIX + sgttyNew.sg_flags &= ~CRMOD; + stty(0, &sgttyNew); +#endif + printf("NewLine mode set. Push the RETURN key: "); + report = instr(); + cup(4,1); + el(0); + chrprint(report); + if (!strcmp(report, "\015\012")) printf(" -- OK"); + else printf(" -- Not expected"); + cup(6,1); + rm("20"); + printf("NewLine mode reset. Push the RETURN key: "); + report = instr(); + cup(7,1); + el(0); + chrprint(report); + if (!strcmp(report, "\015")) printf(" -- OK"); + else printf(" -- Not expected"); + cup(9,1); +#ifdef UNIX + sgttyNew.sg_flags |= CRMOD; + stty(0, &sgttyNew); +#endif + holdit(); + + ed(2); + cup(1,1); + printf("Test of Device Status Report 5 (report terminal status)."); + cup(2,1); + dsr(5); + report = instr(); + cup(2,1); + el(0); + printf("Report is: "); + chrprint(report); + if (!strcmp(report,"\033[0n")) printf(" -- means \"TERMINAL OK\""); + else if (!strcmp(report,"\033[3n")) printf(" -- means \"TERMINAL OK\""); + else printf(" -- Unknown response!"); + + cup(4,1); + println("Test of Device Status Report 6 (report cursor position)."); + cup(5,1); + dsr(6); + report = instr(); + cup(5,1); + el(0); + printf("Report is: "); + chrprint(report); + if (!strcmp(report,"\033[5;1R")) printf(" -- OK"); + else printf(" -- Unknown response!"); + + cup(7,1); + println("Test of Device Attributes report (what are you)"); + cup(8,1); + da(0); + report = instr(); + cup(8,1); + el(0); + printf("Report is: "); + chrprint(report); + for (i = 0; *attributes[i][0] != '\0'; i++) { + if (!strcmp(report,attributes[i][0])) break; + } + if (*attributes[i][0] == '\0') + printf(" -- Unknown response, refer to the manual"); + else { + printf(" -- means %s", attributes[i][1]); + if (i) { + cup(9,1); + println("Legend: STP = Processor Option"); + println(" AVO = Advanced Video Option"); + println(" GPO = Graphics Processor Option"); + println(" PP = Printer Port"); + } + } + + cup(14,1); + println("Test of the \"Request Terminal Parameters\" feature, argument 0."); + cup(15,1); + decreqtparm(0); + report = instr(); + cup(15,1); + el(0); + printf("Report is: "); + chrprint(report); + if (strlen(report) < 16 + || report[0] != '\033' + || report[1] != '[' + || report[2] != '2' + || report[3] != ';') + println(" -- Bad format"); + else { + reportpos = 4; + parity = scanto(report, &reportpos, ';'); + nbits = scanto(report, &reportpos, ';'); + xspeed = scanto(report, &reportpos, ';'); + rspeed = scanto(report, &reportpos, ';'); + clkmul = scanto(report, &reportpos, ';'); + flags = scanto(report, &reportpos, 'x'); + if (parity == 0 || nbits == 0 || clkmul == 0) println(" -- Bad format"); + else println(" -- OK"); + printf( + "This means: Parity %s, %s bits, xmitspeed %s, recvspeed %s.\n", + lookup(paritytable, parity), + lookup(nbitstable, nbits), + lookup(speedtable, xspeed), + lookup(speedtable, rspeed)); + printf("(CLoCk MULtiplier = %d, STP option flags = %d)\n", clkmul, flags); + } + + cup(19,1); + println("Test of the \"Request Terminal Parameters\" feature, argument 1."); + cup(20,1); + decreqtparm(1); /* Does the same as decreqtparm(0), reports "3" */ + report2 = instr(); + cup(20,1); + el(0); + printf("Report is: "); + chrprint(report2); + if (strlen(report2) < 3 + || report2[2] != '3') + println(" -- Bad format"); + else { + report2[2] = '2'; + if (!strcmp(report,report2)) println(" -- OK"); + else println(" -- Bad format"); + } + cup(24,1); + holdit(); +#ifdef UNIX + sgttyNew.sg_flags |= ECHO; + stty(0, &sgttyNew); +#endif +} + +tst_vt52() { + + static struct rtabl { + char *rcode; + char *rmsg; + } resptable[] = { + { "\033/K", " -- OK (means Standard VT52)" }, + { "\033/Z", " -- OK (means VT100 emulating VT52)" }, + { "", " -- Unknown response"} + }; + + int i,j; + char *response; + + rm("?2"); /* Reset ANSI (VT100) mode, Set VT52 mode */ + esc("H"); /* Cursor home */ + esc("J"); /* Erase to end of screen */ + esc("H"); /* Cursor home */ + for (i = 0; i <= 23; i++) { + for (j = 0; j <= 9; j++) + printf("%s", "FooBar "); + println("Bletch"); + } + esc("H"); /* Cursor home */ + esc("J"); /* Erase to end of screen */ + + vt52cup(7,47); + printf("nothing more."); + for (i = 1; i <= 10; i++) printf("THIS SHOULD GO AWAY! "); + for (i = 1; i <= 5; i++) { + vt52cup(1,1); + printf("%s", "Back scroll (this should go away)"); + esc("I"); /* Reverse LineFeed (with backscroll!) */ + } + vt52cup(12,60); + esc("J"); /* Erase to end of screen */ + for (i = 2; i <= 6; i++) { + vt52cup(i,1); + esc("K"); /* Erase to end of line */ + } + + for (i = 2; i <= 23; i++) { + vt52cup(i,70); printf("%s", "**Foobar"); + } + vt52cup(23,10); + for (i = 23; i >= 2; i--) { + printf("%s", "*"); + printf("%c", 8); /* BS */ + esc("I"); /* Reverse LineFeed (LineStarve) */ + } + vt52cup(1,70); + for (i = 70; i >= 10; i--) { + printf("%s", "*"); + esc("D"); esc("D"); /* Cursor Left */ + } + vt52cup(24,10); + for (i = 10; i <= 70; i++) { + printf("%s", "*"); + printf("%c", 8); /* BS */ + esc("C"); /* Cursor Right */ + } + vt52cup(2,11); + for (i = 2; i <= 23; i++) { + printf("%s", "!"); + printf("%c", 8); /* BS */ + esc("B"); /* Cursor Down */ + } + vt52cup(23,69); + for (i = 23; i >= 2; i--) { + printf("%s", "!"); + printf("%c", 8); /* BS */ + esc("A"); /* Cursor Up */ + } + for (i = 2; i <= 23; i++) { + vt52cup(i,71); + esc("K"); /* Erase to end of line */ + } + + vt52cup(10,16); + printf("%s", "The screen should be cleared, and have a centered"); + vt52cup(11,16); + printf("%s", "rectangle of \"*\"s with \"!\"s on the inside to the"); + vt52cup(12,16); + printf("%s", "left and right. Only this, and"); + vt52cup(13,16); + holdit(); + + esc("H"); /* Cursor home */ + esc("J"); /* Erase to end of screen */ + printf("%s", "This is the normal character set:"); + for (j = 0; j <= 1; j++) { + vt52cup(3 + j, 16); + for (i = 0; i <= 47; i++) + printf("%c", 32 + i + 48 * j); + } + vt52cup(6,1); + printf("%s", "This is the special graphics character set:"); + esc("F"); /* Select Special Graphics character set */ + for (j = 0; j <= 1; j++) { + vt52cup(8 + j, 16); + for (i = 0; i <= 47; i++) + printf("%c", 32 + i + 48 * j); + } + esc("G"); /* Select ASCII character set */ + vt52cup(12,1); + holdit(); + + esc("H"); /* Cursor home */ + esc("J"); /* Erase to end of screen */ + println("Test of terminal response to IDENTIFY command"); + esc("Z"); /* Identify */ + response = instr(); + println(""); + printf("Response was"); + esc("<"); /* Enter ANSI mode (VT100 mode) */ + chrprint(response); + for(i = 0; resptable[i].rcode[0] != '\0'; i++) + if (!strcmp(response, resptable[i].rcode)) + break; + printf("%s", resptable[i].rmsg); + println(""); + println(""); + holdit(); +} + +tst_insdel() { + + /* Test of: + SM/RM(4) (= IRM (Insertion/replacement mode)) + ICH (Insert Character) + DCH (Delete character) + IL (Insert line) + DL (Delete line) + */ + + int i, row, col, sw, dblchr, scr132; + + for(scr132 = 0; scr132 <= 1; scr132++) { + if (scr132) { sm("?3"); sw = 132; } + else { rm("?3"); sw = 80; } + ed(2); + cup(1,1); + for (row=1; row<=24; row++) { + cup(row,1); + for (col=1; col<=sw; col++) + printf("%c", 'A'-1+row); + } + cup(4,1); + printf("Screen accordion test (Insert & Delete Line). "); holdit(); + ri(); el(2); + decstbm( 2,23); + sm("?6"); + cup(1,1); + for (row=1; row<=24; row++) { + il(row); + dl(row); + } + rm("?6"); + decstbm( 0, 0); + cup(2,1); + printf( + "Top line: A's, bottom line: X's, this line, nothing more. "); + holdit(); + cup(2,1); ed(0); + cup(1,2); + printf("B"); + cub(1); + sm("4"); + for (col=2; col<=sw-1; col++) + printf("*"); + rm("4"); + cup(4,1); + printf("Test of 'Insert Mode'. The top line should be 'A*** ... ***B'. "); + holdit(); ri(); el(2); + cup(1,2); + dch(sw-2); + cup(4,1); + printf("Test of 'Delete Character'. The top line should be 'AB'. "); + holdit(); + + for(dblchr = 1; dblchr <= 2; dblchr++) { + ed(2); + for (row=1; row<=24; row++) { + cup(row,1); + if (dblchr == 2) decdwl(); + for (col=1; col<=sw/dblchr; col++) + printf("%c", 'A'-1+row); + cup(row,sw/dblchr-row); + dch(row); + } + cup(4,1); + println("The right column should be staggered "); + printf("by one. "); + holdit(); + } + ed(2); + cup(1,1); + println("If your terminal has the ANSI 'Insert Character' function"); + println("(the VT102 does not), then you should see a line like this"); + println(" A B C D E F G H I J K L M N O P Q R S T U V W X Y Z"); + println("below:"); + println(""); + for (i = 'Z'; i >= 'A'; i--) { + printf("%c\010",i); + ich(2); + } + cup(10,1); + holdit(); + + if (sw == 132) rm("?3"); + } +} + +dch(pn) int pn; { brc(pn, 'P'); } /* Delete character */ +ich(pn) int pn; { brc(pn, '@'); } /* Insert character -- not in VT102 */ +dl(pn) int pn; { brc(pn, 'M'); } /* Delete line */ +il(pn) int pn; { brc(pn, 'L'); } /* Insert line */ + +/* Test of some known VT100 bugs and misfeatures */ + +tst_bugs() { + + int i, menuchoice; + + static char *menutable[] = { + "Exit to main menu", + "Bug A: Smooth scroll to jump scroll", + "Bug B: Scrolling region", + "Bug C: Wide to narrow screen", + "Bug D: Narrow to wide screen", + "Bug E: Cursor move from double- to single-wide line", + "Bug F: Column mode escape sequence", + "Wrap around with cursor addressing", + "Erase right half of double width lines", + "Funny scroll regions", + /* Add more here */ + "" + }; + + static char *hmsg[] = { + "Test of known bugs in the DEC VT100 series. The numbering of some of", + "the bugs (A-F) refers to the article 'VT100 MAGIC' by Sami Tabih in", + "the 'Proceedings of the DEC Users Society' at St. Louis, Missouri, May", + "1983. To understand some of the tests, you have to look at the source", + "code or the article. Of course, a good VT100-compatible terminal", + "should not have these bugs (or have some means of disabling them)! If", + "a bug appears, you might want to RESET the terminal before continuing", + "the test. There is a test of the RESET function in the main menu.", + "" }; + + do { + ed(2); cup(1,1); + for (i = 0; *hmsg[i]; i++) println(hmsg[i]); + println(""); + println(" Choose bug test number:"); + menuchoice = menu(menutable); + switch (menuchoice) { + case 1: bug_a(); break; + case 2: bug_b(); break; + case 3: bug_c(); break; + case 4: bug_d(); break; + case 5: bug_e(); break; + case 6: bug_f(); break; + case 7: bug_w(); break; + case 8: bug_l(); break; + case 9: bug_s(); break; + } + } while (menuchoice); +} + +/* Bug A: Smooth scroll to jump scroll */ + +bug_a() { + int i; + + cup (10, 1); + println("This is a test of the VT100 'Scroll while toggle softscroll'"); + println("bug. The cursor may disappear, or move UP the screen, or"); + println("multiple copies of some lines may appear."); + holdit(); + + /* Invoke the bug */ + + esc ("[24H"); /* Simplified cursor movement */ + rm("?4"); for (i = 1; i <= 20; i++) printf("\n"); + sm("?4"); for (i = 1; i <= 10; i++) printf("\n"); + rm("?4"); for (i = 1; i <= 5; i++) printf("\n"); + + /* That should be enough to show the bug. But we'll try another way: */ + sm ("?4"); /* Set soft scroll */ + nel (); /* "NextLine", move down */ + rm ("?4"); /* Reset soft scroll */ + nel (); /* "NextLine", move down */ + for (i = 1; i <= 10; i++) { /* Show the bug */ + printf ("Softscroll bug test, line %d. ", i); + holdit(); + } + println("That should have been enough to show the bug, if present."); + holdit(); +} + +/* Bug B: Scrolling region */ + +bug_b() { + char c; + + decaln(); + cup( 1,1); el(0); + printf("Line 11 should be double-wide, line 12 should be cleared."); + cup( 2,1); el(0); + printf("Then, the letters A-P should be written at the beginning"); + cup( 3,1); el(0); + printf("of lines 12-24, and the empty line and A-E are scrolled away."); + cup( 4,1); el(0); + printf("If the bug is present, some lines are confused, look at K-P."); + cup(11,1); decdwl(); + decstbm(12,24); + cup(12,1); el(0); printf("Here we go... "); holdit(); + cup(12,1); ri(); /* Bug comes here */ + for (c = 'A'; c <= 'P'; c++) printf("%c\n",c); /* Bug shows here */ + holdit(); + decstbm(0,0); /* No scr. region */ +} + +/* Bug C: Wide to narrow screen */ + +bug_c() { + sm("?3"); /* 132 column mode */ + cup(1,81); + rm("?3"); /* 80 column mode */ + cup(12,5); + printf("Except for this line, the screen should be blank. "); + holdit(); +} + +/* Bug D: Narrow to wide screen */ + +bug_d() { + int i; + char result; + /* Make the bug appear */ + do { + cup(14,1); + + /* The original code in the article says + * PRINT ESC$; "[13;1H"; CHR$(10%); + * but I guess a cup(14,1); would do. + * (To output a pure LF might be tricky). + */ + + sm("?3"); /* Make the bug visible */ + cup(1,9); decdwl(); + println("You should see blinking text at the bottom line."); + cup(3,9); decdwl(); + println("Enter 0 to exit, 1 to try to invoke the bug again."); + cup(24,9); decdwl(); sgr("1;5;7"); + printf("If you can see this then the bug did not appear."); sgr(""); + cup(4,9); decdwl(); + result = inchar(); readnl(); + rm("?3"); + } while (result == '1'); + sm("?4"); /* Syrup scroll */ + cup(23,1); + for (i = 1; i <= 5; i++) + println("If the bug is present, this should make things much worse!"); + holdit(); + rm("?4"); /* Jump scroll */ +} + +/* Bug E: Cursor move from double- to single-wide line */ + +bug_e() { + int i; + static char *rend[2] = { "\033[m", "\033[7m" }; + sm("?3"); + cup(1,1); decdwl(); + println("This test should put an 'X' at line 3 column 100."); + for (i = 1; i <= 12; i++) printf("1234567890%s",rend[i & 1]); + cup(1,1); /* The bug appears when we jump from a dobule-wide line */ + cup(3,100); /* to a single-wide line, column > 66. */ + printf("X"); + cup(4, 66); printf("! !"); + cup(5,1); + printf("--------------------------- The 'X' should NOT be above here -"); + printf("---+------------ but above here -----+"); + cup(10,1); decdwl(); holdit(); + rm("?3"); +} + +/* Bug F: Column mode escape sequence */ + +bug_f() { + int i, row, col; + + /* + * VT100 "toggle origin mode, forget rest" bug. If you try to set + * (or clear) parameters and one of them is the "origin mode" + * ("?6") parameter, parameters that appear after the "?6" + * remain unaffected. This is also true on CIT-101 terminals. + */ + sm ("?5"); /* Set reverse mode */ + sm ("?3"); /* Set 132 column mode */ + println("Test VT100 'Toggle origin mode, forget rest' bug, part 1."); + println("The screen should be in reverse, 132 column mode."); + holdit(); + ed (2); + rm ("?6;5;3"); /* Reset (origin, reverse, 132 col) */ + println("Test VT100 'Toggle origin mode, forget rest' bug, part 2.\n"); + println("The screen should be in non-reverse, 80 column mode."); + holdit(); +} + + /* Bug W: + * The dreaded "wraparound" bug! You CUP to col 80, write a char, + * CUP to another line in col 80, write a char. And the brain-damaged + * terminal thinks that "Hokay, so he's written a char in col 80, so + * I stay in col 80 and wait for next character. Let's see now, here + * comes another character, and I'm still in col 80, so I must make + * a NewLine first." -- It doesn't clear that "still in col 80" flag + * on a CUP. Argh! + */ + +bug_w() { + int row, col; + + cup (16,1); + println(" This illustrates the \"wrap around bug\" which exists on a"); + println(" standard VT100. At the top of the screen there should be"); + println(" a row of +'s, and the rightmost column should be filled"); + println(" with *'s. But if the bug is present, some of the *'s may"); + println(" be placed in other places, e.g. in the leftmost column,"); + println(" and the top line of +'s may be scrolled away."); + + cup(1,1); + for (col = 1; col <= 79; col++) + printf ("+"); + for (row = 1; row <= 24; row++) { + hvp (row, 80); + printf ("*"); + } + cup(24,1); + holdit(); +} + + /* Bug L: + * Check if the right half of double-width lines comes back + * when a line is first set to single-width, filled with stuff, + * set to double-width, and finally reset to single-width. + * + * A VT100 has this misfeature, and many others. Foo! + */ + +bug_l() { + cup(15, 1); + printf("This-is-a-long-line-This-is-a-long-line-"); + printf("This-is-a-long-line-This-is-a-long-line-"); + cup(1, 1); + printf("This is a test of what happens to the right half of double-width"); + println(" lines."); + printf("A common misfeature is that the right half does not come back"); + println(" when a long"); + printf("single-width line is set to double-width and then reset to"); + println(" single-width."); + + cup(5, 1); + println("Now the line below should contain 80 characters in single width."); + holdit(); + cup(15, 1); decdwl(); + cup(8, 1); + println("Now the line below should contain 40 characters in double width."); + holdit(); + cup(15, 1); decswl(); + cup(11, 1); + println("Now the line below should contain 80 characters in single width."); + holdit(); + + /* ...and in 132 column mode */ + + sm("?3"); + ed(2); + cup(15, 1); + printf("This-is-a-long-line-This-is-a-long-line-"); + printf("This-is-a-long-line-This-is-a-long-line-"); + printf("This-is-a-long-line-This-is-a-long-line-"); + printf("ending-here-"); + + cup(1, 1); + printf("This is the same test in 132 column mode."); + + cup(5, 1); + println("Now the line below should contain 132 characters in single width."); + holdit(); + cup(15, 1); decdwl(); + cup(8, 1); + println("Now the line below should contain 66 characters in double width."); + holdit(); + cup(15, 1); decswl(); + cup(11, 1); + println("Now the line below should contain 132 characters in single width."); + holdit(); + rm("?3"); +} + +bug_s() { + int i; + decstbm(20,10); /* 20-10=-10, < 2, so no scroll region. */ + cup(1,1); + for (i=1; i<=20; i++) + printf("This is 20 lines of text (line %d), no scroll region.\n", i); + holdit(); + ed(2); + decstbm(0,1); /* Should be interpreted as decstbm(1,1) = none */ + cup(1,1); + for (i=1; i<=20; i++) + printf("This is 20 lines of text (line %d), no scroll region.\n", i); + holdit(); + decstbm(0,0); /* No scroll region (just in case...) */ +} + +tst_rst() { + + /* + * Test of + * - RIS (Reset to Initial State) + * - DECTST (invoke terminal test) + */ + + cup(10,1); + printf ("The terminal will now be RESET. "); + holdit(); + ris(); +#ifdef UNIX + fflush(stdout); +#endif + zleep(5000); /* Wait 5.0 seconds */ + cup(10,1); + println("The terminal is now RESET. Next, the built-in confidence test"); + printf("%s", "will be invoked. "); + holdit(); + ed(2); + dectst(1); +#ifdef UNIX + fflush(stdout); +#endif + zleep(5000); /* Wait 5.0 seconds */ + cup(10,1); + println("If the built-in confidence test found any errors, a code"); + printf("%s", "is visible above. "); + holdit(); +} + +initterminal(pn) int pn; { + +#ifdef UNIX + if (pn==0) { + fflush(stdout); + gtty(0,&sgttyOrg); + gtty(0,&sgttyNew); + sgttyNew.sg_flags |= CBREAK; + } + else { + fflush(stdout); + inflush(); + sleep(2); + sgttyNew.sg_flags = sgttyOrg.sg_flags | CBREAK; + } + stty(0,&sgttyNew); +#ifdef SIII + close(2); + open("/dev/tty",O_RDWR|O_NDELAY); +#endif +#endif +#ifdef SARG10 + /* Set up neccesary TOPS-10 terminal parameters */ + + trmop(02041, `VT100`); /* tty type vt100 */ + trmop(02002, 0); /* tty no tape */ + trmop(02003, 0); /* tty lc */ + trmop(02005, 1); /* tty tab */ + trmop(02010, 1); /* tty no crlf */ + trmop(02020, 0); /* tty no tape */ + trmop(02021, 1); /* tty page */ + trmop(02025, 0); /* tty blanks */ + trmop(02026, 1); /* tty no alt */ + trmop(02040, 1); /* tty defer */ +#endif +#ifdef SARG20 + ttybin(1); /* set line to binary mode */ +#endif + /* Set up my personal prejudices */ + + esc("<"); /* Enter ANSI mode (if in VT52 mode) */ + rm("?1"); /* cursor keys normal */ + rm("?3"); /* 80 col mode */ + rm("?4"); /* Jump scroll */ + rm("?5"); /* Normal screen */ + rm("?6"); /* Absolute origin mode */ + sm("?7"); /* Wrap around on */ + rm("?8"); /* Auto repeat off */ + decstbm(0,0); /* No scroll region */ + sgr("0"); /* Normal character attributes */ + +} + +bye () { + /* Force my personal prejudices upon the poor luser */ + + esc("<"); /* Enter ANSI mode (if in VT52 mode) */ + rm("?1"); /* cursor keys normal */ + rm("?3"); /* 80 col mode */ + rm("?5"); /* Normal screen */ + rm("?6"); /* Absolute origin mode */ + sm("?7"); /* Wrap around on */ + sm("?8"); /* Auto repeat on */ + decstbm(0,0); /* No scroll region */ + sgr("0"); /* Normal character attributes */ + + /* Say goodbye */ + + ed(2); + cup(12,30); + printf("That's all, folks!\n"); + printf("\n\n\n"); + inflush(); +#ifdef SARG20 + ttybin(0); /* reset line to normal mode */ +#endif +#ifdef UNIX + stty(0,&sgttyOrg); +#endif + exit(); +} + +#ifdef UNIX +onbrk() { + signal(SIGINT, onbrk); + if (reading) + brkrd = 1; + else + longjmp(intrenv, 1); +} + +onterm() { + signal(SIGTERM, onterm); + longjmp(intrenv, 1); +} +#endif + +holdit() { + inflush(); + printf("Push <RETURN>"); + readnl(); +} + +readnl() { +#ifdef UNIX + char ch; + fflush(stdout); + brkrd = 0; + reading = 1; + do { read(0,&ch,1); } while(ch != '\n' && !brkrd); + if (brkrd) + kill(getpid(), SIGTERM); + reading = 0; +#endif +#ifdef SARG10 + while (getchar() != '\n') + ; +#endif +#ifdef SARG20 + while (getchar() != '\n') + ; +#endif +} + +scanto(str, pos, toc) char *str; int *pos; char toc; { + char c; + int result = 0; + + while (toc != (c = str[(*pos)++])) { + if (isdigit(c)) result = result * 10 + c - '0'; + else break; + } + if (c == toc) return(result); + else return(0); +} + +char *lookup(t, k) struct table t[]; int k; { + + int i; + for (i = 0; t[i].key != -1; i++) { + if (t[i].key == k) return(t[i].msg); + } + return("BAD VALUE"); +} + +menu(table) char *table[]; { + + int i, tablesize, choice; + char c; + char storage[80]; + char *s = storage; + println(""); + tablesize = 0; + for (i = 0; *table[i] != '\0'; i++) { + printf(" %d. %s\n", i, table[i]); + tablesize++; + } + tablesize--; + + printf("\n Enter choice number (0 - %d): ", tablesize); + for(;;) { + inputline(s); + choice = 0; + while (c = *s++) choice = 10 * choice + c - '0'; + if (choice >= 0 && choice <= tablesize) { + ed(2); + return (choice); + } + printf(" Bad choice, try again: "); + } +} + +chrprint (s) char *s; { + + int i; + + printf(" "); + sgr("7"); + printf(" "); + for (i = 0; s[i] != '\0'; i++) { + if (s[i] <= ' ' || s[i] == '\177') + printf("<%d> ", s[i]); + else printf("%c ", s[i]); + } + sgr(""); +} diff --git a/usr.sbin/pcvt/vttest/vttest.1 b/usr.sbin/pcvt/vttest/vttest.1 new file mode 100644 index 0000000..c410492 --- /dev/null +++ b/usr.sbin/pcvt/vttest/vttest.1 @@ -0,0 +1,13 @@ +.TH VTTEST 1 "LOCAL" +.SH NAME +vttest \- test VT100-type terminal +.SH SYNOPSIS +.B vttest +.SH DESCRIPTION +.I Vttest +is a program designed to test the functionality of a VT100 terminal +(or emulator thereof). +It tests both display (escape sequence handling) and keyboard. +.PP +The program is menu\-driven and contains full on\-line operating +instructions. |