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