Update.
[glibc.git] / iconvdata / cns11643.h
blob5117533ab4ca7dd9224f90965a3e7160f72e69d3
1 /* Access functions for CNS 11643 handling.
2 Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Ulrich Drepper <drepper@cygnus.com>, 1998.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, write to the Free
18 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
19 02111-1307 USA. */
21 #include <stdint.h>
24 /* Table for CNS 11643, plane 1 to UCS4 conversion. */
25 extern const uint16_t __cns11643l1_to_ucs4_tab[];
26 /* Table for CNS 11643, plane 2 to UCS4 conversion. */
27 extern const uint16_t __cns11643l2_to_ucs4_tab[];
28 /* Table for CNS 11643, plane 3 to UCS4 conversion. */
29 extern const uint32_t __cns11643l3_to_ucs4_tab[];
30 /* Table for CNS 11643, plane 4 to UCS4 conversion. */
31 extern const uint32_t __cns11643l4_to_ucs4_tab[];
32 /* Table for CNS 11643, plane 5 to UCS4 conversion. */
33 extern const uint32_t __cns11643l5_to_ucs4_tab[];
34 /* Table for CNS 11643, plane 6 to UCS4 conversion. */
35 extern const uint32_t __cns11643l6_to_ucs4_tab[];
36 /* Table for CNS 11643, plane 7 to UCS4 conversion. */
37 extern const uint32_t __cns11643l7_to_ucs4_tab[];
38 /* Table for CNS 11643, plane 15 (old) to UCS4 conversion. */
39 extern const uint32_t __cns11643l15_to_ucs4_tab[];
42 static inline uint32_t
43 cns11643_to_ucs4 (const char **s, size_t avail, unsigned char offset)
45 unsigned char ch = *(*s);
46 unsigned char ch2;
47 unsigned char ch3;
48 uint32_t result;
49 int idx;
51 if (ch < offset || (ch - offset) <= 0x20 || (ch - offset) > 0x30)
52 return __UNKNOWN_10646_CHAR;
54 if (avail < 3)
55 return 0;
57 ch2 = (*s)[1];
58 if ((ch2 - offset) <= 0x20 || (ch2 - offset) >= 0x7f)
59 return __UNKNOWN_10646_CHAR;
61 ch3 = (*s)[2];
62 if ((ch3 - offset) <= 0x20 || (ch3 - offset) >= 0x7f)
63 return __UNKNOWN_10646_CHAR;
65 idx = (ch2 - 0x21 - offset) * 94 + (ch3 - 0x21 - offset);
67 switch (ch - 0x20 - offset)
69 case 1:
70 if (idx > 0x21f2)
71 return __UNKNOWN_10646_CHAR;
72 result = __cns11643l1_to_ucs4_tab[idx];
73 break;
74 case 2:
75 if (idx > 0x1de1)
76 return __UNKNOWN_10646_CHAR;
77 result = __cns11643l2_to_ucs4_tab[idx];
78 break;
79 case 3:
80 if (idx > 0x19bd)
81 return __UNKNOWN_10646_CHAR;
82 result = __cns11643l3_to_ucs4_tab[idx];
83 break;
84 case 4:
85 if (idx > 0x1c81)
86 return __UNKNOWN_10646_CHAR;
87 result = __cns11643l4_to_ucs4_tab[idx];
88 break;
89 case 5:
90 if (idx > 0x219a)
91 return __UNKNOWN_10646_CHAR;
92 result = __cns11643l5_to_ucs4_tab[idx];
93 break;
94 case 6:
95 if (idx > 0x18f3)
96 return __UNKNOWN_10646_CHAR;
97 result = __cns11643l6_to_ucs4_tab[idx];
98 break;
99 case 7:
100 if (idx > 0x198a)
101 return __UNKNOWN_10646_CHAR;
102 result = __cns11643l7_to_ucs4_tab[idx];
103 break;
104 case 15:
105 if (idx > 0x1c00)
106 return __UNKNOWN_10646_CHAR;
107 result = __cns11643l15_to_ucs4_tab[idx];
108 break;
109 default:
110 return __UNKNOWN_10646_CHAR;
113 if (result != L'\0')
114 (*s) += 3;
115 else
116 result = __UNKNOWN_10646_CHAR;
118 return result;
122 /* Tables for the UCS4 -> CNS conversion. */
123 extern const char __cns11643l1_from_ucs4_tab1[][2];
124 extern const char __cns11643l1_from_ucs4_tab2[][2];
125 extern const char __cns11643l1_from_ucs4_tab3[][2];
126 extern const char __cns11643l1_from_ucs4_tab4[][2];
127 extern const char __cns11643l1_from_ucs4_tab5[][2];
128 extern const char __cns11643l1_from_ucs4_tab6[][2];
129 extern const char __cns11643l1_from_ucs4_tab7[][2];
130 extern const char __cns11643l1_from_ucs4_tab8[][2];
131 extern const char __cns11643l1_from_ucs4_tab9[][2];
132 extern const char __cns11643l1_from_ucs4_tab10[][2];
133 extern const char __cns11643l1_from_ucs4_tab11[][2];
134 extern const char __cns11643l1_from_ucs4_tab12[][2];
135 extern const char __cns11643l1_from_ucs4_tab13[][2];
136 extern const char __cns11643l1_from_ucs4_tab14[][2];
137 extern const char __cns11643_from_ucs4p0_tab[][3];
138 extern const char __cns11643_from_ucs4p2_tab[][3];
139 extern const char __cns11643_from_ucs4p2c_tab[][3];
142 static inline size_t
143 ucs4_to_cns11643 (uint32_t wch, char *s, size_t avail)
145 unsigned int ch = (unsigned int) wch;
146 char buf[2];
147 const char *cp = buf;
148 size_t needed = 2;
150 switch (ch)
152 case 0xa7 ... 0xf7:
153 cp = __cns11643l1_from_ucs4_tab1[ch - 0xa7];
154 break;
155 case 0x2c7 ... 0x2d9:
156 cp = __cns11643l1_from_ucs4_tab2[ch - 0x2c7];
157 break;
158 case 0x391 ... 0x3c9:
159 cp = __cns11643l1_from_ucs4_tab3[ch - 0x391];
160 break;
161 case 0x2013 ... 0x203e:
162 cp = __cns11643l1_from_ucs4_tab4[ch - 0x2013];
163 break;
164 case 0x2103:
165 cp = "\x22\x6a";
166 break;
167 case 0x2105:
168 cp = "\x22\x22";
169 break;
170 case 0x2109:
171 cp = "\x22\x6b";
172 break;
173 case 0x2160 ... 0x2169:
174 buf[0] = '\x24';
175 buf[1] = '\x2b' + (ch - 0x2160);
176 break;
177 case 0x2170 ... 0x2179:
178 buf[0] = '\x26';
179 buf[1] = '\x35' + (ch - 0x2170);
180 break;
181 case 0x2190 ... 0x2199:
182 cp = __cns11643l1_from_ucs4_tab5[ch - 0x2190];
183 break;
184 case 0x2215 ... 0x2267:
185 cp = __cns11643l1_from_ucs4_tab6[ch - 0x2215];
186 break;
187 case 0x22a5:
188 cp = "\x22\x47";
189 break;
190 case 0x22bf:
191 cp = "\x22\x4a";
192 break;
193 case 0x2400 ... 0x2421:
194 cp = __cns11643l1_from_ucs4_tab7[ch - 0x2400];
195 break;
196 case 0x2460 ... 0x247d:
197 cp = __cns11643l1_from_ucs4_tab8[ch - 0x2460];
198 break;
199 case 0x2500 ... 0x2642:
200 cp = __cns11643l1_from_ucs4_tab9[ch - 0x2500];
201 break;
202 case 0x3000 ... 0x3029:
203 cp = __cns11643l1_from_ucs4_tab10[ch - 0x3000];
204 break;
205 case 0x30fb:
206 cp = "\x21\x26";
207 break;
208 case 0x3105 ... 0x3129:
209 buf[0] = '\x25';
210 buf[1] = '\x47' + (ch - 0x3105);
211 break;
212 case 0x32a3:
213 cp = "\x22\x21";
214 break;
215 case 0x338e ... 0x33d5:
216 cp = __cns11643l1_from_ucs4_tab11[ch - 0x338e];
217 break;
218 case 0x4e00 ... 0x9f9c:
219 cp = __cns11643l1_from_ucs4_tab12[ch - 0x4e00];
220 if (cp[0] != '\0')
221 break;
222 /* FALLTHROUGH. Let's try the other planes. */
223 case 0x3400 ... 0x4dff:
224 case 0x9f9d ... 0x9fa5:
225 /* Let's try the other planes. */
226 needed = 3;
227 cp = __cns11643_from_ucs4p0_tab[ch - 0x3400];
228 break;
229 case 0xfa28:
230 needed = 3;
231 cp = "\x0f\x58\x4c";
232 break;
233 case 0xfe30 ... 0xfe6b:
234 cp = __cns11643l1_from_ucs4_tab13[ch - 0xfe30];
235 break;
236 case 0xff01 ... 0xff5d:
237 cp = __cns11643l1_from_ucs4_tab14[ch - 0xff01];
238 break;
239 case 0xffe0:
240 cp = "\x22\x66";
241 break;
242 case 0xffe1:
243 cp = "\x22\x67";
244 break;
245 case 0xffe5:
246 cp = "\x22\x64";
247 break;
248 case 0x20000 ... 0x2a6d6:
249 needed = 3;
250 cp = __cns11643_from_ucs4p2_tab[ch - 0x20000];
251 break;
252 case 0x2f800 ... 0x2fa1d:
253 needed = 3;
254 cp = __cns11643_from_ucs4p2c_tab[ch - 0x2f800];
255 break;
256 default:
257 return __UNKNOWN_10646_CHAR;
260 if (cp[0] == '\0')
261 return __UNKNOWN_10646_CHAR;
263 if (avail < needed)
264 return 0;
266 s[0] = cp[0];
267 s[1] = cp[1];
268 if (needed == 3)
269 s[2] = cp[2];
271 return needed;