sh.char.c revision 59243
159243Sobrien/* $Header: /src/pub/tcsh/sh.char.c,v 3.12 1998/09/18 16:09:06 christos Exp $ */ 259243Sobrien/* 359243Sobrien * sh.char.c: Character classification tables 459243Sobrien */ 559243Sobrien/*- 659243Sobrien * Copyright (c) 1980, 1991 The Regents of the University of California. 759243Sobrien * All rights reserved. 859243Sobrien * 959243Sobrien * Redistribution and use in source and binary forms, with or without 1059243Sobrien * modification, are permitted provided that the following conditions 1159243Sobrien * are met: 1259243Sobrien * 1. Redistributions of source code must retain the above copyright 1359243Sobrien * notice, this list of conditions and the following disclaimer. 1459243Sobrien * 2. Redistributions in binary form must reproduce the above copyright 1559243Sobrien * notice, this list of conditions and the following disclaimer in the 1659243Sobrien * documentation and/or other materials provided with the distribution. 1759243Sobrien * 3. All advertising materials mentioning features or use of this software 1859243Sobrien * must display the following acknowledgement: 1959243Sobrien * This product includes software developed by the University of 2059243Sobrien * California, Berkeley and its contributors. 2159243Sobrien * 4. Neither the name of the University nor the names of its contributors 2259243Sobrien * may be used to endorse or promote products derived from this software 2359243Sobrien * without specific prior written permission. 2459243Sobrien * 2559243Sobrien * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 2659243Sobrien * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 2759243Sobrien * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 2859243Sobrien * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 2959243Sobrien * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 3059243Sobrien * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 3159243Sobrien * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 3259243Sobrien * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 3359243Sobrien * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 3459243Sobrien * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 3559243Sobrien * SUCH DAMAGE. 3659243Sobrien */ 3759243Sobrien#include "sh.h" 3859243Sobrien 3959243SobrienRCSID("$Id: sh.char.c,v 3.12 1998/09/18 16:09:06 christos Exp $") 4059243Sobrien 4159243Sobrien#include "sh.char.h" 4259243Sobrien 4359243Sobrien#if defined(KANJI) && defined(SHORT_STRINGS) && defined(DSPMBYTE) 4459243Sobrien/* on default same as original map */ 4559243Sobrienunsigned short _cmap[256] = { 4659243Sobrien/* 0 nul 1 soh 2 stx 3 etx */ 4759243Sobrien _CTR, _CTR, _CTR, _CTR, 4859243Sobrien 4959243Sobrien/* 4 eot 5 enq 6 ack 7 bel */ 5059243Sobrien _CTR, _CTR, _CTR, _CTR, 5159243Sobrien 5259243Sobrien/* 8 bs 9 ht 10 nl 11 vt */ 5359243Sobrien _CTR, _CTR|_SP|_META, _CTR|_NL|_META, _CTR, 5459243Sobrien 5559243Sobrien/* 12 np 13 cr 14 so 15 si */ 5659243Sobrien _CTR, _CTR, _CTR, _CTR, 5759243Sobrien 5859243Sobrien/* 16 dle 17 dc1 18 dc2 19 dc3 */ 5959243Sobrien _CTR, _CTR, _CTR, _CTR, 6059243Sobrien 6159243Sobrien/* 20 dc4 21 nak 22 syn 23 etb */ 6259243Sobrien _CTR, _CTR, _CTR, _CTR, 6359243Sobrien 6459243Sobrien/* 24 can 25 em 26 sub 27 esc */ 6559243Sobrien _CTR, _CTR, _CTR, _CTR, 6659243Sobrien 6759243Sobrien/* 28 fs 29 gs 30 rs 31 us */ 6859243Sobrien _CTR, _CTR, _CTR, _CTR, 6959243Sobrien 7059243Sobrien/* 32 sp 33 ! 34 " 35 # */ 7159243Sobrien _SP|_META, _PUN, _QF|_PUN, _META|_PUN, 7259243Sobrien 7359243Sobrien/* 36 $ 37 % 38 & 39 ' */ 7459243Sobrien _DOL|_PUN, _PUN, _META|_CMD|_PUN,_QF|_PUN, 7559243Sobrien 7659243Sobrien/* 40 ( 41 ) 42 * 43 + */ 7759243Sobrien _META|_CMD|_PUN,_META|_PUN, _GLOB|_PUN, _PUN, 7859243Sobrien 7959243Sobrien/* 44 , 45 - 46 . 47 / */ 8059243Sobrien _PUN, _PUN, _PUN, _PUN, 8159243Sobrien 8259243Sobrien/* 48 0 49 1 50 2 51 3 */ 8359243Sobrien _DIG|_XD, _DIG|_XD, _DIG|_XD, _DIG|_XD, 8459243Sobrien 8559243Sobrien/* 52 4 53 5 54 6 55 7 */ 8659243Sobrien _DIG|_XD, _DIG|_XD, _DIG|_XD, _DIG|_XD, 8759243Sobrien 8859243Sobrien/* 56 8 57 9 58 : 59 ; */ 8959243Sobrien _DIG|_XD, _DIG|_XD, _PUN, _META|_CMD|_PUN, 9059243Sobrien 9159243Sobrien/* 60 < 61 = 62 > 63 ? */ 9259243Sobrien _META|_PUN, _PUN, _META|_PUN, _GLOB|_PUN, 9359243Sobrien 9459243Sobrien/* 64 @ 65 A 66 B 67 C */ 9559243Sobrien _PUN, _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP|_XD, 9659243Sobrien 9759243Sobrien/* 68 D 69 E 70 F 71 G */ 9859243Sobrien _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP, 9959243Sobrien 10059243Sobrien/* 72 H 73 I 74 J 75 K */ 10159243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 10259243Sobrien 10359243Sobrien/* 76 L 77 M 78 N 79 O */ 10459243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 10559243Sobrien 10659243Sobrien/* 80 P 81 Q 82 R 83 S */ 10759243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 10859243Sobrien 10959243Sobrien/* 84 T 85 U 86 V 87 W */ 11059243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 11159243Sobrien 11259243Sobrien/* 88 X 89 Y 90 Z 91 [ */ 11359243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _GLOB|_PUN, 11459243Sobrien 11559243Sobrien/* 92 \ 93 ] 94 ^ 95 _ */ 11659243Sobrien _ESC|_PUN, _PUN, _PUN, _PUN, 11759243Sobrien 11859243Sobrien/* 96 ` 97 a 98 b 99 c */ 11959243Sobrien _QB|_GLOB|_META|_PUN, _LET|_DOW|_XD, _LET|_DOW|_XD, _LET|_DOW|_XD, 12059243Sobrien 12159243Sobrien/* 100 d 101 e 102 f 103 g */ 12259243Sobrien _LET|_DOW|_XD, _LET|_DOW|_XD, _LET|_DOW|_XD, _LET|_DOW, 12359243Sobrien 12459243Sobrien/* 104 h 105 i 106 j 107 k */ 12559243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 12659243Sobrien 12759243Sobrien/* 108 l 109 m 110 n 111 o */ 12859243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 12959243Sobrien 13059243Sobrien/* 112 p 113 q 114 r 115 s */ 13159243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 13259243Sobrien 13359243Sobrien/* 116 t 117 u 118 v 119 w */ 13459243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 13559243Sobrien 13659243Sobrien/* 120 x 121 y 122 z 123 { */ 13759243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _GLOB|_PUN, 13859243Sobrien 13959243Sobrien/* 124 | 125 } 126 ~ 127 del */ 14059243Sobrien _META|_CMD|_PUN,_PUN, _PUN, _CTR, 14159243Sobrien 14259243Sobrien/****************************************************************/ 14359243Sobrien/* 128 - 255 The below is supposedly ISO 8859/1 */ 14459243Sobrien/****************************************************************/ 14559243Sobrien/* 128 (undef) 129 (undef) 130 (undef) 131 (undef) */ 14659243Sobrien _CTR, _CTR, _CTR, _CTR, 14759243Sobrien 14859243Sobrien/* 132 (undef) 133 (undef) 134 (undef) 135 (undef) */ 14959243Sobrien _CTR, _CTR, _CTR, _CTR, 15059243Sobrien 15159243Sobrien/* 136 (undef) 137 (undef) 138 (undef) 139 (undef) */ 15259243Sobrien _CTR, _CTR, _CTR, _CTR, 15359243Sobrien 15459243Sobrien/* 140 (undef) 141 (undef) 142 (undef) 143 (undef) */ 15559243Sobrien _CTR, _CTR, _CTR, _CTR, 15659243Sobrien 15759243Sobrien/* 144 (undef) 145 (undef) 146 (undef) 147 (undef) */ 15859243Sobrien _CTR, _CTR, _CTR, _CTR, 15959243Sobrien 16059243Sobrien/* 148 (undef) 149 (undef) 150 (undef) 151 (undef) */ 16159243Sobrien _CTR, _CTR, _CTR, _CTR, 16259243Sobrien 16359243Sobrien/* 152 (undef) 153 (undef) 154 (undef) 155 (undef) */ 16459243Sobrien _CTR, _CTR, _CTR, _CTR, 16559243Sobrien 16659243Sobrien/* 156 (undef) 157 (undef) 158 (undef) 159 (undef) */ 16759243Sobrien _CTR, _CTR, _CTR, _CTR, 16859243Sobrien 16959243Sobrien/* 160 nobreakspace 161 exclamdown 162 cent 163 sterling */ 17059243Sobrien _PUN, /* XXX */ _PUN, _PUN, _PUN, 17159243Sobrien 17259243Sobrien/* 164 currency 165 yen 166 brokenbar 167 section */ 17359243Sobrien _PUN, _PUN, _PUN, _PUN, 17459243Sobrien 17559243Sobrien/* 168 diaeresis 169 copyright 170 ordfeminine 171 guillemotleft*/ 17659243Sobrien _PUN, _PUN, _PUN, _PUN, 17759243Sobrien 17859243Sobrien/* 172 notsign 173 hyphen 174 registered 175 macron */ 17959243Sobrien _PUN, _PUN, _PUN, _PUN, 18059243Sobrien 18159243Sobrien/* 176 degree 177 plusminus 178 twosuperior 179 threesuperior*/ 18259243Sobrien _PUN, _PUN, _PUN, _PUN, 18359243Sobrien 18459243Sobrien/* 180 acute 181 mu 182 paragraph 183 periodcentered*/ 18559243Sobrien _PUN, _PUN, /*XXX*/ _PUN, _PUN, 18659243Sobrien 18759243Sobrien/* 184 cedilla 185 onesuperior 186 masculine 187 guillemotright*/ 18859243Sobrien _PUN, _PUN, _PUN, _PUN, 18959243Sobrien 19059243Sobrien/* 188 onequarter 189 onehalf 190 threequarters 191 questiondown*/ 19159243Sobrien _PUN, _PUN, _PUN, _PUN, 19259243Sobrien 19359243Sobrien/* 192 Agrave 193 Aacute 194 Acircumflex 195 Atilde */ 19459243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 19559243Sobrien 19659243Sobrien/* 196 Adiaeresis 197 Aring 198 AE 199 Ccedilla */ 19759243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 19859243Sobrien 19959243Sobrien/* 200 Egrave 201 Eacute 202 Ecircumflex 203 Ediaeresis */ 20059243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 20159243Sobrien 20259243Sobrien/* 204 Igrave 205 Iacute 206 Icircumflex 207 Idiaeresis */ 20359243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 20459243Sobrien 20559243Sobrien/* 208 ETH 209 Ntilde 210 Ograve 211 Oacute */ 20659243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 20759243Sobrien 20859243Sobrien/* 212 Ocircumflex 213 Otilde 214 Odiaeresis 215 multiply */ 20959243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _PUN, 21059243Sobrien 21159243Sobrien/* 216 Ooblique 217 Ugrave 218 Uacute 219 Ucircumflex */ 21259243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 21359243Sobrien 21459243Sobrien/* 220 Udiaeresis 221 Yacute 222 THORN 223 ssharp */ 21559243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_DOW, 21659243Sobrien 21759243Sobrien/* 224 agrave 225 aacute 226 acircumflex 227 atilde */ 21859243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 21959243Sobrien 22059243Sobrien/* 228 adiaeresis 229 aring 230 ae 231 ccedilla */ 22159243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 22259243Sobrien 22359243Sobrien/* 232 egrave 233 eacute 234 ecircumflex 235 ediaeresis */ 22459243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 22559243Sobrien 22659243Sobrien/* 236 igrave 237 iacute 238 icircumflex 239 idiaeresis */ 22759243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 22859243Sobrien 22959243Sobrien/* 240 eth 241 ntilde 242 ograve 243 oacute */ 23059243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 23159243Sobrien 23259243Sobrien/* 244 ocircumflex 245 otilde 246 odiaeresis 247 division */ 23359243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _PUN, 23459243Sobrien 23559243Sobrien/* 248 oslash 249 ugrave 250 uacute 251 ucircumflex */ 23659243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 23759243Sobrien 23859243Sobrien/* 252 udiaeresis 253 yacute 254 thorn 255 ydiaeresis */ 23959243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 24059243Sobrien}; 24159243Sobrien/* original table */ 24259243Sobrienunsigned short _cmap_c[256] = { 24359243Sobrien/* 0 nul 1 soh 2 stx 3 etx */ 24459243Sobrien _CTR, _CTR, _CTR, _CTR, 24559243Sobrien 24659243Sobrien/* 4 eot 5 enq 6 ack 7 bel */ 24759243Sobrien _CTR, _CTR, _CTR, _CTR, 24859243Sobrien 24959243Sobrien/* 8 bs 9 ht 10 nl 11 vt */ 25059243Sobrien _CTR, _CTR|_SP|_META, _CTR|_NL|_META, _CTR, 25159243Sobrien 25259243Sobrien/* 12 np 13 cr 14 so 15 si */ 25359243Sobrien _CTR, _CTR, _CTR, _CTR, 25459243Sobrien 25559243Sobrien/* 16 dle 17 dc1 18 dc2 19 dc3 */ 25659243Sobrien _CTR, _CTR, _CTR, _CTR, 25759243Sobrien 25859243Sobrien/* 20 dc4 21 nak 22 syn 23 etb */ 25959243Sobrien _CTR, _CTR, _CTR, _CTR, 26059243Sobrien 26159243Sobrien/* 24 can 25 em 26 sub 27 esc */ 26259243Sobrien _CTR, _CTR, _CTR, _CTR, 26359243Sobrien 26459243Sobrien/* 28 fs 29 gs 30 rs 31 us */ 26559243Sobrien _CTR, _CTR, _CTR, _CTR, 26659243Sobrien 26759243Sobrien/* 32 sp 33 ! 34 " 35 # */ 26859243Sobrien _SP|_META, _PUN, _QF|_PUN, _META|_PUN, 26959243Sobrien 27059243Sobrien/* 36 $ 37 % 38 & 39 ' */ 27159243Sobrien _DOL|_PUN, _PUN, _META|_CMD|_PUN,_QF|_PUN, 27259243Sobrien 27359243Sobrien/* 40 ( 41 ) 42 * 43 + */ 27459243Sobrien _META|_CMD|_PUN,_META|_PUN, _GLOB|_PUN, _PUN, 27559243Sobrien 27659243Sobrien/* 44 , 45 - 46 . 47 / */ 27759243Sobrien _PUN, _PUN, _PUN, _PUN, 27859243Sobrien 27959243Sobrien/* 48 0 49 1 50 2 51 3 */ 28059243Sobrien _DIG|_XD, _DIG|_XD, _DIG|_XD, _DIG|_XD, 28159243Sobrien 28259243Sobrien/* 52 4 53 5 54 6 55 7 */ 28359243Sobrien _DIG|_XD, _DIG|_XD, _DIG|_XD, _DIG|_XD, 28459243Sobrien 28559243Sobrien/* 56 8 57 9 58 : 59 ; */ 28659243Sobrien _DIG|_XD, _DIG|_XD, _PUN, _META|_CMD|_PUN, 28759243Sobrien 28859243Sobrien/* 60 < 61 = 62 > 63 ? */ 28959243Sobrien _META|_PUN, _PUN, _META|_PUN, _GLOB|_PUN, 29059243Sobrien 29159243Sobrien/* 64 @ 65 A 66 B 67 C */ 29259243Sobrien _PUN, _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP|_XD, 29359243Sobrien 29459243Sobrien/* 68 D 69 E 70 F 71 G */ 29559243Sobrien _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP, 29659243Sobrien 29759243Sobrien/* 72 H 73 I 74 J 75 K */ 29859243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 29959243Sobrien 30059243Sobrien/* 76 L 77 M 78 N 79 O */ 30159243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 30259243Sobrien 30359243Sobrien/* 80 P 81 Q 82 R 83 S */ 30459243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 30559243Sobrien 30659243Sobrien/* 84 T 85 U 86 V 87 W */ 30759243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 30859243Sobrien 30959243Sobrien/* 88 X 89 Y 90 Z 91 [ */ 31059243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _GLOB|_PUN, 31159243Sobrien 31259243Sobrien/* 92 \ 93 ] 94 ^ 95 _ */ 31359243Sobrien _ESC|_PUN, _PUN, _PUN, _PUN, 31459243Sobrien 31559243Sobrien/* 96 ` 97 a 98 b 99 c */ 31659243Sobrien _QB|_GLOB|_META|_PUN, _LET|_DOW|_XD, _LET|_DOW|_XD, _LET|_DOW|_XD, 31759243Sobrien 31859243Sobrien/* 100 d 101 e 102 f 103 g */ 31959243Sobrien _LET|_DOW|_XD, _LET|_DOW|_XD, _LET|_DOW|_XD, _LET|_DOW, 32059243Sobrien 32159243Sobrien/* 104 h 105 i 106 j 107 k */ 32259243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 32359243Sobrien 32459243Sobrien/* 108 l 109 m 110 n 111 o */ 32559243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 32659243Sobrien 32759243Sobrien/* 112 p 113 q 114 r 115 s */ 32859243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 32959243Sobrien 33059243Sobrien/* 116 t 117 u 118 v 119 w */ 33159243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 33259243Sobrien 33359243Sobrien/* 120 x 121 y 122 z 123 { */ 33459243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _GLOB|_PUN, 33559243Sobrien 33659243Sobrien/* 124 | 125 } 126 ~ 127 del */ 33759243Sobrien _META|_CMD|_PUN,_PUN, _PUN, _CTR, 33859243Sobrien 33959243Sobrien/****************************************************************/ 34059243Sobrien/* 128 - 255 The below is supposedly ISO 8859/1 */ 34159243Sobrien/****************************************************************/ 34259243Sobrien/* 128 (undef) 129 (undef) 130 (undef) 131 (undef) */ 34359243Sobrien _CTR, _CTR, _CTR, _CTR, 34459243Sobrien 34559243Sobrien/* 132 (undef) 133 (undef) 134 (undef) 135 (undef) */ 34659243Sobrien _CTR, _CTR, _CTR, _CTR, 34759243Sobrien 34859243Sobrien/* 136 (undef) 137 (undef) 138 (undef) 139 (undef) */ 34959243Sobrien _CTR, _CTR, _CTR, _CTR, 35059243Sobrien 35159243Sobrien/* 140 (undef) 141 (undef) 142 (undef) 143 (undef) */ 35259243Sobrien _CTR, _CTR, _CTR, _CTR, 35359243Sobrien 35459243Sobrien/* 144 (undef) 145 (undef) 146 (undef) 147 (undef) */ 35559243Sobrien _CTR, _CTR, _CTR, _CTR, 35659243Sobrien 35759243Sobrien/* 148 (undef) 149 (undef) 150 (undef) 151 (undef) */ 35859243Sobrien _CTR, _CTR, _CTR, _CTR, 35959243Sobrien 36059243Sobrien/* 152 (undef) 153 (undef) 154 (undef) 155 (undef) */ 36159243Sobrien _CTR, _CTR, _CTR, _CTR, 36259243Sobrien 36359243Sobrien/* 156 (undef) 157 (undef) 158 (undef) 159 (undef) */ 36459243Sobrien _CTR, _CTR, _CTR, _CTR, 36559243Sobrien 36659243Sobrien/* 160 nobreakspace 161 exclamdown 162 cent 163 sterling */ 36759243Sobrien _PUN, /* XXX */ _PUN, _PUN, _PUN, 36859243Sobrien 36959243Sobrien/* 164 currency 165 yen 166 brokenbar 167 section */ 37059243Sobrien _PUN, _PUN, _PUN, _PUN, 37159243Sobrien 37259243Sobrien/* 168 diaeresis 169 copyright 170 ordfeminine 171 guillemotleft*/ 37359243Sobrien _PUN, _PUN, _PUN, _PUN, 37459243Sobrien 37559243Sobrien/* 172 notsign 173 hyphen 174 registered 175 macron */ 37659243Sobrien _PUN, _PUN, _PUN, _PUN, 37759243Sobrien 37859243Sobrien/* 176 degree 177 plusminus 178 twosuperior 179 threesuperior*/ 37959243Sobrien _PUN, _PUN, _PUN, _PUN, 38059243Sobrien 38159243Sobrien/* 180 acute 181 mu 182 paragraph 183 periodcentered*/ 38259243Sobrien _PUN, _PUN, /*XXX*/ _PUN, _PUN, 38359243Sobrien 38459243Sobrien/* 184 cedilla 185 onesuperior 186 masculine 187 guillemotright*/ 38559243Sobrien _PUN, _PUN, _PUN, _PUN, 38659243Sobrien 38759243Sobrien/* 188 onequarter 189 onehalf 190 threequarters 191 questiondown*/ 38859243Sobrien _PUN, _PUN, _PUN, _PUN, 38959243Sobrien 39059243Sobrien/* 192 Agrave 193 Aacute 194 Acircumflex 195 Atilde */ 39159243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 39259243Sobrien 39359243Sobrien/* 196 Adiaeresis 197 Aring 198 AE 199 Ccedilla */ 39459243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 39559243Sobrien 39659243Sobrien/* 200 Egrave 201 Eacute 202 Ecircumflex 203 Ediaeresis */ 39759243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 39859243Sobrien 39959243Sobrien/* 204 Igrave 205 Iacute 206 Icircumflex 207 Idiaeresis */ 40059243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 40159243Sobrien 40259243Sobrien/* 208 ETH 209 Ntilde 210 Ograve 211 Oacute */ 40359243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 40459243Sobrien 40559243Sobrien/* 212 Ocircumflex 213 Otilde 214 Odiaeresis 215 multiply */ 40659243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _PUN, 40759243Sobrien 40859243Sobrien/* 216 Ooblique 217 Ugrave 218 Uacute 219 Ucircumflex */ 40959243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 41059243Sobrien 41159243Sobrien/* 220 Udiaeresis 221 Yacute 222 THORN 223 ssharp */ 41259243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_DOW, 41359243Sobrien 41459243Sobrien/* 224 agrave 225 aacute 226 acircumflex 227 atilde */ 41559243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 41659243Sobrien 41759243Sobrien/* 228 adiaeresis 229 aring 230 ae 231 ccedilla */ 41859243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 41959243Sobrien 42059243Sobrien/* 232 egrave 233 eacute 234 ecircumflex 235 ediaeresis */ 42159243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 42259243Sobrien 42359243Sobrien/* 236 igrave 237 iacute 238 icircumflex 239 idiaeresis */ 42459243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 42559243Sobrien 42659243Sobrien/* 240 eth 241 ntilde 242 ograve 243 oacute */ 42759243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 42859243Sobrien 42959243Sobrien/* 244 ocircumflex 245 otilde 246 odiaeresis 247 division */ 43059243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _PUN, 43159243Sobrien 43259243Sobrien/* 248 oslash 249 ugrave 250 uacute 251 ucircumflex */ 43359243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 43459243Sobrien 43559243Sobrien/* 252 udiaeresis 253 yacute 254 thorn 255 ydiaeresis */ 43659243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 43759243Sobrien}; 43859243Sobrien 43959243Sobrien/* multi-byte table */ 44059243Sobrien/* BY Masaaki Koyanagi VERY THANKS */ 44159243Sobrienunsigned short _cmap_mbyte[256] = { 44259243Sobrien/* 0 nul 1 soh 2 stx 3 etx */ 44359243Sobrien _CTR, _CTR, _CTR, _CTR, 44459243Sobrien 44559243Sobrien/* 4 eot 5 enq 6 ack 7 bel */ 44659243Sobrien _CTR, _CTR, _CTR, _CTR, 44759243Sobrien 44859243Sobrien/* 8 bs 9 ht 10 nl 11 vt */ 44959243Sobrien _CTR, _CTR|_SP|_META, _CTR|_NL|_META, _CTR, 45059243Sobrien 45159243Sobrien/* 12 np 13 cr 14 so 15 si */ 45259243Sobrien _CTR, _CTR, _CTR, _CTR, 45359243Sobrien 45459243Sobrien/* 16 dle 17 dc1 18 dc2 19 dc3 */ 45559243Sobrien _CTR, _CTR, _CTR, _CTR, 45659243Sobrien 45759243Sobrien/* 20 dc4 21 nak 22 syn 23 etb */ 45859243Sobrien _CTR, _CTR, _CTR, _CTR, 45959243Sobrien 46059243Sobrien/* 24 can 25 em 26 sub 27 esc */ 46159243Sobrien _CTR, _CTR, _CTR, _CTR, 46259243Sobrien 46359243Sobrien/* 28 fs 29 gs 30 rs 31 us */ 46459243Sobrien _CTR, _CTR, _CTR, _CTR, 46559243Sobrien 46659243Sobrien/* 32 sp 33 ! 34 " 35 # */ 46759243Sobrien _SP|_META, _PUN, _QF|_PUN, _META|_PUN, 46859243Sobrien 46959243Sobrien/* 36 $ 37 % 38 & 39 ' */ 47059243Sobrien _DOL|_PUN, _PUN, _META|_CMD|_PUN,_QF|_PUN, 47159243Sobrien 47259243Sobrien/* 40 ( 41 ) 42 * 43 + */ 47359243Sobrien _META|_CMD|_PUN,_META|_PUN, _GLOB|_PUN, _PUN, 47459243Sobrien 47559243Sobrien/* 44 , 45 - 46 . 47 / */ 47659243Sobrien _PUN, _PUN, _PUN, _PUN, 47759243Sobrien 47859243Sobrien/* 48 0 49 1 50 2 51 3 */ 47959243Sobrien _DIG|_XD, _DIG|_XD, _DIG|_XD, _DIG|_XD, 48059243Sobrien 48159243Sobrien/* 52 4 53 5 54 6 55 7 */ 48259243Sobrien _DIG|_XD, _DIG|_XD, _DIG|_XD, _DIG|_XD, 48359243Sobrien 48459243Sobrien/* 56 8 57 9 58 : 59 ; */ 48559243Sobrien _DIG|_XD, _DIG|_XD, _PUN, _META|_CMD|_PUN, 48659243Sobrien 48759243Sobrien/* 60 < 61 = 62 > 63 ? */ 48859243Sobrien _META|_PUN, _PUN, _META|_PUN, _GLOB|_PUN, 48959243Sobrien 49059243Sobrien/* 64 @ 65 A 66 B 67 C */ 49159243Sobrien _PUN, _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP|_XD, 49259243Sobrien 49359243Sobrien/* 68 D 69 E 70 F 71 G */ 49459243Sobrien _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP, 49559243Sobrien 49659243Sobrien/* 72 H 73 I 74 J 75 K */ 49759243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 49859243Sobrien 49959243Sobrien/* 76 L 77 M 78 N 79 O */ 50059243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 50159243Sobrien 50259243Sobrien/* 80 P 81 Q 82 R 83 S */ 50359243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 50459243Sobrien 50559243Sobrien/* 84 T 85 U 86 V 87 W */ 50659243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 50759243Sobrien 50859243Sobrien/* 88 X 89 Y 90 Z 91 [ */ 50959243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _GLOB|_PUN, 51059243Sobrien 51159243Sobrien/* 92 \ 93 ] 94 ^ 95 _ */ 51259243Sobrien _ESC|_PUN, _PUN, _PUN, _PUN, 51359243Sobrien 51459243Sobrien/* 96 ` 97 a 98 b 99 c */ 51559243Sobrien _QB|_GLOB|_META|_PUN, _LET|_DOW|_XD, _LET|_DOW|_XD, _LET|_DOW|_XD, 51659243Sobrien 51759243Sobrien/* 100 d 101 e 102 f 103 g */ 51859243Sobrien _LET|_DOW|_XD, _LET|_DOW|_XD, _LET|_DOW|_XD, _LET|_DOW, 51959243Sobrien 52059243Sobrien/* 104 h 105 i 106 j 107 k */ 52159243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 52259243Sobrien 52359243Sobrien/* 108 l 109 m 110 n 111 o */ 52459243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 52559243Sobrien 52659243Sobrien/* 112 p 113 q 114 r 115 s */ 52759243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 52859243Sobrien 52959243Sobrien/* 116 t 117 u 118 v 119 w */ 53059243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 53159243Sobrien 53259243Sobrien/* 120 x 121 y 122 z 123 { */ 53359243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _GLOB|_PUN, 53459243Sobrien 53559243Sobrien/* 124 | 125 } 126 ~ 127 del */ 53659243Sobrien _META|_CMD|_PUN,_PUN, _PUN, _CTR, 53759243Sobrien 53859243Sobrien/****************************************************************/ 53959243Sobrien/* 128 - 255 The below is supposedly ISO 8859/1 */ 54059243Sobrien/****************************************************************/ 54159243Sobrien/* 128 (undef) 129 (undef) 130 (undef) 131 (undef) */ 54259243Sobrien _PUN, _PUN, _PUN, _PUN, 54359243Sobrien 54459243Sobrien/* 132 (undef) 133 (undef) 134 (undef) 135 (undef) */ 54559243Sobrien _PUN, _PUN, _PUN, _PUN, 54659243Sobrien 54759243Sobrien/* 136 (undef) 137 (undef) 138 (undef) 139 (undef) */ 54859243Sobrien _PUN, _PUN, _PUN, _PUN, 54959243Sobrien 55059243Sobrien/* 140 (undef) 141 (undef) 142 (undef) 143 (undef) */ 55159243Sobrien _PUN, _PUN, _PUN, _PUN, 55259243Sobrien 55359243Sobrien/* 144 (undef) 145 (undef) 146 (undef) 147 (undef) */ 55459243Sobrien _PUN, _PUN, _PUN, _PUN, 55559243Sobrien 55659243Sobrien/* 148 (undef) 149 (undef) 150 (undef) 151 (undef) */ 55759243Sobrien _PUN, _PUN, _PUN, _PUN, 55859243Sobrien 55959243Sobrien/* 152 (undef) 153 (undef) 154 (undef) 155 (undef) */ 56059243Sobrien _PUN, _PUN, _PUN, _PUN, 56159243Sobrien 56259243Sobrien/* 156 (undef) 157 (undef) 158 (undef) 159 (undef) */ 56359243Sobrien _PUN, _PUN, _PUN, _PUN, 56459243Sobrien 56559243Sobrien/* 160 nobreakspace 161 exclamdown 162 cent 163 sterling */ 56659243Sobrien _PUN, /* XXX */ _PUN, _PUN, _PUN, 56759243Sobrien 56859243Sobrien/* 164 currency 165 yen 166 brokenbar 167 section */ 56959243Sobrien _PUN, _PUN, _PUN, _PUN, 57059243Sobrien 57159243Sobrien/* 168 diaeresis 169 copyright 170 ordfeminine 171 guillemotleft*/ 57259243Sobrien _PUN, _PUN, _PUN, _PUN, 57359243Sobrien 57459243Sobrien/* 172 notsign 173 hyphen 174 registered 175 macron */ 57559243Sobrien _PUN, _PUN, _PUN, _PUN, 57659243Sobrien 57759243Sobrien/* 176 degree 177 plusminus 178 twosuperior 179 threesuperior*/ 57859243Sobrien _PUN, _PUN, _PUN, _PUN, 57959243Sobrien 58059243Sobrien/* 180 acute 181 mu 182 paragraph 183 periodcentered*/ 58159243Sobrien _PUN, _PUN, /*XXX*/ _PUN, _PUN, 58259243Sobrien 58359243Sobrien/* 184 cedilla 185 onesuperior 186 masculine 187 guillemotright*/ 58459243Sobrien _PUN, _PUN, _PUN, _PUN, 58559243Sobrien 58659243Sobrien/* 188 onequarter 189 onehalf 190 threequarters 191 questiondown*/ 58759243Sobrien _PUN, _PUN, _PUN, _PUN, 58859243Sobrien 58959243Sobrien/* 192 Agrave 193 Aacute 194 Acircumflex 195 Atilde */ 59059243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 59159243Sobrien 59259243Sobrien/* 196 Adiaeresis 197 Aring 198 AE 199 Ccedilla */ 59359243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 59459243Sobrien 59559243Sobrien/* 200 Egrave 201 Eacute 202 Ecircumflex 203 Ediaeresis */ 59659243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 59759243Sobrien 59859243Sobrien/* 204 Igrave 205 Iacute 206 Icircumflex 207 Idiaeresis */ 59959243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 60059243Sobrien 60159243Sobrien/* 208 ETH 209 Ntilde 210 Ograve 211 Oacute */ 60259243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 60359243Sobrien 60459243Sobrien/* 212 Ocircumflex 213 Otilde 214 Odiaeresis 215 multiply */ 60559243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _PUN, 60659243Sobrien 60759243Sobrien/* 216 Ooblique 217 Ugrave 218 Uacute 219 Ucircumflex */ 60859243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 60959243Sobrien 61059243Sobrien/* 220 Udiaeresis 221 Yacute 222 THORN 223 ssharp */ 61159243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_DOW, 61259243Sobrien 61359243Sobrien/* 224 agrave 225 aacute 226 acircumflex 227 atilde */ 61459243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 61559243Sobrien 61659243Sobrien/* 228 adiaeresis 229 aring 230 ae 231 ccedilla */ 61759243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 61859243Sobrien 61959243Sobrien/* 232 egrave 233 eacute 234 ecircumflex 235 ediaeresis */ 62059243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 62159243Sobrien 62259243Sobrien/* 236 igrave 237 iacute 238 icircumflex 239 idiaeresis */ 62359243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 62459243Sobrien 62559243Sobrien/* 240 eth 241 ntilde 242 ograve 243 oacute */ 62659243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 62759243Sobrien 62859243Sobrien/* 244 ocircumflex 245 otilde 246 odiaeresis 247 division */ 62959243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _PUN, 63059243Sobrien 63159243Sobrien/* 248 oslash 249 ugrave 250 uacute 251 ucircumflex */ 63259243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 63359243Sobrien 63459243Sobrien/* 252 udiaeresis 253 yacute 254 thorn 255 ydiaeresis */ 63559243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 63659243Sobrien}; 63759243Sobrien 63859243Sobrienshort _enable_mbdisp = 0; /* control multi-byte 0...disable 1...enable */ 63959243Sobrien 64059243Sobrien/* multi-byte check table */ 64159243Sobrien/* default = all 0 (clear process in update_vars()/unset()) */ 64259243Sobrienunsigned short _mbmap[256]; 64359243Sobrien 64459243Sobrienunsigned short _mbmap_euc[256] = { 64559243Sobrien/* first byte 0x8e,0xa0 - 0xf4 */ 64659243Sobrien/* second byte 0xa0 - 0xfe */ 64759243Sobrien/* 0 - 7f all 0 */ 64859243Sobrien 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, 64959243Sobrien 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, 65059243Sobrien 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, 65159243Sobrien 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, 65259243Sobrien/* 80 81 82 83 */ 65359243Sobrien 0, 0, 0, 0, 65459243Sobrien/* 84 85 86 87 */ 65559243Sobrien 0, 0, 0, 0, 65659243Sobrien/* 88 89 8a 8b */ 65759243Sobrien 0, 0, 0, 0, 65859243Sobrien/* 8c 8d 8e 8f */ 65959243Sobrien 0, 0, _MB1, 0, 66059243Sobrien/* 90 - 9f all 0 */ 66159243Sobrien 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 66259243Sobrien/* a0 a1 a2 a3 */ 66359243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 66459243Sobrien/* a4 a5 a6 a7 */ 66559243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 66659243Sobrien/* a8 a9 aa ab */ 66759243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 66859243Sobrien/* ac ad ae af */ 66959243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 67059243Sobrien/* b0 b1 b2 b3 */ 67159243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 67259243Sobrien/* b4 b5 b6 b7 */ 67359243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 67459243Sobrien/* b8 b9 ba bb */ 67559243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 67659243Sobrien/* bc bd be bf */ 67759243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 67859243Sobrien/* c0 c1 c2 c3 */ 67959243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 68059243Sobrien/* c4 c5 c6 c7 */ 68159243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 68259243Sobrien/* c8 c9 ca cb */ 68359243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 68459243Sobrien/* cc cd ce cf */ 68559243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 68659243Sobrien/* d0 d1 d2 d3 */ 68759243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 68859243Sobrien/* d4 d5 d6 d7 */ 68959243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 69059243Sobrien/* d8 d9 da db */ 69159243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 69259243Sobrien/* dc dd de df */ 69359243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 69459243Sobrien/* e0 e1 e2 e3 */ 69559243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 69659243Sobrien/* e4 e5 e6 e7 */ 69759243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 69859243Sobrien/* e8 e9 ea eb */ 69959243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 70059243Sobrien/* ec ed ee ef */ 70159243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 70259243Sobrien/* f0 f1 f2 f3 */ 70359243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 70459243Sobrien/* f4 f5 f6 f7 */ 70559243Sobrien _MB1|_MB2, _MB2, _MB2, _MB2, 70659243Sobrien/* f8 f9 fa fb */ 70759243Sobrien _MB2, _MB2, _MB2, _MB2, 70859243Sobrien/* fc fd fe ff */ 70959243Sobrien _MB2, _MB2, _MB2, 0, 71059243Sobrien}; 71159243Sobrien 71259243Sobrienunsigned short _mbmap_sjis[256] = { 71359243Sobrien/* first byte 0x81-0x9f,0xe0 - 0xfc */ 71459243Sobrien/* second byte 0x40-0x7e,0x80 - 0xfc */ 71559243Sobrien/* 0 - 3f all 0 */ 71659243Sobrien 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, 71759243Sobrien 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, 71859243Sobrien/* 40 41 42 43 */ 71959243Sobrien _MB2, _MB2, _MB2, _MB2, 72059243Sobrien/* 44 45 46 47 */ 72159243Sobrien _MB2, _MB2, _MB2, _MB2, 72259243Sobrien/* 48 49 4a 4b */ 72359243Sobrien _MB2, _MB2, _MB2, _MB2, 72459243Sobrien/* 4c 4d 4e 4f */ 72559243Sobrien _MB2, _MB2, _MB2, _MB2, 72659243Sobrien/* 50 51 52 53 */ 72759243Sobrien _MB2, _MB2, _MB2, _MB2, 72859243Sobrien/* 54 55 56 57 */ 72959243Sobrien _MB2, _MB2, _MB2, _MB2, 73059243Sobrien/* 58 59 5a 5b */ 73159243Sobrien _MB2, _MB2, _MB2, _MB2, 73259243Sobrien/* 5c 5d 5e 5f */ 73359243Sobrien _MB2, _MB2, _MB2, _MB2, 73459243Sobrien/* 60 61 62 63 */ 73559243Sobrien _MB2, _MB2, _MB2, _MB2, 73659243Sobrien/* 64 65 66 67 */ 73759243Sobrien _MB2, _MB2, _MB2, _MB2, 73859243Sobrien/* 68 69 6a 6b */ 73959243Sobrien _MB2, _MB2, _MB2, _MB2, 74059243Sobrien/* 6c 6d 6e 6f */ 74159243Sobrien _MB2, _MB2, _MB2, _MB2, 74259243Sobrien/* 70 71 72 73 */ 74359243Sobrien _MB2, _MB2, _MB2, _MB2, 74459243Sobrien/* 74 75 76 77 */ 74559243Sobrien _MB2, _MB2, _MB2, _MB2, 74659243Sobrien/* 78 79 7a 7b */ 74759243Sobrien _MB2, _MB2, _MB2, _MB2, 74859243Sobrien/* 7c 7d 7e 7f */ 74959243Sobrien _MB2, _MB2, _MB2, 0, 75059243Sobrien/* 80 81 82 83 */ 75159243Sobrien _MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 75259243Sobrien/* 84 85 86 87 */ 75359243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 75459243Sobrien/* 88 89 8a 8b */ 75559243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 75659243Sobrien/* 8c 8d 8e 8f */ 75759243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 75859243Sobrien/* 90 91 92 93 */ 75959243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 76059243Sobrien/* 94 95 96 97 */ 76159243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 76259243Sobrien/* 98 99 9a 9b */ 76359243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 76459243Sobrien/* 9c 9d 9e 9f */ 76559243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 76659243Sobrien/* a0 a1 a2 a3 */ 76759243Sobrien _MB2, _MB2, _MB2, _MB2, 76859243Sobrien/* a4 a5 a6 a7 */ 76959243Sobrien _MB2, _MB2, _MB2, _MB2, 77059243Sobrien/* a8 a9 aa ab */ 77159243Sobrien _MB2, _MB2, _MB2, _MB2, 77259243Sobrien/* ac ad ae af */ 77359243Sobrien _MB2, _MB2, _MB2, _MB2, 77459243Sobrien/* b0 b1 b2 b3 */ 77559243Sobrien _MB2, _MB2, _MB2, _MB2, 77659243Sobrien/* b4 b5 b6 b7 */ 77759243Sobrien _MB2, _MB2, _MB2, _MB2, 77859243Sobrien/* b8 b9 ba bb */ 77959243Sobrien _MB2, _MB2, _MB2, _MB2, 78059243Sobrien/* bc bd be bf */ 78159243Sobrien _MB2, _MB2, _MB2, _MB2, 78259243Sobrien/* c0 c1 c2 c3 */ 78359243Sobrien _MB2, _MB2, _MB2, _MB2, 78459243Sobrien/* c4 c5 c6 c7 */ 78559243Sobrien _MB2, _MB2, _MB2, _MB2, 78659243Sobrien/* c8 c9 ca cb */ 78759243Sobrien _MB2, _MB2, _MB2, _MB2, 78859243Sobrien/* cc cd ce cf */ 78959243Sobrien _MB2, _MB2, _MB2, _MB2, 79059243Sobrien/* d0 d1 d2 d3 */ 79159243Sobrien _MB2, _MB2, _MB2, _MB2, 79259243Sobrien/* d4 d5 d6 d7 */ 79359243Sobrien _MB2, _MB2, _MB2, _MB2, 79459243Sobrien/* d8 d9 da db */ 79559243Sobrien _MB2, _MB2, _MB2, _MB2, 79659243Sobrien/* dc dd de df */ 79759243Sobrien _MB2, _MB2, _MB2, _MB2, 79859243Sobrien/* e0 e1 e2 e3 */ 79959243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 80059243Sobrien/* e4 e5 e6 e7 */ 80159243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 80259243Sobrien/* e8 e9 ea eb */ 80359243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 80459243Sobrien/* ec ed ee ef */ 80559243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 80659243Sobrien/* f0 f1 f2 f3 */ 80759243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 80859243Sobrien/* f4 f5 f6 f7 */ 80959243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 81059243Sobrien/* f8 f9 fa fb */ 81159243Sobrien _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, _MB1|_MB2, 81259243Sobrien/* fc fd fe ff */ 81359243Sobrien _MB1|_MB2, 0, 0, 0, 81459243Sobrien}; 81559243Sobrien 81659243Sobrien#else /* !(defined(KANJI) && defined(SHORT_STRINGS) && defined(DSPMBYTE)) */ 81759243Sobrienunsigned short _cmap[256] = { 81859243Sobrien/* 0 nul 1 soh 2 stx 3 etx */ 81959243Sobrien _CTR, _CTR, _CTR, _CTR, 82059243Sobrien 82159243Sobrien/* 4 eot 5 enq 6 ack 7 bel */ 82259243Sobrien _CTR, _CTR, _CTR, _CTR, 82359243Sobrien 82459243Sobrien/* 8 bs 9 ht 10 nl 11 vt */ 82559243Sobrien _CTR, _CTR|_SP|_META, _CTR|_NL|_META, _CTR, 82659243Sobrien 82759243Sobrien/* 12 np 13 cr 14 so 15 si */ 82859243Sobrien _CTR, _CTR, _CTR, _CTR, 82959243Sobrien 83059243Sobrien/* 16 dle 17 dc1 18 dc2 19 dc3 */ 83159243Sobrien _CTR, _CTR, _CTR, _CTR, 83259243Sobrien 83359243Sobrien/* 20 dc4 21 nak 22 syn 23 etb */ 83459243Sobrien _CTR, _CTR, _CTR, _CTR, 83559243Sobrien 83659243Sobrien/* 24 can 25 em 26 sub 27 esc */ 83759243Sobrien _CTR, _CTR, _CTR, _CTR, 83859243Sobrien 83959243Sobrien/* 28 fs 29 gs 30 rs 31 us */ 84059243Sobrien _CTR, _CTR, _CTR, _CTR, 84159243Sobrien 84259243Sobrien/* 32 sp 33 ! 34 " 35 # */ 84359243Sobrien _SP|_META, _PUN, _QF|_PUN, _META|_PUN, 84459243Sobrien 84559243Sobrien/* 36 $ 37 % 38 & 39 ' */ 84659243Sobrien _DOL|_PUN, _PUN, _META|_CMD|_PUN,_QF|_PUN, 84759243Sobrien 84859243Sobrien/* 40 ( 41 ) 42 * 43 + */ 84959243Sobrien _META|_CMD|_PUN,_META|_PUN, _GLOB|_PUN, _PUN, 85059243Sobrien 85159243Sobrien/* 44 , 45 - 46 . 47 / */ 85259243Sobrien _PUN, _PUN, _PUN, _PUN, 85359243Sobrien 85459243Sobrien/* 48 0 49 1 50 2 51 3 */ 85559243Sobrien _DIG|_XD, _DIG|_XD, _DIG|_XD, _DIG|_XD, 85659243Sobrien 85759243Sobrien/* 52 4 53 5 54 6 55 7 */ 85859243Sobrien _DIG|_XD, _DIG|_XD, _DIG|_XD, _DIG|_XD, 85959243Sobrien 86059243Sobrien/* 56 8 57 9 58 : 59 ; */ 86159243Sobrien _DIG|_XD, _DIG|_XD, _PUN, _META|_CMD|_PUN, 86259243Sobrien 86359243Sobrien/* 60 < 61 = 62 > 63 ? */ 86459243Sobrien _META|_PUN, _PUN, _META|_PUN, _GLOB|_PUN, 86559243Sobrien 86659243Sobrien/* 64 @ 65 A 66 B 67 C */ 86759243Sobrien _PUN, _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP|_XD, 86859243Sobrien 86959243Sobrien/* 68 D 69 E 70 F 71 G */ 87059243Sobrien _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP, 87159243Sobrien 87259243Sobrien/* 72 H 73 I 74 J 75 K */ 87359243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 87459243Sobrien 87559243Sobrien/* 76 L 77 M 78 N 79 O */ 87659243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 87759243Sobrien 87859243Sobrien/* 80 P 81 Q 82 R 83 S */ 87959243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 88059243Sobrien 88159243Sobrien/* 84 T 85 U 86 V 87 W */ 88259243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 88359243Sobrien 88459243Sobrien/* 88 X 89 Y 90 Z 91 [ */ 88559243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _GLOB|_PUN, 88659243Sobrien 88759243Sobrien/* 92 \ 93 ] 94 ^ 95 _ */ 88859243Sobrien _ESC|_PUN, _PUN, _PUN, _PUN, 88959243Sobrien 89059243Sobrien/* 96 ` 97 a 98 b 99 c */ 89159243Sobrien _QB|_GLOB|_META|_PUN, _LET|_DOW|_XD, _LET|_DOW|_XD, _LET|_DOW|_XD, 89259243Sobrien 89359243Sobrien/* 100 d 101 e 102 f 103 g */ 89459243Sobrien _LET|_DOW|_XD, _LET|_DOW|_XD, _LET|_DOW|_XD, _LET|_DOW, 89559243Sobrien 89659243Sobrien/* 104 h 105 i 106 j 107 k */ 89759243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 89859243Sobrien 89959243Sobrien/* 108 l 109 m 110 n 111 o */ 90059243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 90159243Sobrien 90259243Sobrien/* 112 p 113 q 114 r 115 s */ 90359243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 90459243Sobrien 90559243Sobrien/* 116 t 117 u 118 v 119 w */ 90659243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 90759243Sobrien 90859243Sobrien/* 120 x 121 y 122 z 123 { */ 90959243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _GLOB|_PUN, 91059243Sobrien 91159243Sobrien/* 124 | 125 } 126 ~ 127 del */ 91259243Sobrien _META|_CMD|_PUN,_PUN, _PUN, _CTR, 91359243Sobrien 91459243Sobrien#ifdef SHORT_STRINGS 91559243Sobrien/****************************************************************/ 91659243Sobrien/* 128 - 255 The below is supposedly ISO 8859/1 */ 91759243Sobrien/****************************************************************/ 91859243Sobrien/* 128 (undef) 129 (undef) 130 (undef) 131 (undef) */ 91959243Sobrien _CTR, _CTR, _CTR, _CTR, 92059243Sobrien 92159243Sobrien/* 132 (undef) 133 (undef) 134 (undef) 135 (undef) */ 92259243Sobrien _CTR, _CTR, _CTR, _CTR, 92359243Sobrien 92459243Sobrien/* 136 (undef) 137 (undef) 138 (undef) 139 (undef) */ 92559243Sobrien _CTR, _CTR, _CTR, _CTR, 92659243Sobrien 92759243Sobrien/* 140 (undef) 141 (undef) 142 (undef) 143 (undef) */ 92859243Sobrien _CTR, _CTR, _CTR, _CTR, 92959243Sobrien 93059243Sobrien/* 144 (undef) 145 (undef) 146 (undef) 147 (undef) */ 93159243Sobrien _CTR, _CTR, _CTR, _CTR, 93259243Sobrien 93359243Sobrien/* 148 (undef) 149 (undef) 150 (undef) 151 (undef) */ 93459243Sobrien _CTR, _CTR, _CTR, _CTR, 93559243Sobrien 93659243Sobrien/* 152 (undef) 153 (undef) 154 (undef) 155 (undef) */ 93759243Sobrien _CTR, _CTR, _CTR, _CTR, 93859243Sobrien 93959243Sobrien/* 156 (undef) 157 (undef) 158 (undef) 159 (undef) */ 94059243Sobrien _CTR, _CTR, _CTR, _CTR, 94159243Sobrien 94259243Sobrien/* 160 nobreakspace 161 exclamdown 162 cent 163 sterling */ 94359243Sobrien _PUN, /* XXX */ _PUN, _PUN, _PUN, 94459243Sobrien 94559243Sobrien/* 164 currency 165 yen 166 brokenbar 167 section */ 94659243Sobrien _PUN, _PUN, _PUN, _PUN, 94759243Sobrien 94859243Sobrien/* 168 diaeresis 169 copyright 170 ordfeminine 171 guillemotleft*/ 94959243Sobrien _PUN, _PUN, _PUN, _PUN, 95059243Sobrien 95159243Sobrien/* 172 notsign 173 hyphen 174 registered 175 macron */ 95259243Sobrien _PUN, _PUN, _PUN, _PUN, 95359243Sobrien 95459243Sobrien/* 176 degree 177 plusminus 178 twosuperior 179 threesuperior*/ 95559243Sobrien _PUN, _PUN, _PUN, _PUN, 95659243Sobrien 95759243Sobrien/* 180 acute 181 mu 182 paragraph 183 periodcentered*/ 95859243Sobrien _PUN, _PUN, /*XXX*/ _PUN, _PUN, 95959243Sobrien 96059243Sobrien/* 184 cedilla 185 onesuperior 186 masculine 187 guillemotright*/ 96159243Sobrien _PUN, _PUN, _PUN, _PUN, 96259243Sobrien 96359243Sobrien/* 188 onequarter 189 onehalf 190 threequarters 191 questiondown*/ 96459243Sobrien _PUN, _PUN, _PUN, _PUN, 96559243Sobrien 96659243Sobrien/* 192 Agrave 193 Aacute 194 Acircumflex 195 Atilde */ 96759243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 96859243Sobrien 96959243Sobrien/* 196 Adiaeresis 197 Aring 198 AE 199 Ccedilla */ 97059243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 97159243Sobrien 97259243Sobrien/* 200 Egrave 201 Eacute 202 Ecircumflex 203 Ediaeresis */ 97359243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 97459243Sobrien 97559243Sobrien/* 204 Igrave 205 Iacute 206 Icircumflex 207 Idiaeresis */ 97659243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 97759243Sobrien 97859243Sobrien/* 208 ETH 209 Ntilde 210 Ograve 211 Oacute */ 97959243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 98059243Sobrien 98159243Sobrien/* 212 Ocircumflex 213 Otilde 214 Odiaeresis 215 multiply */ 98259243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _PUN, 98359243Sobrien 98459243Sobrien/* 216 Ooblique 217 Ugrave 218 Uacute 219 Ucircumflex */ 98559243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, 98659243Sobrien 98759243Sobrien/* 220 Udiaeresis 221 Yacute 222 THORN 223 ssharp */ 98859243Sobrien _LET|_UP, _LET|_UP, _LET|_UP, _LET|_DOW, 98959243Sobrien 99059243Sobrien/* 224 agrave 225 aacute 226 acircumflex 227 atilde */ 99159243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 99259243Sobrien 99359243Sobrien/* 228 adiaeresis 229 aring 230 ae 231 ccedilla */ 99459243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 99559243Sobrien 99659243Sobrien/* 232 egrave 233 eacute 234 ecircumflex 235 ediaeresis */ 99759243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 99859243Sobrien 99959243Sobrien/* 236 igrave 237 iacute 238 icircumflex 239 idiaeresis */ 100059243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 100159243Sobrien 100259243Sobrien/* 240 eth 241 ntilde 242 ograve 243 oacute */ 100359243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 100459243Sobrien 100559243Sobrien/* 244 ocircumflex 245 otilde 246 odiaeresis 247 division */ 100659243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _PUN, 100759243Sobrien 100859243Sobrien/* 248 oslash 249 ugrave 250 uacute 251 ucircumflex */ 100959243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 101059243Sobrien 101159243Sobrien/* 252 udiaeresis 253 yacute 254 thorn 255 ydiaeresis */ 101259243Sobrien _LET|_DOW, _LET|_DOW, _LET|_DOW, _LET|_DOW, 101359243Sobrien#endif /* SHORT_STRINGS */ 101459243Sobrien}; 101559243Sobrien#endif /* defined(KANJI) && defined(SHORT_STRINGS) && defined(DSPMBYTE) */ 101659243Sobrien 101759243Sobrien#ifndef NLS 101859243Sobrien/* _cmap_lower, _cmap_upper for ISO 8859/1 */ 101959243Sobrien 102059243Sobrienunsigned char _cmap_lower[256] = { 102159243Sobrien 0000, 0001, 0002, 0003, 0004, 0005, 0006, 0007, 102259243Sobrien 0010, 0011, 0012, 0013, 0014, 0015, 0016, 0017, 102359243Sobrien 0020, 0021, 0022, 0023, 0024, 0025, 0026, 0027, 102459243Sobrien 0030, 0031, 0032, 0033, 0034, 0035, 0036, 0037, 102559243Sobrien 0040, 0041, 0042, 0043, 0044, 0045, 0046, 0047, 102659243Sobrien 0050, 0051, 0052, 0053, 0054, 0055, 0056, 0057, 102759243Sobrien 0060, 0061, 0062, 0063, 0064, 0065, 0066, 0067, 102859243Sobrien 0070, 0071, 0072, 0073, 0074, 0075, 0076, 0077, 102959243Sobrien 0100, 0141, 0142, 0143, 0144, 0145, 0146, 0147, 103059243Sobrien 0150, 0151, 0152, 0153, 0154, 0155, 0156, 0157, 103159243Sobrien 0160, 0161, 0162, 0163, 0164, 0165, 0166, 0167, 103259243Sobrien 0170, 0171, 0172, 0133, 0134, 0135, 0136, 0137, 103359243Sobrien 0140, 0141, 0142, 0143, 0144, 0145, 0146, 0147, 103459243Sobrien 0150, 0151, 0152, 0153, 0154, 0155, 0156, 0157, 103559243Sobrien 0160, 0161, 0162, 0163, 0164, 0165, 0166, 0167, 103659243Sobrien 0170, 0171, 0172, 0173, 0174, 0175, 0176, 0177, 103759243Sobrien 0200, 0201, 0202, 0203, 0204, 0205, 0206, 0207, 103859243Sobrien 0210, 0211, 0212, 0213, 0214, 0215, 0216, 0217, 103959243Sobrien 0220, 0221, 0222, 0223, 0224, 0225, 0226, 0227, 104059243Sobrien 0230, 0231, 0232, 0233, 0234, 0235, 0236, 0237, 104159243Sobrien 0240, 0241, 0242, 0243, 0244, 0245, 0246, 0247, 104259243Sobrien 0250, 0251, 0252, 0253, 0254, 0255, 0256, 0257, 104359243Sobrien 0260, 0261, 0262, 0263, 0264, 0265, 0266, 0267, 104459243Sobrien 0270, 0271, 0272, 0273, 0274, 0275, 0276, 0277, 104559243Sobrien 0340, 0341, 0342, 0343, 0344, 0345, 0346, 0347, 104659243Sobrien 0350, 0351, 0352, 0353, 0354, 0355, 0356, 0357, 104759243Sobrien 0360, 0361, 0362, 0363, 0364, 0365, 0366, 0327, 104859243Sobrien 0370, 0371, 0372, 0373, 0374, 0375, 0376, 0337, 104959243Sobrien 0340, 0341, 0342, 0343, 0344, 0345, 0346, 0347, 105059243Sobrien 0350, 0351, 0352, 0353, 0354, 0355, 0356, 0357, 105159243Sobrien 0360, 0361, 0362, 0363, 0364, 0365, 0366, 0367, 105259243Sobrien 0370, 0371, 0372, 0373, 0374, 0375, 0376, 0377, 105359243Sobrien}; 105459243Sobrien 105559243Sobrienunsigned char _cmap_upper[256] = { 105659243Sobrien 0000, 0001, 0002, 0003, 0004, 0005, 0006, 0007, 105759243Sobrien 0010, 0011, 0012, 0013, 0014, 0015, 0016, 0017, 105859243Sobrien 0020, 0021, 0022, 0023, 0024, 0025, 0026, 0027, 105959243Sobrien 0030, 0031, 0032, 0033, 0034, 0035, 0036, 0037, 106059243Sobrien 0040, 0041, 0042, 0043, 0044, 0045, 0046, 0047, 106159243Sobrien 0050, 0051, 0052, 0053, 0054, 0055, 0056, 0057, 106259243Sobrien 0060, 0061, 0062, 0063, 0064, 0065, 0066, 0067, 106359243Sobrien 0070, 0071, 0072, 0073, 0074, 0075, 0076, 0077, 106459243Sobrien 0100, 0101, 0102, 0103, 0104, 0105, 0106, 0107, 106559243Sobrien 0110, 0111, 0112, 0113, 0114, 0115, 0116, 0117, 106659243Sobrien 0120, 0121, 0122, 0123, 0124, 0125, 0126, 0127, 106759243Sobrien 0130, 0131, 0132, 0133, 0134, 0135, 0136, 0137, 106859243Sobrien 0140, 0101, 0102, 0103, 0104, 0105, 0106, 0107, 106959243Sobrien 0110, 0111, 0112, 0113, 0114, 0115, 0116, 0117, 107059243Sobrien 0120, 0121, 0122, 0123, 0124, 0125, 0126, 0127, 107159243Sobrien 0130, 0131, 0132, 0173, 0174, 0175, 0176, 0177, 107259243Sobrien 0200, 0201, 0202, 0203, 0204, 0205, 0206, 0207, 107359243Sobrien 0210, 0211, 0212, 0213, 0214, 0215, 0216, 0217, 107459243Sobrien 0220, 0221, 0222, 0223, 0224, 0225, 0226, 0227, 107559243Sobrien 0230, 0231, 0232, 0233, 0234, 0235, 0236, 0237, 107659243Sobrien 0240, 0241, 0242, 0243, 0244, 0245, 0246, 0247, 107759243Sobrien 0250, 0251, 0252, 0253, 0254, 0255, 0256, 0257, 107859243Sobrien 0260, 0261, 0262, 0263, 0264, 0265, 0266, 0267, 107959243Sobrien 0270, 0271, 0272, 0273, 0274, 0275, 0276, 0277, 108059243Sobrien 0300, 0301, 0302, 0303, 0304, 0305, 0306, 0307, 108159243Sobrien 0310, 0311, 0312, 0313, 0314, 0315, 0316, 0317, 108259243Sobrien 0320, 0321, 0322, 0323, 0324, 0325, 0326, 0327, 108359243Sobrien 0330, 0331, 0332, 0333, 0334, 0335, 0336, 0337, 108459243Sobrien 0300, 0301, 0302, 0303, 0304, 0305, 0306, 0307, 108559243Sobrien 0310, 0311, 0312, 0313, 0314, 0315, 0316, 0317, 108659243Sobrien 0320, 0321, 0322, 0323, 0324, 0325, 0326, 0367, 108759243Sobrien 0330, 0331, 0332, 0333, 0334, 0335, 0336, 0377, 108859243Sobrien}; 108959243Sobrien#endif /* NLS */ 109059243Sobrien 109159243Sobrien#ifdef _OSD_POSIX 109259243Sobrien/* 109359243Sobrien Initial Port for tcsh-6.07.04 by <Martin.Kraemer@Mch.SNI.De> 109459243Sobrien 109559243Sobrien"BS2000 OSD" is a POSIX on a main frame. 109659243SobrienIt is made by Siemens Nixdorf AG, Germany. 109759243SobrienWithin the POSIX subsystem, the same character set was chosen as in 109859243Sobrien"native BS2000", namely EBCDIC. Yes, tcsh now runs on EBCDIC platforms, too. 109959243Sobrien 110059243SobrienEBCDIC Table. (Yes, in EBCDIC, the letters 'a'..'z' are not contiguous!) 110159243SobrienThis table is bijective, i.e. there are no ambigous or duplicate characters 110259243Sobrien00 00 01 02 03 85 09 86 7f 87 8d 8e 0b 0c 0d 0e 0f * ................ * 110359243Sobrien10 10 11 12 13 8f 0a 08 97 18 19 9c 9d 1c 1d 1e 1f * ................ * 110459243Sobrien20 80 81 82 83 84 92 17 1b 88 89 8a 8b 8c 05 06 07 * ................ * 110559243Sobrien30 90 91 16 93 94 95 96 04 98 99 9a 9b 14 15 9e 1a * ................ * 110659243Sobrien40 20 a0 e2 e4 e0 e1 e3 e5 e7 f1 60 2e 3c 28 2b 7c * .........`.<(+| * 110759243Sobrien50 26 e9 ea eb e8 ed ee ef ec df 21 24 2a 29 3b 9f * &.........!$*);. * 110859243Sobrien60 2d 2f c2 c4 c0 c1 c3 c5 c7 d1 5e 2c 25 5f 3e 3f * -/........^,%_>? * 110959243Sobrien70 f8 c9 ca cb c8 cd ce cf cc a8 3a 23 40 27 3d 22 * ..........:#@'=" * 111059243Sobrien80 d8 61 62 63 64 65 66 67 68 69 ab bb f0 fd fe b1 * .abcdefghi...... * 111159243Sobrien90 b0 6a 6b 6c 6d 6e 6f 70 71 72 aa ba e6 b8 c6 a4 * .jklmnopqr...... * 111259243Sobriena0 b5 af 73 74 75 76 77 78 79 7a a1 bf d0 dd de ae * ..stuvwxyz...... * 111359243Sobrienb0 a2 a3 a5 b7 a9 a7 b6 bc bd be ac 5b 5c 5d b4 d7 * ...........[\].. * 111459243Sobrienc0 f9 41 42 43 44 45 46 47 48 49 ad f4 f6 f2 f3 f5 * .ABCDEFGHI...... * 111559243Sobriend0 a6 4a 4b 4c 4d 4e 4f 50 51 52 b9 fb fc db fa ff * .JKLMNOPQR...... * 111659243Sobriene0 d9 f7 53 54 55 56 57 58 59 5a b2 d4 d6 d2 d3 d5 * ..STUVWXYZ...... * 111759243Sobrienf0 30 31 32 33 34 35 36 37 38 39 b3 7b dc 7d da 7e * 0123456789.{.}.~ * 111859243Sobrien*/ 111959243Sobrienunsigned short _toascii[256] = { 112059243Sobrien/*00*/ 0x00, 0x01, 0x02, 0x03, 0x85, 0x09, 0x86, 0x7f, 112159243Sobrien 0x87, 0x8d, 0x8e, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, /* ................ */ 112259243Sobrien/*10*/ 0x10, 0x11, 0x12, 0x13, 0x8f, 0x0a, 0x08, 0x97, 112359243Sobrien 0x18, 0x19, 0x9c, 0x9d, 0x1c, 0x1d, 0x1e, 0x1f, /* ................ */ 112459243Sobrien/*20*/ 0x80, 0x81, 0x82, 0x83, 0x84, 0x92, 0x17, 0x1b, 112559243Sobrien 0x88, 0x89, 0x8a, 0x8b, 0x8c, 0x05, 0x06, 0x07, /* ................ */ 112659243Sobrien/*30*/ 0x90, 0x91, 0x16, 0x93, 0x94, 0x95, 0x96, 0x04, 112759243Sobrien 0x98, 0x99, 0x9a, 0x9b, 0x14, 0x15, 0x9e, 0x1a, /* ................ */ 112859243Sobrien/*40*/ 0x20, 0xa0, 0xe2, 0xe4, 0xe0, 0xe1, 0xe3, 0xe5, 112959243Sobrien 0xe7, 0xf1, 0x60, 0x2e, 0x3c, 0x28, 0x2b, 0x7c, /* .........`.<(+| */ 113059243Sobrien/*50*/ 0x26, 0xe9, 0xea, 0xeb, 0xe8, 0xed, 0xee, 0xef, 113159243Sobrien 0xec, 0xdf, 0x21, 0x24, 0x2a, 0x29, 0x3b, 0x9f, /* &.........!$*);. */ 113259243Sobrien/*60*/ 0x2d, 0x2f, 0xc2, 0xc4, 0xc0, 0xc1, 0xc3, 0xc5, 113359243Sobrien 0xc7, 0xd1, 0x5e, 0x2c, 0x25, 0x5f, 0x3e, 0x3f, /* -/........^,%_>? */ 113459243Sobrien/*70*/ 0xf8, 0xc9, 0xca, 0xcb, 0xc8, 0xcd, 0xce, 0xcf, 113559243Sobrien 0xcc, 0xa8, 0x3a, 0x23, 0x40, 0x27, 0x3d, 0x22, /* ..........:#@'=" */ 113659243Sobrien/*80*/ 0xd8, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, 113759243Sobrien 0x68, 0x69, 0xab, 0xbb, 0xf0, 0xfd, 0xfe, 0xb1, /* .abcdefghi...... */ 113859243Sobrien/*90*/ 0xb0, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, 0x70, 113959243Sobrien 0x71, 0x72, 0xaa, 0xba, 0xe6, 0xb8, 0xc6, 0xa4, /* .jklmnopqr...... */ 114059243Sobrien/*a0*/ 0xb5, 0xaf, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 114159243Sobrien 0x79, 0x7a, 0xa1, 0xbf, 0xd0, 0xdd, 0xde, 0xae, /* ..stuvwxyz...... */ 114259243Sobrien/*b0*/ 0xa2, 0xa3, 0xa5, 0xb7, 0xa9, 0xa7, 0xb6, 0xbc, 114359243Sobrien 0xbd, 0xbe, 0xac, 0x5b, 0x5c, 0x5d, 0xb4, 0xd7, /* ...........[\].. */ 114459243Sobrien/*c0*/ 0xf9, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 114559243Sobrien 0x48, 0x49, 0xad, 0xf4, 0xf6, 0xf2, 0xf3, 0xf5, /* .ABCDEFGHI...... */ 114659243Sobrien/*d0*/ 0xa6, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f, 0x50, 114759243Sobrien 0x51, 0x52, 0xb9, 0xfb, 0xfc, 0xdb, 0xfa, 0xff, /* .JKLMNOPQR...... */ 114859243Sobrien/*e0*/ 0xd9, 0xf7, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 114959243Sobrien 0x59, 0x5a, 0xb2, 0xd4, 0xd6, 0xd2, 0xd3, 0xd5, /* ..STUVWXYZ...... */ 115059243Sobrien/*f0*/ 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 115159243Sobrien 0x38, 0x39, 0xb3, 0x7b, 0xdc, 0x7d, 0xda, 0x7e /* 0123456789.{.}.~ */ 115259243Sobrien}; 115359243Sobrien/* The same, for ascii-in-ebcdic 115459243Sobrien00 00 01 02 03 37 2d 2e 2f 16 05 15 0b 0c 0d 0e 0f * ................ * 115559243Sobrien10 10 11 12 13 3c 3d 32 26 18 19 3f 27 1c 1d 1e 1f * ................ * 115659243Sobrien20 40 5a 7f 7b 5b 6c 50 7d 4d 5d 5c 4e 6b 60 4b 61 * !"#$%&'()*+,-./ * 115759243Sobrien30 f0 f1 f2 f3 f4 f5 f6 f7 f8 f9 7a 5e 4c 7e 6e 6f * 0123456789:;<=>? * 115859243Sobrien40 7c c1 c2 c3 c4 c5 c6 c7 c8 c9 d1 d2 d3 d4 d5 d6 * @ABCDEFGHIJKLMNO * 115959243Sobrien50 d7 d8 d9 e2 e3 e4 e5 e6 e7 e8 e9 bb bc bd 6a 6d * PQRSTUVWXYZ[\]^_ * 116059243Sobrien60 4a 81 82 83 84 85 86 87 88 89 91 92 93 94 95 96 * `abcdefghijklmno * 116159243Sobrien70 97 98 99 a2 a3 a4 a5 a6 a7 a8 a9 fb 4f fd ff 07 * pqrstuvwxyz{|}~. * 116259243Sobrien80 20 21 22 23 24 04 06 08 28 29 2a 2b 2c 09 0a 14 * ................ * 116359243Sobrien90 30 31 25 33 34 35 36 17 38 39 3a 3b 1a 1b 3e 5f * ................ * 116459243Sobriena0 41 aa b0 b1 9f b2 d0 b5 79 b4 9a 8a ba ca af a1 * ................ * 116559243Sobrienb0 90 8f ea fa be a0 b6 b3 9d da 9b 8b b7 b8 b9 ab * ................ * 116659243Sobrienc0 64 65 62 66 63 67 9e 68 74 71 72 73 78 75 76 77 * ................ * 116759243Sobriend0 ac 69 ed ee eb ef ec bf 80 e0 fe dd fc ad ae 59 * ................ * 116859243Sobriene0 44 45 42 46 43 47 9c 48 54 51 52 53 58 55 56 57 * ................ * 116959243Sobrienf0 8c 49 cd ce cb cf cc e1 70 c0 de db dc 8d 8e df * ................ * 117059243Sobrien*/ 117159243Sobrienunsigned short _toebcdic[256] = { 117259243Sobrien/*00*/ 0x00, 0x01, 0x02, 0x03, 0x37, 0x2d, 0x2e, 0x2f, 117359243Sobrien 0x16, 0x05, 0x15, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, /* ................ */ 117459243Sobrien/*10*/ 0x10, 0x11, 0x12, 0x13, 0x3c, 0x3d, 0x32, 0x26, 117559243Sobrien 0x18, 0x19, 0x3f, 0x27, 0x1c, 0x1d, 0x1e, 0x1f, /* ................ */ 117659243Sobrien/*20*/ 0x40, 0x5a, 0x7f, 0x7b, 0x5b, 0x6c, 0x50, 0x7d, 117759243Sobrien 0x4d, 0x5d, 0x5c, 0x4e, 0x6b, 0x60, 0x4b, 0x61, /* !"#$%&'()*+,-./ */ 117859243Sobrien/*30*/ 0xf0, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, 117959243Sobrien 0xf8, 0xf9, 0x7a, 0x5e, 0x4c, 0x7e, 0x6e, 0x6f, /* 0123456789:;<=>? */ 118059243Sobrien/*40*/ 0x7c, 0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7, 118159243Sobrien 0xc8, 0xc9, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6, /* @ABCDEFGHIJKLMNO */ 118259243Sobrien/*50*/ 0xd7, 0xd8, 0xd9, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 118359243Sobrien 0xe7, 0xe8, 0xe9, 0xbb, 0xbc, 0xbd, 0x6a, 0x6d, /* PQRSTUVWXYZ[\]^_ */ 118459243Sobrien/*60*/ 0x4a, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 118559243Sobrien 0x88, 0x89, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, /* `abcdefghijklmno */ 118659243Sobrien/*70*/ 0x97, 0x98, 0x99, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6, 118759243Sobrien 0xa7, 0xa8, 0xa9, 0xfb, 0x4f, 0xfd, 0xff, 0x07, /* pqrstuvwxyz{|}~. */ 118859243Sobrien/*80*/ 0x20, 0x21, 0x22, 0x23, 0x24, 0x04, 0x06, 0x08, 118959243Sobrien 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x09, 0x0a, 0x14, /* ................ */ 119059243Sobrien/*90*/ 0x30, 0x31, 0x25, 0x33, 0x34, 0x35, 0x36, 0x17, 119159243Sobrien 0x38, 0x39, 0x3a, 0x3b, 0x1a, 0x1b, 0x3e, 0x5f, /* ................ */ 119259243Sobrien/*a0*/ 0x41, 0xaa, 0xb0, 0xb1, 0x9f, 0xb2, 0xd0, 0xb5, 119359243Sobrien 0x79, 0xb4, 0x9a, 0x8a, 0xba, 0xca, 0xaf, 0xa1, /* ................ */ 119459243Sobrien/*b0*/ 0x90, 0x8f, 0xea, 0xfa, 0xbe, 0xa0, 0xb6, 0xb3, 119559243Sobrien 0x9d, 0xda, 0x9b, 0x8b, 0xb7, 0xb8, 0xb9, 0xab, /* ................ */ 119659243Sobrien/*c0*/ 0x64, 0x65, 0x62, 0x66, 0x63, 0x67, 0x9e, 0x68, 119759243Sobrien 0x74, 0x71, 0x72, 0x73, 0x78, 0x75, 0x76, 0x77, /* ................ */ 119859243Sobrien/*d0*/ 0xac, 0x69, 0xed, 0xee, 0xeb, 0xef, 0xec, 0xbf, 119959243Sobrien 0x80, 0xe0, 0xfe, 0xdd, 0xfc, 0xad, 0xae, 0x59, /* ................ */ 120059243Sobrien/*e0*/ 0x44, 0x45, 0x42, 0x46, 0x43, 0x47, 0x9c, 0x48, 120159243Sobrien 0x54, 0x51, 0x52, 0x53, 0x58, 0x55, 0x56, 0x57, /* ................ */ 120259243Sobrien/*f0*/ 0x8c, 0x49, 0xcd, 0xce, 0xcb, 0xcf, 0xcc, 0xe1, 120359243Sobrien 0x70, 0xc0, 0xde, 0xdb, 0xdc, 0x8d, 0x8e, 0xdf /* ................ */ 120459243Sobrien}; 120559243Sobrien 120659243Sobrien#endif /*_OSD_POSIX*/ 1207