src/common/intl.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/common/intl.cpp
   3 // Purpose:     Internationalization and localisation for wxWindows
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     29/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declaration
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
  21     #pragma implementation "intl.h"
  22 #endif
  23
  24 // For compilers that support precompilation, includes "wx.h".
  25 #include "wx/wxprec.h"
  26
  27 #ifdef __BORLANDC__
  28     #pragma hdrstop
  29 #endif
  30
  31 #if wxUSE_INTL
  32
  33 // standard headers
  34
  35 #ifndef __WXWINCE__
  36 #include <locale.h>
  37 #endif
  38
  39 #include <ctype.h>
  40 #include <stdlib.h>
  41 #ifdef HAVE_LANGINFO_H
  42   #include <langinfo.h>
  43 #endif
  44
  45 // wxWindows
  46 #ifndef WX_PRECOMP
  47     #include "wx/string.h"
  48     #include "wx/intl.h"
  49     #include "wx/log.h"
  50     #include "wx/debug.h"
  51     #include "wx/utils.h"
  52     #include "wx/dynarray.h"
  53 #endif // WX_PRECOMP
  54
  55 #ifdef __WIN32__
  56     #include "wx/msw/private.h"
  57 #elif defined(__UNIX_LIKE__)
  58     #include "wx/fontmap.h"         // for CharsetToEncoding()
  59 #endif
  60
  61 #include "wx/file.h"
  62 #include "wx/tokenzr.h"
  63 #include "wx/module.h"
  64 #include "wx/fontmap.h"
  65 #include "wx/encconv.h"
  66 #include "wx/hashmap.h"
  67
  68 #if defined(__WXMAC__)
  69   #include  "wx/mac/private.h"  // includes mac headers
  70 #endif
  71
  72 // ----------------------------------------------------------------------------
  73 // simple types
  74 // ----------------------------------------------------------------------------
  75
  76 // this should *not* be wxChar, this type must have exactly 8 bits!
  77 typedef wxUint8 size_t8;
  78 typedef wxUint32 size_t32;
  79
  80 // ----------------------------------------------------------------------------
  81 // constants
  82 // ----------------------------------------------------------------------------
  83
  84 // magic number identifying the .mo format file
  85 const size_t32 MSGCATALOG_MAGIC    = 0x950412de;
  86 const size_t32 MSGCATALOG_MAGIC_SW = 0xde120495;
  87
  88 // extension of ".mo" files
  89 #define MSGCATALOG_EXTENSION  _T(".mo")
  90
  91 // the constants describing the format of lang_LANG locale string
  92 static const size_t LEN_LANG = 2;
  93 static const size_t LEN_SUBLANG = 2;
  94 static const size_t LEN_FULL = LEN_LANG + 1 + LEN_SUBLANG; // 1 for '_'
  95
  96 // ----------------------------------------------------------------------------
  97 // global functions
  98 // ----------------------------------------------------------------------------
  99
 100 #ifdef __WXDEBUG__
 101
 102 // small class to suppress the translation erros until exit from current scope
 103 class NoTransErr
 104 {
 105 public:
 106     NoTransErr() { ms_suppressCount++; }
 107    ~NoTransErr() { ms_suppressCount--;  }
 108
 109    static bool Suppress() { return ms_suppressCount > 0; }
 110
 111 private:
 112    static size_t ms_suppressCount;
 113 };
 114
 115 size_t NoTransErr::ms_suppressCount = 0;
 116
 117 #else // !Debug
 118
 119 class NoTransErr
 120 {
 121 public:
 122     NoTransErr() { }
 123    ~NoTransErr() { }
 124 };
 125
 126 #endif // Debug/!Debug
 127
 128 static wxLocale *wxSetLocale(wxLocale *pLocale);
 129
 130 // helper functions of GetSystemLanguage()
 131 #ifdef __UNIX__
 132
 133 // get just the language part
 134 static inline wxString ExtractLang(const wxString& langFull)
 135 {
 136     return langFull.Left(LEN_LANG);
 137 }
 138
 139 // get everything else (including the leading '_')
 140 static inline wxString ExtractNotLang(const wxString& langFull)
 141 {
 142     return langFull.Mid(LEN_LANG);
 143 }
 144
 145 #endif // __UNIX__
 146
 147
 148
 149 // ----------------------------------------------------------------------------
 150 // wxMsgCatalogFile corresponds to one disk-file message catalog.
 151 //
 152 // This is a "low-level" class and is used only by wxMsgCatalog
 153 // ----------------------------------------------------------------------------
 154
 155 WX_DECLARE_EXPORTED_STRING_HASH_MAP(wxString, wxMessagesHash);
 156
 157 class wxMsgCatalogFile
 158 {
 159 public:
 160     // ctor & dtor
 161     wxMsgCatalogFile();
 162    ~wxMsgCatalogFile();
 163
 164     // load the catalog from disk (szDirPrefix corresponds to language)
 165     bool Load(const wxChar *szDirPrefix, const wxChar *szName);
 166
 167     // fills the hash with string-translation pairs
 168     void FillHash(wxMessagesHash& hash, bool convertEncoding) const;
 169
 170 private:
 171     // this implementation is binary compatible with GNU gettext() version 0.10
 172
 173     // an entry in the string table
 174     struct wxMsgTableEntry
 175     {
 176       size_t32   nLen;           // length of the string
 177       size_t32   ofsString;      // pointer to the string
 178     };
 179
 180     // header of a .mo file
 181     struct wxMsgCatalogHeader
 182     {
 183       size_t32  magic,          // offset +00:  magic id
 184                 revision,       //        +04:  revision
 185                 numStrings;     //        +08:  number of strings in the file
 186       size_t32  ofsOrigTable,   //        +0C:  start of original string table
 187                 ofsTransTable;  //        +10:  start of translated string table
 188       size_t32  nHashSize,      //        +14:  hash table size
 189                 ofsHashTable;   //        +18:  offset of hash table start
 190     };
 191
 192     // all data is stored here, NULL if no data loaded
 193     size_t8 *m_pData;
 194
 195     // amount of memory pointed to by m_pData.
 196     size_t32 m_nSize;
 197
 198     // data description
 199     size_t32          m_numStrings;   // number of strings in this domain
 200     wxMsgTableEntry  *m_pOrigTable,   // pointer to original   strings
 201                      *m_pTransTable;  //            translated
 202
 203     // swap the 2 halves of 32 bit integer if needed
 204     size_t32 Swap(size_t32 ui) const
 205     {
 206           return m_bSwapped ? (ui << 24) | ((ui & 0xff00) << 8) |
 207                               ((ui >> 8) & 0xff00) | (ui >> 24)
 208                             : ui;
 209     }
 210
 211     const char *StringAtOfs(wxMsgTableEntry *pTable, size_t32 n) const
 212     {
 213         const wxMsgTableEntry * const ent = pTable + n;
 214
 215         // this check could fail for a corrupt message catalog
 216         size_t32 ofsString = Swap(ent->ofsString);
 217         if ( ofsString + Swap(ent->nLen) > m_nSize)
 218             return NULL;
 219
 220         return (const char *)(m_pData + ofsString);
 221     }
 222
 223     wxString GetCharset() const;
 224
 225     bool m_bSwapped;   // wrong endianness?
 226
 227     DECLARE_NO_COPY_CLASS(wxMsgCatalogFile)
 228 };
 229
 230
 231 // ----------------------------------------------------------------------------
 232 // wxMsgCatalog corresponds to one loaded message catalog.
 233 //
 234 // This is a "low-level" class and is used only by wxLocale (that's why
 235 // it's designed to be stored in a linked list)
 236 // ----------------------------------------------------------------------------
 237
 238 class wxMsgCatalog
 239 {
 240 public:
 241     // load the catalog from disk (szDirPrefix corresponds to language)
 242     bool Load(const wxChar *szDirPrefix, const wxChar *szName, bool bConvertEncoding = FALSE);
 243
 244     // get name of the catalog
 245     wxString GetName() const { return m_name; }
 246
 247     // get the translated string: returns NULL if not found
 248     const wxChar *GetString(const wxChar *sz) const;
 249
 250     // public variable pointing to the next element in a linked list (or NULL)
 251     wxMsgCatalog *m_pNext;
 252
 253 private:
 254     wxMessagesHash  m_messages; // all messages in the catalog
 255     wxString        m_name;     // name of the domain
 256 };
 257
 258 // ----------------------------------------------------------------------------
 259 // global variables
 260 // ----------------------------------------------------------------------------
 261
 262 // the list of the directories to search for message catalog files
 263 static wxArrayString s_searchPrefixes;
 264
 265 // ============================================================================
 266 // implementation
 267 // ============================================================================
 268
 269 // ----------------------------------------------------------------------------
 270 // wxMsgCatalogFile class
 271 // ----------------------------------------------------------------------------
 272
 273 wxMsgCatalogFile::wxMsgCatalogFile()
 274 {
 275     m_pData = NULL;
 276     m_nSize = 0;
 277 }
 278
 279 wxMsgCatalogFile::~wxMsgCatalogFile()
 280 {
 281     wxDELETEA(m_pData);
 282 }
 283
 284 // return all directories to search for given prefix
 285 static wxString GetAllMsgCatalogSubdirs(const wxChar *prefix,
 286                                         const wxChar *lang)
 287 {
 288     wxString searchPath;
 289
 290     // search first in prefix/fr/LC_MESSAGES, then in prefix/fr and finally in
 291     // prefix (assuming the language is 'fr')
 292     searchPath << prefix << wxFILE_SEP_PATH << lang << wxFILE_SEP_PATH
 293                          << wxT("LC_MESSAGES") << wxPATH_SEP
 294                << prefix << wxFILE_SEP_PATH << lang << wxPATH_SEP
 295                << prefix << wxPATH_SEP;
 296
 297     return searchPath;
 298 }
 299
 300 // construct the search path for the given language
 301 static wxString GetFullSearchPath(const wxChar *lang)
 302 {
 303     wxString searchPath;
 304
 305     // first take the entries explicitly added by the program
 306     size_t count = s_searchPrefixes.Count();
 307     for ( size_t n = 0; n < count; n++ )
 308     {
 309         searchPath << GetAllMsgCatalogSubdirs(s_searchPrefixes[n], lang)
 310                    << wxPATH_SEP;
 311     }
 312
 313     // LC_PATH is a standard env var containing the search path for the .mo
 314     // files
 315 #ifndef __WXWINCE__
 316     const wxChar *pszLcPath = wxGetenv(wxT("LC_PATH"));
 317     if ( pszLcPath != NULL )
 318         searchPath << GetAllMsgCatalogSubdirs(pszLcPath, lang);
 319 #endif
 320
 321 #ifdef __UNIX__
 322     // add some standard ones and the one in the tree where wxWin was installed:
 323     searchPath
 324         << GetAllMsgCatalogSubdirs(wxString(wxGetInstallPrefix()) + wxT("/share/locale"), lang)
 325         << GetAllMsgCatalogSubdirs(wxT("/usr/share/locale"), lang)
 326         << GetAllMsgCatalogSubdirs(wxT("/usr/lib/locale"), lang)
 327         << GetAllMsgCatalogSubdirs(wxT("/usr/local/share/locale"), lang);
 328 #endif // __UNIX__
 329
 330     // then take the current directory
 331     // FIXME it should be the directory of the executable
 332 #ifdef __WXMAC__
 333     wxChar cwd[512] ;
 334     wxGetWorkingDirectory( cwd , sizeof( cwd ) ) ;
 335     searchPath << GetAllMsgCatalogSubdirs(cwd, lang);
 336     // generic search paths could be somewhere in the system folder preferences
 337 #else // !Mac
 338     searchPath << GetAllMsgCatalogSubdirs(wxT("."), lang);
 339
 340 #endif // platform
 341
 342     return searchPath;
 343 }
 344
 345 // open disk file and read in it's contents
 346 bool wxMsgCatalogFile::Load(const wxChar *szDirPrefix, const wxChar *szName0)
 347 {
 348    /* We need to handle locales like  de_AT.iso-8859-1
 349       For this we first chop off the .CHARSET specifier and ignore it.
 350       FIXME: UNICODE SUPPORT: must use CHARSET specifier!
 351    */
 352    wxString szName = szName0;
 353    if(szName.Find(wxT('.')) != -1) // contains a dot
 354       szName = szName.Left(szName.Find(wxT('.')));
 355
 356   wxString searchPath = GetFullSearchPath(szDirPrefix);
 357   const wxChar *sublocale = wxStrchr(szDirPrefix, wxT('_'));
 358   if ( sublocale )
 359   {
 360       // also add just base locale name: for things like "fr_BE" (belgium
 361       // french) we should use "fr" if no belgium specific message catalogs
 362       // exist
 363       searchPath << GetFullSearchPath(wxString(szDirPrefix).
 364                                       Left((size_t)(sublocale - szDirPrefix)))
 365                  << wxPATH_SEP;
 366   }
 367
 368   wxString strFile = szName;
 369   strFile += MSGCATALOG_EXTENSION;
 370
 371   // don't give translation errors here because the wxstd catalog might
 372   // not yet be loaded (and it's normal)
 373   //
 374   // (we're using an object because we have several return paths)
 375
 376   NoTransErr noTransErr;
 377   wxLogVerbose(_("looking for catalog '%s' in path '%s'."),
 378                szName.c_str(), searchPath.c_str());
 379
 380   wxString strFullName;
 381   if ( !wxFindFileInPath(&strFullName, searchPath, strFile) ) {
 382     wxLogVerbose(_("catalog file for domain '%s' not found."), szName.c_str());
 383     return FALSE;
 384   }
 385
 386   // open file
 387   wxLogVerbose(_("using catalog '%s' from '%s'."),
 388              szName.c_str(), strFullName.c_str());
 389
 390   wxFile fileMsg(strFullName);
 391   if ( !fileMsg.IsOpened() )
 392     return FALSE;
 393
 394   // get the file size
 395   off_t nSize = fileMsg.Length();
 396   if ( nSize == wxInvalidOffset )
 397     return FALSE;
 398
 399   // read the whole file in memory
 400   m_pData = new size_t8[nSize];
 401   if ( fileMsg.Read(m_pData, nSize) != nSize ) {
 402     wxDELETEA(m_pData);
 403     return FALSE;
 404   }
 405
 406   // examine header
 407   bool bValid = (size_t)nSize > sizeof(wxMsgCatalogHeader);
 408
 409   wxMsgCatalogHeader *pHeader = (wxMsgCatalogHeader *)m_pData;
 410   if ( bValid ) {
 411     // we'll have to swap all the integers if it's true
 412     m_bSwapped = pHeader->magic == MSGCATALOG_MAGIC_SW;
 413
 414     // check the magic number
 415     bValid = m_bSwapped || pHeader->magic == MSGCATALOG_MAGIC;
 416   }
 417
 418   if ( !bValid ) {
 419     // it's either too short or has incorrect magic number
 420     wxLogWarning(_("'%s' is not a valid message catalog."), strFullName.c_str());
 421
 422     wxDELETEA(m_pData);
 423     return FALSE;
 424   }
 425
 426   // initialize
 427   m_numStrings  = Swap(pHeader->numStrings);
 428   m_pOrigTable  = (wxMsgTableEntry *)(m_pData +
 429                    Swap(pHeader->ofsOrigTable));
 430   m_pTransTable = (wxMsgTableEntry *)(m_pData +
 431                    Swap(pHeader->ofsTransTable));
 432   m_nSize = nSize;
 433
 434   // everything is fine
 435   return TRUE;
 436 }
 437
 438 void wxMsgCatalogFile::FillHash(wxMessagesHash& hash, bool convertEncoding) const
 439 {
 440     wxString charset = GetCharset();
 441
 442 #if wxUSE_WCHAR_T
 443     wxCSConv *csConv = NULL;
 444     if ( !!charset )
 445         csConv = new wxCSConv(charset);
 446
 447     wxMBConv& inputConv = csConv ? *((wxMBConv*)csConv) : *wxConvCurrent;
 448
 449     for (size_t i = 0; i < m_numStrings; i++)
 450     {
 451         wxString key(StringAtOfs(m_pOrigTable, i), inputConv);
 452
 453     #if wxUSE_UNICODE
 454         hash[key] = wxString(StringAtOfs(m_pTransTable, i), inputConv);
 455     #else
 456         if ( convertEncoding )
 457             hash[key] =
 458                 wxString(inputConv.cMB2WC(StringAtOfs(m_pTransTable, i)),
 459                          wxConvLocal);
 460         else
 461             hash[key] = StringAtOfs(m_pTransTable, i);
 462     #endif
 463     }
 464
 465     delete csConv;
 466 #else // !wxUSE_WCHAR_T
 467     #if wxUSE_FONTMAP
 468     if ( convertEncoding )
 469     {
 470         wxFontEncoding targetEnc = wxFONTENCODING_SYSTEM;
 471         wxFontEncoding enc = wxFontMapper::Get()->CharsetToEncoding(charset, FALSE);
 472         if ( enc == wxFONTENCODING_SYSTEM )
 473         {
 474             convertEncoding = FALSE; // unknown encoding
 475         }
 476         else
 477         {
 478             targetEnc = wxLocale::GetSystemEncoding();
 479             if (targetEnc == wxFONTENCODING_SYSTEM)
 480             {
 481                 wxFontEncodingArray a = wxEncodingConverter::GetPlatformEquivalents(enc);
 482                 if (a[0] == enc)
 483                     // no conversion needed, locale uses native encoding
 484                     convertEncoding = FALSE;
 485                 if (a.GetCount() == 0)
 486                     // we don't know common equiv. under this platform
 487                     convertEncoding = FALSE;
 488                 targetEnc = a[0];
 489             }
 490         }
 491
 492         if ( convertEncoding )
 493         {
 494             wxEncodingConverter converter;
 495             converter.Init(enc, targetEnc);
 496
 497             for (size_t i = 0; i < m_numStrings; i++)
 498             {
 499                 wxString key(StringAtOfs(m_pOrigTable, i));
 500                 hash[key] =
 501                     converter.Convert(wxString(StringAtOfs(m_pTransTable, i)));
 502             }
 503         }
 504     }
 505
 506     if ( !convertEncoding )
 507     #endif // wxUSE_FONTMAP/!wxUSE_FONTMAP
 508     {
 509         for (size_t i = 0; i < m_numStrings; i++)
 510         {
 511             wxString key(StringAtOfs(m_pOrigTable, i));
 512             hash[key] = StringAtOfs(m_pTransTable, i);
 513         }
 514     }
 515 #endif // wxUSE_WCHAR_T/!wxUSE_WCHAR_T
 516     (void)convertEncoding; // get rid of warnings about unused parameter
 517 }
 518
 519 wxString wxMsgCatalogFile::GetCharset() const
 520 {
 521     // first, find encoding header:
 522     const char *hdr = StringAtOfs(m_pOrigTable, 0);
 523     if ( hdr == NULL || hdr[0] != 0 )
 524     {
 525         // not supported by this catalog, does not have correct header
 526         return wxEmptyString;
 527     }
 528
 529     wxString header = wxString::FromAscii( StringAtOfs(m_pTransTable, 0));
 530     wxString charset;
 531     int pos = header.Find(wxT("Content-Type: text/plain; charset="));
 532     if ( pos == wxNOT_FOUND )
 533     {
 534         // incorrectly filled Content-Type header
 535         return wxEmptyString;
 536     }
 537
 538     size_t n = pos + 34; /*strlen("Content-Type: text/plain; charset=")*/
 539     while ( header[n] != wxT('\n') )
 540         charset << header[n++];
 541
 542     if ( charset == wxT("CHARSET") )
 543     {
 544         // "CHARSET" is not valid charset, but lazy translator
 545         return wxEmptyString;
 546     }
 547
 548     return charset;
 549 }
 550
 551 // ----------------------------------------------------------------------------
 552 // wxMsgCatalog class
 553 // ----------------------------------------------------------------------------
 554
 555 bool wxMsgCatalog::Load(const wxChar *szDirPrefix, const wxChar *szName,
 556                         bool bConvertEncoding)
 557 {
 558     wxMsgCatalogFile file;
 559
 560     m_name = szName;
 561
 562     if ( file.Load(szDirPrefix, szName) )
 563     {
 564         file.FillHash(m_messages, bConvertEncoding);
 565         return TRUE;
 566     }
 567
 568     return FALSE;
 569 }
 570
 571 const wxChar *wxMsgCatalog::GetString(const wxChar *sz) const
 572 {
 573     wxMessagesHash::const_iterator i = m_messages.find(sz);
 574     if ( i != m_messages.end() )
 575     {
 576         return i->second.c_str();
 577     }
 578     else
 579         return NULL;
 580 }
 581
 582 // ----------------------------------------------------------------------------
 583 // wxLocale
 584 // ----------------------------------------------------------------------------
 585
 586 #include "wx/arrimpl.cpp"
 587 WX_DECLARE_EXPORTED_OBJARRAY(wxLanguageInfo, wxLanguageInfoArray);
 588 WX_DEFINE_OBJARRAY(wxLanguageInfoArray);
 589
 590 wxLanguageInfoArray *wxLocale::ms_languagesDB = NULL;
 591
 592 /*static*/ void wxLocale::CreateLanguagesDB()
 593 {
 594     if (ms_languagesDB == NULL)
 595     {
 596         ms_languagesDB = new wxLanguageInfoArray;
 597         InitLanguagesDB();
 598     }
 599 }
 600
 601 /*static*/ void wxLocale::DestroyLanguagesDB()
 602 {
 603     delete ms_languagesDB;
 604     ms_languagesDB = NULL;
 605 }
 606
 607
 608 wxLocale::wxLocale()
 609 {
 610   m_pszOldLocale = NULL;
 611   m_pMsgCat = NULL;
 612   m_language = wxLANGUAGE_UNKNOWN;
 613 }
 614
 615 // NB: this function has (desired) side effect of changing current locale
 616 bool wxLocale::Init(const wxChar *szName,
 617                     const wxChar *szShort,
 618                     const wxChar *szLocale,
 619                     bool        bLoadDefault,
 620                     bool        bConvertEncoding)
 621 {
 622   m_strLocale = szName;
 623   m_strShort = szShort;
 624   m_bConvertEncoding = bConvertEncoding;
 625   m_language = wxLANGUAGE_UNKNOWN;
 626
 627   // change current locale (default: same as long name)
 628   if ( szLocale == NULL )
 629   {
 630     // the argument to setlocale()
 631     szLocale = szShort;
 632
 633     wxCHECK_MSG( szLocale, FALSE, _T("no locale to set in wxLocale::Init()") );
 634   }
 635
 636 #ifdef __WXWINCE__
 637   // FIXME: I'm guessing here
 638   wxChar localeName[256];
 639   int ret = GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SLANGUAGE, localeName,
 640       256);
 641   if (ret != 0)
 642   {
 643     m_pszOldLocale = wxStrdup(localeName);
 644   }
 645   else
 646     m_pszOldLocale = NULL;
 647
 648   // TODO: how to find languageId
 649   // SetLocaleInfo(languageId, SORT_DEFAULT, localeName);
 650 #else
 651   m_pszOldLocale = wxSetlocale(LC_ALL, szLocale);
 652   if ( m_pszOldLocale )
 653       m_pszOldLocale = wxStrdup(m_pszOldLocale);
 654 #endif
 655
 656   if ( m_pszOldLocale == NULL )
 657     wxLogError(_("locale '%s' can not be set."), szLocale);
 658
 659   // the short name will be used to look for catalog files as well,
 660   // so we need something here
 661   if ( m_strShort.IsEmpty() ) {
 662     // FIXME I don't know how these 2 letter abbreviations are formed,
 663     //       this wild guess is surely wrong
 664     if ( szLocale[0] )
 665     {
 666         m_strShort += (wxChar)wxTolower(szLocale[0]);
 667         if ( szLocale[1] )
 668             m_strShort += (wxChar)wxTolower(szLocale[1]);
 669     }
 670   }
 671
 672   // save the old locale to be able to restore it later
 673   m_pOldLocale = wxSetLocale(this);
 674
 675   // load the default catalog with wxWindows standard messages
 676   m_pMsgCat = NULL;
 677   bool bOk = TRUE;
 678   if ( bLoadDefault )
 679     bOk = AddCatalog(wxT("wxstd"));
 680
 681   return bOk;
 682 }
 683
 684
 685 #if defined(__UNIX__) && wxUSE_UNICODE
 686 static wxWCharBuffer wxSetlocaleTryUTF(int c, const wxChar *lc)
 687 {
 688     wxMB2WXbuf l = wxSetlocale(c, lc);
 689     if ( !l && lc && lc[0] != 0 )
 690     {
 691         wxString buf(lc);
 692         wxString buf2;
 693         buf2 = buf + wxT(".UTF-8");
 694         l = wxSetlocale(c, buf2.c_str());
 695         if ( !l )
 696         {
 697             buf2 = buf + wxT(".utf-8");
 698             l = wxSetlocale(c, buf2.c_str());
 699         }
 700         if ( !l )
 701         {
 702             buf2 = buf + wxT(".UTF8");
 703             l = wxSetlocale(c, buf2.c_str());
 704         }
 705         if ( !l )
 706         {
 707             buf2 = buf + wxT(".utf8");
 708             l = wxSetlocale(c, buf2.c_str());
 709         }
 710     }
 711     return l;
 712 }
 713 #else
 714 #define wxSetlocaleTryUTF(c, lc)  wxSetlocale(c, lc)
 715 #endif
 716
 717 bool wxLocale::Init(int language, int flags)
 718 {
 719     int lang = language;
 720     if (lang == wxLANGUAGE_DEFAULT)
 721     {
 722         // auto detect the language
 723         lang = GetSystemLanguage();
 724     }
 725
 726     // We failed to detect system language, so we will use English:
 727     if (lang == wxLANGUAGE_UNKNOWN)
 728     {
 729        return FALSE;
 730     }
 731
 732     const wxLanguageInfo *info = GetLanguageInfo(lang);
 733
 734     // Unknown language:
 735     if (info == NULL)
 736     {
 737         wxLogError(wxT("Unknown language %i."), lang);
 738         return FALSE;
 739     }
 740
 741     wxString name = info->Description;
 742     wxString canonical = info->CanonicalName;
 743     wxString locale;
 744
 745     // Set the locale:
 746 #if defined(__UNIX__) && !defined(__WXMAC__)
 747     if (language == wxLANGUAGE_DEFAULT)
 748         locale = wxEmptyString;
 749     else
 750         locale = info->CanonicalName;
 751
 752     wxMB2WXbuf retloc = wxSetlocaleTryUTF(LC_ALL, locale);
 753
 754     if ( !retloc )
 755     {
 756         // Some C libraries don't like xx_YY form and require xx only
 757         retloc = wxSetlocaleTryUTF(LC_ALL, locale.Mid(0,2));
 758     }
 759     if ( !retloc )
 760     {
 761         // Some C libraries (namely glibc) still use old ISO 639,
 762         // so will translate the abbrev for them
 763         wxString mid = locale.Mid(0,2);
 764         if (mid == wxT("he"))
 765             locale = wxT("iw") + locale.Mid(3);
 766         else if (mid == wxT("id"))
 767             locale = wxT("in") + locale.Mid(3);
 768         else if (mid == wxT("yi"))
 769             locale = wxT("ji") + locale.Mid(3);
 770         else if (mid == wxT("nb"))
 771             locale = wxT("no_NO");
 772         else if (mid == wxT("nn"))
 773             locale = wxT("no_NY");
 774
 775         retloc = wxSetlocaleTryUTF(LC_ALL, locale);
 776     }
 777     if ( !retloc )
 778     {
 779         // (This time, we changed locale in previous if-branch, so try again.)
 780         // Some C libraries don't like xx_YY form and require xx only
 781         retloc = wxSetlocaleTryUTF(LC_ALL, locale.Mid(0,2));
 782     }
 783     if ( !retloc )
 784     {
 785         wxLogError(wxT("Cannot set locale to '%s'."), locale.c_str());
 786         return FALSE;
 787     }
 788 #elif defined(__WIN32__)
 789
 790     #if wxUSE_UNICODE && (defined(__VISUALC__) || defined(__MINGW32__))
 791         // NB: setlocale() from msvcrt.dll (used by VC++ and Mingw)
 792         //     can't set locale to language that can only be written using
 793         //     Unicode.  Therefore wxSetlocale call failed, but we don't want
 794         //     to report it as an error -- so that at least message catalogs
 795         //     can be used. Watch for code marked with
 796         //     #ifdef SETLOCALE_FAILS_ON_UNICODE_LANGS bellow.
 797         #define SETLOCALE_FAILS_ON_UNICODE_LANGS
 798     #endif
 799
 800     wxMB2WXbuf retloc = wxT("C");
 801     if (language != wxLANGUAGE_DEFAULT)
 802     {
 803         if (info->WinLang == 0)
 804         {
 805             wxLogWarning(wxT("Locale '%s' not supported by OS."), name.c_str());
 806             // retloc already set to "C"
 807         }
 808         else
 809         {
 810             int codepage = -1;
 811             wxUint32 lcid = MAKELCID(MAKELANGID(info->WinLang, info->WinSublang),
 812                                      SORT_DEFAULT);
 813             // FIXME
 814 #ifndef __WXWINCE__
 815             SetThreadLocale(lcid);
 816 #endif
 817             // NB: we must translate LCID to CRT's setlocale string ourselves,
 818             //     because SetThreadLocale does not modify change the
 819             //     interpretation of setlocale(LC_ALL, "") call:
 820             wxChar buffer[256];
 821             buffer[0] = wxT('\0');
 822             GetLocaleInfo(lcid, LOCALE_SENGLANGUAGE, buffer, 256);
 823             locale << buffer;
 824             if (GetLocaleInfo(lcid, LOCALE_SENGCOUNTRY, buffer, 256) > 0)
 825                 locale << wxT("_") << buffer;
 826             if (GetLocaleInfo(lcid, LOCALE_IDEFAULTANSICODEPAGE, buffer, 256) > 0)
 827             {
 828                 codepage = wxAtoi(buffer);
 829                 if (codepage != 0)
 830                     locale << wxT(".") << buffer;
 831             }
 832             if (locale.IsEmpty())
 833             {
 834                 wxLogLastError(wxT("SetThreadLocale"));
 835                 wxLogError(wxT("Cannot set locale to language %s."), name.c_str());
 836                 return FALSE;
 837             }
 838             else
 839             {
 840             // FIXME
 841 #ifndef __WXWINCE__
 842                 retloc = wxSetlocale(LC_ALL, locale);
 843 #endif
 844 #ifdef SETLOCALE_FAILS_ON_UNICODE_LANGS
 845                 if (codepage == 0 && (const wxChar*)retloc == NULL)
 846                 {
 847                     retloc = wxT("C");
 848                 }
 849 #endif
 850             }
 851         }
 852     }
 853     else
 854     {
 855             // FIXME
 856 #ifndef __WXWINCE__
 857         retloc = wxSetlocale(LC_ALL, wxEmptyString);
 858 #else
 859         retloc = NULL;
 860 #endif
 861 #ifdef SETLOCALE_FAILS_ON_UNICODE_LANGS
 862         if ((const wxChar*)retloc == NULL)
 863         {
 864             wxChar buffer[16];
 865             if (GetLocaleInfo(LOCALE_USER_DEFAULT,
 866                               LOCALE_IDEFAULTANSICODEPAGE, buffer, 16) > 0 &&
 867                  wxStrcmp(buffer, wxT("0")) == 0)
 868             {
 869                 retloc = wxT("C");
 870             }
 871         }
 872 #endif
 873     }
 874
 875     if ( !retloc )
 876     {
 877         wxLogError(wxT("Cannot set locale to language %s."), name.c_str());
 878         return FALSE;
 879     }
 880 #elif defined(__WXMAC__) || defined(__WXPM__)
 881     wxMB2WXbuf retloc = wxSetlocale(LC_ALL , wxEmptyString);
 882 #else
 883     return FALSE;
 884     #define WX_NO_LOCALE_SUPPORT
 885 #endif
 886
 887 #ifndef WX_NO_LOCALE_SUPPORT
 888     wxChar *szLocale = retloc ? wxStrdup(retloc) : NULL;
 889     bool ret = Init(name, canonical, retloc,
 890                     (flags & wxLOCALE_LOAD_DEFAULT) != 0,
 891                     (flags & wxLOCALE_CONV_ENCODING) != 0);
 892     free(szLocale);
 893
 894     if ( ret )
 895         m_language = lang;
 896
 897     return ret;
 898 #endif
 899 }
 900
 901
 902
 903 void wxLocale::AddCatalogLookupPathPrefix(const wxString& prefix)
 904 {
 905     if ( s_searchPrefixes.Index(prefix) == wxNOT_FOUND )
 906     {
 907         s_searchPrefixes.Add(prefix);
 908     }
 909     //else: already have it
 910 }
 911
 912 /*static*/ int wxLocale::GetSystemLanguage()
 913 {
 914     CreateLanguagesDB();
 915
 916     // init i to avoid compiler warning
 917     size_t i = 0,
 918            count = ms_languagesDB->GetCount();
 919
 920 #if defined(__UNIX__) && !defined(__WXMAC__)
 921     // first get the string identifying the language from the environment
 922     wxString langFull;
 923     if (!wxGetEnv(wxT("LC_ALL"), &langFull) &&
 924         !wxGetEnv(wxT("LC_MESSAGES"), &langFull) &&
 925         !wxGetEnv(wxT("LANG"), &langFull))
 926     {
 927         // no language specified, threat it as English
 928         return wxLANGUAGE_ENGLISH;
 929     }
 930
 931     if ( langFull == _T("C") || langFull == _T("POSIX") )
 932     {
 933         // default C locale
 934         return wxLANGUAGE_ENGLISH;
 935     }
 936
 937     // the language string has the following form
 938     //
 939     //      lang[_LANG][.encoding][@modifier]
 940     //
 941     // (see environ(5) in the Open Unix specification)
 942     //
 943     // where lang is the primary language, LANG is a sublang/territory,
 944     // encoding is the charset to use and modifier "allows the user to select
 945     // a specific instance of localization data within a single category"
 946     //
 947     // for example, the following strings are valid:
 948     //      fr
 949     //      fr_FR
 950     //      de_DE.iso88591
 951     //      de_DE@euro
 952     //      de_DE.iso88591@euro
 953
 954     // for now we don't use the encoding, although we probably should (doing
 955     // translations of the msg catalogs on the fly as required) (TODO)
 956     //
 957     // we don't use the modifiers neither but we probably should translate
 958     // "euro" into iso885915
 959     size_t posEndLang = langFull.find_first_of(_T("@."));
 960     if ( posEndLang != wxString::npos )
 961     {
 962         langFull.Truncate(posEndLang);
 963     }
 964
 965     // in addition to the format above, we also can have full language names
 966     // in LANG env var - for example, SuSE is known to use LANG="german" - so
 967     // check for this
 968
 969     // do we have just the language (or sublang too)?
 970     bool justLang = langFull.Len() == LEN_LANG;
 971     if ( justLang ||
 972          (langFull.Len() == LEN_FULL && langFull[LEN_LANG] == wxT('_')) )
 973     {
 974         // 0. Make sure the lang is according to latest ISO 639
 975         //    (this is neccessary because glibc uses iw and in instead
 976         //    of he and id respectively).
 977
 978         // the language itself (second part is the dialect/sublang)
 979         wxString langOrig = ExtractLang(langFull);
 980
 981         wxString lang;
 982         if ( langOrig == wxT("iw"))
 983             lang = _T("he");
 984         else if (langOrig == wxT("in"))
 985             lang = wxT("id");
 986         else if (langOrig == wxT("ji"))
 987             lang = wxT("yi");
 988         else if (langOrig == wxT("no_NO"))
 989             lang = wxT("nb_NO");
 990         else if (langOrig == wxT("no_NY"))
 991             lang = wxT("nn_NO");
 992         else if (langOrig == wxT("no"))
 993             lang = wxT("nb_NO");
 994         else
 995             lang = langOrig;
 996
 997         // did we change it?
 998         if ( lang != langOrig )
 999         {
1000             langFull = lang + ExtractNotLang(langFull);
1001         }
1002
1003         // 1. Try to find the language either as is:
1004         for ( i = 0; i < count; i++ )
1005         {
1006             if ( ms_languagesDB->Item(i).CanonicalName == langFull )
1007             {
1008                 break;
1009             }
1010         }
1011
1012         // 2. If langFull is of the form xx_YY, try to find xx:
1013         if ( i == count && !justLang )
1014         {
1015             for ( i = 0; i < count; i++ )
1016             {
1017                 if ( ms_languagesDB->Item(i).CanonicalName == lang )
1018                 {
1019                     break;
1020                 }
1021             }
1022         }
1023
1024         // 3. If langFull is of the form xx, try to find any xx_YY record:
1025         if ( i == count && justLang )
1026         {
1027             for ( i = 0; i < count; i++ )
1028             {
1029                 if ( ExtractLang(ms_languagesDB->Item(i).CanonicalName)
1030                         == langFull )
1031                 {
1032                     break;
1033                 }
1034             }
1035         }
1036     }
1037     else // not standard format
1038     {
1039         // try to find the name in verbose description
1040         for ( i = 0; i < count; i++ )
1041         {
1042             if (ms_languagesDB->Item(i).Description.CmpNoCase(langFull) == 0)
1043             {
1044                 break;
1045             }
1046         }
1047     }
1048 #elif defined(__WXMAC__)
1049     const wxChar * lc = NULL ;
1050     long lang = GetScriptVariable( smSystemScript, smScriptLang) ;
1051     switch( GetScriptManagerVariable( smRegionCode ) ) {
1052       case verUS :
1053         lc = wxT("en_US") ;
1054         break ;
1055       case verFrance :
1056         lc = wxT("fr_FR") ;
1057         break ;
1058       case verBritain :
1059         lc = wxT("en_GB") ;
1060         break ;
1061       case verGermany :
1062         lc = wxT("de_DE") ;
1063         break ;
1064       case verItaly :
1065         lc = wxT("it_IT") ;
1066         break ;
1067       case verNetherlands :
1068         lc = wxT("nl_NL") ;
1069         break ;
1070       case verFlemish :
1071         lc = wxT("nl_BE") ;
1072         break ;
1073       case verSweden :
1074         lc = wxT("sv_SE" );
1075         break ;
1076       case verSpain :
1077         lc = wxT("es_ES" );
1078         break ;
1079       case verDenmark :
1080         lc = wxT("da_DK") ;
1081         break ;
1082       case verPortugal :
1083         lc = wxT("pt_PT") ;
1084         break ;
1085       case verFrCanada:
1086         lc = wxT("fr_CA") ;
1087         break ;
1088       case verNorway:
1089         lc = wxT("nb_NO") ;
1090         break ;
1091       case verIsrael:
1092         lc = wxT("iw_IL") ;
1093         break ;
1094       case verJapan:
1095         lc = wxT("ja_JP") ;
1096         break ;
1097       case verAustralia:
1098         lc = wxT("en_AU") ;
1099         break ;
1100       case verArabic:
1101         lc = wxT("ar") ;
1102         break ;
1103       case verFinland:
1104         lc = wxT("fi_FI") ;
1105         break ;
1106       case verFrSwiss:
1107         lc = wxT("fr_CH") ;
1108         break ;
1109       case verGrSwiss:
1110         lc = wxT("de_CH") ;
1111         break ;
1112       case verGreece:
1113         lc = wxT("el_GR") ;
1114         break ;
1115       case verIceland:
1116         lc = wxT("is_IS") ;
1117         break ;
1118       case verMalta:
1119         lc = wxT("mt_MT") ;
1120         break ;
1121       case verCyprus:
1122       // _CY is not part of wx, so we have to translate according to the system language
1123         if ( lang == langGreek ) {
1124           lc = wxT("el_GR") ;
1125         }
1126         else if ( lang == langTurkish ) {
1127           lc = wxT("tr_TR") ;
1128         }
1129         break ;
1130       case verTurkey:
1131         lc = wxT("tr_TR") ;
1132         break ;
1133       case verYugoCroatian:
1134         lc = wxT("hr_HR") ;
1135         break ;
1136       case verIndiaHindi:
1137         lc = wxT("hi_IN") ;
1138         break ;
1139       case verPakistanUrdu:
1140         lc = wxT("ur_PK") ;
1141         break ;
1142       case verTurkishModified:
1143         lc = wxT("tr_TR") ;
1144         break ;
1145       case verItalianSwiss:
1146         lc = wxT("it_CH") ;
1147         break ;
1148       case verInternational:
1149         lc = wxT("en") ;
1150         break ;
1151       case verRomania:
1152         lc = wxT("ro_RO") ;
1153         break ;
1154       case verGreecePoly:
1155         lc = wxT("el_GR") ;
1156         break ;
1157       case verLithuania:
1158         lc = wxT("lt_LT") ;
1159         break ;
1160       case verPoland:
1161         lc = wxT("pl_PL") ;
1162         break ;
1163       case verMagyar :
1164       case verHungary:
1165         lc = wxT("hu_HU") ;
1166         break ;
1167       case verEstonia:
1168         lc = wxT("et_EE") ;
1169         break ;
1170       case verLatvia:
1171         lc = wxT("lv_LV") ;
1172         break ;
1173       case verSami:
1174         // not known
1175         break ;
1176       case verFaroeIsl:
1177         lc = wxT("fo_FO") ;
1178         break ;
1179       case verIran:
1180         lc = wxT("fa_IR") ;
1181         break ;
1182       case verRussia:
1183         lc = wxT("ru_RU") ;
1184         break ;
1185        case verIreland:
1186         lc = wxT("ga_IE") ;
1187         break ;
1188       case verKorea:
1189         lc = wxT("ko_KR") ;
1190         break ;
1191       case verChina:
1192         lc = wxT("zh_CN") ;
1193         break ;
1194       case verTaiwan:
1195         lc = wxT("zh_TW") ;
1196         break ;
1197       case verThailand:
1198         lc = wxT("th_TH") ;
1199         break ;
1200       case verCzech:
1201         lc = wxT("cs_CZ") ;
1202         break ;
1203       case verSlovak:
1204         lc = wxT("sk_SK") ;
1205         break ;
1206       case verBengali:
1207         lc = wxT("bn") ;
1208         break ;
1209       case verByeloRussian:
1210         lc = wxT("be_BY") ;
1211         break ;
1212       case verUkraine:
1213         lc = wxT("uk_UA") ;
1214         break ;
1215       case verGreeceAlt:
1216         lc = wxT("el_GR") ;
1217         break ;
1218       case verSerbian:
1219         lc = wxT("sr_YU") ;
1220         break ;
1221       case verSlovenian:
1222         lc = wxT("sl_SI") ;
1223         break ;
1224       case verMacedonian:
1225         lc = wxT("mk_MK") ;
1226         break ;
1227       case verCroatia:
1228         lc = wxT("hr_HR") ;
1229         break ;
1230       case verBrazil:
1231         lc = wxT("pt_BR ") ;
1232         break ;
1233       case verBulgaria:
1234         lc = wxT("bg_BG") ;
1235         break ;
1236       case verCatalonia:
1237         lc = wxT("ca_ES") ;
1238         break ;
1239       case verScottishGaelic:
1240         lc = wxT("gd") ;
1241         break ;
1242       case verManxGaelic:
1243         lc = wxT("gv") ;
1244         break ;
1245       case verBreton:
1246         lc = wxT("br") ;
1247         break ;
1248       case verNunavut:
1249         lc = wxT("iu_CA") ;
1250         break ;
1251       case verWelsh:
1252         lc = wxT("cy") ;
1253         break ;
1254       case verIrishGaelicScript:
1255         lc = wxT("ga_IE") ;
1256         break ;
1257       case verEngCanada:
1258         lc = wxT("en_CA") ;
1259         break ;
1260       case verBhutan:
1261         lc = wxT("dz_BT") ;
1262         break ;
1263       case verArmenian:
1264         lc = wxT("hy_AM") ;
1265         break ;
1266       case verGeorgian:
1267         lc = wxT("ka_GE") ;
1268         break ;
1269       case verSpLatinAmerica:
1270         lc = wxT("es_AR") ;
1271         break ;
1272       case verTonga:
1273         lc = wxT("to_TO" );
1274         break ;
1275       case verFrenchUniversal:
1276         lc = wxT("fr_FR") ;
1277         break ;
1278       case verAustria:
1279         lc = wxT("de_AT") ;
1280         break ;
1281       case verGujarati:
1282         lc = wxT("gu_IN") ;
1283         break ;
1284       case verPunjabi:
1285         lc = wxT("pa") ;
1286         break ;
1287       case verIndiaUrdu:
1288         lc = wxT("ur_IN") ;
1289         break ;
1290       case verVietnam:
1291         lc = wxT("vi_VN") ;
1292         break ;
1293       case verFrBelgium:
1294         lc = wxT("fr_BE") ;
1295         break ;
1296       case verUzbek:
1297         lc = wxT("uz_UZ") ;
1298         break ;
1299       case verSingapore:
1300         lc = wxT("zh_SG") ;
1301         break ;
1302       case verNynorsk:
1303         lc = wxT("nn_NO") ;
1304         break ;
1305       case verAfrikaans:
1306         lc = wxT("af_ZA") ;
1307         break ;
1308       case verEsperanto:
1309         lc = wxT("eo") ;
1310         break ;
1311       case verMarathi:
1312         lc = wxT("mr_IN") ;
1313         break ;
1314       case verTibetan:
1315         lc = wxT("bo") ;
1316         break ;
1317       case verNepal:
1318         lc = wxT("ne_NP") ;
1319         break ;
1320       case verGreenland:
1321         lc = wxT("kl_GL") ;
1322         break ;
1323       default :
1324         break ;
1325    }
1326   for ( i = 0; i < count; i++ )
1327   {
1328       if ( ms_languagesDB->Item(i).CanonicalName == lc )
1329       {
1330           break;
1331       }
1332   }
1333
1334 #elif defined(__WIN32__)
1335     LCID lcid = GetUserDefaultLCID();
1336     if ( lcid != 0 )
1337     {
1338         wxUint32 lang = PRIMARYLANGID(LANGIDFROMLCID(lcid));
1339         wxUint32 sublang = SUBLANGID(LANGIDFROMLCID(lcid));
1340
1341         for ( i = 0; i < count; i++ )
1342         {
1343             if (ms_languagesDB->Item(i).WinLang == lang &&
1344                 ms_languagesDB->Item(i).WinSublang == sublang)
1345             {
1346                 break;
1347             }
1348         }
1349     }
1350     //else: leave wxlang == wxLANGUAGE_UNKNOWN
1351 #endif // Unix/Win32
1352
1353     if ( i < count )
1354     {
1355         // we did find a matching entry, use it
1356         return ms_languagesDB->Item(i).Language;
1357     }
1358
1359     // no info about this language in the database
1360     return wxLANGUAGE_UNKNOWN;
1361 }
1362
1363 // ----------------------------------------------------------------------------
1364 // encoding stuff
1365 // ----------------------------------------------------------------------------
1366
1367 // this is a bit strange as under Windows we get the encoding name using its
1368 // numeric value and under Unix we do it the other way round, but this just
1369 // reflects the way different systems provide he encoding info
1370
1371 /* static */
1372 wxString wxLocale::GetSystemEncodingName()
1373 {
1374     wxString encname;
1375
1376 #if defined(__WIN32__) && !defined(__WXMICROWIN__)
1377     // FIXME: what is the error return value for GetACP()?
1378     UINT codepage = ::GetACP();
1379     encname.Printf(_T("windows-%u"), codepage);
1380 #elif defined(__UNIX_LIKE__)
1381
1382 #if defined(HAVE_LANGINFO_H) && defined(CODESET)
1383     // GNU libc provides current character set this way (this conforms
1384     // to Unix98)
1385     char *oldLocale = strdup(setlocale(LC_CTYPE, NULL));
1386     setlocale(LC_CTYPE, "");
1387     const char *alang = nl_langinfo(CODESET);
1388     setlocale(LC_CTYPE, oldLocale);
1389     free(oldLocale);
1390
1391     if ( alang )
1392     {
1393         // 7 bit ASCII encoding has several alternative names which we should
1394         // recognize to avoid warnings about unrecognized encoding on each
1395         // program startup
1396
1397         // nl_langinfo() under Solaris returns 646 by default which stands for
1398         // ISO-646, i.e. 7 bit ASCII
1399         //
1400         // and recent glibc call it ANSI_X3.4-1968...
1401         if ( strcmp(alang, "646") == 0 ||
1402                strcmp(alang, "ANSI_X3.4-1968") == 0 )
1403         {
1404             encname = _T("US-ASCII");
1405         }
1406         else
1407         {
1408             encname = wxString::FromAscii( alang );
1409         }
1410     }
1411     else
1412 #endif // HAVE_LANGINFO_H
1413     {
1414         // if we can't get at the character set directly, try to see if it's in
1415         // the environment variables (in most cases this won't work, but I was
1416         // out of ideas)
1417         char *lang = getenv( "LC_ALL");
1418         char *dot = lang ? strchr(lang, '.') : (char *)NULL;
1419         if (!dot)
1420         {
1421             lang = getenv( "LC_CTYPE" );
1422             if ( lang )
1423                 dot = strchr(lang, '.' );
1424         }
1425         if (!dot)
1426         {
1427             lang = getenv( "LANG");
1428             if ( lang )
1429                 dot = strchr(lang, '.');
1430         }
1431
1432         if ( dot )
1433         {
1434             encname = wxString::FromAscii( dot+1 );
1435         }
1436     }
1437 #endif // Win32/Unix
1438
1439     return encname;
1440 }
1441
1442 /* static */
1443 wxFontEncoding wxLocale::GetSystemEncoding()
1444 {
1445 #if defined(__WIN32__) && !defined(__WXMICROWIN__)
1446     UINT codepage = ::GetACP();
1447
1448     // wxWindows only knows about CP1250-1257, 932, 936, 949, 950
1449     if ( codepage >= 1250 && codepage <= 1257 )
1450     {
1451         return (wxFontEncoding)(wxFONTENCODING_CP1250 + codepage - 1250);
1452     }
1453
1454     if ( codepage == 932 )
1455     {
1456         return wxFONTENCODING_CP932;
1457     }
1458
1459     if ( codepage == 936 )
1460     {
1461         return wxFONTENCODING_CP936;
1462     }
1463
1464     if ( codepage == 949 )
1465     {
1466         return wxFONTENCODING_CP949;
1467     }
1468
1469     if ( codepage == 950 )
1470     {
1471         return wxFONTENCODING_CP950;
1472     }
1473 #elif defined(__UNIX_LIKE__) && wxUSE_FONTMAP
1474     wxString encname = GetSystemEncodingName();
1475     if ( !encname.empty() )
1476     {
1477         wxFontEncoding enc = wxFontMapper::Get()->
1478             CharsetToEncoding(encname, FALSE /* not interactive */);
1479
1480         // on some modern Linux systems (RedHat 8) the default system locale
1481         // is UTF8 -- but it isn't supported by wxGTK in ANSI build at all so
1482         // don't even try to use it in this case
1483 #if !wxUSE_UNICODE
1484         if ( enc == wxFONTENCODING_UTF8 )
1485         {
1486             // the most similar supported encoding...
1487             enc = wxFONTENCODING_ISO8859_1;
1488         }
1489 #endif // !wxUSE_UNICODE
1490
1491         // this should probably be considered as a bug in CharsetToEncoding():
1492         // it shouldn't return wxFONTENCODING_DEFAULT at all - but it does it
1493         // for US-ASCII charset
1494         //
1495         // we, OTOH, definitely shouldn't return it as it doesn't make sense at
1496         // all (which encoding is it?)
1497         if ( enc != wxFONTENCODING_DEFAULT )
1498         {
1499             return enc;
1500         }
1501         //else: return wxFONTENCODING_SYSTEM below
1502     }
1503 #endif // Win32/Unix
1504
1505     return wxFONTENCODING_SYSTEM;
1506 }
1507
1508 /* static */
1509 void wxLocale::AddLanguage(const wxLanguageInfo& info)
1510 {
1511     CreateLanguagesDB();
1512     ms_languagesDB->Add(info);
1513 }
1514
1515 /* static */
1516 const wxLanguageInfo *wxLocale::GetLanguageInfo(int lang)
1517 {
1518     CreateLanguagesDB();
1519
1520     const size_t count = ms_languagesDB->GetCount();
1521     for ( size_t i = 0; i < count; i++ )
1522     {
1523         if ( ms_languagesDB->Item(i).Language == lang )
1524         {
1525             return &ms_languagesDB->Item(i);
1526         }
1527     }
1528
1529     return NULL;
1530 }
1531
1532 /* static */
1533 wxString wxLocale::GetLanguageName(int lang)
1534 {
1535     const wxLanguageInfo *info = GetLanguageInfo(lang);
1536     if ( !info )
1537         return wxEmptyString;
1538     else
1539         return info->Description;
1540 }
1541
1542 /* static */
1543 const wxLanguageInfo *wxLocale::FindLanguageInfo(const wxString& locale)
1544 {
1545     CreateLanguagesDB();
1546
1547     const wxLanguageInfo *infoRet = NULL;
1548
1549     const size_t count = ms_languagesDB->GetCount();
1550     for ( size_t i = 0; i < count; i++ )
1551     {
1552         const wxLanguageInfo *info = &ms_languagesDB->Item(i);
1553
1554         if ( wxStricmp(locale, info->CanonicalName) == 0 ||
1555                 wxStricmp(locale, info->Description) == 0 )
1556         {
1557             // exact match, stop searching
1558             infoRet = info;
1559             break;
1560         }
1561
1562         if ( wxStricmp(locale, info->CanonicalName.BeforeFirst(_T('_'))) == 0 )
1563         {
1564             // a match -- but maybe we'll find an exact one later, so continue
1565             // looking
1566             //
1567             // OTOH, maybe we had already found a language match and in this
1568             // case don't overwrite it becauce the entry for the default
1569             // country always appears first in ms_languagesDB
1570             if ( !infoRet )
1571                 infoRet = info;
1572         }
1573     }
1574
1575     return infoRet;
1576 }
1577
1578 wxString wxLocale::GetSysName() const
1579 {
1580             // FIXME
1581 #ifndef __WXWINCE__
1582     return wxSetlocale(LC_ALL, NULL);
1583 #else
1584     return wxEmptyString;
1585 #endif
1586 }
1587
1588 // clean up
1589 wxLocale::~wxLocale()
1590 {
1591     // free memory
1592     wxMsgCatalog *pTmpCat;
1593     while ( m_pMsgCat != NULL ) {
1594         pTmpCat = m_pMsgCat;
1595         m_pMsgCat = m_pMsgCat->m_pNext;
1596         delete pTmpCat;
1597     }
1598
1599     // restore old locale
1600     wxSetLocale(m_pOldLocale);
1601     // FIXME
1602 #ifndef __WXWINCE__
1603     wxSetlocale(LC_ALL, m_pszOldLocale);
1604 #endif
1605     free((wxChar *)m_pszOldLocale);     // const_cast
1606 }
1607
1608 // get the translation of given string in current locale
1609 const wxChar *wxLocale::GetString(const wxChar *szOrigString,
1610                                   const wxChar *szDomain) const
1611 {
1612     if ( wxIsEmpty(szOrigString) )
1613         return _T("");
1614
1615     const wxChar *pszTrans = NULL;
1616     wxMsgCatalog *pMsgCat;
1617
1618     if ( szDomain != NULL )
1619     {
1620         pMsgCat = FindCatalog(szDomain);
1621
1622         // does the catalog exist?
1623         if ( pMsgCat != NULL )
1624             pszTrans = pMsgCat->GetString(szOrigString);
1625     }
1626     else
1627     {
1628         // search in all domains
1629         for ( pMsgCat = m_pMsgCat; pMsgCat != NULL; pMsgCat = pMsgCat->m_pNext )
1630         {
1631             pszTrans = pMsgCat->GetString(szOrigString);
1632             if ( pszTrans != NULL )   // take the first found
1633                 break;
1634         }
1635     }
1636
1637     if ( pszTrans == NULL )
1638     {
1639 #ifdef __WXDEBUG__
1640         if ( !NoTransErr::Suppress() )
1641         {
1642             NoTransErr noTransErr;
1643
1644             if ( szDomain != NULL )
1645             {
1646                 wxLogTrace(_T("i18n"),
1647                            _T("string '%s' not found in domain '%s' for locale '%s'."),
1648                            szOrigString, szDomain, m_strLocale.c_str());
1649             }
1650             else
1651             {
1652                 wxLogTrace(_T("i18n"),
1653                            _T("string '%s' not found in locale '%s'."),
1654                            szOrigString, m_strLocale.c_str());
1655             }
1656         }
1657 #endif // __WXDEBUG__
1658
1659         return szOrigString;
1660     }
1661
1662     return pszTrans;
1663 }
1664
1665 // find catalog by name in a linked list, return NULL if !found
1666 wxMsgCatalog *wxLocale::FindCatalog(const wxChar *szDomain) const
1667 {
1668     // linear search in the linked list
1669     wxMsgCatalog *pMsgCat;
1670     for ( pMsgCat = m_pMsgCat; pMsgCat != NULL; pMsgCat = pMsgCat->m_pNext )
1671     {
1672         if ( wxStricmp(pMsgCat->GetName(), szDomain) == 0 )
1673           return pMsgCat;
1674     }
1675
1676     return NULL;
1677 }
1678
1679 // check if the given catalog is loaded
1680 bool wxLocale::IsLoaded(const wxChar *szDomain) const
1681 {
1682   return FindCatalog(szDomain) != NULL;
1683 }
1684
1685 // add a catalog to our linked list
1686 bool wxLocale::AddCatalog(const wxChar *szDomain)
1687 {
1688   wxMsgCatalog *pMsgCat = new wxMsgCatalog;
1689
1690   if ( pMsgCat->Load(m_strShort, szDomain, m_bConvertEncoding) ) {
1691     // add it to the head of the list so that in GetString it will
1692     // be searched before the catalogs added earlier
1693     pMsgCat->m_pNext = m_pMsgCat;
1694     m_pMsgCat = pMsgCat;
1695
1696     return TRUE;
1697   }
1698   else {
1699     // don't add it because it couldn't be loaded anyway
1700     delete pMsgCat;
1701
1702     return FALSE;
1703   }
1704 }
1705
1706 // ----------------------------------------------------------------------------
1707 // accessors for locale-dependent data
1708 // ----------------------------------------------------------------------------
1709
1710 #if 0
1711
1712 #ifdef __WXMSW__
1713
1714 /* static */
1715 wxString wxLocale::GetInfo(wxLocaleInfo index)
1716 {
1717     wxString str;
1718     wxChar buffer[256];
1719     size_t count;
1720     buffer[0] = wxT('\0');
1721     switch (index)
1722     {
1723         case wxSYS_DECIMAL_SEPARATOR:
1724             count = ::GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SDECIMAL, buffer, 256);
1725             if (!count)
1726                 str << ".";
1727             else
1728                 str << buffer;
1729             break;
1730         case wxSYS_LIST_SEPARATOR:
1731             count = ::GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SLIST, buffer, 256);
1732             if (!count)
1733                 str << ",";
1734             else
1735                 str << buffer;
1736             break;
1737         case wxSYS_LEADING_ZERO: // 0 means no leading zero, 1 means leading zero
1738             count = ::GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_ILZERO, buffer, 256);
1739             if (!count)
1740                 str << "0";
1741             else
1742                 str << buffer;
1743             break;
1744         default:
1745             wxFAIL_MSG("Unknown System String !");
1746     }
1747     return str;
1748 }
1749
1750 #else // !__WXMSW__
1751
1752 /* static */
1753 wxString wxLocale::GetInfo(wxLocaleInfo index, wxLocaleCategory)
1754 {
1755     return wxEmptyString;
1756 }
1757
1758 #endif // __WXMSW__/!__WXMSW__
1759
1760 #endif // 0
1761
1762 // ----------------------------------------------------------------------------
1763 // global functions and variables
1764 // ----------------------------------------------------------------------------
1765
1766 // retrieve/change current locale
1767 // ------------------------------
1768
1769 // the current locale object
1770 static wxLocale *g_pLocale = NULL;
1771
1772 wxLocale *wxGetLocale()
1773 {
1774   return g_pLocale;
1775 }
1776
1777 wxLocale *wxSetLocale(wxLocale *pLocale)
1778 {
1779   wxLocale *pOld = g_pLocale;
1780   g_pLocale = pLocale;
1781   return pOld;
1782 }
1783
1784
1785
1786 // ----------------------------------------------------------------------------
1787 // wxLocale module (for lazy destruction of languagesDB)
1788 // ----------------------------------------------------------------------------
1789
1790 class wxLocaleModule: public wxModule
1791 {
1792     DECLARE_DYNAMIC_CLASS(wxLocaleModule)
1793     public:
1794         wxLocaleModule() {}
1795         bool OnInit() { return TRUE; }
1796         void OnExit() { wxLocale::DestroyLanguagesDB(); }
1797 };
1798
1799 IMPLEMENT_DYNAMIC_CLASS(wxLocaleModule, wxModule)
1800
1801
1802
1803 // ----------------------------------------------------------------------------
1804 // default languages table & initialization
1805 // ----------------------------------------------------------------------------
1806
1807
1808
1809 // --- --- --- generated code begins here --- --- ---
1810
1811 // This table is generated by misc/languages/genlang.py
1812 // When making changes, please put them into misc/languages/langtabl.txt
1813
1814 #if !defined(__WIN32__) || defined(__WXMICROWIN__)
1815
1816 #define SETWINLANG(info,lang,sublang)
1817
1818 #else
1819
1820 #define SETWINLANG(info,lang,sublang) \
1821     info.WinLang = lang, info.WinSublang = sublang;
1822
1823 #ifndef LANG_AFRIKAANS
1824 #define LANG_AFRIKAANS (0)
1825 #endif
1826 #ifndef LANG_ALBANIAN
1827 #define LANG_ALBANIAN (0)
1828 #endif
1829 #ifndef LANG_ARABIC
1830 #define LANG_ARABIC (0)
1831 #endif
1832 #ifndef LANG_ARMENIAN
1833 #define LANG_ARMENIAN (0)
1834 #endif
1835 #ifndef LANG_ASSAMESE
1836 #define LANG_ASSAMESE (0)
1837 #endif
1838 #ifndef LANG_AZERI
1839 #define LANG_AZERI (0)
1840 #endif
1841 #ifndef LANG_BASQUE
1842 #define LANG_BASQUE (0)
1843 #endif
1844 #ifndef LANG_BELARUSIAN
1845 #define LANG_BELARUSIAN (0)
1846 #endif
1847 #ifndef LANG_BENGALI
1848 #define LANG_BENGALI (0)
1849 #endif
1850 #ifndef LANG_BULGARIAN
1851 #define LANG_BULGARIAN (0)
1852 #endif
1853 #ifndef LANG_CATALAN
1854 #define LANG_CATALAN (0)
1855 #endif
1856 #ifndef LANG_CHINESE
1857 #define LANG_CHINESE (0)
1858 #endif
1859 #ifndef LANG_CROATIAN
1860 #define LANG_CROATIAN (0)
1861 #endif
1862 #ifndef LANG_CZECH
1863 #define LANG_CZECH (0)
1864 #endif
1865 #ifndef LANG_DANISH
1866 #define LANG_DANISH (0)
1867 #endif
1868 #ifndef LANG_DUTCH
1869 #define LANG_DUTCH (0)
1870 #endif
1871 #ifndef LANG_ENGLISH
1872 #define LANG_ENGLISH (0)
1873 #endif
1874 #ifndef LANG_ESTONIAN
1875 #define LANG_ESTONIAN (0)
1876 #endif
1877 #ifndef LANG_FAEROESE
1878 #define LANG_FAEROESE (0)
1879 #endif
1880 #ifndef LANG_FARSI
1881 #define LANG_FARSI (0)
1882 #endif
1883 #ifndef LANG_FINNISH
1884 #define LANG_FINNISH (0)
1885 #endif
1886 #ifndef LANG_FRENCH
1887 #define LANG_FRENCH (0)
1888 #endif
1889 #ifndef LANG_GEORGIAN
1890 #define LANG_GEORGIAN (0)
1891 #endif
1892 #ifndef LANG_GERMAN
1893 #define LANG_GERMAN (0)
1894 #endif
1895 #ifndef LANG_GREEK
1896 #define LANG_GREEK (0)
1897 #endif
1898 #ifndef LANG_GUJARATI
1899 #define LANG_GUJARATI (0)
1900 #endif
1901 #ifndef LANG_HEBREW
1902 #define LANG_HEBREW (0)
1903 #endif
1904 #ifndef LANG_HINDI
1905 #define LANG_HINDI (0)
1906 #endif
1907 #ifndef LANG_HUNGARIAN
1908 #define LANG_HUNGARIAN (0)
1909 #endif
1910 #ifndef LANG_ICELANDIC
1911 #define LANG_ICELANDIC (0)
1912 #endif
1913 #ifndef LANG_INDONESIAN
1914 #define LANG_INDONESIAN (0)
1915 #endif
1916 #ifndef LANG_ITALIAN
1917 #define LANG_ITALIAN (0)
1918 #endif
1919 #ifndef LANG_JAPANESE
1920 #define LANG_JAPANESE (0)
1921 #endif
1922 #ifndef LANG_KANNADA
1923 #define LANG_KANNADA (0)
1924 #endif
1925 #ifndef LANG_KASHMIRI
1926 #define LANG_KASHMIRI (0)
1927 #endif
1928 #ifndef LANG_KAZAK
1929 #define LANG_KAZAK (0)
1930 #endif
1931 #ifndef LANG_KONKANI
1932 #define LANG_KONKANI (0)
1933 #endif
1934 #ifndef LANG_KOREAN
1935 #define LANG_KOREAN (0)
1936 #endif
1937 #ifndef LANG_LATVIAN
1938 #define LANG_LATVIAN (0)
1939 #endif
1940 #ifndef LANG_LITHUANIAN
1941 #define LANG_LITHUANIAN (0)
1942 #endif
1943 #ifndef LANG_MACEDONIAN
1944 #define LANG_MACEDONIAN (0)
1945 #endif
1946 #ifndef LANG_MALAY
1947 #define LANG_MALAY (0)
1948 #endif
1949 #ifndef LANG_MALAYALAM
1950 #define LANG_MALAYALAM (0)
1951 #endif
1952 #ifndef LANG_MANIPURI
1953 #define LANG_MANIPURI (0)
1954 #endif
1955 #ifndef LANG_MARATHI
1956 #define LANG_MARATHI (0)
1957 #endif
1958 #ifndef LANG_NEPALI
1959 #define LANG_NEPALI (0)
1960 #endif
1961 #ifndef LANG_NORWEGIAN
1962 #define LANG_NORWEGIAN (0)
1963 #endif
1964 #ifndef LANG_ORIYA
1965 #define LANG_ORIYA (0)
1966 #endif
1967 #ifndef LANG_POLISH
1968 #define LANG_POLISH (0)
1969 #endif
1970 #ifndef LANG_PORTUGUESE
1971 #define LANG_PORTUGUESE (0)
1972 #endif
1973 #ifndef LANG_PUNJABI
1974 #define LANG_PUNJABI (0)
1975 #endif
1976 #ifndef LANG_ROMANIAN
1977 #define LANG_ROMANIAN (0)
1978 #endif
1979 #ifndef LANG_RUSSIAN
1980 #define LANG_RUSSIAN (0)
1981 #endif
1982 #ifndef LANG_SANSKRIT
1983 #define LANG_SANSKRIT (0)
1984 #endif
1985 #ifndef LANG_SERBIAN
1986 #define LANG_SERBIAN (0)
1987 #endif
1988 #ifndef LANG_SINDHI
1989 #define LANG_SINDHI (0)
1990 #endif
1991 #ifndef LANG_SLOVAK
1992 #define LANG_SLOVAK (0)
1993 #endif
1994 #ifndef LANG_SLOVENIAN
1995 #define LANG_SLOVENIAN (0)
1996 #endif
1997 #ifndef LANG_SPANISH
1998 #define LANG_SPANISH (0)
1999 #endif
2000 #ifndef LANG_SWAHILI
2001 #define LANG_SWAHILI (0)
2002 #endif
2003 #ifndef LANG_SWEDISH
2004 #define LANG_SWEDISH (0)
2005 #endif
2006 #ifndef LANG_TAMIL
2007 #define LANG_TAMIL (0)
2008 #endif
2009 #ifndef LANG_TATAR
2010 #define LANG_TATAR (0)
2011 #endif
2012 #ifndef LANG_TELUGU
2013 #define LANG_TELUGU (0)
2014 #endif
2015 #ifndef LANG_THAI
2016 #define LANG_THAI (0)
2017 #endif
2018 #ifndef LANG_TURKISH
2019 #define LANG_TURKISH (0)
2020 #endif
2021 #ifndef LANG_UKRAINIAN
2022 #define LANG_UKRAINIAN (0)
2023 #endif
2024 #ifndef LANG_URDU
2025 #define LANG_URDU (0)
2026 #endif
2027 #ifndef LANG_UZBEK
2028 #define LANG_UZBEK (0)
2029 #endif
2030 #ifndef LANG_VIETNAMESE
2031 #define LANG_VIETNAMESE (0)
2032 #endif
2033 #ifndef SUBLANG_ARABIC_ALGERIA
2034 #define SUBLANG_ARABIC_ALGERIA SUBLANG_DEFAULT
2035 #endif
2036 #ifndef SUBLANG_ARABIC_BAHRAIN
2037 #define SUBLANG_ARABIC_BAHRAIN SUBLANG_DEFAULT
2038 #endif
2039 #ifndef SUBLANG_ARABIC_EGYPT
2040 #define SUBLANG_ARABIC_EGYPT SUBLANG_DEFAULT
2041 #endif
2042 #ifndef SUBLANG_ARABIC_IRAQ
2043 #define SUBLANG_ARABIC_IRAQ SUBLANG_DEFAULT
2044 #endif
2045 #ifndef SUBLANG_ARABIC_JORDAN
2046 #define SUBLANG_ARABIC_JORDAN SUBLANG_DEFAULT
2047 #endif
2048 #ifndef SUBLANG_ARABIC_KUWAIT
2049 #define SUBLANG_ARABIC_KUWAIT SUBLANG_DEFAULT
2050 #endif
2051 #ifndef SUBLANG_ARABIC_LEBANON
2052 #define SUBLANG_ARABIC_LEBANON SUBLANG_DEFAULT
2053 #endif
2054 #ifndef SUBLANG_ARABIC_LIBYA
2055 #define SUBLANG_ARABIC_LIBYA SUBLANG_DEFAULT
2056 #endif
2057 #ifndef SUBLANG_ARABIC_MOROCCO
2058 #define SUBLANG_ARABIC_MOROCCO SUBLANG_DEFAULT
2059 #endif
2060 #ifndef SUBLANG_ARABIC_OMAN
2061 #define SUBLANG_ARABIC_OMAN SUBLANG_DEFAULT
2062 #endif
2063 #ifndef SUBLANG_ARABIC_QATAR
2064 #define SUBLANG_ARABIC_QATAR SUBLANG_DEFAULT
2065 #endif
2066 #ifndef SUBLANG_ARABIC_SAUDI_ARABIA
2067 #define SUBLANG_ARABIC_SAUDI_ARABIA SUBLANG_DEFAULT
2068 #endif
2069 #ifndef SUBLANG_ARABIC_SYRIA
2070 #define SUBLANG_ARABIC_SYRIA SUBLANG_DEFAULT
2071 #endif
2072 #ifndef SUBLANG_ARABIC_TUNISIA
2073 #define SUBLANG_ARABIC_TUNISIA SUBLANG_DEFAULT
2074 #endif
2075 #ifndef SUBLANG_ARABIC_UAE
2076 #define SUBLANG_ARABIC_UAE SUBLANG_DEFAULT
2077 #endif
2078 #ifndef SUBLANG_ARABIC_YEMEN
2079 #define SUBLANG_ARABIC_YEMEN SUBLANG_DEFAULT
2080 #endif
2081 #ifndef SUBLANG_AZERI_CYRILLIC
2082 #define SUBLANG_AZERI_CYRILLIC SUBLANG_DEFAULT
2083 #endif
2084 #ifndef SUBLANG_AZERI_LATIN
2085 #define SUBLANG_AZERI_LATIN SUBLANG_DEFAULT
2086 #endif
2087 #ifndef SUBLANG_CHINESE_SIMPLIFIED
2088 #define SUBLANG_CHINESE_SIMPLIFIED SUBLANG_DEFAULT
2089 #endif
2090 #ifndef SUBLANG_CHINESE_TRADITIONAL
2091 #define SUBLANG_CHINESE_TRADITIONAL SUBLANG_DEFAULT
2092 #endif
2093 #ifndef SUBLANG_CHINESE_HONGKONG
2094 #define SUBLANG_CHINESE_HONGKONG SUBLANG_DEFAULT
2095 #endif
2096 #ifndef SUBLANG_CHINESE_MACAU
2097 #define SUBLANG_CHINESE_MACAU SUBLANG_DEFAULT
2098 #endif
2099 #ifndef SUBLANG_CHINESE_SINGAPORE
2100 #define SUBLANG_CHINESE_SINGAPORE SUBLANG_DEFAULT
2101 #endif
2102 #ifndef SUBLANG_DUTCH
2103 #define SUBLANG_DUTCH SUBLANG_DEFAULT
2104 #endif
2105 #ifndef SUBLANG_DUTCH_BELGIAN
2106 #define SUBLANG_DUTCH_BELGIAN SUBLANG_DEFAULT
2107 #endif
2108 #ifndef SUBLANG_ENGLISH_UK
2109 #define SUBLANG_ENGLISH_UK SUBLANG_DEFAULT
2110 #endif
2111 #ifndef SUBLANG_ENGLISH_US
2112 #define SUBLANG_ENGLISH_US SUBLANG_DEFAULT
2113 #endif
2114 #ifndef SUBLANG_ENGLISH_AUS
2115 #define SUBLANG_ENGLISH_AUS SUBLANG_DEFAULT
2116 #endif
2117 #ifndef SUBLANG_ENGLISH_BELIZE
2118 #define SUBLANG_ENGLISH_BELIZE SUBLANG_DEFAULT
2119 #endif
2120 #ifndef SUBLANG_ENGLISH_CAN
2121 #define SUBLANG_ENGLISH_CAN SUBLANG_DEFAULT
2122 #endif
2123 #ifndef SUBLANG_ENGLISH_CARIBBEAN
2124 #define SUBLANG_ENGLISH_CARIBBEAN SUBLANG_DEFAULT
2125 #endif
2126 #ifndef SUBLANG_ENGLISH_EIRE
2127 #define SUBLANG_ENGLISH_EIRE SUBLANG_DEFAULT
2128 #endif
2129 #ifndef SUBLANG_ENGLISH_JAMAICA
2130 #define SUBLANG_ENGLISH_JAMAICA SUBLANG_DEFAULT
2131 #endif
2132 #ifndef SUBLANG_ENGLISH_NZ
2133 #define SUBLANG_ENGLISH_NZ SUBLANG_DEFAULT
2134 #endif
2135 #ifndef SUBLANG_ENGLISH_PHILIPPINES
2136 #define SUBLANG_ENGLISH_PHILIPPINES SUBLANG_DEFAULT
2137 #endif
2138 #ifndef SUBLANG_ENGLISH_SOUTH_AFRICA
2139 #define SUBLANG_ENGLISH_SOUTH_AFRICA SUBLANG_DEFAULT
2140 #endif
2141 #ifndef SUBLANG_ENGLISH_TRINIDAD
2142 #define SUBLANG_ENGLISH_TRINIDAD SUBLANG_DEFAULT
2143 #endif
2144 #ifndef SUBLANG_ENGLISH_ZIMBABWE
2145 #define SUBLANG_ENGLISH_ZIMBABWE SUBLANG_DEFAULT
2146 #endif
2147 #ifndef SUBLANG_FRENCH
2148 #define SUBLANG_FRENCH SUBLANG_DEFAULT
2149 #endif
2150 #ifndef SUBLANG_FRENCH_BELGIAN
2151 #define SUBLANG_FRENCH_BELGIAN SUBLANG_DEFAULT
2152 #endif
2153 #ifndef SUBLANG_FRENCH_CANADIAN
2154 #define SUBLANG_FRENCH_CANADIAN SUBLANG_DEFAULT
2155 #endif
2156 #ifndef SUBLANG_FRENCH_LUXEMBOURG
2157 #define SUBLANG_FRENCH_LUXEMBOURG SUBLANG_DEFAULT
2158 #endif
2159 #ifndef SUBLANG_FRENCH_MONACO
2160 #define SUBLANG_FRENCH_MONACO SUBLANG_DEFAULT
2161 #endif
2162 #ifndef SUBLANG_FRENCH_SWISS
2163 #define SUBLANG_FRENCH_SWISS SUBLANG_DEFAULT
2164 #endif
2165 #ifndef SUBLANG_GERMAN
2166 #define SUBLANG_GERMAN SUBLANG_DEFAULT
2167 #endif
2168 #ifndef SUBLANG_GERMAN_AUSTRIAN
2169 #define SUBLANG_GERMAN_AUSTRIAN SUBLANG_DEFAULT
2170 #endif
2171 #ifndef SUBLANG_GERMAN_LIECHTENSTEIN
2172 #define SUBLANG_GERMAN_LIECHTENSTEIN SUBLANG_DEFAULT
2173 #endif
2174 #ifndef SUBLANG_GERMAN_LUXEMBOURG
2175 #define SUBLANG_GERMAN_LUXEMBOURG SUBLANG_DEFAULT
2176 #endif
2177 #ifndef SUBLANG_GERMAN_SWISS
2178 #define SUBLANG_GERMAN_SWISS SUBLANG_DEFAULT
2179 #endif
2180 #ifndef SUBLANG_ITALIAN
2181 #define SUBLANG_ITALIAN SUBLANG_DEFAULT
2182 #endif
2183 #ifndef SUBLANG_ITALIAN_SWISS
2184 #define SUBLANG_ITALIAN_SWISS SUBLANG_DEFAULT
2185 #endif
2186 #ifndef SUBLANG_KASHMIRI_INDIA
2187 #define SUBLANG_KASHMIRI_INDIA SUBLANG_DEFAULT
2188 #endif
2189 #ifndef SUBLANG_KOREAN
2190 #define SUBLANG_KOREAN SUBLANG_DEFAULT
2191 #endif
2192 #ifndef SUBLANG_LITHUANIAN
2193 #define SUBLANG_LITHUANIAN SUBLANG_DEFAULT
2194 #endif
2195 #ifndef SUBLANG_MALAY_BRUNEI_DARUSSALAM
2196 #define SUBLANG_MALAY_BRUNEI_DARUSSALAM SUBLANG_DEFAULT
2197 #endif
2198 #ifndef SUBLANG_MALAY_MALAYSIA
2199 #define SUBLANG_MALAY_MALAYSIA SUBLANG_DEFAULT
2200 #endif
2201 #ifndef SUBLANG_NEPALI_INDIA
2202 #define SUBLANG_NEPALI_INDIA SUBLANG_DEFAULT
2203 #endif
2204 #ifndef SUBLANG_NORWEGIAN_BOKMAL
2205 #define SUBLANG_NORWEGIAN_BOKMAL SUBLANG_DEFAULT
2206 #endif
2207 #ifndef SUBLANG_NORWEGIAN_NYNORSK
2208 #define SUBLANG_NORWEGIAN_NYNORSK SUBLANG_DEFAULT
2209 #endif
2210 #ifndef SUBLANG_PORTUGUESE
2211 #define SUBLANG_PORTUGUESE SUBLANG_DEFAULT
2212 #endif
2213 #ifndef SUBLANG_PORTUGUESE_BRAZILIAN
2214 #define SUBLANG_PORTUGUESE_BRAZILIAN SUBLANG_DEFAULT
2215 #endif
2216 #ifndef SUBLANG_SERBIAN_CYRILLIC
2217 #define SUBLANG_SERBIAN_CYRILLIC SUBLANG_DEFAULT
2218 #endif
2219 #ifndef SUBLANG_SERBIAN_LATIN
2220 #define SUBLANG_SERBIAN_LATIN SUBLANG_DEFAULT
2221 #endif
2222 #ifndef SUBLANG_SPANISH
2223 #define SUBLANG_SPANISH SUBLANG_DEFAULT
2224 #endif
2225 #ifndef SUBLANG_SPANISH_ARGENTINA
2226 #define SUBLANG_SPANISH_ARGENTINA SUBLANG_DEFAULT
2227 #endif
2228 #ifndef SUBLANG_SPANISH_BOLIVIA
2229 #define SUBLANG_SPANISH_BOLIVIA SUBLANG_DEFAULT
2230 #endif
2231 #ifndef SUBLANG_SPANISH_CHILE
2232 #define SUBLANG_SPANISH_CHILE SUBLANG_DEFAULT
2233 #endif
2234 #ifndef SUBLANG_SPANISH_COLOMBIA
2235 #define SUBLANG_SPANISH_COLOMBIA SUBLANG_DEFAULT
2236 #endif
2237 #ifndef SUBLANG_SPANISH_COSTA_RICA
2238 #define SUBLANG_SPANISH_COSTA_RICA SUBLANG_DEFAULT
2239 #endif
2240 #ifndef SUBLANG_SPANISH_DOMINICAN_REPUBLIC
2241 #define SUBLANG_SPANISH_DOMINICAN_REPUBLIC SUBLANG_DEFAULT
2242 #endif
2243 #ifndef SUBLANG_SPANISH_ECUADOR
2244 #define SUBLANG_SPANISH_ECUADOR SUBLANG_DEFAULT
2245 #endif
2246 #ifndef SUBLANG_SPANISH_EL_SALVADOR
2247 #define SUBLANG_SPANISH_EL_SALVADOR SUBLANG_DEFAULT
2248 #endif
2249 #ifndef SUBLANG_SPANISH_GUATEMALA
2250 #define SUBLANG_SPANISH_GUATEMALA SUBLANG_DEFAULT
2251 #endif
2252 #ifndef SUBLANG_SPANISH_HONDURAS
2253 #define SUBLANG_SPANISH_HONDURAS SUBLANG_DEFAULT
2254 #endif
2255 #ifndef SUBLANG_SPANISH_MEXICAN
2256 #define SUBLANG_SPANISH_MEXICAN SUBLANG_DEFAULT
2257 #endif
2258 #ifndef SUBLANG_SPANISH_MODERN
2259 #define SUBLANG_SPANISH_MODERN SUBLANG_DEFAULT
2260 #endif
2261 #ifndef SUBLANG_SPANISH_NICARAGUA
2262 #define SUBLANG_SPANISH_NICARAGUA SUBLANG_DEFAULT
2263 #endif
2264 #ifndef SUBLANG_SPANISH_PANAMA
2265 #define SUBLANG_SPANISH_PANAMA SUBLANG_DEFAULT
2266 #endif
2267 #ifndef SUBLANG_SPANISH_PARAGUAY
2268 #define SUBLANG_SPANISH_PARAGUAY SUBLANG_DEFAULT
2269 #endif
2270 #ifndef SUBLANG_SPANISH_PERU
2271 #define SUBLANG_SPANISH_PERU SUBLANG_DEFAULT
2272 #endif
2273 #ifndef SUBLANG_SPANISH_PUERTO_RICO
2274 #define SUBLANG_SPANISH_PUERTO_RICO SUBLANG_DEFAULT
2275 #endif
2276 #ifndef SUBLANG_SPANISH_URUGUAY
2277 #define SUBLANG_SPANISH_URUGUAY SUBLANG_DEFAULT
2278 #endif
2279 #ifndef SUBLANG_SPANISH_VENEZUELA
2280 #define SUBLANG_SPANISH_VENEZUELA SUBLANG_DEFAULT
2281 #endif
2282 #ifndef SUBLANG_SWEDISH
2283 #define SUBLANG_SWEDISH SUBLANG_DEFAULT
2284 #endif
2285 #ifndef SUBLANG_SWEDISH_FINLAND
2286 #define SUBLANG_SWEDISH_FINLAND SUBLANG_DEFAULT
2287 #endif
2288 #ifndef SUBLANG_URDU_INDIA
2289 #define SUBLANG_URDU_INDIA SUBLANG_DEFAULT
2290 #endif
2291 #ifndef SUBLANG_URDU_PAKISTAN
2292 #define SUBLANG_URDU_PAKISTAN SUBLANG_DEFAULT
2293 #endif
2294 #ifndef SUBLANG_UZBEK_CYRILLIC
2295 #define SUBLANG_UZBEK_CYRILLIC SUBLANG_DEFAULT
2296 #endif
2297 #ifndef SUBLANG_UZBEK_LATIN
2298 #define SUBLANG_UZBEK_LATIN SUBLANG_DEFAULT
2299 #endif
2300
2301
2302 #endif // __WIN32__
2303
2304 #define LNG(wxlang, canonical, winlang, winsublang, desc) \
2305     info.Language = wxlang;                               \
2306     info.CanonicalName = wxT(canonical);                  \
2307     info.Description = wxT(desc);                         \
2308     SETWINLANG(info, winlang, winsublang)                 \
2309     AddLanguage(info);
2310
2311 void wxLocale::InitLanguagesDB()
2312 {
2313    wxLanguageInfo info;
2314    wxStringTokenizer tkn;
2315
2316    LNG(wxLANGUAGE_ABKHAZIAN,                  "ab"   , 0              , 0                                 , "Abkhazian")
2317    LNG(wxLANGUAGE_AFAR,                       "aa"   , 0              , 0                                 , "Afar")
2318    LNG(wxLANGUAGE_AFRIKAANS,                  "af_ZA", LANG_AFRIKAANS , SUBLANG_DEFAULT                   , "Afrikaans")
2319    LNG(wxLANGUAGE_ALBANIAN,                   "sq_AL", LANG_ALBANIAN  , SUBLANG_DEFAULT                   , "Albanian")
2320    LNG(wxLANGUAGE_AMHARIC,                    "am"   , 0              , 0                                 , "Amharic")
2321    LNG(wxLANGUAGE_ARABIC,                     "ar"   , LANG_ARABIC    , SUBLANG_DEFAULT                   , "Arabic")
2322    LNG(wxLANGUAGE_ARABIC_ALGERIA,             "ar_DZ", LANG_ARABIC    , SUBLANG_ARABIC_ALGERIA            , "Arabic (Algeria)")
2323    LNG(wxLANGUAGE_ARABIC_BAHRAIN,             "ar_BH", LANG_ARABIC    , SUBLANG_ARABIC_BAHRAIN            , "Arabic (Bahrain)")
2324    LNG(wxLANGUAGE_ARABIC_EGYPT,               "ar_EG", LANG_ARABIC    , SUBLANG_ARABIC_EGYPT              , "Arabic (Egypt)")
2325    LNG(wxLANGUAGE_ARABIC_IRAQ,                "ar_IQ", LANG_ARABIC    , SUBLANG_ARABIC_IRAQ               , "Arabic (Iraq)")
2326    LNG(wxLANGUAGE_ARABIC_JORDAN,              "ar_JO", LANG_ARABIC    , SUBLANG_ARABIC_JORDAN             , "Arabic (Jordan)")
2327    LNG(wxLANGUAGE_ARABIC_KUWAIT,              "ar_KW", LANG_ARABIC    , SUBLANG_ARABIC_KUWAIT             , "Arabic (Kuwait)")
2328    LNG(wxLANGUAGE_ARABIC_LEBANON,             "ar_LB", LANG_ARABIC    , SUBLANG_ARABIC_LEBANON            , "Arabic (Lebanon)")
2329    LNG(wxLANGUAGE_ARABIC_LIBYA,               "ar_LY", LANG_ARABIC    , SUBLANG_ARABIC_LIBYA              , "Arabic (Libya)")
2330    LNG(wxLANGUAGE_ARABIC_MOROCCO,             "ar_MA", LANG_ARABIC    , SUBLANG_ARABIC_MOROCCO            , "Arabic (Morocco)")
2331    LNG(wxLANGUAGE_ARABIC_OMAN,                "ar_OM", LANG_ARABIC    , SUBLANG_ARABIC_OMAN               , "Arabic (Oman)")
2332    LNG(wxLANGUAGE_ARABIC_QATAR,               "ar_QA", LANG_ARABIC    , SUBLANG_ARABIC_QATAR              , "Arabic (Qatar)")
2333    LNG(wxLANGUAGE_ARABIC_SAUDI_ARABIA,        "ar_SA", LANG_ARABIC    , SUBLANG_ARABIC_SAUDI_ARABIA       , "Arabic (Saudi Arabia)")
2334    LNG(wxLANGUAGE_ARABIC_SUDAN,               "ar_SD", 0              , 0                                 , "Arabic (Sudan)")
2335    LNG(wxLANGUAGE_ARABIC_SYRIA,               "ar_SY", LANG_ARABIC    , SUBLANG_ARABIC_SYRIA              , "Arabic (Syria)")
2336    LNG(wxLANGUAGE_ARABIC_TUNISIA,             "ar_TN", LANG_ARABIC    , SUBLANG_ARABIC_TUNISIA            , "Arabic (Tunisia)")
2337    LNG(wxLANGUAGE_ARABIC_UAE,                 "ar_AE", LANG_ARABIC    , SUBLANG_ARABIC_UAE                , "Arabic (Uae)")
2338    LNG(wxLANGUAGE_ARABIC_YEMEN,               "ar_YE", LANG_ARABIC    , SUBLANG_ARABIC_YEMEN              , "Arabic (Yemen)")
2339    LNG(wxLANGUAGE_ARMENIAN,                   "hy"   , LANG_ARMENIAN  , SUBLANG_DEFAULT                   , "Armenian")
2340    LNG(wxLANGUAGE_ASSAMESE,                   "as"   , LANG_ASSAMESE  , SUBLANG_DEFAULT                   , "Assamese")
2341    LNG(wxLANGUAGE_AYMARA,                     "ay"   , 0              , 0                                 , "Aymara")
2342    LNG(wxLANGUAGE_AZERI,                      "az"   , LANG_AZERI     , SUBLANG_DEFAULT                   , "Azeri")
2343    LNG(wxLANGUAGE_AZERI_CYRILLIC,             "az"   , LANG_AZERI     , SUBLANG_AZERI_CYRILLIC            , "Azeri (Cyrillic)")
2344    LNG(wxLANGUAGE_AZERI_LATIN,                "az"   , LANG_AZERI     , SUBLANG_AZERI_LATIN               , "Azeri (Latin)")
2345    LNG(wxLANGUAGE_BASHKIR,                    "ba"   , 0              , 0                                 , "Bashkir")
2346    LNG(wxLANGUAGE_BASQUE,                     "eu_ES", LANG_BASQUE    , SUBLANG_DEFAULT                   , "Basque")
2347    LNG(wxLANGUAGE_BELARUSIAN,                 "be_BY", LANG_BELARUSIAN, SUBLANG_DEFAULT                   , "Belarusian")
2348    LNG(wxLANGUAGE_BENGALI,                    "bn"   , LANG_BENGALI   , SUBLANG_DEFAULT                   , "Bengali")
2349    LNG(wxLANGUAGE_BHUTANI,                    "dz"   , 0              , 0                                 , "Bhutani")
2350    LNG(wxLANGUAGE_BIHARI,                     "bh"   , 0              , 0                                 , "Bihari")
2351    LNG(wxLANGUAGE_BISLAMA,                    "bi"   , 0              , 0                                 , "Bislama")
2352    LNG(wxLANGUAGE_BRETON,                     "br"   , 0              , 0                                 , "Breton")
2353    LNG(wxLANGUAGE_BULGARIAN,                  "bg_BG", LANG_BULGARIAN , SUBLANG_DEFAULT                   , "Bulgarian")
2354    LNG(wxLANGUAGE_BURMESE,                    "my"   , 0              , 0                                 , "Burmese")
2355    LNG(wxLANGUAGE_CAMBODIAN,                  "km"   , 0              , 0                                 , "Cambodian")
2356    LNG(wxLANGUAGE_CATALAN,                    "ca_ES", LANG_CATALAN   , SUBLANG_DEFAULT                   , "Catalan")
2357    LNG(wxLANGUAGE_CHINESE,                    "zh_CN", LANG_CHINESE   , SUBLANG_DEFAULT                   , "Chinese")
2358    LNG(wxLANGUAGE_CHINESE_SIMPLIFIED,         "zh_CN", LANG_CHINESE   , SUBLANG_CHINESE_SIMPLIFIED        , "Chinese (Simplified)")
2359    LNG(wxLANGUAGE_CHINESE_TRADITIONAL,        "zh_TW", LANG_CHINESE   , SUBLANG_CHINESE_TRADITIONAL       , "Chinese (Traditional)")
2360    LNG(wxLANGUAGE_CHINESE_HONGKONG,           "zh_HK", LANG_CHINESE   , SUBLANG_CHINESE_HONGKONG          , "Chinese (Hongkong)")
2361    LNG(wxLANGUAGE_CHINESE_MACAU,              "zh_MO", LANG_CHINESE   , SUBLANG_CHINESE_MACAU             , "Chinese (Macau)")
2362    LNG(wxLANGUAGE_CHINESE_SINGAPORE,          "zh_SG", LANG_CHINESE   , SUBLANG_CHINESE_SINGAPORE         , "Chinese (Singapore)")
2363    LNG(wxLANGUAGE_CHINESE_TAIWAN,             "zh_TW", LANG_CHINESE   , SUBLANG_CHINESE_TRADITIONAL       , "Chinese (Taiwan)")
2364    LNG(wxLANGUAGE_CORSICAN,                   "co"   , 0              , 0                                 , "Corsican")
2365    LNG(wxLANGUAGE_CROATIAN,                   "hr_HR", LANG_CROATIAN  , SUBLANG_DEFAULT                   , "Croatian")
2366    LNG(wxLANGUAGE_CZECH,                      "cs_CZ", LANG_CZECH     , SUBLANG_DEFAULT                   , "Czech")
2367    LNG(wxLANGUAGE_DANISH,                     "da_DK", LANG_DANISH    , SUBLANG_DEFAULT                   , "Danish")
2368    LNG(wxLANGUAGE_DUTCH,                      "nl_NL", LANG_DUTCH     , SUBLANG_DUTCH                     , "Dutch")
2369    LNG(wxLANGUAGE_DUTCH_BELGIAN,              "nl_BE", LANG_DUTCH     , SUBLANG_DUTCH_BELGIAN             , "Dutch (Belgian)")
2370    LNG(wxLANGUAGE_ENGLISH,                    "en_GB", LANG_ENGLISH   , SUBLANG_ENGLISH_UK                , "English")
2371    LNG(wxLANGUAGE_ENGLISH_UK,                 "en_GB", LANG_ENGLISH   , SUBLANG_ENGLISH_UK                , "English (U.K.)")
2372    LNG(wxLANGUAGE_ENGLISH_US,                 "en_US", LANG_ENGLISH   , SUBLANG_ENGLISH_US                , "English (U.S.)")
2373    LNG(wxLANGUAGE_ENGLISH_AUSTRALIA,          "en_AU", LANG_ENGLISH   , SUBLANG_ENGLISH_AUS               , "English (Australia)")
2374    LNG(wxLANGUAGE_ENGLISH_BELIZE,             "en_BZ", LANG_ENGLISH   , SUBLANG_ENGLISH_BELIZE            , "English (Belize)")
2375    LNG(wxLANGUAGE_ENGLISH_BOTSWANA,           "en_BW", 0              , 0                                 , "English (Botswana)")
2376    LNG(wxLANGUAGE_ENGLISH_CANADA,             "en_CA", LANG_ENGLISH   , SUBLANG_ENGLISH_CAN               , "English (Canada)")
2377    LNG(wxLANGUAGE_ENGLISH_CARIBBEAN,          "en_CB", LANG_ENGLISH   , SUBLANG_ENGLISH_CARIBBEAN         , "English (Caribbean)")
2378    LNG(wxLANGUAGE_ENGLISH_DENMARK,            "en_DK", 0              , 0                                 , "English (Denmark)")
2379    LNG(wxLANGUAGE_ENGLISH_EIRE,               "en_IE", LANG_ENGLISH   , SUBLANG_ENGLISH_EIRE              , "English (Eire)")
2380    LNG(wxLANGUAGE_ENGLISH_JAMAICA,            "en_JM", LANG_ENGLISH   , SUBLANG_ENGLISH_JAMAICA           , "English (Jamaica)")
2381    LNG(wxLANGUAGE_ENGLISH_NEW_ZEALAND,        "en_NZ", LANG_ENGLISH   , SUBLANG_ENGLISH_NZ                , "English (New Zealand)")
2382    LNG(wxLANGUAGE_ENGLISH_PHILIPPINES,        "en_PH", LANG_ENGLISH   , SUBLANG_ENGLISH_PHILIPPINES       , "English (Philippines)")
2383    LNG(wxLANGUAGE_ENGLISH_SOUTH_AFRICA,       "en_ZA", LANG_ENGLISH   , SUBLANG_ENGLISH_SOUTH_AFRICA      , "English (South Africa)")
2384    LNG(wxLANGUAGE_ENGLISH_TRINIDAD,           "en_TT", LANG_ENGLISH   , SUBLANG_ENGLISH_TRINIDAD          , "English (Trinidad)")
2385    LNG(wxLANGUAGE_ENGLISH_ZIMBABWE,           "en_ZW", LANG_ENGLISH   , SUBLANG_ENGLISH_ZIMBABWE          , "English (Zimbabwe)")
2386    LNG(wxLANGUAGE_ESPERANTO,                  "eo"   , 0              , 0                                 , "Esperanto")
2387    LNG(wxLANGUAGE_ESTONIAN,                   "et_EE", LANG_ESTONIAN  , SUBLANG_DEFAULT                   , "Estonian")
2388    LNG(wxLANGUAGE_FAEROESE,                   "fo_FO", LANG_FAEROESE  , SUBLANG_DEFAULT                   , "Faeroese")
2389    LNG(wxLANGUAGE_FARSI,                      "fa_IR", LANG_FARSI     , SUBLANG_DEFAULT                   , "Farsi")
2390    LNG(wxLANGUAGE_FIJI,                       "fj"   , 0              , 0                                 , "Fiji")
2391    LNG(wxLANGUAGE_FINNISH,                    "fi_FI", LANG_FINNISH   , SUBLANG_DEFAULT                   , "Finnish")
2392    LNG(wxLANGUAGE_FRENCH,                     "fr_FR", LANG_FRENCH    , SUBLANG_FRENCH                    , "French")
2393    LNG(wxLANGUAGE_FRENCH_BELGIAN,             "fr_BE", LANG_FRENCH    , SUBLANG_FRENCH_BELGIAN            , "French (Belgian)")
2394    LNG(wxLANGUAGE_FRENCH_CANADIAN,            "fr_CA", LANG_FRENCH    , SUBLANG_FRENCH_CANADIAN           , "French (Canadian)")
2395    LNG(wxLANGUAGE_FRENCH_LUXEMBOURG,          "fr_LU", LANG_FRENCH    , SUBLANG_FRENCH_LUXEMBOURG         , "French (Luxembourg)")
2396    LNG(wxLANGUAGE_FRENCH_MONACO,              "fr_MC", LANG_FRENCH    , SUBLANG_FRENCH_MONACO             , "French (Monaco)")
2397    LNG(wxLANGUAGE_FRENCH_SWISS,               "fr_CH", LANG_FRENCH    , SUBLANG_FRENCH_SWISS              , "French (Swiss)")
2398    LNG(wxLANGUAGE_FRISIAN,                    "fy"   , 0              , 0                                 , "Frisian")
2399    LNG(wxLANGUAGE_GALICIAN,                   "gl_ES", 0              , 0                                 , "Galician")
2400    LNG(wxLANGUAGE_GEORGIAN,                   "ka"   , LANG_GEORGIAN  , SUBLANG_DEFAULT                   , "Georgian")
2401    LNG(wxLANGUAGE_GERMAN,                     "de_DE", LANG_GERMAN    , SUBLANG_GERMAN                    , "German")
2402    LNG(wxLANGUAGE_GERMAN_AUSTRIAN,            "de_AT", LANG_GERMAN    , SUBLANG_GERMAN_AUSTRIAN           , "German (Austrian)")
2403    LNG(wxLANGUAGE_GERMAN_BELGIUM,             "de_BE", 0              , 0                                 , "German (Belgium)")
2404    LNG(wxLANGUAGE_GERMAN_LIECHTENSTEIN,       "de_LI", LANG_GERMAN    , SUBLANG_GERMAN_LIECHTENSTEIN      , "German (Liechtenstein)")
2405    LNG(wxLANGUAGE_GERMAN_LUXEMBOURG,          "de_LU", LANG_GERMAN    , SUBLANG_GERMAN_LUXEMBOURG         , "German (Luxembourg)")
2406    LNG(wxLANGUAGE_GERMAN_SWISS,               "de_CH", LANG_GERMAN    , SUBLANG_GERMAN_SWISS              , "German (Swiss)")
2407    LNG(wxLANGUAGE_GREEK,                      "el_GR", LANG_GREEK     , SUBLANG_DEFAULT                   , "Greek")
2408    LNG(wxLANGUAGE_GREENLANDIC,                "kl_GL", 0              , 0                                 , "Greenlandic")
2409    LNG(wxLANGUAGE_GUARANI,                    "gn"   , 0              , 0                                 , "Guarani")
2410    LNG(wxLANGUAGE_GUJARATI,                   "gu"   , LANG_GUJARATI  , SUBLANG_DEFAULT                   , "Gujarati")
2411    LNG(wxLANGUAGE_HAUSA,                      "ha"   , 0              , 0                                 , "Hausa")
2412    LNG(wxLANGUAGE_HEBREW,                     "he_IL", LANG_HEBREW    , SUBLANG_DEFAULT                   , "Hebrew")
2413    LNG(wxLANGUAGE_HINDI,                      "hi_IN", LANG_HINDI     , SUBLANG_DEFAULT                   , "Hindi")
2414    LNG(wxLANGUAGE_HUNGARIAN,                  "hu_HU", LANG_HUNGARIAN , SUBLANG_DEFAULT                   , "Hungarian")
2415    LNG(wxLANGUAGE_ICELANDIC,                  "is_IS", LANG_ICELANDIC , SUBLANG_DEFAULT                   , "Icelandic")
2416    LNG(wxLANGUAGE_INDONESIAN,                 "id_ID", LANG_INDONESIAN, SUBLANG_DEFAULT                   , "Indonesian")
2417    LNG(wxLANGUAGE_INTERLINGUA,                "ia"   , 0              , 0                                 , "Interlingua")
2418    LNG(wxLANGUAGE_INTERLINGUE,                "ie"   , 0              , 0                                 , "Interlingue")
2419    LNG(wxLANGUAGE_INUKTITUT,                  "iu"   , 0              , 0                                 , "Inuktitut")
2420    LNG(wxLANGUAGE_INUPIAK,                    "ik"   , 0              , 0                                 , "Inupiak")
2421    LNG(wxLANGUAGE_IRISH,                      "ga_IE", 0              , 0                                 , "Irish")
2422    LNG(wxLANGUAGE_ITALIAN,                    "it_IT", LANG_ITALIAN   , SUBLANG_ITALIAN                   , "Italian")
2423    LNG(wxLANGUAGE_ITALIAN_SWISS,              "it_CH", LANG_ITALIAN   , SUBLANG_ITALIAN_SWISS             , "Italian (Swiss)")
2424    LNG(wxLANGUAGE_JAPANESE,                   "ja_JP", LANG_JAPANESE  , SUBLANG_DEFAULT                   , "Japanese")
2425    LNG(wxLANGUAGE_JAVANESE,                   "jw"   , 0              , 0                                 , "Javanese")
2426    LNG(wxLANGUAGE_KANNADA,                    "kn"   , LANG_KANNADA   , SUBLANG_DEFAULT                   , "Kannada")
2427    LNG(wxLANGUAGE_KASHMIRI,                   "ks"   , LANG_KASHMIRI  , SUBLANG_DEFAULT                   , "Kashmiri")
2428    LNG(wxLANGUAGE_KASHMIRI_INDIA,             "ks_IN", LANG_KASHMIRI  , SUBLANG_KASHMIRI_INDIA            , "Kashmiri (India)")
2429    LNG(wxLANGUAGE_KAZAKH,                     "kk"   , LANG_KAZAK     , SUBLANG_DEFAULT                   , "Kazakh")
2430    LNG(wxLANGUAGE_KERNEWEK,                   "kw_GB", 0              , 0                                 , "Kernewek")
2431    LNG(wxLANGUAGE_KINYARWANDA,                "rw"   , 0              , 0                                 , "Kinyarwanda")
2432    LNG(wxLANGUAGE_KIRGHIZ,                    "ky"   , 0              , 0                                 , "Kirghiz")
2433    LNG(wxLANGUAGE_KIRUNDI,                    "rn"   , 0              , 0                                 , "Kirundi")
2434    LNG(wxLANGUAGE_KONKANI,                    ""     , LANG_KONKANI   , SUBLANG_DEFAULT                   , "Konkani")
2435    LNG(wxLANGUAGE_KOREAN,                     "ko_KR", LANG_KOREAN    , SUBLANG_KOREAN                    , "Korean")
2436    LNG(wxLANGUAGE_KURDISH,                    "ku"   , 0              , 0                                 , "Kurdish")
2437    LNG(wxLANGUAGE_LAOTHIAN,                   "lo"   , 0              , 0                                 , "Laothian")
2438    LNG(wxLANGUAGE_LATIN,                      "la"   , 0              , 0                                 , "Latin")
2439    LNG(wxLANGUAGE_LATVIAN,                    "lv_LV", LANG_LATVIAN   , SUBLANG_DEFAULT                   , "Latvian")
2440    LNG(wxLANGUAGE_LINGALA,                    "ln"   , 0              , 0                                 , "Lingala")
2441    LNG(wxLANGUAGE_LITHUANIAN,                 "lt_LT", LANG_LITHUANIAN, SUBLANG_LITHUANIAN                , "Lithuanian")
2442    LNG(wxLANGUAGE_MACEDONIAN,                 "mk_MK", LANG_MACEDONIAN, SUBLANG_DEFAULT                   , "Macedonian")
2443    LNG(wxLANGUAGE_MALAGASY,                   "mg"   , 0              , 0                                 , "Malagasy")
2444    LNG(wxLANGUAGE_MALAY,                      "ms_MY", LANG_MALAY     , SUBLANG_DEFAULT                   , "Malay")
2445    LNG(wxLANGUAGE_MALAYALAM,                  "ml"   , LANG_MALAYALAM , SUBLANG_DEFAULT                   , "Malayalam")
2446    LNG(wxLANGUAGE_MALAY_BRUNEI_DARUSSALAM,    "ms_BN", LANG_MALAY     , SUBLANG_MALAY_BRUNEI_DARUSSALAM   , "Malay (Brunei Darussalam)")
2447    LNG(wxLANGUAGE_MALAY_MALAYSIA,             "ms_MY", LANG_MALAY     , SUBLANG_MALAY_MALAYSIA            , "Malay (Malaysia)")
2448    LNG(wxLANGUAGE_MALTESE,                    "mt_MT", 0              , 0                                 , "Maltese")
2449    LNG(wxLANGUAGE_MANIPURI,                   ""     , LANG_MANIPURI  , SUBLANG_DEFAULT                   , "Manipuri")
2450    LNG(wxLANGUAGE_MAORI,                      "mi"   , 0              , 0                                 , "Maori")
2451    LNG(wxLANGUAGE_MARATHI,                    "mr_IN", LANG_MARATHI   , SUBLANG_DEFAULT                   , "Marathi")
2452    LNG(wxLANGUAGE_MOLDAVIAN,                  "mo"   , 0              , 0                                 , "Moldavian")
2453    LNG(wxLANGUAGE_MONGOLIAN,                  "mn"   , 0              , 0                                 , "Mongolian")
2454    LNG(wxLANGUAGE_NAURU,                      "na"   , 0              , 0                                 , "Nauru")
2455    LNG(wxLANGUAGE_NEPALI,                     "ne"   , LANG_NEPALI    , SUBLANG_DEFAULT                   , "Nepali")
2456    LNG(wxLANGUAGE_NEPALI_INDIA,               "ne_IN", LANG_NEPALI    , SUBLANG_NEPALI_INDIA              , "Nepali (India)")
2457    LNG(wxLANGUAGE_NORWEGIAN_BOKMAL,           "nb_NO", LANG_NORWEGIAN , SUBLANG_NORWEGIAN_BOKMAL          , "Norwegian (Bokmal)")
2458    LNG(wxLANGUAGE_NORWEGIAN_NYNORSK,          "nn_NO", LANG_NORWEGIAN , SUBLANG_NORWEGIAN_NYNORSK         , "Norwegian (Nynorsk)")
2459    LNG(wxLANGUAGE_OCCITAN,                    "oc"   , 0              , 0                                 , "Occitan")
2460    LNG(wxLANGUAGE_ORIYA,                      "or"   , LANG_ORIYA     , SUBLANG_DEFAULT                   , "Oriya")
2461    LNG(wxLANGUAGE_OROMO,                      "om"   , 0              , 0                                 , "(Afan) Oromo")
2462    LNG(wxLANGUAGE_PASHTO,                     "ps"   , 0              , 0                                 , "Pashto, Pushto")
2463    LNG(wxLANGUAGE_POLISH,                     "pl_PL", LANG_POLISH    , SUBLANG_DEFAULT                   , "Polish")
2464    LNG(wxLANGUAGE_PORTUGUESE,                 "pt_PT", LANG_PORTUGUESE, SUBLANG_PORTUGUESE                , "Portuguese")
2465    LNG(wxLANGUAGE_PORTUGUESE_BRAZILIAN,       "pt_BR", LANG_PORTUGUESE, SUBLANG_PORTUGUESE_BRAZILIAN      , "Portuguese (Brazilian)")
2466    LNG(wxLANGUAGE_PUNJABI,                    "pa"   , LANG_PUNJABI   , SUBLANG_DEFAULT                   , "Punjabi")
2467    LNG(wxLANGUAGE_QUECHUA,                    "qu"   , 0              , 0                                 , "Quechua")
2468    LNG(wxLANGUAGE_RHAETO_ROMANCE,             "rm"   , 0              , 0                                 , "Rhaeto-Romance")
2469    LNG(wxLANGUAGE_ROMANIAN,                   "ro_RO", LANG_ROMANIAN  , SUBLANG_DEFAULT                   , "Romanian")
2470    LNG(wxLANGUAGE_RUSSIAN,                    "ru_RU", LANG_RUSSIAN   , SUBLANG_DEFAULT                   , "Russian")
2471    LNG(wxLANGUAGE_RUSSIAN_UKRAINE,            "ru_UA", 0              , 0                                 , "Russian (Ukraine)")
2472    LNG(wxLANGUAGE_SAMOAN,                     "sm"   , 0              , 0                                 , "Samoan")
2473    LNG(wxLANGUAGE_SANGHO,                     "sg"   , 0              , 0                                 , "Sangho")
2474    LNG(wxLANGUAGE_SANSKRIT,                   "sa"   , LANG_SANSKRIT  , SUBLANG_DEFAULT                   , "Sanskrit")
2475    LNG(wxLANGUAGE_SCOTS_GAELIC,               "gd"   , 0              , 0                                 , "Scots Gaelic")
2476    LNG(wxLANGUAGE_SERBIAN,                    "sr_YU", LANG_SERBIAN   , SUBLANG_DEFAULT                   , "Serbian")
2477    LNG(wxLANGUAGE_SERBIAN_CYRILLIC,           "sr_YU", LANG_SERBIAN   , SUBLANG_SERBIAN_CYRILLIC          , "Serbian (Cyrillic)")
2478    LNG(wxLANGUAGE_SERBIAN_LATIN,              "sr_YU", LANG_SERBIAN   , SUBLANG_SERBIAN_LATIN             , "Serbian (Latin)")
2479    LNG(wxLANGUAGE_SERBO_CROATIAN,             "sh"   , 0              , 0                                 , "Serbo-Croatian")
2480    LNG(wxLANGUAGE_SESOTHO,                    "st"   , 0              , 0                                 , "Sesotho")
2481    LNG(wxLANGUAGE_SETSWANA,                   "tn"   , 0              , 0                                 , "Setswana")
2482    LNG(wxLANGUAGE_SHONA,                      "sn"   , 0              , 0                                 , "Shona")
2483    LNG(wxLANGUAGE_SINDHI,                     "sd"   , LANG_SINDHI    , SUBLANG_DEFAULT                   , "Sindhi")
2484    LNG(wxLANGUAGE_SINHALESE,                  "si"   , 0              , 0                                 , "Sinhalese")
2485    LNG(wxLANGUAGE_SISWATI,                    "ss"   , 0              , 0                                 , "Siswati")
2486    LNG(wxLANGUAGE_SLOVAK,                     "sk_SK", LANG_SLOVAK    , SUBLANG_DEFAULT                   , "Slovak")
2487    LNG(wxLANGUAGE_SLOVENIAN,                  "sl_SI", LANG_SLOVENIAN , SUBLANG_DEFAULT                   , "Slovenian")
2488    LNG(wxLANGUAGE_SOMALI,                     "so"   , 0              , 0                                 , "Somali")
2489    LNG(wxLANGUAGE_SPANISH,                    "es_ES", LANG_SPANISH   , SUBLANG_SPANISH                   , "Spanish")
2490    LNG(wxLANGUAGE_SPANISH_ARGENTINA,          "es_AR", LANG_SPANISH   , SUBLANG_SPANISH_ARGENTINA         , "Spanish (Argentina)")
2491    LNG(wxLANGUAGE_SPANISH_BOLIVIA,            "es_BO", LANG_SPANISH   , SUBLANG_SPANISH_BOLIVIA           , "Spanish (Bolivia)")
2492    LNG(wxLANGUAGE_SPANISH_CHILE,              "es_CL", LANG_SPANISH   , SUBLANG_SPANISH_CHILE             , "Spanish (Chile)")
2493    LNG(wxLANGUAGE_SPANISH_COLOMBIA,           "es_CO", LANG_SPANISH   , SUBLANG_SPANISH_COLOMBIA          , "Spanish (Colombia)")
2494    LNG(wxLANGUAGE_SPANISH_COSTA_RICA,         "es_CR", LANG_SPANISH   , SUBLANG_SPANISH_COSTA_RICA        , "Spanish (Costa Rica)")
2495    LNG(wxLANGUAGE_SPANISH_DOMINICAN_REPUBLIC, "es_DO", LANG_SPANISH   , SUBLANG_SPANISH_DOMINICAN_REPUBLIC, "Spanish (Dominican republic)")
2496    LNG(wxLANGUAGE_SPANISH_ECUADOR,            "es_EC", LANG_SPANISH   , SUBLANG_SPANISH_ECUADOR           , "Spanish (Ecuador)")
2497    LNG(wxLANGUAGE_SPANISH_EL_SALVADOR,        "es_SV", LANG_SPANISH   , SUBLANG_SPANISH_EL_SALVADOR       , "Spanish (El Salvador)")
2498    LNG(wxLANGUAGE_SPANISH_GUATEMALA,          "es_GT", LANG_SPANISH   , SUBLANG_SPANISH_GUATEMALA         , "Spanish (Guatemala)")
2499    LNG(wxLANGUAGE_SPANISH_HONDURAS,           "es_HN", LANG_SPANISH   , SUBLANG_SPANISH_HONDURAS          , "Spanish (Honduras)")
2500    LNG(wxLANGUAGE_SPANISH_MEXICAN,            "es_MX", LANG_SPANISH   , SUBLANG_SPANISH_MEXICAN           , "Spanish (Mexican)")
2501    LNG(wxLANGUAGE_SPANISH_MODERN,             "es_ES", LANG_SPANISH   , SUBLANG_SPANISH_MODERN            , "Spanish (Modern)")
2502    LNG(wxLANGUAGE_SPANISH_NICARAGUA,          "es_NI", LANG_SPANISH   , SUBLANG_SPANISH_NICARAGUA         , "Spanish (Nicaragua)")
2503    LNG(wxLANGUAGE_SPANISH_PANAMA,             "es_PA", LANG_SPANISH   , SUBLANG_SPANISH_PANAMA            , "Spanish (Panama)")
2504    LNG(wxLANGUAGE_SPANISH_PARAGUAY,           "es_PY", LANG_SPANISH   , SUBLANG_SPANISH_PARAGUAY          , "Spanish (Paraguay)")
2505    LNG(wxLANGUAGE_SPANISH_PERU,               "es_PE", LANG_SPANISH   , SUBLANG_SPANISH_PERU              , "Spanish (Peru)")
2506    LNG(wxLANGUAGE_SPANISH_PUERTO_RICO,        "es_PR", LANG_SPANISH   , SUBLANG_SPANISH_PUERTO_RICO       , "Spanish (Puerto Rico)")
2507    LNG(wxLANGUAGE_SPANISH_URUGUAY,            "es_UY", LANG_SPANISH   , SUBLANG_SPANISH_URUGUAY           , "Spanish (Uruguay)")
2508    LNG(wxLANGUAGE_SPANISH_US,                 "es_US", 0              , 0                                 , "Spanish (U.S.)")
2509    LNG(wxLANGUAGE_SPANISH_VENEZUELA,          "es_VE", LANG_SPANISH   , SUBLANG_SPANISH_VENEZUELA         , "Spanish (Venezuela)")
2510    LNG(wxLANGUAGE_SUNDANESE,                  "su"   , 0              , 0                                 , "Sundanese")
2511    LNG(wxLANGUAGE_SWAHILI,                    "sw_KE", LANG_SWAHILI   , SUBLANG_DEFAULT                   , "Swahili")
2512    LNG(wxLANGUAGE_SWEDISH,                    "sv_SE", LANG_SWEDISH   , SUBLANG_SWEDISH                   , "Swedish")
2513    LNG(wxLANGUAGE_SWEDISH_FINLAND,            "sv_FI", LANG_SWEDISH   , SUBLANG_SWEDISH_FINLAND           , "Swedish (Finland)")
2514    LNG(wxLANGUAGE_TAGALOG,                    "tl"   , 0              , 0                                 , "Tagalog")
2515    LNG(wxLANGUAGE_TAJIK,                      "tg"   , 0              , 0                                 , "Tajik")
2516    LNG(wxLANGUAGE_TAMIL,                      "ta"   , LANG_TAMIL     , SUBLANG_DEFAULT                   , "Tamil")
2517    LNG(wxLANGUAGE_TATAR,                      "tt"   , LANG_TATAR     , SUBLANG_DEFAULT                   , "Tatar")
2518    LNG(wxLANGUAGE_TELUGU,                     "te"   , LANG_TELUGU    , SUBLANG_DEFAULT                   , "Telugu")
2519    LNG(wxLANGUAGE_THAI,                       "th_TH", LANG_THAI      , SUBLANG_DEFAULT                   , "Thai")
2520    LNG(wxLANGUAGE_TIBETAN,                    "bo"   , 0              , 0                                 , "Tibetan")
2521    LNG(wxLANGUAGE_TIGRINYA,                   "ti"   , 0              , 0                                 , "Tigrinya")
2522    LNG(wxLANGUAGE_TONGA,                      "to"   , 0              , 0                                 , "Tonga")
2523    LNG(wxLANGUAGE_TSONGA,                     "ts"   , 0              , 0                                 , "Tsonga")
2524    LNG(wxLANGUAGE_TURKISH,                    "tr_TR", LANG_TURKISH   , SUBLANG_DEFAULT                   , "Turkish")
2525    LNG(wxLANGUAGE_TURKMEN,                    "tk"   , 0              , 0                                 , "Turkmen")
2526    LNG(wxLANGUAGE_TWI,                        "tw"   , 0              , 0                                 , "Twi")
2527    LNG(wxLANGUAGE_UIGHUR,                     "ug"   , 0              , 0                                 , "Uighur")
2528    LNG(wxLANGUAGE_UKRAINIAN,                  "uk_UA", LANG_UKRAINIAN , SUBLANG_DEFAULT                   , "Ukrainian")
2529    LNG(wxLANGUAGE_URDU,                       "ur"   , LANG_URDU      , SUBLANG_DEFAULT                   , "Urdu")
2530    LNG(wxLANGUAGE_URDU_INDIA,                 "ur_IN", LANG_URDU      , SUBLANG_URDU_INDIA                , "Urdu (India)")
2531    LNG(wxLANGUAGE_URDU_PAKISTAN,              "ur_PK", LANG_URDU      , SUBLANG_URDU_PAKISTAN             , "Urdu (Pakistan)")
2532    LNG(wxLANGUAGE_UZBEK,                      "uz"   , LANG_UZBEK     , SUBLANG_DEFAULT                   , "Uzbek")
2533    LNG(wxLANGUAGE_UZBEK_CYRILLIC,             "uz"   , LANG_UZBEK     , SUBLANG_UZBEK_CYRILLIC            , "Uzbek (Cyrillic)")
2534    LNG(wxLANGUAGE_UZBEK_LATIN,                "uz"   , LANG_UZBEK     , SUBLANG_UZBEK_LATIN               , "Uzbek (Latin)")
2535    LNG(wxLANGUAGE_VIETNAMESE,                 "vi_VN", LANG_VIETNAMESE, SUBLANG_DEFAULT                   , "Vietnamese")
2536    LNG(wxLANGUAGE_VOLAPUK,                    "vo"   , 0              , 0                                 , "Volapuk")
2537    LNG(wxLANGUAGE_WELSH,                      "cy"   , 0              , 0                                 , "Welsh")
2538    LNG(wxLANGUAGE_WOLOF,                      "wo"   , 0              , 0                                 , "Wolof")
2539    LNG(wxLANGUAGE_XHOSA,                      "xh"   , 0              , 0                                 , "Xhosa")
2540    LNG(wxLANGUAGE_YIDDISH,                    "yi"   , 0              , 0                                 , "Yiddish")
2541    LNG(wxLANGUAGE_YORUBA,                     "yo"   , 0              , 0                                 , "Yoruba")
2542    LNG(wxLANGUAGE_ZHUANG,                     "za"   , 0              , 0                                 , "Zhuang")
2543    LNG(wxLANGUAGE_ZULU,                       "zu"   , 0              , 0                                 , "Zulu")
2544
2545 };
2546 #undef LNG
2547
2548 // --- --- --- generated code ends here --- --- ---
2549
2550 #endif // wxUSE_INTL
2551