1 | /* Mapping table for CP775. |
2 | Copyright (C) 1998-2023 Free Software Foundation, Inc. |
3 | This file is part of the GNU C Library. |
4 | |
5 | The GNU C Library is free software; you can redistribute it and/or |
6 | modify it under the terms of the GNU Lesser General Public |
7 | License as published by the Free Software Foundation; either |
8 | version 2.1 of the License, or (at your option) any later version. |
9 | |
10 | The GNU C Library is distributed in the hope that it will be useful, |
11 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
13 | Lesser General Public License for more details. |
14 | |
15 | You should have received a copy of the GNU Lesser General Public |
16 | License along with the GNU C Library; if not, see |
17 | <https://www.gnu.org/licenses/>. */ |
18 | |
19 | #include <stdint.h> |
20 | |
21 | /* Table to map to UCS4. It can be generated using |
22 | (I know, this is a useless use of cat, but the linebreak requires it): |
23 | |
24 | cat .../unix/mappings/vendors/micsft/pc/cp775.txt | |
25 | sed -e 's/\(0x..\)[[:space:]]*\(0x....\).*$/ [\1] = \2,/p' -e d |
26 | |
27 | */ |
28 | static const uint32_t to_ucs4[256] = |
29 | { |
30 | [0x00] = 0x0000, |
31 | [0x01] = 0x0001, |
32 | [0x02] = 0x0002, |
33 | [0x03] = 0x0003, |
34 | [0x04] = 0x0004, |
35 | [0x05] = 0x0005, |
36 | [0x06] = 0x0006, |
37 | [0x07] = 0x0007, |
38 | [0x08] = 0x0008, |
39 | [0x09] = 0x0009, |
40 | [0x0a] = 0x000a, |
41 | [0x0b] = 0x000b, |
42 | [0x0c] = 0x000c, |
43 | [0x0d] = 0x000d, |
44 | [0x0e] = 0x000e, |
45 | [0x0f] = 0x000f, |
46 | [0x10] = 0x0010, |
47 | [0x11] = 0x0011, |
48 | [0x12] = 0x0012, |
49 | [0x13] = 0x0013, |
50 | [0x14] = 0x0014, |
51 | [0x15] = 0x0015, |
52 | [0x16] = 0x0016, |
53 | [0x17] = 0x0017, |
54 | [0x18] = 0x0018, |
55 | [0x19] = 0x0019, |
56 | [0x1a] = 0x001a, |
57 | [0x1b] = 0x001b, |
58 | [0x1c] = 0x001c, |
59 | [0x1d] = 0x001d, |
60 | [0x1e] = 0x001e, |
61 | [0x1f] = 0x001f, |
62 | [0x20] = 0x0020, |
63 | [0x21] = 0x0021, |
64 | [0x22] = 0x0022, |
65 | [0x23] = 0x0023, |
66 | [0x24] = 0x0024, |
67 | [0x25] = 0x0025, |
68 | [0x26] = 0x0026, |
69 | [0x27] = 0x0027, |
70 | [0x28] = 0x0028, |
71 | [0x29] = 0x0029, |
72 | [0x2a] = 0x002a, |
73 | [0x2b] = 0x002b, |
74 | [0x2c] = 0x002c, |
75 | [0x2d] = 0x002d, |
76 | [0x2e] = 0x002e, |
77 | [0x2f] = 0x002f, |
78 | [0x30] = 0x0030, |
79 | [0x31] = 0x0031, |
80 | [0x32] = 0x0032, |
81 | [0x33] = 0x0033, |
82 | [0x34] = 0x0034, |
83 | [0x35] = 0x0035, |
84 | [0x36] = 0x0036, |
85 | [0x37] = 0x0037, |
86 | [0x38] = 0x0038, |
87 | [0x39] = 0x0039, |
88 | [0x3a] = 0x003a, |
89 | [0x3b] = 0x003b, |
90 | [0x3c] = 0x003c, |
91 | [0x3d] = 0x003d, |
92 | [0x3e] = 0x003e, |
93 | [0x3f] = 0x003f, |
94 | [0x40] = 0x0040, |
95 | [0x41] = 0x0041, |
96 | [0x42] = 0x0042, |
97 | [0x43] = 0x0043, |
98 | [0x44] = 0x0044, |
99 | [0x45] = 0x0045, |
100 | [0x46] = 0x0046, |
101 | [0x47] = 0x0047, |
102 | [0x48] = 0x0048, |
103 | [0x49] = 0x0049, |
104 | [0x4a] = 0x004a, |
105 | [0x4b] = 0x004b, |
106 | [0x4c] = 0x004c, |
107 | [0x4d] = 0x004d, |
108 | [0x4e] = 0x004e, |
109 | [0x4f] = 0x004f, |
110 | [0x50] = 0x0050, |
111 | [0x51] = 0x0051, |
112 | [0x52] = 0x0052, |
113 | [0x53] = 0x0053, |
114 | [0x54] = 0x0054, |
115 | [0x55] = 0x0055, |
116 | [0x56] = 0x0056, |
117 | [0x57] = 0x0057, |
118 | [0x58] = 0x0058, |
119 | [0x59] = 0x0059, |
120 | [0x5a] = 0x005a, |
121 | [0x5b] = 0x005b, |
122 | [0x5c] = 0x005c, |
123 | [0x5d] = 0x005d, |
124 | [0x5e] = 0x005e, |
125 | [0x5f] = 0x005f, |
126 | [0x60] = 0x0060, |
127 | [0x61] = 0x0061, |
128 | [0x62] = 0x0062, |
129 | [0x63] = 0x0063, |
130 | [0x64] = 0x0064, |
131 | [0x65] = 0x0065, |
132 | [0x66] = 0x0066, |
133 | [0x67] = 0x0067, |
134 | [0x68] = 0x0068, |
135 | [0x69] = 0x0069, |
136 | [0x6a] = 0x006a, |
137 | [0x6b] = 0x006b, |
138 | [0x6c] = 0x006c, |
139 | [0x6d] = 0x006d, |
140 | [0x6e] = 0x006e, |
141 | [0x6f] = 0x006f, |
142 | [0x70] = 0x0070, |
143 | [0x71] = 0x0071, |
144 | [0x72] = 0x0072, |
145 | [0x73] = 0x0073, |
146 | [0x74] = 0x0074, |
147 | [0x75] = 0x0075, |
148 | [0x76] = 0x0076, |
149 | [0x77] = 0x0077, |
150 | [0x78] = 0x0078, |
151 | [0x79] = 0x0079, |
152 | [0x7a] = 0x007a, |
153 | [0x7b] = 0x007b, |
154 | [0x7c] = 0x007c, |
155 | [0x7d] = 0x007d, |
156 | [0x7e] = 0x007e, |
157 | [0x7f] = 0x007f, |
158 | [0x80] = 0x0106, |
159 | [0x81] = 0x00fc, |
160 | [0x82] = 0x00e9, |
161 | [0x83] = 0x0101, |
162 | [0x84] = 0x00e4, |
163 | [0x85] = 0x0123, |
164 | [0x86] = 0x00e5, |
165 | [0x87] = 0x0107, |
166 | [0x88] = 0x0142, |
167 | [0x89] = 0x0113, |
168 | [0x8a] = 0x0156, |
169 | [0x8b] = 0x0157, |
170 | [0x8c] = 0x012b, |
171 | [0x8d] = 0x0179, |
172 | [0x8e] = 0x00c4, |
173 | [0x8f] = 0x00c5, |
174 | [0x90] = 0x00c9, |
175 | [0x91] = 0x00e6, |
176 | [0x92] = 0x00c6, |
177 | [0x93] = 0x014d, |
178 | [0x94] = 0x00f6, |
179 | [0x95] = 0x0122, |
180 | [0x96] = 0x00a2, |
181 | [0x97] = 0x015a, |
182 | [0x98] = 0x015b, |
183 | [0x99] = 0x00d6, |
184 | [0x9a] = 0x00dc, |
185 | [0x9b] = 0x00f8, |
186 | [0x9c] = 0x00a3, |
187 | [0x9d] = 0x00d8, |
188 | [0x9e] = 0x00d7, |
189 | [0x9f] = 0x00a4, |
190 | [0xa0] = 0x0100, |
191 | [0xa1] = 0x012a, |
192 | [0xa2] = 0x00f3, |
193 | [0xa3] = 0x017b, |
194 | [0xa4] = 0x017c, |
195 | [0xa5] = 0x017a, |
196 | [0xa6] = 0x201d, |
197 | [0xa7] = 0x00a6, |
198 | [0xa8] = 0x00a9, |
199 | [0xa9] = 0x00ae, |
200 | [0xaa] = 0x00ac, |
201 | [0xab] = 0x00bd, |
202 | [0xac] = 0x00bc, |
203 | [0xad] = 0x0141, |
204 | [0xae] = 0x00ab, |
205 | [0xaf] = 0x00bb, |
206 | [0xb0] = 0x2591, |
207 | [0xb1] = 0x2592, |
208 | [0xb2] = 0x2593, |
209 | [0xb3] = 0x2502, |
210 | [0xb4] = 0x2524, |
211 | [0xb5] = 0x0104, |
212 | [0xb6] = 0x010c, |
213 | [0xb7] = 0x0118, |
214 | [0xb8] = 0x0116, |
215 | [0xb9] = 0x2563, |
216 | [0xba] = 0x2551, |
217 | [0xbb] = 0x2557, |
218 | [0xbc] = 0x255d, |
219 | [0xbd] = 0x012e, |
220 | [0xbe] = 0x0160, |
221 | [0xbf] = 0x2510, |
222 | [0xc0] = 0x2514, |
223 | [0xc1] = 0x2534, |
224 | [0xc2] = 0x252c, |
225 | [0xc3] = 0x251c, |
226 | [0xc4] = 0x2500, |
227 | [0xc5] = 0x253c, |
228 | [0xc6] = 0x0172, |
229 | [0xc7] = 0x016a, |
230 | [0xc8] = 0x255a, |
231 | [0xc9] = 0x2554, |
232 | [0xca] = 0x2569, |
233 | [0xcb] = 0x2566, |
234 | [0xcc] = 0x2560, |
235 | [0xcd] = 0x2550, |
236 | [0xce] = 0x256c, |
237 | [0xcf] = 0x017d, |
238 | [0xd0] = 0x0105, |
239 | [0xd1] = 0x010d, |
240 | [0xd2] = 0x0119, |
241 | [0xd3] = 0x0117, |
242 | [0xd4] = 0x012f, |
243 | [0xd5] = 0x0161, |
244 | [0xd6] = 0x0173, |
245 | [0xd7] = 0x016b, |
246 | [0xd8] = 0x017e, |
247 | [0xd9] = 0x2518, |
248 | [0xda] = 0x250c, |
249 | [0xdb] = 0x2588, |
250 | [0xdc] = 0x2584, |
251 | [0xdd] = 0x258c, |
252 | [0xde] = 0x2590, |
253 | [0xdf] = 0x2580, |
254 | [0xe0] = 0x00d3, |
255 | [0xe1] = 0x00df, |
256 | [0xe2] = 0x014c, |
257 | [0xe3] = 0x0143, |
258 | [0xe4] = 0x00f5, |
259 | [0xe5] = 0x00d5, |
260 | [0xe6] = 0x00b5, |
261 | [0xe7] = 0x0144, |
262 | [0xe8] = 0x0136, |
263 | [0xe9] = 0x0137, |
264 | [0xea] = 0x013b, |
265 | [0xeb] = 0x013c, |
266 | [0xec] = 0x0146, |
267 | [0xed] = 0x0112, |
268 | [0xee] = 0x0145, |
269 | [0xef] = 0x2019, |
270 | [0xf0] = 0x00ad, |
271 | [0xf1] = 0x00b1, |
272 | [0xf2] = 0x201c, |
273 | [0xf3] = 0x00be, |
274 | [0xf4] = 0x00b6, |
275 | [0xf5] = 0x00a7, |
276 | [0xf6] = 0x00f7, |
277 | [0xf7] = 0x201e, |
278 | [0xf8] = 0x00b0, |
279 | [0xf9] = 0x2219, |
280 | [0xfa] = 0x00b7, |
281 | [0xfb] = 0x00b9, |
282 | [0xfc] = 0x00b3, |
283 | [0xfd] = 0x00b2, |
284 | [0xfe] = 0x25a0, |
285 | [0xff] = 0x00a0, |
286 | }; |
287 | |
288 | |
289 | /* Index table for mapping from UCS4. The table can be generated with |
290 | |
291 | cat .../unix/mappings/vendors/micsft/pc/cp775.txt | |
292 | awk '/^0x/ { if (NF > 2) print $2; }' | perl gap.pl |
293 | |
294 | where gap.pl is the file in this directory. |
295 | */ |
296 | static const struct gap from_idx[] = |
297 | { |
298 | { .start = 0x0000, .end = 0x007f, .idx = 0 }, |
299 | { .start = 0x00a0, .end = 0x00c9, .idx = -32 }, |
300 | { .start = 0x00d3, .end = 0x00e9, .idx = -41 }, |
301 | { .start = 0x00f3, .end = 0x0119, .idx = -50 }, |
302 | { .start = 0x0122, .end = 0x0123, .idx = -58 }, |
303 | { .start = 0x012a, .end = 0x012f, .idx = -64 }, |
304 | { .start = 0x0136, .end = 0x014d, .idx = -70 }, |
305 | { .start = 0x0156, .end = 0x0161, .idx = -78 }, |
306 | { .start = 0x016a, .end = 0x016b, .idx = -86 }, |
307 | { .start = 0x0172, .end = 0x017e, .idx = -92 }, |
308 | { .start = 0x2019, .end = 0x201e, .idx = -7926 }, |
309 | { .start = 0x2219, .end = 0x2219, .idx = -8432 }, |
310 | { .start = 0x2500, .end = 0x2502, .idx = -9174 }, |
311 | { .start = 0x250c, .end = 0x251c, .idx = -9183 }, |
312 | { .start = 0x2524, .end = 0x2524, .idx = -9190 }, |
313 | { .start = 0x252c, .end = 0x252c, .idx = -9197 }, |
314 | { .start = 0x2534, .end = 0x2534, .idx = -9204 }, |
315 | { .start = 0x253c, .end = 0x253c, .idx = -9211 }, |
316 | { .start = 0x2550, .end = 0x256c, .idx = -9230 }, |
317 | { .start = 0x2580, .end = 0x2593, .idx = -9249 }, |
318 | { .start = 0x25a0, .end = 0x25a0, .idx = -9261 }, |
319 | { .start = 0xffff, .end = 0xffff, .idx = 0 } |
320 | }; |
321 | |
322 | /* Table accessed through above index table. It can be generated using: |
323 | |
324 | cat .../unix/mappings/vendors/micsft/pc/cp775.txt | |
325 | awk '/^0x/ { if (NF > 2) print $2, $1; }' | perl gaptab.pl |
326 | |
327 | where gaptab.pl is the file in this directory. |
328 | */ |
329 | static const char from_ucs4[] = |
330 | { |
331 | '\x00', '\x01', '\x02', '\x03', '\x04', '\x05', '\x06', '\x07', |
332 | '\x08', '\x09', '\x0a', '\x0b', '\x0c', '\x0d', '\x0e', '\x0f', |
333 | '\x10', '\x11', '\x12', '\x13', '\x14', '\x15', '\x16', '\x17', |
334 | '\x18', '\x19', '\x1a', '\x1b', '\x1c', '\x1d', '\x1e', '\x1f', |
335 | '\x20', '\x21', '\x22', '\x23', '\x24', '\x25', '\x26', '\x27', |
336 | '\x28', '\x29', '\x2a', '\x2b', '\x2c', '\x2d', '\x2e', '\x2f', |
337 | '\x30', '\x31', '\x32', '\x33', '\x34', '\x35', '\x36', '\x37', |
338 | '\x38', '\x39', '\x3a', '\x3b', '\x3c', '\x3d', '\x3e', '\x3f', |
339 | '\x40', '\x41', '\x42', '\x43', '\x44', '\x45', '\x46', '\x47', |
340 | '\x48', '\x49', '\x4a', '\x4b', '\x4c', '\x4d', '\x4e', '\x4f', |
341 | '\x50', '\x51', '\x52', '\x53', '\x54', '\x55', '\x56', '\x57', |
342 | '\x58', '\x59', '\x5a', '\x5b', '\x5c', '\x5d', '\x5e', '\x5f', |
343 | '\x60', '\x61', '\x62', '\x63', '\x64', '\x65', '\x66', '\x67', |
344 | '\x68', '\x69', '\x6a', '\x6b', '\x6c', '\x6d', '\x6e', '\x6f', |
345 | '\x70', '\x71', '\x72', '\x73', '\x74', '\x75', '\x76', '\x77', |
346 | '\x78', '\x79', '\x7a', '\x7b', '\x7c', '\x7d', '\x7e', '\x7f', |
347 | '\xff', '\x00', '\x96', '\x9c', '\x9f', '\x00', '\xa7', '\xf5', |
348 | '\x00', '\xa8', '\x00', '\xae', '\xaa', '\xf0', '\xa9', '\x00', |
349 | '\xf8', '\xf1', '\xfd', '\xfc', '\x00', '\xe6', '\xf4', '\xfa', |
350 | '\x00', '\xfb', '\x00', '\xaf', '\xac', '\xab', '\xf3', '\x00', |
351 | '\x00', '\x00', '\x00', '\x00', '\x8e', '\x8f', '\x92', '\x00', |
352 | '\x00', '\x90', '\xe0', '\x00', '\xe5', '\x99', '\x9e', '\x9d', |
353 | '\x00', '\x00', '\x00', '\x9a', '\x00', '\x00', '\xe1', '\x00', |
354 | '\x00', '\x00', '\x00', '\x84', '\x86', '\x91', '\x00', '\x00', |
355 | '\x82', '\xa2', '\x00', '\xe4', '\x94', '\xf6', '\x9b', '\x00', |
356 | '\x00', '\x00', '\x81', '\x00', '\x00', '\x00', '\xa0', '\x83', |
357 | '\x00', '\x00', '\xb5', '\xd0', '\x80', '\x87', '\x00', '\x00', |
358 | '\x00', '\x00', '\xb6', '\xd1', '\x00', '\x00', '\x00', '\x00', |
359 | '\xed', '\x89', '\x00', '\x00', '\xb8', '\xd3', '\xb7', '\xd2', |
360 | '\x95', '\x85', '\xa1', '\x8c', '\x00', '\x00', '\xbd', '\xd4', |
361 | '\xe8', '\xe9', '\x00', '\x00', '\x00', '\xea', '\xeb', '\x00', |
362 | '\x00', '\x00', '\x00', '\xad', '\x88', '\xe3', '\xe7', '\xee', |
363 | '\xec', '\x00', '\x00', '\x00', '\x00', '\x00', '\xe2', '\x93', |
364 | '\x8a', '\x8b', '\x00', '\x00', '\x97', '\x98', '\x00', '\x00', |
365 | '\x00', '\x00', '\xbe', '\xd5', '\xc7', '\xd7', '\xc6', '\xd6', |
366 | '\x00', '\x00', '\x00', '\x00', '\x00', '\x8d', '\xa5', '\xa3', |
367 | '\xa4', '\xcf', '\xd8', '\xef', '\x00', '\x00', '\xf2', '\xa6', |
368 | '\xf7', '\xf9', '\xc4', '\x00', '\xb3', '\xda', '\x00', '\x00', |
369 | '\x00', '\xbf', '\x00', '\x00', '\x00', '\xc0', '\x00', '\x00', |
370 | '\x00', '\xd9', '\x00', '\x00', '\x00', '\xc3', '\xb4', '\xc2', |
371 | '\xc1', '\xc5', '\xcd', '\xba', '\x00', '\x00', '\xc9', '\x00', |
372 | '\x00', '\xbb', '\x00', '\x00', '\xc8', '\x00', '\x00', '\xbc', |
373 | '\x00', '\x00', '\xcc', '\x00', '\x00', '\xb9', '\x00', '\x00', |
374 | '\xcb', '\x00', '\x00', '\xca', '\x00', '\x00', '\xce', '\xdf', |
375 | '\x00', '\x00', '\x00', '\xdc', '\x00', '\x00', '\x00', '\xdb', |
376 | '\x00', '\x00', '\x00', '\xdd', '\x00', '\x00', '\x00', '\xde', |
377 | '\xb0', '\xb1', '\xb2', '\xfe', |
378 | }; |
379 | |