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