]>
Commit | Line | Data |
---|---|---|
a04eba3f | 1 | /* Determine the current selected locale. |
b0cacab0 | 2 | Copyright (C) 1995-1999, 2000-2004 Free Software Foundation, Inc. |
a04eba3f TT |
3 | |
4 | This program is free software; you can redistribute it and/or modify it | |
5 | under the terms of the GNU Library General Public License as published | |
6 | by the Free Software Foundation; either version 2, or (at your option) | |
7 | any later version. | |
8 | ||
9 | This program is distributed in the hope that it will be useful, | |
10 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
11 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
12 | Library General Public License for more details. | |
13 | ||
14 | You should have received a copy of the GNU Library General Public | |
15 | License along with this program; if not, write to the Free Software | |
16 | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, | |
17 | USA. */ | |
18 | ||
19 | /* Written by Ulrich Drepper <drepper@gnu.org>, 1995. */ | |
20 | /* Win32 code written by Tor Lillqvist <tml@iki.fi>. */ | |
21 | ||
22 | #ifdef HAVE_CONFIG_H | |
23 | # include <config.h> | |
24 | #endif | |
25 | ||
26 | #include <stdlib.h> | |
27 | #include <locale.h> | |
28 | ||
29 | #if defined _WIN32 || defined __WIN32__ | |
30 | # undef WIN32 /* avoid warning on mingw32 */ | |
31 | # define WIN32 | |
32 | #endif | |
33 | ||
34 | #ifdef WIN32 | |
35 | # define WIN32_LEAN_AND_MEAN | |
36 | # include <windows.h> | |
b0cacab0 TT |
37 | /* List of language codes, sorted by value: |
38 | 0x01 LANG_ARABIC | |
39 | 0x02 LANG_BULGARIAN | |
40 | 0x03 LANG_CATALAN | |
41 | 0x04 LANG_CHINESE | |
42 | 0x05 LANG_CZECH | |
43 | 0x06 LANG_DANISH | |
44 | 0x07 LANG_GERMAN | |
45 | 0x08 LANG_GREEK | |
46 | 0x09 LANG_ENGLISH | |
47 | 0x0a LANG_SPANISH | |
48 | 0x0b LANG_FINNISH | |
49 | 0x0c LANG_FRENCH | |
50 | 0x0d LANG_HEBREW | |
51 | 0x0e LANG_HUNGARIAN | |
52 | 0x0f LANG_ICELANDIC | |
53 | 0x10 LANG_ITALIAN | |
54 | 0x11 LANG_JAPANESE | |
55 | 0x12 LANG_KOREAN | |
56 | 0x13 LANG_DUTCH | |
57 | 0x14 LANG_NORWEGIAN | |
58 | 0x15 LANG_POLISH | |
59 | 0x16 LANG_PORTUGUESE | |
60 | 0x17 LANG_RHAETO_ROMANCE | |
61 | 0x18 LANG_ROMANIAN | |
62 | 0x19 LANG_RUSSIAN | |
63 | 0x1a LANG_CROATIAN == LANG_SERBIAN | |
64 | 0x1b LANG_SLOVAK | |
65 | 0x1c LANG_ALBANIAN | |
66 | 0x1d LANG_SWEDISH | |
67 | 0x1e LANG_THAI | |
68 | 0x1f LANG_TURKISH | |
69 | 0x20 LANG_URDU | |
70 | 0x21 LANG_INDONESIAN | |
71 | 0x22 LANG_UKRAINIAN | |
72 | 0x23 LANG_BELARUSIAN | |
73 | 0x24 LANG_SLOVENIAN | |
74 | 0x25 LANG_ESTONIAN | |
75 | 0x26 LANG_LATVIAN | |
76 | 0x27 LANG_LITHUANIAN | |
77 | 0x28 LANG_TAJIK | |
78 | 0x29 LANG_FARSI | |
79 | 0x2a LANG_VIETNAMESE | |
80 | 0x2b LANG_ARMENIAN | |
81 | 0x2c LANG_AZERI | |
82 | 0x2d LANG_BASQUE | |
83 | 0x2e LANG_SORBIAN | |
84 | 0x2f LANG_MACEDONIAN | |
85 | 0x30 LANG_SUTU | |
86 | 0x31 LANG_TSONGA | |
87 | 0x32 LANG_TSWANA | |
88 | 0x33 LANG_VENDA | |
89 | 0x34 LANG_XHOSA | |
90 | 0x35 LANG_ZULU | |
91 | 0x36 LANG_AFRIKAANS | |
92 | 0x37 LANG_GEORGIAN | |
93 | 0x38 LANG_FAEROESE | |
94 | 0x39 LANG_HINDI | |
95 | 0x3a LANG_MALTESE | |
96 | 0x3b LANG_SAAMI | |
97 | 0x3c LANG_GAELIC | |
98 | 0x3d LANG_YIDDISH | |
99 | 0x3e LANG_MALAY | |
100 | 0x3f LANG_KAZAK | |
101 | 0x40 LANG_KYRGYZ | |
102 | 0x41 LANG_SWAHILI | |
103 | 0x42 LANG_TURKMEN | |
104 | 0x43 LANG_UZBEK | |
105 | 0x44 LANG_TATAR | |
106 | 0x45 LANG_BENGALI | |
107 | 0x46 LANG_PUNJABI | |
108 | 0x47 LANG_GUJARATI | |
109 | 0x48 LANG_ORIYA | |
110 | 0x49 LANG_TAMIL | |
111 | 0x4a LANG_TELUGU | |
112 | 0x4b LANG_KANNADA | |
113 | 0x4c LANG_MALAYALAM | |
114 | 0x4d LANG_ASSAMESE | |
115 | 0x4e LANG_MARATHI | |
116 | 0x4f LANG_SANSKRIT | |
117 | 0x50 LANG_MONGOLIAN | |
118 | 0x51 LANG_TIBETAN | |
119 | 0x52 LANG_WELSH | |
120 | 0x53 LANG_CAMBODIAN | |
121 | 0x54 LANG_LAO | |
122 | 0x55 LANG_BURMESE | |
123 | 0x56 LANG_GALICIAN | |
124 | 0x57 LANG_KONKANI | |
125 | 0x58 LANG_MANIPURI | |
126 | 0x59 LANG_SINDHI | |
127 | 0x5a LANG_SYRIAC | |
128 | 0x5b LANG_SINHALESE | |
129 | 0x5c LANG_CHEROKEE | |
130 | 0x5d LANG_INUKTITUT | |
131 | 0x5e LANG_AMHARIC | |
132 | 0x5f LANG_TAMAZIGHT | |
133 | 0x60 LANG_KASHMIRI | |
134 | 0x61 LANG_NEPALI | |
135 | 0x62 LANG_FRISIAN | |
136 | 0x63 LANG_PASHTO | |
137 | 0x64 LANG_TAGALOG | |
138 | 0x65 LANG_DIVEHI | |
139 | 0x66 LANG_EDO | |
140 | 0x67 LANG_FULFULDE | |
141 | 0x68 LANG_HAUSA | |
142 | 0x69 LANG_IBIBIO | |
143 | 0x6a LANG_YORUBA | |
144 | 0x70 LANG_IGBO | |
145 | 0x71 LANG_KANURI | |
146 | 0x72 LANG_OROMO | |
147 | 0x73 LANG_TIGRINYA | |
148 | 0x74 LANG_GUARANI | |
149 | 0x75 LANG_HAWAIIAN | |
150 | 0x76 LANG_LATIN | |
151 | 0x77 LANG_SOMALI | |
152 | 0x78 LANG_YI | |
153 | 0x79 LANG_PAPIAMENTU | |
154 | */ | |
a04eba3f TT |
155 | /* Mingw headers don't have latest language and sublanguage codes. */ |
156 | # ifndef LANG_AFRIKAANS | |
157 | # define LANG_AFRIKAANS 0x36 | |
158 | # endif | |
159 | # ifndef LANG_ALBANIAN | |
160 | # define LANG_ALBANIAN 0x1c | |
161 | # endif | |
b0cacab0 TT |
162 | # ifndef LANG_AMHARIC |
163 | # define LANG_AMHARIC 0x5e | |
164 | # endif | |
a04eba3f TT |
165 | # ifndef LANG_ARABIC |
166 | # define LANG_ARABIC 0x01 | |
167 | # endif | |
168 | # ifndef LANG_ARMENIAN | |
169 | # define LANG_ARMENIAN 0x2b | |
170 | # endif | |
171 | # ifndef LANG_ASSAMESE | |
172 | # define LANG_ASSAMESE 0x4d | |
173 | # endif | |
174 | # ifndef LANG_AZERI | |
175 | # define LANG_AZERI 0x2c | |
176 | # endif | |
177 | # ifndef LANG_BASQUE | |
178 | # define LANG_BASQUE 0x2d | |
179 | # endif | |
180 | # ifndef LANG_BELARUSIAN | |
181 | # define LANG_BELARUSIAN 0x23 | |
182 | # endif | |
183 | # ifndef LANG_BENGALI | |
184 | # define LANG_BENGALI 0x45 | |
185 | # endif | |
b0cacab0 TT |
186 | # ifndef LANG_BURMESE |
187 | # define LANG_BURMESE 0x55 | |
188 | # endif | |
189 | # ifndef LANG_CAMBODIAN | |
190 | # define LANG_CAMBODIAN 0x53 | |
191 | # endif | |
a04eba3f TT |
192 | # ifndef LANG_CATALAN |
193 | # define LANG_CATALAN 0x03 | |
194 | # endif | |
b0cacab0 TT |
195 | # ifndef LANG_CHEROKEE |
196 | # define LANG_CHEROKEE 0x5c | |
197 | # endif | |
a04eba3f TT |
198 | # ifndef LANG_DIVEHI |
199 | # define LANG_DIVEHI 0x65 | |
200 | # endif | |
b0cacab0 TT |
201 | # ifndef LANG_EDO |
202 | # define LANG_EDO 0x66 | |
203 | # endif | |
a04eba3f TT |
204 | # ifndef LANG_ESTONIAN |
205 | # define LANG_ESTONIAN 0x25 | |
206 | # endif | |
207 | # ifndef LANG_FAEROESE | |
208 | # define LANG_FAEROESE 0x38 | |
209 | # endif | |
210 | # ifndef LANG_FARSI | |
211 | # define LANG_FARSI 0x29 | |
212 | # endif | |
b0cacab0 TT |
213 | # ifndef LANG_FRISIAN |
214 | # define LANG_FRISIAN 0x62 | |
215 | # endif | |
216 | # ifndef LANG_FULFULDE | |
217 | # define LANG_FULFULDE 0x67 | |
218 | # endif | |
219 | # ifndef LANG_GAELIC | |
220 | # define LANG_GAELIC 0x3c | |
221 | # endif | |
a04eba3f TT |
222 | # ifndef LANG_GALICIAN |
223 | # define LANG_GALICIAN 0x56 | |
224 | # endif | |
225 | # ifndef LANG_GEORGIAN | |
226 | # define LANG_GEORGIAN 0x37 | |
227 | # endif | |
b0cacab0 TT |
228 | # ifndef LANG_GUARANI |
229 | # define LANG_GUARANI 0x74 | |
230 | # endif | |
a04eba3f TT |
231 | # ifndef LANG_GUJARATI |
232 | # define LANG_GUJARATI 0x47 | |
233 | # endif | |
b0cacab0 TT |
234 | # ifndef LANG_HAUSA |
235 | # define LANG_HAUSA 0x68 | |
236 | # endif | |
237 | # ifndef LANG_HAWAIIAN | |
238 | # define LANG_HAWAIIAN 0x75 | |
239 | # endif | |
a04eba3f TT |
240 | # ifndef LANG_HEBREW |
241 | # define LANG_HEBREW 0x0d | |
242 | # endif | |
243 | # ifndef LANG_HINDI | |
244 | # define LANG_HINDI 0x39 | |
245 | # endif | |
b0cacab0 TT |
246 | # ifndef LANG_IBIBIO |
247 | # define LANG_IBIBIO 0x69 | |
248 | # endif | |
249 | # ifndef LANG_IGBO | |
250 | # define LANG_IGBO 0x70 | |
251 | # endif | |
a04eba3f TT |
252 | # ifndef LANG_INDONESIAN |
253 | # define LANG_INDONESIAN 0x21 | |
254 | # endif | |
b0cacab0 TT |
255 | # ifndef LANG_INUKTITUT |
256 | # define LANG_INUKTITUT 0x5d | |
257 | # endif | |
a04eba3f TT |
258 | # ifndef LANG_KANNADA |
259 | # define LANG_KANNADA 0x4b | |
260 | # endif | |
b0cacab0 TT |
261 | # ifndef LANG_KANURI |
262 | # define LANG_KANURI 0x71 | |
263 | # endif | |
a04eba3f TT |
264 | # ifndef LANG_KASHMIRI |
265 | # define LANG_KASHMIRI 0x60 | |
266 | # endif | |
267 | # ifndef LANG_KAZAK | |
268 | # define LANG_KAZAK 0x3f | |
269 | # endif | |
270 | # ifndef LANG_KONKANI | |
271 | # define LANG_KONKANI 0x57 | |
272 | # endif | |
273 | # ifndef LANG_KYRGYZ | |
274 | # define LANG_KYRGYZ 0x40 | |
275 | # endif | |
b0cacab0 TT |
276 | # ifndef LANG_LAO |
277 | # define LANG_LAO 0x54 | |
278 | # endif | |
279 | # ifndef LANG_LATIN | |
280 | # define LANG_LATIN 0x76 | |
281 | # endif | |
a04eba3f TT |
282 | # ifndef LANG_LATVIAN |
283 | # define LANG_LATVIAN 0x26 | |
284 | # endif | |
285 | # ifndef LANG_LITHUANIAN | |
286 | # define LANG_LITHUANIAN 0x27 | |
287 | # endif | |
288 | # ifndef LANG_MACEDONIAN | |
289 | # define LANG_MACEDONIAN 0x2f | |
290 | # endif | |
291 | # ifndef LANG_MALAY | |
292 | # define LANG_MALAY 0x3e | |
293 | # endif | |
294 | # ifndef LANG_MALAYALAM | |
295 | # define LANG_MALAYALAM 0x4c | |
296 | # endif | |
b0cacab0 TT |
297 | # ifndef LANG_MALTESE |
298 | # define LANG_MALTESE 0x3a | |
299 | # endif | |
a04eba3f TT |
300 | # ifndef LANG_MANIPURI |
301 | # define LANG_MANIPURI 0x58 | |
302 | # endif | |
303 | # ifndef LANG_MARATHI | |
304 | # define LANG_MARATHI 0x4e | |
305 | # endif | |
306 | # ifndef LANG_MONGOLIAN | |
307 | # define LANG_MONGOLIAN 0x50 | |
308 | # endif | |
309 | # ifndef LANG_NEPALI | |
310 | # define LANG_NEPALI 0x61 | |
311 | # endif | |
312 | # ifndef LANG_ORIYA | |
313 | # define LANG_ORIYA 0x48 | |
314 | # endif | |
b0cacab0 TT |
315 | # ifndef LANG_OROMO |
316 | # define LANG_OROMO 0x72 | |
317 | # endif | |
318 | # ifndef LANG_PAPIAMENTU | |
319 | # define LANG_PAPIAMENTU 0x79 | |
320 | # endif | |
321 | # ifndef LANG_PASHTO | |
322 | # define LANG_PASHTO 0x63 | |
323 | # endif | |
a04eba3f TT |
324 | # ifndef LANG_PUNJABI |
325 | # define LANG_PUNJABI 0x46 | |
326 | # endif | |
b0cacab0 TT |
327 | # ifndef LANG_RHAETO_ROMANCE |
328 | # define LANG_RHAETO_ROMANCE 0x17 | |
329 | # endif | |
330 | # ifndef LANG_SAAMI | |
331 | # define LANG_SAAMI 0x3b | |
332 | # endif | |
a04eba3f TT |
333 | # ifndef LANG_SANSKRIT |
334 | # define LANG_SANSKRIT 0x4f | |
335 | # endif | |
336 | # ifndef LANG_SERBIAN | |
337 | # define LANG_SERBIAN 0x1a | |
338 | # endif | |
339 | # ifndef LANG_SINDHI | |
340 | # define LANG_SINDHI 0x59 | |
341 | # endif | |
b0cacab0 TT |
342 | # ifndef LANG_SINHALESE |
343 | # define LANG_SINHALESE 0x5b | |
344 | # endif | |
a04eba3f TT |
345 | # ifndef LANG_SLOVAK |
346 | # define LANG_SLOVAK 0x1b | |
347 | # endif | |
b0cacab0 TT |
348 | # ifndef LANG_SOMALI |
349 | # define LANG_SOMALI 0x77 | |
350 | # endif | |
a04eba3f TT |
351 | # ifndef LANG_SORBIAN |
352 | # define LANG_SORBIAN 0x2e | |
353 | # endif | |
b0cacab0 TT |
354 | # ifndef LANG_SUTU |
355 | # define LANG_SUTU 0x30 | |
356 | # endif | |
a04eba3f TT |
357 | # ifndef LANG_SWAHILI |
358 | # define LANG_SWAHILI 0x41 | |
359 | # endif | |
360 | # ifndef LANG_SYRIAC | |
361 | # define LANG_SYRIAC 0x5a | |
362 | # endif | |
b0cacab0 TT |
363 | # ifndef LANG_TAGALOG |
364 | # define LANG_TAGALOG 0x64 | |
365 | # endif | |
366 | # ifndef LANG_TAJIK | |
367 | # define LANG_TAJIK 0x28 | |
368 | # endif | |
369 | # ifndef LANG_TAMAZIGHT | |
370 | # define LANG_TAMAZIGHT 0x5f | |
371 | # endif | |
a04eba3f TT |
372 | # ifndef LANG_TAMIL |
373 | # define LANG_TAMIL 0x49 | |
374 | # endif | |
375 | # ifndef LANG_TATAR | |
376 | # define LANG_TATAR 0x44 | |
377 | # endif | |
378 | # ifndef LANG_TELUGU | |
379 | # define LANG_TELUGU 0x4a | |
380 | # endif | |
381 | # ifndef LANG_THAI | |
382 | # define LANG_THAI 0x1e | |
383 | # endif | |
b0cacab0 TT |
384 | # ifndef LANG_TIBETAN |
385 | # define LANG_TIBETAN 0x51 | |
386 | # endif | |
387 | # ifndef LANG_TIGRINYA | |
388 | # define LANG_TIGRINYA 0x73 | |
389 | # endif | |
390 | # ifndef LANG_TSONGA | |
391 | # define LANG_TSONGA 0x31 | |
392 | # endif | |
393 | # ifndef LANG_TSWANA | |
394 | # define LANG_TSWANA 0x32 | |
395 | # endif | |
396 | # ifndef LANG_TURKMEN | |
397 | # define LANG_TURKMEN 0x42 | |
398 | # endif | |
a04eba3f TT |
399 | # ifndef LANG_UKRAINIAN |
400 | # define LANG_UKRAINIAN 0x22 | |
401 | # endif | |
402 | # ifndef LANG_URDU | |
403 | # define LANG_URDU 0x20 | |
404 | # endif | |
405 | # ifndef LANG_UZBEK | |
406 | # define LANG_UZBEK 0x43 | |
407 | # endif | |
b0cacab0 TT |
408 | # ifndef LANG_VENDA |
409 | # define LANG_VENDA 0x33 | |
410 | # endif | |
a04eba3f TT |
411 | # ifndef LANG_VIETNAMESE |
412 | # define LANG_VIETNAMESE 0x2a | |
413 | # endif | |
b0cacab0 TT |
414 | # ifndef LANG_WELSH |
415 | # define LANG_WELSH 0x52 | |
416 | # endif | |
417 | # ifndef LANG_XHOSA | |
418 | # define LANG_XHOSA 0x34 | |
419 | # endif | |
420 | # ifndef LANG_YI | |
421 | # define LANG_YI 0x78 | |
422 | # endif | |
423 | # ifndef LANG_YIDDISH | |
424 | # define LANG_YIDDISH 0x3d | |
425 | # endif | |
426 | # ifndef LANG_YORUBA | |
427 | # define LANG_YORUBA 0x6a | |
428 | # endif | |
429 | # ifndef LANG_ZULU | |
430 | # define LANG_ZULU 0x35 | |
431 | # endif | |
a04eba3f TT |
432 | # ifndef SUBLANG_ARABIC_SAUDI_ARABIA |
433 | # define SUBLANG_ARABIC_SAUDI_ARABIA 0x01 | |
434 | # endif | |
435 | # ifndef SUBLANG_ARABIC_IRAQ | |
436 | # define SUBLANG_ARABIC_IRAQ 0x02 | |
437 | # endif | |
438 | # ifndef SUBLANG_ARABIC_EGYPT | |
439 | # define SUBLANG_ARABIC_EGYPT 0x03 | |
440 | # endif | |
441 | # ifndef SUBLANG_ARABIC_LIBYA | |
442 | # define SUBLANG_ARABIC_LIBYA 0x04 | |
443 | # endif | |
444 | # ifndef SUBLANG_ARABIC_ALGERIA | |
445 | # define SUBLANG_ARABIC_ALGERIA 0x05 | |
446 | # endif | |
447 | # ifndef SUBLANG_ARABIC_MOROCCO | |
448 | # define SUBLANG_ARABIC_MOROCCO 0x06 | |
449 | # endif | |
450 | # ifndef SUBLANG_ARABIC_TUNISIA | |
451 | # define SUBLANG_ARABIC_TUNISIA 0x07 | |
452 | # endif | |
453 | # ifndef SUBLANG_ARABIC_OMAN | |
454 | # define SUBLANG_ARABIC_OMAN 0x08 | |
455 | # endif | |
456 | # ifndef SUBLANG_ARABIC_YEMEN | |
457 | # define SUBLANG_ARABIC_YEMEN 0x09 | |
458 | # endif | |
459 | # ifndef SUBLANG_ARABIC_SYRIA | |
460 | # define SUBLANG_ARABIC_SYRIA 0x0a | |
461 | # endif | |
462 | # ifndef SUBLANG_ARABIC_JORDAN | |
463 | # define SUBLANG_ARABIC_JORDAN 0x0b | |
464 | # endif | |
465 | # ifndef SUBLANG_ARABIC_LEBANON | |
466 | # define SUBLANG_ARABIC_LEBANON 0x0c | |
467 | # endif | |
468 | # ifndef SUBLANG_ARABIC_KUWAIT | |
469 | # define SUBLANG_ARABIC_KUWAIT 0x0d | |
470 | # endif | |
471 | # ifndef SUBLANG_ARABIC_UAE | |
472 | # define SUBLANG_ARABIC_UAE 0x0e | |
473 | # endif | |
474 | # ifndef SUBLANG_ARABIC_BAHRAIN | |
475 | # define SUBLANG_ARABIC_BAHRAIN 0x0f | |
476 | # endif | |
477 | # ifndef SUBLANG_ARABIC_QATAR | |
478 | # define SUBLANG_ARABIC_QATAR 0x10 | |
479 | # endif | |
480 | # ifndef SUBLANG_AZERI_LATIN | |
481 | # define SUBLANG_AZERI_LATIN 0x01 | |
482 | # endif | |
483 | # ifndef SUBLANG_AZERI_CYRILLIC | |
484 | # define SUBLANG_AZERI_CYRILLIC 0x02 | |
485 | # endif | |
b0cacab0 TT |
486 | # ifndef SUBLANG_BENGALI_INDIA |
487 | # define SUBLANG_BENGALI_INDIA 0x00 | |
488 | # endif | |
489 | # ifndef SUBLANG_BENGALI_BANGLADESH | |
490 | # define SUBLANG_BENGALI_BANGLADESH 0x01 | |
491 | # endif | |
a04eba3f TT |
492 | # ifndef SUBLANG_CHINESE_MACAU |
493 | # define SUBLANG_CHINESE_MACAU 0x05 | |
494 | # endif | |
495 | # ifndef SUBLANG_ENGLISH_SOUTH_AFRICA | |
496 | # define SUBLANG_ENGLISH_SOUTH_AFRICA 0x07 | |
497 | # endif | |
498 | # ifndef SUBLANG_ENGLISH_JAMAICA | |
499 | # define SUBLANG_ENGLISH_JAMAICA 0x08 | |
500 | # endif | |
501 | # ifndef SUBLANG_ENGLISH_CARIBBEAN | |
502 | # define SUBLANG_ENGLISH_CARIBBEAN 0x09 | |
503 | # endif | |
504 | # ifndef SUBLANG_ENGLISH_BELIZE | |
505 | # define SUBLANG_ENGLISH_BELIZE 0x0a | |
506 | # endif | |
507 | # ifndef SUBLANG_ENGLISH_TRINIDAD | |
508 | # define SUBLANG_ENGLISH_TRINIDAD 0x0b | |
509 | # endif | |
510 | # ifndef SUBLANG_ENGLISH_ZIMBABWE | |
511 | # define SUBLANG_ENGLISH_ZIMBABWE 0x0c | |
512 | # endif | |
513 | # ifndef SUBLANG_ENGLISH_PHILIPPINES | |
514 | # define SUBLANG_ENGLISH_PHILIPPINES 0x0d | |
515 | # endif | |
b0cacab0 TT |
516 | # ifndef SUBLANG_ENGLISH_INDONESIA |
517 | # define SUBLANG_ENGLISH_INDONESIA 0x0e | |
518 | # endif | |
519 | # ifndef SUBLANG_ENGLISH_HONGKONG | |
520 | # define SUBLANG_ENGLISH_HONGKONG 0x0f | |
521 | # endif | |
522 | # ifndef SUBLANG_ENGLISH_INDIA | |
523 | # define SUBLANG_ENGLISH_INDIA 0x10 | |
524 | # endif | |
525 | # ifndef SUBLANG_ENGLISH_MALAYSIA | |
526 | # define SUBLANG_ENGLISH_MALAYSIA 0x11 | |
527 | # endif | |
528 | # ifndef SUBLANG_ENGLISH_SINGAPORE | |
529 | # define SUBLANG_ENGLISH_SINGAPORE 0x12 | |
530 | # endif | |
a04eba3f TT |
531 | # ifndef SUBLANG_FRENCH_LUXEMBOURG |
532 | # define SUBLANG_FRENCH_LUXEMBOURG 0x05 | |
533 | # endif | |
534 | # ifndef SUBLANG_FRENCH_MONACO | |
535 | # define SUBLANG_FRENCH_MONACO 0x06 | |
536 | # endif | |
b0cacab0 TT |
537 | # ifndef SUBLANG_FRENCH_WESTINDIES |
538 | # define SUBLANG_FRENCH_WESTINDIES 0x07 | |
539 | # endif | |
540 | # ifndef SUBLANG_FRENCH_REUNION | |
541 | # define SUBLANG_FRENCH_REUNION 0x08 | |
542 | # endif | |
543 | # ifndef SUBLANG_FRENCH_CONGO | |
544 | # define SUBLANG_FRENCH_CONGO 0x09 | |
545 | # endif | |
546 | # ifndef SUBLANG_FRENCH_SENEGAL | |
547 | # define SUBLANG_FRENCH_SENEGAL 0x0a | |
548 | # endif | |
549 | # ifndef SUBLANG_FRENCH_CAMEROON | |
550 | # define SUBLANG_FRENCH_CAMEROON 0x0b | |
551 | # endif | |
552 | # ifndef SUBLANG_FRENCH_COTEDIVOIRE | |
553 | # define SUBLANG_FRENCH_COTEDIVOIRE 0x0c | |
554 | # endif | |
555 | # ifndef SUBLANG_FRENCH_MALI | |
556 | # define SUBLANG_FRENCH_MALI 0x0d | |
557 | # endif | |
558 | # ifndef SUBLANG_FRENCH_MOROCCO | |
559 | # define SUBLANG_FRENCH_MOROCCO 0x0e | |
560 | # endif | |
561 | # ifndef SUBLANG_FRENCH_HAITI | |
562 | # define SUBLANG_FRENCH_HAITI 0x0f | |
563 | # endif | |
a04eba3f TT |
564 | # ifndef SUBLANG_GERMAN_LUXEMBOURG |
565 | # define SUBLANG_GERMAN_LUXEMBOURG 0x04 | |
566 | # endif | |
567 | # ifndef SUBLANG_GERMAN_LIECHTENSTEIN | |
568 | # define SUBLANG_GERMAN_LIECHTENSTEIN 0x05 | |
569 | # endif | |
570 | # ifndef SUBLANG_KASHMIRI_INDIA | |
571 | # define SUBLANG_KASHMIRI_INDIA 0x02 | |
572 | # endif | |
573 | # ifndef SUBLANG_MALAY_MALAYSIA | |
574 | # define SUBLANG_MALAY_MALAYSIA 0x01 | |
575 | # endif | |
576 | # ifndef SUBLANG_MALAY_BRUNEI_DARUSSALAM | |
577 | # define SUBLANG_MALAY_BRUNEI_DARUSSALAM 0x02 | |
578 | # endif | |
579 | # ifndef SUBLANG_NEPALI_INDIA | |
580 | # define SUBLANG_NEPALI_INDIA 0x02 | |
581 | # endif | |
b0cacab0 TT |
582 | # ifndef SUBLANG_PUNJABI_INDIA |
583 | # define SUBLANG_PUNJABI_INDIA 0x00 | |
584 | # endif | |
585 | # ifndef SUBLANG_PUNJABI_PAKISTAN | |
586 | # define SUBLANG_PUNJABI_PAKISTAN 0x01 | |
587 | # endif | |
588 | # ifndef SUBLANG_ROMANIAN_ROMANIA | |
589 | # define SUBLANG_ROMANIAN_ROMANIA 0x00 | |
590 | # endif | |
591 | # ifndef SUBLANG_ROMANIAN_MOLDOVA | |
592 | # define SUBLANG_ROMANIAN_MOLDOVA 0x01 | |
593 | # endif | |
a04eba3f TT |
594 | # ifndef SUBLANG_SERBIAN_LATIN |
595 | # define SUBLANG_SERBIAN_LATIN 0x02 | |
596 | # endif | |
597 | # ifndef SUBLANG_SERBIAN_CYRILLIC | |
598 | # define SUBLANG_SERBIAN_CYRILLIC 0x03 | |
599 | # endif | |
b0cacab0 TT |
600 | # ifndef SUBLANG_SINDHI_INDIA |
601 | # define SUBLANG_SINDHI_INDIA 0x00 | |
602 | # endif | |
603 | # ifndef SUBLANG_SINDHI_PAKISTAN | |
604 | # define SUBLANG_SINDHI_PAKISTAN 0x01 | |
605 | # endif | |
a04eba3f TT |
606 | # ifndef SUBLANG_SPANISH_GUATEMALA |
607 | # define SUBLANG_SPANISH_GUATEMALA 0x04 | |
608 | # endif | |
609 | # ifndef SUBLANG_SPANISH_COSTA_RICA | |
610 | # define SUBLANG_SPANISH_COSTA_RICA 0x05 | |
611 | # endif | |
612 | # ifndef SUBLANG_SPANISH_PANAMA | |
613 | # define SUBLANG_SPANISH_PANAMA 0x06 | |
614 | # endif | |
615 | # ifndef SUBLANG_SPANISH_DOMINICAN_REPUBLIC | |
616 | # define SUBLANG_SPANISH_DOMINICAN_REPUBLIC 0x07 | |
617 | # endif | |
618 | # ifndef SUBLANG_SPANISH_VENEZUELA | |
619 | # define SUBLANG_SPANISH_VENEZUELA 0x08 | |
620 | # endif | |
621 | # ifndef SUBLANG_SPANISH_COLOMBIA | |
622 | # define SUBLANG_SPANISH_COLOMBIA 0x09 | |
623 | # endif | |
624 | # ifndef SUBLANG_SPANISH_PERU | |
625 | # define SUBLANG_SPANISH_PERU 0x0a | |
626 | # endif | |
627 | # ifndef SUBLANG_SPANISH_ARGENTINA | |
628 | # define SUBLANG_SPANISH_ARGENTINA 0x0b | |
629 | # endif | |
630 | # ifndef SUBLANG_SPANISH_ECUADOR | |
631 | # define SUBLANG_SPANISH_ECUADOR 0x0c | |
632 | # endif | |
633 | # ifndef SUBLANG_SPANISH_CHILE | |
634 | # define SUBLANG_SPANISH_CHILE 0x0d | |
635 | # endif | |
636 | # ifndef SUBLANG_SPANISH_URUGUAY | |
637 | # define SUBLANG_SPANISH_URUGUAY 0x0e | |
638 | # endif | |
639 | # ifndef SUBLANG_SPANISH_PARAGUAY | |
640 | # define SUBLANG_SPANISH_PARAGUAY 0x0f | |
641 | # endif | |
642 | # ifndef SUBLANG_SPANISH_BOLIVIA | |
643 | # define SUBLANG_SPANISH_BOLIVIA 0x10 | |
644 | # endif | |
645 | # ifndef SUBLANG_SPANISH_EL_SALVADOR | |
646 | # define SUBLANG_SPANISH_EL_SALVADOR 0x11 | |
647 | # endif | |
648 | # ifndef SUBLANG_SPANISH_HONDURAS | |
649 | # define SUBLANG_SPANISH_HONDURAS 0x12 | |
650 | # endif | |
651 | # ifndef SUBLANG_SPANISH_NICARAGUA | |
652 | # define SUBLANG_SPANISH_NICARAGUA 0x13 | |
653 | # endif | |
654 | # ifndef SUBLANG_SPANISH_PUERTO_RICO | |
655 | # define SUBLANG_SPANISH_PUERTO_RICO 0x14 | |
656 | # endif | |
657 | # ifndef SUBLANG_SWEDISH_FINLAND | |
658 | # define SUBLANG_SWEDISH_FINLAND 0x02 | |
659 | # endif | |
b0cacab0 TT |
660 | # ifndef SUBLANG_TAMAZIGHT_ARABIC |
661 | # define SUBLANG_TAMAZIGHT_ARABIC 0x01 | |
662 | # endif | |
663 | # ifndef SUBLANG_TAMAZIGHT_LATIN | |
664 | # define SUBLANG_TAMAZIGHT_LATIN 0x02 | |
665 | # endif | |
666 | # ifndef SUBLANG_TIGRINYA_ETHIOPIA | |
667 | # define SUBLANG_TIGRINYA_ETHIOPIA 0x00 | |
668 | # endif | |
669 | # ifndef SUBLANG_TIGRINYA_ERITREA | |
670 | # define SUBLANG_TIGRINYA_ERITREA 0x01 | |
671 | # endif | |
a04eba3f TT |
672 | # ifndef SUBLANG_URDU_PAKISTAN |
673 | # define SUBLANG_URDU_PAKISTAN 0x01 | |
674 | # endif | |
675 | # ifndef SUBLANG_URDU_INDIA | |
676 | # define SUBLANG_URDU_INDIA 0x02 | |
677 | # endif | |
678 | # ifndef SUBLANG_UZBEK_LATIN | |
679 | # define SUBLANG_UZBEK_LATIN 0x01 | |
680 | # endif | |
681 | # ifndef SUBLANG_UZBEK_CYRILLIC | |
682 | # define SUBLANG_UZBEK_CYRILLIC 0x02 | |
683 | # endif | |
684 | #endif | |
685 | ||
686 | /* XPG3 defines the result of 'setlocale (category, NULL)' as: | |
687 | "Directs 'setlocale()' to query 'category' and return the current | |
688 | setting of 'local'." | |
689 | However it does not specify the exact format. Neither do SUSV2 and | |
690 | ISO C 99. So we can use this feature only on selected systems (e.g. | |
691 | those using GNU C Library). */ | |
692 | #if defined _LIBC || (defined __GNU_LIBRARY__ && __GNU_LIBRARY__ >= 2) | |
693 | # define HAVE_LOCALE_NULL | |
694 | #endif | |
695 | ||
696 | /* Determine the current locale's name, and canonicalize it into XPG syntax | |
697 | language[_territory[.codeset]][@modifier] | |
698 | The codeset part in the result is not reliable; the locale_charset() | |
699 | should be used for codeset information instead. | |
700 | The result must not be freed; it is statically allocated. */ | |
701 | ||
702 | const char * | |
b0cacab0 | 703 | _nl_locale_name (int category, const char *categoryname) |
a04eba3f TT |
704 | { |
705 | const char *retval; | |
706 | ||
707 | #ifndef WIN32 | |
708 | ||
709 | /* Use the POSIX methods of looking to 'LC_ALL', 'LC_xxx', and 'LANG'. | |
710 | On some systems this can be done by the 'setlocale' function itself. */ | |
711 | # if defined HAVE_SETLOCALE && defined HAVE_LC_MESSAGES && defined HAVE_LOCALE_NULL | |
712 | retval = setlocale (category, NULL); | |
713 | # else | |
714 | /* Setting of LC_ALL overwrites all other. */ | |
715 | retval = getenv ("LC_ALL"); | |
716 | if (retval == NULL || retval[0] == '\0') | |
717 | { | |
718 | /* Next comes the name of the desired category. */ | |
719 | retval = getenv (categoryname); | |
720 | if (retval == NULL || retval[0] == '\0') | |
721 | { | |
722 | /* Last possibility is the LANG environment variable. */ | |
723 | retval = getenv ("LANG"); | |
724 | if (retval == NULL || retval[0] == '\0') | |
725 | /* We use C as the default domain. POSIX says this is | |
726 | implementation defined. */ | |
727 | retval = "C"; | |
728 | } | |
729 | } | |
730 | # endif | |
731 | ||
732 | return retval; | |
733 | ||
734 | #else /* WIN32 */ | |
735 | ||
736 | /* Return an XPG style locale name language[_territory][@modifier]. | |
737 | Don't even bother determining the codeset; it's not useful in this | |
738 | context, because message catalogs are not specific to a single | |
739 | codeset. */ | |
740 | ||
741 | LCID lcid; | |
742 | LANGID langid; | |
743 | int primary, sub; | |
744 | ||
745 | /* Let the user override the system settings through environment | |
746 | variables, as on POSIX systems. */ | |
747 | retval = getenv ("LC_ALL"); | |
748 | if (retval != NULL && retval[0] != '\0') | |
749 | return retval; | |
750 | retval = getenv (categoryname); | |
751 | if (retval != NULL && retval[0] != '\0') | |
752 | return retval; | |
753 | retval = getenv ("LANG"); | |
754 | if (retval != NULL && retval[0] != '\0') | |
755 | return retval; | |
756 | ||
757 | /* Use native Win32 API locale ID. */ | |
758 | lcid = GetThreadLocale (); | |
759 | ||
760 | /* Strip off the sorting rules, keep only the language part. */ | |
761 | langid = LANGIDFROMLCID (lcid); | |
762 | ||
763 | /* Split into language and territory part. */ | |
764 | primary = PRIMARYLANGID (langid); | |
765 | sub = SUBLANGID (langid); | |
766 | ||
767 | /* Dispatch on language. | |
768 | See also http://www.unicode.org/unicode/onlinedat/languages.html . | |
769 | For details about languages, see http://www.ethnologue.com/ . */ | |
770 | switch (primary) | |
771 | { | |
772 | case LANG_AFRIKAANS: return "af_ZA"; | |
773 | case LANG_ALBANIAN: return "sq_AL"; | |
b0cacab0 | 774 | case LANG_AMHARIC: return "am_ET"; |
a04eba3f TT |
775 | case LANG_ARABIC: |
776 | switch (sub) | |
777 | { | |
778 | case SUBLANG_ARABIC_SAUDI_ARABIA: return "ar_SA"; | |
779 | case SUBLANG_ARABIC_IRAQ: return "ar_IQ"; | |
780 | case SUBLANG_ARABIC_EGYPT: return "ar_EG"; | |
781 | case SUBLANG_ARABIC_LIBYA: return "ar_LY"; | |
782 | case SUBLANG_ARABIC_ALGERIA: return "ar_DZ"; | |
783 | case SUBLANG_ARABIC_MOROCCO: return "ar_MA"; | |
784 | case SUBLANG_ARABIC_TUNISIA: return "ar_TN"; | |
785 | case SUBLANG_ARABIC_OMAN: return "ar_OM"; | |
786 | case SUBLANG_ARABIC_YEMEN: return "ar_YE"; | |
787 | case SUBLANG_ARABIC_SYRIA: return "ar_SY"; | |
788 | case SUBLANG_ARABIC_JORDAN: return "ar_JO"; | |
789 | case SUBLANG_ARABIC_LEBANON: return "ar_LB"; | |
790 | case SUBLANG_ARABIC_KUWAIT: return "ar_KW"; | |
791 | case SUBLANG_ARABIC_UAE: return "ar_AE"; | |
792 | case SUBLANG_ARABIC_BAHRAIN: return "ar_BH"; | |
793 | case SUBLANG_ARABIC_QATAR: return "ar_QA"; | |
794 | } | |
795 | return "ar"; | |
796 | case LANG_ARMENIAN: return "hy_AM"; | |
797 | case LANG_ASSAMESE: return "as_IN"; | |
798 | case LANG_AZERI: | |
799 | switch (sub) | |
800 | { | |
801 | /* FIXME: Adjust this when Azerbaijani locales appear on Unix. */ | |
802 | case SUBLANG_AZERI_LATIN: return "az_AZ@latin"; | |
803 | case SUBLANG_AZERI_CYRILLIC: return "az_AZ@cyrillic"; | |
804 | } | |
805 | return "az"; | |
806 | case LANG_BASQUE: | |
807 | return "eu"; /* Ambiguous: could be "eu_ES" or "eu_FR". */ | |
808 | case LANG_BELARUSIAN: return "be_BY"; | |
b0cacab0 TT |
809 | case LANG_BENGALI: |
810 | switch (sub) | |
811 | { | |
812 | case SUBLANG_BENGALI_INDIA: return "bn_IN"; | |
813 | case SUBLANG_BENGALI_BANGLADESH: return "bn_BD"; | |
814 | } | |
815 | return "bn"; | |
a04eba3f | 816 | case LANG_BULGARIAN: return "bg_BG"; |
b0cacab0 TT |
817 | case LANG_BURMESE: return "my_MM"; |
818 | case LANG_CAMBODIAN: return "km_KH"; | |
a04eba3f | 819 | case LANG_CATALAN: return "ca_ES"; |
b0cacab0 | 820 | case LANG_CHEROKEE: return "chr_US"; |
a04eba3f TT |
821 | case LANG_CHINESE: |
822 | switch (sub) | |
823 | { | |
824 | case SUBLANG_CHINESE_TRADITIONAL: return "zh_TW"; | |
825 | case SUBLANG_CHINESE_SIMPLIFIED: return "zh_CN"; | |
826 | case SUBLANG_CHINESE_HONGKONG: return "zh_HK"; | |
827 | case SUBLANG_CHINESE_SINGAPORE: return "zh_SG"; | |
828 | case SUBLANG_CHINESE_MACAU: return "zh_MO"; | |
829 | } | |
830 | return "zh"; | |
831 | case LANG_CROATIAN: /* LANG_CROATIAN == LANG_SERBIAN | |
832 | * What used to be called Serbo-Croatian | |
833 | * should really now be two separate | |
834 | * languages because of political reasons. | |
835 | * (Says tml, who knows nothing about Serbian | |
836 | * or Croatian.) | |
837 | * (I can feel those flames coming already.) | |
838 | */ | |
839 | switch (sub) | |
840 | { | |
841 | case SUBLANG_DEFAULT: return "hr_HR"; | |
b0cacab0 TT |
842 | case SUBLANG_SERBIAN_LATIN: return "sr_CS"; |
843 | case SUBLANG_SERBIAN_CYRILLIC: return "sr_CS@cyrillic"; | |
a04eba3f TT |
844 | } |
845 | return "hr"; | |
846 | case LANG_CZECH: return "cs_CZ"; | |
847 | case LANG_DANISH: return "da_DK"; | |
b0cacab0 | 848 | case LANG_DIVEHI: return "dv_MV"; |
a04eba3f TT |
849 | case LANG_DUTCH: |
850 | switch (sub) | |
851 | { | |
852 | case SUBLANG_DUTCH: return "nl_NL"; | |
853 | case SUBLANG_DUTCH_BELGIAN: /* FLEMISH, VLAAMS */ return "nl_BE"; | |
854 | } | |
855 | return "nl"; | |
b0cacab0 | 856 | case LANG_EDO: return "bin_NG"; |
a04eba3f TT |
857 | case LANG_ENGLISH: |
858 | switch (sub) | |
859 | { | |
860 | /* SUBLANG_ENGLISH_US == SUBLANG_DEFAULT. Heh. I thought | |
861 | * English was the language spoken in England. | |
862 | * Oh well. | |
863 | */ | |
864 | case SUBLANG_ENGLISH_US: return "en_US"; | |
865 | case SUBLANG_ENGLISH_UK: return "en_GB"; | |
866 | case SUBLANG_ENGLISH_AUS: return "en_AU"; | |
867 | case SUBLANG_ENGLISH_CAN: return "en_CA"; | |
868 | case SUBLANG_ENGLISH_NZ: return "en_NZ"; | |
869 | case SUBLANG_ENGLISH_EIRE: return "en_IE"; | |
870 | case SUBLANG_ENGLISH_SOUTH_AFRICA: return "en_ZA"; | |
871 | case SUBLANG_ENGLISH_JAMAICA: return "en_JM"; | |
872 | case SUBLANG_ENGLISH_CARIBBEAN: return "en_GD"; /* Grenada? */ | |
873 | case SUBLANG_ENGLISH_BELIZE: return "en_BZ"; | |
874 | case SUBLANG_ENGLISH_TRINIDAD: return "en_TT"; | |
875 | case SUBLANG_ENGLISH_ZIMBABWE: return "en_ZW"; | |
876 | case SUBLANG_ENGLISH_PHILIPPINES: return "en_PH"; | |
b0cacab0 TT |
877 | case SUBLANG_ENGLISH_INDONESIA: return "en_ID"; |
878 | case SUBLANG_ENGLISH_HONGKONG: return "en_HK"; | |
879 | case SUBLANG_ENGLISH_INDIA: return "en_IN"; | |
880 | case SUBLANG_ENGLISH_MALAYSIA: return "en_MY"; | |
881 | case SUBLANG_ENGLISH_SINGAPORE: return "en_SG"; | |
a04eba3f TT |
882 | } |
883 | return "en"; | |
884 | case LANG_ESTONIAN: return "et_EE"; | |
885 | case LANG_FAEROESE: return "fo_FO"; | |
886 | case LANG_FARSI: return "fa_IR"; | |
887 | case LANG_FINNISH: return "fi_FI"; | |
888 | case LANG_FRENCH: | |
889 | switch (sub) | |
890 | { | |
891 | case SUBLANG_FRENCH: return "fr_FR"; | |
892 | case SUBLANG_FRENCH_BELGIAN: /* WALLOON */ return "fr_BE"; | |
893 | case SUBLANG_FRENCH_CANADIAN: return "fr_CA"; | |
894 | case SUBLANG_FRENCH_SWISS: return "fr_CH"; | |
895 | case SUBLANG_FRENCH_LUXEMBOURG: return "fr_LU"; | |
896 | case SUBLANG_FRENCH_MONACO: return "fr_MC"; | |
b0cacab0 TT |
897 | case SUBLANG_FRENCH_WESTINDIES: return "fr"; /* Caribbean? */ |
898 | case SUBLANG_FRENCH_REUNION: return "fr_RE"; | |
899 | case SUBLANG_FRENCH_CONGO: return "fr_CG"; | |
900 | case SUBLANG_FRENCH_SENEGAL: return "fr_SN"; | |
901 | case SUBLANG_FRENCH_CAMEROON: return "fr_CM"; | |
902 | case SUBLANG_FRENCH_COTEDIVOIRE: return "fr_CI"; | |
903 | case SUBLANG_FRENCH_MALI: return "fr_ML"; | |
904 | case SUBLANG_FRENCH_MOROCCO: return "fr_MA"; | |
905 | case SUBLANG_FRENCH_HAITI: return "fr_HT"; | |
a04eba3f TT |
906 | } |
907 | return "fr"; | |
b0cacab0 TT |
908 | case LANG_FRISIAN: return "fy_NL"; |
909 | case LANG_FULFULDE: | |
910 | /* Spoken in Nigeria, Guinea, Senegal, Mali, Niger, Cameroon, Benin. */ | |
911 | return "ff_NG"; | |
912 | case LANG_GAELIC: | |
a04eba3f TT |
913 | switch (sub) |
914 | { | |
915 | case 0x01: /* SCOTTISH */ return "gd_GB"; | |
916 | case 0x02: /* IRISH */ return "ga_IE"; | |
917 | } | |
918 | return "C"; | |
919 | case LANG_GALICIAN: return "gl_ES"; | |
920 | case LANG_GEORGIAN: return "ka_GE"; | |
921 | case LANG_GERMAN: | |
922 | switch (sub) | |
923 | { | |
924 | case SUBLANG_GERMAN: return "de_DE"; | |
925 | case SUBLANG_GERMAN_SWISS: return "de_CH"; | |
926 | case SUBLANG_GERMAN_AUSTRIAN: return "de_AT"; | |
927 | case SUBLANG_GERMAN_LUXEMBOURG: return "de_LU"; | |
928 | case SUBLANG_GERMAN_LIECHTENSTEIN: return "de_LI"; | |
929 | } | |
930 | return "de"; | |
931 | case LANG_GREEK: return "el_GR"; | |
b0cacab0 | 932 | case LANG_GUARANI: return "gn_PY"; |
a04eba3f | 933 | case LANG_GUJARATI: return "gu_IN"; |
b0cacab0 TT |
934 | case LANG_HAUSA: return "ha_NG"; |
935 | case LANG_HAWAIIAN: | |
a04eba3f TT |
936 | /* FIXME: Do they mean Hawaiian ("haw_US", 1000 speakers) |
937 | or Hawaii Creole English ("cpe_US", 600000 speakers)? */ | |
938 | return "cpe_US"; | |
939 | case LANG_HEBREW: return "he_IL"; | |
940 | case LANG_HINDI: return "hi_IN"; | |
941 | case LANG_HUNGARIAN: return "hu_HU"; | |
b0cacab0 | 942 | case LANG_IBIBIO: return "nic_NG"; |
a04eba3f | 943 | case LANG_ICELANDIC: return "is_IS"; |
b0cacab0 | 944 | case LANG_IGBO: return "ig_NG"; |
a04eba3f | 945 | case LANG_INDONESIAN: return "id_ID"; |
b0cacab0 | 946 | case LANG_INUKTITUT: return "iu_CA"; |
a04eba3f TT |
947 | case LANG_ITALIAN: |
948 | switch (sub) | |
949 | { | |
950 | case SUBLANG_ITALIAN: return "it_IT"; | |
951 | case SUBLANG_ITALIAN_SWISS: return "it_CH"; | |
952 | } | |
953 | return "it"; | |
954 | case LANG_JAPANESE: return "ja_JP"; | |
955 | case LANG_KANNADA: return "kn_IN"; | |
b0cacab0 | 956 | case LANG_KANURI: return "kr_NG"; |
a04eba3f TT |
957 | case LANG_KASHMIRI: |
958 | switch (sub) | |
959 | { | |
960 | case SUBLANG_DEFAULT: return "ks_PK"; | |
961 | case SUBLANG_KASHMIRI_INDIA: return "ks_IN"; | |
962 | } | |
963 | return "ks"; | |
964 | case LANG_KAZAK: return "kk_KZ"; | |
965 | case LANG_KONKANI: | |
966 | /* FIXME: Adjust this when such locales appear on Unix. */ | |
967 | return "kok_IN"; | |
968 | case LANG_KOREAN: return "ko_KR"; | |
969 | case LANG_KYRGYZ: return "ky_KG"; | |
b0cacab0 TT |
970 | case LANG_LAO: return "lo_LA"; |
971 | case LANG_LATIN: return "la_VA"; | |
a04eba3f TT |
972 | case LANG_LATVIAN: return "lv_LV"; |
973 | case LANG_LITHUANIAN: return "lt_LT"; | |
974 | case LANG_MACEDONIAN: return "mk_MK"; | |
975 | case LANG_MALAY: | |
976 | switch (sub) | |
977 | { | |
978 | case SUBLANG_MALAY_MALAYSIA: return "ms_MY"; | |
979 | case SUBLANG_MALAY_BRUNEI_DARUSSALAM: return "ms_BN"; | |
980 | } | |
981 | return "ms"; | |
982 | case LANG_MALAYALAM: return "ml_IN"; | |
b0cacab0 | 983 | case LANG_MALTESE: return "mt_MT"; |
a04eba3f TT |
984 | case LANG_MANIPURI: |
985 | /* FIXME: Adjust this when such locales appear on Unix. */ | |
986 | return "mni_IN"; | |
987 | case LANG_MARATHI: return "mr_IN"; | |
988 | case LANG_MONGOLIAN: | |
989 | return "mn"; /* Ambiguous: could be "mn_CN" or "mn_MN". */ | |
990 | case LANG_NEPALI: | |
991 | switch (sub) | |
992 | { | |
993 | case SUBLANG_DEFAULT: return "ne_NP"; | |
994 | case SUBLANG_NEPALI_INDIA: return "ne_IN"; | |
995 | } | |
996 | return "ne"; | |
997 | case LANG_NORWEGIAN: | |
998 | switch (sub) | |
999 | { | |
1000 | case SUBLANG_NORWEGIAN_BOKMAL: return "no_NO"; | |
1001 | case SUBLANG_NORWEGIAN_NYNORSK: return "nn_NO"; | |
1002 | } | |
1003 | return "no"; | |
1004 | case LANG_ORIYA: return "or_IN"; | |
b0cacab0 TT |
1005 | case LANG_OROMO: return "om_ET"; |
1006 | case LANG_PAPIAMENTU: return "pap_AN"; | |
1007 | case LANG_PASHTO: | |
a04eba3f TT |
1008 | return "ps"; /* Ambiguous: could be "ps_PK" or "ps_AF". */ |
1009 | case LANG_POLISH: return "pl_PL"; | |
1010 | case LANG_PORTUGUESE: | |
1011 | switch (sub) | |
1012 | { | |
1013 | case SUBLANG_PORTUGUESE: return "pt_PT"; | |
1014 | /* Hmm. SUBLANG_PORTUGUESE_BRAZILIAN == SUBLANG_DEFAULT. | |
1015 | Same phenomenon as SUBLANG_ENGLISH_US == SUBLANG_DEFAULT. */ | |
1016 | case SUBLANG_PORTUGUESE_BRAZILIAN: return "pt_BR"; | |
1017 | } | |
1018 | return "pt"; | |
b0cacab0 TT |
1019 | case LANG_PUNJABI: |
1020 | switch (sub) | |
1021 | { | |
1022 | case SUBLANG_PUNJABI_INDIA: return "pa_IN"; /* Gurmukhi script */ | |
1023 | case SUBLANG_PUNJABI_PAKISTAN: return "pa_PK"; /* Arabic script */ | |
1024 | } | |
1025 | return "pa"; | |
1026 | case LANG_RHAETO_ROMANCE: return "rm_CH"; | |
1027 | case LANG_ROMANIAN: | |
1028 | switch (sub) | |
1029 | { | |
1030 | case SUBLANG_ROMANIAN_ROMANIA: return "ro_RO"; | |
1031 | case SUBLANG_ROMANIAN_MOLDOVA: return "ro_MD"; | |
1032 | } | |
1033 | return "ro"; | |
a04eba3f | 1034 | case LANG_RUSSIAN: |
b0cacab0 TT |
1035 | return "ru"; /* Ambiguous: could be "ru_RU" or "ru_UA" or "ru_MD". */ |
1036 | case LANG_SAAMI: /* actually Northern Sami */ return "se_NO"; | |
a04eba3f | 1037 | case LANG_SANSKRIT: return "sa_IN"; |
b0cacab0 TT |
1038 | case LANG_SINDHI: |
1039 | switch (sub) | |
1040 | { | |
1041 | case SUBLANG_SINDHI_INDIA: return "sd_IN"; | |
1042 | case SUBLANG_SINDHI_PAKISTAN: return "sd_PK"; | |
1043 | } | |
1044 | return "sd"; | |
1045 | case LANG_SINHALESE: return "si_LK"; | |
a04eba3f TT |
1046 | case LANG_SLOVAK: return "sk_SK"; |
1047 | case LANG_SLOVENIAN: return "sl_SI"; | |
b0cacab0 | 1048 | case LANG_SOMALI: return "so_SO"; |
a04eba3f TT |
1049 | case LANG_SORBIAN: |
1050 | /* FIXME: Adjust this when such locales appear on Unix. */ | |
1051 | return "wen_DE"; | |
1052 | case LANG_SPANISH: | |
1053 | switch (sub) | |
1054 | { | |
1055 | case SUBLANG_SPANISH: return "es_ES"; | |
1056 | case SUBLANG_SPANISH_MEXICAN: return "es_MX"; | |
1057 | case SUBLANG_SPANISH_MODERN: | |
1058 | return "es_ES@modern"; /* not seen on Unix */ | |
1059 | case SUBLANG_SPANISH_GUATEMALA: return "es_GT"; | |
1060 | case SUBLANG_SPANISH_COSTA_RICA: return "es_CR"; | |
1061 | case SUBLANG_SPANISH_PANAMA: return "es_PA"; | |
1062 | case SUBLANG_SPANISH_DOMINICAN_REPUBLIC: return "es_DO"; | |
1063 | case SUBLANG_SPANISH_VENEZUELA: return "es_VE"; | |
1064 | case SUBLANG_SPANISH_COLOMBIA: return "es_CO"; | |
1065 | case SUBLANG_SPANISH_PERU: return "es_PE"; | |
1066 | case SUBLANG_SPANISH_ARGENTINA: return "es_AR"; | |
1067 | case SUBLANG_SPANISH_ECUADOR: return "es_EC"; | |
1068 | case SUBLANG_SPANISH_CHILE: return "es_CL"; | |
1069 | case SUBLANG_SPANISH_URUGUAY: return "es_UY"; | |
1070 | case SUBLANG_SPANISH_PARAGUAY: return "es_PY"; | |
1071 | case SUBLANG_SPANISH_BOLIVIA: return "es_BO"; | |
1072 | case SUBLANG_SPANISH_EL_SALVADOR: return "es_SV"; | |
1073 | case SUBLANG_SPANISH_HONDURAS: return "es_HN"; | |
1074 | case SUBLANG_SPANISH_NICARAGUA: return "es_NI"; | |
1075 | case SUBLANG_SPANISH_PUERTO_RICO: return "es_PR"; | |
1076 | } | |
1077 | return "es"; | |
b0cacab0 | 1078 | case LANG_SUTU: return "bnt_TZ"; /* or "st_LS" or "nso_ZA"? */ |
a04eba3f TT |
1079 | case LANG_SWAHILI: return "sw_KE"; |
1080 | case LANG_SWEDISH: | |
1081 | switch (sub) | |
1082 | { | |
1083 | case SUBLANG_DEFAULT: return "sv_SE"; | |
1084 | case SUBLANG_SWEDISH_FINLAND: return "sv_FI"; | |
1085 | } | |
1086 | return "sv"; | |
1087 | case LANG_SYRIAC: return "syr_TR"; /* An extinct language. */ | |
b0cacab0 TT |
1088 | case LANG_TAGALOG: return "tl_PH"; |
1089 | case LANG_TAJIK: return "tg_TJ"; | |
1090 | case LANG_TAMAZIGHT: | |
1091 | switch (sub) | |
1092 | { | |
1093 | /* FIXME: Adjust this when Tamazight locales appear on Unix. */ | |
1094 | case SUBLANG_TAMAZIGHT_ARABIC: return "ber_MA@arabic"; | |
1095 | case SUBLANG_TAMAZIGHT_LATIN: return "ber_MA@latin"; | |
1096 | } | |
1097 | return "ber_MA"; | |
a04eba3f TT |
1098 | case LANG_TAMIL: |
1099 | return "ta"; /* Ambiguous: could be "ta_IN" or "ta_LK" or "ta_SG". */ | |
1100 | case LANG_TATAR: return "tt_RU"; | |
1101 | case LANG_TELUGU: return "te_IN"; | |
1102 | case LANG_THAI: return "th_TH"; | |
b0cacab0 TT |
1103 | case LANG_TIBETAN: return "bo_CN"; |
1104 | case LANG_TIGRINYA: | |
1105 | switch (sub) | |
1106 | { | |
1107 | case SUBLANG_TIGRINYA_ETHIOPIA: return "ti_ET"; | |
1108 | case SUBLANG_TIGRINYA_ERITREA: return "ti_ER"; | |
1109 | } | |
1110 | return "ti"; | |
1111 | case LANG_TSONGA: return "ts_ZA"; | |
1112 | case LANG_TSWANA: return "tn_BW"; | |
a04eba3f | 1113 | case LANG_TURKISH: return "tr_TR"; |
b0cacab0 | 1114 | case LANG_TURKMEN: return "tk_TM"; |
a04eba3f TT |
1115 | case LANG_UKRAINIAN: return "uk_UA"; |
1116 | case LANG_URDU: | |
1117 | switch (sub) | |
1118 | { | |
1119 | case SUBLANG_URDU_PAKISTAN: return "ur_PK"; | |
1120 | case SUBLANG_URDU_INDIA: return "ur_IN"; | |
1121 | } | |
1122 | return "ur"; | |
1123 | case LANG_UZBEK: | |
1124 | switch (sub) | |
1125 | { | |
b0cacab0 | 1126 | case SUBLANG_UZBEK_LATIN: return "uz_UZ"; |
a04eba3f TT |
1127 | case SUBLANG_UZBEK_CYRILLIC: return "uz_UZ@cyrillic"; |
1128 | } | |
1129 | return "uz"; | |
b0cacab0 | 1130 | case LANG_VENDA: return "ve_ZA"; |
a04eba3f | 1131 | case LANG_VIETNAMESE: return "vi_VN"; |
b0cacab0 TT |
1132 | case LANG_WELSH: return "cy_GB"; |
1133 | case LANG_XHOSA: return "xh_ZA"; | |
1134 | case LANG_YI: return "sit_CN"; | |
1135 | case LANG_YIDDISH: return "yi_IL"; | |
1136 | case LANG_YORUBA: return "yo_NG"; | |
1137 | case LANG_ZULU: return "zu_ZA"; | |
a04eba3f TT |
1138 | default: return "C"; |
1139 | } | |
1140 | ||
1141 | #endif | |
1142 | } |