PageRenderTime 170ms CodeModel.GetById 91ms app.highlight 64ms RepoModel.GetById 1ms app.codeStats 0ms

/contrib/tcsh/sh.char.c

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