~ubuntu-branches/ubuntu/jaunty/gnupg2/jaunty

« back to all changes in this revision

Viewing changes to intl/localename.c

  • Committer: Bazaar Package Importer
  • Author(s): Andreas Mueller
  • Date: 2005-03-29 10:30:32 UTC
  • Revision ID: james.westby@ubuntu.com-20050329103032-sj42n2ain3ipx310
Tags: upstream-1.9.15
ImportĀ upstreamĀ versionĀ 1.9.15

Show diffs side-by-side

added added

removed removed

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