?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Newer gettext
[gliv.git] / intl / localename.c
blob89a9692bbdbfef58d59b25c994f4ac30c4ff6630
1 /* Determine name of the currently selected locale.
2 Copyright (C) 1995-1999, 2000-2010 Free Software Foundation, Inc.
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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
17 USA. */
18
19 /* Written by Ulrich Drepper <drepper@gnu.org>, 1995. */
20 /* Win32 code written by Tor Lillqvist <tml@iki.fi>. */
21 /* MacOS X code written by Bruno Haible <bruno@clisp.org>. */
22
23 #include <config.h>
24
25 /* Specification. */
26 #ifdef IN_LIBINTL
27 # include "gettextP.h"
28 #else
29 # include "localename.h"
30 #endif
31
32 #include <limits.h>
33 #include <stddef.h>
34 #include <stdlib.h>
35 #include <locale.h>
36 #include <string.h>
37
38 #if HAVE_USELOCALE
39 /* MacOS X 10.5 defines the locale_t type in <xlocale.h>. */
40 # if defined __APPLE__ && defined __MACH__
41 # include <xlocale.h>
42 # endif
43 # include <langinfo.h>
44 # if !defined IN_LIBINTL
45 # include "glthread/lock.h"
46 # endif
47 #endif
48
49 #if HAVE_CFLOCALECOPYCURRENT || HAVE_CFPREFERENCESCOPYAPPVALUE
50 # include <CoreFoundation/CFString.h>
51 # if HAVE_CFLOCALECOPYCURRENT
52 # include <CoreFoundation/CFLocale.h>
53 # elif HAVE_CFPREFERENCESCOPYAPPVALUE
54 # include <CoreFoundation/CFPreferences.h>
55 # endif
56 #endif
57
58 #if defined _WIN32 || defined __WIN32__
59 # define WIN32_NATIVE
60 #endif
61
62 #if defined WIN32_NATIVE || defined __CYGWIN__ /* WIN32 or Cygwin */
63 # define WIN32_LEAN_AND_MEAN
64 # include <windows.h>
65 /* List of language codes, sorted by value:
66 0x01 LANG_ARABIC
67 0x02 LANG_BULGARIAN
68 0x03 LANG_CATALAN
69 0x04 LANG_CHINESE
70 0x05 LANG_CZECH
71 0x06 LANG_DANISH
72 0x07 LANG_GERMAN
73 0x08 LANG_GREEK
74 0x09 LANG_ENGLISH
75 0x0a LANG_SPANISH
76 0x0b LANG_FINNISH
77 0x0c LANG_FRENCH
78 0x0d LANG_HEBREW
79 0x0e LANG_HUNGARIAN
80 0x0f LANG_ICELANDIC
81 0x10 LANG_ITALIAN
82 0x11 LANG_JAPANESE
83 0x12 LANG_KOREAN
84 0x13 LANG_DUTCH
85 0x14 LANG_NORWEGIAN
86 0x15 LANG_POLISH
87 0x16 LANG_PORTUGUESE
88 0x17 LANG_ROMANSH
89 0x18 LANG_ROMANIAN
90 0x19 LANG_RUSSIAN
91 0x1a LANG_CROATIAN == LANG_SERBIAN
92 0x1b LANG_SLOVAK
93 0x1c LANG_ALBANIAN
94 0x1d LANG_SWEDISH
95 0x1e LANG_THAI
96 0x1f LANG_TURKISH
97 0x20 LANG_URDU
98 0x21 LANG_INDONESIAN
99 0x22 LANG_UKRAINIAN
100 0x23 LANG_BELARUSIAN
101 0x24 LANG_SLOVENIAN
102 0x25 LANG_ESTONIAN
103 0x26 LANG_LATVIAN
104 0x27 LANG_LITHUANIAN
105 0x28 LANG_TAJIK
106 0x29 LANG_FARSI
107 0x2a LANG_VIETNAMESE
108 0x2b LANG_ARMENIAN
109 0x2c LANG_AZERI
110 0x2d LANG_BASQUE
111 0x2e LANG_SORBIAN
112 0x2f LANG_MACEDONIAN
113 0x30 LANG_SUTU
114 0x31 LANG_TSONGA
115 0x32 LANG_TSWANA
116 0x33 LANG_VENDA
117 0x34 LANG_XHOSA
118 0x35 LANG_ZULU
119 0x36 LANG_AFRIKAANS
120 0x37 LANG_GEORGIAN
121 0x38 LANG_FAEROESE
122 0x39 LANG_HINDI
123 0x3a LANG_MALTESE
124 0x3b LANG_SAMI
125 0x3c LANG_GAELIC
126 0x3d LANG_YIDDISH
127 0x3e LANG_MALAY
128 0x3f LANG_KAZAK
129 0x40 LANG_KYRGYZ
130 0x41 LANG_SWAHILI
131 0x42 LANG_TURKMEN
132 0x43 LANG_UZBEK
133 0x44 LANG_TATAR
134 0x45 LANG_BENGALI
135 0x46 LANG_PUNJABI
136 0x47 LANG_GUJARATI
137 0x48 LANG_ORIYA
138 0x49 LANG_TAMIL
139 0x4a LANG_TELUGU
140 0x4b LANG_KANNADA
141 0x4c LANG_MALAYALAM
142 0x4d LANG_ASSAMESE
143 0x4e LANG_MARATHI
144 0x4f LANG_SANSKRIT
145 0x50 LANG_MONGOLIAN
146 0x51 LANG_TIBETAN
147 0x52 LANG_WELSH
148 0x53 LANG_CAMBODIAN
149 0x54 LANG_LAO
150 0x55 LANG_BURMESE
151 0x56 LANG_GALICIAN
152 0x57 LANG_KONKANI
153 0x58 LANG_MANIPURI
154 0x59 LANG_SINDHI
155 0x5a LANG_SYRIAC
156 0x5b LANG_SINHALESE
157 0x5c LANG_CHEROKEE
158 0x5d LANG_INUKTITUT
159 0x5e LANG_AMHARIC
160 0x5f LANG_TAMAZIGHT
161 0x60 LANG_KASHMIRI
162 0x61 LANG_NEPALI
163 0x62 LANG_FRISIAN
164 0x63 LANG_PASHTO
165 0x64 LANG_TAGALOG
166 0x65 LANG_DIVEHI
167 0x66 LANG_EDO
168 0x67 LANG_FULFULDE
169 0x68 LANG_HAUSA
170 0x69 LANG_IBIBIO
171 0x6a LANG_YORUBA
172 0x6d LANG_BASHKIR
173 0x6e LANG_LUXEMBOURGISH
174 0x6f LANG_GREENLANDIC
175 0x70 LANG_IGBO
176 0x71 LANG_KANURI
177 0x72 LANG_OROMO
178 0x73 LANG_TIGRINYA
179 0x74 LANG_GUARANI
180 0x75 LANG_HAWAIIAN
181 0x76 LANG_LATIN
182 0x77 LANG_SOMALI
183 0x78 LANG_YI
184 0x79 LANG_PAPIAMENTU
185 0x7a LANG_MAPUDUNGUN
186 0x7c LANG_MOHAWK
187 0x7e LANG_BRETON
188 0x82 LANG_OCCITAN
189 0x83 LANG_CORSICAN
190 0x84 LANG_ALSATIAN
191 0x85 LANG_YAKUT
192 0x86 LANG_KICHE
193 0x87 LANG_KINYARWANDA
194 0x88 LANG_WOLOF
195 0x8c LANG_DARI
196 0x91 LANG_SCOTTISH_GAELIC
197 */
198 /* Mingw headers don't have latest language and sublanguage codes. */
199 # ifndef LANG_AFRIKAANS
200 # define LANG_AFRIKAANS 0x36
201 # endif
202 # ifndef LANG_ALBANIAN
203 # define LANG_ALBANIAN 0x1c
204 # endif
205 # ifndef LANG_ALSATIAN
206 # define LANG_ALSATIAN 0x84
207 # endif
208 # ifndef LANG_AMHARIC
209 # define LANG_AMHARIC 0x5e
210 # endif
211 # ifndef LANG_ARABIC
212 # define LANG_ARABIC 0x01
213 # endif
214 # ifndef LANG_ARMENIAN
215 # define LANG_ARMENIAN 0x2b
216 # endif
217 # ifndef LANG_ASSAMESE
218 # define LANG_ASSAMESE 0x4d
219 # endif
220 # ifndef LANG_AZERI
221 # define LANG_AZERI 0x2c
222 # endif
223 # ifndef LANG_BASHKIR
224 # define LANG_BASHKIR 0x6d
225 # endif
226 # ifndef LANG_BASQUE
227 # define LANG_BASQUE 0x2d
228 # endif
229 # ifndef LANG_BELARUSIAN
230 # define LANG_BELARUSIAN 0x23
231 # endif
232 # ifndef LANG_BENGALI
233 # define LANG_BENGALI 0x45
234 # endif
235 # ifndef LANG_BRETON
236 # define LANG_BRETON 0x7e
237 # endif
238 # ifndef LANG_BURMESE
239 # define LANG_BURMESE 0x55
240 # endif
241 # ifndef LANG_CAMBODIAN
242 # define LANG_CAMBODIAN 0x53
243 # endif
244 # ifndef LANG_CATALAN
245 # define LANG_CATALAN 0x03
246 # endif
247 # ifndef LANG_CHEROKEE
248 # define LANG_CHEROKEE 0x5c
249 # endif
250 # ifndef LANG_CORSICAN
251 # define LANG_CORSICAN 0x83
252 # endif
253 # ifndef LANG_DARI
254 # define LANG_DARI 0x8c
255 # endif
256 # ifndef LANG_DIVEHI
257 # define LANG_DIVEHI 0x65
258 # endif
259 # ifndef LANG_EDO
260 # define LANG_EDO 0x66
261 # endif
262 # ifndef LANG_ESTONIAN
263 # define LANG_ESTONIAN 0x25
264 # endif
265 # ifndef LANG_FAEROESE
266 # define LANG_FAEROESE 0x38
267 # endif
268 # ifndef LANG_FARSI
269 # define LANG_FARSI 0x29
270 # endif
271 # ifndef LANG_FRISIAN
272 # define LANG_FRISIAN 0x62
273 # endif
274 # ifndef LANG_FULFULDE
275 # define LANG_FULFULDE 0x67
276 # endif
277 # ifndef LANG_GAELIC
278 # define LANG_GAELIC 0x3c
279 # endif
280 # ifndef LANG_GALICIAN
281 # define LANG_GALICIAN 0x56
282 # endif
283 # ifndef LANG_GEORGIAN
284 # define LANG_GEORGIAN 0x37
285 # endif
286 # ifndef LANG_GREENLANDIC
287 # define LANG_GREENLANDIC 0x6f
288 # endif
289 # ifndef LANG_GUARANI
290 # define LANG_GUARANI 0x74
291 # endif
292 # ifndef LANG_GUJARATI
293 # define LANG_GUJARATI 0x47
294 # endif
295 # ifndef LANG_HAUSA
296 # define LANG_HAUSA 0x68
297 # endif
298 # ifndef LANG_HAWAIIAN
299 # define LANG_HAWAIIAN 0x75
300 # endif
301 # ifndef LANG_HEBREW
302 # define LANG_HEBREW 0x0d
303 # endif
304 # ifndef LANG_HINDI
305 # define LANG_HINDI 0x39
306 # endif
307 # ifndef LANG_IBIBIO
308 # define LANG_IBIBIO 0x69
309 # endif
310 # ifndef LANG_IGBO
311 # define LANG_IGBO 0x70
312 # endif
313 # ifndef LANG_INDONESIAN
314 # define LANG_INDONESIAN 0x21
315 # endif
316 # ifndef LANG_INUKTITUT
317 # define LANG_INUKTITUT 0x5d
318 # endif
319 # ifndef LANG_KANNADA
320 # define LANG_KANNADA 0x4b
321 # endif
322 # ifndef LANG_KANURI
323 # define LANG_KANURI 0x71
324 # endif
325 # ifndef LANG_KASHMIRI
326 # define LANG_KASHMIRI 0x60
327 # endif
328 # ifndef LANG_KAZAK
329 # define LANG_KAZAK 0x3f
330 # endif
331 # ifndef LANG_KICHE
332 # define LANG_KICHE 0x86
333 # endif
334 # ifndef LANG_KINYARWANDA
335 # define LANG_KINYARWANDA 0x87
336 # endif
337 # ifndef LANG_KONKANI
338 # define LANG_KONKANI 0x57
339 # endif
340 # ifndef LANG_KYRGYZ
341 # define LANG_KYRGYZ 0x40
342 # endif
343 # ifndef LANG_LAO
344 # define LANG_LAO 0x54
345 # endif
346 # ifndef LANG_LATIN
347 # define LANG_LATIN 0x76
348 # endif
349 # ifndef LANG_LATVIAN
350 # define LANG_LATVIAN 0x26
351 # endif
352 # ifndef LANG_LITHUANIAN
353 # define LANG_LITHUANIAN 0x27
354 # endif
355 # ifndef LANG_LUXEMBOURGISH
356 # define LANG_LUXEMBOURGISH 0x6e
357 # endif
358 # ifndef LANG_MACEDONIAN
359 # define LANG_MACEDONIAN 0x2f
360 # endif
361 # ifndef LANG_MALAY
362 # define LANG_MALAY 0x3e
363 # endif
364 # ifndef LANG_MALAYALAM
365 # define LANG_MALAYALAM 0x4c
366 # endif
367 # ifndef LANG_MALTESE
368 # define LANG_MALTESE 0x3a
369 # endif
370 # ifndef LANG_MANIPURI
371 # define LANG_MANIPURI 0x58
372 # endif
373 # ifndef LANG_MAORI
374 # define LANG_MAORI 0x81
375 # endif
376 # ifndef LANG_MAPUDUNGUN
377 # define LANG_MAPUDUNGUN 0x7a
378 # endif
379 # ifndef LANG_MARATHI
380 # define LANG_MARATHI 0x4e
381 # endif
382 # ifndef LANG_MOHAWK
383 # define LANG_MOHAWK 0x7c
384 # endif
385 # ifndef LANG_MONGOLIAN
386 # define LANG_MONGOLIAN 0x50
387 # endif
388 # ifndef LANG_NEPALI
389 # define LANG_NEPALI 0x61
390 # endif
391 # ifndef LANG_OCCITAN
392 # define LANG_OCCITAN 0x82
393 # endif
394 # ifndef LANG_ORIYA
395 # define LANG_ORIYA 0x48
396 # endif
397 # ifndef LANG_OROMO
398 # define LANG_OROMO 0x72
399 # endif
400 # ifndef LANG_PAPIAMENTU
401 # define LANG_PAPIAMENTU 0x79
402 # endif
403 # ifndef LANG_PASHTO
404 # define LANG_PASHTO 0x63
405 # endif
406 # ifndef LANG_PUNJABI
407 # define LANG_PUNJABI 0x46
408 # endif
409 # ifndef LANG_QUECHUA
410 # define LANG_QUECHUA 0x6b
411 # endif
412 # ifndef LANG_ROMANSH
413 # define LANG_ROMANSH 0x17
414 # endif
415 # ifndef LANG_SAMI
416 # define LANG_SAMI 0x3b
417 # endif
418 # ifndef LANG_SANSKRIT
419 # define LANG_SANSKRIT 0x4f
420 # endif
421 # ifndef LANG_SCOTTISH_GAELIC
422 # define LANG_SCOTTISH_GAELIC 0x91
423 # endif
424 # ifndef LANG_SERBIAN
425 # define LANG_SERBIAN 0x1a
426 # endif
427 # ifndef LANG_SINDHI
428 # define LANG_SINDHI 0x59
429 # endif
430 # ifndef LANG_SINHALESE
431 # define LANG_SINHALESE 0x5b
432 # endif
433 # ifndef LANG_SLOVAK
434 # define LANG_SLOVAK 0x1b
435 # endif
436 # ifndef LANG_SOMALI
437 # define LANG_SOMALI 0x77
438 # endif
439 # ifndef LANG_SORBIAN
440 # define LANG_SORBIAN 0x2e
441 # endif
442 # ifndef LANG_SOTHO
443 # define LANG_SOTHO 0x6c
444 # endif
445 # ifndef LANG_SUTU
446 # define LANG_SUTU 0x30
447 # endif
448 # ifndef LANG_SWAHILI
449 # define LANG_SWAHILI 0x41
450 # endif
451 # ifndef LANG_SYRIAC
452 # define LANG_SYRIAC 0x5a
453 # endif
454 # ifndef LANG_TAGALOG
455 # define LANG_TAGALOG 0x64
456 # endif
457 # ifndef LANG_TAJIK
458 # define LANG_TAJIK 0x28
459 # endif
460 # ifndef LANG_TAMAZIGHT
461 # define LANG_TAMAZIGHT 0x5f
462 # endif
463 # ifndef LANG_TAMIL
464 # define LANG_TAMIL 0x49
465 # endif
466 # ifndef LANG_TATAR
467 # define LANG_TATAR 0x44
468 # endif
469 # ifndef LANG_TELUGU
470 # define LANG_TELUGU 0x4a
471 # endif
472 # ifndef LANG_THAI
473 # define LANG_THAI 0x1e
474 # endif
475 # ifndef LANG_TIBETAN
476 # define LANG_TIBETAN 0x51
477 # endif
478 # ifndef LANG_TIGRINYA
479 # define LANG_TIGRINYA 0x73
480 # endif
481 # ifndef LANG_TSONGA
482 # define LANG_TSONGA 0x31
483 # endif
484 # ifndef LANG_TSWANA
485 # define LANG_TSWANA 0x32
486 # endif
487 # ifndef LANG_TURKMEN
488 # define LANG_TURKMEN 0x42
489 # endif
490 # ifndef LANG_UIGHUR
491 # define LANG_UIGHUR 0x80
492 # endif
493 # ifndef LANG_UKRAINIAN
494 # define LANG_UKRAINIAN 0x22
495 # endif
496 # ifndef LANG_URDU
497 # define LANG_URDU 0x20
498 # endif
499 # ifndef LANG_UZBEK
500 # define LANG_UZBEK 0x43
501 # endif
502 # ifndef LANG_VENDA
503 # define LANG_VENDA 0x33
504 # endif
505 # ifndef LANG_VIETNAMESE
506 # define LANG_VIETNAMESE 0x2a
507 # endif
508 # ifndef LANG_WELSH
509 # define LANG_WELSH 0x52
510 # endif
511 # ifndef LANG_WOLOF
512 # define LANG_WOLOF 0x88
513 # endif
514 # ifndef LANG_XHOSA
515 # define LANG_XHOSA 0x34
516 # endif
517 # ifndef LANG_YAKUT
518 # define LANG_YAKUT 0x85
519 # endif
520 # ifndef LANG_YI
521 # define LANG_YI 0x78
522 # endif
523 # ifndef LANG_YIDDISH
524 # define LANG_YIDDISH 0x3d
525 # endif
526 # ifndef LANG_YORUBA
527 # define LANG_YORUBA 0x6a
528 # endif
529 # ifndef LANG_ZULU
530 # define LANG_ZULU 0x35
531 # endif
532 # ifndef SUBLANG_AFRIKAANS_SOUTH_AFRICA
533 # define SUBLANG_AFRIKAANS_SOUTH_AFRICA 0x01
534 # endif
535 # ifndef SUBLANG_ALBANIAN_ALBANIA
536 # define SUBLANG_ALBANIAN_ALBANIA 0x01
537 # endif
538 # ifndef SUBLANG_ALSATIAN_FRANCE
539 # define SUBLANG_ALSATIAN_FRANCE 0x01
540 # endif
541 # ifndef SUBLANG_AMHARIC_ETHIOPIA
542 # define SUBLANG_AMHARIC_ETHIOPIA 0x01
543 # endif
544 # ifndef SUBLANG_ARABIC_SAUDI_ARABIA
545 # define SUBLANG_ARABIC_SAUDI_ARABIA 0x01
546 # endif
547 # ifndef SUBLANG_ARABIC_IRAQ
548 # define SUBLANG_ARABIC_IRAQ 0x02
549 # endif
550 # ifndef SUBLANG_ARABIC_EGYPT
551 # define SUBLANG_ARABIC_EGYPT 0x03
552 # endif
553 # ifndef SUBLANG_ARABIC_LIBYA
554 # define SUBLANG_ARABIC_LIBYA 0x04
555 # endif
556 # ifndef SUBLANG_ARABIC_ALGERIA
557 # define SUBLANG_ARABIC_ALGERIA 0x05
558 # endif
559 # ifndef SUBLANG_ARABIC_MOROCCO
560 # define SUBLANG_ARABIC_MOROCCO 0x06
561 # endif
562 # ifndef SUBLANG_ARABIC_TUNISIA
563 # define SUBLANG_ARABIC_TUNISIA 0x07
564 # endif
565 # ifndef SUBLANG_ARABIC_OMAN
566 # define SUBLANG_ARABIC_OMAN 0x08
567 # endif
568 # ifndef SUBLANG_ARABIC_YEMEN
569 # define SUBLANG_ARABIC_YEMEN 0x09
570 # endif
571 # ifndef SUBLANG_ARABIC_SYRIA
572 # define SUBLANG_ARABIC_SYRIA 0x0a
573 # endif
574 # ifndef SUBLANG_ARABIC_JORDAN
575 # define SUBLANG_ARABIC_JORDAN 0x0b
576 # endif
577 # ifndef SUBLANG_ARABIC_LEBANON
578 # define SUBLANG_ARABIC_LEBANON 0x0c
579 # endif
580 # ifndef SUBLANG_ARABIC_KUWAIT
581 # define SUBLANG_ARABIC_KUWAIT 0x0d
582 # endif
583 # ifndef SUBLANG_ARABIC_UAE
584 # define SUBLANG_ARABIC_UAE 0x0e
585 # endif
586 # ifndef SUBLANG_ARABIC_BAHRAIN
587 # define SUBLANG_ARABIC_BAHRAIN 0x0f
588 # endif
589 # ifndef SUBLANG_ARABIC_QATAR
590 # define SUBLANG_ARABIC_QATAR 0x10
591 # endif
592 # ifndef SUBLANG_ARMENIAN_ARMENIA
593 # define SUBLANG_ARMENIAN_ARMENIA 0x01
594 # endif
595 # ifndef SUBLANG_ASSAMESE_INDIA
596 # define SUBLANG_ASSAMESE_INDIA 0x01
597 # endif
598 # ifndef SUBLANG_AZERI_LATIN
599 # define SUBLANG_AZERI_LATIN 0x01
600 # endif
601 # ifndef SUBLANG_AZERI_CYRILLIC
602 # define SUBLANG_AZERI_CYRILLIC 0x02
603 # endif
604 # ifndef SUBLANG_BASHKIR_RUSSIA
605 # define SUBLANG_BASHKIR_RUSSIA 0x01
606 # endif
607 # ifndef SUBLANG_BASQUE_BASQUE
608 # define SUBLANG_BASQUE_BASQUE 0x01
609 # endif
610 # ifndef SUBLANG_BELARUSIAN_BELARUS
611 # define SUBLANG_BELARUSIAN_BELARUS 0x01
612 # endif
613 # ifndef SUBLANG_BENGALI_INDIA
614 # define SUBLANG_BENGALI_INDIA 0x01
615 # endif
616 # ifndef SUBLANG_BENGALI_BANGLADESH
617 # define SUBLANG_BENGALI_BANGLADESH 0x02
618 # endif
619 # ifndef SUBLANG_BOSNIAN_BOSNIA_HERZEGOVINA_LATIN
620 # define SUBLANG_BOSNIAN_BOSNIA_HERZEGOVINA_LATIN 0x05
621 # endif
622 # ifndef SUBLANG_BOSNIAN_BOSNIA_HERZEGOVINA_CYRILLIC
623 # define SUBLANG_BOSNIAN_BOSNIA_HERZEGOVINA_CYRILLIC 0x08
624 # endif
625 # ifndef SUBLANG_BRETON_FRANCE
626 # define SUBLANG_BRETON_FRANCE 0x01
627 # endif
628 # ifndef SUBLANG_BULGARIAN_BULGARIA
629 # define SUBLANG_BULGARIAN_BULGARIA 0x01
630 # endif
631 # ifndef SUBLANG_CAMBODIAN_CAMBODIA
632 # define SUBLANG_CAMBODIAN_CAMBODIA 0x01
633 # endif
634 # ifndef SUBLANG_CATALAN_SPAIN
635 # define SUBLANG_CATALAN_SPAIN 0x01
636 # endif
637 # ifndef SUBLANG_CORSICAN_FRANCE
638 # define SUBLANG_CORSICAN_FRANCE 0x01
639 # endif
640 # ifndef SUBLANG_CROATIAN_CROATIA
641 # define SUBLANG_CROATIAN_CROATIA 0x01
642 # endif
643 # ifndef SUBLANG_CROATIAN_BOSNIA_HERZEGOVINA_LATIN
644 # define SUBLANG_CROATIAN_BOSNIA_HERZEGOVINA_LATIN 0x04
645 # endif
646 # ifndef SUBLANG_CHINESE_MACAU
647 # define SUBLANG_CHINESE_MACAU 0x05
648 # endif
649 # ifndef SUBLANG_CZECH_CZECH_REPUBLIC
650 # define SUBLANG_CZECH_CZECH_REPUBLIC 0x01
651 # endif
652 # ifndef SUBLANG_DANISH_DENMARK
653 # define SUBLANG_DANISH_DENMARK 0x01
654 # endif
655 # ifndef SUBLANG_DARI_AFGHANISTAN
656 # define SUBLANG_DARI_AFGHANISTAN 0x01
657 # endif
658 # ifndef SUBLANG_DIVEHI_MALDIVES
659 # define SUBLANG_DIVEHI_MALDIVES 0x01
660 # endif
661 # ifndef SUBLANG_DUTCH_SURINAM
662 # define SUBLANG_DUTCH_SURINAM 0x03
663 # endif
664 # ifndef SUBLANG_ENGLISH_SOUTH_AFRICA
665 # define SUBLANG_ENGLISH_SOUTH_AFRICA 0x07
666 # endif
667 # ifndef SUBLANG_ENGLISH_JAMAICA
668 # define SUBLANG_ENGLISH_JAMAICA 0x08
669 # endif
670 # ifndef SUBLANG_ENGLISH_CARIBBEAN
671 # define SUBLANG_ENGLISH_CARIBBEAN 0x09
672 # endif
673 # ifndef SUBLANG_ENGLISH_BELIZE
674 # define SUBLANG_ENGLISH_BELIZE 0x0a
675 # endif
676 # ifndef SUBLANG_ENGLISH_TRINIDAD
677 # define SUBLANG_ENGLISH_TRINIDAD 0x0b
678 # endif
679 # ifndef SUBLANG_ENGLISH_ZIMBABWE
680 # define SUBLANG_ENGLISH_ZIMBABWE 0x0c
681 # endif
682 # ifndef SUBLANG_ENGLISH_PHILIPPINES
683 # define SUBLANG_ENGLISH_PHILIPPINES 0x0d
684 # endif
685 # ifndef SUBLANG_ENGLISH_INDONESIA
686 # define SUBLANG_ENGLISH_INDONESIA 0x0e
687 # endif
688 # ifndef SUBLANG_ENGLISH_HONGKONG
689 # define SUBLANG_ENGLISH_HONGKONG 0x0f
690 # endif
691 # ifndef SUBLANG_ENGLISH_INDIA
692 # define SUBLANG_ENGLISH_INDIA 0x10
693 # endif
694 # ifndef SUBLANG_ENGLISH_MALAYSIA
695 # define SUBLANG_ENGLISH_MALAYSIA 0x11
696 # endif
697 # ifndef SUBLANG_ENGLISH_SINGAPORE
698 # define SUBLANG_ENGLISH_SINGAPORE 0x12
699 # endif
700 # ifndef SUBLANG_ESTONIAN_ESTONIA
701 # define SUBLANG_ESTONIAN_ESTONIA 0x01
702 # endif
703 # ifndef SUBLANG_FAEROESE_FAROE_ISLANDS
704 # define SUBLANG_FAEROESE_FAROE_ISLANDS 0x01
705 # endif
706 # ifndef SUBLANG_FARSI_IRAN
707 # define SUBLANG_FARSI_IRAN 0x01
708 # endif
709 # ifndef SUBLANG_FINNISH_FINLAND
710 # define SUBLANG_FINNISH_FINLAND 0x01
711 # endif
712 # ifndef SUBLANG_FRENCH_LUXEMBOURG
713 # define SUBLANG_FRENCH_LUXEMBOURG 0x05
714 # endif
715 # ifndef SUBLANG_FRENCH_MONACO
716 # define SUBLANG_FRENCH_MONACO 0x06
717 # endif
718 # ifndef SUBLANG_FRENCH_WESTINDIES
719 # define SUBLANG_FRENCH_WESTINDIES 0x07
720 # endif
721 # ifndef SUBLANG_FRENCH_REUNION
722 # define SUBLANG_FRENCH_REUNION 0x08
723 # endif
724 # ifndef SUBLANG_FRENCH_CONGO
725 # define SUBLANG_FRENCH_CONGO 0x09
726 # endif
727 # ifndef SUBLANG_FRENCH_SENEGAL
728 # define SUBLANG_FRENCH_SENEGAL 0x0a
729 # endif
730 # ifndef SUBLANG_FRENCH_CAMEROON
731 # define SUBLANG_FRENCH_CAMEROON 0x0b
732 # endif
733 # ifndef SUBLANG_FRENCH_COTEDIVOIRE
734 # define SUBLANG_FRENCH_COTEDIVOIRE 0x0c
735 # endif
736 # ifndef SUBLANG_FRENCH_MALI
737 # define SUBLANG_FRENCH_MALI 0x0d
738 # endif
739 # ifndef SUBLANG_FRENCH_MOROCCO
740 # define SUBLANG_FRENCH_MOROCCO 0x0e
741 # endif
742 # ifndef SUBLANG_FRENCH_HAITI
743 # define SUBLANG_FRENCH_HAITI 0x0f
744 # endif
745 # ifndef SUBLANG_FRISIAN_NETHERLANDS
746 # define SUBLANG_FRISIAN_NETHERLANDS 0x01
747 # endif
748 # ifndef SUBLANG_GALICIAN_SPAIN
749 # define SUBLANG_GALICIAN_SPAIN 0x01
750 # endif
751 # ifndef SUBLANG_GEORGIAN_GEORGIA
752 # define SUBLANG_GEORGIAN_GEORGIA 0x01
753 # endif
754 # ifndef SUBLANG_GERMAN_LUXEMBOURG
755 # define SUBLANG_GERMAN_LUXEMBOURG 0x04
756 # endif
757 # ifndef SUBLANG_GERMAN_LIECHTENSTEIN
758 # define SUBLANG_GERMAN_LIECHTENSTEIN 0x05
759 # endif
760 # ifndef SUBLANG_GREEK_GREECE
761 # define SUBLANG_GREEK_GREECE 0x01
762 # endif
763 # ifndef SUBLANG_GREENLANDIC_GREENLAND
764 # define SUBLANG_GREENLANDIC_GREENLAND 0x01
765 # endif
766 # ifndef SUBLANG_GUJARATI_INDIA
767 # define SUBLANG_GUJARATI_INDIA 0x01
768 # endif
769 # ifndef SUBLANG_HAUSA_NIGERIA_LATIN
770 # define SUBLANG_HAUSA_NIGERIA_LATIN 0x01
771 # endif
772 # ifndef SUBLANG_HEBREW_ISRAEL
773 # define SUBLANG_HEBREW_ISRAEL 0x01
774 # endif
775 # ifndef SUBLANG_HINDI_INDIA
776 # define SUBLANG_HINDI_INDIA 0x01
777 # endif
778 # ifndef SUBLANG_HUNGARIAN_HUNGARY
779 # define SUBLANG_HUNGARIAN_HUNGARY 0x01
780 # endif
781 # ifndef SUBLANG_ICELANDIC_ICELAND
782 # define SUBLANG_ICELANDIC_ICELAND 0x01
783 # endif
784 # ifndef SUBLANG_IGBO_NIGERIA
785 # define SUBLANG_IGBO_NIGERIA 0x01
786 # endif
787 # ifndef SUBLANG_INDONESIAN_INDONESIA
788 # define SUBLANG_INDONESIAN_INDONESIA 0x01
789 # endif
790 # ifndef SUBLANG_INUKTITUT_CANADA
791 # define SUBLANG_INUKTITUT_CANADA 0x01
792 # endif
793 # undef SUBLANG_INUKTITUT_CANADA_LATIN
794 # define SUBLANG_INUKTITUT_CANADA_LATIN 0x02
795 # undef SUBLANG_IRISH_IRELAND
796 # define SUBLANG_IRISH_IRELAND 0x02
797 # ifndef SUBLANG_JAPANESE_JAPAN
798 # define SUBLANG_JAPANESE_JAPAN 0x01
799 # endif
800 # ifndef SUBLANG_KANNADA_INDIA
801 # define SUBLANG_KANNADA_INDIA 0x01
802 # endif
803 # ifndef SUBLANG_KASHMIRI_INDIA
804 # define SUBLANG_KASHMIRI_INDIA 0x02
805 # endif
806 # ifndef SUBLANG_KAZAK_KAZAKHSTAN
807 # define SUBLANG_KAZAK_KAZAKHSTAN 0x01
808 # endif
809 # ifndef SUBLANG_KICHE_GUATEMALA
810 # define SUBLANG_KICHE_GUATEMALA 0x01
811 # endif
812 # ifndef SUBLANG_KINYARWANDA_RWANDA
813 # define SUBLANG_KINYARWANDA_RWANDA 0x01
814 # endif
815 # ifndef SUBLANG_KONKANI_INDIA
816 # define SUBLANG_KONKANI_INDIA 0x01
817 # endif
818 # ifndef SUBLANG_KYRGYZ_KYRGYZSTAN
819 # define SUBLANG_KYRGYZ_KYRGYZSTAN 0x01
820 # endif
821 # ifndef SUBLANG_LAO_LAOS
822 # define SUBLANG_LAO_LAOS 0x01
823 # endif
824 # ifndef SUBLANG_LATVIAN_LATVIA
825 # define SUBLANG_LATVIAN_LATVIA 0x01
826 # endif
827 # ifndef SUBLANG_LITHUANIAN_LITHUANIA
828 # define SUBLANG_LITHUANIAN_LITHUANIA 0x01
829 # endif
830 # undef SUBLANG_LOWER_SORBIAN_GERMANY
831 # define SUBLANG_LOWER_SORBIAN_GERMANY 0x02
832 # ifndef SUBLANG_LUXEMBOURGISH_LUXEMBOURG
833 # define SUBLANG_LUXEMBOURGISH_LUXEMBOURG 0x01
834 # endif
835 # ifndef SUBLANG_MACEDONIAN_MACEDONIA
836 # define SUBLANG_MACEDONIAN_MACEDONIA 0x01
837 # endif
838 # ifndef SUBLANG_MALAY_MALAYSIA
839 # define SUBLANG_MALAY_MALAYSIA 0x01
840 # endif
841 # ifndef SUBLANG_MALAY_BRUNEI_DARUSSALAM
842 # define SUBLANG_MALAY_BRUNEI_DARUSSALAM 0x02
843 # endif
844 # ifndef SUBLANG_MALAYALAM_INDIA
845 # define SUBLANG_MALAYALAM_INDIA 0x01
846 # endif
847 # ifndef SUBLANG_MALTESE_MALTA
848 # define SUBLANG_MALTESE_MALTA 0x01
849 # endif
850 # ifndef SUBLANG_MAORI_NEW_ZEALAND
851 # define SUBLANG_MAORI_NEW_ZEALAND 0x01
852 # endif
853 # ifndef SUBLANG_MAPUDUNGUN_CHILE
854 # define SUBLANG_MAPUDUNGUN_CHILE 0x01
855 # endif
856 # ifndef SUBLANG_MARATHI_INDIA
857 # define SUBLANG_MARATHI_INDIA 0x01
858 # endif
859 # ifndef SUBLANG_MOHAWK_CANADA
860 # define SUBLANG_MOHAWK_CANADA 0x01
861 # endif
862 # ifndef SUBLANG_MONGOLIAN_CYRILLIC_MONGOLIA
863 # define SUBLANG_MONGOLIAN_CYRILLIC_MONGOLIA 0x01
864 # endif
865 # ifndef SUBLANG_MONGOLIAN_PRC
866 # define SUBLANG_MONGOLIAN_PRC 0x02
867 # endif
868 # ifndef SUBLANG_NEPALI_NEPAL
869 # define SUBLANG_NEPALI_NEPAL 0x01
870 # endif
871 # ifndef SUBLANG_NEPALI_INDIA
872 # define SUBLANG_NEPALI_INDIA 0x02
873 # endif
874 # ifndef SUBLANG_OCCITAN_FRANCE
875 # define SUBLANG_OCCITAN_FRANCE 0x01
876 # endif
877 # ifndef SUBLANG_ORIYA_INDIA
878 # define SUBLANG_ORIYA_INDIA 0x01
879 # endif
880 # ifndef SUBLANG_PASHTO_AFGHANISTAN
881 # define SUBLANG_PASHTO_AFGHANISTAN 0x01
882 # endif
883 # ifndef SUBLANG_POLISH_POLAND
884 # define SUBLANG_POLISH_POLAND 0x01
885 # endif
886 # ifndef SUBLANG_PUNJABI_INDIA
887 # define SUBLANG_PUNJABI_INDIA 0x01
888 # endif
889 # ifndef SUBLANG_PUNJABI_PAKISTAN
890 # define SUBLANG_PUNJABI_PAKISTAN 0x02
891 # endif
892 # ifndef SUBLANG_QUECHUA_BOLIVIA
893 # define SUBLANG_QUECHUA_BOLIVIA 0x01
894 # endif
895 # ifndef SUBLANG_QUECHUA_ECUADOR
896 # define SUBLANG_QUECHUA_ECUADOR 0x02
897 # endif
898 # ifndef SUBLANG_QUECHUA_PERU
899 # define SUBLANG_QUECHUA_PERU 0x03
900 # endif
901 # ifndef SUBLANG_ROMANIAN_ROMANIA
902 # define SUBLANG_ROMANIAN_ROMANIA 0x01
903 # endif
904 # ifndef SUBLANG_ROMANIAN_MOLDOVA
905 # define SUBLANG_ROMANIAN_MOLDOVA 0x02
906 # endif
907 # ifndef SUBLANG_ROMANSH_SWITZERLAND
908 # define SUBLANG_ROMANSH_SWITZERLAND 0x01
909 # endif
910 # ifndef SUBLANG_RUSSIAN_RUSSIA
911 # define SUBLANG_RUSSIAN_RUSSIA 0x01
912 # endif
913 # ifndef SUBLANG_RUSSIAN_MOLDAVIA
914 # define SUBLANG_RUSSIAN_MOLDAVIA 0x02
915 # endif
916 # ifndef SUBLANG_SAMI_NORTHERN_NORWAY
917 # define SUBLANG_SAMI_NORTHERN_NORWAY 0x01
918 # endif
919 # ifndef SUBLANG_SAMI_NORTHERN_SWEDEN
920 # define SUBLANG_SAMI_NORTHERN_SWEDEN 0x02
921 # endif
922 # ifndef SUBLANG_SAMI_NORTHERN_FINLAND
923 # define SUBLANG_SAMI_NORTHERN_FINLAND 0x03
924 # endif
925 # ifndef SUBLANG_SAMI_LULE_NORWAY
926 # define SUBLANG_SAMI_LULE_NORWAY 0x04
927 # endif
928 # ifndef SUBLANG_SAMI_LULE_SWEDEN
929 # define SUBLANG_SAMI_LULE_SWEDEN 0x05
930 # endif
931 # ifndef SUBLANG_SAMI_SOUTHERN_NORWAY
932 # define SUBLANG_SAMI_SOUTHERN_NORWAY 0x06
933 # endif
934 # ifndef SUBLANG_SAMI_SOUTHERN_SWEDEN
935 # define SUBLANG_SAMI_SOUTHERN_SWEDEN 0x07
936 # endif
937 # undef SUBLANG_SAMI_SKOLT_FINLAND
938 # define SUBLANG_SAMI_SKOLT_FINLAND 0x08
939 # undef SUBLANG_SAMI_INARI_FINLAND
940 # define SUBLANG_SAMI_INARI_FINLAND 0x09
941 # ifndef SUBLANG_SANSKRIT_INDIA
942 # define SUBLANG_SANSKRIT_INDIA 0x01
943 # endif
944 # ifndef SUBLANG_SERBIAN_LATIN
945 # define SUBLANG_SERBIAN_LATIN 0x02
946 # endif
947 # ifndef SUBLANG_SERBIAN_CYRILLIC
948 # define SUBLANG_SERBIAN_CYRILLIC 0x03
949 # endif
950 # ifndef SUBLANG_SINDHI_INDIA
951 # define SUBLANG_SINDHI_INDIA 0x01
952 # endif
953 # undef SUBLANG_SINDHI_PAKISTAN
954 # define SUBLANG_SINDHI_PAKISTAN 0x02
955 # ifndef SUBLANG_SINDHI_AFGHANISTAN
956 # define SUBLANG_SINDHI_AFGHANISTAN 0x02
957 # endif
958 # ifndef SUBLANG_SINHALESE_SRI_LANKA
959 # define SUBLANG_SINHALESE_SRI_LANKA 0x01
960 # endif
961 # ifndef SUBLANG_SLOVAK_SLOVAKIA
962 # define SUBLANG_SLOVAK_SLOVAKIA 0x01
963 # endif
964 # ifndef SUBLANG_SLOVENIAN_SLOVENIA
965 # define SUBLANG_SLOVENIAN_SLOVENIA 0x01
966 # endif
967 # ifndef SUBLANG_SOTHO_SOUTH_AFRICA
968 # define SUBLANG_SOTHO_SOUTH_AFRICA 0x01
969 # endif
970 # ifndef SUBLANG_SPANISH_GUATEMALA
971 # define SUBLANG_SPANISH_GUATEMALA 0x04
972 # endif
973 # ifndef SUBLANG_SPANISH_COSTA_RICA
974 # define SUBLANG_SPANISH_COSTA_RICA 0x05
975 # endif
976 # ifndef SUBLANG_SPANISH_PANAMA
977 # define SUBLANG_SPANISH_PANAMA 0x06
978 # endif
979 # ifndef SUBLANG_SPANISH_DOMINICAN_REPUBLIC
980 # define SUBLANG_SPANISH_DOMINICAN_REPUBLIC 0x07
981 # endif
982 # ifndef SUBLANG_SPANISH_VENEZUELA
983 # define SUBLANG_SPANISH_VENEZUELA 0x08
984 # endif
985 # ifndef SUBLANG_SPANISH_COLOMBIA
986 # define SUBLANG_SPANISH_COLOMBIA 0x09
987 # endif
988 # ifndef SUBLANG_SPANISH_PERU
989 # define SUBLANG_SPANISH_PERU 0x0a
990 # endif
991 # ifndef SUBLANG_SPANISH_ARGENTINA
992 # define SUBLANG_SPANISH_ARGENTINA 0x0b
993 # endif
994 # ifndef SUBLANG_SPANISH_ECUADOR
995 # define SUBLANG_SPANISH_ECUADOR 0x0c
996 # endif
997 # ifndef SUBLANG_SPANISH_CHILE
998 # define SUBLANG_SPANISH_CHILE 0x0d
999 # endif
1000 # ifndef SUBLANG_SPANISH_URUGUAY
1001 # define SUBLANG_SPANISH_URUGUAY 0x0e
1002 # endif
1003 # ifndef SUBLANG_SPANISH_PARAGUAY
1004 # define SUBLANG_SPANISH_PARAGUAY 0x0f
1005 # endif
1006 # ifndef SUBLANG_SPANISH_BOLIVIA
1007 # define SUBLANG_SPANISH_BOLIVIA 0x10
1008 # endif
1009 # ifndef SUBLANG_SPANISH_EL_SALVADOR
1010 # define SUBLANG_SPANISH_EL_SALVADOR 0x11
1011 # endif
1012 # ifndef SUBLANG_SPANISH_HONDURAS
1013 # define SUBLANG_SPANISH_HONDURAS 0x12
1014 # endif
1015 # ifndef SUBLANG_SPANISH_NICARAGUA
1016 # define SUBLANG_SPANISH_NICARAGUA 0x13
1017 # endif
1018 # ifndef SUBLANG_SPANISH_PUERTO_RICO
1019 # define SUBLANG_SPANISH_PUERTO_RICO 0x14
1020 # endif
1021 # ifndef SUBLANG_SPANISH_US
1022 # define SUBLANG_SPANISH_US 0x15
1023 # endif
1024 # ifndef SUBLANG_SWAHILI_KENYA
1025 # define SUBLANG_SWAHILI_KENYA 0x01
1026 # endif
1027 # ifndef SUBLANG_SWEDISH_SWEDEN
1028 # define SUBLANG_SWEDISH_SWEDEN 0x01
1029 # endif
1030 # ifndef SUBLANG_SWEDISH_FINLAND
1031 # define SUBLANG_SWEDISH_FINLAND 0x02
1032 # endif
1033 # ifndef SUBLANG_SYRIAC_SYRIA
1034 # define SUBLANG_SYRIAC_SYRIA 0x01
1035 # endif
1036 # ifndef SUBLANG_TAGALOG_PHILIPPINES
1037 # define SUBLANG_TAGALOG_PHILIPPINES 0x01
1038 # endif
1039 # ifndef SUBLANG_TAJIK_TAJIKISTAN
1040 # define SUBLANG_TAJIK_TAJIKISTAN 0x01
1041 # endif
1042 # ifndef SUBLANG_TAMAZIGHT_ARABIC
1043 # define SUBLANG_TAMAZIGHT_ARABIC 0x01
1044 # endif
1045 # ifndef SUBLANG_TAMAZIGHT_ALGERIA_LATIN
1046 # define SUBLANG_TAMAZIGHT_ALGERIA_LATIN 0x02
1047 # endif
1048 # ifndef SUBLANG_TAMIL_INDIA
1049 # define SUBLANG_TAMIL_INDIA 0x01
1050 # endif
1051 # ifndef SUBLANG_TATAR_RUSSIA
1052 # define SUBLANG_TATAR_RUSSIA 0x01
1053 # endif
1054 # ifndef SUBLANG_TELUGU_INDIA
1055 # define SUBLANG_TELUGU_INDIA 0x01
1056 # endif
1057 # ifndef SUBLANG_THAI_THAILAND
1058 # define SUBLANG_THAI_THAILAND 0x01
1059 # endif
1060 # ifndef SUBLANG_TIBETAN_PRC
1061 # define SUBLANG_TIBETAN_PRC 0x01
1062 # endif
1063 # undef SUBLANG_TIBETAN_BHUTAN
1064 # define SUBLANG_TIBETAN_BHUTAN 0x02
1065 # ifndef SUBLANG_TIGRINYA_ETHIOPIA
1066 # define SUBLANG_TIGRINYA_ETHIOPIA 0x01
1067 # endif
1068 # ifndef SUBLANG_TIGRINYA_ERITREA
1069 # define SUBLANG_TIGRINYA_ERITREA 0x02
1070 # endif
1071 # ifndef SUBLANG_TSWANA_SOUTH_AFRICA
1072 # define SUBLANG_TSWANA_SOUTH_AFRICA 0x01
1073 # endif
1074 # ifndef SUBLANG_TURKISH_TURKEY
1075 # define SUBLANG_TURKISH_TURKEY 0x01
1076 # endif
1077 # ifndef SUBLANG_TURKMEN_TURKMENISTAN
1078 # define SUBLANG_TURKMEN_TURKMENISTAN 0x01
1079 # endif
1080 # ifndef SUBLANG_UIGHUR_PRC
1081 # define SUBLANG_UIGHUR_PRC 0x01
1082 # endif
1083 # ifndef SUBLANG_UKRAINIAN_UKRAINE
1084 # define SUBLANG_UKRAINIAN_UKRAINE 0x01
1085 # endif
1086 # ifndef SUBLANG_UPPER_SORBIAN_GERMANY
1087 # define SUBLANG_UPPER_SORBIAN_GERMANY 0x01
1088 # endif
1089 # ifndef SUBLANG_URDU_PAKISTAN
1090 # define SUBLANG_URDU_PAKISTAN 0x01
1091 # endif
1092 # ifndef SUBLANG_URDU_INDIA
1093 # define SUBLANG_URDU_INDIA 0x02
1094 # endif
1095 # ifndef SUBLANG_UZBEK_LATIN
1096 # define SUBLANG_UZBEK_LATIN 0x01
1097 # endif
1098 # ifndef SUBLANG_UZBEK_CYRILLIC
1099 # define SUBLANG_UZBEK_CYRILLIC 0x02
1100 # endif
1101 # ifndef SUBLANG_VIETNAMESE_VIETNAM
1102 # define SUBLANG_VIETNAMESE_VIETNAM 0x01
1103 # endif
1104 # ifndef SUBLANG_WELSH_UNITED_KINGDOM
1105 # define SUBLANG_WELSH_UNITED_KINGDOM 0x01
1106 # endif
1107 # ifndef SUBLANG_WOLOF_SENEGAL
1108 # define SUBLANG_WOLOF_SENEGAL 0x01
1109 # endif
1110 # ifndef SUBLANG_XHOSA_SOUTH_AFRICA
1111 # define SUBLANG_XHOSA_SOUTH_AFRICA 0x01
1112 # endif
1113 # ifndef SUBLANG_YAKUT_RUSSIA
1114 # define SUBLANG_YAKUT_RUSSIA 0x01
1115 # endif
1116 # ifndef SUBLANG_YI_PRC
1117 # define SUBLANG_YI_PRC 0x01
1118 # endif
1119 # ifndef SUBLANG_YORUBA_NIGERIA
1120 # define SUBLANG_YORUBA_NIGERIA 0x01
1121 # endif
1122 # ifndef SUBLANG_ZULU_SOUTH_AFRICA
1123 # define SUBLANG_ZULU_SOUTH_AFRICA 0x01
1124 # endif
1125 /* GetLocaleInfoA operations. */
1126 # ifndef LOCALE_SNAME
1127 # define LOCALE_SNAME 0x5c
1128 # endif
1129 #endif
1130
1131
1132 #if HAVE_CFLOCALECOPYCURRENT || HAVE_CFPREFERENCESCOPYAPPVALUE
1133 /* MacOS X 10.2 or newer */
1134
1135 /* Canonicalize a MacOS X locale name to a Unix locale name.
1136 NAME is a sufficiently large buffer.
1137 On input, it contains the MacOS X locale name.
1138 On output, it contains the Unix locale name. */
1139 # if !defined IN_LIBINTL
1140 static
1141 # endif
1142 void
1143 gl_locale_name_canonicalize (char *name)
1144 {
1145 /* This conversion is based on a posting by
1146 Deborah GoldSmith <goldsmit@apple.com> on 2005-03-08,
1147 http://lists.apple.com/archives/carbon-dev/2005/Mar/msg00293.html */
1148
1149 /* Convert legacy (NeXTstep inherited) English names to Unix (ISO 639 and
1150 ISO 3166) names. Prior to MacOS X 10.3, there is no API for doing this.
1151 Therefore we do it ourselves, using a table based on the results of the
1152 MacOS X 10.3.8 function
1153 CFLocaleCreateCanonicalLocaleIdentifierFromString(). */
1154 typedef struct { const char legacy[21+1]; const char unixy[5+1]; }
1155 legacy_entry;
1156 static const legacy_entry legacy_table[] = {
1157 { "Afrikaans", "af" },
1158 { "Albanian", "sq" },
1159 { "Amharic", "am" },
1160 { "Arabic", "ar" },
1161 { "Armenian", "hy" },
1162 { "Assamese", "as" },
1163 { "Aymara", "ay" },
1164 { "Azerbaijani", "az" },
1165 { "Basque", "eu" },
1166 { "Belarusian", "be" },
1167 { "Belorussian", "be" },
1168 { "Bengali", "bn" },
1169 { "Brazilian Portugese", "pt_BR" },
1170 { "Brazilian Portuguese", "pt_BR" },
1171 { "Breton", "br" },
1172 { "Bulgarian", "bg" },
1173 { "Burmese", "my" },
1174 { "Byelorussian", "be" },
1175 { "Catalan", "ca" },
1176 { "Chewa", "ny" },
1177 { "Chichewa", "ny" },
1178 { "Chinese", "zh" },
1179 { "Chinese, Simplified", "zh_CN" },
1180 { "Chinese, Traditional", "zh_TW" },
1181 { "Chinese, Tradtional", "zh_TW" },
1182 { "Croatian", "hr" },
1183 { "Czech", "cs" },
1184 { "Danish", "da" },
1185 { "Dutch", "nl" },
1186 { "Dzongkha", "dz" },
1187 { "English", "en" },
1188 { "Esperanto", "eo" },
1189 { "Estonian", "et" },
1190 { "Faroese", "fo" },
1191 { "Farsi", "fa" },
1192 { "Finnish", "fi" },
1193 { "Flemish", "nl_BE" },
1194 { "French", "fr" },
1195 { "Galician", "gl" },
1196 { "Gallegan", "gl" },
1197 { "Georgian", "ka" },
1198 { "German", "de" },
1199 { "Greek", "el" },
1200 { "Greenlandic", "kl" },
1201 { "Guarani", "gn" },
1202 { "Gujarati", "gu" },
1203 { "Hawaiian", "haw" }, /* Yes, "haw", not "cpe". */
1204 { "Hebrew", "he" },
1205 { "Hindi", "hi" },
1206 { "Hungarian", "hu" },
1207 { "Icelandic", "is" },
1208 { "Indonesian", "id" },
1209 { "Inuktitut", "iu" },
1210 { "Irish", "ga" },
1211 { "Italian", "it" },
1212 { "Japanese", "ja" },
1213 { "Javanese", "jv" },
1214 { "Kalaallisut", "kl" },
1215 { "Kannada", "kn" },
1216 { "Kashmiri", "ks" },
1217 { "Kazakh", "kk" },
1218 { "Khmer", "km" },
1219 { "Kinyarwanda", "rw" },
1220 { "Kirghiz", "ky" },
1221 { "Korean", "ko" },
1222 { "Kurdish", "ku" },
1223 { "Latin", "la" },
1224 { "Latvian", "lv" },
1225 { "Lithuanian", "lt" },
1226 { "Macedonian", "mk" },
1227 { "Malagasy", "mg" },
1228 { "Malay", "ms" },
1229 { "Malayalam", "ml" },
1230 { "Maltese", "mt" },
1231 { "Manx", "gv" },
1232 { "Marathi", "mr" },
1233 { "Moldavian", "mo" },
1234 { "Mongolian", "mn" },
1235 { "Nepali", "ne" },
1236 { "Norwegian", "nb" }, /* Yes, "nb", not the obsolete "no". */
1237 { "Nyanja", "ny" },
1238 { "Nynorsk", "nn" },
1239 { "Oriya", "or" },
1240 { "Oromo", "om" },
1241 { "Panjabi", "pa" },
1242 { "Pashto", "ps" },
1243 { "Persian", "fa" },
1244 { "Polish", "pl" },
1245 { "Portuguese", "pt" },
1246 { "Portuguese, Brazilian", "pt_BR" },
1247 { "Punjabi", "pa" },
1248 { "Pushto", "ps" },
1249 { "Quechua", "qu" },
1250 { "Romanian", "ro" },
1251 { "Ruanda", "rw" },
1252 { "Rundi", "rn" },
1253 { "Russian", "ru" },
1254 { "Sami", "se_NO" }, /* Not just "se". */
1255 { "Sanskrit", "sa" },
1256 { "Scottish", "gd" },
1257 { "Serbian", "sr" },
1258 { "Simplified Chinese", "zh_CN" },
1259 { "Sindhi", "sd" },
1260 { "Sinhalese", "si" },
1261 { "Slovak", "sk" },
1262 { "Slovenian", "sl" },
1263 { "Somali", "so" },
1264 { "Spanish", "es" },
1265 { "Sundanese", "su" },
1266 { "Swahili", "sw" },
1267 { "Swedish", "sv" },
1268 { "Tagalog", "tl" },
1269 { "Tajik", "tg" },
1270 { "Tajiki", "tg" },
1271 { "Tamil", "ta" },
1272 { "Tatar", "tt" },
1273 { "Telugu", "te" },
1274 { "Thai", "th" },
1275 { "Tibetan", "bo" },
1276 { "Tigrinya", "ti" },
1277 { "Tongan", "to" },
1278 { "Traditional Chinese", "zh_TW" },
1279 { "Turkish", "tr" },
1280 { "Turkmen", "tk" },
1281 { "Uighur", "ug" },
1282 { "Ukrainian", "uk" },
1283 { "Urdu", "ur" },
1284 { "Uzbek", "uz" },
1285 { "Vietnamese", "vi" },
1286 { "Welsh", "cy" },
1287 { "Yiddish", "yi" }
1288 };
1289
1290 /* Convert new-style locale names with language tags (ISO 639 and ISO 15924)
1291 to Unix (ISO 639 and ISO 3166) names. */
1292 typedef struct { const char langtag[7+1]; const char unixy[12+1]; }
1293 langtag_entry;
1294 static const langtag_entry langtag_table[] = {
1295 /* MacOS X has "az-Arab", "az-Cyrl", "az-Latn".
1296 The default script for az on Unix is Latin. */
1297 { "az-Latn", "az" },
1298 /* MacOS X has "ga-dots". Does not yet exist on Unix. */
1299 { "ga-dots", "ga" },
1300 /* MacOS X has "kk-Cyrl". Does not yet exist on Unix. */
1301 /* MacOS X has "mn-Cyrl", "mn-Mong".
1302 The default script for mn on Unix is Cyrillic. */
1303 { "mn-Cyrl", "mn" },
1304 /* MacOS X has "ms-Arab", "ms-Latn".
1305 The default script for ms on Unix is Latin. */
1306 { "ms-Latn", "ms" },
1307 /* MacOS X has "tg-Cyrl".
1308 The default script for tg on Unix is Cyrillic. */
1309 { "tg-Cyrl", "tg" },
1310 /* MacOS X has "tk-Cyrl". Does not yet exist on Unix. */
1311 /* MacOS X has "tt-Cyrl".
1312 The default script for tt on Unix is Cyrillic. */
1313 { "tt-Cyrl", "tt" },
1314 /* MacOS X has "zh-Hans", "zh-Hant".
1315 Country codes are used to distinguish these on Unix. */
1316 { "zh-Hans", "zh_CN" },
1317 { "zh-Hant", "zh_TW" }
1318 };
1319
1320 /* Convert script names (ISO 15924) to Unix conventions.
1321 See http://www.unicode.org/iso15924/iso15924-codes.html */
1322 typedef struct { const char script[4+1]; const char unixy[9+1]; }
1323 script_entry;
1324 static const script_entry script_table[] = {
1325 { "Arab", "arabic" },
1326 { "Cyrl", "cyrillic" },
1327 { "Mong", "mongolian" }
1328 };
1329
1330 /* Step 1: Convert using legacy_table. */
1331 if (name[0] >= 'A' && name[0] <= 'Z')
1332 {
1333 unsigned int i1, i2;
1334 i1 = 0;
1335 i2 = sizeof (legacy_table) / sizeof (legacy_entry);
1336 while (i2 - i1 > 1)
1337 {
1338 /* At this point we know that if name occurs in legacy_table,
1339 its index must be >= i1 and < i2. */
1340 unsigned int i = (i1 + i2) >> 1;
1341 const legacy_entry *p = &legacy_table[i];
1342 if (strcmp (name, p->legacy) < 0)
1343 i2 = i;
1344 else
1345 i1 = i;
1346 }
1347 if (strcmp (name, legacy_table[i1].legacy) == 0)
1348 {
1349 strcpy (name, legacy_table[i1].unixy);
1350 return;
1351 }
1352 }
1353
1354 /* Step 2: Convert using langtag_table and script_table. */
1355 if (strlen (name) == 7 && name[2] == '-')
1356 {
1357 unsigned int i1, i2;
1358 i1 = 0;
1359 i2 = sizeof (langtag_table) / sizeof (langtag_entry);
1360 while (i2 - i1 > 1)
1361 {
1362 /* At this point we know that if name occurs in langtag_table,
1363 its index must be >= i1 and < i2. */
1364 unsigned int i = (i1 + i2) >> 1;
1365 const langtag_entry *p = &langtag_table[i];
1366 if (strcmp (name, p->langtag) < 0)
1367 i2 = i;
1368 else
1369 i1 = i;
1370 }
1371 if (strcmp (name, langtag_table[i1].langtag) == 0)
1372 {
1373 strcpy (name, langtag_table[i1].unixy);
1374 return;
1375 }
1376
1377 i1 = 0;
1378 i2 = sizeof (script_table) / sizeof (script_entry);
1379 while (i2 - i1 > 1)
1380 {
1381 /* At this point we know that if (name + 3) occurs in script_table,
1382 its index must be >= i1 and < i2. */
1383 unsigned int i = (i1 + i2) >> 1;
1384 const script_entry *p = &script_table[i];
1385 if (strcmp (name + 3, p->script) < 0)
1386 i2 = i;
1387 else
1388 i1 = i;
1389 }
1390 if (strcmp (name + 3, script_table[i1].script) == 0)
1391 {
1392 name[2] = '@';
1393 strcpy (name + 3, script_table[i1].unixy);
1394 return;
1395 }
1396 }
1397
1398 /* Step 3: Convert new-style dash to Unix underscore. */
1399 {
1400 char *p;
1401 for (p = name; *p != '\0'; p++)
1402 if (*p == '-')
1403 *p = '_';
1404 }
1405 }
1406
1407 #endif
1408
1409
1410 #if defined WIN32_NATIVE || defined __CYGWIN__ /* WIN32 or Cygwin */
1411
1412 /* Canonicalize a Win32 native locale name to a Unix locale name.
1413 NAME is a sufficiently large buffer.
1414 On input, it contains the Win32 locale name.
1415 On output, it contains the Unix locale name. */
1416 # if !defined IN_LIBINTL
1417 static
1418 # endif
1419 void
1420 gl_locale_name_canonicalize (char *name)
1421 {
1422 /* FIXME: This is probably incomplete: it does not handle "zh-Hans" and
1423 "zh-Hant". */
1424 char *p;
1425
1426 for (p = name; *p != '\0'; p++)
1427 if (*p == '-')
1428 {
1429 *p = '_';
1430 p++;
1431 for (; *p != '\0'; p++)
1432 {
1433 if (*p >= 'a' && *p <= 'z')
1434 *p += 'A' - 'a';
1435 if (*p == '-')
1436 {
1437 *p = '\0';
1438 return;
1439 }
1440 }
1441 return;
1442 }
1443 }
1444
1445 # if !defined IN_LIBINTL
1446 static
1447 # endif
1448 const char *
1449 gl_locale_name_from_win32_LANGID (LANGID langid)
1450 {
1451 /* Activate the new code only when the GETTEXT_MUI environment variable is
1452 set, for the time being, since the new code is not well tested. */
1453 if (getenv ("GETTEXT_MUI") != NULL)
1454 {
1455 static char namebuf[256];
1456
1457 /* Query the system's notion of locale name.
1458 On Windows95/98/ME, GetLocaleInfoA returns some incorrect results.
1459 But we don't need to support systems that are so old. */
1460 if (GetLocaleInfoA (MAKELCID (langid, SORT_DEFAULT), LOCALE_SNAME,
1461 namebuf, sizeof (namebuf) - 1))
1462 {
1463 /* Convert it to a Unix locale name. */
1464 gl_locale_name_canonicalize (namebuf);
1465 return namebuf;
1466 }
1467 }
1468 /* Internet Explorer has an LCID to RFC3066 name mapping stored in
1469 HKEY_CLASSES_ROOT\Mime\Database\Rfc1766. But we better don't use that
1470 since IE's i18n subsystem is known to be inconsistent with the Win32 base
1471 (e.g. they have different character conversion facilities that produce
1472 different results). */
1473 /* Use our own table. */
1474 {
1475 int primary, sub;
1476
1477 /* Split into language and territory part. */
1478 primary = PRIMARYLANGID (langid);
1479 sub = SUBLANGID (langid);
1480
1481 /* Dispatch on language.
1482 See also http://www.unicode.org/unicode/onlinedat/languages.html .
1483 For details about languages, see http://www.ethnologue.com/ . */
1484 switch (primary)
1485 {
1486 case LANG_AFRIKAANS:
1487 switch (sub)
1488 {
1489 case SUBLANG_AFRIKAANS_SOUTH_AFRICA: return "af_ZA";
1490 }
1491 return "af";
1492 case LANG_ALBANIAN:
1493 switch (sub)
1494 {
1495 case SUBLANG_ALBANIAN_ALBANIA: return "sq_AL";
1496 }
1497 return "sq";
1498 case LANG_ALSATIAN:
1499 switch (sub)
1500 {
1501 case SUBLANG_ALSATIAN_FRANCE: return "gsw_FR";
1502 }
1503 return "gsw";
1504 case LANG_AMHARIC:
1505 switch (sub)
1506 {
1507 case SUBLANG_AMHARIC_ETHIOPIA: return "am_ET";
1508 }
1509 return "am";
1510 case LANG_ARABIC:
1511 switch (sub)
1512 {
1513 case SUBLANG_ARABIC_SAUDI_ARABIA: return "ar_SA";
1514 case SUBLANG_ARABIC_IRAQ: return "ar_IQ";
1515 case SUBLANG_ARABIC_EGYPT: return "ar_EG";
1516 case SUBLANG_ARABIC_LIBYA: return "ar_LY";
1517 case SUBLANG_ARABIC_ALGERIA: return "ar_DZ";
1518 case SUBLANG_ARABIC_MOROCCO: return "ar_MA";
1519 case SUBLANG_ARABIC_TUNISIA: return "ar_TN";
1520 case SUBLANG_ARABIC_OMAN: return "ar_OM";
1521 case SUBLANG_ARABIC_YEMEN: return "ar_YE";
1522 case SUBLANG_ARABIC_SYRIA: return "ar_SY";
1523 case SUBLANG_ARABIC_JORDAN: return "ar_JO";
1524 case SUBLANG_ARABIC_LEBANON: return "ar_LB";
1525 case SUBLANG_ARABIC_KUWAIT: return "ar_KW";
1526 case SUBLANG_ARABIC_UAE: return "ar_AE";
1527 case SUBLANG_ARABIC_BAHRAIN: return "ar_BH";
1528 case SUBLANG_ARABIC_QATAR: return "ar_QA";
1529 }
1530 return "ar";
1531 case LANG_ARMENIAN:
1532 switch (sub)
1533 {
1534 case SUBLANG_ARMENIAN_ARMENIA: return "hy_AM";
1535 }
1536 return "hy";
1537 case LANG_ASSAMESE:
1538 switch (sub)
1539 {
1540 case SUBLANG_ASSAMESE_INDIA: return "as_IN";
1541 }
1542 return "as";
1543 case LANG_AZERI:
1544 switch (sub)
1545 {
1546 /* FIXME: Adjust this when Azerbaijani locales appear on Unix. */
1547 case 0x1e: return "az@latin";
1548 case SUBLANG_AZERI_LATIN: return "az_AZ@latin";
1549 case 0x1d: return "az@cyrillic";
1550 case SUBLANG_AZERI_CYRILLIC: return "az_AZ@cyrillic";
1551 }
1552 return "az";
1553 case LANG_BASHKIR:
1554 switch (sub)
1555 {
1556 case SUBLANG_BASHKIR_RUSSIA: return "ba_RU";
1557 }
1558 return "ba";
1559 case LANG_BASQUE:
1560 switch (sub)
1561 {
1562 case SUBLANG_BASQUE_BASQUE: return "eu_ES";
1563 }
1564 return "eu"; /* Ambiguous: could be "eu_ES" or "eu_FR". */
1565 case LANG_BELARUSIAN:
1566 switch (sub)
1567 {
1568 case SUBLANG_BELARUSIAN_BELARUS: return "be_BY";
1569 }
1570 return "be";
1571 case LANG_BENGALI:
1572 switch (sub)
1573 {
1574 case SUBLANG_BENGALI_INDIA: return "bn_IN";
1575 case SUBLANG_BENGALI_BANGLADESH: return "bn_BD";
1576 }
1577 return "bn";
1578 case LANG_BRETON:
1579 switch (sub)
1580 {
1581 case SUBLANG_BRETON_FRANCE: return "br_FR";
1582 }
1583 return "br";
1584 case LANG_BULGARIAN:
1585 switch (sub)
1586 {
1587 case SUBLANG_BULGARIAN_BULGARIA: return "bg_BG";
1588 }
1589 return "bg";
1590 case LANG_BURMESE:
1591 switch (sub)
1592 {
1593 case SUBLANG_DEFAULT: return "my_MM";
1594 }
1595 return "my";
1596 case LANG_CAMBODIAN:
1597 switch (sub)
1598 {
1599 case SUBLANG_CAMBODIAN_CAMBODIA: return "km_KH";
1600 }
1601 return "km";
1602 case LANG_CATALAN:
1603 switch (sub)
1604 {
1605 case SUBLANG_CATALAN_SPAIN: return "ca_ES";
1606 }
1607 return "ca";
1608 case LANG_CHEROKEE:
1609 switch (sub)
1610 {
1611 case SUBLANG_DEFAULT: return "chr_US";
1612 }
1613 return "chr";
1614 case LANG_CHINESE:
1615 switch (sub)
1616 {
1617 case SUBLANG_CHINESE_TRADITIONAL: case 0x1f: return "zh_TW";
1618 case SUBLANG_CHINESE_SIMPLIFIED: case 0x00: return "zh_CN";
1619 case SUBLANG_CHINESE_HONGKONG: return "zh_HK"; /* traditional */
1620 case SUBLANG_CHINESE_SINGAPORE: return "zh_SG"; /* simplified */
1621 case SUBLANG_CHINESE_MACAU: return "zh_MO"; /* traditional */
1622 }
1623 return "zh";
1624 case LANG_CORSICAN:
1625 switch (sub)
1626 {
1627 case SUBLANG_CORSICAN_FRANCE: return "co_FR";
1628 }
1629 return "co";
1630 case LANG_CROATIAN: /* LANG_CROATIAN == LANG_SERBIAN == LANG_BOSNIAN
1631 * What used to be called Serbo-Croatian
1632 * should really now be two separate
1633 * languages because of political reasons.
1634 * (Says tml, who knows nothing about Serbian
1635 * or Croatian.)
1636 * (I can feel those flames coming already.)
1637 */
1638 switch (sub)
1639 {
1640 /* Croatian */
1641 case 0x00: return "hr";
1642 case SUBLANG_CROATIAN_CROATIA: return "hr_HR";
1643 case SUBLANG_CROATIAN_BOSNIA_HERZEGOVINA_LATIN: return "hr_BA";
1644 /* Serbian */
1645 case 0x1f: return "sr";
1646 case 0x1c: return "sr"; /* latin */
1647 case SUBLANG_SERBIAN_LATIN: return "sr_CS"; /* latin */
1648 case 0x09: return "sr_RS"; /* latin */
1649 case 0x0b: return "sr_ME"; /* latin */
1650 case 0x06: return "sr_BA"; /* latin */
1651 case 0x1b: return "sr@cyrillic";
1652 case SUBLANG_SERBIAN_CYRILLIC: return "sr_CS@cyrillic";
1653 case 0x0a: return "sr_RS@cyrillic";
1654 case 0x0c: return "sr_ME@cyrillic";
1655 case 0x07: return "sr_BA@cyrillic";
1656 /* Bosnian */
1657 case 0x1e: return "bs";
1658 case 0x1a: return "bs"; /* latin */
1659 case SUBLANG_BOSNIAN_BOSNIA_HERZEGOVINA_LATIN: return "bs_BA"; /* latin */
1660 case 0x19: return "bs@cyrillic";
1661 case SUBLANG_BOSNIAN_BOSNIA_HERZEGOVINA_CYRILLIC: return "bs_BA@cyrillic";
1662 }
1663 return "hr";
1664 case LANG_CZECH:
1665 switch (sub)
1666 {
1667 case SUBLANG_CZECH_CZECH_REPUBLIC: return "cs_CZ";
1668 }
1669 return "cs";
1670 case LANG_DANISH:
1671 switch (sub)
1672 {
1673 case SUBLANG_DANISH_DENMARK: return "da_DK";
1674 }
1675 return "da";
1676 case LANG_DARI:
1677 /* FIXME: Adjust this when such locales appear on Unix. */
1678 switch (sub)
1679 {
1680 case SUBLANG_DARI_AFGHANISTAN: return "prs_AF";
1681 }
1682 return "prs";
1683 case LANG_DIVEHI:
1684 switch (sub)
1685 {
1686 case SUBLANG_DIVEHI_MALDIVES: return "dv_MV";
1687 }
1688 return "dv";
1689 case LANG_DUTCH:
1690 switch (sub)
1691 {
1692 case SUBLANG_DUTCH: return "nl_NL";
1693 case SUBLANG_DUTCH_BELGIAN: /* FLEMISH, VLAAMS */ return "nl_BE";
1694 case SUBLANG_DUTCH_SURINAM: return "nl_SR";
1695 }
1696 return "nl";
1697 case LANG_EDO:
1698 switch (sub)
1699 {
1700 case SUBLANG_DEFAULT: return "bin_NG";
1701 }
1702 return "bin";
1703 case LANG_ENGLISH:
1704 switch (sub)
1705 {
1706 /* SUBLANG_ENGLISH_US == SUBLANG_DEFAULT. Heh. I thought
1707 * English was the language spoken in England.
1708 * Oh well.
1709 */
1710 case SUBLANG_ENGLISH_US: return "en_US";
1711 case SUBLANG_ENGLISH_UK: return "en_GB";
1712 case SUBLANG_ENGLISH_AUS: return "en_AU";
1713 case SUBLANG_ENGLISH_CAN: return "en_CA";
1714 case SUBLANG_ENGLISH_NZ: return "en_NZ";
1715 case SUBLANG_ENGLISH_EIRE: return "en_IE";
1716 case SUBLANG_ENGLISH_SOUTH_AFRICA: return "en_ZA";
1717 case SUBLANG_ENGLISH_JAMAICA: return "en_JM";
1718 case SUBLANG_ENGLISH_CARIBBEAN: return "en_GD"; /* Grenada? */
1719 case SUBLANG_ENGLISH_BELIZE: return "en_BZ";
1720 case SUBLANG_ENGLISH_TRINIDAD: return "en_TT";
1721 case SUBLANG_ENGLISH_ZIMBABWE: return "en_ZW";
1722 case SUBLANG_ENGLISH_PHILIPPINES: return "en_PH";
1723 case SUBLANG_ENGLISH_INDONESIA: return "en_ID";
1724 case SUBLANG_ENGLISH_HONGKONG: return "en_HK";
1725 case SUBLANG_ENGLISH_INDIA: return "en_IN";
1726 case SUBLANG_ENGLISH_MALAYSIA: return "en_MY";
1727 case SUBLANG_ENGLISH_SINGAPORE: return "en_SG";
1728 }
1729 return "en";
1730 case LANG_ESTONIAN:
1731 switch (sub)
1732 {
1733 case SUBLANG_ESTONIAN_ESTONIA: return "et_EE";
1734 }
1735 return "et";
1736 case LANG_FAEROESE:
1737 switch (sub)
1738 {
1739 case SUBLANG_FAEROESE_FAROE_ISLANDS: return "fo_FO";
1740 }
1741 return "fo";
1742 case LANG_FARSI:
1743 switch (sub)
1744 {
1745 case SUBLANG_FARSI_IRAN: return "fa_IR";
1746 }
1747 return "fa";
1748 case LANG_FINNISH:
1749 switch (sub)
1750 {
1751 case SUBLANG_FINNISH_FINLAND: return "fi_FI";
1752 }
1753 return "fi";
1754 case LANG_FRENCH:
1755 switch (sub)
1756 {
1757 case SUBLANG_FRENCH: return "fr_FR";
1758 case SUBLANG_FRENCH_BELGIAN: /* WALLOON */ return "fr_BE";
1759 case SUBLANG_FRENCH_CANADIAN: return "fr_CA";
1760 case SUBLANG_FRENCH_SWISS: return "fr_CH";
1761 case SUBLANG_FRENCH_LUXEMBOURG: return "fr_LU";
1762 case SUBLANG_FRENCH_MONACO: return "fr_MC";
1763 case SUBLANG_FRENCH_WESTINDIES: return "fr"; /* Caribbean? */
1764 case SUBLANG_FRENCH_REUNION: return "fr_RE";
1765 case SUBLANG_FRENCH_CONGO: return "fr_CG";
1766 case SUBLANG_FRENCH_SENEGAL: return "fr_SN";
1767 case SUBLANG_FRENCH_CAMEROON: return "fr_CM";
1768 case SUBLANG_FRENCH_COTEDIVOIRE: return "fr_CI";
1769 case SUBLANG_FRENCH_MALI: return "fr_ML";
1770 case SUBLANG_FRENCH_MOROCCO: return "fr_MA";
1771 case SUBLANG_FRENCH_HAITI: return "fr_HT";
1772 }
1773 return "fr";
1774 case LANG_FRISIAN:
1775 switch (sub)
1776 {
1777 case SUBLANG_FRISIAN_NETHERLANDS: return "fy_NL";
1778 }
1779 return "fy";
1780 case LANG_FULFULDE:
1781 /* Spoken in Nigeria, Guinea, Senegal, Mali, Niger, Cameroon, Benin. */
1782 switch (sub)
1783 {
1784 case SUBLANG_DEFAULT: return "ff_NG";
1785 }
1786 return "ff";
1787 case LANG_GAELIC:
1788 switch (sub)
1789 {
1790 case 0x01: /* SCOTTISH */
1791 /* old, superseded by LANG_SCOTTISH_GAELIC */
1792 return "gd_GB";
1793 case SUBLANG_IRISH_IRELAND: return "ga_IE";
1794 }
1795 return "ga";
1796 case LANG_GALICIAN:
1797 switch (sub)
1798 {
1799 case SUBLANG_GALICIAN_SPAIN: return "gl_ES";
1800 }
1801 return "gl";
1802 case LANG_GEORGIAN:
1803 switch (sub)
1804 {
1805 case SUBLANG_GEORGIAN_GEORGIA: return "ka_GE";
1806 }
1807 return "ka";
1808 case LANG_GERMAN:
1809 switch (sub)
1810 {
1811 case SUBLANG_GERMAN: return "de_DE";
1812 case SUBLANG_GERMAN_SWISS: return "de_CH";
1813 case SUBLANG_GERMAN_AUSTRIAN: return "de_AT";
1814 case SUBLANG_GERMAN_LUXEMBOURG: return "de_LU";
1815 case SUBLANG_GERMAN_LIECHTENSTEIN: return "de_LI";
1816 }
1817 return "de";
1818 case LANG_GREEK:
1819 switch (sub)
1820 {
1821 case SUBLANG_GREEK_GREECE: return "el_GR";
1822 }
1823 return "el";
1824 case LANG_GREENLANDIC:
1825 switch (sub)
1826 {
1827 case SUBLANG_GREENLANDIC_GREENLAND: return "kl_GL";
1828 }
1829 return "kl";
1830 case LANG_GUARANI:
1831 switch (sub)
1832 {
1833 case SUBLANG_DEFAULT: return "gn_PY";
1834 }
1835 return "gn";
1836 case LANG_GUJARATI:
1837 switch (sub)
1838 {
1839 case SUBLANG_GUJARATI_INDIA: return "gu_IN";
1840 }
1841 return "gu";
1842 case LANG_HAUSA:
1843 switch (sub)
1844 {
1845 case 0x1f: return "ha";
1846 case SUBLANG_HAUSA_NIGERIA_LATIN: return "ha_NG";
1847 }
1848 return "ha";
1849 case LANG_HAWAIIAN:
1850 /* FIXME: Do they mean Hawaiian ("haw_US", 1000 speakers)
1851 or Hawaii Creole English ("cpe_US", 600000 speakers)? */
1852 switch (sub)
1853 {
1854 case SUBLANG_DEFAULT: return "cpe_US";
1855 }
1856 return "cpe";
1857 case LANG_HEBREW:
1858 switch (sub)
1859 {
1860 case SUBLANG_HEBREW_ISRAEL: return "he_IL";
1861 }
1862 return "he";
1863 case LANG_HINDI:
1864 switch (sub)
1865 {
1866 case SUBLANG_HINDI_INDIA: return "hi_IN";
1867 }
1868 return "hi";
1869 case LANG_HUNGARIAN:
1870 switch (sub)
1871 {
1872 case SUBLANG_HUNGARIAN_HUNGARY: return "hu_HU";
1873 }
1874 return "hu";
1875 case LANG_IBIBIO:
1876 switch (sub)
1877 {
1878 case SUBLANG_DEFAULT: return "nic_NG";
1879 }
1880 return "nic";
1881 case LANG_ICELANDIC:
1882 switch (sub)
1883 {
1884 case SUBLANG_ICELANDIC_ICELAND: return "is_IS";
1885 }
1886 return "is";
1887 case LANG_IGBO:
1888 switch (sub)
1889 {
1890 case SUBLANG_IGBO_NIGERIA: return "ig_NG";
1891 }
1892 return "ig";
1893 case LANG_INDONESIAN:
1894 switch (sub)
1895 {
1896 case SUBLANG_INDONESIAN_INDONESIA: return "id_ID";
1897 }
1898 return "id";
1899 case LANG_INUKTITUT:
1900 switch (sub)
1901 {
1902 case 0x1e: return "iu"; /* syllabic */
1903 case SUBLANG_INUKTITUT_CANADA: return "iu_CA"; /* syllabic */
1904 case 0x1f: return "iu@latin";
1905 case SUBLANG_INUKTITUT_CANADA_LATIN: return "iu_CA@latin";
1906 }
1907 return "iu";
1908 case LANG_ITALIAN:
1909 switch (sub)
1910 {
1911 case SUBLANG_ITALIAN: return "it_IT";
1912 case SUBLANG_ITALIAN_SWISS: return "it_CH";
1913 }
1914 return "it";
1915 case LANG_JAPANESE:
1916 switch (sub)
1917 {
1918 case SUBLANG_JAPANESE_JAPAN: return "ja_JP";
1919 }
1920 return "ja";
1921 case LANG_KANNADA:
1922 switch (sub)
1923 {
1924 case SUBLANG_KANNADA_INDIA: return "kn_IN";
1925 }
1926 return "kn";
1927 case LANG_KANURI:
1928 switch (sub)
1929 {
1930 case SUBLANG_DEFAULT: return "kr_NG";
1931 }
1932 return "kr";
1933 case LANG_KASHMIRI:
1934 switch (sub)
1935 {
1936 case SUBLANG_DEFAULT: return "ks_PK";
1937 case SUBLANG_KASHMIRI_INDIA: return "ks_IN";
1938 }
1939 return "ks";
1940 case LANG_KAZAK:
1941 switch (sub)
1942 {
1943 case SUBLANG_KAZAK_KAZAKHSTAN: return "kk_KZ";
1944 }
1945 return "kk";
1946 case LANG_KICHE:
1947 /* FIXME: Adjust this when such locales appear on Unix. */
1948 switch (sub)
1949 {
1950 case SUBLANG_KICHE_GUATEMALA: return "qut_GT";
1951 }
1952 return "qut";
1953 case LANG_KINYARWANDA:
1954 switch (sub)
1955 {
1956 case SUBLANG_KINYARWANDA_RWANDA: return "rw_RW";
1957 }
1958 return "rw";
1959 case LANG_KONKANI:
1960 /* FIXME: Adjust this when such locales appear on Unix. */
1961 switch (sub)
1962 {
1963 case SUBLANG_KONKANI_INDIA: return "kok_IN";
1964 }
1965 return "kok";
1966 case LANG_KOREAN:
1967 switch (sub)
1968 {
1969 case SUBLANG_DEFAULT: return "ko_KR";
1970 }
1971 return "ko";
1972 case LANG_KYRGYZ:
1973 switch (sub)
1974 {
1975 case SUBLANG_KYRGYZ_KYRGYZSTAN: return "ky_KG";
1976 }
1977 return "ky";
1978 case LANG_LAO:
1979 switch (sub)
1980 {
1981 case SUBLANG_LAO_LAOS: return "lo_LA";
1982 }
1983 return "lo";
1984 case LANG_LATIN:
1985 switch (sub)
1986 {
1987 case SUBLANG_DEFAULT: return "la_VA";
1988 }
1989 return "la";
1990 case LANG_LATVIAN:
1991 switch (sub)
1992 {
1993 case SUBLANG_LATVIAN_LATVIA: return "lv_LV";
1994 }
1995 return "lv";
1996 case LANG_LITHUANIAN:
1997 switch (sub)
1998 {
1999 case SUBLANG_LITHUANIAN_LITHUANIA: return "lt_LT";
2000 }
2001 return "lt";
2002 case LANG_LUXEMBOURGISH:
2003 switch (sub)
2004 {
2005 case SUBLANG_LUXEMBOURGISH_LUXEMBOURG: return "lb_LU";
2006 }
2007 return "lb";
2008 case LANG_MACEDONIAN:
2009 switch (sub)
2010 {
2011 case SUBLANG_MACEDONIAN_MACEDONIA: return "mk_MK";
2012 }
2013 return "mk";
2014 case LANG_MALAY:
2015 switch (sub)
2016 {
2017 case SUBLANG_MALAY_MALAYSIA: return "ms_MY";
2018 case SUBLANG_MALAY_BRUNEI_DARUSSALAM: return "ms_BN";
2019 }
2020 return "ms";
2021 case LANG_MALAYALAM:
2022 switch (sub)
2023 {
2024 case SUBLANG_MALAYALAM_INDIA: return "ml_IN";
2025 }
2026 return "ml";
2027 case LANG_MALTESE:
2028 switch (sub)
2029 {
2030 case SUBLANG_MALTESE_MALTA: return "mt_MT";
2031 }
2032 return "mt";
2033 case LANG_MANIPURI:
2034 /* FIXME: Adjust this when such locales appear on Unix. */
2035 switch (sub)
2036 {
2037 case SUBLANG_DEFAULT: return "mni_IN";
2038 }
2039 return "mni";
2040 case LANG_MAORI:
2041 switch (sub)
2042 {
2043 case SUBLANG_MAORI_NEW_ZEALAND: return "mi_NZ";
2044 }
2045 return "mi";
2046 case LANG_MAPUDUNGUN:
2047 switch (sub)
2048 {
2049 case SUBLANG_MAPUDUNGUN_CHILE: return "arn_CL";
2050 }
2051 return "arn";
2052 case LANG_MARATHI:
2053 switch (sub)
2054 {
2055 case SUBLANG_MARATHI_INDIA: return "mr_IN";
2056 }
2057 return "mr";
2058 case LANG_MOHAWK:
2059 switch (sub)
2060 {
2061 case SUBLANG_MOHAWK_CANADA: return "moh_CA";
2062 }
2063 return "moh";
2064 case LANG_MONGOLIAN:
2065 switch (sub)
2066 {
2067 case SUBLANG_MONGOLIAN_CYRILLIC_MONGOLIA: case 0x1e: return "mn_MN";
2068 case SUBLANG_MONGOLIAN_PRC: case 0x1f: return "mn_CN";
2069 }
2070 return "mn"; /* Ambiguous: could be "mn_CN" or "mn_MN". */
2071 case LANG_NEPALI:
2072 switch (sub)
2073 {
2074 case SUBLANG_NEPALI_NEPAL: return "ne_NP";
2075 case SUBLANG_NEPALI_INDIA: return "ne_IN";
2076 }
2077 return "ne";
2078 case LANG_NORWEGIAN:
2079 switch (sub)
2080 {
2081 case 0x1f: return "nb";
2082 case SUBLANG_NORWEGIAN_BOKMAL: return "nb_NO";
2083 case 0x1e: return "nn";
2084 case SUBLANG_NORWEGIAN_NYNORSK: return "nn_NO";
2085 }
2086 return "no";
2087 case LANG_OCCITAN:
2088 switch (sub)
2089 {
2090 case SUBLANG_OCCITAN_FRANCE: return "oc_FR";
2091 }
2092 return "oc";
2093 case LANG_ORIYA:
2094 switch (sub)
2095 {
2096 case SUBLANG_ORIYA_INDIA: return "or_IN";
2097 }
2098 return "or";
2099 case LANG_OROMO:
2100 switch (sub)
2101 {
2102 case SUBLANG_DEFAULT: return "om_ET";
2103 }
2104 return "om";
2105 case LANG_PAPIAMENTU:
2106 switch (sub)
2107 {
2108 case SUBLANG_DEFAULT: return "pap_AN";
2109 }
2110 return "pap";
2111 case LANG_PASHTO:
2112 switch (sub)
2113 {
2114 case SUBLANG_PASHTO_AFGHANISTAN: return "ps_AF";
2115 }
2116 return "ps"; /* Ambiguous: could be "ps_PK" or "ps_AF". */
2117 case LANG_POLISH:
2118 switch (sub)
2119 {
2120 case SUBLANG_POLISH_POLAND: return "pl_PL";
2121 }
2122 return "pl";
2123 case LANG_PORTUGUESE:
2124 switch (sub)
2125 {
2126 /* Hmm. SUBLANG_PORTUGUESE_BRAZILIAN == SUBLANG_DEFAULT.
2127 Same phenomenon as SUBLANG_ENGLISH_US == SUBLANG_DEFAULT. */
2128 case SUBLANG_PORTUGUESE_BRAZILIAN: return "pt_BR";
2129 case SUBLANG_PORTUGUESE: return "pt_PT";
2130 }
2131 return "pt";
2132 case LANG_PUNJABI:
2133 switch (sub)
2134 {
2135 case SUBLANG_PUNJABI_INDIA: return "pa_IN"; /* Gurmukhi script */
2136 case SUBLANG_PUNJABI_PAKISTAN: return "pa_PK"; /* Arabic script */
2137 }
2138 return "pa";
2139 case LANG_QUECHUA:
2140 /* Note: Microsoft uses the non-ISO language code "quz". */
2141 switch (sub)
2142 {
2143 case SUBLANG_QUECHUA_BOLIVIA: return "qu_BO";
2144 case SUBLANG_QUECHUA_ECUADOR: return "qu_EC";
2145 case SUBLANG_QUECHUA_PERU: return "qu_PE";
2146 }
2147 return "qu";
2148 case LANG_ROMANIAN:
2149 switch (sub)
2150 {
2151 case SUBLANG_ROMANIAN_ROMANIA: return "ro_RO";
2152 case SUBLANG_ROMANIAN_MOLDOVA: return "ro_MD";
2153 }
2154 return "ro";
2155 case LANG_ROMANSH:
2156 switch (sub)
2157 {
2158 case SUBLANG_ROMANSH_SWITZERLAND: return "rm_CH";
2159 }
2160 return "rm";
2161 case LANG_RUSSIAN:
2162 switch (sub)
2163 {
2164 case SUBLANG_RUSSIAN_RUSSIA: return "ru_RU";
2165 case SUBLANG_RUSSIAN_MOLDAVIA: return "ru_MD";
2166 }
2167 return "ru"; /* Ambiguous: could be "ru_RU" or "ru_UA" or "ru_MD". */
2168 case LANG_SAMI:
2169 switch (sub)
2170 {
2171 /* Northern Sami */
2172 case 0x00: return "se";
2173 case SUBLANG_SAMI_NORTHERN_NORWAY: return "se_NO";
2174 case SUBLANG_SAMI_NORTHERN_SWEDEN: return "se_SE";
2175 case SUBLANG_SAMI_NORTHERN_FINLAND: return "se_FI";
2176 /* Lule Sami */
2177 case 0x1f: return "smj";
2178 case SUBLANG_SAMI_LULE_NORWAY: return "smj_NO";
2179 case SUBLANG_SAMI_LULE_SWEDEN: return "smj_SE";
2180 /* Southern Sami */
2181 case 0x1e: return "sma";
2182 case SUBLANG_SAMI_SOUTHERN_NORWAY: return "sma_NO";
2183 case SUBLANG_SAMI_SOUTHERN_SWEDEN: return "sma_SE";
2184 /* Skolt Sami */
2185 case 0x1d: return "sms";
2186 case SUBLANG_SAMI_SKOLT_FINLAND: return "sms_FI";
2187 /* Inari Sami */
2188 case 0x1c: return "smn";
2189 case SUBLANG_SAMI_INARI_FINLAND: return "smn_FI";
2190 }
2191 return "se"; /* or "smi"? */
2192 case LANG_SANSKRIT:
2193 switch (sub)
2194 {
2195 case SUBLANG_SANSKRIT_INDIA: return "sa_IN";
2196 }
2197 return "sa";
2198 case LANG_SCOTTISH_GAELIC:
2199 switch (sub)
2200 {
2201 case SUBLANG_DEFAULT: return "gd_GB";
2202 }
2203 return "gd";
2204 case LANG_SINDHI:
2205 switch (sub)
2206 {
2207 case SUBLANG_SINDHI_INDIA: return "sd_IN";
2208 case SUBLANG_SINDHI_PAKISTAN: return "sd_PK";
2209 /*case SUBLANG_SINDHI_AFGHANISTAN: return "sd_AF";*/
2210 }
2211 return "sd";
2212 case LANG_SINHALESE:
2213 switch (sub)
2214 {
2215 case SUBLANG_SINHALESE_SRI_LANKA: return "si_LK";
2216 }
2217 return "si";
2218 case LANG_SLOVAK:
2219 switch (sub)
2220 {
2221 case SUBLANG_SLOVAK_SLOVAKIA: return "sk_SK";
2222 }
2223 return "sk";
2224 case LANG_SLOVENIAN:
2225 switch (sub)
2226 {
2227 case SUBLANG_SLOVENIAN_SLOVENIA: return "sl_SI";
2228 }
2229 return "sl";
2230 case LANG_SOMALI:
2231 switch (sub)
2232 {
2233 case SUBLANG_DEFAULT: return "so_SO";
2234 }
2235 return "so";
2236 case LANG_SORBIAN:
2237 /* FIXME: Adjust this when such locales appear on Unix. */
2238 switch (sub)
2239 {
2240 /* Upper Sorbian */
2241 case 0x00: return "hsb";
2242 case SUBLANG_UPPER_SORBIAN_GERMANY: return "hsb_DE";
2243 /* Lower Sorbian */
2244 case 0x1f: return "dsb";
2245 case SUBLANG_LOWER_SORBIAN_GERMANY: return "dsb_DE";
2246 }
2247 return "wen";
2248 case LANG_SOTHO:
2249 /* <http://www.microsoft.com/globaldev/reference/lcid-all.mspx> calls
2250 it "Sepedi"; according to
2251 <http://www.ethnologue.com/show_language.asp?code=nso>
2252 <http://www.ethnologue.com/show_language.asp?code=sot>
2253 it's the same as Northern Sotho. */
2254 switch (sub)
2255 {
2256 case SUBLANG_SOTHO_SOUTH_AFRICA: return "nso_ZA";
2257 }
2258 return "nso";
2259 case LANG_SPANISH:
2260 switch (sub)
2261 {
2262 case SUBLANG_SPANISH: return "es_ES";
2263 case SUBLANG_SPANISH_MEXICAN: return "es_MX";
2264 case SUBLANG_SPANISH_MODERN:
2265 return "es_ES@modern"; /* not seen on Unix */
2266 case SUBLANG_SPANISH_GUATEMALA: return "es_GT";
2267 case SUBLANG_SPANISH_COSTA_RICA: return "es_CR";
2268 case SUBLANG_SPANISH_PANAMA: return "es_PA";
2269 case SUBLANG_SPANISH_DOMINICAN_REPUBLIC: return "es_DO";
2270 case SUBLANG_SPANISH_VENEZUELA: return "es_VE";
2271 case SUBLANG_SPANISH_COLOMBIA: return "es_CO";
2272 case SUBLANG_SPANISH_PERU: return "es_PE";
2273 case SUBLANG_SPANISH_ARGENTINA: return "es_AR";
2274 case SUBLANG_SPANISH_ECUADOR: return "es_EC";
2275 case SUBLANG_SPANISH_CHILE: return "es_CL";
2276 case SUBLANG_SPANISH_URUGUAY: return "es_UY";
2277 case SUBLANG_SPANISH_PARAGUAY: return "es_PY";
2278 case SUBLANG_SPANISH_BOLIVIA: return "es_BO";
2279 case SUBLANG_SPANISH_EL_SALVADOR: return "es_SV";
2280 case SUBLANG_SPANISH_HONDURAS: return "es_HN";
2281 case SUBLANG_SPANISH_NICARAGUA: return "es_NI";
2282 case SUBLANG_SPANISH_PUERTO_RICO: return "es_PR";
2283 case SUBLANG_SPANISH_US: return "es_US";
2284 }
2285 return "es";
2286 case LANG_SUTU:
2287 switch (sub)
2288 {
2289 case SUBLANG_DEFAULT: return "bnt_TZ"; /* or "st_LS" or "nso_ZA"? */
2290 }
2291 return "bnt";
2292 case LANG_SWAHILI:
2293 switch (sub)
2294 {
2295 case SUBLANG_SWAHILI_KENYA: return "sw_KE";
2296 }
2297 return "sw";
2298 case LANG_SWEDISH:
2299 switch (sub)
2300 {
2301 case SUBLANG_SWEDISH_SWEDEN: return "sv_SE";
2302 case SUBLANG_SWEDISH_FINLAND: return "sv_FI";
2303 }
2304 return "sv";
2305 case LANG_SYRIAC:
2306 switch (sub)
2307 {
2308 case SUBLANG_SYRIAC_SYRIA: return "syr_SY"; /* An extinct language. */
2309 }
2310 return "syr";
2311 case LANG_TAGALOG:
2312 switch (sub)
2313 {
2314 case SUBLANG_TAGALOG_PHILIPPINES: return "tl_PH"; /* or "fil_PH"? */
2315 }
2316 return "tl"; /* or "fil"? */
2317 case LANG_TAJIK:
2318 switch (sub)
2319 {
2320 case 0x1f: return "tg";
2321 case SUBLANG_TAJIK_TAJIKISTAN: return "tg_TJ";
2322 }
2323 return "tg";
2324 case LANG_TAMAZIGHT:
2325 /* Note: Microsoft uses the non-ISO language code "tmz". */
2326 switch (sub)
2327 {
2328 /* FIXME: Adjust this when Tamazight locales appear on Unix. */
2329 case SUBLANG_TAMAZIGHT_ARABIC: return "ber_MA@arabic";
2330 case 0x1f: return "ber@latin";
2331 case SUBLANG_TAMAZIGHT_ALGERIA_LATIN: return "ber_DZ@latin";
2332 }
2333 return "ber";
2334 case LANG_TAMIL:
2335 switch (sub)
2336 {
2337 case SUBLANG_TAMIL_INDIA: return "ta_IN";
2338 }
2339 return "ta"; /* Ambiguous: could be "ta_IN" or "ta_LK" or "ta_SG". */
2340 case LANG_TATAR:
2341 switch (sub)
2342 {
2343 case SUBLANG_TATAR_RUSSIA: return "tt_RU";
2344 }
2345 return "tt";
2346 case LANG_TELUGU:
2347 switch (sub)
2348 {
2349 case SUBLANG_TELUGU_INDIA: return "te_IN";
2350 }
2351 return "te";
2352 case LANG_THAI:
2353 switch (sub)
2354 {
2355 case SUBLANG_THAI_THAILAND: return "th_TH";
2356 }
2357 return "th";
2358 case LANG_TIBETAN:
2359 switch (sub)
2360 {
2361 case SUBLANG_TIBETAN_PRC:
2362 /* Most Tibetans would not like "bo_CN". But Tibet does not yet
2363 have a country code of its own. */
2364 return "bo";
2365 case SUBLANG_TIBETAN_BHUTAN: return "bo_BT";
2366 }
2367 return "bo";
2368 case LANG_TIGRINYA:
2369 switch (sub)
2370 {
2371 case SUBLANG_TIGRINYA_ETHIOPIA: return "ti_ET";
2372 case SUBLANG_TIGRINYA_ERITREA: return "ti_ER";
2373 }
2374 return "ti";
2375 case LANG_TSONGA:
2376 switch (sub)
2377 {
2378 case SUBLANG_DEFAULT: return "ts_ZA";
2379 }
2380 return "ts";
2381 case LANG_TSWANA:
2382 /* Spoken in South Africa, Botswana. */
2383 switch (sub)
2384 {
2385 case SUBLANG_TSWANA_SOUTH_AFRICA: return "tn_ZA";
2386 }
2387 return "tn";
2388 case LANG_TURKISH:
2389 switch (sub)
2390 {
2391 case SUBLANG_TURKISH_TURKEY: return "tr_TR";
2392 }
2393 return "tr";
2394 case LANG_TURKMEN:
2395 switch (sub)
2396 {
2397 case SUBLANG_TURKMEN_TURKMENISTAN: return "tk_TM";
2398 }
2399 return "tk";
2400 case LANG_UIGHUR:
2401 switch (sub)
2402 {
2403 case SUBLANG_UIGHUR_PRC: return "ug_CN";
2404 }
2405 return "ug";
2406 case LANG_UKRAINIAN:
2407 switch (sub)
2408 {
2409 case SUBLANG_UKRAINIAN_UKRAINE: return "uk_UA";
2410 }
2411 return "uk";
2412 case LANG_URDU:
2413 switch (sub)
2414 {
2415 case SUBLANG_URDU_PAKISTAN: return "ur_PK";
2416 case SUBLANG_URDU_INDIA: return "ur_IN";
2417 }
2418 return "ur";
2419 case LANG_UZBEK:
2420 switch (sub)
2421 {
2422 case 0x1f: return "uz";
2423 case SUBLANG_UZBEK_LATIN: return "uz_UZ";
2424 case 0x1e: return "uz@cyrillic";
2425 case SUBLANG_UZBEK_CYRILLIC: return "uz_UZ@cyrillic";
2426 }
2427 return "uz";
2428 case LANG_VENDA:
2429 switch (sub)
2430 {
2431 case SUBLANG_DEFAULT: return "ve_ZA";
2432 }
2433 return "ve";
2434 case LANG_VIETNAMESE:
2435 switch (sub)
2436 {
2437 case SUBLANG_VIETNAMESE_VIETNAM: return "vi_VN";
2438 }
2439 return "vi";
2440 case LANG_WELSH:
2441 switch (sub)
2442 {
2443 case SUBLANG_WELSH_UNITED_KINGDOM: return "cy_GB";
2444 }
2445 return "cy";
2446 case LANG_WOLOF:
2447 switch (sub)
2448 {
2449 case SUBLANG_WOLOF_SENEGAL: return "wo_SN";
2450 }
2451 return "wo";
2452 case LANG_XHOSA:
2453 switch (sub)
2454 {
2455 case SUBLANG_XHOSA_SOUTH_AFRICA: return "xh_ZA";
2456 }
2457 return "xh";
2458 case LANG_YAKUT:
2459 switch (sub)
2460 {
2461 case SUBLANG_YAKUT_RUSSIA: return "sah_RU";
2462 }
2463 return "sah";
2464 case LANG_YI:
2465 switch (sub)
2466 {
2467 case SUBLANG_YI_PRC: return "ii_CN";
2468 }
2469 return "ii";
2470 case LANG_YIDDISH:
2471 switch (sub)
2472 {
2473 case SUBLANG_DEFAULT: return "yi_IL";
2474 }
2475 return "yi";
2476 case LANG_YORUBA:
2477 switch (sub)
2478 {
2479 case SUBLANG_YORUBA_NIGERIA: return "yo_NG";
2480 }
2481 return "yo";
2482 case LANG_ZULU:
2483 switch (sub)
2484 {
2485 case SUBLANG_ZULU_SOUTH_AFRICA: return "zu_ZA";
2486 }
2487 return "zu";
2488 default: return "C";
2489 }
2490 }
2491 }
2492
2493 # if !defined IN_LIBINTL
2494 static
2495 # endif
2496 const char *
2497 gl_locale_name_from_win32_LCID (LCID lcid)
2498 {
2499 LANGID langid;
2500
2501 /* Strip off the sorting rules, keep only the language part. */
2502 langid = LANGIDFROMLCID (lcid);
2503
2504 return gl_locale_name_from_win32_LANGID (langid);
2505 }
2506
2507 #endif
2508
2509
2510 #if HAVE_USELOCALE /* glibc or MacOS X */
2511
2512 /* Simple hash set of strings. We don't want to drag in lots of hash table
2513 code here. */
2514
2515 # define SIZE_BITS (sizeof (size_t) * CHAR_BIT)
2516
2517 /* A hash function for NUL-terminated char* strings using
2518 the method described by Bruno Haible.
2519 See http://www.haible.de/bruno/hashfunc.html. */
2520 static size_t
2521 string_hash (const void *x)
2522 {
2523 const char *s = (const char *) x;
2524 size_t h = 0;
2525
2526 for (; *s; s++)
2527 h = *s + ((h << 9) | (h >> (SIZE_BITS - 9)));
2528
2529 return h;
2530 }
2531
2532 /* A hash table of fixed size. Multiple threads can access it read-only
2533 simultaneously, but only one thread can insert into it at the same time. */
2534
2535 /* A node in a hash bucket collision list. */
2536 struct hash_node
2537 {
2538 struct hash_node * volatile next;
2539 char contents[100]; /* has variable size */
2540 };
2541
2542 # define HASH_TABLE_SIZE 257
2543 static struct hash_node * volatile struniq_hash_table[HASH_TABLE_SIZE]
2544 /* = { NULL, ..., NULL } */;
2545
2546 /* This lock protects the struniq_hash_table against multiple simultaneous
2547 insertions. */
2548 gl_lock_define_initialized(static, struniq_lock)
2549
2550 /* Store a copy of the given string in a string pool with indefinite extent.
2551 Return a pointer to this copy. */
2552 static const char *
2553 struniq (const char *string)
2554 {
2555 size_t hashcode = string_hash (string);
2556 size_t slot = hashcode % HASH_TABLE_SIZE;
2557 size_t size;
2558 struct hash_node *new_node;
2559 struct hash_node *p;
2560 for (p = struniq_hash_table[slot]; p != NULL; p = p->next)
2561 if (strcmp (p->contents, string) == 0)
2562 return p->contents;
2563 size = strlen (string) + 1;
2564 new_node =
2565 (struct hash_node *)
2566 malloc (offsetof (struct hash_node, contents[0]) + size);
2567 if (new_node == NULL)
2568 /* Out of memory. Return a statically allocated string. */
2569 return "C";
2570 memcpy (new_node->contents, string, size);
2571 /* Lock while inserting new_node. */
2572 gl_lock_lock (struniq_lock);
2573 /* Check whether another thread already added the string while we were
2574 waiting on the lock. */
2575 for (p = struniq_hash_table[slot]; p != NULL; p = p->next)
2576 if (strcmp (p->contents, string) == 0)
2577 {
2578 free (new_node);
2579 new_node = p;
2580 goto done;
2581 }
2582 /* Really insert new_node into the hash table. Fill new_node entirely first,
2583 because other threads may be iterating over the linked list. */
2584 new_node->next = struniq_hash_table[slot];
2585 struniq_hash_table[slot] = new_node;
2586 done:
2587 /* Unlock after new_node is inserted. */
2588 gl_lock_unlock (struniq_lock);
2589 return new_node->contents;
2590 }
2591
2592 #endif
2593
2594
2595 #if defined IN_LIBINTL || HAVE_USELOCALE
2596
2597 /* Like gl_locale_name_thread, except that the result is not in storage of
2598 indefinite extent. */
2599 # if !defined IN_LIBINTL
2600 static
2601 # endif
2602 const char *
2603 gl_locale_name_thread_unsafe (int category, const char *categoryname)
2604 {
2605 # if HAVE_USELOCALE
2606 {
2607 locale_t thread_locale = uselocale (NULL);
2608 if (thread_locale != LC_GLOBAL_LOCALE)
2609 {
2610 # if __GLIBC__ >= 2
2611 /* Work around an incorrect definition of the _NL_LOCALE_NAME macro in
2612 glibc < 2.12.
2613 See <http://sourceware.org/bugzilla/show_bug.cgi?id=10968>. */
2614 const char *name =
2615 nl_langinfo (_NL_ITEM ((category), _NL_ITEM_INDEX (-1)));
2616 if (name[0] == '\0')
2617 /* Fallback code for glibc < 2.4, which did not implement
2618 nl_langinfo (_NL_LOCALE_NAME (category)). */
2619 name = thread_locale->__names[category];
2620 return name;
2621 # endif
2622 # if defined __APPLE__ && defined __MACH__ /* MacOS X */
2623 /* The locale name is found deep in an undocumented data structure.
2624 Since it's stored in a buffer of size 32 and newlocale() rejects
2625 locale names of length > 31, we can assume that it is NUL terminated
2626 in this buffer. But we need to make a copy of the locale name, of
2627 indefinite extent. */
2628 struct _xlocale_part1_v0 /* used in MacOS X 10.5 */
2629 {
2630 int32_t __refcount;
2631 void (*__free_extra)(void *);
2632 __darwin_mbstate_t __mbs[10];
2633 int64_t __magic;
2634 };
2635 struct _xlocale_part1_v1 /* used in MacOS X >= 10.6.0 */
2636 {
2637 int32_t __refcount;
2638 void (*__free_extra)(void *);
2639 __darwin_mbstate_t __mbs[10];
2640 /*pthread_lock_t*/ int __lock;
2641 int64_t __magic;
2642 };
2643 struct _xlocale_part2
2644 {
2645 int64_t __magic;
2646 unsigned char __collate_load_error;
2647 unsigned char __collate_substitute_nontrivial;
2648 unsigned char _messages_using_locale;
2649 unsigned char _monetary_using_locale;
2650 unsigned char _numeric_using_locale;
2651 unsigned char _time_using_locale;
2652 unsigned char __mlocale_changed;
2653 unsigned char __nlocale_changed;
2654 unsigned char __numeric_fp_cvt;
2655 struct __xlocale_st_collate *__lc_collate;
2656 struct __xlocale_st_runelocale *__lc_ctype;
2657 struct __xlocale_st_messages *__lc_messages;
2658 struct __xlocale_st_monetary *__lc_monetary;
2659 struct __xlocale_st_numeric *__lc_numeric;
2660 struct _xlocale *__lc_numeric_loc;
2661 struct __xlocale_st_time *__lc_time;
2662 /* more */
2663 };
2664 struct __xlocale_st_collate
2665 {
2666 int32_t __refcount;
2667 void (*__free_extra)(void *);
2668 char __encoding[32];
2669 /* more */
2670 };
2671 struct __xlocale_st_runelocale
2672 {
2673 int32_t __refcount;
2674 void (*__free_extra)(void *);
2675 char __ctype_encoding[32];
2676 /* more */
2677 };
2678 struct __xlocale_st_messages
2679 {
2680 int32_t __refcount;
2681 void (*__free_extra)(void *);
2682 char *_messages_locale_buf;
2683 /* more */
2684 };
2685 struct __xlocale_st_monetary
2686 {
2687 int32_t __refcount;
2688 void (*__free_extra)(void *);
2689 char *_monetary_locale_buf;
2690 /* more */
2691 };
2692 struct __xlocale_st_numeric {
2693 int32_t __refcount;
2694 void (*__free_extra)(void *);
2695 char *_numeric_locale_buf;
2696 /* more */
2697 };
2698 struct __xlocale_st_time {
2699 int32_t __refcount;
2700 void (*__free_extra)(void *);
2701 char *_time_locale_buf;
2702 /* more */
2703 };
2704 struct _xlocale_part2 *tlp;
2705 if (((struct _xlocale_part1_v0 *) thread_locale)->__magic
2706 == 0x786C6F63616C6530LL)
2707 /* MacOS X 10.5 */
2708 tlp =
2709 (struct _xlocale_part2 *)
2710 &((struct _xlocale_part1_v0 *) thread_locale)->__magic;
2711 else if (((struct _xlocale_part1_v1 *) thread_locale)->__magic
2712 == 0x786C6F63616C6530LL)
2713 /* MacOS X >= 10.6.0 */
2714 tlp =
2715 (struct _xlocale_part2 *)
2716 &((struct _xlocale_part1_v1 *) thread_locale)->__magic;
2717 else
2718 /* Unsupported version of MacOS X: The internals of 'struct _xlocale'
2719 have changed again. */
2720 return "";
2721 switch (category)
2722 {
2723 case LC_CTYPE:
2724 return tlp->__lc_ctype->__ctype_encoding;
2725 case LC_NUMERIC:
2726 return tlp->_numeric_using_locale
2727 ? tlp->__lc_numeric->_numeric_locale_buf
2728 : "C";
2729 case LC_TIME:
2730 return tlp->_time_using_locale
2731 ? tlp->__lc_time->_time_locale_buf
2732 : "C";
2733 case LC_COLLATE:
2734 return !tlp->__collate_load_error
2735 ? tlp->__lc_collate->__encoding
2736 : "C";
2737 case LC_MONETARY:
2738 return tlp->_monetary_using_locale
2739 ? tlp->__lc_monetary->_monetary_locale_buf
2740 : "C";
2741 case LC_MESSAGES:
2742 return tlp->_messages_using_locale
2743 ? tlp->__lc_messages->_messages_locale_buf
2744 : "C";
2745 default: /* We shouldn't get here. */
2746 return "";
2747 }
2748 # endif
2749 }
2750 }
2751 # endif
2752 return NULL;
2753 }
2754
2755 #endif
2756
2757 const char *
2758 gl_locale_name_thread (int category, const char *categoryname)
2759 {
2760 #if HAVE_USELOCALE
2761 const char *name = gl_locale_name_thread_unsafe (category, categoryname);
2762 if (name != NULL)
2763 return struniq (name);
2764 #endif
2765 return NULL;
2766 }
2767
2768 /* XPG3 defines the result of 'setlocale (category, NULL)' as:
2769 "Directs 'setlocale()' to query 'category' and return the current
2770 setting of 'local'."
2771 However it does not specify the exact format. Neither do SUSV2 and
2772 ISO C 99. So we can use this feature only on selected systems (e.g.
2773 those using GNU C Library). */
2774 #if defined _LIBC || (defined __GLIBC__ && __GLIBC__ >= 2)
2775 # define HAVE_LOCALE_NULL
2776 #endif
2777
2778 const char *
2779 gl_locale_name_posix (int category, const char *categoryname)
2780 {
2781 /* Use the POSIX methods of looking to 'LC_ALL', 'LC_xxx', and 'LANG'.
2782 On some systems this can be done by the 'setlocale' function itself. */
2783 #if defined HAVE_SETLOCALE && defined HAVE_LC_MESSAGES && defined HAVE_LOCALE_NULL
2784 return setlocale (category, NULL);
2785 #else
2786 /* On other systems we ignore what setlocale reports and instead look at the
2787 environment variables directly. This is necessary
2788 1. on systems which have a facility for customizing the default locale
2789 (MacOS X, native Windows, Cygwin) and where the system's setlocale()
2790 function ignores this default locale (MacOS X, Cygwin), in two cases:
2791 a. when the user missed to use the setlocale() override from libintl
2792 (for example by not including <libintl.h>),
2793 b. when setlocale supports only the "C" locale, such as on Cygwin
2794 1.5.x. In this case even the override from libintl cannot help.
2795 2. on all systems where setlocale supports only the "C" locale. */
2796 /* Strictly speaking, it is a POSIX violation to look at the environment
2797 variables regardless whether setlocale has been called or not. POSIX
2798 says:
2799 "For C-language programs, the POSIX locale shall be the
2800 default locale when the setlocale() function is not called."
2801 But we assume that all programs that use internationalized APIs call
2802 setlocale (LC_ALL, ""). */
2803 return gl_locale_name_environ (category, categoryname);
2804 #endif
2805 }
2806
2807 const char *
2808 gl_locale_name_environ (int category, const char *categoryname)
2809 {
2810 const char *retval;
2811
2812 /* Setting of LC_ALL overrides all other. */
2813 retval = getenv ("LC_ALL");
2814 if (retval != NULL && retval[0] != '\0')
2815 return retval;
2816 /* Next comes the name of the desired category. */
2817 retval = getenv (categoryname);
2818 if (retval != NULL && retval[0] != '\0')
2819 return retval;
2820 /* Last possibility is the LANG environment variable. */
2821 retval = getenv ("LANG");
2822 if (retval != NULL && retval[0] != '\0')
2823 {
2824 #if HAVE_CFLOCALECOPYCURRENT || HAVE_CFPREFERENCESCOPYAPPVALUE
2825 /* MacOS X 10.2 or newer.
2826 Ignore invalid LANG value set by the Terminal application. */
2827 if (strcmp (retval, "UTF-8") != 0)
2828 #endif
2829 #if defined __CYGWIN__
2830 /* Cygwin.
2831 Ignore dummy LANG value set by ~/.profile. */
2832 if (strcmp (retval, "C.UTF-8") != 0)
2833 #endif
2834 return retval;
2835 }
2836
2837 return NULL;
2838 }
2839
2840 const char *
2841 gl_locale_name_default (void)
2842 {
2843 /* POSIX:2001 says:
2844 "All implementations shall define a locale as the default locale, to be
2845 invoked when no environment variables are set, or set to the empty
2846 string. This default locale can be the POSIX locale or any other
2847 implementation-defined locale. Some implementations may provide
2848 facilities for local installation administrators to set the default
2849 locale, customizing it for each location. POSIX:2001 does not require
2850 such a facility.
2851
2852 The systems with such a facility are MacOS X and Windows: They provide a
2853 GUI that allows the user to choose a locale.
2854 - On MacOS X, by default, none of LC_* or LANG are set. Starting with
2855 MacOS X 10.4 or 10.5, LANG is set for processes launched by the
2856 'Terminal' application (but sometimes to an incorrect value "UTF-8").
2857 When no environment variable is set, setlocale (LC_ALL, "") uses the
2858 "C" locale.
2859 - On native Windows, by default, none of LC_* or LANG are set.
2860 When no environment variable is set, setlocale (LC_ALL, "") uses the
2861 locale chosen by the user.
2862 - On Cygwin 1.5.x, by default, none of LC_* or LANG are set.
2863 When no environment variable is set, setlocale (LC_ALL, "") uses the
2864 "C" locale.
2865 - On Cygwin 1.7, by default, LANG is set to "C.UTF-8" when the default
2866 ~/.profile is executed.
2867 When no environment variable is set, setlocale (LC_ALL, "") uses the
2868 "C.UTF-8" locale, which operates in the same way as the "C" locale.
2869 */
2870
2871 #if !(HAVE_CFLOCALECOPYCURRENT || HAVE_CFPREFERENCESCOPYAPPVALUE || defined WIN32_NATIVE || defined __CYGWIN__)
2872
2873 /* The system does not have a way of setting the locale, other than the
2874 POSIX specified environment variables. We use C as default locale. */
2875 return "C";
2876
2877 #else
2878
2879 /* Return an XPG style locale name language[_territory][@modifier].
2880 Don't even bother determining the codeset; it's not useful in this
2881 context, because message catalogs are not specific to a single
2882 codeset. */
2883
2884 # if HAVE_CFLOCALECOPYCURRENT || HAVE_CFPREFERENCESCOPYAPPVALUE
2885 /* MacOS X 10.2 or newer */
2886 {
2887 /* Cache the locale name, since CoreFoundation calls are expensive. */
2888 static const char *cached_localename;
2889
2890 if (cached_localename == NULL)
2891 {
2892 char namebuf[256];
2893 # if HAVE_CFLOCALECOPYCURRENT /* MacOS X 10.3 or newer */
2894 CFLocaleRef locale = CFLocaleCopyCurrent ();
2895 CFStringRef name = CFLocaleGetIdentifier (locale);
2896
2897 if (CFStringGetCString (name, namebuf, sizeof (namebuf),
2898 kCFStringEncodingASCII))
2899 {
2900 gl_locale_name_canonicalize (namebuf);
2901 cached_localename = strdup (namebuf);
2902 }
2903 CFRelease (locale);
2904 # elif HAVE_CFPREFERENCESCOPYAPPVALUE /* MacOS X 10.2 or newer */
2905 CFTypeRef value =
2906 CFPreferencesCopyAppValue (CFSTR ("AppleLocale"),
2907 kCFPreferencesCurrentApplication);
2908 if (value != NULL
2909 && CFGetTypeID (value) == CFStringGetTypeID ()
2910 && CFStringGetCString ((CFStringRef)value,
2911 namebuf, sizeof (namebuf),
2912 kCFStringEncodingASCII))
2913 {
2914 gl_locale_name_canonicalize (namebuf);
2915 cached_localename = strdup (namebuf);
2916 }
2917 # endif
2918 if (cached_localename == NULL)
2919 cached_localename = "C";
2920 }
2921 return cached_localename;
2922 }
2923
2924 # endif
2925
2926 # if defined WIN32_NATIVE || defined __CYGWIN__ /* WIN32 or Cygwin */
2927 {
2928 LCID lcid;
2929
2930 /* Use native Win32 API locale ID. */
2931 lcid = GetThreadLocale ();
2932
2933 return gl_locale_name_from_win32_LCID (lcid);
2934 }
2935 # endif
2936 #endif
2937 }
2938
2939 /* Determine the current locale's name, and canonicalize it into XPG syntax
2940 language[_territory][.codeset][@modifier]
2941 The codeset part in the result is not reliable; the locale_charset()
2942 should be used for codeset information instead.
2943 The result must not be freed; it is statically allocated. */
2944
2945 const char *
2946 gl_locale_name (int category, const char *categoryname)
2947 {
2948 const char *retval;
2949
2950 retval = gl_locale_name_thread (category, categoryname);
2951 if (retval != NULL)
2952 return retval;
2953
2954 retval = gl_locale_name_posix (category, categoryname);
2955 if (retval != NULL)
2956 return retval;
2957
2958 return gl_locale_name_default ();
2959 }
GLiv - OpenGL Image Viewer