xref: /openbsd/sys/dev/wscons/wsemul_vt100_chars.c (revision fc61954a)
1 /* $OpenBSD: wsemul_vt100_chars.c,v 1.9 2015/03/14 03:38:50 jsg Exp $ */
2 /* $NetBSD: wsemul_vt100_chars.c,v 1.4 1999/02/20 18:20:02 drochner Exp $ */
3 
4 /*
5  * Copyright (c) 1998
6  *	Matthias Drochner.  All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27  *
28  */
29 
30 #include <sys/param.h>
31 #include <sys/systm.h>
32 
33 #include <dev/wscons/wsconsio.h>
34 #include <dev/wscons/wsdisplayvar.h>
35 #include <dev/wscons/wsksymvar.h>
36 #include <dev/wscons/wsemulvar.h>
37 #include <dev/wscons/wsemul_vt100var.h>
38 #include <dev/wscons/unicode.h>
39 
40 static const u_int16_t decspcgr2uni[128] = {
41 	0x0000, 0x0001, 0x0002, 0x0003, 0x0004, 0x0005, 0x0006, 0x0007,
42 	0x0008, 0x0009, 0x000a, 0x000b, 0x000c, 0x000d, 0x000e, 0x000f,
43 	0x0010, 0x0011, 0x0012, 0x0013, 0x0014, 0x0015, 0x0016, 0x0017,
44 	0x0018, 0x0019, 0x001a, 0x001b, 0x001c, 0x001d, 0x001e, 0x001f,
45 /* 2 */	0x0020, 0x0021, 0x0022, 0x0023, 0x0024, 0x0025, 0x0026, 0x0027,
46 	0x0028, 0x0029, 0x002a, 0x002b, 0x002c, 0x002d, 0x002e, 0x002f,
47 	0x0030, 0x0031, 0x0032, 0x0033, 0x0034, 0x0035, 0x0036, 0x0037,
48 	0x0038, 0x0039, 0x003a, 0x003b, 0x003c, 0x003d, 0x003e, 0x003f,
49 /* 4 */	0x0040, 0x0041, 0x0042, 0x0043, 0x0044, 0x0045, 0x0046, 0x0047,
50 	0x0048, 0x0049, 0x004a, 0x004b, 0x004c, 0x004d, 0x004e, 0x004f,
51 	0x0050, 0x0051, 0x0052, 0x0053, 0x0054, 0x0055, 0x0056, 0x0057,
52 	0x0058, 0x0059, 0x005a, 0x005b, 0x005c, 0x005d, 0x005e, 0x00a0,
53 /* 6 */	0x25c6, 0x2592, 0x2409, 0x240c, 0x240d, 0x240a, 0x00b0, 0x00b1,
54 	_e006U, 0x240b, 0x2518, 0x2510, 0x250c, 0x2514, 0x253c, _e001U,
55 	_e002U, _e003U, _e004U, _e005U, 0x251c, 0x2524, 0x2534, 0x252c,
56 	0x2502, 0x2264, 0x2265, 0x03c0, 0x2260, 0x00a3, 0x00b7, 0x007f,
57 };
58 
59 static const u_int16_t dectech2uni[128] = {
60 	0x0000, 0x0001, 0x0002, 0x0003, 0x0004, 0x0005, 0x0006, 0x0007,
61 	0x0008, 0x0009, 0x000a, 0x000b, 0x000c, 0x000d, 0x000e, 0x000f,
62 	0x0010, 0x0011, 0x0012, 0x0013, 0x0014, 0x0015, 0x0016, 0x0017,
63 	0x0018, 0x0019, 0x001a, 0x001b, 0x001c, 0x001d, 0x001e, 0x001f,
64 /* 2 */	0x0020, 0x221a, 0x250c, 0x2212, 0x2320, 0x2321, 0x2502, 0x2308,
65 	0x230a, 0x2309, 0x230b, _e007U, _e008U, _e009U, _e00aU, _e00bU,
66 	_e00cU, _e00dU, _e00eU, 0x2216, 0x2215, 0x00ac, _e00fU, 0x232a,
67 	_e000U, _e000U, _e000U, _e000U, 0x2264, 0x2260, 0x2265, 0x222b,
68 /* 4 */	0x2234, 0x221d, 0x221e, 0x00f7, 0x2206, 0x2207, 0x03a6, 0x0393,
69 	0x223c, 0x2243, 0x0398, 0x00d7, 0x039b, 0x21d4, 0x21d2, 0x2261,
70 	0x03a0, 0x03a8, _e000U, 0x03a3, _e000U, _e000U, 0x221a, 0x03a9,
71 	0x039e, 0x03a5, 0x2282, 0x2283, 0x2229, 0x222a, 0x2227, 0x2228,
72 /* 6 */	0x00ac, 0x03b1, 0x03b2, 0x03c7, 0x03b4, 0x03b5, 0x03c6, 0x03b3,
73 	0x03b7, 0x03b9, 0x03b8, 0x03ba, 0x03bb, _e000U, 0x03bd, 0x2202,
74 	0x03c0, 0x03c8, 0x03c1, 0x03c3, 0x03c4, _e000U, 0x0192, 0x03c9,
75 	0x03be, 0x03c5, 0x03b6, 0x2190, 0x2191, 0x2192, 0x2193, 0x007f,
76 };
77 
78 void
79 vt100_initchartables(struct wsemul_vt100_emuldata *edp)
80 {
81 	int i;
82 
83 	if (edp->isolatin1tab != NULL)
84 		for (i = 0; i < 128; i++)
85 			(*edp->emulops->mapchar)(edp->emulcookie, 128 + i,
86 			    &edp->isolatin1tab[i]);
87 
88 	if (edp->decgraphtab != NULL)
89 		for (i = 0; i < 128; i++)
90 			(*edp->emulops->mapchar)(edp->emulcookie,
91 			    decspcgr2uni[i], &edp->decgraphtab[i]);
92 
93 	if (edp->dectechtab != NULL)
94 		for (i = 0; i < 128; i++)
95 			(*edp->emulops->mapchar)(edp->emulcookie,
96 			    dectech2uni[i], &edp->dectechtab[i]);
97 
98 	vt100_setnrc(edp, 0);
99 }
100 
101 static const int nrcovlpos[12] = {
102     0x23, 0x40, 0x5b, 0x5c, 0x5d, 0x5e,	/* #@[\]^ */
103     0x5f, 0x60, 0x7b, 0x7c, 0x7d, 0x7e	/* _`{|}~ */
104 };
105 static const struct {
106 	u_int16_t c[12];
107 } nrctable[] = {
108 	/* british */
109 	{{0x00a3, 0x0040, 0x005b, 0x005c, 0x005d, 0x005e,
110 	0x005f, 0x0060, 0x007b, 0x007c, 0x007d, 0x007e}},
111 	/* dutch */
112 	{{0x00a3, 0x00be, 0x00dc, 0x00ab, 0x007c, 0x005e,
113 	0x005f, 0x0060, 0x00a8, 0x0192, 0x00bc, 0x00b4}},
114 	/* finnish */
115 	{{0x0023, 0x0040, 0x00c4, 0x00d6, 0x00c5, 0x00dc,
116 	0x005f, 0x00e9, 0x00e4, 0x00f6, 0x00e5, 0x00fc}},
117 	/* french */
118 	{{0x00a3, 0x00e0, 0x00b0, 0x00e7, 0x00a7, 0x005e,
119 	0x005f, 0x0060, 0x00e9, 0x00f9, 0x00e8, 0x00a8}},
120 	/* french canadian */
121 	{{0x0023, 0x00e0, 0x00e2, 0x00e7, 0x00ea, 0x00ee,
122 	0x005f, 0x00f4, 0x00e9, 0x00f9, 0x00e8, 0x00fb}},
123 	/* german */
124 	{{0x0023, 0x00a7, 0x00c4, 0x00d6, 0x00dc, 0x005e,
125 	0x005f, 0x0060, 0x00e4, 0x00f6, 0x00fc, 0x00df}},
126 	/* italian */
127 	{{0x00a3, 0x00a7, 0x00b0, 0x00e7, 0x00e9, 0x005e,
128 	0x005f, 0x00f9, 0x00e0, 0x00f2, 0x00e8, 0x00ec}},
129 	/* norwegian /danish */
130 	{{0x0023, 0x0040, 0x00c6, 0x00d8, 0x00c5, 0x005e,
131 	0x005f, 0x0060, 0x00e6, 0x00f8, 0x00e5, 0x007e}},
132 	/* portuguese */
133 	{{0x0023, 0x0040, 0x00c3, 0x00c7, 0x00d5, 0x005e,
134 	0x005f, 0x0060, 0x00e3, 0x00e7, 0x00f5, 0x007e}},
135 	/* spanish */
136 	{{0x00a3, 0x00a7, 0x00a1, 0x00d1, 0x00bf, 0x005e,
137 	0x005f, 0x0060, 0x0060, 0x00b0, 0x00f1, 0x00e7}},
138 	/* swedish */
139 	{{0x0023, 0x00c9, 0x00c4, 0x00d6, 0x00c5, 0x00dc,
140 	0x005f, 0x00e9, 0x00e4, 0x00f6, 0x00e5, 0x00fc}},
141 	/* swiss */
142 	{{0x00f9, 0x00e0, 0x00e9, 0x00e7, 0x00ea, 0x00ee,
143 	0x00e8, 0x00f4, 0x00e4, 0x00f6, 0x00fc, 0x00fb}},
144 };
145 
146 int
147 vt100_setnrc(struct wsemul_vt100_emuldata *edp, int nrc)
148 {
149 	int i;
150 
151 	if (edp->nrctab == NULL)
152 		return (0);
153 
154 	if (nrc < 0 || nrc >= nitems(nrctable))
155 		return (ERANGE);
156 
157 	for (i = 0; i < 128; i++)
158 		(*edp->emulops->mapchar)(edp->emulcookie, i, &edp->nrctab[i]);
159 	for (i = 0; i < 12; i++)
160 		(*edp->emulops->mapchar)(edp->emulcookie, nrctable[nrc].c[i],
161 		    &edp->nrctab[nrcovlpos[i]]);
162 
163 	return (0);
164 }
165