Context Navigation

localename.c @ 18945

Visit:

Revision 18945, 22.1 KB checked in by amb, 22 years ago (diff)
This commit was generated by cvs2svn to compensate for changes in r18944, which included commits to RCS files with non-trunk default branches.

Line
1	/* Determine the current selected locale.
2	Copyright (C) 1995-1999, 2000-2002 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
17	USA. */
18
19	/* Written by Ulrich Drepper <drepper@gnu.org>, 1995. */
20	/* Win32 code written by Tor Lillqvist <tml@iki.fi>. */
21
22	#ifdef HAVE_CONFIG_H
23	# include <config.h>
24	#endif
25
26	#include <stdlib.h>
27	#include <locale.h>
28
29	#if defined _WIN32 \|\| defined __WIN32__
30	# undef WIN32 /* avoid warning on mingw32 */
31	# define WIN32
32	#endif
33
34	#ifdef WIN32
35	# define WIN32_LEAN_AND_MEAN
36	# include <windows.h>
37	/* Mingw headers don't have latest language and sublanguage codes. */
38	# ifndef LANG_AFRIKAANS
39	# define LANG_AFRIKAANS 0x36
40	# endif
41	# ifndef LANG_ALBANIAN
42	# define LANG_ALBANIAN 0x1c
43	# endif
44	# ifndef LANG_ARABIC
45	# define LANG_ARABIC 0x01
46	# endif
47	# ifndef LANG_ARMENIAN
48	# define LANG_ARMENIAN 0x2b
49	# endif
50	# ifndef LANG_ASSAMESE
51	# define LANG_ASSAMESE 0x4d
52	# endif
53	# ifndef LANG_AZERI
54	# define LANG_AZERI 0x2c
55	# endif
56	# ifndef LANG_BASQUE
57	# define LANG_BASQUE 0x2d
58	# endif
59	# ifndef LANG_BELARUSIAN
60	# define LANG_BELARUSIAN 0x23
61	# endif
62	# ifndef LANG_BENGALI
63	# define LANG_BENGALI 0x45
64	# endif
65	# ifndef LANG_CATALAN
66	# define LANG_CATALAN 0x03
67	# endif
68	# ifndef LANG_DIVEHI
69	# define LANG_DIVEHI 0x65
70	# endif
71	# ifndef LANG_ESTONIAN
72	# define LANG_ESTONIAN 0x25
73	# endif
74	# ifndef LANG_FAEROESE
75	# define LANG_FAEROESE 0x38
76	# endif
77	# ifndef LANG_FARSI
78	# define LANG_FARSI 0x29
79	# endif
80	# ifndef LANG_GALICIAN
81	# define LANG_GALICIAN 0x56
82	# endif
83	# ifndef LANG_GEORGIAN
84	# define LANG_GEORGIAN 0x37
85	# endif
86	# ifndef LANG_GUJARATI
87	# define LANG_GUJARATI 0x47
88	# endif
89	# ifndef LANG_HEBREW
90	# define LANG_HEBREW 0x0d
91	# endif
92	# ifndef LANG_HINDI
93	# define LANG_HINDI 0x39
94	# endif
95	# ifndef LANG_INDONESIAN
96	# define LANG_INDONESIAN 0x21
97	# endif
98	# ifndef LANG_KANNADA
99	# define LANG_KANNADA 0x4b
100	# endif
101	# ifndef LANG_KASHMIRI
102	# define LANG_KASHMIRI 0x60
103	# endif
104	# ifndef LANG_KAZAK
105	# define LANG_KAZAK 0x3f
106	# endif
107	# ifndef LANG_KONKANI
108	# define LANG_KONKANI 0x57
109	# endif
110	# ifndef LANG_KYRGYZ
111	# define LANG_KYRGYZ 0x40
112	# endif
113	# ifndef LANG_LATVIAN
114	# define LANG_LATVIAN 0x26
115	# endif
116	# ifndef LANG_LITHUANIAN
117	# define LANG_LITHUANIAN 0x27
118	# endif
119	# ifndef LANG_MACEDONIAN
120	# define LANG_MACEDONIAN 0x2f
121	# endif
122	# ifndef LANG_MALAY
123	# define LANG_MALAY 0x3e
124	# endif
125	# ifndef LANG_MALAYALAM
126	# define LANG_MALAYALAM 0x4c
127	# endif
128	# ifndef LANG_MANIPURI
129	# define LANG_MANIPURI 0x58
130	# endif
131	# ifndef LANG_MARATHI
132	# define LANG_MARATHI 0x4e
133	# endif
134	# ifndef LANG_MONGOLIAN
135	# define LANG_MONGOLIAN 0x50
136	# endif
137	# ifndef LANG_NEPALI
138	# define LANG_NEPALI 0x61
139	# endif
140	# ifndef LANG_ORIYA
141	# define LANG_ORIYA 0x48
142	# endif
143	# ifndef LANG_PUNJABI
144	# define LANG_PUNJABI 0x46
145	# endif
146	# ifndef LANG_SANSKRIT
147	# define LANG_SANSKRIT 0x4f
148	# endif
149	# ifndef LANG_SERBIAN
150	# define LANG_SERBIAN 0x1a
151	# endif
152	# ifndef LANG_SINDHI
153	# define LANG_SINDHI 0x59
154	# endif
155	# ifndef LANG_SLOVAK
156	# define LANG_SLOVAK 0x1b
157	# endif
158	# ifndef LANG_SORBIAN
159	# define LANG_SORBIAN 0x2e
160	# endif
161	# ifndef LANG_SWAHILI
162	# define LANG_SWAHILI 0x41
163	# endif
164	# ifndef LANG_SYRIAC
165	# define LANG_SYRIAC 0x5a
166	# endif
167	# ifndef LANG_TAMIL
168	# define LANG_TAMIL 0x49
169	# endif
170	# ifndef LANG_TATAR
171	# define LANG_TATAR 0x44
172	# endif
173	# ifndef LANG_TELUGU
174	# define LANG_TELUGU 0x4a
175	# endif
176	# ifndef LANG_THAI
177	# define LANG_THAI 0x1e
178	# endif
179	# ifndef LANG_UKRAINIAN
180	# define LANG_UKRAINIAN 0x22
181	# endif
182	# ifndef LANG_URDU
183	# define LANG_URDU 0x20
184	# endif
185	# ifndef LANG_UZBEK
186	# define LANG_UZBEK 0x43
187	# endif
188	# ifndef LANG_VIETNAMESE
189	# define LANG_VIETNAMESE 0x2a
190	# endif
191	# ifndef SUBLANG_ARABIC_SAUDI_ARABIA
192	# define SUBLANG_ARABIC_SAUDI_ARABIA 0x01
193	# endif
194	# ifndef SUBLANG_ARABIC_IRAQ
195	# define SUBLANG_ARABIC_IRAQ 0x02
196	# endif
197	# ifndef SUBLANG_ARABIC_EGYPT
198	# define SUBLANG_ARABIC_EGYPT 0x03
199	# endif
200	# ifndef SUBLANG_ARABIC_LIBYA
201	# define SUBLANG_ARABIC_LIBYA 0x04
202	# endif
203	# ifndef SUBLANG_ARABIC_ALGERIA
204	# define SUBLANG_ARABIC_ALGERIA 0x05
205	# endif
206	# ifndef SUBLANG_ARABIC_MOROCCO
207	# define SUBLANG_ARABIC_MOROCCO 0x06
208	# endif
209	# ifndef SUBLANG_ARABIC_TUNISIA
210	# define SUBLANG_ARABIC_TUNISIA 0x07
211	# endif
212	# ifndef SUBLANG_ARABIC_OMAN
213	# define SUBLANG_ARABIC_OMAN 0x08
214	# endif
215	# ifndef SUBLANG_ARABIC_YEMEN
216	# define SUBLANG_ARABIC_YEMEN 0x09
217	# endif
218	# ifndef SUBLANG_ARABIC_SYRIA
219	# define SUBLANG_ARABIC_SYRIA 0x0a
220	# endif
221	# ifndef SUBLANG_ARABIC_JORDAN
222	# define SUBLANG_ARABIC_JORDAN 0x0b
223	# endif
224	# ifndef SUBLANG_ARABIC_LEBANON
225	# define SUBLANG_ARABIC_LEBANON 0x0c
226	# endif
227	# ifndef SUBLANG_ARABIC_KUWAIT
228	# define SUBLANG_ARABIC_KUWAIT 0x0d
229	# endif
230	# ifndef SUBLANG_ARABIC_UAE
231	# define SUBLANG_ARABIC_UAE 0x0e
232	# endif
233	# ifndef SUBLANG_ARABIC_BAHRAIN
234	# define SUBLANG_ARABIC_BAHRAIN 0x0f
235	# endif
236	# ifndef SUBLANG_ARABIC_QATAR
237	# define SUBLANG_ARABIC_QATAR 0x10
238	# endif
239	# ifndef SUBLANG_AZERI_LATIN
240	# define SUBLANG_AZERI_LATIN 0x01
241	# endif
242	# ifndef SUBLANG_AZERI_CYRILLIC
243	# define SUBLANG_AZERI_CYRILLIC 0x02
244	# endif
245	# ifndef SUBLANG_CHINESE_MACAU
246	# define SUBLANG_CHINESE_MACAU 0x05
247	# endif
248	# ifndef SUBLANG_ENGLISH_SOUTH_AFRICA
249	# define SUBLANG_ENGLISH_SOUTH_AFRICA 0x07
250	# endif
251	# ifndef SUBLANG_ENGLISH_JAMAICA
252	# define SUBLANG_ENGLISH_JAMAICA 0x08
253	# endif
254	# ifndef SUBLANG_ENGLISH_CARIBBEAN
255	# define SUBLANG_ENGLISH_CARIBBEAN 0x09
256	# endif
257	# ifndef SUBLANG_ENGLISH_BELIZE
258	# define SUBLANG_ENGLISH_BELIZE 0x0a
259	# endif
260	# ifndef SUBLANG_ENGLISH_TRINIDAD
261	# define SUBLANG_ENGLISH_TRINIDAD 0x0b
262	# endif
263	# ifndef SUBLANG_ENGLISH_ZIMBABWE
264	# define SUBLANG_ENGLISH_ZIMBABWE 0x0c
265	# endif
266	# ifndef SUBLANG_ENGLISH_PHILIPPINES
267	# define SUBLANG_ENGLISH_PHILIPPINES 0x0d
268	# endif
269	# ifndef SUBLANG_FRENCH_LUXEMBOURG
270	# define SUBLANG_FRENCH_LUXEMBOURG 0x05
271	# endif
272	# ifndef SUBLANG_FRENCH_MONACO
273	# define SUBLANG_FRENCH_MONACO 0x06
274	# endif
275	# ifndef SUBLANG_GERMAN_LUXEMBOURG
276	# define SUBLANG_GERMAN_LUXEMBOURG 0x04
277	# endif
278	# ifndef SUBLANG_GERMAN_LIECHTENSTEIN
279	# define SUBLANG_GERMAN_LIECHTENSTEIN 0x05
280	# endif
281	# ifndef SUBLANG_KASHMIRI_INDIA
282	# define SUBLANG_KASHMIRI_INDIA 0x02
283	# endif
284	# ifndef SUBLANG_MALAY_MALAYSIA
285	# define SUBLANG_MALAY_MALAYSIA 0x01
286	# endif
287	# ifndef SUBLANG_MALAY_BRUNEI_DARUSSALAM
288	# define SUBLANG_MALAY_BRUNEI_DARUSSALAM 0x02
289	# endif
290	# ifndef SUBLANG_NEPALI_INDIA
291	# define SUBLANG_NEPALI_INDIA 0x02
292	# endif
293	# ifndef SUBLANG_SERBIAN_LATIN
294	# define SUBLANG_SERBIAN_LATIN 0x02
295	# endif
296	# ifndef SUBLANG_SERBIAN_CYRILLIC
297	# define SUBLANG_SERBIAN_CYRILLIC 0x03
298	# endif
299	# ifndef SUBLANG_SPANISH_GUATEMALA
300	# define SUBLANG_SPANISH_GUATEMALA 0x04
301	# endif
302	# ifndef SUBLANG_SPANISH_COSTA_RICA
303	# define SUBLANG_SPANISH_COSTA_RICA 0x05
304	# endif
305	# ifndef SUBLANG_SPANISH_PANAMA
306	# define SUBLANG_SPANISH_PANAMA 0x06
307	# endif
308	# ifndef SUBLANG_SPANISH_DOMINICAN_REPUBLIC
309	# define SUBLANG_SPANISH_DOMINICAN_REPUBLIC 0x07
310	# endif
311	# ifndef SUBLANG_SPANISH_VENEZUELA
312	# define SUBLANG_SPANISH_VENEZUELA 0x08
313	# endif
314	# ifndef SUBLANG_SPANISH_COLOMBIA
315	# define SUBLANG_SPANISH_COLOMBIA 0x09
316	# endif
317	# ifndef SUBLANG_SPANISH_PERU
318	# define SUBLANG_SPANISH_PERU 0x0a
319	# endif
320	# ifndef SUBLANG_SPANISH_ARGENTINA
321	# define SUBLANG_SPANISH_ARGENTINA 0x0b
322	# endif
323	# ifndef SUBLANG_SPANISH_ECUADOR
324	# define SUBLANG_SPANISH_ECUADOR 0x0c
325	# endif
326	# ifndef SUBLANG_SPANISH_CHILE
327	# define SUBLANG_SPANISH_CHILE 0x0d
328	# endif
329	# ifndef SUBLANG_SPANISH_URUGUAY
330	# define SUBLANG_SPANISH_URUGUAY 0x0e
331	# endif
332	# ifndef SUBLANG_SPANISH_PARAGUAY
333	# define SUBLANG_SPANISH_PARAGUAY 0x0f
334	# endif
335	# ifndef SUBLANG_SPANISH_BOLIVIA
336	# define SUBLANG_SPANISH_BOLIVIA 0x10
337	# endif
338	# ifndef SUBLANG_SPANISH_EL_SALVADOR
339	# define SUBLANG_SPANISH_EL_SALVADOR 0x11
340	# endif
341	# ifndef SUBLANG_SPANISH_HONDURAS
342	# define SUBLANG_SPANISH_HONDURAS 0x12
343	# endif
344	# ifndef SUBLANG_SPANISH_NICARAGUA
345	# define SUBLANG_SPANISH_NICARAGUA 0x13
346	# endif
347	# ifndef SUBLANG_SPANISH_PUERTO_RICO
348	# define SUBLANG_SPANISH_PUERTO_RICO 0x14
349	# endif
350	# ifndef SUBLANG_SWEDISH_FINLAND
351	# define SUBLANG_SWEDISH_FINLAND 0x02
352	# endif
353	# ifndef SUBLANG_URDU_PAKISTAN
354	# define SUBLANG_URDU_PAKISTAN 0x01
355	# endif
356	# ifndef SUBLANG_URDU_INDIA
357	# define SUBLANG_URDU_INDIA 0x02
358	# endif
359	# ifndef SUBLANG_UZBEK_LATIN
360	# define SUBLANG_UZBEK_LATIN 0x01
361	# endif
362	# ifndef SUBLANG_UZBEK_CYRILLIC
363	# define SUBLANG_UZBEK_CYRILLIC 0x02
364	# endif
365	#endif
366
367	/* XPG3 defines the result of 'setlocale (category, NULL)' as:
368	"Directs 'setlocale()' to query 'category' and return the current
369	setting of 'local'."
370	However it does not specify the exact format. Neither do SUSV2 and
371	ISO C 99. So we can use this feature only on selected systems (e.g.
372	those using GNU C Library). */
373	#if defined _LIBC \|\| (defined __GNU_LIBRARY__ && __GNU_LIBRARY__ >= 2)
374	# define HAVE_LOCALE_NULL
375	#endif
376
377	/* Determine the current locale's name, and canonicalize it into XPG syntax
378	language[_territory[.codeset]][@modifier]
379	The codeset part in the result is not reliable; the locale_charset()
380	should be used for codeset information instead.
381	The result must not be freed; it is statically allocated. */
382
383	const char *
384	_nl_locale_name (category, categoryname)
385	int category;
386	const char *categoryname;
387	{
388	const char *retval;
389
390	#ifndef WIN32
391
392	/* Use the POSIX methods of looking to 'LC_ALL', 'LC_xxx', and 'LANG'.
393	On some systems this can be done by the 'setlocale' function itself. */
394	# if defined HAVE_SETLOCALE && defined HAVE_LC_MESSAGES && defined HAVE_LOCALE_NULL
395	retval = setlocale (category, NULL);
396	# else
397	/* Setting of LC_ALL overwrites all other. */
398	retval = getenv ("LC_ALL");
399	if (retval == NULL \|\| retval[0] == '\0')
400	{
401	/* Next comes the name of the desired category. */
402	retval = getenv (categoryname);
403	if (retval == NULL \|\| retval[0] == '\0')
404	{
405	/* Last possibility is the LANG environment variable. */
406	retval = getenv ("LANG");
407	if (retval == NULL \|\| retval[0] == '\0')
408	/* We use C as the default domain. POSIX says this is
409	implementation defined. */
410	retval = "C";
411	}
412	}
413	# endif
414
415	return retval;
416
417	#else /* WIN32 */
418
419	/* Return an XPG style locale name language[_territory][@modifier].
420	Don't even bother determining the codeset; it's not useful in this
421	context, because message catalogs are not specific to a single
422	codeset. */
423
424	LCID lcid;
425	LANGID langid;
426	int primary, sub;
427
428	/* Let the user override the system settings through environment
429	variables, as on POSIX systems. */
430	retval = getenv ("LC_ALL");
431	if (retval != NULL && retval[0] != '\0')
432	return retval;
433	retval = getenv (categoryname);
434	if (retval != NULL && retval[0] != '\0')
435	return retval;
436	retval = getenv ("LANG");
437	if (retval != NULL && retval[0] != '\0')
438	return retval;
439
440	/* Use native Win32 API locale ID. */
441	lcid = GetThreadLocale ();
442
443	/* Strip off the sorting rules, keep only the language part. */
444	langid = LANGIDFROMLCID (lcid);
445
446	/* Split into language and territory part. */
447	primary = PRIMARYLANGID (langid);
448	sub = SUBLANGID (langid);
449
450	/* Dispatch on language.
451	See also http://www.unicode.org/unicode/onlinedat/languages.html .
452	For details about languages, see http://www.ethnologue.com/ . */
453	switch (primary)
454	{
455	case LANG_AFRIKAANS: return "af_ZA";
456	case LANG_ALBANIAN: return "sq_AL";
457	case 0x5e: /* AMHARIC */ return "am_ET";
458	case LANG_ARABIC:
459	switch (sub)
460	{
461	case SUBLANG_ARABIC_SAUDI_ARABIA: return "ar_SA";
462	case SUBLANG_ARABIC_IRAQ: return "ar_IQ";
463	case SUBLANG_ARABIC_EGYPT: return "ar_EG";
464	case SUBLANG_ARABIC_LIBYA: return "ar_LY";
465	case SUBLANG_ARABIC_ALGERIA: return "ar_DZ";
466	case SUBLANG_ARABIC_MOROCCO: return "ar_MA";
467	case SUBLANG_ARABIC_TUNISIA: return "ar_TN";
468	case SUBLANG_ARABIC_OMAN: return "ar_OM";
469	case SUBLANG_ARABIC_YEMEN: return "ar_YE";
470	case SUBLANG_ARABIC_SYRIA: return "ar_SY";
471	case SUBLANG_ARABIC_JORDAN: return "ar_JO";
472	case SUBLANG_ARABIC_LEBANON: return "ar_LB";
473	case SUBLANG_ARABIC_KUWAIT: return "ar_KW";
474	case SUBLANG_ARABIC_UAE: return "ar_AE";
475	case SUBLANG_ARABIC_BAHRAIN: return "ar_BH";
476	case SUBLANG_ARABIC_QATAR: return "ar_QA";
477	}
478	return "ar";
479	case LANG_ARMENIAN: return "hy_AM";
480	case LANG_ASSAMESE: return "as_IN";
481	case LANG_AZERI:
482	switch (sub)
483	{
484	/* FIXME: Adjust this when Azerbaijani locales appear on Unix. */
485	case SUBLANG_AZERI_LATIN: return "az_AZ@latin";
486	case SUBLANG_AZERI_CYRILLIC: return "az_AZ@cyrillic";
487	}
488	return "az";
489	case LANG_BASQUE:
490	return "eu"; /* Ambiguous: could be "eu_ES" or "eu_FR". */
491	case LANG_BELARUSIAN: return "be_BY";
492	case LANG_BENGALI: return "bn_IN";
493	case LANG_BULGARIAN: return "bg_BG";
494	case 0x55: /* BURMESE */ return "my_MM";
495	case 0x53: /* CAMBODIAN */ return "km_KH";
496	case LANG_CATALAN: return "ca_ES";
497	case 0x5c: /* CHEROKEE */ return "chr_US";
498	case LANG_CHINESE:
499	switch (sub)
500	{
501	case SUBLANG_CHINESE_TRADITIONAL: return "zh_TW";
502	case SUBLANG_CHINESE_SIMPLIFIED: return "zh_CN";
503	case SUBLANG_CHINESE_HONGKONG: return "zh_HK";
504	case SUBLANG_CHINESE_SINGAPORE: return "zh_SG";
505	case SUBLANG_CHINESE_MACAU: return "zh_MO";
506	}
507	return "zh";
508	case LANG_CROATIAN: /* LANG_CROATIAN == LANG_SERBIAN
509	* What used to be called Serbo-Croatian
510	* should really now be two separate
511	* languages because of political reasons.
512	* (Says tml, who knows nothing about Serbian
513	* or Croatian.)
514	* (I can feel those flames coming already.)
515	*/
516	switch (sub)
517	{
518	case SUBLANG_DEFAULT: return "hr_HR";
519	case SUBLANG_SERBIAN_LATIN: return "sr_YU";
520	case SUBLANG_SERBIAN_CYRILLIC: return "sr_YU@cyrillic";
521	}
522	return "hr";
523	case LANG_CZECH: return "cs_CZ";
524	case LANG_DANISH: return "da_DK";
525	case LANG_DIVEHI: return "div_MV";
526	case LANG_DUTCH:
527	switch (sub)
528	{
529	case SUBLANG_DUTCH: return "nl_NL";
530	case SUBLANG_DUTCH_BELGIAN: /* FLEMISH, VLAAMS */ return "nl_BE";
531	}
532	return "nl";
533	case 0x66: /* EDO */ return "bin_NG";
534	case LANG_ENGLISH:
535	switch (sub)
536	{
537	/* SUBLANG_ENGLISH_US == SUBLANG_DEFAULT. Heh. I thought
538	* English was the language spoken in England.
539	* Oh well.
540	*/
541	case SUBLANG_ENGLISH_US: return "en_US";
542	case SUBLANG_ENGLISH_UK: return "en_GB";
543	case SUBLANG_ENGLISH_AUS: return "en_AU";
544	case SUBLANG_ENGLISH_CAN: return "en_CA";
545	case SUBLANG_ENGLISH_NZ: return "en_NZ";
546	case SUBLANG_ENGLISH_EIRE: return "en_IE";
547	case SUBLANG_ENGLISH_SOUTH_AFRICA: return "en_ZA";
548	case SUBLANG_ENGLISH_JAMAICA: return "en_JM";
549	case SUBLANG_ENGLISH_CARIBBEAN: return "en_GD"; /* Grenada? */
550	case SUBLANG_ENGLISH_BELIZE: return "en_BZ";
551	case SUBLANG_ENGLISH_TRINIDAD: return "en_TT";
552	case SUBLANG_ENGLISH_ZIMBABWE: return "en_ZW";
553	case SUBLANG_ENGLISH_PHILIPPINES: return "en_PH";
554	}
555	return "en";
556	case LANG_ESTONIAN: return "et_EE";
557	case LANG_FAEROESE: return "fo_FO";
558	case LANG_FARSI: return "fa_IR";
559	case LANG_FINNISH: return "fi_FI";
560	case LANG_FRENCH:
561	switch (sub)
562	{
563	case SUBLANG_FRENCH: return "fr_FR";
564	case SUBLANG_FRENCH_BELGIAN: /* WALLOON */ return "fr_BE";
565	case SUBLANG_FRENCH_CANADIAN: return "fr_CA";
566	case SUBLANG_FRENCH_SWISS: return "fr_CH";
567	case SUBLANG_FRENCH_LUXEMBOURG: return "fr_LU";
568	case SUBLANG_FRENCH_MONACO: return "fr_MC";
569	}
570	return "fr";
571	case 0x62: /* FRISIAN */ return "fy_NL";
572	case 0x67: /* FULFULDE */ return "ful_NG";
573	case 0x3c: /* GAELIC */
574	switch (sub)
575	{
576	case 0x01: /* SCOTTISH */ return "gd_GB";
577	case 0x02: /* IRISH */ return "ga_IE";
578	}
579	return "C";
580	case LANG_GALICIAN: return "gl_ES";
581	case LANG_GEORGIAN: return "ka_GE";
582	case LANG_GERMAN:
583	switch (sub)
584	{
585	case SUBLANG_GERMAN: return "de_DE";
586	case SUBLANG_GERMAN_SWISS: return "de_CH";
587	case SUBLANG_GERMAN_AUSTRIAN: return "de_AT";
588	case SUBLANG_GERMAN_LUXEMBOURG: return "de_LU";
589	case SUBLANG_GERMAN_LIECHTENSTEIN: return "de_LI";
590	}
591	return "de";
592	case LANG_GREEK: return "el_GR";
593	case 0x74: /* GUARANI */ return "gn_PY";
594	case LANG_GUJARATI: return "gu_IN";
595	case 0x68: /* HAUSA */ return "ha_NG";
596	case 0x75: /* HAWAIIAN */
597	/* FIXME: Do they mean Hawaiian ("haw_US", 1000 speakers)
598	or Hawaii Creole English ("cpe_US", 600000 speakers)? */
599	return "cpe_US";
600	case LANG_HEBREW: return "he_IL";
601	case LANG_HINDI: return "hi_IN";
602	case LANG_HUNGARIAN: return "hu_HU";
603	case 0x69: /* IBIBIO */ return "nic_NG";
604	case LANG_ICELANDIC: return "is_IS";
605	case 0x70: /* IGBO */ return "ibo_NG";
606	case LANG_INDONESIAN: return "id_ID";
607	case 0x5d: /* INUKTITUT */ return "iu_CA";
608	case LANG_ITALIAN:
609	switch (sub)
610	{
611	case SUBLANG_ITALIAN: return "it_IT";
612	case SUBLANG_ITALIAN_SWISS: return "it_CH";
613	}
614	return "it";
615	case LANG_JAPANESE: return "ja_JP";
616	case LANG_KANNADA: return "kn_IN";
617	case 0x71: /* KANURI */ return "kau_NG";
618	case LANG_KASHMIRI:
619	switch (sub)
620	{
621	case SUBLANG_DEFAULT: return "ks_PK";
622	case SUBLANG_KASHMIRI_INDIA: return "ks_IN";
623	}
624	return "ks";
625	case LANG_KAZAK: return "kk_KZ";
626	case LANG_KONKANI:
627	/* FIXME: Adjust this when such locales appear on Unix. */
628	return "kok_IN";
629	case LANG_KOREAN: return "ko_KR";
630	case LANG_KYRGYZ: return "ky_KG";
631	case 0x54: /* LAO */ return "lo_LA";
632	case 0x76: /* LATIN */ return "la_VA";
633	case LANG_LATVIAN: return "lv_LV";
634	case LANG_LITHUANIAN: return "lt_LT";
635	case LANG_MACEDONIAN: return "mk_MK";
636	case LANG_MALAY:
637	switch (sub)
638	{
639	case SUBLANG_MALAY_MALAYSIA: return "ms_MY";
640	case SUBLANG_MALAY_BRUNEI_DARUSSALAM: return "ms_BN";
641	}
642	return "ms";
643	case LANG_MALAYALAM: return "ml_IN";
644	case 0x3a: /* MALTESE */ return "mt_MT";
645	case LANG_MANIPURI:
646	/* FIXME: Adjust this when such locales appear on Unix. */
647	return "mni_IN";
648	case LANG_MARATHI: return "mr_IN";
649	case LANG_MONGOLIAN:
650	return "mn"; /* Ambiguous: could be "mn_CN" or "mn_MN". */
651	case LANG_NEPALI:
652	switch (sub)
653	{
654	case SUBLANG_DEFAULT: return "ne_NP";
655	case SUBLANG_NEPALI_INDIA: return "ne_IN";
656	}
657	return "ne";
658	case LANG_NORWEGIAN:
659	switch (sub)
660	{
661	case SUBLANG_NORWEGIAN_BOKMAL: return "no_NO";
662	case SUBLANG_NORWEGIAN_NYNORSK: return "nn_NO";
663	}
664	return "no";
665	case LANG_ORIYA: return "or_IN";
666	case 0x72: /* OROMO */ return "om_ET";
667	case 0x79: /* PAPIAMENTU */ return "pap_AN";
668	case 0x63: /* PASHTO */
669	return "ps"; /* Ambiguous: could be "ps_PK" or "ps_AF". */
670	case LANG_POLISH: return "pl_PL";
671	case LANG_PORTUGUESE:
672	switch (sub)
673	{
674	case SUBLANG_PORTUGUESE: return "pt_PT";
675	/* Hmm. SUBLANG_PORTUGUESE_BRAZILIAN == SUBLANG_DEFAULT.
676	Same phenomenon as SUBLANG_ENGLISH_US == SUBLANG_DEFAULT. */
677	case SUBLANG_PORTUGUESE_BRAZILIAN: return "pt_BR";
678	}
679	return "pt";
680	case LANG_PUNJABI: return "pa_IN";
681	case 0x17: /* RHAETO-ROMANCE */ return "rm_CH";
682	case LANG_ROMANIAN: return "ro_RO";
683	case LANG_RUSSIAN:
684	return "ru"; /* Ambiguous: could be "ru_RU" or "ru_UA". */
685	case 0x3b: /* SAMI */ return "se_NO";
686	case LANG_SANSKRIT: return "sa_IN";
687	case LANG_SINDHI: return "sd";
688	case 0x5b: /* SINHALESE */ return "si_LK";
689	case LANG_SLOVAK: return "sk_SK";
690	case LANG_SLOVENIAN: return "sl_SI";
691	case 0x77: /* SOMALI */ return "so_SO";
692	case LANG_SORBIAN:
693	/* FIXME: Adjust this when such locales appear on Unix. */
694	return "wen_DE";
695	case LANG_SPANISH:
696	switch (sub)
697	{
698	case SUBLANG_SPANISH: return "es_ES";
699	case SUBLANG_SPANISH_MEXICAN: return "es_MX";
700	case SUBLANG_SPANISH_MODERN:
701	return "es_ES@modern"; /* not seen on Unix */
702	case SUBLANG_SPANISH_GUATEMALA: return "es_GT";
703	case SUBLANG_SPANISH_COSTA_RICA: return "es_CR";
704	case SUBLANG_SPANISH_PANAMA: return "es_PA";
705	case SUBLANG_SPANISH_DOMINICAN_REPUBLIC: return "es_DO";
706	case SUBLANG_SPANISH_VENEZUELA: return "es_VE";
707	case SUBLANG_SPANISH_COLOMBIA: return "es_CO";
708	case SUBLANG_SPANISH_PERU: return "es_PE";
709	case SUBLANG_SPANISH_ARGENTINA: return "es_AR";
710	case SUBLANG_SPANISH_ECUADOR: return "es_EC";
711	case SUBLANG_SPANISH_CHILE: return "es_CL";
712	case SUBLANG_SPANISH_URUGUAY: return "es_UY";
713	case SUBLANG_SPANISH_PARAGUAY: return "es_PY";
714	case SUBLANG_SPANISH_BOLIVIA: return "es_BO";
715	case SUBLANG_SPANISH_EL_SALVADOR: return "es_SV";
716	case SUBLANG_SPANISH_HONDURAS: return "es_HN";
717	case SUBLANG_SPANISH_NICARAGUA: return "es_NI";
718	case SUBLANG_SPANISH_PUERTO_RICO: return "es_PR";
719	}
720	return "es";
721	case 0x30: /* SUTU */ return "bnt_TZ";
722	case LANG_SWAHILI: return "sw_KE";
723	case LANG_SWEDISH:
724	switch (sub)
725	{
726	case SUBLANG_DEFAULT: return "sv_SE";
727	case SUBLANG_SWEDISH_FINLAND: return "sv_FI";
728	}
729	return "sv";
730	case LANG_SYRIAC: return "syr_TR"; /* An extinct language. */
731	case 0x64: /* TAGALOG */ return "tl_PH";
732	case 0x28: /* TAJIK */ return "tg_TJ";
733	case 0x5f: /* TAMAZIGHT */ return "ber_MA";
734	case LANG_TAMIL:
735	return "ta"; /* Ambiguous: could be "ta_IN" or "ta_LK" or "ta_SG". */
736	case LANG_TATAR: return "tt_RU";
737	case LANG_TELUGU: return "te_IN";
738	case LANG_THAI: return "th_TH";
739	case 0x51: /* TIBETAN */ return "bo_CN";
740	case 0x73: /* TIGRINYA */ return "ti_ET";
741	case 0x31: /* TSONGA */ return "ts_ZA";
742	case LANG_TURKISH: return "tr_TR";
743	case 0x42: /* TURKMEN */ return "tk_TM";
744	case LANG_UKRAINIAN: return "uk_UA";
745	case LANG_URDU:
746	switch (sub)
747	{
748	case SUBLANG_URDU_PAKISTAN: return "ur_PK";
749	case SUBLANG_URDU_INDIA: return "ur_IN";
750	}
751	return "ur";
752	case LANG_UZBEK:
753	switch (sub)
754	{
755	/* FIXME: Adjust this when Uzbek locales appear on Unix. */
756	case SUBLANG_UZBEK_LATIN: return "uz_UZ@latin";
757	case SUBLANG_UZBEK_CYRILLIC: return "uz_UZ@cyrillic";
758	}
759	return "uz";
760	case 0x33: /* VENDA */ return "ven_ZA";
761	case LANG_VIETNAMESE: return "vi_VN";
762	case 0x52: /* WELSH */ return "cy_GB";
763	case 0x34: /* XHOSA */ return "xh_ZA";
764	case 0x78: /* YI */ return "sit_CN";
765	case 0x3d: /* YIDDISH */ return "yi_IL";
766	case 0x6a: /* YORUBA */ return "yo_NG";
767	case 0x35: /* ZULU */ return "zu_ZA";
768	default: return "C";
769	}
770
771	#endif
772	}

Note: See TracBrowser for help on using the repository browser.

Context Navigation

source: trunk/third/texinfo/intl/localename.c @ 18945

Download in other formats: