1 /* Tables for conversion from and to IBM9448.
2    Copyright (C) 2005-2022 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 static const uint32_t to_ucs4[256] =
22 {
23   [0x00] = 0x0000, [0x01] = 0x0001, [0x02] = 0x0002, [0x03] = 0x0003,
24   [0x04] = 0x0004, [0x05] = 0x0005, [0x06] = 0x0006, [0x07] = 0x0007,
25   [0x08] = 0x0008, [0x09] = 0x0009, [0x0a] = 0x000a, [0x0b] = 0x000b,
26   [0x0c] = 0x000c, [0x0d] = 0x000d, [0x0e] = 0x000e, [0x0f] = 0x000f,
27   [0x10] = 0x0010, [0x11] = 0x0011, [0x12] = 0x0012, [0x13] = 0x0013,
28   [0x14] = 0x0014, [0x15] = 0x0015, [0x16] = 0x0016, [0x17] = 0x0017,
29   [0x18] = 0x0018, [0x19] = 0x0019, [0x1a] = 0x001a, [0x1b] = 0x001b,
30   [0x1c] = 0x001c, [0x1d] = 0x001d, [0x1e] = 0x001e, [0x1f] = 0x001f,
31   [0x20] = 0x0020, [0x21] = 0x0021, [0x22] = 0x0022, [0x23] = 0x0023,
32   [0x24] = 0x0024, [0x25] = 0x0025, [0x26] = 0x0026, [0x27] = 0x0027,
33   [0x28] = 0x0028, [0x29] = 0x0029, [0x2a] = 0x002a, [0x2b] = 0x002b,
34   [0x2c] = 0x002c, [0x2d] = 0x002d, [0x2e] = 0x002e, [0x2f] = 0x002f,
35   [0x30] = 0x0030, [0x31] = 0x0031, [0x32] = 0x0032, [0x33] = 0x0033,
36   [0x34] = 0x0034, [0x35] = 0x0035, [0x36] = 0x0036, [0x37] = 0x0037,
37   [0x38] = 0x0038, [0x39] = 0x0039, [0x3a] = 0x003a, [0x3b] = 0x003b,
38   [0x3c] = 0x003c, [0x3d] = 0x003d, [0x3e] = 0x003e, [0x3f] = 0x003f,
39   [0x40] = 0x0040, [0x41] = 0x0041, [0x42] = 0x0042, [0x43] = 0x0043,
40   [0x44] = 0x0044, [0x45] = 0x0045, [0x46] = 0x0046, [0x47] = 0x0047,
41   [0x48] = 0x0048, [0x49] = 0x0049, [0x4a] = 0x004a, [0x4b] = 0x004b,
42   [0x4c] = 0x004c, [0x4d] = 0x004d, [0x4e] = 0x004e, [0x4f] = 0x004f,
43   [0x50] = 0x0050, [0x51] = 0x0051, [0x52] = 0x0052, [0x53] = 0x0053,
44   [0x54] = 0x0054, [0x55] = 0x0055, [0x56] = 0x0056, [0x57] = 0x0057,
45   [0x58] = 0x0058, [0x59] = 0x0059, [0x5a] = 0x005a, [0x5b] = 0x005b,
46   [0x5c] = 0x005c, [0x5d] = 0x005d, [0x5e] = 0x005e, [0x5f] = 0x005f,
47   [0x60] = 0x0060, [0x61] = 0x0061, [0x62] = 0x0062, [0x63] = 0x0063,
48   [0x64] = 0x0064, [0x65] = 0x0065, [0x66] = 0x0066, [0x67] = 0x0067,
49   [0x68] = 0x0068, [0x69] = 0x0069, [0x6a] = 0x006a, [0x6b] = 0x006b,
50   [0x6c] = 0x006c, [0x6d] = 0x006d, [0x6e] = 0x006e, [0x6f] = 0x006f,
51   [0x70] = 0x0070, [0x71] = 0x0071, [0x72] = 0x0072, [0x73] = 0x0073,
52   [0x74] = 0x0074, [0x75] = 0x0075, [0x76] = 0x0076, [0x77] = 0x0077,
53   [0x78] = 0x0078, [0x79] = 0x0079, [0x7a] = 0x007a, [0x7b] = 0x007b,
54   [0x7c] = 0x007c, [0x7d] = 0x007d, [0x7e] = 0x007e, [0x7f] = 0x007f,
55   [0x80] = 0x20ac, [0x81] = 0x067e, [0x82] = 0x201a, [0x83] = 0x0192,
56   [0x84] = 0x201e, [0x85] = 0x2026, [0x86] = 0x2020, [0x87] = 0x2021,
57   [0x88] = 0x02c6, [0x89] = 0x2030, [0x8a] = 0x0679, [0x8b] = 0x2039,
58   [0x8c] = 0x0152, [0x8d] = 0x0686, [0x8e] = 0x0698, [0x8f] = 0x0688,
59   [0x90] = 0x06af, [0x91] = 0x2018, [0x92] = 0x2019, [0x93] = 0x201c,
60   [0x94] = 0x201d, [0x95] = 0x2022, [0x96] = 0x2013, [0x97] = 0x2014,
61   [0x98] = 0x06a9, [0x99] = 0x2122, [0x9a] = 0x0691, [0x9b] = 0x203a,
62   [0x9c] = 0x0153, [0x9d] = 0x200c, [0x9e] = 0x200d, [0x9f] = 0x06ba,
63   [0xa0] = 0x00a0, [0xa1] = 0x060c, [0xa2] = 0x00a2, [0xa3] = 0x00a3,
64   [0xa4] = 0x00a4, [0xa5] = 0x00a5, [0xa6] = 0x00a6, [0xa7] = 0x00a7,
65   [0xa8] = 0x00a8, [0xa9] = 0x00a9, [0xaa] = 0x06be, [0xab] = 0x00ab,
66   [0xac] = 0x00ac, [0xad] = 0x00ad, [0xae] = 0x00ae, [0xaf] = 0x00af,
67   [0xb0] = 0x00b0, [0xb1] = 0x00b1, [0xb2] = 0x00b2, [0xb3] = 0x00b3,
68   [0xb4] = 0x00b4, [0xb5] = 0x00b5, [0xb6] = 0x00b6, [0xb7] = 0x00b7,
69   [0xb8] = 0x00b8, [0xb9] = 0x00b9, [0xba] = 0x061b, [0xbb] = 0x00bb,
70   [0xbc] = 0x00bc, [0xbd] = 0x00bd, [0xbe] = 0x00be, [0xbf] = 0x061f,
71   [0xc0] = 0x06c1, [0xc1] = 0x0621, [0xc2] = 0x0622, [0xc3] = 0x0623,
72   [0xc4] = 0x0624, [0xc5] = 0x0625, [0xc6] = 0x0626, [0xc7] = 0x0627,
73   [0xc8] = 0x0628, [0xc9] = 0x0629, [0xca] = 0x062a, [0xcb] = 0x062b,
74   [0xcc] = 0x062c, [0xcd] = 0x062d, [0xce] = 0x062e, [0xcf] = 0x062f,
75   [0xd0] = 0x0630, [0xd1] = 0x0631, [0xd2] = 0x0632, [0xd3] = 0x0633,
76   [0xd4] = 0x0634, [0xd5] = 0x0635, [0xd6] = 0x0636, [0xd7] = 0x00d7,
77   [0xd8] = 0x0637, [0xd9] = 0x0638, [0xda] = 0x0639, [0xdb] = 0x063a,
78   [0xdc] = 0x0640, [0xdd] = 0x0641, [0xde] = 0x0642, [0xdf] = 0x0643,
79   [0xe0] = 0x00e0, [0xe1] = 0x0644, [0xe2] = 0x00e2, [0xe3] = 0x0645,
80   [0xe4] = 0x0646, [0xe5] = 0x0647, [0xe6] = 0x0648, [0xe7] = 0x00e7,
81   [0xe8] = 0x00e8, [0xe9] = 0x00e9, [0xea] = 0x00ea, [0xeb] = 0x00eb,
82   [0xec] = 0x0649, [0xed] = 0x064a, [0xee] = 0x00ee, [0xef] = 0x00ef,
83   [0xf0] = 0x064b, [0xf1] = 0x064c, [0xf2] = 0x064d, [0xf3] = 0x064e,
84   [0xf4] = 0x00f4, [0xf5] = 0x064f, [0xf6] = 0x0650, [0xf7] = 0x00f7,
85   [0xf8] = 0x0651, [0xf9] = 0x00f9, [0xfa] = 0x0652, [0xfb] = 0x00fb,
86   [0xfc] = 0x00fc, [0xfd] = 0x200e, [0xfe] = 0x200f, [0xff] = 0x06d2
87 };
88 
89 static const struct gap from_idx[] =
90 {
91   { start: 0x0000, end: 0x007f, idx:     0 },
92   { start: 0x00a0, end: 0x00be, idx:   -32 },
93   { start: 0x00d7, end: 0x00d7, idx:   -56 },
94   { start: 0x00e0, end: 0x00fc, idx:   -64 },
95   { start: 0x0152, end: 0x0153, idx:  -149 },
96   { start: 0x0191, end: 0x0192, idx:  -210 },
97   { start: 0x02c6, end: 0x02cb, idx:  -517 },
98   { start: 0x060c, end: 0x060c, idx: -1349 },
99   { start: 0x061b, end: 0x0652, idx: -1363 },
100   { start: 0x0660, end: 0x066c, idx: -1376 },
101   { start: 0x0679, end: 0x067e, idx: -1388 },
102   { start: 0x0686, end: 0x0688, idx: -1395 },
103   { start: 0x0691, end: 0x0691, idx: -1403 },
104   { start: 0x0698, end: 0x0698, idx: -1409 },
105   { start: 0x06a9, end: 0x06af, idx: -1425 },
106   { start: 0x06ba, end: 0x06c1, idx: -1435 },
107   { start: 0x06cc, end: 0x06d2, idx: -1445 },
108   { start: 0x06f0, end: 0x06f9, idx: -1474 },
109   { start: 0x200c, end: 0x2026, idx: -7892 },
110   { start: 0x2030, end: 0x2030, idx: -7901 },
111   { start: 0x2039, end: 0x203e, idx: -7909 },
112   { start: 0x20ac, end: 0x20ac, idx: -8018 },
113   { start: 0x2122, end: 0x2122, idx: -8135 },
114   { start: 0xfb56, end: 0xfb59, idx: -63994 },
115   { start: 0xfb66, end: 0xfb69, idx: -64006 },
116   { start: 0xfb7a, end: 0xfb7d, idx: -64022 },
117   { start: 0xfb88, end: 0xfb95, idx: -64032 },
118   { start: 0xfb9e, end: 0xfb9f, idx: -64040 },
119   { start: 0xfba6, end: 0xfbaf, idx: -64046 },
120   { start: 0xfe70, end: 0xfef4, idx: -64750 },
121   { start: 0xffff, end: 0xffff, idx:     0 }
122 };
123 
124 static const char from_ucs4[] =
125 {
126   '\x00', '\x01', '\x02', '\x03', '\x04', '\x05', '\x06', '\x07',
127   '\x08', '\x09', '\x0a', '\x0b', '\x0c', '\x0d', '\x0e', '\x0f',
128   '\x10', '\x11', '\x12', '\x13', '\x14', '\x15', '\x16', '\x17',
129   '\x18', '\x19', '\x1a', '\x1b', '\x1c', '\x1d', '\x1e', '\x1f',
130   '\x20', '\x21', '\x22', '\x23', '\x24', '\x25', '\x26', '\x27',
131   '\x28', '\x29', '\x2a', '\x2b', '\x2c', '\x2d', '\x2e', '\x2f',
132   '\x30', '\x31', '\x32', '\x33', '\x34', '\x35', '\x36', '\x37',
133   '\x38', '\x39', '\x3a', '\x3b', '\x3c', '\x3d', '\x3e', '\x3f',
134   '\x40', '\x41', '\x42', '\x43', '\x44', '\x45', '\x46', '\x47',
135   '\x48', '\x49', '\x4a', '\x4b', '\x4c', '\x4d', '\x4e', '\x4f',
136   '\x50', '\x51', '\x52', '\x53', '\x54', '\x55', '\x56', '\x57',
137   '\x58', '\x59', '\x5a', '\x5b', '\x5c', '\x5d', '\x5e', '\x5f',
138   '\x60', '\x61', '\x62', '\x63', '\x64', '\x65', '\x66', '\x67',
139   '\x68', '\x69', '\x6a', '\x6b', '\x6c', '\x6d', '\x6e', '\x6f',
140   '\x70', '\x71', '\x72', '\x73', '\x74', '\x75', '\x76', '\x77',
141   '\x78', '\x79', '\x7a', '\x7b', '\x7c', '\x7d', '\x7e', '\x7f',
142   '\xa0', '\x00', '\xa2', '\xa3', '\xa4', '\xa5', '\xa6', '\xa7',
143   '\xa8', '\xa9', '\x00', '\xab', '\xac', '\xad', '\xae', '\xaf',
144   '\xb0', '\xb1', '\xb2', '\xb3', '\xb4', '\xb5', '\xb6', '\xb7',
145   '\xb8', '\xb9', '\x00', '\xbb', '\xbc', '\xbd', '\xbe', '\xd7',
146   '\xe0', '\x00', '\xe2', '\x00', '\x00', '\x00', '\x00', '\xe7',
147   '\xe8', '\xe9', '\xea', '\xeb', '\x00', '\x00', '\xee', '\xef',
148   '\x00', '\x00', '\x00', '\x00', '\xf4', '\x00', '\x00', '\xf7',
149   '\x00', '\xf9', '\x00', '\xfb', '\xfc', '\x8c', '\x9c', '\x46',
150   '\x83', '\x88', '\x00', '\x00', '\x00', '\x00', '\x60', '\xa1',
151   '\xba', '\x00', '\x00', '\x00', '\xbf', '\x00', '\xc1', '\xc2',
152   '\xc3', '\xc4', '\xc5', '\xc6', '\xc7', '\xc8', '\xc9', '\xca',
153   '\xcb', '\xcc', '\xcd', '\xce', '\xcf', '\xd0', '\xd1', '\xd2',
154   '\xd3', '\xd4', '\xd5', '\xd6', '\xd8', '\xd9', '\xda', '\xdb',
155   '\x00', '\x00', '\x00', '\x00', '\x00', '\xdc', '\xdd', '\xde',
156   '\xdf', '\xe1', '\xe3', '\xe4', '\xe5', '\xe6', '\xec', '\xed',
157   '\xf0', '\xf1', '\xf2', '\xf3', '\xf5', '\xf6', '\xf8', '\xfa',
158   '\x30', '\x31', '\x32', '\x33', '\x34', '\x35', '\x36', '\x37',
159   '\x38', '\x39', '\x00', '\x2c', '\x2e', '\x8a', '\x00', '\x00',
160   '\x00', '\x00', '\x81', '\x8d', '\x00', '\x8f', '\x9a', '\x8e',
161   '\x98', '\x00', '\x00', '\x00', '\x00', '\x00', '\x90', '\x9f',
162   '\x00', '\x00', '\x00', '\xaa', '\x00', '\x00', '\xc0', '\xed',
163   '\x00', '\x00', '\x00', '\x00', '\x00', '\xff', '\x30', '\x31',
164   '\x32', '\x33', '\x34', '\x35', '\x36', '\x37', '\x38', '\x39',
165   '\x9d', '\x9e', '\xfd', '\xfe', '\x00', '\x00', '\x00', '\x96',
166   '\x97', '\x00', '\x00', '\x00', '\x91', '\x92', '\x82', '\x00',
167   '\x93', '\x94', '\x84', '\x00', '\x86', '\x87', '\x95', '\x00',
168   '\x00', '\x00', '\x85', '\x89', '\x8b', '\x9b', '\x00', '\x00',
169   '\x00', '\xaf', '\x80', '\x99', '\x81', '\x81', '\x81', '\x81',
170   '\x8a', '\x8a', '\x8a', '\x8a', '\x8d', '\x8d', '\x8d', '\x8d',
171   '\x8f', '\x8f', '\x8e', '\x8e', '\x9a', '\x9a', '\x98', '\x98',
172   '\x98', '\x98', '\x90', '\x90', '\x90', '\x90', '\x9f', '\x9f',
173   '\xc0', '\xc0', '\xc0', '\xc0', '\xaa', '\xaa', '\xaa', '\xaa',
174   '\xff', '\xff', '\xf0', '\xf0', '\xf1', '\x20', '\xf2', '\x00',
175   '\xf3', '\xf3', '\xf5', '\xf5', '\xf6', '\xf6', '\xf8', '\xf8',
176   '\xfa', '\xfa', '\xc1', '\xc2', '\xc2', '\xc3', '\xc3', '\xc4',
177   '\xc4', '\xc5', '\xc5', '\xc6', '\xc6', '\xc6', '\xc6', '\xc7',
178   '\xc7', '\xc8', '\xc8', '\xc8', '\xc8', '\xc9', '\xc9', '\xca',
179   '\xca', '\xca', '\xca', '\xcb', '\xcb', '\xcb', '\xcb', '\xcc',
180   '\xcc', '\xcc', '\xcc', '\xcd', '\xcd', '\xcd', '\xcd', '\xce',
181   '\xce', '\xce', '\xce', '\xcf', '\xcf', '\xd0', '\xd0', '\xd1',
182   '\xd1', '\xd2', '\xd2', '\xd3', '\xd3', '\xd3', '\xd3', '\xd4',
183   '\xd4', '\xd4', '\xd4', '\xd5', '\xd5', '\xd5', '\xd5', '\xd6',
184   '\xd6', '\xd6', '\xd6', '\xd8', '\xd8', '\xd8', '\xd8', '\xd9',
185   '\xd9', '\xd9', '\xd9', '\xda', '\xda', '\xda', '\xda', '\xdb',
186   '\xdb', '\xdb', '\xdb', '\xdd', '\xdd', '\xdd', '\xdd', '\xde',
187   '\xde', '\xde', '\xde', '\xdf', '\xdf', '\xdf', '\xdf', '\xe1',
188   '\xe1', '\xe1', '\xe1', '\xe3', '\xe3', '\xe3', '\xe3', '\xe4',
189   '\xe4', '\xe4', '\xe4', '\xe5', '\xe5', '\xe5', '\xe5', '\xe6',
190   '\xe6', '\xec', '\xec', '\xed', '\xed', '\xed', '\xed'
191 };
192