initial import of NetBSD tree

84 files changed, 14952 insertions, 0 deletions

diff --git a/sys/arch/i386/isa/pcvt/Util/Makefile b/sys/arch/i386/isa/pcvt/Util/Makefile
new file mode 100644
index 00000000000..fc23821669c
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/Makefile
@@ -0,0 +1,9 @@
+SUBDIR= 	keycap cursor fontedit fonts kcon loadfont scon \
+		userkeys vttest ispcvt mcon pcvtdoc
+
+.if make(clean) || make(cleandir) || make(obj)
+SUBDIR+=	vgaio kbdio set2061
+SUBDIR+=	demo
+.endif
+
+.include <bsd.subdir.mk>
diff --git a/sys/arch/i386/isa/pcvt/Util/Makefile.inc b/sys/arch/i386/isa/pcvt/Util/Makefile.inc
new file mode 100644
index 00000000000..70eb3a03513
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/Makefile.inc
@@ -0,0 +1,33 @@
+#	$NetBSD: Makefile.inc,v 1.3 1995/10/07 21:51:42 jtc Exp $
+
+ECHO	?=	echo
+
+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
+
+MAN3EXT	=	3
+MAN4EXT	=	4
+MAN5EXT	=	5
+MAN8EXT	=	8
+MANDIR	=	/usr/local/man/cat
+
+MAN = ${MAN1} ${MAN3} ${MAN4} ${MAN5} ${MAN8}
+
+.if	empty(MAN) && defined(PROG)
+MAN+=	${PROG}.1
+.endif
diff --git a/sys/arch/i386/isa/pcvt/Util/cursor/Makefile b/sys/arch/i386/isa/pcvt/Util/cursor/Makefile
new file mode 100644
index 00000000000..b5afd6cec23
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/cursor/Makefile
@@ -0,0 +1,3 @@
+PROG=	cursor
+
+.include <bsd.prog.mk>
diff --git a/sys/arch/i386/isa/pcvt/Util/cursor/cursor.1 b/sys/arch/i386/isa/pcvt/Util/cursor/cursor.1
new file mode 100644
index 00000000000..077448cfc48
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/cursor/cursor.1
@@ -0,0 +1,76 @@
+.\" Copyright (c) 1992, 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 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.30, Last Edit-Date: [Fri Jun 30 20:06:58 1995]
+.\"
+.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/sys/arch/i386/isa/pcvt/Util/cursor/cursor.c b/sys/arch/i386/isa/pcvt/Util/cursor/cursor.c
new file mode 100644
index 00000000000..f2a7b91b864
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/cursor/cursor.c
@@ -0,0 +1,157 @@
+/*
+ * Copyright (c) 1992, 1995 Hellmuth Michaelis
+ *
+ * Copyright (c) 1992, 1994 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.30, Last Edit-Date: [Fri Jun 30 20:07:13 1995]";
+
+/*---------------------------------------------------------------------------*
+ *
+ *	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/sys/arch/i386/isa/pcvt/Util/demo/Makefile b/sys/arch/i386/isa/pcvt/Util/demo/Makefile
new file mode 100644
index 00000000000..79f7397e6dd
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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 -f $@.gz
+	rm -f $@.gz
+
+colors.vt: ${.CURDIR}/$@.gz.uu
+	uudecode ${.CURDIR}/$@.gz.uu
+	gunzip -f $@.gz
+	rm -f $@.gz
+
+sgr.vt: ${.CURDIR}/$@.gz.uu
+	uudecode ${.CURDIR}/$@.gz.uu
+	gunzip -f $@.gz
+	rm -f $@.gz
+
+cowscene.vt: ${.CURDIR}/$@.gz.uu
+	uudecode ${.CURDIR}/$@.gz.uu
+	gunzip -f $@.gz
+	rm -f $@.gz
+
+xmas.vt: ${.CURDIR}/$@.gz.uu
+	uudecode ${.CURDIR}/$@.gz.uu
+	gunzip -f $@.gz
+	rm -f $@.gz
+
+outerlimit.vt: ${.CURDIR}/$@.gz.uu
+	uudecode ${.CURDIR}/$@.gz.uu
+	gunzip -f $@.gz
+	rm -f $@.gz
+
+twzone.vt: ${.CURDIR}/$@.gz.uu
+	uudecode ${.CURDIR}/$@.gz.uu
+	gunzip -f $@.gz
+	rm -f $@.gz
diff --git a/sys/arch/i386/isa/pcvt/Util/demo/README b/sys/arch/i386/isa/pcvt/Util/demo/README
new file mode 100644
index 00000000000..5e33f540ad8
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/demo/chardemo.vt.gz.uu b/sys/arch/i386/isa/pcvt/Util/demo/chardemo.vt.gz.uu
new file mode 100644
index 00000000000..efcd4c7f1ef
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/demo/colors.vt.gz.uu b/sys/arch/i386/isa/pcvt/Util/demo/colors.vt.gz.uu
new file mode 100644
index 00000000000..1d5d0daee45
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/demo/cowscene.vt.gz.uu b/sys/arch/i386/isa/pcvt/Util/demo/cowscene.vt.gz.uu
new file mode 100644
index 00000000000..7a5a4dbb724
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/demo/outerlimit.vt.gz.uu b/sys/arch/i386/isa/pcvt/Util/demo/outerlimit.vt.gz.uu
new file mode 100644
index 00000000000..a2b6d1a2e50
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/demo/playvt.c b/sys/arch/i386/isa/pcvt/Util/demo/playvt.c
new file mode 100644
index 00000000000..d0a391ff6b4
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/demo/sgr.vt.gz.uu b/sys/arch/i386/isa/pcvt/Util/demo/sgr.vt.gz.uu
new file mode 100644
index 00000000000..099c3a49672
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/demo/twzone.vt.gz.uu b/sys/arch/i386/isa/pcvt/Util/demo/twzone.vt.gz.uu
new file mode 100644
index 00000000000..df05d50b2ce
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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&#0@(*`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'&#393-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/sys/arch/i386/isa/pcvt/Util/demo/xmas.vt.gz.uu b/sys/arch/i386/isa/pcvt/Util/demo/xmas.vt.gz.uu
new file mode 100644
index 00000000000..ca2ba3ada79
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/fed/Makefile b/sys/arch/i386/isa/pcvt/Util/fed/Makefile
new file mode 100644
index 00000000000..9e4503a7b13
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/fed/Makefile
@@ -0,0 +1,6 @@
+PROG=	fed
+SRCS=	fed.c select.c edit.c misc.c
+LDADD=	-lncurses
+BINDIR=	/usr/local/bin
+
+.include <bsd.prog.mk>
diff --git a/sys/arch/i386/isa/pcvt/Util/fed/edit.c b/sys/arch/i386/isa/pcvt/Util/fed/edit.c
new file mode 100644
index 00000000000..c15a90ceb6d
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/fed/fed.1 b/sys/arch/i386/isa/pcvt/Util/fed/fed.1
new file mode 100644
index 00000000000..4b49671f336
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/fed/fed.1
@@ -0,0 +1,52 @@
+.\" Copyright (c) 1992, 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 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.
+.\"
+.\" @(#)fed.1, 3.30, Last Edit-Date: [Wed Jul  5 19:25:39 1995]
+.\"
+.Dd July 3, 1995
+.Dt FED 1
+.Sh NAME
+.Nm fed
+.Nd font editor for pcvt's EGA/VGA download fonts
+.Sh SYNOPSIS
+.Nm fed
+.Op filename
+.Sh DESCRIPTION
+The
+.Nm fed
+utility allows a user to edit or create EGA/VGA download fontfiles to be
+used by the
+.Nm pcvt
+device driver.
+.Pp
+.Sh BUGS
+No known bugs
+.Sh SEE ALSO
+.Xr pcvt 4
+.Xr loadfont 1
diff --git a/sys/arch/i386/isa/pcvt/Util/fed/fed.c b/sys/arch/i386/isa/pcvt/Util/fed/fed.c
new file mode 100644
index 00000000000..aa577ab9897
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/fed/fed.h b/sys/arch/i386/isa/pcvt/Util/fed/fed.h
new file mode 100644
index 00000000000..27a32c35526
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/fed/misc.c b/sys/arch/i386/isa/pcvt/Util/fed/misc.c
new file mode 100644
index 00000000000..a0dff32703a
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/fed/select.c b/sys/arch/i386/isa/pcvt/Util/fed/select.c
new file mode 100644
index 00000000000..6b9d3858cf7
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/fontedit/Makefile b/sys/arch/i386/isa/pcvt/Util/fontedit/Makefile
new file mode 100644
index 00000000000..be63fb8212d
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/fontedit/Makefile
@@ -0,0 +1,5 @@
+PROG=		fontedit
+CLEANFILES+=	core.fontedit fontedit.core
+
+.include <bsd.prog.mk>
+
diff --git a/sys/arch/i386/isa/pcvt/Util/fontedit/README b/sys/arch/i386/isa/pcvt/Util/fontedit/README
new file mode 100644
index 00000000000..1854129b63d
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/fontedit/fontedit.1 b/sys/arch/i386/isa/pcvt/Util/fontedit/fontedit.1
new file mode 100644
index 00000000000..8b55edb46a6
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/fontedit/fontedit.c b/sys/arch/i386/isa/pcvt/Util/fontedit/fontedit.c
new file mode 100644
index 00000000000..36a3232f097
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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 (__NetBSD__) || defined (__FreeBSD__)
+#include <sys/termios.h>
+#include <sys/ioctl.h>
+#endif /* __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 (__NetBSD__) || defined (__FreeBSD__)
+struct termios old_stty, new_stty;
+#endif /* __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 (__NetBSD__) || defined (__FreeBSD__)
+        ioctl( 0, TIOCSETA, &old_stty );
+#endif /* __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 (__NetBSD__) || defined (__FreeBSD__)
+        ioctl( 0, TIOCGETA, &old_stty );
+#endif /* __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 (__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 /* __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 (__NetBSD__) || defined (__FreeBSD__)
+	ioctl( 0, TIOCSETA, &old_stty );
+#endif /* __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/sys/arch/i386/isa/pcvt/Util/fonts/COPYRIGHT b/sys/arch/i386/isa/pcvt/Util/fonts/COPYRIGHT
new file mode 100644
index 00000000000..13205223548
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/fonts/COPYRIGHT
@@ -0,0 +1,37 @@
+The font files:
+
+	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, 1995 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/sys/arch/i386/isa/pcvt/Util/fonts/Makefile b/sys/arch/i386/isa/pcvt/Util/fonts/Makefile
new file mode 100644
index 00000000000..88de1773adf
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/fonts/Makefile
@@ -0,0 +1,54 @@
+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 ${DESTDIR}${FONTDIR} ]; then mkdir ${DESTDIR}${FONTDIR};fi
+	@for i in ${FONTS}; do \
+		${ECHO} "installing font $$i into ${DESTDIR}${FONTDIR}"; \
+		install -c -m ${LIBMODE} -o ${LIBOWN} -g ${LIBGRP} \
+		$$i ${DESTDIR}${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
diff --git a/sys/arch/i386/isa/pcvt/Util/fonts/vt220h.808.uu b/sys/arch/i386/isa/pcvt/Util/fonts/vt220h.808.uu
new file mode 100644
index 00000000000..c9585dc1a39
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/fonts/vt220h.810.uu b/sys/arch/i386/isa/pcvt/Util/fonts/vt220h.810.uu
new file mode 100644
index 00000000000..04689b1585b
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/fonts/vt220h.814.uu b/sys/arch/i386/isa/pcvt/Util/fonts/vt220h.814.uu
new file mode 100644
index 00000000000..9d49552c3bb
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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$```````````````````/\`````
+M`````````/\``````````````/\``````````````/\``````````````/\`
+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/sys/arch/i386/isa/pcvt/Util/fonts/vt220h.816.uu b/sys/arch/i386/isa/pcvt/Util/fonts/vt220h.816.uu
new file mode 100644
index 00000000000..401db375c16
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/fonts/vt220l.808.uu b/sys/arch/i386/isa/pcvt/Util/fonts/vt220l.808.uu
new file mode 100644
index 00000000000..02ad9444c47
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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^!@8&#8V-C;V-C8V`````/XV-C8``/@8^!@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/sys/arch/i386/isa/pcvt/Util/fonts/vt220l.810.uu b/sys/arch/i386/isa/pcvt/Util/fonts/vt220l.810.uu
new file mode 100644
index 00000000000..7cba2cb91aa
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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@?&!@8&#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/sys/arch/i386/isa/pcvt/Util/fonts/vt220l.814.uu b/sys/arch/i386/isa/pcvt/Util/fonts/vt220l.814.uu
new file mode 100644
index 00000000000..7d918bbe1c4
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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&!@8&#8V-C8V-C;V-C8V-C8V````
+M`````/XV-C8V-C8``````/@8^!@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/sys/arch/i386/isa/pcvt/Util/fonts/vt220l.816.uu b/sys/arch/i386/isa/pcvt/Util/fonts/vt220l.816.uu
new file mode 100644
index 00000000000..62393e14b72
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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&!@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/sys/arch/i386/isa/pcvt/Util/ispcvt/Makefile b/sys/arch/i386/isa/pcvt/Util/ispcvt/Makefile
new file mode 100644
index 00000000000..5c17c22a4b7
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/ispcvt/Makefile
@@ -0,0 +1,6 @@
+PROG=	ispcvt
+MAN8=	ispcvt.${MAN8EXT}
+
+.include <bsd.prog.mk>
+
+BINDIR=	${DESTDIR}/usr/sbin
diff --git a/sys/arch/i386/isa/pcvt/Util/ispcvt/ispcvt.8 b/sys/arch/i386/isa/pcvt/Util/ispcvt/ispcvt.8
new file mode 100644
index 00000000000..ef7459c5412
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/ispcvt/ispcvt.8
@@ -0,0 +1,91 @@
+.\" Copyright (c) 1992, 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 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.30, Last Edit-Date: [Mon Jul  3 11:25:37 1995]
+.\"
+.Dd April 4, 1995
+.Dt ISPCVT 1
+.Sh NAME
+.Nm ispcvt
+.Nd verify if current video driver is pcvt driver
+.Sh SYNOPSIS
+.Nm ispcvt
+.Op Fl c
+.Op Fl d Ar device
+.Op Fl v
+.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 d
+Specifies a device for which the check is done.
+.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
+open or 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 4
diff --git a/sys/arch/i386/isa/pcvt/Util/ispcvt/ispcvt.c b/sys/arch/i386/isa/pcvt/Util/ispcvt/ispcvt.c
new file mode 100644
index 00000000000..cac5b485a16
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/ispcvt/ispcvt.c
@@ -0,0 +1,310 @@
+/*
+ * Copyright (c) 1992, 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 =
+	"@(#)ispcvt.c, 3.31, Last Edit-Date: [Tue Sep  5 16:31:24 1995]";
+
+/*---------------------------------------------------------------------------*
+ *
+ *	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
+ *	-hm	removed PCVT_FAKE_SYSCONS10
+ *	-hm	added PCVT_PORTIO_DELAY
+ *	-hm	removed PCVT_386BSD
+ *	-hm	add -d option to specify a device
+ *	-hm	PCVT_XSERVER -> XSERVER
+ *	-hm	PCVT_MDAFASTSCROLL
+ *	-hm	removed PCVT_USL_VT_COMPAT
+ *
+ *---------------------------------------------------------------------------*/
+
+#include <stdio.h>
+#include <fcntl.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 pcvtid pcvtid;
+	struct pcvtinfo pcvtinfo;	
+	int c;
+	char *p;
+	int verbose = 0;
+	int config = 0;	
+	int dflag = 0;
+	int fd;
+	char *device;
+
+	while( (c = getopt(argc, argv, "vcd:")) != EOF)
+	{
+		switch(c)
+		{
+			case 'v':
+				verbose = 1;
+				break;
+				
+			case 'c':
+				config = 1;
+				break;
+				
+			case 'd':
+				device = optarg;
+				dflag = 1;
+				break;
+				
+			case '?':
+			default:
+				usage();
+				break;
+		}
+	}
+
+	if(dflag)
+	{
+		if((fd = open(device, O_RDWR)) == -1)
+		{
+			if(verbose)
+			{
+				char buffer[80];
+				strcpy(buffer,"ERROR opening ");
+				strcat(buffer,device);
+				perror(buffer);
+			}
+			exit(1);
+		}
+	}
+	else
+	{
+		fd = DEFAULTFD;
+	}
+
+	if(ioctl(fd, 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(fd, VGAPCVTINFO, &pcvtinfo) == -1)
+	{
+		if(verbose)
+			perror("ispcvt - ioctl VGAPCVTINFO failed, error");
+		exit(1);
+	}
+
+	if(verbose)
+	{
+		switch(pcvtinfo.opsys)
+		{
+			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_132GENERIC      = %s",
+			(pcvtinfo.compile_opts & CONF_132GENERIC) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_24LINESDEF      = %s",
+			(pcvtinfo.compile_opts & CONF_24LINESDEF) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_BACKUP_FONTS    = %s",
+			(pcvtinfo.compile_opts & CONF_BACKUP_FONTS) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_CTRL_ALT_DEL    = %s",
+			(pcvtinfo.compile_opts & CONF_CTRL_ALT_DEL) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_EMU_MOUSE       = %s",
+			(pcvtinfo.compile_opts & CONF_EMU_MOUSE) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_INHIBIT_NUMLOCK = %s",
+			(pcvtinfo.compile_opts & CONF_INHIBIT_NUMLOCK) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_KEYBDID         = %s",
+			(pcvtinfo.compile_opts & CONF_KEYBDID) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_KBD_FIFO        = %s",
+			(pcvtinfo.compile_opts & CONF_KBD_FIFO) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_MDAFASTSCROLL   = %s",
+			(pcvtinfo.compile_opts & CONF_MDAFASTSCROLL) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_META_ESC        = %s",
+			(pcvtinfo.compile_opts & CONF_META_ESC) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_NOFASTSCROLL    = %s",
+			(pcvtinfo.compile_opts & CONF_NOFASTSCROLL) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_NO_LED_UPDATE   = %s",
+			(pcvtinfo.compile_opts & CONF_NO_LED_UPDATE) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_NULLCHARS       = %s",
+			(pcvtinfo.compile_opts & CONF_NULLCHARS) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_PALFLICKER      = %s",
+			(pcvtinfo.compile_opts & CONF_PALFLICKER) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_PORTIO_DELAY    = %s",
+			(pcvtinfo.compile_opts & CONF_PORTIO_DELAY) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_PRETTYSCRNS     = %s",
+			(pcvtinfo.compile_opts & CONF_PRETTYSCRNS) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_SCREENSAVER     = %s",
+			(pcvtinfo.compile_opts & CONF_SCREENSAVER) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_SETCOLOR        = %s",
+			(pcvtinfo.compile_opts & CONF_SETCOLOR) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_SHOWKEYS        = %s",
+			(pcvtinfo.compile_opts & CONF_SHOWKEYS) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_SIGWINCH        = %s",
+			(pcvtinfo.compile_opts & CONF_SIGWINCH) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_SLOW_INTERRUPT  = %s",
+			(pcvtinfo.compile_opts & CONF_SLOW_INTERRUPT) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_SW0CNOUTP       = %s",
+			(pcvtinfo.compile_opts & CONF_SW0CNOUTP) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_USEKBDSEC       = %s",
+			(pcvtinfo.compile_opts & CONF_USEKBDSEC) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_VT220KEYB       = %s",
+			((u_int)pcvtinfo.compile_opts & (u_int)CONF_VT220KEYB) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"PCVT_WAITRETRACE     = %s",
+			(pcvtinfo.compile_opts & CONF_WAITRETRACE) ? "ON" : "OFF");
+		next();
+		fprintf(stderr,"XSERVER              = %s",
+			(pcvtinfo.compile_opts & CONF_XSERVER) ? "ON" : "OFF");
+
+		fprintf(stderr,"\n\n");
+	}
+	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] [-d device]\n");
+	fprintf(stderr,"options: -v         be verbose\n");
+	fprintf(stderr,"         -c         print compile time configuration\n");
+	fprintf(stderr,"         -d <name>  use devicefile <name> for verification\n\n");
+	exit(5);
+}
+
+next()
+{
+	static int i = 0;
+
+	fprintf(stderr, "%s", (i == 0) ? "\t\t" : "\n");
+
+	i = ~i;
+}
+
+/* EOF */
diff --git a/sys/arch/i386/isa/pcvt/Util/kbdio/Makefile b/sys/arch/i386/isa/pcvt/Util/kbdio/Makefile
new file mode 100644
index 00000000000..daebe80d967
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/kbdio/Makefile
@@ -0,0 +1,22 @@
+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
+
+.include <bsd.prog.mk>
+
+lex.o: y.tab.h lex.l
diff --git a/sys/arch/i386/isa/pcvt/Util/kbdio/kbdio.8 b/sys/arch/i386/isa/pcvt/Util/kbdio/kbdio.8
new file mode 100644
index 00000000000..b6048bb0a21
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/kbdio/kbdio.8
@@ -0,0 +1,330 @@
+.\" 
+.\" Copyright (c) 1995 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: /cvs/OpenBSD/src/sys/arch/i386/isa/pcvt/Util/kbdio/Attic/kbdio.8,v 1.1 1995/10/18 08:50:45 deraadt Exp $
+.\" 
+.Dd April 15, 1995
+.Dt KBDIO 8
+.Sh NAME
+.Nm kbdio
+.Nd perform input/output on a PC keyboard/keyboard controller
+.Sh SYNOPSIS
+.Nm kbdio
+.Op Fl d
+.Op Fl f Ar devname
+.Sh DESCRIPTION
+.Ss Purpose
+.Nm Kbdio
+is used to perform input/output on a PC keyboard or the
+.Pq motherboard
+keyboard controller.
+.Nm Kbdio
+cares for proper handshaking and necessary IO-ready conditions.  It
+allows the interpretion of some registers in symbolic form, as well as
+to specify symbolic operands for the keyboard command byte.  Simple
+arithmetic expressions can be formed to set or reset some bits, which
+is mostly applicable to the keyboard command byte, too.
+
+.Ss Options
+.Bl -tag -width 10n -offset indent -compact
+.It Fl d
+Turn on the grammar parser debugger.
+
+.It Fl f Ar devname
+Operate on device
+.Ar devname
+instead of the default
+.Pa /dev/console .
+.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 statements.
+
+The list of acceptable statements includes:
+.Bl -tag -width "TYPEMATIC" -indent offset -compact
+
+.It Li \&?
+.It Li help
+Give help on the general syntax.
+
+.It Li help expr
+Help on expression syntax.
+
+.It Li status \&?
+Report keyboard controller status.
+
+.It Li what \&?
+Determine
+.Tn MCA
+type 1 or type 2 keyboard controller.
+
+.It Li data \&?
+Fetch keyboard controller data port.
+
+.It Li led \&= Ar number
+Set keyboard LEDs.
+.Ar Number
+is a logical combination of
+.Bl -hang -width "4" -compact
+.It 1
+scroll lock LED
+.It 2
+num lock LED
+.It 4
+caps lock LED.
+.El
+
+.It Li echo
+Send keyboard
+.Li ECHO
+command.
+
+.It Li scan \&= Ar number
+Turn keyboard to generate scan codes according to code set
+.Ar number .
+Only supported on
+.Tn PS/2
+style keyboards.
+
+.It Li scan \&?
+Report code set keyboard is currently operating in.
+
+.It Li \&id \&?
+Ask keyboard to report its identification bytes
+
+.It Xo
+.Li typematic \&= Ar number1 Li \&, Ar number2
+.Xc
+Set keyboard typematic delay and repeat rate to
+.Ar number1
+milliseconds and
+.Ar number2
+repeats per second, respectively.
+
+.It Li enable
+Enable keyboard.
+
+.It Li defaults
+Return customizable parameters to defaults.
+
+.It Li all typematic
+Set all keys to
+.Em typematic
+behaviour.  This command as well as the following ones are only
+supported on
+.Tn PS/2
+style keyboards and only while operating in scan code set 3.
+
+.It Li all make release
+Turn all keys in generating
+.Em make
+and
+.Em release
+events only.
+
+.It Li all make only
+Turn all keys in generating
+.Em make
+codes only.
+
+.It Li all typematic make release
+Set all keys to generate
+.Em make
+and
+.Em release
+events, as well as perform
+.Em typematic
+behaviour.  This is usually the default.
+
+.It Ar number Li typematic
+Set key
+.Ar number
+to
+.Em typematic
+behaviour.
+
+.It Ar number Li make release
+Turn a single key
+.Ar number
+to generate
+.Em make
+and
+.Em release
+events only.
+
+.It Ar number Li make only
+Set key
+.Ar number
+to return
+.Em make
+events only.
+
+.It Li resend
+Ask the keyboard to retransmit its last character.
+
+.It Li reset
+Perform a keyboard
+.Li RESET
+command.
+
+.It Li cmd \&?
+Get the keyboard command byte and interpret it symbolically.
+
+.It Li cmd \&= Ar expr
+Set the keyboard command byte to
+.Ar expr .
+See the next subsection for expression syntax.
+.El
+
+Returned data will be printed hexadecimal, but any queued keyboard
+control responses will be printed first.
+
+.Ss Expression syntax
+Expressions can either consist of a number, possibly followed
+by a
+.Sq +
+or
+.Sq \-
+sign and bit values in numeric or symbolic form.
+Symbolic bit values are
+.Pq with their meaning in the keyboard command byte :
+
+.Bl -tag -width "ovrinh" -offset indent -compact
+
+.It Li scconv
+value
+.Li 0x40 ,
+enable PC scan code conversion at
+.Em controller
+level, as opposed to the different keyboard scan code sets;
+
+.It Li ignpar
+value
+.Li 0x20 ,
+ignore keyboard parity;
+
+.It Li clklow
+value
+.Li 0x10 ,
+hold keyboard clock line low
+.Pq disables keyboard ;
+
+.It Li ovrinh
+value
+.Li 0x08 ,
+override keyboard inhibit function -- ignore the keyboard lockout switch,
+intented to allow the keyboard self-test;
+
+.It Li test
+value
+.Li 0x04 ,
+controller self-test okay;
+
+.It Li irq
+value
+.Li 0x01 ,
+enable generation of
+.Li IRQ1
+if output buffer is full.
+.El
+
+The operators
+.Sq +
+and
+.Sq \-
+perform simple bit-set or bit-clear functionality, respectively.  This
+is roughly comparable with the operators
+.Sq \&|
+and
+.Sq \&&~
+in
+.Em C .
+
+Expressions are evaluated left to right and cannot be bracketed.
+The special keyword
+.Li cmd
+is substituted by a read of the current keyboard command byte.
+
+.Ss Access control
+The caller must have uid 0 in order to gain the required access to
+the IO registers.
+
+.Sh EXAMPLES
+
+.Dl led=3
+
+Turn on num lock and scroll lock LEDs.
+
+.Dl "cmd = cmd - irq; id?; cmd = cmd + irq"
+
+Temporarily suspend keyboard interrupt generation, and ask the
+keyboard to return its identification bytes.
+
+.Sh FILES
+.Pa /dev/console
+is used as the default device to enable 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 handle the PC keyboard, and to give a very basic
+aid in debugging keyboard-related problems.
+
+.Sh AUTHOR
+The program has been contributed by
+.if n Joerg Wunsch,
+.if t J\(:org Wunsch,
+Dresden
+.Aq joerg_wunsch@uriah.heep.sax.de .
+
+.Sh BUGS
+No useful diagnostics are printed in case of a syntax error.
+
+Remember, to use this program, your kernel has to be compiled with XSERVER
+being defined.
+
+Use of this program might cause grievous harm to your system's sanity,
+not only that it might hang your keyboard and/or keyboard controller
+indefinitely, it might also hard-reset your system when accidentally
+accessing the hardware reset facility of the keyboard controller
+.Po
+which does not actually belong there, but used to be
+.Pc .
+
+It is highly recommended to use this program only when logged into the
+machine across a network or on a serial line.
diff --git a/sys/arch/i386/isa/pcvt/Util/kbdio/kbdio.y b/sys/arch/i386/isa/pcvt/Util/kbdio/kbdio.y
new file mode 100644
index 00000000000..02097f039e2
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/kbdio/kbdio.y
@@ -0,0 +1,344 @@
+/* Hello emacs, this should be edited in -*- Fundamental -*- mode */
+%{
+/*
+ * Copyright (c) 1994,1995 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: /cvs/OpenBSD/src/sys/arch/i386/isa/pcvt/Util/kbdio/Attic/kbdio.y,v 1.1 1995/10/18 08:50:45 deraadt Exp $"
+
+#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	KBD_DELAY \
+	{ u_char x = inb(0x84); } \
+	{ u_char x = inb(0x84); } \
+	{ u_char x = inb(0x84); } \
+	{ u_char x = inb(0x84); } \
+	{ u_char x = inb(0x84); } \
+	{ u_char x = inb(0x84); }
+
+#define YYDEBUG 1
+
+void yyerror(const char *msg);
+
+static	void help(int), status(void), data(int), kbd(int), cmdbyte(int),
+	kbc(int), whatMCA(void);
+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		WHAT
+%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(); }
+		| WHAT '?'		{ whatMCA(); }
+		| 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"
+	"what ?			check for MCA type 1 or 2 motherboard controller\n"
+	"data ?			get one byte of data\n"
+	"led = NUM		set kbd LEDs\n"
+	"echo			send kbd ECHO command\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");
+	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;
+
+	case 2:
+	fprintf(stderr, "usage: kbdio [-d] [-f devname]\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");
+}
+
+/* see: Frank van Gilluwe, "The Undocumented PC", Addison Wesley 1994, pp 273*/
+
+static void
+whatMCA(void) {
+	int new, sav;
+	kbc(0x20);		/* get command byte */
+	sav = kbget();		/* sav = command byte */
+	kbc(0x60);		/* set command byte */
+	kbd(sav | 0x40);	/* set keyboard xlate bit */
+	kbc(0x20);		/* get keyboard command */
+	new = kbget();		/* new = command byte */
+	kbc(0x60);		/* set command byte */
+	kbd(sav);		/* restore command byte */
+	if(new & 0x40)
+		printf("Hmm - looks like MCA type 1 motherboard controller\n");
+	else
+		printf("Hmm - looks like MCA type 2 motherboard controller\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; }
+		KBD_DELAY
+		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, c;
+	const char *devname = "/dev/console";
+
+	while((c = getopt(argc, argv, "df:")) != EOF)
+		switch(c) {
+		case 'd':
+			yydebug = 1;
+			break;
+
+		case 'f':
+			devname = optarg;
+			break;
+
+		case '?':
+		default:
+			help(2);
+			return 2;
+		}
+	argc -= optind;
+	argv += optind;
+	if(argc > 0) {
+		help(2);
+		return 2;
+	}
+
+	if((fd = open(devname, O_RDONLY)) < 0) {
+		perror("open(kbd)");
+		return 1;
+	}
+
+	if(ioctl(fd, KDENABIO, 0) < 0) {
+		perror("ioctl(KDENABIO)");
+		return 1;
+	}
+	yyparse();
+
+	(void)ioctl(fd, KDDISABIO, 0);
+	return 0;
+}
+
diff --git a/sys/arch/i386/isa/pcvt/Util/kbdio/lex.l b/sys/arch/i386/isa/pcvt/Util/kbdio/lex.l
new file mode 100644
index 00000000000..d8225eede23
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/kbdio/lex.l
@@ -0,0 +1,87 @@
+%{
+/*
+ * Copyright (c) 1994,1995 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: /cvs/OpenBSD/src/sys/arch/i386/isa/pcvt/Util/kbdio/Attic/lex.l,v 1.1 1995/10/18 08:50:45 deraadt Exp $"
+
+#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; }
+what		{ return WHAT; }
+
+		/* 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/sys/arch/i386/isa/pcvt/Util/kcon/Makefile b/sys/arch/i386/isa/pcvt/Util/kcon/Makefile
new file mode 100644
index 00000000000..4826870f5b9
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/kcon/Makefile
@@ -0,0 +1,10 @@
+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>
diff --git a/sys/arch/i386/isa/pcvt/Util/kcon/kcon.1 b/sys/arch/i386/isa/pcvt/Util/kcon/kcon.1
new file mode 100644
index 00000000000..8c7d4f2d381
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/kcon/kcon.1
@@ -0,0 +1,122 @@
+.\" Copyright (c) 1992, 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 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.31, Last Edit-Date: [Thu Aug 24 10:46:12 1995]
+.\"
+.Dd August 24, 1995
+.Dt KCON 1
+.Sh NAME
+.Nm kcon
+.Nd keyboard control and remapping for the pcvt driver
+.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/sys/arch/i386/isa/pcvt/Util/kcon/kcon.c b/sys/arch/i386/isa/pcvt/Util/kcon/kcon.c
new file mode 100644
index 00000000000..663faa9b4ca
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/kcon/kcon.c
@@ -0,0 +1,753 @@
+/*
+ * Copyright (c) 1992, 1995 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.30, Last Edit-Date: [Fri Jun 30 20:11:42 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/sys/arch/i386/isa/pcvt/Util/keycap/Makefile b/sys/arch/i386/isa/pcvt/Util/keycap/Makefile
new file mode 100644
index 00000000000..940b272bc06
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/keycap/Makefile
@@ -0,0 +1,19 @@
+LIB	=	keycap
+CAPDIR	=	$(DESTDIR)/usr/share/misc
+CAPPATH	=	$(CAPDIR)/keycap.pcvt
+KEYCAPSRC=	keycap.src
+CFLAGS	+=	-DKEYCAP_PATH=\"$(CAPPATH)\"
+SRCS	=	keycap.c
+MAN3	=	keycap.${MAN3EXT}
+MAN5	=	keycap.${MAN5EXT}
+#CLEANFILES+=	keycap.0 keycap.0
+
+beforeinstall:
+	@if [ ! -d ${DESTDIR}${LIBDIR} ]; then mkdir ${DESTDIR}${LIBDIR};fi
+	@${ECHO} "Saving old keycap database"
+	-mv -f ${DESTDIR}${CAPPATH} ${DESTDIR}${CAPPATH}.BAK
+	install -c -m ${LIBMODE} -o ${LIBOWN} -g ${LIBGRP} \
+	${.CURDIR}/${KEYCAPSRC} ${DESTDIR}${CAPPATH}
+
+
+.include <bsd.lib.mk>
diff --git a/sys/arch/i386/isa/pcvt/Util/keycap/keycap.3 b/sys/arch/i386/isa/pcvt/Util/keycap/keycap.3
new file mode 100644
index 00000000000..7eb59dcb230
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/keycap/keycap.5 b/sys/arch/i386/isa/pcvt/Util/keycap/keycap.5
new file mode 100644
index 00000000000..8a11f59a507
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/keycap/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/sys/arch/i386/isa/pcvt/Util/keycap/keycap.c b/sys/arch/i386/isa/pcvt/Util/keycap/keycap.c
new file mode 100644
index 00000000000..f70e987b0f6
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/keycap/keycap.h b/sys/arch/i386/isa/pcvt/Util/keycap/keycap.h
new file mode 100644
index 00000000000..1dc4c3e1e6e
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/keycap/keycap.src b/sys/arch/i386/isa/pcvt/Util/keycap/keycap.src
new file mode 100644
index 00000000000..af50d728c69
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/keycap/keycap.src
@@ -0,0 +1,613 @@
+# 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: [Wed Mar  8 20:53:01 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
+#	-hm	renamed finnish "f8" entry to "f1"
+#
+#---------------------------------------------------------------------------
+
+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
+f1|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/sys/arch/i386/isa/pcvt/Util/loadfont/Makefile b/sys/arch/i386/isa/pcvt/Util/loadfont/Makefile
new file mode 100644
index 00000000000..c0f454fdc04
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/loadfont/Makefile
@@ -0,0 +1,3 @@
+PROG=	loadfont
+
+.include <bsd.prog.mk>
diff --git a/sys/arch/i386/isa/pcvt/Util/loadfont/loadfont.1 b/sys/arch/i386/isa/pcvt/Util/loadfont/loadfont.1
new file mode 100644
index 00000000000..913802c429b
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/loadfont/loadfont.1
@@ -0,0 +1,91 @@
+.\" Copyright (c) 1992, 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 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.31, Last Edit-Date: [Thu Aug 24 10:44:42 1995]
+.\"
+.Dd August 24, 1995
+.Dt LOADFONT 1
+.Sh NAME
+.Nm loadfont
+.Nd EGA/VGA fontloader for pcvt video driver.
+.Sh SYNOPSIS
+.Nm loadfont
+.Op Fl c Ar charsetno
+.Op Fl d Ar devicefile
+.Op Fl f Ar fontfilename
+.Op Fl i
+.Op Fl s Ar scanlines
+.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 d
+Specifies the devicefile to use.
+.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.
+.It Fl s
+Specifies the number of scanlines of the display.
+.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
+The following fontfiles are available in the pcvt distribution:
+
+.nf
+/usr/share/misc/pcvtfonts/vt220l.808:	8x8  IBM II font
+/usr/share/misc/pcvtfonts/vt220h.808:	8x8  Extension font
+/usr/share/misc/pcvtfonts/vt220l.810:	8x10 IBM II font
+/usr/share/misc/pcvtfonts/vt220h.810:	8x10 Extension font
+/usr/share/misc/pcvtfonts/vt220l.814:	8x14 IBM II font
+/usr/share/misc/pcvtfonts/vt220h.814:	8x14 Extension font
+/usr/share/misc/pcvtfonts/vt220l.816:	8x16 IBM II font
+/usr/share/misc/pcvtfonts/vt220h.816:	8x16 Extension font
+.fi
+.Sh EXAMPLES
+The command
+.Dq Li loadfont -c0 -f/usr/share/misc/pcvtfonts/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/sys/arch/i386/isa/pcvt/Util/loadfont/loadfont.c b/sys/arch/i386/isa/pcvt/Util/loadfont/loadfont.c
new file mode 100644
index 00000000000..3d66fd8e932
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/loadfont/loadfont.c
@@ -0,0 +1,392 @@
+/*
+ * Copyright (c) 1992, 1995 Hellmuth Michaelis
+ *
+ * Copyright (c) 1992, 1994 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.31, Last Edit-Date: [Thu Aug 24 10:40:50 1995]";
+
+/*---------------------------------------------------------------------------*
+ *
+ *	load a font into vga character font memory
+ *
+ *	-hm	removing explicit HGC support (same as MDA ..)
+ *	-hm	new pcvt_ioctl.h SIZ_xxROWS
+ *	-hm	add -d option
+ *	-hm	patch from Joerg, -s scanlines option
+ *
+ *---------------------------------------------------------------------------*/
+ 
+#include <stdio.h>
+#include <fcntl.h>
+#include <errno.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <machine/pcvt_ioctl.h>
+
+struct screeninfo screeninfo;
+
+#define DEFAULTFD 0
+int fd;
+
+static int roundrows(int scrrow);
+static int codetosize(int code);
+static void setfont(int charset, int fontloaded, int charscan,
+		    int scrscan, int scrrow);
+static void loadfont(int fontset, int charscanlines,
+		     unsigned char *font_table);
+static void printvgafontattr(int charset);
+static void printheader(void);
+static void usage(void);
+
+main(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 scan_lines = -1;
+	int c;
+	int chr_set = -1;
+	char *filename;
+	int fflag = -1;
+	int info = -1;
+	int dflag = 0;
+	char *device;
+	
+	while( (c = getopt(argc, argv, "c:d:f:is:")) != EOF)
+	{
+		switch(c)
+		{
+			case 'c':
+				chr_set = atoi(optarg);
+				break;
+				
+			case 'd':
+				device = optarg;
+				dflag = 1;
+				break;
+
+			case 'f':
+				filename = optarg;
+				fflag = 1;
+				break;
+				
+			case 'i':
+				info = 1;
+				break;
+				
+			case 's':
+				scan_lines = atoi(optarg);
+				if(scan_lines == 0)
+					usage();
+				break;
+			
+			case '?':
+			default:
+				usage();
+				break;
+		}
+	}
+	
+	if(chr_set == -1 || fflag == -1)
+		info = 1;
+
+	if(dflag)
+	{
+		if((fd = open(device, O_RDWR)) == -1)
+		{
+			char buffer[80];
+			strcpy(buffer,"ERROR opening ");
+			strcat(buffer,device);
+			perror(buffer);
+			exit(1);
+		}
+	}
+	else
+	{
+		fd = DEFAULTFD;
+	}
+
+	if(ioctl(fd, VGAGETSCREEN, &screeninfo) == -1)
+	{
+		perror("ioctl VGAGETSCREEN failed");
+		exit(1);
+	}
+
+	if(info == 1)
+	{
+		int i;
+	
+		switch(screeninfo.adaptor_type)
+		{
+		  case UNKNOWN_ADAPTOR:
+		  case MDA_ADAPTOR:
+		  case CGA_ADAPTOR:
+		    fprintf(stderr,
+			    "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);
+	}
+
+	switch(screeninfo.adaptor_type)
+		{
+		case UNKNOWN_ADAPTOR:
+		case MDA_ADAPTOR:
+		case CGA_ADAPTOR:
+			fprintf(stderr,
+				"Adaptor does not support "
+				"Downloadable Fonts!\n");
+			exit(1);
+
+		case EGA_ADAPTOR:
+			if(scan_lines == -1) scan_lines = 350;
+			else if(scan_lines != 350) {
+				fprintf(stderr,
+					"EGA adaptors can only operate with "
+					"350 scan lines.\n");
+				exit(1);
+			}
+			break;
+
+		case VGA_ADAPTOR:
+			if(scan_lines == -1) scan_lines = 400;
+			else if(scan_lines != 400 && scan_lines != 480) {
+				fprintf(stderr,
+					"VGA adaptors can only operate with "
+					"400/480 scan lines.\n");
+				exit(1);
+			}
+			break;
+		}
+
+	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);
+	}
+		
+	chr_height = sbp->st_size / 256; /* 256 chars per font */
+			
+	if(chr_height * 256 != sbp->st_size ||
+	   chr_height < 8 || chr_height > 20) {
+		fprintf(stderr,
+			"File is no valid font file, size = %d.\n",
+			sbp->st_size);
+		exit(1);
+	}			
+
+	scr_rows = codetosize(roundrows(scan_lines / chr_height));
+	scr_scan = scr_rows * chr_height - 256 - 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 = %d, "
+			"errno %d\n",
+			argv[1], sbp->st_size, ret, errno);
+		exit(1);
+	}		
+
+	loadfont(chr_set, chr_height, fonttab);
+	setfont(chr_set, 1, chr_height - 1, scr_scan, scr_rows);
+
+	exit(0);
+}
+
+static int
+roundrows(int scrrow)
+{
+	if(scrrow >= 50) return SIZ_50ROWS;
+	else if(scrrow >= 43) return SIZ_43ROWS;
+	else if(scrrow >= 40) return SIZ_40ROWS;
+	else if(scrrow >= 35) return SIZ_35ROWS;
+	else if(scrrow >= 28) return SIZ_28ROWS;
+	else return SIZ_25ROWS;
+}
+
+static int
+codetosize(int code)
+{
+	static int sizetab[] = { 25, 28, 35, 40, 43, 50 };
+	if(code < 0 || code >= sizeof sizetab / sizeof(int))
+		return -1;
+	return sizetab[code];
+}
+
+static void
+setfont(int charset, int fontloaded, int charscan, int scrscan, int 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(fd, VGASETFONTATTR, &vfattr) == -1)
+	{
+		perror("loadfont - ioctl VGASETFONTATTR failed, error");
+		exit(1);
+	}
+}
+
+static void
+loadfont(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(fd, VGALOADCHAR, &vlc) == -1)
+		{
+			perror("loadfont - ioctl VGALOADCHAR failed, error");
+			exit(1);
+		}
+	}
+}
+
+static void
+printvgafontattr(int charset)
+{
+	struct vgafontattr vfattr;
+	
+	vfattr.character_set = charset;
+
+	if(ioctl(fd, VGAGETFONTATTR, &vfattr) == -1)
+	{
+		perror("loadfont - ioctl VGAGETFONTATTR failed, error");
+		exit(1);
+	}
+	printf(" %d  ",charset);
+	if(vfattr.font_loaded)
+	{
+
+		printf("Loaded ");
+		printf(" %2.2d       ", codetosize(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");
+}
+
+static void
+printheader(void)
+{
+	printf("\nEGA/VGA Charactersets Status Info:\n\n");
+	printf("Set Status Lines CharScanLines ScreenScanLines\n");
+	printf("--- ------ ----- ------------- ---------------\n");
+}
+
+static void
+usage(void)
+{
+	fprintf(stderr,
+         "\nloadfont - "
+         "load a font into EGA/VGA font ram for the pcvt video driver\n");
+	fprintf(stderr,
+         "usage: loadfont -c <charset> -d <device> -f <filename>"
+         " -i -s <scan_lines>\n");
+	fprintf(stderr,
+         "       -c <charset>    characterset to load (EGA 0..3, VGA 0..7)\n");
+	fprintf(stderr,
+         "       -d <device>     specify device\n");
+	fprintf(stderr,
+         "       -f <filename>   filename containing binary font data\n");
+	fprintf(stderr,
+         "       -i              print status and types of loaded fonts\n");
+	fprintf(stderr,
+         "       -s <scan_lines> number of scan lines on screen\n");
+	exit(2);
+}
diff --git a/sys/arch/i386/isa/pcvt/Util/mcon/Makefile b/sys/arch/i386/isa/pcvt/Util/mcon/Makefile
new file mode 100644
index 00000000000..1a3b934661e
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/mcon/Makefile
@@ -0,0 +1,3 @@
+PROG=	mcon
+
+.include <bsd.prog.mk>
diff --git a/sys/arch/i386/isa/pcvt/Util/mcon/mcon.1 b/sys/arch/i386/isa/pcvt/Util/mcon/mcon.1
new file mode 100644
index 00000000000..088399c2359
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/mcon/mcon.1
@@ -0,0 +1,166 @@
+.\" Copyright (c) 1994, 1995 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.30, Last Edit-Date: [Fri Jun 30 20:14:42 1995]
+.\"
+.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/sys/arch/i386/isa/pcvt/Util/mcon/mcon.c b/sys/arch/i386/isa/pcvt/Util/mcon/mcon.c
new file mode 100644
index 00000000000..a4d65060117
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/mcon/mcon.c
@@ -0,0 +1,192 @@
+/*
+ * Copyright (c) 1994, 1995 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.30, Last Edit-Date: [Fri Jun 30 20:15:02 1995]
+ */
+
+/*---------------------------------------------------------------------------*
+ *
+ *	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/sys/arch/i386/isa/pcvt/Util/pcvtdoc/Makefile b/sys/arch/i386/isa/pcvt/Util/pcvtdoc/Makefile
new file mode 100644
index 00000000000..ee011f04930
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/pcvtdoc/Makefile
@@ -0,0 +1,4 @@
+MAN4=		pcvt.${MAN4EXT}
+MANSUBDIR=	/i386
+
+.include <bsd.prog.mk>
diff --git a/sys/arch/i386/isa/pcvt/Util/pcvtdoc/pcvt.4 b/sys/arch/i386/isa/pcvt/Util/pcvtdoc/pcvt.4
new file mode 100644
index 00000000000..d3bef826d6c
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/pcvtdoc/pcvt.4
@@ -0,0 +1,906 @@
+.\" 
+.\"  Copyright (c) 1992, 1995 Hellmuth Michaelis, Brian Dunford-Shore,
+.\"                           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,
+.\"	Brian Dunford-Shore, Joerg Wunsch 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.
+.\"
+.\" @(#)pcvt.4, 3.30, Last Edit-Date: [Fri Jun 30 20:15:30 1995]
+.\"
+.\" Man page pcvt(4) created after pcvt_ioctl.h on 13-Jan-93
+.\" by Joerg Wunsch
+.\"
+.\" updated for rel 2.10 (-hm)
+.\" updated for rel 2.20 (-hm)
+.\" updated for rel 3.00 (-jw)
+.\" updated for final rel 3.00 (-hm)
+.\" removed references to 386BSD (-hm)
+.\"
+.Dd February 27, 1994
+.Dt PCVT 4
+.Sh NAME
+.Nm pcvt
+.Nd PC console virtual screen system
+.Sh SYNOPSIS
+options
+.Do
+.Em PCVT_FREEBSD = version
+|
+.Em PCVT_NETBSD = version
+.Dc
+.br
+.Op options Dq Em PCVT_NSCREENS = number
+.br
+.Op options Dq Em PCVT_XXXX
+.Po
+see
+.Sx Configuration
+below
+.Pc
+.Pp
+device
+.Em vt0
+at
+.Em isa?
+port
+.Dq Em IO_KBD
+.Em tty
+irq
+.Em 1
+vector
+.Em pcrint
+.Sh DESCRIPTION
+.Ss Overview
+The
+.Nm pcvt
+driver provides a virtual screen system with several additional
+features not available in
+.Xr pc 4
+standard console device driver. Besides the ability of handling
+multiple virtual screens,
+the probably most important is an emulation of a wide range
+of DEC VT-220
+.if t \(tm
+.if n (TM)
+functionality. See
+.Sx Features
+for a detailed description.
+
+.Ss Features
+.Bl -bullet
+.It
+Almost full DEC VT220
+.if t \(tm
+.if n (TM)
+functionality
+.Po
+moving towards VT320
+.if t \(tm
+.if n (TM)
+.Pc
+.It
+Completely independent virtual terminals for MDA/HGC/CGA/EGA and VGA
+.It
+25, 28, 35, 40, 43 or 50x80 screen resolution for each virtual screen
+.It
+Fully remappable keyboard to support national keyboards
+.It
+All VT220 character sets plus ISO Latin-1 and DEC technical supported 
+.It
+VT220 downloadable character set supported when run on EGA/VGA
+.It
+VT220 user defined keys for each virtual terminal
+.It
+Optional function key label support
+.if t \('a
+.if n 'a
+la Hewlett-Packard
+.It
+Display function codes functionality
+.It
+Support for MDA, CGA, EGA and VGA display adaptors
+.It
+Support for 132 column operation on VGA chipsets
+.It
+X Window Support for XFree86 >= 1.2 using the pccons model, or
+for XFree86 >= 2.0 using the syscons model
+.Po
+requires
+.Em PCVT_USL_VT_COMPAT
+to be configured
+.Pc
+.El
+
+What it cannot:
+.Bl -bullet
+.It
+No double wide/high characters
+.It
+No softscroll
+.It
+No inverse background
+.It
+No VT220 printer output support
+.It
+No VT52 support at all
+.It
+No 8-bit controls
+.It
+Only limited AT-keyboard
+.Pq 84 keys
+support
+.Pq yet
+.It
+Help you to make money...
+.El
+
+.Ss Configuration
+The
+.Nm pcvt
+console driver is currently available for the Intel-based BSD operating
+systems
+.Em NetBSD/i386 Pq release 0.9 or higher,
+and
+.Em FreeBSD Pq release 1.0-GAMMA or higher .
+In order to get the appropriate system support, one of the options
+.Em PCVT_NETBSD ,
+or
+.Em PCVT_FREEBSD
+must be defined in the system's config file
+.Pq see Xr config 8 .
+In addition, for the
+.Em FreeBSD
+and
+.Em NetBSD
+operating systems, it is necessary to set this option to the operating
+system's version number.
+For
+.Em FreeBSD
+this version number must be expressed as a 3-digit number.
+E.\& g., if you are running the 1.0 release
+.Pq which is actually version 1.0.2 ,
+you should define
+
+.Em PCVT_FREEBSD = 102
+
+For
+.Em NetBSD
+this version number must be expressed as 9 if you are running NetBSD 0.9
+and anything greater than 9 for NetBSD-current (pre 1.0). It is recommended
+to use (as with FreeBSD) 100 for NetBSD 1.0 and 999 for NetBSD-current.
+E.\& g., if you are running the NetBSD 1.0 release, you should define
+
+.Em PCVT_NETBSD = 100
+
+The
+.Nm pcvt
+driver has been designed to be highly configurable in order to satisfy
+everyone's needs. The preferred way for those configurations is to
+provide appropriate
+.Em options
+lines within the config file, possibly overriding the built-in default
+values. Therefore it is possible to compile several distinct kernels
+with different driver behaviour on a single machine.
+
+The following list gives a short overview of the available configuration
+options. Refer to the file
+.Pa i386/isa/pcvt/pcvt_hdr.h
+in the kernel source tree for detailed documentation.
+
+Note: the following conventions apply to all the Boolean options.
+If an option is given with no value, a value of 1
+.Pq activated
+is substituted. If an option value is given as 0, this options is
+deactivated. Any other value is substituted by 1, too. If an option
+is omitted, a built-in default is assumed.
+
+.Bl -tag -width indent -compact
+
+.It Em PCVT_NSCREENS
+Defines the number of virtual screens.
+.br
+Default: 8
+
+.It Em PCVT_VT220KEYB
+If activated, a keyboard layout resembling a DEC VT200 (TM) is generated.
+If deactivated, a mixture between VT220 and HP is used. See the files
+.Pa Keyboard.VT
+and
+.Pa Keyboard.HP
+in the
+.Nm pcvt
+documentation directory for a full description.
+.br
+Default: off
+
+.It Em PCVT_SCREENSAVER
+Enables the builtin screensaver feature.
+.br
+Default: on
+
+.It Em PCVT_PRETTYSCRNS
+If enabled, a blinking-star screensaver is used. If disabled, the screen
+is simply blanked
+.Pq which might be useful for energy-saving monitors .
+.br
+Default: on
+
+.It Em PCVT_CTRL_ALT_DEL
+If enabled, the key combination
+.Aq Em Ctrl
+.Aq Em Alt
+.Aq Em Del
+invokes a CPU reset.
+.br
+Default: off
+
+.It Em PCVT_USEKBDSEC
+Do NOT override a security lock for the keyboard.
+.br
+Default: on
+
+.It Em PCVT_24LINESDEF
+If enabled, the 25-line modi
+.Po
+VT emulation with 25 lines, and HP emulation with 28 lines
+.Pc
+default to 24 lines only to provide a better compatibility to the
+original DEV VT220 (TM). Thus it should be possible to use the
+terminal information for those terminals without further changes.
+Note that this is a startup option; it is possible to toggle between
+the 24- and 25-lines' display by the
+.Xr scon 1
+utility.
+.br
+Default: off
+
+.It Em PCVT_EMU_MOUSE
+Emulate a three-button mouse via the keypad. Useful for notebooks when
+running XFree86. See
+.Sx Mouse emulation
+below.
+.br
+Default: off
+
+.It Em PCVT_META_ESC
+If enabled, a sequence composed of
+.Aq Em esc ,
+followed by the normal key code is emitted if a key is pressed with the
+.Aq Em Alt
+key modifier. If disabled, then normal key code with the value
+.Em 0x80
+added is sent.
+.br
+Default: off
+
+.El
+
+Note that there are further options available which are mainly used for
+debugging purposes or as a workaround for hardware problems. They are
+found in
+.Pa i386/isa/pcvt/pcvt_hdr.h
+along with their documentation.
+
+.Ss Internal Functions
+The functionality described below may be accessed via
+.Xr ioctl 2
+system calls with a file descriptor opened on a device node
+related to the
+.Nm pcvt
+driver.
+To make use of them, a program should contain the following line:
+
+
+.Dl #include <machine/pcvt_ioctl.h>
+
+Any parameter definitions cited below can be found in that file.
+
+
+.Em Keyboard related functions
+
+Three functions are related to basic keyboard hardware:
+
+.Bl -tag -width 20n -offset indent -compact
+.It KBDRESET
+reset keyboard, set defaults;
+.It KBDGTPMAT
+get current typematic value, parameter is a pointer to int where
+the values is stored to;
+.It KBDSTPMAT
+set current typematic value, similar to above command.
+.El
+
+Symbolic values are available for the appropriate constants.
+To specify the initial typematic delay time, they are
+KBD_TPD250 for 250 ms through
+KBD_TPD1000 for 1000 ms, in steps of 250 ms. The typematic repeat
+rates are
+KBD_TPM300, specifying 30.0 characters per second through
+KBD_TPM20 for 2.0 characters per second. The intermediate values
+are: 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 characters per second.
+
+
+.Bl -tag -width 20n -offset indent -compact
+.It KBDGREPSW
+get key repetition switch, and
+.It KBDSREPSW
+set key repetition switch
+.El
+
+again take a pointer to int as argument. They manipulate the
+drivers internal keyboard repetition flag, possible values are:
+KBD_REPEATOFF or KBD_REPEATON.
+
+
+.Bl -tag -width 20n -offset indent -compact
+.It KBDGLEDS
+get LED state, and
+.It KBDSLEDS
+set LED state manipulate the keyboard indicators, but do not influence
+the drivers idea of lock key state.
+.El
+
+The int where the argument points to
+may have the values
+KBD_SCROLLLOCK, KBD_NUMLOCK, KBD_CAPSLOCK, which may be used in any
+conjunction.
+
+.Bl -tag -width 20n -offset indent -compact
+.It KBDGLOCK
+gets state of SCROLL,NUM,CAPS, and
+.It KBDSLOCK
+sets state of SCROLL,NUM,CAPS + LEDs
+.El
+
+should be used in a same manner to get/set the drivers internal
+LED flags.
+
+
+.Em Keyboard remapping
+
+One important feature of the
+.Nm pcvt
+driver is its ability to overload the built in key definition.
+
+.Bl -tag -width 20n -offset indent -compact
+.It KBDGCKEY
+get current key values,
+.It KBDSCKEY
+set new key assignment values, and
+.It KBDGOKEY
+get original key assignment values
+.El
+
+arrange those functions. The take a pointer to a
+.Em struct kbd_ovlkey
+as argument as described below. In addition,
+
+.Bl -tag -width 20n -offset indent -compact
+.It KBDRMKEY
+removes a key assignment, taking a pointer to an int as argument which
+contains the affected key number;
+.It KBDDEFAULT
+removes all key assignments.
+.El
+.Bd -literal
+struct kbd_ovlkey                /* complete definition of a key */
+{
+    u_short keynum;                      /* the key itself */
+    u_short type;                        /* type of key, see below */
+    u_char  subu;                        /* subtype, ignored on write */
+    char    unshift[KBDMAXOVLKEYSIZE+1]; /* emitted string, unshifted */
+    u_char  subs;                        /* subtype, ignored on write */
+    char    shift[KBDMAXOVLKEYSIZE+1];   /* emitted string, shifted */
+    u_char  subc;                        /* subtype, ignored on write */
+    char    ctrl[KBDMAXOVLKEYSIZE+1];    /* emitted string, control */
+    u_char  suba;                        /* subtype, ignored on write */
+    char    altgr[KBDMAXOVLKEYSIZE+1];   /* emitted string, altgr */
+};
+.Ed
+
+The appropriate values for the
+.Em type
+field are:
+
+.Bl -tag -width 20n -offset indent -compact
+.It KBD_NONE
+no function, key is disabled,
+.It KBD_SHIFT
+keyboard shift,
+.It KBD_META
+alternate shift, sets bit8 to ASCII code,
+.It KBD_NUM
+numeric shift, keypad numeric / application mode,
+.It KBD_CTL
+control code generation,
+.It KBD_CAPS
+caps shift - swaps case of letter,
+.It KBD_ASCII
+ASCII code generating key,
+.It KBD_SCROLL
+stop output,
+.It KBD_FUNC    
+function key,
+.It KBD_KP
+keypad keys,
+.It KBD_BREAK
+ignored,
+.It KBD_ALTGR
+AltGr translation feature,
+.It KBD_SHFTLOCK
+shift lock,
+.It KBD_CURSOR
+cursor keys, and
+.It KBD_RETURN
+.Dq Return
+or
+.Dq Enter
+keys.
+.El
+
+The
+.Em subtype
+field contains one of the values
+
+.Bl -tag -width 20n -offset indent -compact
+.It KBD_SUBT_STR
+key is bound to a string, or
+.It KBD_SUBT_FNC
+key is bound to a function.
+.El
+
+.Em Mouse emulation
+
+The mouse emulator
+.Pq if configured in
+fakes a three-button mouse using the Mouse Systems protocol. The first
+.Nm pcvt
+device node not used by a virtual screen is the mouse device. I.\& e.,
+for the default value of 8 virtual screens,
+.Pa /dev/ttyv0
+through
+.Pa /dev/ttyv7
+would refer to the virtual screens, and
+.Pa /dev/ttyv8
+were the mouse emulator device. The mouse emulation is turned on by
+pressing the
+.Aq Em NumLock
+key. The pointer is moved by the numerical keypad keys, into the
+obvious directions. The pointer is initially moved in single steps,
+and is accelerated after an adjustable time
+.Pq default: 500 ms
+by about 6 times. The mouse buttons are emulated by three normal
+keys, by default the function keys
+.Aq Em \&F1 ,
+.Aq Em \&F2 ,
+and
+.Aq Em \&F3 .
+There are two selectable flavors available: normal and
+.Dq sticky
+buttons. Normal buttons behave as expected.
+.Dq Sticky
+buttons are notified as button-press on the first keypress. They
+.Dq stick
+until the key is pressed again
+.Pq or another button-emulating key instead .
+Button presses and releases are notified to the user by a simple
+.Dq pling ,
+or
+.Dq plong ,
+respectively, generated from the PC's built-in speaker.
+
+The following commands control the emulation.
+
+.Bl -tag -width 20n -offset indent -compact
+.It KBDMOUSEGET
+get the current definitions, and
+.It KBDMOUSESET
+set new definitions.
+.El
+
+Both accept a
+.Li struct mousedefs *
+as the third argument to the ioctl call:
+.Bd -literal
+struct mousedefs {
+    int leftbutton;     /* (PC) scan code for "left button" key     */
+    int middlebutton;   /* (PC) scan code for "mid button" key      */
+    int rightbutton;    /* (PC) scan code for "right button" key    */
+    int stickybuttons;  /* if true, the buttons are "sticky"        */
+    int acceltime;      /* timeout in microseconds to start pointer */
+                        /* movement acceleration                    */
+    /* defaults to: scan(F1), scan(F2), scan(F3), false, 500000     */
+};
+.Ed
+
+
+.Em Downloadable character set interface
+
+EGA and VGA video adaptors provide the capability of downloadable
+software fonts. Since the
+.Sq native character set
+of any IBM-compatible PC video board does not allow the full interpretation
+of DEC multinational character set or ISO Latin-1
+.Pq ISO 8859-1 ,
+this might be very useful for a U**X environment.
+
+.Bl -tag -width 20n -offset indent -compact
+.It VGASETFONTATTR
+set font attr, and
+.It VGAGETFONTATTR
+get font attr
+.El
+
+are used to manipulate the drivers information about a downloaded
+font. The take a pointer to a
+.Em struct vgafontattr
+as argument:
+.Bd -literal
+struct vgafontattr {
+    int character_set;          /* VGA character set */
+    int font_loaded;            /* Mark font loaded or unloaded */
+    int screen_size;            /* Character rows per screen */
+    int character_scanlines;    /* Scanlines per character - 1 */
+    int screen_scanlines;       /* Scanlines per screen - 1 byte */
+};
+.Ed
+
+Each character of each font is to be downloaded with
+
+.Bl -tag -width 20n -offset indent -compact
+.It VGALOADCHAR
+load vga char,
+.El
+
+taking a pointer to
+.Em struct vgaloadchar
+as its argument:
+.Bd -literal
+struct vgaloadchar {
+    int character_set;       /* VGA character set to load into */
+    int character;           /* Character to load */
+    int character_scanlines; /* Scanlines per character */
+    u_char char_table[32];   /* VGA character shape table */
+};
+.Ed
+
+The field
+.Em character_set
+takes the values
+CH_SET0, CH_SET1, CH_SET2, CH_SET3 on EGA's or VGA's. Since VGA's
+might have up to eight simultaneously loaded fonts, they can take
+CH_SET4, CH_SET5, CH_SET6, or CH_SET7, too.
+
+Note that there's a dependence between the font size
+and a possible screen height
+.Pq in character rows ,
+depending on the video adaptor used:
+.Bd -literal
+Screen size (rows) on:          EGA             VGA
+Font size
+
+8 x 8                           43              50
+8 x 10                          35              40
+8 x 14                          25              28
+8 x 16                          not             25
+                                applicable
+.Ed
+
+
+.Em General screen manipulation commands
+
+.Bl -tag -width 20n -offset indent -compact
+.It VGACURSOR
+sets cursor shape,
+.El
+
+taking a pointer to the following structure as argument:
+.Bd -literal
+struct cursorshape {
+    int screen_no; /* screen number for which to set,               */
+                   /*  or -1 to set on current active screen        */
+    int start;     /* top scanline, range 0... Character Height - 1 */
+    int end;       /* end scanline, range 0... Character Height - 1 */
+};
+.Ed
+
+.Bl -tag -width 20n -offset indent -compact
+.It VGASETSCREEN
+set screen info, and
+.It VGAGETSCREEN
+get screen info,
+.El
+
+provide an interface to some general driver internal variables
+which might modify the behaviour of the screens,
+or which might simply be used to force the driver to switch
+to one certain screen. Their argument is a pointer to the structure:
+.Bd -literal
+struct screeninfo {
+    int adaptor_type;   /* type of video adaptor installed     */
+                        /* read only, ignored on write (yet!)  */
+    int totalfonts;     /* no of downloadable fonts            */
+                        /* read only, ignored on write         */
+    int totalscreens;   /* no of virtual screens               */
+                        /* read only, ignored on write         */
+    int screen_no;      /* screen number, this was got from    */
+                        /* on write, if -1, apply pure_vt_mode */
+                        /* and/or screen_size to current screen*/
+                        /* else to screen_no supplied          */
+    int current_screen; /* screen number, which is displayed.  */
+                        /* on write, if -1, make this screen   */
+                        /* the current screen, else set current*/
+                        /* displayed screen to parameter       */
+    int pure_vt_mode;   /* flag, pure VT mode or HP/VT mode    */
+                        /* on write, if -1, no change          */
+    int screen_size;    /* screen size                         */
+                        /* on write, if -1, no change          */    
+    int force_24lines;  /* force 24 lines if 25 lines VT mode  */
+                        /* or 28 lines HP mode to get pure     */
+                        /* VT220 screen size                   */
+                        /* on write, if -1, no change          */
+    int vga_family;     /* if adaptor_type = VGA, this reflects*/
+                        /* the chipset family after a read     */
+                        /* nothing happenes on write ...       */
+    int vga_type;       /* if adaptor_type = VGA, this reflects*/
+                        /* the chipset after a read            */
+                        /* nothing happenes on write ...       */
+    int vga_132;        /* set to 1 if driver has support for  */
+                        /* 132 column operation for chipset    */
+                        /* currently ignored on write          */
+};
+.Ed
+
+Its field
+.Em pure_vt_mode
+may take the values M_HPVT for a mixed VTxxx and HP Mode, with function
+key labels and a status line, or M_PUREVT for only VTxxx sequences
+recognized, with no labels.
+
+.Bl -tag -width 20n -offset indent -compact
+.It VGASETCOLMS
+sets the number of columns for the current screen,
+.El
+
+its parameter is a pointer to an integer containing either a value of 80,
+or a value of 132. Note that setting the number of columns to 132 is
+only supported on VGA adaptors. Any unsupported numbers cause the ioctl
+to fail with
+.Em errno
+.Pq see Xr intro 2
+being set to
+.Em EINVAL .
+
+.Em VGA color palette interface
+
+Only on VGA adaptors, there's a color palette register at the output.
+It is responsible for the red, green and blue output voltage provided
+for each of the 256 internal color codes, each lying in the range of
+0 through 63 (with 63 representing the brightest value for a base color).
+Thus, these adaptors map each color code to a color of a
+.Dq palette
+out of 262144 colors. The commands
+
+.Bl -tag -width 20n -offset indent -compact
+.It VGAREADPEL
+read VGA palette entry, and
+.It VGAWRITEPEL
+write VGA palette entry
+.El
+
+establish an interface to these palette registers. Their argument is
+a pointer to:
+.Bd -literal
+struct vgapel {
+    unsigned idx;      /* index into palette, 0 .. 255 valid   */
+    unsigned r, g, b;  /* RGB values, masked by VGA_PMASK (63) */
+};
+.Ed
+
+
+.Em Driver identification
+
+.Bl -tag -width 20n -offset indent -compact
+.It VGAPCVTID
+returns information if the current compiled in driver is pcvt and it's
+major and minor revision numbers. the call is taking a pointer to the
+following structure as argument:
+.El
+
+.Bd -literal
+struct pcvtid {
+#define PCVTIDNAMELN  16		/* driver id - string length */
+	char name[PCVTIDNAMELN];	/* driver name, == PCVTIDSTR	*/
+#define PCVTIDNAME    "pcvt"		/* driver id - string */
+	int rmajor;			/* revision number, major	*/
+#define PCVTIDMAJOR   3
+	int rminor;			/* revision number, minor	*/
+#define PCVTIDMINOR   00	
+};
+.Ed
+
+
+.Bl -tag -width 20n -offset indent -compact
+.It VGAPCVTINFO
+returns information if the current compiled in driver is pcvt and it's
+compile time options. the call is taking a pointer to the following
+structure as argument:
+.El
+
+.Bd -literal
+struct pcvtinfo {
+	u_int opsys;			/* PCVT_xxx(x)BSD */
+#define CONF_UNKNOWNOPSYS	0
+#define CONF_386BSD		1	/* unsupported !!! */
+#define CONF_NETBSD		2
+#define CONF_FREEBSD		3
+	u_int opsysrel;			/* Release for NetBSD/FreeBSD */
+	u_int nscreens;			/* PCVT_NSCREENS */
+	u_int scanset;			/* PCVT_SCANSET */
+	u_int updatefast;		/* PCVT_UPDATEFAST */
+	u_int updateslow;		/* PCVT_UPDATESLOW */
+	u_int sysbeepf;			/* PCVT_SYSBEEPF */
+
+/* config booleans */
+
+	u_long compile_opts;		/* PCVT_xxxxxxxxxxxxxxx */
+};
+.Ed
+
+
+.Em Screen saver
+
+Depending on the configuration of a
+.Nm pcvt
+driver, their might be a simple screen saver available. It is controlled
+by the command
+
+.Bl -tag -width 20n -offset indent -compact
+.It VGASCREENSAVER
+set timeout for screen saver in seconds; 0 turns it off,
+.El
+
+taking a pointer to an integer as argument. Despite of its command name,
+this is available on
+.Em any
+kind of adaptor if configured in by the
+.Xr config 8
+option
+.Dq PCVT_SCREENSAVER
+
+.Em Compatibility commands for USL-style VT's
+
+Release 3.00 of this
+.Nm pcvt
+driver supports a subset of the USL-style commands used to control
+the virtual terminal interface. This feature is mainly intended to
+allow
+.Em XFree86 ,
+release 2.0 or higher, to switch between virtual screens even when
+running an X server. They are ugly with respect to the implied semantics
+.Pq i.\& e., they break Berkeley semantics
+and are therefore not recommended for common use. See the file
+.Pa i386/include/pcvt_ioctl.h
+for their documentation.
+
+.Sh FILES
+.Bl -tag -width /usr/include/machine/pcvt_ioctl.h
+.It Pa /usr/include/machine/pcvt_ioctl.h
+Definitions for
+.Xr ioctl 2
+function calls
+.It Pa /dev/ttyv?
+.It Pa /dev/console
+Device nodes to access the
+.Nm pcvt
+driver
+.It Pa i386/isa/pcvt/pcvt_hdr.h
+.Pq relative to the kernel source tree
+Documents the various compile-time options to tailor
+.Nm pcvt .
+.Sh HISTORY
+The
+.Nm pcvt
+driver has been developed for and contributed to 386BSD release 0.1. Since
+release 3.00 explicit support is provided for NetBSD 0.9. It is expected
+that no further development on pcvt is done for 386BSD 0.1 after release 3.00,
+in fact, 386BSD support was dropped with release 3.20.
+.Sh AUTHORS
+.Bl -tag -width 30n -offset indent
+.It Written by :
+Hellmuth Michaelis
+.Pq hm@hcshh.hcs.de
+.It With much help from :
+Brian Dunford-Shore
+.Pq brian@morpheus.wustl.edu
+.br
+.if n Joerg Wunsch
+.if t J\(:org Wunsch
+.Pq joerg_wunsch@uriah.sax.de
+.br
+.It This driver is based on several people's previous
+.It work, notably by :
+William Jolitz' and Don Ahn's
+.Xr pc 4
+implementation
+.Pq ljolitz@cardio.ucsf.edu
+.br
+Holger Veit
+.Pq veit@du9ds3.uni-duisburg.de, now veit@first.gmd.de
+.Sh SEE ALSO
+.Xr pc 4 ,
+.Xr config 8 ,
+.Xr intro 2 ,
+.Xr ioctl 2 .
+.Sh BUGS
+Certainly existent. See the file
+.Pa BugList
+in the Documentation directory for an up-to-date list.
+
+.Ss Tested Video Boards
+.Bd -literal
+Manufacturer                    Chipset                 Monitor
+
+2theMax (?)                     ET4000                  VGA Color
+Video7 Inc.                     Video 7                 VGA Color
+Diamond Stealth VRAM            S3                      NEC 3FGx
+Trident                         TVGA 8800CS             NEC 3D
+Data General                    C&T P82C604             VGA Color
+NoName Hercules                 W86855AF                Mono
+Kyocera (Mainboard)		WD90C11			Sony Color
+unknown				ET3000			NEC 3D
+.Ed
+
+.Ss Tested Keyboards
+.Bd -literal
+Manufacturer                    Type                    Layout
+
+Cherry                          MF II                   US
+Cherry/Tandon                   MF II                   German
+Hewlett-Packard                 MF II                   US
+Hewlett-Packard                 MF II                   German
+Tatung                          AT                      German
+.Ed
+
+There is absolutely NO support for the ancient PC-keyboards
+.Pq they had 83 keys .
+
+There is only limited support for AT-keyboards
+.Bo
+they have 84 keys, and a separate numeric keypad,
+they don't have F11/F12 keys
+.Bc
+because the emulator needs F9 through F12 for control functions, and due to
+the current design of the keyboard driver there is no
+.Pq full
+support for national keyboards because
+of the lack of an ALtGr key.
+
+MF-keyboards are fully supported, 101- and 102-key versions.
diff --git a/sys/arch/i386/isa/pcvt/Util/scon/Makefile b/sys/arch/i386/isa/pcvt/Util/scon/Makefile
new file mode 100644
index 00000000000..6fdb94eb650
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/scon/Makefile
@@ -0,0 +1,3 @@
+PROG=	scon
+
+.include <bsd.prog.mk>
diff --git a/sys/arch/i386/isa/pcvt/Util/scon/scon.1 b/sys/arch/i386/isa/pcvt/Util/scon/scon.1
new file mode 100644
index 00000000000..d99802b2975
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/scon/scon.1
@@ -0,0 +1,214 @@
+.\" Copyright (c) 1992, 1995 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.30, Last Edit-Date: [Mon Jul  3 11:25:13 1995]
+.\"
+.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 4
diff --git a/sys/arch/i386/isa/pcvt/Util/scon/scon.c b/sys/arch/i386/isa/pcvt/Util/scon/scon.c
new file mode 100644
index 00000000000..0c512ab4cd3
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/scon/scon.c
@@ -0,0 +1,860 @@
+/*
+ * Copyright (c) 1992, 1995 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.30, Last Edit-Date: [Wed Aug 30 13:57:10 1995]";
+
+/*---------------------------------------------------------------------------*
+ *
+ *	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
+ *	-hm	patch to support Cirrus CL-GD62x5 from Martin
+ *
+ *---------------------------------------------------------------------------*/
+
+#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",
+ 		"CL-GD5430",
+ 		"CL-GD62x5",
+ 		"Unknown Cirrus",
+
+	};
+	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/sys/arch/i386/isa/pcvt/Util/set2061/CAUTION b/sys/arch/i386/isa/pcvt/Util/set2061/CAUTION
new file mode 100644
index 00000000000..e1eba06aaa4
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/set2061/ICD2061Aalt.c b/sys/arch/i386/isa/pcvt/Util/set2061/ICD2061Aalt.c
new file mode 100644
index 00000000000..248476ad728
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/set2061/Makefile b/sys/arch/i386/isa/pcvt/Util/set2061/Makefile
new file mode 100644
index 00000000000..3a1c92aa560
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/set2061/Makefile
@@ -0,0 +1,10 @@
+PROG=		set2061
+SRCS=		main.c ICD2061Aalt.c
+CFLAGS+= 	-DGCCUSESGAS -DPCVT_STANDALONE
+NOMAN=
+
+all: $(PROG)
+
+.include <bsd.prog.mk>
+
+$(PROG):	compiler.h 
diff --git a/sys/arch/i386/isa/pcvt/Util/set2061/README b/sys/arch/i386/isa/pcvt/Util/set2061/README
new file mode 100644
index 00000000000..fd5ec868935
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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 into 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/sys/arch/i386/isa/pcvt/Util/set2061/compiler.h b/sys/arch/i386/isa/pcvt/Util/set2061/compiler.h
new file mode 100644
index 00000000000..c05dbf52665
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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: /cvs/OpenBSD/src/sys/arch/i386/isa/pcvt/Util/set2061/Attic/compiler.h,v 1.1 1995/10/18 08:50:48 deraadt 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/sys/arch/i386/isa/pcvt/Util/set2061/main.c b/sys/arch/i386/isa/pcvt/Util/set2061/main.c
new file mode 100644
index 00000000000..03a482d3e3f
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/userkeys/Makefile b/sys/arch/i386/isa/pcvt/Util/userkeys/Makefile
new file mode 100644
index 00000000000..2e0e1118b7e
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/userkeys/Makefile
@@ -0,0 +1,3 @@
+PROG=		vt220keys
+
+.include <bsd.prog.mk>
diff --git a/sys/arch/i386/isa/pcvt/Util/userkeys/vt220keys.1 b/sys/arch/i386/isa/pcvt/Util/userkeys/vt220keys.1
new file mode 100644
index 00000000000..cff95bf2b22
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/userkeys/vt220keys.c b/sys/arch/i386/isa/pcvt/Util/userkeys/vt220keys.c
new file mode 100644
index 00000000000..dfde51a2691
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/vgaio/CAUTION b/sys/arch/i386/isa/pcvt/Util/vgaio/CAUTION
new file mode 100644
index 00000000000..e1eba06aaa4
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/vgaio/Makefile b/sys/arch/i386/isa/pcvt/Util/vgaio/Makefile
new file mode 100644
index 00000000000..253d5ec18e1
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/vgaio/Makefile
@@ -0,0 +1,18 @@
+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
+
+.include <bsd.prog.mk>
diff --git a/sys/arch/i386/isa/pcvt/Util/vgaio/lex.l b/sys/arch/i386/isa/pcvt/Util/vgaio/lex.l
new file mode 100644
index 00000000000..2df1889b0ca
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/vgaio/lex.l
@@ -0,0 +1,68 @@
+%{
+/*
+ * Copyright (c) 1994,1995 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: /cvs/OpenBSD/src/sys/arch/i386/isa/pcvt/Util/vgaio/Attic/lex.l,v 1.1 1995/10/18 08:50:49 deraadt Exp $"
+
+#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/sys/arch/i386/isa/pcvt/Util/vgaio/vgaio.8 b/sys/arch/i386/isa/pcvt/Util/vgaio/vgaio.8
new file mode 100644
index 00000000000..8275232cbc8
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/vgaio/vgaio.8
@@ -0,0 +1,156 @@
+.\" 
+.\" Copyright (c) 1994,1995 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: /cvs/OpenBSD/src/sys/arch/i386/isa/pcvt/Util/vgaio/Attic/vgaio.8,v 1.1 1995/10/18 08:50:49 deraadt Exp $
+.\" 
+.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
+.Op Fl f Ar devname
+.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 -compact
+.It Fl d
+Turn on the grammar parser debugger.
+
+.It Fl f Ar devname
+Operate on device
+.Ar devname
+instead of the default
+.Pa /dev/console .
+
+.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
+register does not require an argument
+.Aq Em regnumber ;
+it's actually being ignored.
+
+
+.Ss Access control
+The caller must have uid 0 in order to gain the required access to
+the IO registers.
+
+.Sh FILES
+.Pa /dev/console
+is used as the default device to enable 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.heep.sax.de .
+
diff --git a/sys/arch/i386/isa/pcvt/Util/vgaio/vgaio.h b/sys/arch/i386/isa/pcvt/Util/vgaio/vgaio.h
new file mode 100644
index 00000000000..b2d09999282
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/vgaio/vgaio.h
@@ -0,0 +1,71 @@
+/*
+ * 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  1995/10/18 08:50:49  deraadt
+ * Initial revision
+ *
+ * Revision 1.3  1995/10/07 21:46:02  jtc
+ * Overlay our pcvt with pcvt 3.32 sources.  All of our fixes have been
+ * incorporated into the master sources, so it is unnecessary to resolve
+ * all the conflicts that would occur if we let CVS "merge" the versions.
+ *
+ * Revision 1.2  1995/03/05  22:46:27  joerg
+ * Upgrade to beta 3.20/b22
+ *
+ * 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/sys/arch/i386/isa/pcvt/Util/vgaio/vgaio.y b/sys/arch/i386/isa/pcvt/Util/vgaio/vgaio.y
new file mode 100644
index 00000000000..5bf47bebfa8
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/vgaio/vgaio.y
@@ -0,0 +1,263 @@
+/* Hello emacs, this should be edited in -*- Fundamental -*- mode */
+%{
+/*
+ * Copyright (c) 1994,1995 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: /cvs/OpenBSD/src/sys/arch/i386/isa/pcvt/Util/vgaio/Attic/vgaio.y,v 1.1 1995/10/18 08:50:49 deraadt Exp $"
+
+#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; }
+		/* useful for the MI register: */
+		| reggroup		{ $$.num = 0; $$.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 1s and 0s 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 = %sB\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 = %sB now\n",
+	       getname(r), r.num, val, bin_str(val, 8));
+}
+
+void yyerror(const char *msg) {
+	fprintf(stderr, "yyerror: %s\n", msg);
+}
+
+void usage(void) {
+	fprintf(stderr, "usage: vgaio [-d] [-f devname]\n");
+	exit(2);
+}
+
+int main(int argc, char **argv) {
+	int fd, c;
+	const char *devname = "/dev/console";
+
+	while((c = getopt(argc, argv, "df:")) != EOF)
+		switch(c) {
+		case 'd':
+			yydebug = 1;
+			break;
+
+		case 'f':
+			devname = optarg;
+			break;
+
+		case '?':
+		default:
+			usage();
+		}
+	argc -= optind;
+	argv += optind;
+	if(argc > 0)
+		usage();
+
+	if((fd = open(devname, O_RDONLY)) < 0) {
+		perror("open(vga)");
+		return 1;
+	}
+
+	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/sys/arch/i386/isa/pcvt/Util/vttest/Makefile b/sys/arch/i386/isa/pcvt/Util/vttest/Makefile
new file mode 100644
index 00000000000..c45d720e0c3
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/vttest/Makefile
@@ -0,0 +1,5 @@
+PROG=		vttest
+CFLAGS+=	-traditional -DUSEMYSTTY
+SRCS=		main.c esc.c
+
+.include <bsd.prog.mk>
diff --git a/sys/arch/i386/isa/pcvt/Util/vttest/README b/sys/arch/i386/isa/pcvt/Util/vttest/README
new file mode 100644
index 00000000000..589d08f2c1f
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/vttest/esc.c b/sys/arch/i386/isa/pcvt/Util/vttest/esc.c
new file mode 100644
index 00000000000..520946b5054
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/vttest/header.h b/sys/arch/i386/isa/pcvt/Util/vttest/header.h
new file mode 100644
index 00000000000..c4dcf906e83
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/vttest/main.c b/sys/arch/i386/isa/pcvt/Util/vttest/main.c
new file mode 100644
index 00000000000..cb67f745abc
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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/sys/arch/i386/isa/pcvt/Util/vttest/vttest.1 b/sys/arch/i386/isa/pcvt/Util/vttest/vttest.1
new file mode 100644
index 00000000000..c4104925d01
--- /dev/null
+++ b/sys/arch/i386/isa/pcvt/Util/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.