开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > Ftp客户端 > 查看源码
localename.c
资源名称：FTP总集.rar　[点击查看]
上传用户：tjfeida
上传日期：2013-03-10
资源大小：1917k
文件大小：22k
源码类别：

Ftp客户端

开发平台：

Visual C++

localename.c：源码内容
  1. /* Determine the current selected locale.
  2.    Copyright (C) 1995-1999, 2000-2002 Free Software Foundation, Inc.
  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.
  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.
  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.  */
  19. /* Written by Ulrich Drepper <drepper@gnu.org>, 1995.  */
  20. /* Win32 code written by Tor Lillqvist <tml@iki.fi>.  */
  22. #ifdef HAVE_CONFIG_H
  23. # include <config.h>
  24. #endif
  26. #include <stdlib.h>
  27. #include <locale.h>
  29. #if defined _WIN32 || defined __WIN32__
  30. # undef WIN32   /* avoid warning on mingw32 */
  31. # define WIN32
  32. #endif
  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
  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
  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.  */
  383. const char *
  384. _nl_locale_name (category, categoryname)
  385.      int category;
  386.      const char *categoryname;
  387. {
  388.   const char *retval;
  390. #ifndef WIN32
  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] == '')
  400.     {
  401.       /* Next comes the name of the desired category.  */
  402.       retval = getenv (categoryname);
  403.       if (retval == NULL || retval[0] == '')
  404. {
  405.   /* Last possibility is the LANG environment variable.  */
  406.   retval = getenv ("LANG");
  407.   if (retval == NULL || retval[0] == '')
  408.     /* We use C as the default domain.  POSIX says this is
  409.        implementation defined.  */
  410.     retval = "C";
  411. }
  412.     }
  413. # endif
  415.   return retval;
  417. #else /* WIN32 */
  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.  */
  424.   LCID lcid;
  425.   LANGID langid;
  426.   int primary, sub;
  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] != '')
  432.     return retval;
  433.   retval = getenv (categoryname);
  434.   if (retval != NULL && retval[0] != '')
  435.     return retval;
  436.   retval = getenv ("LANG");
  437.   if (retval != NULL && retval[0] != '')
  438.     return retval;
  440.   /* Use native Win32 API locale ID.  */
  441.   lcid = GetThreadLocale ();
  443.   /* Strip off the sorting rules, keep only the language part.  */
  444.   langid = LANGIDFROMLCID (lcid);
  446.   /* Split into language and territory part.  */
  447.   primary = PRIMARYLANGID (langid);
  448.   sub = SUBLANGID (langid);
  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.     }
  771. #endif
  772. }