xref: /freebsd/contrib/tcsh/sh.char.c (revision 6560ac57ce879857203bc456cdc3849808dc0700)
1 /*
2  * sh.char.c: Character classification tables
3  */
4 /*-
5  * Copyright (c) 1980, 1991 The Regents of the University of California.
6  * 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  * 3. Neither the name of the University nor the names of its contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  */
32 #include "sh.h"
33 #include "sh.char.h"
34 
35 /* on default same as original map */
36 unsigned short _cmap[256] = {
37 /*	  0 nul		  1 soh		  2 stx		  3 etx	*/
38 	_CTR,		_CTR,		_CTR,		_CTR,
39 
40 /*	  4 eot		  5 enq		  6 ack		  7 bel	*/
41 	_CTR,		_CTR,		_CTR,		_CTR,
42 
43 /*	  8 bs		  9 ht		 10 nl		 11 vt	*/
44 	_CTR,		_CTR|_SP|_META,	_CTR|_NL|_META,	_CTR,
45 
46 /*	 12 np		 13 cr		 14 so		 15 si	*/
47 	_CTR,		_CTR,		_CTR,		_CTR,
48 
49 /*	 16 dle		 17 dc1		 18 dc2		 19 dc3	*/
50 	_CTR,		_CTR,		_CTR,		_CTR,
51 
52 /*	 20 dc4		 21 nak		 22 syn		 23 etb	*/
53 	_CTR,		_CTR,		_CTR,		_CTR,
54 
55 /*	 24 can		 25 em		 26 sub		 27 esc	*/
56 	_CTR,		_CTR,		_CTR,		_CTR,
57 
58 /*	 28 fs		 29 gs		 30 rs		 31 us	*/
59 	_CTR,		_CTR,		_CTR,		_CTR,
60 
61 /*	 32 sp		 33 !		 34 "		 35 #	*/
62 	_SP|_META,	_PUN,		_QF|_PUN,	_META|_PUN,
63 
64 /*	 36 $		 37 %		 38 &		 39 '	*/
65 	_DOL|_PUN,	_PUN,		_META|_CMD|_PUN,_QF|_PUN,
66 
67 /*	 40 (		 41 )		 42 *		 43 +	*/
68 	_META|_CMD|_PUN,_META|_PUN,	_GLOB|_PUN,	_PUN,
69 
70 /*	 44 ,		 45 -		 46 .		 47 /	*/
71 	_PUN,		_PUN,		_PUN,		_PUN,
72 
73 /*	 48 0		 49 1		 50 2		 51 3	*/
74 	_DIG|_XD,	_DIG|_XD,	_DIG|_XD,	_DIG|_XD,
75 
76 /*	 52 4		 53 5		 54 6		 55 7	*/
77 	_DIG|_XD,	_DIG|_XD,	_DIG|_XD,	_DIG|_XD,
78 
79 /*	 56 8		 57 9		 58 :		 59 ;	*/
80 	_DIG|_XD,	_DIG|_XD,	_PUN,		_META|_CMD|_PUN,
81 
82 /*	 60 <		 61 =		 62 >		 63 ?	*/
83 	_META|_PUN,	_PUN,		_META|_PUN,	_GLOB|_PUN,
84 
85 /*	 64 @		 65 A		 66 B		 67 C	*/
86 	_PUN,		_LET|_UP|_XD,	_LET|_UP|_XD,	_LET|_UP|_XD,
87 
88 /*	 68 D		 69 E		 70 F		 71 G	*/
89 	_LET|_UP|_XD,	_LET|_UP|_XD,	_LET|_UP|_XD,	_LET|_UP,
90 
91 /*	 72 H		 73 I		 74 J		 75 K	*/
92 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
93 
94 /*	 76 L		 77 M		 78 N		 79 O	*/
95 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
96 
97 /*	 80 P		 81 Q		 82 R		 83 S	*/
98 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
99 
100 /*	 84 T		 85 U		 86 V		 87 W	*/
101 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
102 
103 /*	 88 X		 89 Y		 90 Z		 91 [	*/
104 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_GLOB|_PUN,
105 
106 /*	 92 \		 93 ]		 94 ^		 95 _	*/
107 	_ESC|_PUN,	_PUN,		_PUN,		_PUN,
108 
109 /*	 96 `		 97 a		 98 b		 99 c	*/
110   _QB|_GLOB|_META|_PUN,	_LET|_DOW|_XD,	_LET|_DOW|_XD,	_LET|_DOW|_XD,
111 
112 /*	100 d		101 e		102 f		103 g	*/
113 	_LET|_DOW|_XD,	_LET|_DOW|_XD,	_LET|_DOW|_XD,	_LET|_DOW,
114 
115 /*	104 h		105 i		106 j		107 k	*/
116 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
117 
118 /*	108 l		109 m		110 n		111 o	*/
119 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
120 
121 /*	112 p		113 q		114 r		115 s	*/
122 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
123 
124 /*	116 t		117 u		118 v		119 w	*/
125 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
126 
127 /*	120 x		121 y		122 z		123 {	*/
128 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_GLOB|_PUN,
129 
130 /*	124 |		125 }		126 ~		127 del	*/
131 	_META|_CMD|_PUN,_PUN,		_PUN,		_CTR,
132 
133 #ifdef SHORT_STRINGS
134 /****************************************************************/
135 /* 128 - 255 The below is supposedly ISO 8859/1			*/
136 /****************************************************************/
137 /*	128 (undef)	129 (undef)	130 (undef)	131 (undef)	*/
138 	_CTR,		_CTR,		_CTR,		_CTR,
139 
140 /*	132 (undef)	133 (undef)	134 (undef)	135 (undef)	*/
141 	_CTR,		_CTR,		_CTR,		_CTR,
142 
143 /*	136 (undef)	137 (undef)	138 (undef)	139 (undef)	*/
144 	_CTR,		_CTR,		_CTR,		_CTR,
145 
146 /*	140 (undef)	141 (undef)	142 (undef)	143 (undef)	*/
147 	_CTR,		_CTR,		_CTR,		_CTR,
148 
149 /*	144 (undef)	145 (undef)	146 (undef)	147 (undef)	*/
150 	_CTR,		_CTR,		_CTR,		_CTR,
151 
152 /*	148 (undef)	149 (undef)	150 (undef)	151 (undef)	*/
153 	_CTR,		_CTR,		_CTR,		_CTR,
154 
155 /*	152 (undef)	153 (undef)	154 (undef)	155 (undef)	*/
156 	_CTR,		_CTR,		_CTR,		_CTR,
157 
158 /*	156 (undef)	157 (undef)	158 (undef)	159 (undef)	*/
159 	_CTR,		_CTR,		_CTR,		_CTR,
160 
161 /*	160 nobreakspace 161 exclamdown	162 cent	163 sterling	*/
162 	_PUN, /* XXX */	_PUN,		_PUN,		_PUN,
163 
164 /*	164 currency	165 yen		166 brokenbar	167 section	*/
165 	_PUN,		_PUN,		_PUN,		_PUN,
166 
167 /*	168 diaeresis	169 copyright	170 ordfeminine	171 guillemotleft*/
168 	_PUN,		_PUN,		_PUN,		_PUN,
169 
170 /*	172 notsign	173 hyphen	174 registered	175 macron	*/
171 	_PUN,		_PUN,		_PUN,		_PUN,
172 
173 /*	176 degree	177 plusminus	178 twosuperior	179 threesuperior*/
174 	_PUN,		_PUN,		_PUN,		_PUN,
175 
176 /*	180 acute	181 mu 		182 paragraph	183 periodcentered*/
177 	_PUN,		_PUN, /*XXX*/	_PUN,		_PUN,
178 
179 /*	184 cedilla	185 onesuperior	186 masculine	187 guillemotright*/
180 	_PUN,		_PUN,		_PUN,		_PUN,
181 
182 /*	188 onequarter	189 onehalf	190 threequarters 191 questiondown*/
183 	_PUN,		_PUN,		_PUN,		_PUN,
184 
185 /*	192 Agrave	193 Aacute	194 Acircumflex	195 Atilde	*/
186 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
187 
188 /*	196 Adiaeresis	197 Aring	198 AE		199 Ccedilla	*/
189 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
190 
191 /*	200 Egrave	201 Eacute	202 Ecircumflex	203 Ediaeresis	*/
192 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
193 
194 /*	204 Igrave	205 Iacute	206 Icircumflex	207 Idiaeresis	*/
195 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
196 
197 /*	208 ETH		209 Ntilde	210 Ograve	211 Oacute	*/
198 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
199 
200 /*	212 Ocircumflex	213 Otilde	214 Odiaeresis	215 multiply	*/
201 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_PUN,
202 
203 /*	216 Ooblique	217 Ugrave	218 Uacute	219 Ucircumflex	*/
204 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
205 
206 /*	220 Udiaeresis	221 Yacute	222 THORN	223 ssharp	*/
207 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_DOW,
208 
209 /*	224 agrave	225 aacute	226 acircumflex	227 atilde	*/
210 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
211 
212 /*	228 adiaeresis	229 aring	230 ae		231 ccedilla	*/
213 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
214 
215 /*	232 egrave	233 eacute	234 ecircumflex	235 ediaeresis	*/
216 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
217 
218 /*	236 igrave	237 iacute	238 icircumflex	239 idiaeresis	*/
219 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
220 
221 /*	240 eth		241 ntilde	242 ograve	243 oacute	*/
222 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
223 
224 /*	244 ocircumflex	245 otilde	246 odiaeresis	247 division	*/
225 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_PUN,
226 
227 /*	248 oslash	249 ugrave	250 uacute	251 ucircumflex	*/
228 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
229 
230 /*	252 udiaeresis	253 yacute	254 thorn	255 ydiaeresis	*/
231 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
232 #endif /* SHORT_STRINGS */
233 };
234 
235 #if defined(KANJI) && defined(SHORT_STRINGS) && defined(DSPMBYTE)
236 /* original table */
237 unsigned short _cmap_c[256] = {
238 /*	  0 nul		  1 soh		  2 stx		  3 etx	*/
239 	_CTR,		_CTR,		_CTR,		_CTR,
240 
241 /*	  4 eot		  5 enq		  6 ack		  7 bel	*/
242 	_CTR,		_CTR,		_CTR,		_CTR,
243 
244 /*	  8 bs		  9 ht		 10 nl		 11 vt	*/
245 	_CTR,		_CTR|_SP|_META,	_CTR|_NL|_META,	_CTR,
246 
247 /*	 12 np		 13 cr		 14 so		 15 si	*/
248 	_CTR,		_CTR,		_CTR,		_CTR,
249 
250 /*	 16 dle		 17 dc1		 18 dc2		 19 dc3	*/
251 	_CTR,		_CTR,		_CTR,		_CTR,
252 
253 /*	 20 dc4		 21 nak		 22 syn		 23 etb	*/
254 	_CTR,		_CTR,		_CTR,		_CTR,
255 
256 /*	 24 can		 25 em		 26 sub		 27 esc	*/
257 	_CTR,		_CTR,		_CTR,		_CTR,
258 
259 /*	 28 fs		 29 gs		 30 rs		 31 us	*/
260 	_CTR,		_CTR,		_CTR,		_CTR,
261 
262 /*	 32 sp		 33 !		 34 "		 35 #	*/
263 	_SP|_META,	_PUN,		_QF|_PUN,	_META|_PUN,
264 
265 /*	 36 $		 37 %		 38 &		 39 '	*/
266 	_DOL|_PUN,	_PUN,		_META|_CMD|_PUN,_QF|_PUN,
267 
268 /*	 40 (		 41 )		 42 *		 43 +	*/
269 	_META|_CMD|_PUN,_META|_PUN,	_GLOB|_PUN,	_PUN,
270 
271 /*	 44 ,		 45 -		 46 .		 47 /	*/
272 	_PUN,		_PUN,		_PUN,		_PUN,
273 
274 /*	 48 0		 49 1		 50 2		 51 3	*/
275 	_DIG|_XD,	_DIG|_XD,	_DIG|_XD,	_DIG|_XD,
276 
277 /*	 52 4		 53 5		 54 6		 55 7	*/
278 	_DIG|_XD,	_DIG|_XD,	_DIG|_XD,	_DIG|_XD,
279 
280 /*	 56 8		 57 9		 58 :		 59 ;	*/
281 	_DIG|_XD,	_DIG|_XD,	_PUN,		_META|_CMD|_PUN,
282 
283 /*	 60 <		 61 =		 62 >		 63 ?	*/
284 	_META|_PUN,	_PUN,		_META|_PUN,	_GLOB|_PUN,
285 
286 /*	 64 @		 65 A		 66 B		 67 C	*/
287 	_PUN,		_LET|_UP|_XD,	_LET|_UP|_XD,	_LET|_UP|_XD,
288 
289 /*	 68 D		 69 E		 70 F		 71 G	*/
290 	_LET|_UP|_XD,	_LET|_UP|_XD,	_LET|_UP|_XD,	_LET|_UP,
291 
292 /*	 72 H		 73 I		 74 J		 75 K	*/
293 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
294 
295 /*	 76 L		 77 M		 78 N		 79 O	*/
296 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
297 
298 /*	 80 P		 81 Q		 82 R		 83 S	*/
299 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
300 
301 /*	 84 T		 85 U		 86 V		 87 W	*/
302 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
303 
304 /*	 88 X		 89 Y		 90 Z		 91 [	*/
305 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_GLOB|_PUN,
306 
307 /*	 92 \		 93 ]		 94 ^		 95 _	*/
308 	_ESC|_PUN,	_PUN,		_PUN,		_PUN,
309 
310 /*	 96 `		 97 a		 98 b		 99 c	*/
311   _QB|_GLOB|_META|_PUN,	_LET|_DOW|_XD,	_LET|_DOW|_XD,	_LET|_DOW|_XD,
312 
313 /*	100 d		101 e		102 f		103 g	*/
314 	_LET|_DOW|_XD,	_LET|_DOW|_XD,	_LET|_DOW|_XD,	_LET|_DOW,
315 
316 /*	104 h		105 i		106 j		107 k	*/
317 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
318 
319 /*	108 l		109 m		110 n		111 o	*/
320 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
321 
322 /*	112 p		113 q		114 r		115 s	*/
323 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
324 
325 /*	116 t		117 u		118 v		119 w	*/
326 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
327 
328 /*	120 x		121 y		122 z		123 {	*/
329 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_GLOB|_PUN,
330 
331 /*	124 |		125 }		126 ~		127 del	*/
332 	_META|_CMD|_PUN,_PUN,		_PUN,		_CTR,
333 
334 /****************************************************************/
335 /* 128 - 255 The below is supposedly ISO 8859/1			*/
336 /****************************************************************/
337 /*	128 (undef)	129 (undef)	130 (undef)	131 (undef)	*/
338 	_CTR,		_CTR,		_CTR,		_CTR,
339 
340 /*	132 (undef)	133 (undef)	134 (undef)	135 (undef)	*/
341 	_CTR,		_CTR,		_CTR,		_CTR,
342 
343 /*	136 (undef)	137 (undef)	138 (undef)	139 (undef)	*/
344 	_CTR,		_CTR,		_CTR,		_CTR,
345 
346 /*	140 (undef)	141 (undef)	142 (undef)	143 (undef)	*/
347 	_CTR,		_CTR,		_CTR,		_CTR,
348 
349 /*	144 (undef)	145 (undef)	146 (undef)	147 (undef)	*/
350 	_CTR,		_CTR,		_CTR,		_CTR,
351 
352 /*	148 (undef)	149 (undef)	150 (undef)	151 (undef)	*/
353 	_CTR,		_CTR,		_CTR,		_CTR,
354 
355 /*	152 (undef)	153 (undef)	154 (undef)	155 (undef)	*/
356 	_CTR,		_CTR,		_CTR,		_CTR,
357 
358 /*	156 (undef)	157 (undef)	158 (undef)	159 (undef)	*/
359 	_CTR,		_CTR,		_CTR,		_CTR,
360 
361 /*	160 nobreakspace 161 exclamdown	162 cent	163 sterling	*/
362 	_PUN, /* XXX */	_PUN,		_PUN,		_PUN,
363 
364 /*	164 currency	165 yen		166 brokenbar	167 section	*/
365 	_PUN,		_PUN,		_PUN,		_PUN,
366 
367 /*	168 diaeresis	169 copyright	170 ordfeminine	171 guillemotleft*/
368 	_PUN,		_PUN,		_PUN,		_PUN,
369 
370 /*	172 notsign	173 hyphen	174 registered	175 macron	*/
371 	_PUN,		_PUN,		_PUN,		_PUN,
372 
373 /*	176 degree	177 plusminus	178 twosuperior	179 threesuperior*/
374 	_PUN,		_PUN,		_PUN,		_PUN,
375 
376 /*	180 acute	181 mu 		182 paragraph	183 periodcentered*/
377 	_PUN,		_PUN, /*XXX*/	_PUN,		_PUN,
378 
379 /*	184 cedilla	185 onesuperior	186 masculine	187 guillemotright*/
380 	_PUN,		_PUN,		_PUN,		_PUN,
381 
382 /*	188 onequarter	189 onehalf	190 threequarters 191 questiondown*/
383 	_PUN,		_PUN,		_PUN,		_PUN,
384 
385 /*	192 Agrave	193 Aacute	194 Acircumflex	195 Atilde	*/
386 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
387 
388 /*	196 Adiaeresis	197 Aring	198 AE		199 Ccedilla	*/
389 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
390 
391 /*	200 Egrave	201 Eacute	202 Ecircumflex	203 Ediaeresis	*/
392 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
393 
394 /*	204 Igrave	205 Iacute	206 Icircumflex	207 Idiaeresis	*/
395 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
396 
397 /*	208 ETH		209 Ntilde	210 Ograve	211 Oacute	*/
398 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
399 
400 /*	212 Ocircumflex	213 Otilde	214 Odiaeresis	215 multiply	*/
401 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_PUN,
402 
403 /*	216 Ooblique	217 Ugrave	218 Uacute	219 Ucircumflex	*/
404 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
405 
406 /*	220 Udiaeresis	221 Yacute	222 THORN	223 ssharp	*/
407 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_DOW,
408 
409 /*	224 agrave	225 aacute	226 acircumflex	227 atilde	*/
410 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
411 
412 /*	228 adiaeresis	229 aring	230 ae		231 ccedilla	*/
413 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
414 
415 /*	232 egrave	233 eacute	234 ecircumflex	235 ediaeresis	*/
416 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
417 
418 /*	236 igrave	237 iacute	238 icircumflex	239 idiaeresis	*/
419 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
420 
421 /*	240 eth		241 ntilde	242 ograve	243 oacute	*/
422 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
423 
424 /*	244 ocircumflex	245 otilde	246 odiaeresis	247 division	*/
425 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_PUN,
426 
427 /*	248 oslash	249 ugrave	250 uacute	251 ucircumflex	*/
428 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
429 
430 /*	252 udiaeresis	253 yacute	254 thorn	255 ydiaeresis	*/
431 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
432 };
433 
434 /* multi-byte table */
435 /* BY Masaaki Koyanagi VERY THANKS */
436 unsigned short _cmap_mbyte[256] = {
437 /*	  0 nul		  1 soh		  2 stx		  3 etx	*/
438 	_CTR,		_CTR,		_CTR,		_CTR,
439 
440 /*	  4 eot		  5 enq		  6 ack		  7 bel	*/
441 	_CTR,		_CTR,		_CTR,		_CTR,
442 
443 /*	  8 bs		  9 ht		 10 nl		 11 vt	*/
444 	_CTR,		_CTR|_SP|_META,	_CTR|_NL|_META,	_CTR,
445 
446 /*	 12 np		 13 cr		 14 so		 15 si	*/
447 	_CTR,		_CTR,		_CTR,		_CTR,
448 
449 /*	 16 dle		 17 dc1		 18 dc2		 19 dc3	*/
450 	_CTR,		_CTR,		_CTR,		_CTR,
451 
452 /*	 20 dc4		 21 nak		 22 syn		 23 etb	*/
453 	_CTR,		_CTR,		_CTR,		_CTR,
454 
455 /*	 24 can		 25 em		 26 sub		 27 esc	*/
456 	_CTR,		_CTR,		_CTR,		_CTR,
457 
458 /*	 28 fs		 29 gs		 30 rs		 31 us	*/
459 	_CTR,		_CTR,		_CTR,		_CTR,
460 
461 /*	 32 sp		 33 !		 34 "		 35 #	*/
462 	_SP|_META,	_PUN,		_QF|_PUN,	_META|_PUN,
463 
464 /*	 36 $		 37 %		 38 &		 39 '	*/
465 	_DOL|_PUN,	_PUN,		_META|_CMD|_PUN,_QF|_PUN,
466 
467 /*	 40 (		 41 )		 42 *		 43 +	*/
468 	_META|_CMD|_PUN,_META|_PUN,	_GLOB|_PUN,	_PUN,
469 
470 /*	 44 ,		 45 -		 46 .		 47 /	*/
471 	_PUN,		_PUN,		_PUN,		_PUN,
472 
473 /*	 48 0		 49 1		 50 2		 51 3	*/
474 	_DIG|_XD,	_DIG|_XD,	_DIG|_XD,	_DIG|_XD,
475 
476 /*	 52 4		 53 5		 54 6		 55 7	*/
477 	_DIG|_XD,	_DIG|_XD,	_DIG|_XD,	_DIG|_XD,
478 
479 /*	 56 8		 57 9		 58 :		 59 ;	*/
480 	_DIG|_XD,	_DIG|_XD,	_PUN,		_META|_CMD|_PUN,
481 
482 /*	 60 <		 61 =		 62 >		 63 ?	*/
483 	_META|_PUN,	_PUN,		_META|_PUN,	_GLOB|_PUN,
484 
485 /*	 64 @		 65 A		 66 B		 67 C	*/
486 	_PUN,		_LET|_UP|_XD,	_LET|_UP|_XD,	_LET|_UP|_XD,
487 
488 /*	 68 D		 69 E		 70 F		 71 G	*/
489 	_LET|_UP|_XD,	_LET|_UP|_XD,	_LET|_UP|_XD,	_LET|_UP,
490 
491 /*	 72 H		 73 I		 74 J		 75 K	*/
492 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
493 
494 /*	 76 L		 77 M		 78 N		 79 O	*/
495 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
496 
497 /*	 80 P		 81 Q		 82 R		 83 S	*/
498 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
499 
500 /*	 84 T		 85 U		 86 V		 87 W	*/
501 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
502 
503 /*	 88 X		 89 Y		 90 Z		 91 [	*/
504 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_GLOB|_PUN,
505 
506 /*	 92 \		 93 ]		 94 ^		 95 _	*/
507 	_ESC|_PUN,	_PUN,		_PUN,		_PUN,
508 
509 /*	 96 `		 97 a		 98 b		 99 c	*/
510   _QB|_GLOB|_META|_PUN,	_LET|_DOW|_XD,	_LET|_DOW|_XD,	_LET|_DOW|_XD,
511 
512 /*	100 d		101 e		102 f		103 g	*/
513 	_LET|_DOW|_XD,	_LET|_DOW|_XD,	_LET|_DOW|_XD,	_LET|_DOW,
514 
515 /*	104 h		105 i		106 j		107 k	*/
516 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
517 
518 /*	108 l		109 m		110 n		111 o	*/
519 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
520 
521 /*	112 p		113 q		114 r		115 s	*/
522 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
523 
524 /*	116 t		117 u		118 v		119 w	*/
525 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
526 
527 /*	120 x		121 y		122 z		123 {	*/
528 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_GLOB|_PUN,
529 
530 /*	124 |		125 }		126 ~		127 del	*/
531 	_META|_CMD|_PUN,_PUN,		_PUN,		_CTR,
532 
533 /****************************************************************/
534 /* 128 - 255 The below is supposedly ISO 8859/1			*/
535 /****************************************************************/
536 /*	128 (undef)	129 (undef)	130 (undef)	131 (undef)	*/
537 	_PUN,		_PUN,		_PUN,		_PUN,
538 
539 /*	132 (undef)	133 (undef)	134 (undef)	135 (undef)	*/
540 	_PUN,		_PUN,		_PUN,		_PUN,
541 
542 /*	136 (undef)	137 (undef)	138 (undef)	139 (undef)	*/
543 	_PUN,		_PUN,		_PUN,		_PUN,
544 
545 /*	140 (undef)	141 (undef)	142 (undef)	143 (undef)	*/
546 	_PUN,		_PUN,		_PUN,		_PUN,
547 
548 /*	144 (undef)	145 (undef)	146 (undef)	147 (undef)	*/
549 	_PUN,		_PUN,		_PUN,		_PUN,
550 
551 /*	148 (undef)	149 (undef)	150 (undef)	151 (undef)	*/
552 	_PUN,		_PUN,		_PUN,		_PUN,
553 
554 /*	152 (undef)	153 (undef)	154 (undef)	155 (undef)	*/
555 	_PUN,		_PUN,		_PUN,		_PUN,
556 
557 /*	156 (undef)	157 (undef)	158 (undef)	159 (undef)	*/
558 	_PUN,		_PUN,		_PUN,		_PUN,
559 
560 /*	160 nobreakspace 161 exclamdown	162 cent	163 sterling	*/
561 	_PUN, /* XXX */	_PUN,		_PUN,		_PUN,
562 
563 /*	164 currency	165 yen		166 brokenbar	167 section	*/
564 	_PUN,		_PUN,		_PUN,		_PUN,
565 
566 /*	168 diaeresis	169 copyright	170 ordfeminine	171 guillemotleft*/
567 	_PUN,		_PUN,		_PUN,		_PUN,
568 
569 /*	172 notsign	173 hyphen	174 registered	175 macron	*/
570 	_PUN,		_PUN,		_PUN,		_PUN,
571 
572 /*	176 degree	177 plusminus	178 twosuperior	179 threesuperior*/
573 	_PUN,		_PUN,		_PUN,		_PUN,
574 
575 /*	180 acute	181 mu 		182 paragraph	183 periodcentered*/
576 	_PUN,		_PUN, /*XXX*/	_PUN,		_PUN,
577 
578 /*	184 cedilla	185 onesuperior	186 masculine	187 guillemotright*/
579 	_PUN,		_PUN,		_PUN,		_PUN,
580 
581 /*	188 onequarter	189 onehalf	190 threequarters 191 questiondown*/
582 	_PUN,		_PUN,		_PUN,		_PUN,
583 
584 /*	192 Agrave	193 Aacute	194 Acircumflex	195 Atilde	*/
585 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
586 
587 /*	196 Adiaeresis	197 Aring	198 AE		199 Ccedilla	*/
588 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
589 
590 /*	200 Egrave	201 Eacute	202 Ecircumflex	203 Ediaeresis	*/
591 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
592 
593 /*	204 Igrave	205 Iacute	206 Icircumflex	207 Idiaeresis	*/
594 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
595 
596 /*	208 ETH		209 Ntilde	210 Ograve	211 Oacute	*/
597 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
598 
599 /*	212 Ocircumflex	213 Otilde	214 Odiaeresis	215 multiply	*/
600 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_PUN,
601 
602 /*	216 Ooblique	217 Ugrave	218 Uacute	219 Ucircumflex	*/
603 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_UP,
604 
605 /*	220 Udiaeresis	221 Yacute	222 THORN	223 ssharp	*/
606 	_LET|_UP,	_LET|_UP,	_LET|_UP,	_LET|_DOW,
607 
608 /*	224 agrave	225 aacute	226 acircumflex	227 atilde	*/
609 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
610 
611 /*	228 adiaeresis	229 aring	230 ae		231 ccedilla	*/
612 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
613 
614 /*	232 egrave	233 eacute	234 ecircumflex	235 ediaeresis	*/
615 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
616 
617 /*	236 igrave	237 iacute	238 icircumflex	239 idiaeresis	*/
618 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
619 
620 /*	240 eth		241 ntilde	242 ograve	243 oacute	*/
621 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
622 
623 /*	244 ocircumflex	245 otilde	246 odiaeresis	247 division	*/
624 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_PUN,
625 
626 /*	248 oslash	249 ugrave	250 uacute	251 ucircumflex	*/
627 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
628 
629 /*	252 udiaeresis	253 yacute	254 thorn	255 ydiaeresis	*/
630 	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,	_LET|_DOW,
631 };
632 
633 short _enable_mbdisp = 0; /* control multi-byte 0...disable 1...enable */
634 
635 /* multi-byte check table */
636 /* default = all 0 (clear process in update_vars()/unset()) */
637 unsigned short _mbmap[256];
638 
639 unsigned short _mbmap_euc[256] = {
640 /* first byte	0x8e,0xa0 - 0xf4 */
641 /* second byte 	0xa0 - 0xfe */
642 /* 0 - 7f all 0 */
643     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
644     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
645     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
646     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
647 /*  80		81		82		83 */
648     0,		0,		0,		0,
649 /*  84		85		86		87 */
650     0,		0,		0,		0,
651 /*  88		89		8a		8b */
652     0,		0,		0,		0,
653 /*  8c		8d		8e		8f */
654     0,		0,		_MB1,		0,
655 /* 90 - 9f all 0 */
656     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
657 /*  a0		a1		a2		a3 */
658     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
659 /*  a4		a5		a6		a7 */
660     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
661 /*  a8		a9		aa		ab */
662     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
663 /*  ac		ad		ae		af */
664     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
665 /*  b0		b1		b2		b3 */
666     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
667 /*  b4		b5		b6		b7 */
668     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
669 /*  b8		b9		ba		bb */
670     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
671 /*  bc		bd		be		bf */
672     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
673 /*  c0		c1		c2		c3 */
674     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
675 /*  c4		c5		c6		c7 */
676     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
677 /*  c8		c9		ca		cb */
678     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
679 /*  cc		cd		ce		cf */
680     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
681 /*  d0		d1		d2		d3 */
682     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
683 /*  d4		d5		d6		d7 */
684     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
685 /*  d8		d9		da		db */
686     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
687 /*  dc		dd		de		df */
688     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
689 /*  e0		e1		e2		e3 */
690     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
691 /*  e4		e5		e6		e7 */
692     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
693 /*  e8		e9		ea		eb */
694     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
695 /*  ec		ed		ee		ef */
696     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
697 /*  f0		f1		f2		f3 */
698     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
699 /*  f4		f5		f6		f7 */
700     _MB1|_MB2,	_MB2,		_MB2,		_MB2,
701 /*  f8		f9		fa		fb */
702     _MB2,	_MB2,		_MB2,		_MB2,
703 /*  fc		fd		fe		ff */
704     _MB2,	_MB2,		_MB2,		0,
705 };
706 
707 unsigned short _mbmap_sjis[256] = {
708 /* first byte	0x81-0x9f,0xe0 - 0xfc */
709 /* second byte 	0x40-0x7e,0x80 - 0xfc */
710 /* 0 - 3f all 0 */
711     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
712     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
713 /*  40		41		42		43 */
714     _MB2,	_MB2,		_MB2,		_MB2,
715 /*  44		45		46		47 */
716     _MB2,	_MB2,		_MB2,		_MB2,
717 /*  48		49		4a		4b */
718     _MB2,	_MB2,		_MB2,		_MB2,
719 /*  4c		4d		4e		4f */
720     _MB2,	_MB2,		_MB2,		_MB2,
721 /*  50		51		52		53 */
722     _MB2,	_MB2,		_MB2,		_MB2,
723 /*  54		55		56		57 */
724     _MB2,	_MB2,		_MB2,		_MB2,
725 /*  58		59		5a		5b */
726     _MB2,	_MB2,		_MB2,		_MB2,
727 /*  5c		5d		5e		5f */
728     _MB2,	_MB2,		_MB2,		_MB2,
729 /*  60		61		62		63 */
730     _MB2,	_MB2,		_MB2,		_MB2,
731 /*  64		65		66		67 */
732     _MB2,	_MB2,		_MB2,		_MB2,
733 /*  68		69		6a		6b */
734     _MB2,	_MB2,		_MB2,		_MB2,
735 /*  6c		6d		6e		6f */
736     _MB2,	_MB2,		_MB2,		_MB2,
737 /*  70		71		72		73 */
738     _MB2,	_MB2,		_MB2,		_MB2,
739 /*  74		75		76		77 */
740     _MB2,	_MB2,		_MB2,		_MB2,
741 /*  78		79		7a		7b */
742     _MB2,	_MB2,		_MB2,		_MB2,
743 /*  7c		7d		7e		7f */
744     _MB2,	_MB2,		_MB2,		0,
745 /*  80		81		82		83 */
746     _MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
747 /*  84		85		86		87 */
748     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
749 /*  88		89		8a		8b */
750     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
751 /*  8c		8d		8e		8f */
752     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
753 /*  90		91		92		93 */
754     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
755 /*  94		95		96		97 */
756     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
757 /*  98		99		9a		9b */
758     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
759 /*  9c		9d		9e		9f */
760     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
761 /*  a0		a1		a2		a3 */
762     _MB2,	_MB2,		_MB2,		_MB2,
763 /*  a4		a5		a6		a7 */
764     _MB2,	_MB2,		_MB2,		_MB2,
765 /*  a8		a9		aa		ab */
766     _MB2,	_MB2,		_MB2,		_MB2,
767 /*  ac		ad		ae		af */
768     _MB2,	_MB2,		_MB2,		_MB2,
769 /*  b0		b1		b2		b3 */
770     _MB2,	_MB2,		_MB2,		_MB2,
771 /*  b4		b5		b6		b7 */
772     _MB2,	_MB2,		_MB2,		_MB2,
773 /*  b8		b9		ba		bb */
774     _MB2,	_MB2,		_MB2,		_MB2,
775 /*  bc		bd		be		bf */
776     _MB2,	_MB2,		_MB2,		_MB2,
777 /*  c0		c1		c2		c3 */
778     _MB2,	_MB2,		_MB2,		_MB2,
779 /*  c4		c5		c6		c7 */
780     _MB2,	_MB2,		_MB2,		_MB2,
781 /*  c8		c9		ca		cb */
782     _MB2,	_MB2,		_MB2,		_MB2,
783 /*  cc		cd		ce		cf */
784     _MB2,	_MB2,		_MB2,		_MB2,
785 /*  d0		d1		d2		d3 */
786     _MB2,	_MB2,		_MB2,		_MB2,
787 /*  d4		d5		d6		d7 */
788     _MB2,	_MB2,		_MB2,		_MB2,
789 /*  d8		d9		da		db */
790     _MB2,	_MB2,		_MB2,		_MB2,
791 /*  dc		dd		de		df */
792     _MB2,	_MB2,		_MB2,		_MB2,
793 /*  e0		e1		e2		e3 */
794     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
795 /*  e4		e5		e6		e7 */
796     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
797 /*  e8		e9		ea		eb */
798     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
799 /*  ec		ed		ee		ef */
800     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
801 /*  f0		f1		f2		f3 */
802     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
803 /*  f4		f5		f6		f7 */
804     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
805 /*  f8		f9		fa		fb */
806     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
807 /*  fc		fd		fe		ff */
808     _MB1|_MB2,	0,		0,		0,
809 };
810 
811 unsigned short _mbmap_big5[256] = {
812 /* This is latest big5 charmap, so called "Big5+" */
813 /* first byte   0x81 - 0xfe */
814 /* second byte  0x40 - 0x7e, 0x80 - 0xfe */
815 /* 0x00 - 0x3f = 0 */
816     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
817     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
818 /* 0x40 - 0x7e = 2 */
819     _MB2,	_MB2,		_MB2,		_MB2,
820     _MB2,	_MB2,		_MB2,		_MB2,
821     _MB2,	_MB2,		_MB2,		_MB2,
822     _MB2,	_MB2,		_MB2,		_MB2,
823     _MB2,	_MB2,		_MB2,		_MB2,
824     _MB2,	_MB2,		_MB2,		_MB2,
825     _MB2,	_MB2,		_MB2,		_MB2,
826     _MB2,	_MB2,		_MB2,		_MB2,
827     _MB2,	_MB2,		_MB2,		_MB2,
828     _MB2,	_MB2,		_MB2,		_MB2,
829     _MB2,	_MB2,		_MB2,		_MB2,
830     _MB2,	_MB2,		_MB2,		_MB2,
831     _MB2,	_MB2,		_MB2,		_MB2,
832     _MB2,	_MB2,		_MB2,		_MB2,
833     _MB2,	_MB2,		_MB2,		_MB2,
834 						/* 0x7f = 0 */
835     _MB2,	_MB2,		_MB2,		0,
836 /* 0x80 = 2, 0x81 - 0xfe = 3 */
837     _MB2,      _MB1|_MB2,      _MB1|_MB2,      _MB1|_MB2,
838     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
839     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
840     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
841     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
842     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
843     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
844     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
845     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
846     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
847     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
848     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
849     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
850     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
851     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
852     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
853     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
854     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
855     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
856     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
857     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
858     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
859     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
860     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
861     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
862     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
863     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
864     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
865     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
866     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
867     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,
868 						/* 0xff = 0 */
869     _MB1|_MB2,	_MB1|_MB2,	_MB1|_MB2,	0,
870 };
871 
872 unsigned short _mbmap_utf8[256] = {
873 /* utf8 uses up to 6 bytes */
874 /* first byte        0xc0 - 0xfd */
875 /* any further bytes 0x80 - 0xbf */
876 /* 0 - 7f all 0 */
877     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
878     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
879     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
880     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
881 /*  80 - bf : all _MB2 */
882     _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2,
883     _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2,
884     _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2,
885     _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2,
886     _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2,
887     _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2,
888     _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2,
889     _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2, _MB2,
890 /* c0 - fc : all _MB1 */
891     _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1,
892     _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1,
893     _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1,
894     _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1,
895     _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1,
896     _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1,
897     _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, _MB1,
898 /*  f8    f9    fa    fb    fc    fd    fe    ff*/
899     _MB1, _MB1, _MB1, _MB1, _MB1, _MB1, 0,    0
900 };
901 #endif /* defined(KANJI) && defined(SHORT_STRINGS) && defined(DSPMBYTE) */
902 
903 #ifndef NLS
904 /* _cmap_lower, _cmap_upper for ISO 8859/1 */
905 
906 unsigned char _cmap_lower[256] = {
907 	0000,	0001,	0002,	0003,	0004,	0005,	0006,	0007,
908 	0010,	0011,	0012,	0013,	0014,	0015,	0016,	0017,
909 	0020,	0021,	0022,	0023,	0024,	0025,	0026,	0027,
910 	0030,	0031,	0032,	0033,	0034,	0035,	0036,	0037,
911 	0040,	0041,	0042,	0043,	0044,	0045,	0046,	0047,
912 	0050,	0051,	0052,	0053,	0054,	0055,	0056,	0057,
913 	0060,	0061,	0062,	0063,	0064,	0065,	0066,	0067,
914 	0070,	0071,	0072,	0073,	0074,	0075,	0076,	0077,
915 	0100,	0141,	0142,	0143,	0144,	0145,	0146,	0147,
916 	0150,	0151,	0152,	0153,	0154,	0155,	0156,	0157,
917 	0160,	0161,	0162,	0163,	0164,	0165,	0166,	0167,
918 	0170,	0171,	0172,	0133,	0134,	0135,	0136,	0137,
919 	0140,	0141,	0142,	0143,	0144,	0145,	0146,	0147,
920 	0150,	0151,	0152,	0153,	0154,	0155,	0156,	0157,
921 	0160,	0161,	0162,	0163,	0164,	0165,	0166,	0167,
922 	0170,	0171,	0172,	0173,	0174,	0175,	0176,	0177,
923 	0200,	0201,	0202,	0203,	0204,	0205,	0206,	0207,
924 	0210,	0211,	0212,	0213,	0214,	0215,	0216,	0217,
925 	0220,	0221,	0222,	0223,	0224,	0225,	0226,	0227,
926 	0230,	0231,	0232,	0233,	0234,	0235,	0236,	0237,
927 	0240,	0241,	0242,	0243,	0244,	0245,	0246,	0247,
928 	0250,	0251,	0252,	0253,	0254,	0255,	0256,	0257,
929 	0260,	0261,	0262,	0263,	0264,	0265,	0266,	0267,
930 	0270,	0271,	0272,	0273,	0274,	0275,	0276,	0277,
931 	0340,	0341,	0342,	0343,	0344,	0345,	0346,	0347,
932 	0350,	0351,	0352,	0353,	0354,	0355,	0356,	0357,
933 	0360,	0361,	0362,	0363,	0364,	0365,	0366,	0327,
934 	0370,	0371,	0372,	0373,	0374,	0375,	0376,	0337,
935 	0340,	0341,	0342,	0343,	0344,	0345,	0346,	0347,
936 	0350,	0351,	0352,	0353,	0354,	0355,	0356,	0357,
937 	0360,	0361,	0362,	0363,	0364,	0365,	0366,	0367,
938 	0370,	0371,	0372,	0373,	0374,	0375,	0376,	0377,
939 };
940 
941 unsigned char _cmap_upper[256] = {
942 	0000,	0001,	0002,	0003,	0004,	0005,	0006,	0007,
943 	0010,	0011,	0012,	0013,	0014,	0015,	0016,	0017,
944 	0020,	0021,	0022,	0023,	0024,	0025,	0026,	0027,
945 	0030,	0031,	0032,	0033,	0034,	0035,	0036,	0037,
946 	0040,	0041,	0042,	0043,	0044,	0045,	0046,	0047,
947 	0050,	0051,	0052,	0053,	0054,	0055,	0056,	0057,
948 	0060,	0061,	0062,	0063,	0064,	0065,	0066,	0067,
949 	0070,	0071,	0072,	0073,	0074,	0075,	0076,	0077,
950 	0100,	0101,	0102,	0103,	0104,	0105,	0106,	0107,
951 	0110,	0111,	0112,	0113,	0114,	0115,	0116,	0117,
952 	0120,	0121,	0122,	0123,	0124,	0125,	0126,	0127,
953 	0130,	0131,	0132,	0133,	0134,	0135,	0136,	0137,
954 	0140,	0101,	0102,	0103,	0104,	0105,	0106,	0107,
955 	0110,	0111,	0112,	0113,	0114,	0115,	0116,	0117,
956 	0120,	0121,	0122,	0123,	0124,	0125,	0126,	0127,
957 	0130,	0131,	0132,	0173,	0174,	0175,	0176,	0177,
958 	0200,	0201,	0202,	0203,	0204,	0205,	0206,	0207,
959 	0210,	0211,	0212,	0213,	0214,	0215,	0216,	0217,
960 	0220,	0221,	0222,	0223,	0224,	0225,	0226,	0227,
961 	0230,	0231,	0232,	0233,	0234,	0235,	0236,	0237,
962 	0240,	0241,	0242,	0243,	0244,	0245,	0246,	0247,
963 	0250,	0251,	0252,	0253,	0254,	0255,	0256,	0257,
964 	0260,	0261,	0262,	0263,	0264,	0265,	0266,	0267,
965 	0270,	0271,	0272,	0273,	0274,	0275,	0276,	0277,
966 	0300,	0301,	0302,	0303,	0304,	0305,	0306,	0307,
967 	0310,	0311,	0312,	0313,	0314,	0315,	0316,	0317,
968 	0320,	0321,	0322,	0323,	0324,	0325,	0326,	0327,
969 	0330,	0331,	0332,	0333,	0334,	0335,	0336,	0337,
970 	0300,	0301,	0302,	0303,	0304,	0305,	0306,	0307,
971 	0310,	0311,	0312,	0313,	0314,	0315,	0316,	0317,
972 	0320,	0321,	0322,	0323,	0324,	0325,	0326,	0367,
973 	0330,	0331,	0332,	0333,	0334,	0335,	0336,	0377,
974 };
975 #endif /* NLS */
976 
977 #ifdef _OSD_POSIX
978 /*
979 	   Initial Port for tcsh-6.07.04 by <Martin.Kraemer@Mch.SNI.De>
980 
981 "BS2000 OSD" is a POSIX on a main frame.
982 It is made by Siemens Nixdorf AG, Germany.
983 Within the POSIX subsystem, the same character set was chosen as in
984 "native BS2000", namely EBCDIC.  Yes, tcsh now runs on EBCDIC platforms, too.
985 
986 EBCDIC Table. (Yes, in EBCDIC, the letters 'a'..'z' are not contiguous!)
987 This table is bijective, i.e. there are no ambigous or duplicate characters
988 00    00 01 02 03 85 09 86 7f  87 8d 8e 0b 0c 0d 0e 0f  * ................ *
989 10    10 11 12 13 8f 0a 08 97  18 19 9c 9d 1c 1d 1e 1f  * ................ *
990 20    80 81 82 83 84 92 17 1b  88 89 8a 8b 8c 05 06 07  * ................ *
991 30    90 91 16 93 94 95 96 04  98 99 9a 9b 14 15 9e 1a  * ................ *
992 40    20 a0 e2 e4 e0 e1 e3 e5  e7 f1 60 2e 3c 28 2b 7c  *  .........`.<(+| *
993 50    26 e9 ea eb e8 ed ee ef  ec df 21 24 2a 29 3b 9f  * &.........!$*);. *
994 60    2d 2f c2 c4 c0 c1 c3 c5  c7 d1 5e 2c 25 5f 3e 3f  * -/........^,%_>? *
995 70    f8 c9 ca cb c8 cd ce cf  cc a8 3a 23 40 27 3d 22  * ..........:#@'=" *
996 80    d8 61 62 63 64 65 66 67  68 69 ab bb f0 fd fe b1  * .abcdefghi...... *
997 90    b0 6a 6b 6c 6d 6e 6f 70  71 72 aa ba e6 b8 c6 a4  * .jklmnopqr...... *
998 a0    b5 af 73 74 75 76 77 78  79 7a a1 bf d0 dd de ae  * ..stuvwxyz...... *
999 b0    a2 a3 a5 b7 a9 a7 b6 bc  bd be ac 5b 5c 5d b4 d7  * ...........[\].. *
1000 c0    f9 41 42 43 44 45 46 47  48 49 ad f4 f6 f2 f3 f5  * .ABCDEFGHI...... *
1001 d0    a6 4a 4b 4c 4d 4e 4f 50  51 52 b9 fb fc db fa ff  * .JKLMNOPQR...... *
1002 e0    d9 f7 53 54 55 56 57 58  59 5a b2 d4 d6 d2 d3 d5  * ..STUVWXYZ...... *
1003 f0    30 31 32 33 34 35 36 37  38 39 b3 7b dc 7d da 7e  * 0123456789.{.}.~ *
1004 */
1005 unsigned short _toascii[256] = {
1006 /*00*/ 0x00, 0x01, 0x02, 0x03, 0x85, 0x09, 0x86, 0x7f,
1007        0x87, 0x8d, 0x8e, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, /* ................ */
1008 /*10*/ 0x10, 0x11, 0x12, 0x13, 0x8f, 0x0a, 0x08, 0x97,
1009        0x18, 0x19, 0x9c, 0x9d, 0x1c, 0x1d, 0x1e, 0x1f, /* ................ */
1010 /*20*/ 0x80, 0x81, 0x82, 0x83, 0x84, 0x92, 0x17, 0x1b,
1011        0x88, 0x89, 0x8a, 0x8b, 0x8c, 0x05, 0x06, 0x07, /* ................ */
1012 /*30*/ 0x90, 0x91, 0x16, 0x93, 0x94, 0x95, 0x96, 0x04,
1013        0x98, 0x99, 0x9a, 0x9b, 0x14, 0x15, 0x9e, 0x1a, /* ................ */
1014 /*40*/ 0x20, 0xa0, 0xe2, 0xe4, 0xe0, 0xe1, 0xe3, 0xe5,
1015        0xe7, 0xf1, 0x60, 0x2e, 0x3c, 0x28, 0x2b, 0x7c, /* .........`.<(+|  */
1016 /*50*/ 0x26, 0xe9, 0xea, 0xeb, 0xe8, 0xed, 0xee, 0xef,
1017        0xec, 0xdf, 0x21, 0x24, 0x2a, 0x29, 0x3b, 0x9f, /* &.........!$*);. */
1018 /*60*/ 0x2d, 0x2f, 0xc2, 0xc4, 0xc0, 0xc1, 0xc3, 0xc5,
1019        0xc7, 0xd1, 0x5e, 0x2c, 0x25, 0x5f, 0x3e, 0x3f, /* -/........^,%_>? */
1020 /*70*/ 0xf8, 0xc9, 0xca, 0xcb, 0xc8, 0xcd, 0xce, 0xcf,
1021        0xcc, 0xa8, 0x3a, 0x23, 0x40, 0x27, 0x3d, 0x22, /* ..........:#@'=" */
1022 /*80*/ 0xd8, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67,
1023        0x68, 0x69, 0xab, 0xbb, 0xf0, 0xfd, 0xfe, 0xb1, /* .abcdefghi...... */
1024 /*90*/ 0xb0, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, 0x70,
1025        0x71, 0x72, 0xaa, 0xba, 0xe6, 0xb8, 0xc6, 0xa4, /* .jklmnopqr...... */
1026 /*a0*/ 0xb5, 0xaf, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78,
1027        0x79, 0x7a, 0xa1, 0xbf, 0xd0, 0xdd, 0xde, 0xae, /* ..stuvwxyz...... */
1028 /*b0*/ 0xa2, 0xa3, 0xa5, 0xb7, 0xa9, 0xa7, 0xb6, 0xbc,
1029        0xbd, 0xbe, 0xac, 0x5b, 0x5c, 0x5d, 0xb4, 0xd7, /* ...........[\].. */
1030 /*c0*/ 0xf9, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47,
1031        0x48, 0x49, 0xad, 0xf4, 0xf6, 0xf2, 0xf3, 0xf5, /* .ABCDEFGHI...... */
1032 /*d0*/ 0xa6, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f, 0x50,
1033        0x51, 0x52, 0xb9, 0xfb, 0xfc, 0xdb, 0xfa, 0xff, /* .JKLMNOPQR...... */
1034 /*e0*/ 0xd9, 0xf7, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58,
1035        0x59, 0x5a, 0xb2, 0xd4, 0xd6, 0xd2, 0xd3, 0xd5, /* ..STUVWXYZ...... */
1036 /*f0*/ 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37,
1037        0x38, 0x39, 0xb3, 0x7b, 0xdc, 0x7d, 0xda, 0x7e  /* 0123456789.{.}.~ */
1038 };
1039 /* The same, for ascii-in-ebcdic
1040 00    00 01 02 03 37 2d 2e 2f  16 05 15 0b 0c 0d 0e 0f  * ................ *
1041 10    10 11 12 13 3c 3d 32 26  18 19 3f 27 1c 1d 1e 1f  * ................ *
1042 20    40 5a 7f 7b 5b 6c 50 7d  4d 5d 5c 4e 6b 60 4b 61  *  !"#$%&'()*+,-./ *
1043 30    f0 f1 f2 f3 f4 f5 f6 f7  f8 f9 7a 5e 4c 7e 6e 6f  * 0123456789:;<=>? *
1044 40    7c c1 c2 c3 c4 c5 c6 c7  c8 c9 d1 d2 d3 d4 d5 d6  * @ABCDEFGHIJKLMNO *
1045 50    d7 d8 d9 e2 e3 e4 e5 e6  e7 e8 e9 bb bc bd 6a 6d  * PQRSTUVWXYZ[\]^_ *
1046 60    4a 81 82 83 84 85 86 87  88 89 91 92 93 94 95 96  * `abcdefghijklmno *
1047 70    97 98 99 a2 a3 a4 a5 a6  a7 a8 a9 fb 4f fd ff 07  * pqrstuvwxyz{|}~. *
1048 80    20 21 22 23 24 04 06 08  28 29 2a 2b 2c 09 0a 14  * ................ *
1049 90    30 31 25 33 34 35 36 17  38 39 3a 3b 1a 1b 3e 5f  * ................ *
1050 a0    41 aa b0 b1 9f b2 d0 b5  79 b4 9a 8a ba ca af a1  * ................ *
1051 b0    90 8f ea fa be a0 b6 b3  9d da 9b 8b b7 b8 b9 ab  * ................ *
1052 c0    64 65 62 66 63 67 9e 68  74 71 72 73 78 75 76 77  * ................ *
1053 d0    ac 69 ed ee eb ef ec bf  80 e0 fe dd fc ad ae 59  * ................ *
1054 e0    44 45 42 46 43 47 9c 48  54 51 52 53 58 55 56 57  * ................ *
1055 f0    8c 49 cd ce cb cf cc e1  70 c0 de db dc 8d 8e df  * ................ *
1056 */
1057 unsigned short _toebcdic[256] = {
1058 /*00*/  0x00, 0x01, 0x02, 0x03, 0x37, 0x2d, 0x2e, 0x2f,
1059 	0x16, 0x05, 0x15, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f,  /* ................ */
1060 /*10*/  0x10, 0x11, 0x12, 0x13, 0x3c, 0x3d, 0x32, 0x26,
1061 	0x18, 0x19, 0x3f, 0x27, 0x1c, 0x1d, 0x1e, 0x1f,  /* ................ */
1062 /*20*/  0x40, 0x5a, 0x7f, 0x7b, 0x5b, 0x6c, 0x50, 0x7d,
1063 	0x4d, 0x5d, 0x5c, 0x4e, 0x6b, 0x60, 0x4b, 0x61,  /*  !"#$%&'()*+,-./ */
1064 /*30*/  0xf0, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7,
1065 	0xf8, 0xf9, 0x7a, 0x5e, 0x4c, 0x7e, 0x6e, 0x6f,  /* 0123456789:;<=>? */
1066 /*40*/  0x7c, 0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7,
1067 	0xc8, 0xc9, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6,  /* @ABCDEFGHIJKLMNO */
1068 /*50*/  0xd7, 0xd8, 0xd9, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6,
1069 	0xe7, 0xe8, 0xe9, 0xbb, 0xbc, 0xbd, 0x6a, 0x6d,  /* PQRSTUVWXYZ[\]^_ */
1070 /*60*/  0x4a, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87,
1071 	0x88, 0x89, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96,  /* `abcdefghijklmno */
1072 /*70*/  0x97, 0x98, 0x99, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6,
1073 	0xa7, 0xa8, 0xa9, 0xfb, 0x4f, 0xfd, 0xff, 0x07,  /* pqrstuvwxyz{|}~. */
1074 /*80*/  0x20, 0x21, 0x22, 0x23, 0x24, 0x04, 0x06, 0x08,
1075 	0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x09, 0x0a, 0x14,  /* ................ */
1076 /*90*/  0x30, 0x31, 0x25, 0x33, 0x34, 0x35, 0x36, 0x17,
1077 	0x38, 0x39, 0x3a, 0x3b, 0x1a, 0x1b, 0x3e, 0x5f,  /* ................ */
1078 /*a0*/  0x41, 0xaa, 0xb0, 0xb1, 0x9f, 0xb2, 0xd0, 0xb5,
1079 	0x79, 0xb4, 0x9a, 0x8a, 0xba, 0xca, 0xaf, 0xa1,  /* ................ */
1080 /*b0*/  0x90, 0x8f, 0xea, 0xfa, 0xbe, 0xa0, 0xb6, 0xb3,
1081 	0x9d, 0xda, 0x9b, 0x8b, 0xb7, 0xb8, 0xb9, 0xab,  /* ................ */
1082 /*c0*/  0x64, 0x65, 0x62, 0x66, 0x63, 0x67, 0x9e, 0x68,
1083 	0x74, 0x71, 0x72, 0x73, 0x78, 0x75, 0x76, 0x77,  /* ................ */
1084 /*d0*/  0xac, 0x69, 0xed, 0xee, 0xeb, 0xef, 0xec, 0xbf,
1085 	0x80, 0xe0, 0xfe, 0xdd, 0xfc, 0xad, 0xae, 0x59,  /* ................ */
1086 /*e0*/  0x44, 0x45, 0x42, 0x46, 0x43, 0x47, 0x9c, 0x48,
1087 	0x54, 0x51, 0x52, 0x53, 0x58, 0x55, 0x56, 0x57,  /* ................ */
1088 /*f0*/  0x8c, 0x49, 0xcd, 0xce, 0xcb, 0xcf, 0xcc, 0xe1,
1089 	0x70, 0xc0, 0xde, 0xdb, 0xdc, 0x8d, 0x8e, 0xdf   /* ................ */
1090 };
1091 
1092 #endif /*_OSD_POSIX*/
1093 
1094 #ifdef __MVS__
1095 /*
1096    The IBM 1047 coded char set to/from ISO 8859-1 mapping differs from
1097    the POSIX-BC mapping in several places
1098  */
1099 unsigned short _toascii[256] = {
1100       0x00, 0x01, 0x02, 0x03, 0x9c, 0x09, 0x86, 0x7f,
1101       0x97, 0x8d, 0x8e, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f,
1102       0x10, 0x11, 0x12, 0x13, 0x9d, 0x0a, 0x08, 0x87,
1103       0x18, 0x19, 0x92, 0x8f, 0x1c, 0x1d, 0x1e, 0x1f,
1104       0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x17, 0x1b,
1105       0x88, 0x89, 0x8a, 0x8b, 0x8c, 0x05, 0x06, 0x07,
1106       0x90, 0x91, 0x16, 0x93, 0x94, 0x95, 0x96, 0x04,
1107       0x98, 0x99, 0x9a, 0x9b, 0x14, 0x15, 0x9e, 0x1a,
1108       0x20, 0xa0, 0xe2, 0xe4, 0xe0, 0xe1, 0xe3, 0xe5,
1109       0xe7, 0xf1, 0xa2, 0x2e, 0x3c, 0x28, 0x2b, 0x7c,
1110       0x26, 0xe9, 0xea, 0xeb, 0xe8, 0xed, 0xee, 0xef,
1111       0xec, 0xdf, 0x21, 0x24, 0x2a, 0x29, 0x3b, 0x5e,
1112       0x2d, 0x2f, 0xc2, 0xc4, 0xc0, 0xc1, 0xc3, 0xc5,
1113       0xc7, 0xd1, 0xa6, 0x2c, 0x25, 0x5f, 0x3e, 0x3f,
1114       0xf8, 0xc9, 0xca, 0xcb, 0xc8, 0xcd, 0xce, 0xcf,
1115       0xcc, 0x60, 0x3a, 0x23, 0x40, 0x27, 0x3d, 0x22,
1116       0xd8, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67,
1117       0x68, 0x69, 0xab, 0xbb, 0xf0, 0xfd, 0xfe, 0xb1,
1118       0xb0, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, 0x70,
1119       0x71, 0x72, 0xaa, 0xba, 0xe6, 0xb8, 0xc6, 0xa4,
1120       0xb5, 0x7e, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78,
1121       0x79, 0x7a, 0xa1, 0xbf, 0xd0, 0x5b, 0xde, 0xae,
1122       0xac, 0xa3, 0xa5, 0xb7, 0xa9, 0xa7, 0xb6, 0xbc,
1123       0xbd, 0xbe, 0xdd, 0xa8, 0xaf, 0x5d, 0xb4, 0xd7,
1124       0x7b, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47,
1125       0x48, 0x49, 0xad, 0xf4, 0xf6, 0xf2, 0xf3, 0xf5,
1126       0x7d, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f, 0x50,
1127       0x51, 0x52, 0xb9, 0xfb, 0xfc, 0xf9, 0xfa, 0xff,
1128       0x5c, 0xf7, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58,
1129       0x59, 0x5a, 0xb2, 0xd4, 0xd6, 0xd2, 0xd3, 0xd5,
1130       0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37,
1131       0x38, 0x39, 0xb3, 0xdb, 0xdc, 0xd9, 0xda, 0x9f,
1132 };
1133 unsigned short _toebcdic[256] = {
1134       0x00, 0x01, 0x02, 0x03, 0x37, 0x2d, 0x2e, 0x2f,
1135       0x16, 0x05, 0x15, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f,
1136       0x10, 0x11, 0x12, 0x13, 0x3c, 0x3d, 0x32, 0x26,
1137       0x18, 0x19, 0x3f, 0x27, 0x1c, 0x1d, 0x1e, 0x1f,
1138       0x40, 0x5a, 0x7f, 0x7b, 0x5b, 0x6c, 0x50, 0x7d,
1139       0x4d, 0x5d, 0x5c, 0x4e, 0x6b, 0x60, 0x4b, 0x61,
1140       0xf0, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7,
1141       0xf8, 0xf9, 0x7a, 0x5e, 0x4c, 0x7e, 0x6e, 0x6f,
1142       0x7c, 0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7,
1143       0xc8, 0xc9, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6,
1144       0xd7, 0xd8, 0xd9, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6,
1145       0xe7, 0xe8, 0xe9, 0xad, 0xe0, 0xbd, 0x5f, 0x6d,
1146       0x79, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87,
1147       0x88, 0x89, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96,
1148       0x97, 0x98, 0x99, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6,
1149       0xa7, 0xa8, 0xa9, 0xc0, 0x4f, 0xd0, 0xa1, 0x07,
1150       0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x06, 0x17,
1151       0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x09, 0x0a, 0x1b,
1152       0x30, 0x31, 0x1a, 0x33, 0x34, 0x35, 0x36, 0x08,
1153       0x38, 0x39, 0x3a, 0x3b, 0x04, 0x14, 0x3e, 0xff,
1154       0x41, 0xaa, 0x4a, 0xb1, 0x9f, 0xb2, 0x6a, 0xb5,
1155       0xbb, 0xb4, 0x9a, 0x8a, 0xb0, 0xca, 0xaf, 0xbc,
1156       0x90, 0x8f, 0xea, 0xfa, 0xbe, 0xa0, 0xb6, 0xb3,
1157       0x9d, 0xda, 0x9b, 0x8b, 0xb7, 0xb8, 0xb9, 0xab,
1158       0x64, 0x65, 0x62, 0x66, 0x63, 0x67, 0x9e, 0x68,
1159       0x74, 0x71, 0x72, 0x73, 0x78, 0x75, 0x76, 0x77,
1160       0xac, 0x69, 0xed, 0xee, 0xeb, 0xef, 0xec, 0xbf,
1161       0x80, 0xfd, 0xfe, 0xfb, 0xfc, 0xba, 0xae, 0x59,
1162       0x44, 0x45, 0x42, 0x46, 0x43, 0x47, 0x9c, 0x48,
1163       0x54, 0x51, 0x52, 0x53, 0x58, 0x55, 0x56, 0x57,
1164       0x8c, 0x49, 0xcd, 0xce, 0xcb, 0xcf, 0xcc, 0xe1,
1165       0x70, 0xdd, 0xde, 0xdb, 0xdc, 0x8d, 0x8e, 0xdf
1166 };
1167 #endif /*__MVS__*/
1168