Commit | Line | Data |
---|---|---|
15637ed4 RG |
1 | /*- |
2 | * Copyright (c) 1980, 1991 The Regents of the University of California. | |
3 | * All rights reserved. | |
4 | * | |
5 | * Redistribution and use in source and binary forms, with or without | |
6 | * modification, are permitted provided that the following conditions | |
7 | * are met: | |
8 | * 1. Redistributions of source code must retain the above copyright | |
9 | * notice, this list of conditions and the following disclaimer. | |
10 | * 2. Redistributions in binary form must reproduce the above copyright | |
11 | * notice, this list of conditions and the following disclaimer in the | |
12 | * documentation and/or other materials provided with the distribution. | |
13 | * 3. All advertising materials mentioning features or use of this software | |
14 | * must display the following acknowledgement: | |
15 | * This product includes software developed by the University of | |
16 | * California, Berkeley and its contributors. | |
17 | * 4. 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 | ||
34 | #ifndef lint | |
35 | static char sccsid[] = "@(#)char.c 5.6 (Berkeley) 6/7/91"; | |
36 | #endif /* not lint */ | |
37 | ||
38 | #include "char.h" | |
39 | ||
40 | unsigned short _cmap[256] = { | |
41 | /* nul soh stx etx */ | |
42 | _CTR, _CTR, _CTR, _CTR, | |
43 | ||
44 | /* eot enq ack bel */ | |
45 | _CTR, _CTR, _CTR, _CTR, | |
46 | ||
47 | /* bs ht nl vt */ | |
48 | _CTR, _CTR|_SP|_META, _CTR|_NL|_META, _CTR, | |
49 | ||
50 | /* np cr so si */ | |
51 | _CTR, _CTR, _CTR, _CTR, | |
52 | ||
53 | /* dle dc1 dc2 dc3 */ | |
54 | _CTR, _CTR, _CTR, _CTR, | |
55 | ||
56 | /* dc4 nak syn etb */ | |
57 | _CTR, _CTR, _CTR, _CTR, | |
58 | ||
59 | /* can em sub esc */ | |
60 | _CTR, _CTR, _CTR, _CTR, | |
61 | ||
62 | /* fs gs rs us */ | |
63 | _CTR, _CTR, _CTR, _CTR, | |
64 | ||
65 | /* sp ! " # */ | |
66 | _SP|_META, 0, _Q, _META, | |
67 | ||
68 | /* $ % & ' */ | |
69 | _DOL, 0, _META|_CMD, _Q, | |
70 | ||
71 | /* ( ) * + */ | |
72 | _META|_CMD, _META, _GLOB, 0, | |
73 | ||
74 | /* , - . / */ | |
75 | 0, 0, 0, 0, | |
76 | ||
77 | /* 0 1 2 3 */ | |
78 | _DIG|_XD, _DIG|_XD, _DIG|_XD, _DIG|_XD, | |
79 | ||
80 | /* 4 5 6 7 */ | |
81 | _DIG|_XD, _DIG|_XD, _DIG|_XD, _DIG|_XD, | |
82 | ||
83 | /* 8 9 : ; */ | |
84 | _DIG|_XD, _DIG|_XD, 0, _META|_CMD, | |
85 | ||
86 | /* < = > ? */ | |
87 | _META, 0, _META, _GLOB, | |
88 | ||
89 | /* @ A B C */ | |
90 | 0, _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP|_XD, | |
91 | ||
92 | /* D E F G */ | |
93 | _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP|_XD, _LET|_UP, | |
94 | ||
95 | /* H I J K */ | |
96 | _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, | |
97 | ||
98 | /* L M N O */ | |
99 | _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, | |
100 | ||
101 | /* P Q R S */ | |
102 | _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, | |
103 | ||
104 | /* T U V W */ | |
105 | _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, | |
106 | ||
107 | /* X Y Z [ */ | |
108 | _LET|_UP, _LET|_UP, _LET|_UP, _GLOB, | |
109 | ||
110 | /* \ ] ^ _ */ | |
111 | _ESC, 0, 0, 0, | |
112 | ||
113 | /* ` a b c */ | |
114 | _Q1|_GLOB|_CMD|_META, _LET|_LOW|_XD, _LET|_LOW|_XD, _LET|_LOW|_XD, | |
115 | ||
116 | /* d e f g */ | |
117 | _LET|_LOW|_XD, _LET|_LOW|_XD, _LET|_LOW|_XD, _LET|_LOW, | |
118 | ||
119 | /* h i j k */ | |
120 | _LET|_LOW, _LET|_LOW, _LET|_LOW, _LET|_LOW, | |
121 | ||
122 | /* l m n o */ | |
123 | _LET|_LOW, _LET|_LOW, _LET|_LOW, _LET|_LOW, | |
124 | ||
125 | /* p q r s */ | |
126 | _LET|_LOW, _LET|_LOW, _LET|_LOW, _LET|_LOW, | |
127 | ||
128 | /* t u v w */ | |
129 | _LET|_LOW, _LET|_LOW, _LET|_LOW, _LET|_LOW, | |
130 | ||
131 | /* x y z { */ | |
132 | _LET|_LOW, _LET|_LOW, _LET|_LOW, _GLOB, | |
133 | ||
134 | /* | } ~ del */ | |
135 | _META|_CMD, 0, 0, _CTR, | |
136 | ||
137 | #if defined(SHORT_STRINGS) && !defined(KANJI) | |
138 | /****************************************************************/ | |
139 | /* 128 - 255 The below is supposedly ISO 8859/1 */ | |
140 | /****************************************************************/ | |
141 | /* (undef) (undef) (undef) (undef) */ | |
142 | _CTR, _CTR, _CTR, _CTR, | |
143 | ||
144 | /* (undef) (undef) (undef) (undef) */ | |
145 | _CTR, _CTR, _CTR, _CTR, | |
146 | ||
147 | /* (undef) (undef) (undef) (undef) */ | |
148 | _CTR, _CTR, _CTR, _CTR, | |
149 | ||
150 | /* (undef) (undef) (undef) (undef) */ | |
151 | _CTR, _CTR, _CTR, _CTR, | |
152 | ||
153 | /* (undef) (undef) (undef) (undef) */ | |
154 | _CTR, _CTR, _CTR, _CTR, | |
155 | ||
156 | /* (undef) (undef) (undef) (undef) */ | |
157 | _CTR, _CTR, _CTR, _CTR, | |
158 | ||
159 | /* (undef) (undef) (undef) (undef) */ | |
160 | _CTR, _CTR, _CTR, _CTR, | |
161 | ||
162 | /* (undef) (undef) (undef) (undef) */ | |
163 | _CTR, _CTR, _CTR, _CTR, | |
164 | ||
165 | /* nobreakspace exclamdown cent sterling */ | |
166 | _SP, 0, 0, 0, | |
167 | ||
168 | /* currency yen brokenbar section */ | |
169 | 0, 0, 0, 0, | |
170 | ||
171 | /* diaeresis copyright ordfeminine guillemotleft */ | |
172 | 0, 0, 0, 0, | |
173 | ||
174 | /* notsign hyphen registered macron */ | |
175 | 0, 0, 0, 0, | |
176 | ||
177 | /* degree plusminus twosuperior threesuperior */ | |
178 | 0, 0, 0, 0, | |
179 | ||
180 | /* acute mu paragraph periodcentered */ | |
181 | 0, 0, 0, 0, | |
182 | ||
183 | /* cedilla onesuperior masculine guillemotright */ | |
184 | 0, 0, 0, 0, | |
185 | ||
186 | /* onequarter onehalf threequarters questiondown */ | |
187 | 0, 0, 0, 0, | |
188 | ||
189 | /* Agrave Aacute Acircumflex Atilde */ | |
190 | _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, | |
191 | ||
192 | /* Adiaeresis Aring AE Ccedilla */ | |
193 | _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, | |
194 | ||
195 | /* Egrave Eacute Ecircumflex Ediaeresis */ | |
196 | _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, | |
197 | ||
198 | /* Igrave Iacute Icircumflex Idiaeresis */ | |
199 | _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, | |
200 | ||
201 | /* ETH Ntilde Ograve Oacute */ | |
202 | _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, | |
203 | ||
204 | /* Ocircumflex Otilde Odiaeresis multiply */ | |
205 | _LET|_UP, _LET|_UP, _LET|_UP, 0, | |
206 | ||
207 | /* Ooblique Ugrave Uacute Ucircumflex */ | |
208 | _LET|_UP, _LET|_UP, _LET|_UP, _LET|_UP, | |
209 | ||
210 | /* Udiaeresis Yacute THORN ssharp */ | |
211 | _LET|_UP, _LET|_UP, _LET|_UP, _LET|_LOW, | |
212 | ||
213 | /* agrave aacute acircumflex atilde */ | |
214 | _LET|_LOW, _LET|_LOW, _LET|_LOW, _LET|_LOW, | |
215 | ||
216 | /* adiaeresis aring ae ccedilla */ | |
217 | _LET|_LOW, _LET|_LOW, _LET|_LOW, _LET|_LOW, | |
218 | ||
219 | /* egrave eacute ecircumflex ediaeresis */ | |
220 | _LET|_LOW, _LET|_LOW, _LET|_LOW, _LET|_LOW, | |
221 | ||
222 | /* igrave iacute icircumflex idiaeresis */ | |
223 | _LET|_LOW, _LET|_LOW, _LET|_LOW, _LET|_LOW, | |
224 | ||
225 | /* eth ntilde ograve oacute */ | |
226 | _LET|_LOW, _LET|_LOW, _LET|_LOW, _LET|_LOW, | |
227 | ||
228 | /* ocircumflex otilde odiaeresis division */ | |
229 | _LET|_LOW, _LET|_LOW, _LET|_LOW, 0, | |
230 | ||
231 | /* oslash ugrave uacute ucircumflex */ | |
232 | _LET|_LOW, _LET|_LOW, _LET|_LOW, _LET|_LOW, | |
233 | ||
234 | /* udiaeresis yacute thorn ydiaeresis */ | |
235 | _LET|_LOW, _LET|_LOW, _LET|_LOW, _LET|_LOW, | |
236 | #endif /* SHORT_STRINGS && !KANJI */ | |
237 | }; | |
238 | ||
239 | #ifndef NLS | |
240 | /* _cmap_lower, _cmap_upper for ISO 8859/1 */ | |
241 | ||
242 | unsigned char _cmap_lower[256] = { | |
243 | 0000, 0001, 0002, 0003, 0004, 0005, 0006, 0007, | |
244 | 0010, 0011, 0012, 0013, 0014, 0015, 0016, 0017, | |
245 | 0020, 0021, 0022, 0023, 0024, 0025, 0026, 0027, | |
246 | 0030, 0031, 0032, 0033, 0034, 0035, 0036, 0037, | |
247 | 0040, 0041, 0042, 0043, 0044, 0045, 0046, 0047, | |
248 | 0050, 0051, 0052, 0053, 0054, 0055, 0056, 0057, | |
249 | 0060, 0061, 0062, 0063, 0064, 0065, 0066, 0067, | |
250 | 0070, 0071, 0072, 0073, 0074, 0075, 0076, 0077, | |
251 | 0100, 0141, 0142, 0143, 0144, 0145, 0146, 0147, | |
252 | 0150, 0151, 0152, 0153, 0154, 0155, 0156, 0157, | |
253 | 0160, 0161, 0162, 0163, 0164, 0165, 0166, 0167, | |
254 | 0170, 0171, 0172, 0133, 0134, 0135, 0136, 0137, | |
255 | 0140, 0141, 0142, 0143, 0144, 0145, 0146, 0147, | |
256 | 0150, 0151, 0152, 0153, 0154, 0155, 0156, 0157, | |
257 | 0160, 0161, 0162, 0163, 0164, 0165, 0166, 0167, | |
258 | 0170, 0171, 0172, 0173, 0174, 0175, 0176, 0177, | |
259 | 0200, 0201, 0202, 0203, 0204, 0205, 0206, 0207, | |
260 | 0210, 0211, 0212, 0213, 0214, 0215, 0216, 0217, | |
261 | 0220, 0221, 0222, 0223, 0224, 0225, 0226, 0227, | |
262 | 0230, 0231, 0232, 0233, 0234, 0235, 0236, 0237, | |
263 | 0240, 0241, 0242, 0243, 0244, 0245, 0246, 0247, | |
264 | 0250, 0251, 0252, 0253, 0254, 0255, 0256, 0257, | |
265 | 0260, 0261, 0262, 0263, 0264, 0265, 0266, 0267, | |
266 | 0270, 0271, 0272, 0273, 0274, 0275, 0276, 0277, | |
267 | 0340, 0341, 0342, 0343, 0344, 0345, 0346, 0347, | |
268 | 0350, 0351, 0352, 0353, 0354, 0355, 0356, 0357, | |
269 | 0360, 0361, 0362, 0363, 0364, 0365, 0366, 0327, | |
270 | 0370, 0371, 0372, 0373, 0374, 0375, 0376, 0337, | |
271 | 0340, 0341, 0342, 0343, 0344, 0345, 0346, 0347, | |
272 | 0350, 0351, 0352, 0353, 0354, 0355, 0356, 0357, | |
273 | 0360, 0361, 0362, 0363, 0364, 0365, 0366, 0367, | |
274 | 0370, 0371, 0372, 0373, 0374, 0375, 0376, 0377, | |
275 | }; | |
276 | ||
277 | unsigned char _cmap_upper[256] = { | |
278 | 0000, 0001, 0002, 0003, 0004, 0005, 0006, 0007, | |
279 | 0010, 0011, 0012, 0013, 0014, 0015, 0016, 0017, | |
280 | 0020, 0021, 0022, 0023, 0024, 0025, 0026, 0027, | |
281 | 0030, 0031, 0032, 0033, 0034, 0035, 0036, 0037, | |
282 | 0040, 0041, 0042, 0043, 0044, 0045, 0046, 0047, | |
283 | 0050, 0051, 0052, 0053, 0054, 0055, 0056, 0057, | |
284 | 0060, 0061, 0062, 0063, 0064, 0065, 0066, 0067, | |
285 | 0070, 0071, 0072, 0073, 0074, 0075, 0076, 0077, | |
286 | 0100, 0101, 0102, 0103, 0104, 0105, 0106, 0107, | |
287 | 0110, 0111, 0112, 0113, 0114, 0115, 0116, 0117, | |
288 | 0120, 0121, 0122, 0123, 0124, 0125, 0126, 0127, | |
289 | 0130, 0131, 0132, 0133, 0134, 0135, 0136, 0137, | |
290 | 0140, 0101, 0102, 0103, 0104, 0105, 0106, 0107, | |
291 | 0110, 0111, 0112, 0113, 0114, 0115, 0116, 0117, | |
292 | 0120, 0121, 0122, 0123, 0124, 0125, 0126, 0127, | |
293 | 0130, 0131, 0132, 0173, 0174, 0175, 0176, 0177, | |
294 | 0200, 0201, 0202, 0203, 0204, 0205, 0206, 0207, | |
295 | 0210, 0211, 0212, 0213, 0214, 0215, 0216, 0217, | |
296 | 0220, 0221, 0222, 0223, 0224, 0225, 0226, 0227, | |
297 | 0230, 0231, 0232, 0233, 0234, 0235, 0236, 0237, | |
298 | 0240, 0241, 0242, 0243, 0244, 0245, 0246, 0247, | |
299 | 0250, 0251, 0252, 0253, 0254, 0255, 0256, 0257, | |
300 | 0260, 0261, 0262, 0263, 0264, 0265, 0266, 0267, | |
301 | 0270, 0271, 0272, 0273, 0274, 0275, 0276, 0277, | |
302 | 0300, 0301, 0302, 0303, 0304, 0305, 0306, 0307, | |
303 | 0310, 0311, 0312, 0313, 0314, 0315, 0316, 0317, | |
304 | 0320, 0321, 0322, 0323, 0324, 0325, 0326, 0327, | |
305 | 0330, 0331, 0332, 0333, 0334, 0335, 0336, 0337, | |
306 | 0300, 0301, 0302, 0303, 0304, 0305, 0306, 0307, | |
307 | 0310, 0311, 0312, 0313, 0314, 0315, 0316, 0317, | |
308 | 0320, 0321, 0322, 0323, 0324, 0325, 0326, 0367, | |
309 | 0330, 0331, 0332, 0333, 0334, 0335, 0336, 0377, | |
310 | }; | |
311 | #endif /* NLS */ |