]> git.ipfire.org Git - thirdparty/e2fsprogs.git/blame - intl/localename.c
Merge branch 'maint' into next
[thirdparty/e2fsprogs.git] / intl / localename.c
CommitLineData
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
8785aaea 16 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
a04eba3f
TT
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
702const 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}