OpenCores
URL https://opencores.org/ocsvn/scarts/scarts/trunk

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gcc/] [gcc-4.1.1/] [intl/] [localename.c] - Blame information for rev 13

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 13 jlechner 
/* 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., 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 
 
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 
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.