src/common/intl.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/common/intl.cpp
   3 // Purpose:     Internationalization and localisation for wxWidgets
   4 // Author:      Vadim Zeitlin
   5 // Modified by: Michael N. Filippov <michael@idisys.iae.nsk.su>
   6 //              (2003/09/30 - PluralForms support)
   7 // Created:     29/01/98
   8 // RCS-ID:      $Id$
   9 // Copyright:   (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
  10 // Licence:     wxWindows licence
  11 /////////////////////////////////////////////////////////////////////////////
  12
  13 // ============================================================================
  14 // declaration
  15 // ============================================================================
  16
  17 // ----------------------------------------------------------------------------
  18 // headers
  19 // ----------------------------------------------------------------------------
  20
  21 #if defined(__BORLAND__) && !defined(__WXDEBUG__)
  22     // There's a bug in Borland's compiler that breaks wxLocale with -O2,
  23     // so make sure that flag is not used for this file:
  24     #pragma option -O1
  25 #endif
  26
  27 #ifdef __EMX__
  28 // The following define is needed by Innotek's libc to
  29 // make the definition of struct localeconv available.
  30 #define __INTERNAL_DEFS
  31 #endif
  32
  33 // For compilers that support precompilation, includes "wx.h".
  34 #include "wx/wxprec.h"
  35
  36 #ifdef __BORLANDC__
  37     #pragma hdrstop
  38 #endif
  39
  40 #if wxUSE_INTL
  41
  42 #ifndef WX_PRECOMP
  43     #include "wx/dynarray.h"
  44     #include "wx/string.h"
  45     #include "wx/intl.h"
  46     #include "wx/log.h"
  47     #include "wx/utils.h"
  48     #include "wx/app.h"
  49     #include "wx/hashmap.h"
  50 #endif // WX_PRECOMP
  51
  52 #ifndef __WXWINCE__
  53     #include <locale.h>
  54 #endif
  55
  56 // standard headers
  57 #include <ctype.h>
  58 #include <stdlib.h>
  59 #ifdef HAVE_LANGINFO_H
  60     #include <langinfo.h>
  61 #endif
  62
  63 #ifdef __WIN32__
  64     #include "wx/msw/private.h"
  65 #elif defined(__UNIX_LIKE__)
  66     #include "wx/fontmap.h"         // for CharsetToEncoding()
  67 #endif
  68
  69 #include "wx/file.h"
  70 #include "wx/filename.h"
  71 #include "wx/tokenzr.h"
  72 #include "wx/module.h"
  73 #include "wx/fontmap.h"
  74 #include "wx/encconv.h"
  75 #include "wx/ptr_scpd.h"
  76 #include "wx/apptrait.h"
  77 #include "wx/stdpaths.h"
  78
  79 #if defined(__WXMAC__)
  80     #include  "wx/mac/private.h"  // includes mac headers
  81 #endif
  82
  83 // ----------------------------------------------------------------------------
  84 // simple types
  85 // ----------------------------------------------------------------------------
  86
  87 // this should *not* be wxChar, this type must have exactly 8 bits!
  88 typedef wxUint8 size_t8;
  89 typedef wxUint32 size_t32;
  90
  91 // ----------------------------------------------------------------------------
  92 // constants
  93 // ----------------------------------------------------------------------------
  94
  95 // magic number identifying the .mo format file
  96 const size_t32 MSGCATALOG_MAGIC    = 0x950412de;
  97 const size_t32 MSGCATALOG_MAGIC_SW = 0xde120495;
  98
  99 // the constants describing the format of lang_LANG locale string
 100 static const size_t LEN_LANG = 2;
 101 static const size_t LEN_SUBLANG = 2;
 102 static const size_t LEN_FULL = LEN_LANG + 1 + LEN_SUBLANG; // 1 for '_'
 103
 104 #define TRACE_I18N _T("i18n")
 105
 106 // ----------------------------------------------------------------------------
 107 // global functions
 108 // ----------------------------------------------------------------------------
 109
 110 #ifdef __WXDEBUG__
 111
 112 // small class to suppress the translation erros until exit from current scope
 113 class NoTransErr
 114 {
 115 public:
 116     NoTransErr() { ms_suppressCount++; }
 117    ~NoTransErr() { ms_suppressCount--;  }
 118
 119    static bool Suppress() { return ms_suppressCount > 0; }
 120
 121 private:
 122    static size_t ms_suppressCount;
 123 };
 124
 125 size_t NoTransErr::ms_suppressCount = 0;
 126
 127 #else // !Debug
 128
 129 class NoTransErr
 130 {
 131 public:
 132     NoTransErr() { }
 133    ~NoTransErr() { }
 134 };
 135
 136 #endif // Debug/!Debug
 137
 138 static wxLocale *wxSetLocale(wxLocale *pLocale);
 139
 140 // helper functions of GetSystemLanguage()
 141 #ifdef __UNIX__
 142
 143 // get just the language part
 144 static inline wxString ExtractLang(const wxString& langFull)
 145 {
 146     return langFull.Left(LEN_LANG);
 147 }
 148
 149 // get everything else (including the leading '_')
 150 static inline wxString ExtractNotLang(const wxString& langFull)
 151 {
 152     return langFull.Mid(LEN_LANG);
 153 }
 154
 155 #endif // __UNIX__
 156
 157
 158 // ----------------------------------------------------------------------------
 159 // Plural forms parser
 160 // ----------------------------------------------------------------------------
 161
 162 /*
 163                                 Simplified Grammar
 164
 165 Expression:
 166     LogicalOrExpression '?' Expression ':' Expression
 167     LogicalOrExpression
 168
 169 LogicalOrExpression:
 170     LogicalAndExpression "||" LogicalOrExpression   // to (a || b) || c
 171     LogicalAndExpression
 172
 173 LogicalAndExpression:
 174     EqualityExpression "&&" LogicalAndExpression    // to (a && b) && c
 175     EqualityExpression
 176
 177 EqualityExpression:
 178     RelationalExpression "==" RelationalExperession
 179     RelationalExpression "!=" RelationalExperession
 180     RelationalExpression
 181
 182 RelationalExpression:
 183     MultiplicativeExpression '>' MultiplicativeExpression
 184     MultiplicativeExpression '<' MultiplicativeExpression
 185     MultiplicativeExpression ">=" MultiplicativeExpression
 186     MultiplicativeExpression "<=" MultiplicativeExpression
 187     MultiplicativeExpression
 188
 189 MultiplicativeExpression:
 190     PmExpression '%' PmExpression
 191     PmExpression
 192
 193 PmExpression:
 194     N
 195     Number
 196     '(' Expression ')'
 197 */
 198
 199 class wxPluralFormsToken
 200 {
 201 public:
 202     enum Type
 203     {
 204         T_ERROR, T_EOF, T_NUMBER, T_N, T_PLURAL, T_NPLURALS, T_EQUAL, T_ASSIGN,
 205         T_GREATER, T_GREATER_OR_EQUAL, T_LESS, T_LESS_OR_EQUAL,
 206         T_REMINDER, T_NOT_EQUAL,
 207         T_LOGICAL_AND, T_LOGICAL_OR, T_QUESTION, T_COLON, T_SEMICOLON,
 208         T_LEFT_BRACKET, T_RIGHT_BRACKET
 209     };
 210     Type type() const { return m_type; }
 211     void setType(Type type) { m_type = type; }
 212     // for T_NUMBER only
 213     typedef int Number;
 214     Number number() const { return m_number; }
 215     void setNumber(Number num) { m_number = num; }
 216 private:
 217     Type m_type;
 218     Number m_number;
 219 };
 220
 221
 222 class wxPluralFormsScanner
 223 {
 224 public:
 225     wxPluralFormsScanner(const char* s);
 226     const wxPluralFormsToken& token() const { return m_token; }
 227     bool nextToken();  // returns false if error
 228 private:
 229     const char* m_s;
 230     wxPluralFormsToken m_token;
 231 };
 232
 233 wxPluralFormsScanner::wxPluralFormsScanner(const char* s) : m_s(s)
 234 {
 235     nextToken();
 236 }
 237
 238 bool wxPluralFormsScanner::nextToken()
 239 {
 240     wxPluralFormsToken::Type type = wxPluralFormsToken::T_ERROR;
 241     while (isspace(*m_s))
 242     {
 243         ++m_s;
 244     }
 245     if (*m_s == 0)
 246     {
 247         type = wxPluralFormsToken::T_EOF;
 248     }
 249     else if (isdigit(*m_s))
 250     {
 251         wxPluralFormsToken::Number number = *m_s++ - '0';
 252         while (isdigit(*m_s))
 253         {
 254             number = number * 10 + (*m_s++ - '0');
 255         }
 256         m_token.setNumber(number);
 257         type = wxPluralFormsToken::T_NUMBER;
 258     }
 259     else if (isalpha(*m_s))
 260     {
 261         const char* begin = m_s++;
 262         while (isalnum(*m_s))
 263         {
 264             ++m_s;
 265         }
 266         size_t size = m_s - begin;
 267         if (size == 1 && memcmp(begin, "n", size) == 0)
 268         {
 269             type = wxPluralFormsToken::T_N;
 270         }
 271         else if (size == 6 && memcmp(begin, "plural", size) == 0)
 272         {
 273             type = wxPluralFormsToken::T_PLURAL;
 274         }
 275         else if (size == 8 && memcmp(begin, "nplurals", size) == 0)
 276         {
 277             type = wxPluralFormsToken::T_NPLURALS;
 278         }
 279     }
 280     else if (*m_s == '=')
 281     {
 282         ++m_s;
 283         if (*m_s == '=')
 284         {
 285             ++m_s;
 286             type = wxPluralFormsToken::T_EQUAL;
 287         }
 288         else
 289         {
 290             type = wxPluralFormsToken::T_ASSIGN;
 291         }
 292     }
 293     else if (*m_s == '>')
 294     {
 295         ++m_s;
 296         if (*m_s == '=')
 297         {
 298             ++m_s;
 299             type = wxPluralFormsToken::T_GREATER_OR_EQUAL;
 300         }
 301         else
 302         {
 303             type = wxPluralFormsToken::T_GREATER;
 304         }
 305     }
 306     else if (*m_s == '<')
 307     {
 308         ++m_s;
 309         if (*m_s == '=')
 310         {
 311             ++m_s;
 312             type = wxPluralFormsToken::T_LESS_OR_EQUAL;
 313         }
 314         else
 315         {
 316             type = wxPluralFormsToken::T_LESS;
 317         }
 318     }
 319     else if (*m_s == '%')
 320     {
 321         ++m_s;
 322         type = wxPluralFormsToken::T_REMINDER;
 323     }
 324     else if (*m_s == '!' && m_s[1] == '=')
 325     {
 326         m_s += 2;
 327         type = wxPluralFormsToken::T_NOT_EQUAL;
 328     }
 329     else if (*m_s == '&' && m_s[1] == '&')
 330     {
 331         m_s += 2;
 332         type = wxPluralFormsToken::T_LOGICAL_AND;
 333     }
 334     else if (*m_s == '|' && m_s[1] == '|')
 335     {
 336         m_s += 2;
 337         type = wxPluralFormsToken::T_LOGICAL_OR;
 338     }
 339     else if (*m_s == '?')
 340     {
 341         ++m_s;
 342         type = wxPluralFormsToken::T_QUESTION;
 343     }
 344     else if (*m_s == ':')
 345     {
 346         ++m_s;
 347         type = wxPluralFormsToken::T_COLON;
 348     } else if (*m_s == ';') {
 349         ++m_s;
 350         type = wxPluralFormsToken::T_SEMICOLON;
 351     }
 352     else if (*m_s == '(')
 353     {
 354         ++m_s;
 355         type = wxPluralFormsToken::T_LEFT_BRACKET;
 356     }
 357     else if (*m_s == ')')
 358     {
 359         ++m_s;
 360         type = wxPluralFormsToken::T_RIGHT_BRACKET;
 361     }
 362     m_token.setType(type);
 363     return type != wxPluralFormsToken::T_ERROR;
 364 }
 365
 366 class wxPluralFormsNode;
 367
 368 // NB: Can't use wxDEFINE_SCOPED_PTR_TYPE because wxPluralFormsNode is not
 369 //     fully defined yet:
 370 class wxPluralFormsNodePtr
 371 {
 372 public:
 373     wxPluralFormsNodePtr(wxPluralFormsNode *p = NULL) : m_p(p) {}
 374     ~wxPluralFormsNodePtr();
 375     wxPluralFormsNode& operator*() const { return *m_p; }
 376     wxPluralFormsNode* operator->() const { return m_p; }
 377     wxPluralFormsNode* get() const { return m_p; }
 378     wxPluralFormsNode* release();
 379     void reset(wxPluralFormsNode *p);
 380
 381 private:
 382     wxPluralFormsNode *m_p;
 383 };
 384
 385 class wxPluralFormsNode
 386 {
 387 public:
 388     wxPluralFormsNode(const wxPluralFormsToken& token) : m_token(token) {}
 389     const wxPluralFormsToken& token() const { return m_token; }
 390     const wxPluralFormsNode* node(size_t i) const
 391         { return m_nodes[i].get(); }
 392     void setNode(size_t i, wxPluralFormsNode* n);
 393     wxPluralFormsNode* releaseNode(size_t i);
 394     wxPluralFormsToken::Number evaluate(wxPluralFormsToken::Number n) const;
 395
 396 private:
 397     wxPluralFormsToken m_token;
 398     wxPluralFormsNodePtr m_nodes[3];
 399 };
 400
 401 wxPluralFormsNodePtr::~wxPluralFormsNodePtr()
 402 {
 403     delete m_p;
 404 }
 405 wxPluralFormsNode* wxPluralFormsNodePtr::release()
 406 {
 407     wxPluralFormsNode *p = m_p;
 408     m_p = NULL;
 409     return p;
 410 }
 411 void wxPluralFormsNodePtr::reset(wxPluralFormsNode *p)
 412 {
 413     if (p != m_p)
 414     {
 415         delete m_p;
 416         m_p = p;
 417     }
 418 }
 419
 420
 421 void wxPluralFormsNode::setNode(size_t i, wxPluralFormsNode* n)
 422 {
 423     m_nodes[i].reset(n);
 424 }
 425
 426 wxPluralFormsNode*  wxPluralFormsNode::releaseNode(size_t i)
 427 {
 428     return m_nodes[i].release();
 429 }
 430
 431 wxPluralFormsToken::Number
 432 wxPluralFormsNode::evaluate(wxPluralFormsToken::Number n) const
 433 {
 434     switch (token().type())
 435     {
 436         // leaf
 437         case wxPluralFormsToken::T_NUMBER:
 438             return token().number();
 439         case wxPluralFormsToken::T_N:
 440             return n;
 441         // 2 args
 442         case wxPluralFormsToken::T_EQUAL:
 443             return node(0)->evaluate(n) == node(1)->evaluate(n);
 444         case wxPluralFormsToken::T_NOT_EQUAL:
 445             return node(0)->evaluate(n) != node(1)->evaluate(n);
 446         case wxPluralFormsToken::T_GREATER:
 447             return node(0)->evaluate(n) > node(1)->evaluate(n);
 448         case wxPluralFormsToken::T_GREATER_OR_EQUAL:
 449             return node(0)->evaluate(n) >= node(1)->evaluate(n);
 450         case wxPluralFormsToken::T_LESS:
 451             return node(0)->evaluate(n) < node(1)->evaluate(n);
 452         case wxPluralFormsToken::T_LESS_OR_EQUAL:
 453             return node(0)->evaluate(n) <= node(1)->evaluate(n);
 454         case wxPluralFormsToken::T_REMINDER:
 455             {
 456                 wxPluralFormsToken::Number number = node(1)->evaluate(n);
 457                 if (number != 0)
 458                 {
 459                     return node(0)->evaluate(n) % number;
 460                 }
 461                 else
 462                 {
 463                     return 0;
 464                 }
 465             }
 466         case wxPluralFormsToken::T_LOGICAL_AND:
 467             return node(0)->evaluate(n) && node(1)->evaluate(n);
 468         case wxPluralFormsToken::T_LOGICAL_OR:
 469             return node(0)->evaluate(n) || node(1)->evaluate(n);
 470         // 3 args
 471         case wxPluralFormsToken::T_QUESTION:
 472             return node(0)->evaluate(n)
 473                 ? node(1)->evaluate(n)
 474                 : node(2)->evaluate(n);
 475         default:
 476             return 0;
 477     }
 478 }
 479
 480
 481 class wxPluralFormsCalculator
 482 {
 483 public:
 484     wxPluralFormsCalculator() : m_nplurals(0), m_plural(0) {}
 485
 486     // input: number, returns msgstr index
 487     int evaluate(int n) const;
 488
 489     // input: text after "Plural-Forms:" (e.g. "nplurals=2; plural=(n != 1);"),
 490     // if s == 0, creates default handler
 491     // returns 0 if error
 492     static wxPluralFormsCalculator* make(const char* s = 0);
 493
 494     ~wxPluralFormsCalculator() {}
 495
 496     void  init(wxPluralFormsToken::Number nplurals, wxPluralFormsNode* plural);
 497
 498 private:
 499     wxPluralFormsToken::Number m_nplurals;
 500     wxPluralFormsNodePtr m_plural;
 501 };
 502
 503 wxDEFINE_SCOPED_PTR_TYPE(wxPluralFormsCalculator)
 504
 505 void wxPluralFormsCalculator::init(wxPluralFormsToken::Number nplurals,
 506                                    wxPluralFormsNode* plural)
 507 {
 508     m_nplurals = nplurals;
 509     m_plural.reset(plural);
 510 }
 511
 512 int wxPluralFormsCalculator::evaluate(int n) const
 513 {
 514     if (m_plural.get() == 0)
 515     {
 516         return 0;
 517     }
 518     wxPluralFormsToken::Number number = m_plural->evaluate(n);
 519     if (number < 0 || number > m_nplurals)
 520     {
 521         return 0;
 522     }
 523     return number;
 524 }
 525
 526
 527 class wxPluralFormsParser
 528 {
 529 public:
 530     wxPluralFormsParser(wxPluralFormsScanner& scanner) : m_scanner(scanner) {}
 531     bool parse(wxPluralFormsCalculator& rCalculator);
 532
 533 private:
 534     wxPluralFormsNode* parsePlural();
 535     // stops at T_SEMICOLON, returns 0 if error
 536     wxPluralFormsScanner& m_scanner;
 537     const wxPluralFormsToken& token() const;
 538     bool nextToken();
 539
 540     wxPluralFormsNode* expression();
 541     wxPluralFormsNode* logicalOrExpression();
 542     wxPluralFormsNode* logicalAndExpression();
 543     wxPluralFormsNode* equalityExpression();
 544     wxPluralFormsNode* multiplicativeExpression();
 545     wxPluralFormsNode* relationalExpression();
 546     wxPluralFormsNode* pmExpression();
 547 };
 548
 549 bool wxPluralFormsParser::parse(wxPluralFormsCalculator& rCalculator)
 550 {
 551     if (token().type() != wxPluralFormsToken::T_NPLURALS)
 552         return false;
 553     if (!nextToken())
 554         return false;
 555     if (token().type() != wxPluralFormsToken::T_ASSIGN)
 556         return false;
 557     if (!nextToken())
 558         return false;
 559     if (token().type() != wxPluralFormsToken::T_NUMBER)
 560         return false;
 561     wxPluralFormsToken::Number nplurals = token().number();
 562     if (!nextToken())
 563         return false;
 564     if (token().type() != wxPluralFormsToken::T_SEMICOLON)
 565         return false;
 566     if (!nextToken())
 567         return false;
 568     if (token().type() != wxPluralFormsToken::T_PLURAL)
 569         return false;
 570     if (!nextToken())
 571         return false;
 572     if (token().type() != wxPluralFormsToken::T_ASSIGN)
 573         return false;
 574     if (!nextToken())
 575         return false;
 576     wxPluralFormsNode* plural = parsePlural();
 577     if (plural == 0)
 578         return false;
 579     if (token().type() != wxPluralFormsToken::T_SEMICOLON)
 580         return false;
 581     if (!nextToken())
 582         return false;
 583     if (token().type() != wxPluralFormsToken::T_EOF)
 584         return false;
 585     rCalculator.init(nplurals, plural);
 586     return true;
 587 }
 588
 589 wxPluralFormsNode* wxPluralFormsParser::parsePlural()
 590 {
 591     wxPluralFormsNode* p = expression();
 592     if (p == NULL)
 593     {
 594         return NULL;
 595     }
 596     wxPluralFormsNodePtr n(p);
 597     if (token().type() != wxPluralFormsToken::T_SEMICOLON)
 598     {
 599         return NULL;
 600     }
 601     return n.release();
 602 }
 603
 604 const wxPluralFormsToken& wxPluralFormsParser::token() const
 605 {
 606     return m_scanner.token();
 607 }
 608
 609 bool wxPluralFormsParser::nextToken()
 610 {
 611     if (!m_scanner.nextToken())
 612         return false;
 613     return true;
 614 }
 615
 616 wxPluralFormsNode* wxPluralFormsParser::expression()
 617 {
 618     wxPluralFormsNode* p = logicalOrExpression();
 619     if (p == NULL)
 620         return NULL;
 621     wxPluralFormsNodePtr n(p);
 622     if (token().type() == wxPluralFormsToken::T_QUESTION)
 623     {
 624         wxPluralFormsNodePtr qn(new wxPluralFormsNode(token()));
 625         if (!nextToken())
 626         {
 627             return 0;
 628         }
 629         p = expression();
 630         if (p == 0)
 631         {
 632             return 0;
 633         }
 634         qn->setNode(1, p);
 635         if (token().type() != wxPluralFormsToken::T_COLON)
 636         {
 637             return 0;
 638         }
 639         if (!nextToken())
 640         {
 641             return 0;
 642         }
 643         p = expression();
 644         if (p == 0)
 645         {
 646             return 0;
 647         }
 648         qn->setNode(2, p);
 649         qn->setNode(0, n.release());
 650         return qn.release();
 651     }
 652     return n.release();
 653 }
 654
 655 wxPluralFormsNode*wxPluralFormsParser::logicalOrExpression()
 656 {
 657     wxPluralFormsNode* p = logicalAndExpression();
 658     if (p == NULL)
 659         return NULL;
 660     wxPluralFormsNodePtr ln(p);
 661     if (token().type() == wxPluralFormsToken::T_LOGICAL_OR)
 662     {
 663         wxPluralFormsNodePtr un(new wxPluralFormsNode(token()));
 664         if (!nextToken())
 665         {
 666             return 0;
 667         }
 668         p = logicalOrExpression();
 669         if (p == 0)
 670         {
 671             return 0;
 672         }
 673         wxPluralFormsNodePtr rn(p);    // right
 674         if (rn->token().type() == wxPluralFormsToken::T_LOGICAL_OR)
 675         {
 676             // see logicalAndExpression comment
 677             un->setNode(0, ln.release());
 678             un->setNode(1, rn->releaseNode(0));
 679             rn->setNode(0, un.release());
 680             return rn.release();
 681         }
 682
 683
 684         un->setNode(0, ln.release());
 685         un->setNode(1, rn.release());
 686         return un.release();
 687     }
 688     return ln.release();
 689 }
 690
 691 wxPluralFormsNode* wxPluralFormsParser::logicalAndExpression()
 692 {
 693     wxPluralFormsNode* p = equalityExpression();
 694     if (p == NULL)
 695         return NULL;
 696     wxPluralFormsNodePtr ln(p);   // left
 697     if (token().type() == wxPluralFormsToken::T_LOGICAL_AND)
 698     {
 699         wxPluralFormsNodePtr un(new wxPluralFormsNode(token()));  // up
 700         if (!nextToken())
 701         {
 702             return NULL;
 703         }
 704         p = logicalAndExpression();
 705         if (p == 0)
 706         {
 707             return NULL;
 708         }
 709         wxPluralFormsNodePtr rn(p);    // right
 710         if (rn->token().type() == wxPluralFormsToken::T_LOGICAL_AND)
 711         {
 712 // transform 1 && (2 && 3) -> (1 && 2) && 3
 713 //     u                  r
 714 // l       r     ->   u      3
 715 //       2   3      l   2
 716             un->setNode(0, ln.release());
 717             un->setNode(1, rn->releaseNode(0));
 718             rn->setNode(0, un.release());
 719             return rn.release();
 720         }
 721
 722         un->setNode(0, ln.release());
 723         un->setNode(1, rn.release());
 724         return un.release();
 725     }
 726     return ln.release();
 727 }
 728
 729 wxPluralFormsNode* wxPluralFormsParser::equalityExpression()
 730 {
 731     wxPluralFormsNode* p = relationalExpression();
 732     if (p == NULL)
 733         return NULL;
 734     wxPluralFormsNodePtr n(p);
 735     if (token().type() == wxPluralFormsToken::T_EQUAL
 736         || token().type() == wxPluralFormsToken::T_NOT_EQUAL)
 737     {
 738         wxPluralFormsNodePtr qn(new wxPluralFormsNode(token()));
 739         if (!nextToken())
 740         {
 741             return NULL;
 742         }
 743         p = relationalExpression();
 744         if (p == NULL)
 745         {
 746             return NULL;
 747         }
 748         qn->setNode(1, p);
 749         qn->setNode(0, n.release());
 750         return qn.release();
 751     }
 752     return n.release();
 753 }
 754
 755 wxPluralFormsNode* wxPluralFormsParser::relationalExpression()
 756 {
 757     wxPluralFormsNode* p = multiplicativeExpression();
 758     if (p == NULL)
 759         return NULL;
 760     wxPluralFormsNodePtr n(p);
 761     if (token().type() == wxPluralFormsToken::T_GREATER
 762             || token().type() == wxPluralFormsToken::T_LESS
 763             || token().type() == wxPluralFormsToken::T_GREATER_OR_EQUAL
 764             || token().type() == wxPluralFormsToken::T_LESS_OR_EQUAL)
 765     {
 766         wxPluralFormsNodePtr qn(new wxPluralFormsNode(token()));
 767         if (!nextToken())
 768         {
 769             return NULL;
 770         }
 771         p = multiplicativeExpression();
 772         if (p == NULL)
 773         {
 774             return NULL;
 775         }
 776         qn->setNode(1, p);
 777         qn->setNode(0, n.release());
 778         return qn.release();
 779     }
 780     return n.release();
 781 }
 782
 783 wxPluralFormsNode* wxPluralFormsParser::multiplicativeExpression()
 784 {
 785     wxPluralFormsNode* p = pmExpression();
 786     if (p == NULL)
 787         return NULL;
 788     wxPluralFormsNodePtr n(p);
 789     if (token().type() == wxPluralFormsToken::T_REMINDER)
 790     {
 791         wxPluralFormsNodePtr qn(new wxPluralFormsNode(token()));
 792         if (!nextToken())
 793         {
 794             return NULL;
 795         }
 796         p = pmExpression();
 797         if (p == NULL)
 798         {
 799             return NULL;
 800         }
 801         qn->setNode(1, p);
 802         qn->setNode(0, n.release());
 803         return qn.release();
 804     }
 805     return n.release();
 806 }
 807
 808 wxPluralFormsNode* wxPluralFormsParser::pmExpression()
 809 {
 810     wxPluralFormsNodePtr n;
 811     if (token().type() == wxPluralFormsToken::T_N
 812         || token().type() == wxPluralFormsToken::T_NUMBER)
 813     {
 814         n.reset(new wxPluralFormsNode(token()));
 815         if (!nextToken())
 816         {
 817             return NULL;
 818         }
 819     }
 820     else if (token().type() == wxPluralFormsToken::T_LEFT_BRACKET) {
 821         if (!nextToken())
 822         {
 823             return NULL;
 824         }
 825         wxPluralFormsNode* p = expression();
 826         if (p == NULL)
 827         {
 828             return NULL;
 829         }
 830         n.reset(p);
 831         if (token().type() != wxPluralFormsToken::T_RIGHT_BRACKET)
 832         {
 833             return NULL;
 834         }
 835         if (!nextToken())
 836         {
 837             return NULL;
 838         }
 839     }
 840     else
 841     {
 842         return NULL;
 843     }
 844     return n.release();
 845 }
 846
 847 wxPluralFormsCalculator* wxPluralFormsCalculator::make(const char* s)
 848 {
 849     wxPluralFormsCalculatorPtr calculator(new wxPluralFormsCalculator);
 850     if (s != NULL)
 851     {
 852         wxPluralFormsScanner scanner(s);
 853         wxPluralFormsParser p(scanner);
 854         if (!p.parse(*calculator))
 855         {
 856             return NULL;
 857         }
 858     }
 859     return calculator.release();
 860 }
 861
 862
 863
 864
 865 // ----------------------------------------------------------------------------
 866 // wxMsgCatalogFile corresponds to one disk-file message catalog.
 867 //
 868 // This is a "low-level" class and is used only by wxMsgCatalog
 869 // ----------------------------------------------------------------------------
 870
 871 WX_DECLARE_EXPORTED_STRING_HASH_MAP(wxString, wxMessagesHash);
 872
 873 class wxMsgCatalogFile
 874 {
 875 public:
 876     // ctor & dtor
 877     wxMsgCatalogFile();
 878    ~wxMsgCatalogFile();
 879
 880     // load the catalog from disk (szDirPrefix corresponds to language)
 881     bool Load(const wxChar *szDirPrefix, const wxChar *szName,
 882               wxPluralFormsCalculatorPtr& rPluralFormsCalculator);
 883
 884     // fills the hash with string-translation pairs
 885     void FillHash(wxMessagesHash& hash,
 886                   const wxString& msgIdCharset,
 887                   bool convertEncoding) const;
 888
 889     // return the charset of the strings in this catalog or empty string if
 890     // none/unknown
 891     wxString GetCharset() const { return m_charset; }
 892
 893 private:
 894     // this implementation is binary compatible with GNU gettext() version 0.10
 895
 896     // an entry in the string table
 897     struct wxMsgTableEntry
 898     {
 899       size_t32   nLen;           // length of the string
 900       size_t32   ofsString;      // pointer to the string
 901     };
 902
 903     // header of a .mo file
 904     struct wxMsgCatalogHeader
 905     {
 906       size_t32  magic,          // offset +00:  magic id
 907                 revision,       //        +04:  revision
 908                 numStrings;     //        +08:  number of strings in the file
 909       size_t32  ofsOrigTable,   //        +0C:  start of original string table
 910                 ofsTransTable;  //        +10:  start of translated string table
 911       size_t32  nHashSize,      //        +14:  hash table size
 912                 ofsHashTable;   //        +18:  offset of hash table start
 913     };
 914
 915     // all data is stored here, NULL if no data loaded
 916     size_t8 *m_pData;
 917
 918     // amount of memory pointed to by m_pData.
 919     size_t32 m_nSize;
 920
 921     // data description
 922     size_t32          m_numStrings;   // number of strings in this domain
 923     wxMsgTableEntry  *m_pOrigTable,   // pointer to original   strings
 924                      *m_pTransTable;  //            translated
 925
 926     wxString m_charset;               // from the message catalog header
 927
 928
 929     // swap the 2 halves of 32 bit integer if needed
 930     size_t32 Swap(size_t32 ui) const
 931     {
 932           return m_bSwapped ? (ui << 24) | ((ui & 0xff00) << 8) |
 933                               ((ui >> 8) & 0xff00) | (ui >> 24)
 934                             : ui;
 935     }
 936
 937     const char *StringAtOfs(wxMsgTableEntry *pTable, size_t32 n) const
 938     {
 939         const wxMsgTableEntry * const ent = pTable + n;
 940
 941         // this check could fail for a corrupt message catalog
 942         size_t32 ofsString = Swap(ent->ofsString);
 943         if ( ofsString + Swap(ent->nLen) > m_nSize)
 944         {
 945             return NULL;
 946         }
 947
 948         return (const char *)(m_pData + ofsString);
 949     }
 950
 951     bool m_bSwapped;   // wrong endianness?
 952
 953     DECLARE_NO_COPY_CLASS(wxMsgCatalogFile)
 954 };
 955
 956
 957 // ----------------------------------------------------------------------------
 958 // wxMsgCatalog corresponds to one loaded message catalog.
 959 //
 960 // This is a "low-level" class and is used only by wxLocale (that's why
 961 // it's designed to be stored in a linked list)
 962 // ----------------------------------------------------------------------------
 963
 964 class wxMsgCatalog
 965 {
 966 public:
 967     wxMsgCatalog() { m_conv = NULL; }
 968     ~wxMsgCatalog();
 969
 970     // load the catalog from disk (szDirPrefix corresponds to language)
 971     bool Load(const wxChar *szDirPrefix, const wxChar *szName,
 972               const wxChar *msgIdCharset = NULL, bool bConvertEncoding = false);
 973
 974     // get name of the catalog
 975     wxString GetName() const { return m_name; }
 976
 977     // get the translated string: returns NULL if not found
 978     const wxChar *GetString(const wxChar *sz, size_t n = size_t(-1)) const;
 979
 980     // public variable pointing to the next element in a linked list (or NULL)
 981     wxMsgCatalog *m_pNext;
 982
 983 private:
 984     wxMessagesHash  m_messages; // all messages in the catalog
 985     wxString        m_name;     // name of the domain
 986
 987     // the conversion corresponding to this catalog charset if we installed it
 988     // as the global one
 989     wxCSConv *m_conv;
 990
 991     wxPluralFormsCalculatorPtr  m_pluralFormsCalculator;
 992 };
 993
 994 // ----------------------------------------------------------------------------
 995 // global variables
 996 // ----------------------------------------------------------------------------
 997
 998 // the list of the directories to search for message catalog files
 999 static wxArrayString gs_searchPrefixes;
1000
1001 // ============================================================================
1002 // implementation
1003 // ============================================================================
1004
1005 // ----------------------------------------------------------------------------
1006 // wxMsgCatalogFile class
1007 // ----------------------------------------------------------------------------
1008
1009 wxMsgCatalogFile::wxMsgCatalogFile()
1010 {
1011     m_pData = NULL;
1012     m_nSize = 0;
1013 }
1014
1015 wxMsgCatalogFile::~wxMsgCatalogFile()
1016 {
1017     delete [] m_pData;
1018 }
1019
1020 // return the directory to search for message catalogs under the given prefix
1021 static
1022 wxString GetMsgCatalogSubdir(const wxChar *prefix, const wxChar *lang)
1023 {
1024     wxString searchPath;
1025     searchPath << prefix << wxFILE_SEP_PATH << lang;
1026
1027     // under Unix, the message catalogs are supposed to go into LC_MESSAGES
1028     // subdirectory so look there too
1029 #ifdef __UNIX__
1030     const wxString searchPathOrig(searchPath);
1031     searchPath << wxFILE_SEP_PATH << wxT("LC_MESSAGES")
1032                << wxPATH_SEP << searchPathOrig;
1033 #endif // __UNIX__
1034
1035     return searchPath;
1036 }
1037
1038 // construct the search path for the given language
1039 static wxString GetFullSearchPath(const wxChar *lang)
1040 {
1041     // first take the entries explicitly added by the program
1042     wxArrayString paths;
1043     paths.reserve(gs_searchPrefixes.size() + 1);
1044     size_t n,
1045            count = gs_searchPrefixes.size();
1046     for ( n = 0; n < count; n++ )
1047     {
1048         paths.Add(GetMsgCatalogSubdir(gs_searchPrefixes[n], lang));
1049     }
1050
1051
1052 #if wxUSE_STDPATHS
1053     // then look in the standard location
1054     const wxString stdp = wxStandardPaths::Get().
1055         GetLocalizedResourcesDir(lang, wxStandardPaths::ResourceCat_Messages);
1056
1057     if ( paths.Index(stdp) == wxNOT_FOUND )
1058         paths.Add(stdp);
1059 #endif // wxUSE_STDPATHS
1060
1061     // last look in default locations
1062 #ifdef __UNIX__
1063     // LC_PATH is a standard env var containing the search path for the .mo
1064     // files
1065     const wxChar *pszLcPath = wxGetenv(wxT("LC_PATH"));
1066     if ( pszLcPath )
1067     {
1068         const wxString lcp = GetMsgCatalogSubdir(pszLcPath, lang);
1069         if ( paths.Index(lcp) == wxNOT_FOUND )
1070             paths.Add(lcp);
1071     }
1072
1073     // also add the one from where wxWin was installed:
1074     wxString wxp = wxGetInstallPrefix();
1075     if ( !wxp.empty() )
1076     {
1077         wxp = GetMsgCatalogSubdir(wxp + _T("/share/locale"), lang);
1078         if ( paths.Index(wxp) == wxNOT_FOUND )
1079             paths.Add(wxp);
1080     }
1081 #endif // __UNIX__
1082
1083
1084     // finally construct the full search path
1085     wxString searchPath;
1086     searchPath.reserve(500);
1087     count = paths.size();
1088     for ( n = 0; n < count; n++ )
1089     {
1090         searchPath += paths[n];
1091         if ( n != count - 1 )
1092             searchPath += wxPATH_SEP;
1093     }
1094
1095     return searchPath;
1096 }
1097
1098 // open disk file and read in it's contents
1099 bool wxMsgCatalogFile::Load(const wxChar *szDirPrefix, const wxChar *szName,
1100                             wxPluralFormsCalculatorPtr& rPluralFormsCalculator)
1101 {
1102   wxString searchPath;
1103
1104 #if wxUSE_FONTMAP
1105   // first look for the catalog for this language and the current locale:
1106   // notice that we don't use the system name for the locale as this would
1107   // force us to install catalogs in different locations depending on the
1108   // system but always use the canonical name
1109   wxFontEncoding encSys = wxLocale::GetSystemEncoding();
1110   if ( encSys != wxFONTENCODING_SYSTEM )
1111   {
1112     wxString fullname(szDirPrefix);
1113     fullname << _T('.') << wxFontMapperBase::GetEncodingName(encSys);
1114     searchPath << GetFullSearchPath(fullname) << wxPATH_SEP;
1115   }
1116 #endif // wxUSE_FONTMAP
1117
1118
1119   searchPath += GetFullSearchPath(szDirPrefix);
1120   const wxChar *sublocale = wxStrchr(szDirPrefix, wxT('_'));
1121   if ( sublocale )
1122   {
1123       // also add just base locale name: for things like "fr_BE" (belgium
1124       // french) we should use "fr" if no belgium specific message catalogs
1125       // exist
1126       searchPath << wxPATH_SEP
1127                  << GetFullSearchPath(wxString(szDirPrefix).
1128                                       Left((size_t)(sublocale - szDirPrefix)));
1129   }
1130
1131   // don't give translation errors here because the wxstd catalog might
1132   // not yet be loaded (and it's normal)
1133   //
1134   // (we're using an object because we have several return paths)
1135
1136   NoTransErr noTransErr;
1137   wxLogVerbose(_("looking for catalog '%s' in path '%s'."),
1138                szName, searchPath.c_str());
1139   wxLogTrace(TRACE_I18N, _T("Looking for \"%s.mo\" in \"%s\""),
1140              szName, searchPath.c_str());
1141
1142   wxFileName fn(szName);
1143   fn.SetExt(_T("mo"));
1144   wxString strFullName;
1145   if ( !wxFindFileInPath(&strFullName, searchPath, fn.GetFullPath()) ) {
1146     wxLogVerbose(_("catalog file for domain '%s' not found."), szName);
1147     wxLogTrace(TRACE_I18N, _T("Catalog \"%s.mo\" not found"), szName);
1148     return false;
1149   }
1150
1151   // open file
1152   wxLogVerbose(_("using catalog '%s' from '%s'."), szName, strFullName.c_str());
1153   wxLogTrace(TRACE_I18N, _T("Using catalog \"%s\"."), strFullName.c_str());
1154
1155   wxFile fileMsg(strFullName);
1156   if ( !fileMsg.IsOpened() )
1157     return false;
1158
1159   // get the file size (assume it is less than 4Gb...)
1160   wxFileOffset lenFile = fileMsg.Length();
1161   if ( lenFile == wxInvalidOffset )
1162     return false;
1163
1164   size_t nSize = wx_truncate_cast(size_t, lenFile);
1165   wxASSERT_MSG( nSize == lenFile + size_t(0), _T("message catalog bigger than 4GB?") );
1166
1167   // read the whole file in memory
1168   m_pData = new size_t8[nSize];
1169   if ( fileMsg.Read(m_pData, nSize) != lenFile ) {
1170     wxDELETEA(m_pData);
1171     return false;
1172   }
1173
1174   // examine header
1175   bool bValid = nSize + (size_t)0 > sizeof(wxMsgCatalogHeader);
1176
1177   wxMsgCatalogHeader *pHeader = (wxMsgCatalogHeader *)m_pData;
1178   if ( bValid ) {
1179     // we'll have to swap all the integers if it's true
1180     m_bSwapped = pHeader->magic == MSGCATALOG_MAGIC_SW;
1181
1182     // check the magic number
1183     bValid = m_bSwapped || pHeader->magic == MSGCATALOG_MAGIC;
1184   }
1185
1186   if ( !bValid ) {
1187     // it's either too short or has incorrect magic number
1188     wxLogWarning(_("'%s' is not a valid message catalog."), strFullName.c_str());
1189
1190     wxDELETEA(m_pData);
1191     return false;
1192   }
1193
1194   // initialize
1195   m_numStrings  = Swap(pHeader->numStrings);
1196   m_pOrigTable  = (wxMsgTableEntry *)(m_pData +
1197                    Swap(pHeader->ofsOrigTable));
1198   m_pTransTable = (wxMsgTableEntry *)(m_pData +
1199                    Swap(pHeader->ofsTransTable));
1200   m_nSize = (size_t32)nSize;
1201
1202   // now parse catalog's header and try to extract catalog charset and
1203   // plural forms formula from it:
1204
1205   const char* headerData = StringAtOfs(m_pOrigTable, 0);
1206   if (headerData && headerData[0] == 0)
1207   {
1208       // Extract the charset:
1209       wxString header = wxString::FromAscii(StringAtOfs(m_pTransTable, 0));
1210       int begin = header.Find(wxT("Content-Type: text/plain; charset="));
1211       if (begin != wxNOT_FOUND)
1212       {
1213           begin += 34; //strlen("Content-Type: text/plain; charset=")
1214           size_t end = header.find('\n', begin);
1215           if (end != size_t(-1))
1216           {
1217               m_charset.assign(header, begin, end - begin);
1218               if (m_charset == wxT("CHARSET"))
1219               {
1220                   // "CHARSET" is not valid charset, but lazy translator
1221                   m_charset.Clear();
1222               }
1223           }
1224       }
1225       // else: incorrectly filled Content-Type header
1226
1227       // Extract plural forms:
1228       begin = header.Find(wxT("Plural-Forms:"));
1229       if (begin != wxNOT_FOUND)
1230       {
1231           begin += 13;
1232           size_t end = header.find('\n', begin);
1233           if (end != size_t(-1))
1234           {
1235               wxString pfs(header, begin, end - begin);
1236               wxPluralFormsCalculator* pCalculator = wxPluralFormsCalculator
1237                   ::make(pfs.ToAscii());
1238               if (pCalculator != 0)
1239               {
1240                   rPluralFormsCalculator.reset(pCalculator);
1241               }
1242               else
1243               {
1244                    wxLogVerbose(_("Cannot parse Plural-Forms:'%s'"), pfs.c_str());
1245               }
1246           }
1247       }
1248       if (rPluralFormsCalculator.get() == NULL)
1249       {
1250           rPluralFormsCalculator.reset(wxPluralFormsCalculator::make());
1251       }
1252   }
1253
1254   // everything is fine
1255   return true;
1256 }
1257
1258 void wxMsgCatalogFile::FillHash(wxMessagesHash& hash,
1259                                 const wxString& msgIdCharset,
1260                                 bool convertEncoding) const
1261 {
1262 #if wxUSE_UNICODE
1263     // this parameter doesn't make sense, we always must convert encoding in
1264     // Unicode build
1265     convertEncoding = true;
1266 #elif wxUSE_FONTMAP
1267     if ( convertEncoding )
1268     {
1269         // determine if we need any conversion at all
1270         wxFontEncoding encCat = wxFontMapperBase::GetEncodingFromName(m_charset);
1271         if ( encCat == wxLocale::GetSystemEncoding() )
1272         {
1273             // no need to convert
1274             convertEncoding = false;
1275         }
1276     }
1277 #endif // wxUSE_UNICODE/wxUSE_FONTMAP
1278
1279 #if wxUSE_WCHAR_T
1280     // conversion to use to convert catalog strings to the GUI encoding
1281     wxMBConv *inputConv,
1282              *inputConvPtr = NULL; // same as inputConv but safely deleteable
1283     if ( convertEncoding && !m_charset.empty() )
1284     {
1285         inputConvPtr =
1286         inputConv = new wxCSConv(m_charset);
1287     }
1288     else // no need or not possible to convert the encoding
1289     {
1290 #if wxUSE_UNICODE
1291         // we must somehow convert the narrow strings in the message catalog to
1292         // wide strings, so use the default conversion if we have no charset
1293         inputConv = wxConvCurrent;
1294 #else // !wxUSE_UNICODE
1295         inputConv = NULL;
1296 #endif // wxUSE_UNICODE/!wxUSE_UNICODE
1297     }
1298
1299     // conversion to apply to msgid strings before looking them up: we only
1300     // need it if the msgids are neither in 7 bit ASCII nor in the same
1301     // encoding as the catalog
1302     wxCSConv *sourceConv = msgIdCharset.empty() || (msgIdCharset == m_charset)
1303                             ? NULL
1304                             : new wxCSConv(msgIdCharset);
1305
1306 #elif wxUSE_FONTMAP
1307     wxASSERT_MSG( msgIdCharset == NULL,
1308                   _T("non-ASCII msgid languages only supported if wxUSE_WCHAR_T=1") );
1309
1310     wxEncodingConverter converter;
1311     if ( convertEncoding )
1312     {
1313         wxFontEncoding targetEnc = wxFONTENCODING_SYSTEM;
1314         wxFontEncoding enc = wxFontMapperBase::Get()->CharsetToEncoding(m_charset, false);
1315         if ( enc == wxFONTENCODING_SYSTEM )
1316         {
1317             convertEncoding = false; // unknown encoding
1318         }
1319         else
1320         {
1321             targetEnc = wxLocale::GetSystemEncoding();
1322             if (targetEnc == wxFONTENCODING_SYSTEM)
1323             {
1324                 wxFontEncodingArray a = wxEncodingConverter::GetPlatformEquivalents(enc);
1325                 if (a[0] == enc)
1326                     // no conversion needed, locale uses native encoding
1327                     convertEncoding = false;
1328                 if (a.GetCount() == 0)
1329                     // we don't know common equiv. under this platform
1330                     convertEncoding = false;
1331                 targetEnc = a[0];
1332             }
1333         }
1334
1335         if ( convertEncoding )
1336         {
1337             converter.Init(enc, targetEnc);
1338         }
1339     }
1340 #endif // wxUSE_WCHAR_T/!wxUSE_WCHAR_T
1341     (void)convertEncoding; // get rid of warnings about unused parameter
1342
1343     for (size_t32 i = 0; i < m_numStrings; i++)
1344     {
1345         const char *data = StringAtOfs(m_pOrigTable, i);
1346
1347         wxString msgid;
1348 #if wxUSE_UNICODE
1349         msgid = wxString(data, *inputConv);
1350 #else // ASCII
1351         #if wxUSE_WCHAR_T
1352             if ( inputConv && sourceConv )
1353                 msgid = wxString(inputConv->cMB2WC(data), *sourceConv);
1354             else
1355         #endif
1356                 msgid = data;
1357 #endif // wxUSE_UNICODE
1358
1359         data = StringAtOfs(m_pTransTable, i);
1360         size_t length = Swap(m_pTransTable[i].nLen);
1361         size_t offset = 0;
1362         size_t index = 0;
1363         while (offset < length)
1364         {
1365             const char * const str = data + offset;
1366
1367             wxString msgstr;
1368 #if wxUSE_UNICODE
1369             msgstr = wxString(str, *inputConv);
1370 #elif wxUSE_WCHAR_T
1371             if ( inputConv )
1372                 msgstr = wxString(inputConv->cMB2WC(str), *wxConvUI);
1373             else
1374                 msgstr = str;
1375 #else // !wxUSE_WCHAR_T
1376         #if wxUSE_FONTMAP
1377             if ( convertEncoding )
1378                 msgstr = wxString(converter.Convert(str));
1379             else
1380         #endif
1381                 msgstr = str;
1382 #endif // wxUSE_WCHAR_T/!wxUSE_WCHAR_T
1383
1384             if ( !msgstr.empty() )
1385             {
1386                 hash[index == 0 ? msgid : msgid + wxChar(index)] = msgstr;
1387             }
1388
1389             // skip this string
1390             offset += strlen(str) + 1;
1391             ++index;
1392         }
1393     }
1394
1395 #if wxUSE_WCHAR_T
1396     delete sourceConv;
1397     delete inputConvPtr;
1398 #endif // wxUSE_WCHAR_T
1399 }
1400
1401
1402 // ----------------------------------------------------------------------------
1403 // wxMsgCatalog class
1404 // ----------------------------------------------------------------------------
1405
1406 wxMsgCatalog::~wxMsgCatalog()
1407 {
1408     if ( m_conv )
1409     {
1410         if ( wxConvUI == m_conv )
1411         {
1412             // we only change wxConvUI if it points to wxConvLocal so we reset
1413             // it back to it too
1414             wxConvUI = &wxConvLocal;
1415         }
1416
1417         delete m_conv;
1418     }
1419 }
1420
1421 bool wxMsgCatalog::Load(const wxChar *szDirPrefix, const wxChar *szName,
1422                         const wxChar *msgIdCharset, bool bConvertEncoding)
1423 {
1424     wxMsgCatalogFile file;
1425
1426     m_name = szName;
1427
1428     if ( !file.Load(szDirPrefix, szName, m_pluralFormsCalculator) )
1429         return false;
1430
1431     file.FillHash(m_messages, msgIdCharset, bConvertEncoding);
1432
1433     // we should use a conversion compatible with the message catalog encoding
1434     // in the GUI if we don't convert the strings to the current conversion but
1435     // as the encoding is global, only change it once, otherwise we could get
1436     // into trouble if we use several message catalogs with different encodings
1437     //
1438     // this is, of course, a hack but it at least allows the program to use
1439     // message catalogs in any encodings without asking the user to change his
1440     // locale
1441     if ( !bConvertEncoding &&
1442             !file.GetCharset().empty() &&
1443                 wxConvUI == &wxConvLocal )
1444     {
1445         wxConvUI =
1446         m_conv = new wxCSConv(file.GetCharset());
1447     }
1448
1449     return true;
1450 }
1451
1452 const wxChar *wxMsgCatalog::GetString(const wxChar *sz, size_t n) const
1453 {
1454     int index = 0;
1455     if (n != size_t(-1))
1456     {
1457         index = m_pluralFormsCalculator->evaluate(n);
1458     }
1459     wxMessagesHash::const_iterator i;
1460     if (index != 0)
1461     {
1462         i = m_messages.find(wxString(sz) + wxChar(index));   // plural
1463     }
1464     else
1465     {
1466         i = m_messages.find(sz);
1467     }
1468
1469     if ( i != m_messages.end() )
1470     {
1471         return i->second.c_str();
1472     }
1473     else
1474         return NULL;
1475 }
1476
1477 // ----------------------------------------------------------------------------
1478 // wxLocale
1479 // ----------------------------------------------------------------------------
1480
1481 #include "wx/arrimpl.cpp"
1482 WX_DECLARE_EXPORTED_OBJARRAY(wxLanguageInfo, wxLanguageInfoArray);
1483 WX_DEFINE_OBJARRAY(wxLanguageInfoArray)
1484
1485 wxLanguageInfoArray *wxLocale::ms_languagesDB = NULL;
1486
1487 /*static*/ void wxLocale::CreateLanguagesDB()
1488 {
1489     if (ms_languagesDB == NULL)
1490     {
1491         ms_languagesDB = new wxLanguageInfoArray;
1492         InitLanguagesDB();
1493     }
1494 }
1495
1496 /*static*/ void wxLocale::DestroyLanguagesDB()
1497 {
1498     delete ms_languagesDB;
1499     ms_languagesDB = NULL;
1500 }
1501
1502
1503 void wxLocale::DoCommonInit()
1504 {
1505   m_pszOldLocale = NULL;
1506
1507   m_pOldLocale = wxSetLocale(this);
1508
1509   m_pMsgCat = NULL;
1510   m_language = wxLANGUAGE_UNKNOWN;
1511   m_initialized = false;
1512 }
1513
1514 // NB: this function has (desired) side effect of changing current locale
1515 bool wxLocale::Init(const wxChar *szName,
1516                     const wxChar *szShort,
1517                     const wxChar *szLocale,
1518                     bool        bLoadDefault,
1519                     bool        bConvertEncoding)
1520 {
1521   wxASSERT_MSG( !m_initialized,
1522                 _T("you can't call wxLocale::Init more than once") );
1523
1524   m_initialized = true;
1525   m_strLocale = szName;
1526   m_strShort = szShort;
1527   m_bConvertEncoding = bConvertEncoding;
1528   m_language = wxLANGUAGE_UNKNOWN;
1529
1530   // change current locale (default: same as long name)
1531   if ( szLocale == NULL )
1532   {
1533     // the argument to setlocale()
1534     szLocale = szShort;
1535
1536     wxCHECK_MSG( szLocale, false, _T("no locale to set in wxLocale::Init()") );
1537   }
1538
1539 #ifdef __WXWINCE__
1540   // FIXME: I'm guessing here
1541   wxChar localeName[256];
1542   int ret = GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SLANGUAGE, localeName,
1543       256);
1544   if (ret != 0)
1545   {
1546     m_pszOldLocale = wxStrdup(localeName);
1547   }
1548   else
1549     m_pszOldLocale = NULL;
1550
1551   // TODO: how to find languageId
1552   // SetLocaleInfo(languageId, SORT_DEFAULT, localeName);
1553 #else
1554   wxMB2WXbuf oldLocale = wxSetlocale(LC_ALL, szLocale);
1555   if ( oldLocale )
1556       m_pszOldLocale = wxStrdup(oldLocale);
1557   else
1558       m_pszOldLocale = NULL;
1559 #endif
1560
1561   if ( m_pszOldLocale == NULL )
1562     wxLogError(_("locale '%s' can not be set."), szLocale);
1563
1564   // the short name will be used to look for catalog files as well,
1565   // so we need something here
1566   if ( m_strShort.empty() ) {
1567     // FIXME I don't know how these 2 letter abbreviations are formed,
1568     //       this wild guess is surely wrong
1569     if ( szLocale && szLocale[0] )
1570     {
1571         m_strShort += (wxChar)wxTolower(szLocale[0]);
1572         if ( szLocale[1] )
1573             m_strShort += (wxChar)wxTolower(szLocale[1]);
1574     }
1575   }
1576
1577   // load the default catalog with wxWidgets standard messages
1578   m_pMsgCat = NULL;
1579   bool bOk = true;
1580   if ( bLoadDefault )
1581   {
1582     bOk = AddCatalog(wxT("wxstd"));
1583
1584     // there may be a catalog with toolkit specific overrides, it is not
1585     // an error if this does not exist
1586     if ( bOk )
1587     {
1588       wxString port(wxPlatformInfo().GetPortIdName());
1589       if ( !port.empty() )
1590       {
1591         AddCatalog(port.BeforeFirst(wxT('/')).MakeLower());
1592       }
1593     }
1594   }
1595
1596   return bOk;
1597 }
1598
1599
1600 #if defined(__UNIX__) && wxUSE_UNICODE && !defined(__WXMAC__)
1601 static wxWCharBuffer wxSetlocaleTryUTF(int c, const wxChar *lc)
1602 {
1603     wxMB2WXbuf l = wxSetlocale(c, lc);
1604     if ( !l && lc && lc[0] != 0 )
1605     {
1606         wxString buf(lc);
1607         wxString buf2;
1608         buf2 = buf + wxT(".UTF-8");
1609         l = wxSetlocale(c, buf2.c_str());
1610         if ( !l )
1611         {
1612             buf2 = buf + wxT(".utf-8");
1613             l = wxSetlocale(c, buf2.c_str());
1614         }
1615         if ( !l )
1616         {
1617             buf2 = buf + wxT(".UTF8");
1618             l = wxSetlocale(c, buf2.c_str());
1619         }
1620         if ( !l )
1621         {
1622             buf2 = buf + wxT(".utf8");
1623             l = wxSetlocale(c, buf2.c_str());
1624         }
1625     }
1626     return l;
1627 }
1628 #else
1629 #define wxSetlocaleTryUTF(c, lc)  wxSetlocale(c, lc)
1630 #endif
1631
1632 bool wxLocale::Init(int language, int flags)
1633 {
1634     int lang = language;
1635     if (lang == wxLANGUAGE_DEFAULT)
1636     {
1637         // auto detect the language
1638         lang = GetSystemLanguage();
1639     }
1640
1641     // We failed to detect system language, so we will use English:
1642     if (lang == wxLANGUAGE_UNKNOWN)
1643     {
1644        return false;
1645     }
1646
1647     const wxLanguageInfo *info = GetLanguageInfo(lang);
1648
1649     // Unknown language:
1650     if (info == NULL)
1651     {
1652         wxLogError(wxT("Unknown language %i."), lang);
1653         return false;
1654     }
1655
1656     wxString name = info->Description;
1657     wxString canonical = info->CanonicalName;
1658     wxString locale;
1659
1660     // Set the locale:
1661 #if defined(__OS2__)
1662     wxMB2WXbuf retloc = wxSetlocale(LC_ALL , wxEmptyString);
1663 #elif defined(__UNIX__) && !defined(__WXMAC__)
1664     if (language != wxLANGUAGE_DEFAULT)
1665         locale = info->CanonicalName;
1666
1667     wxMB2WXbuf retloc = wxSetlocaleTryUTF(LC_ALL, locale);
1668
1669     const wxString langOnly = locale.Left(2);
1670     if ( !retloc )
1671     {
1672         // Some C libraries don't like xx_YY form and require xx only
1673         retloc = wxSetlocaleTryUTF(LC_ALL, langOnly);
1674     }
1675
1676 #if wxUSE_FONTMAP
1677     // some systems (e.g. FreeBSD and HP-UX) don't have xx_YY aliases but
1678     // require the full xx_YY.encoding form, so try using UTF-8 because this is
1679     // the only thing we can do generically
1680     //
1681     // TODO: add encodings applicable to each language to the lang DB and try
1682     //       them all in turn here
1683     if ( !retloc )
1684     {
1685         const wxChar **names =
1686             wxFontMapperBase::GetAllEncodingNames(wxFONTENCODING_UTF8);
1687         while ( *names )
1688         {
1689             retloc = wxSetlocale(LC_ALL, locale + _T('.') + *names++);
1690             if ( retloc )
1691                 break;
1692         }
1693     }
1694 #endif // wxUSE_FONTMAP
1695
1696     if ( !retloc )
1697     {
1698         // Some C libraries (namely glibc) still use old ISO 639,
1699         // so will translate the abbrev for them
1700         wxString localeAlt;
1701         if ( langOnly == wxT("he") )
1702             localeAlt = wxT("iw") + locale.Mid(3);
1703         else if ( langOnly == wxT("id") )
1704             localeAlt = wxT("in") + locale.Mid(3);
1705         else if ( langOnly == wxT("yi") )
1706             localeAlt = wxT("ji") + locale.Mid(3);
1707         else if ( langOnly == wxT("nb") )
1708             localeAlt = wxT("no_NO");
1709         else if ( langOnly == wxT("nn") )
1710             localeAlt = wxT("no_NY");
1711
1712         if ( !localeAlt.empty() )
1713         {
1714             retloc = wxSetlocaleTryUTF(LC_ALL, localeAlt);
1715             if ( !retloc )
1716                 retloc = wxSetlocaleTryUTF(LC_ALL, locale.Left(2));
1717         }
1718     }
1719
1720     if ( !retloc )
1721     {
1722         wxLogError(wxT("Cannot set locale to '%s'."), locale.c_str());
1723         return false;
1724     }
1725
1726 #ifdef __AIX__
1727     // at least in AIX 5.2 libc is buggy and the string returned from setlocale(LC_ALL)
1728     // can't be passed back to it because it returns 6 strings (one for each locale
1729     // category), i.e. for C locale we get back "C C C C C C"
1730     //
1731     // this contradicts IBM own docs but this is not of much help, so just work around
1732     // it in the crudest possible manner
1733     wxChar *p = wxStrchr((wxChar *)retloc, _T(' '));
1734     if ( p )
1735         *p = _T('\0');
1736 #endif // __AIX__
1737
1738 #elif defined(__WIN32__)
1739
1740     #if wxUSE_UNICODE && (defined(__VISUALC__) || defined(__MINGW32__))
1741         // NB: setlocale() from msvcrt.dll (used by VC++ and Mingw)
1742         //     can't set locale to language that can only be written using
1743         //     Unicode.  Therefore wxSetlocale call failed, but we don't want
1744         //     to report it as an error -- so that at least message catalogs
1745         //     can be used. Watch for code marked with
1746         //     #ifdef SETLOCALE_FAILS_ON_UNICODE_LANGS bellow.
1747         #define SETLOCALE_FAILS_ON_UNICODE_LANGS
1748     #endif
1749
1750 #if !wxUSE_UNICODE
1751     const
1752 #endif
1753     wxMB2WXbuf retloc = wxT("C");
1754     if (language != wxLANGUAGE_DEFAULT)
1755     {
1756         if (info->WinLang == 0)
1757         {
1758             wxLogWarning(wxT("Locale '%s' not supported by OS."), name.c_str());
1759             // retloc already set to "C"
1760         }
1761         else
1762         {
1763             int codepage
1764                          #ifdef SETLOCALE_FAILS_ON_UNICODE_LANGS
1765                          = -1
1766                          #endif
1767                          ;
1768             wxUint32 lcid = MAKELCID(MAKELANGID(info->WinLang, info->WinSublang),
1769                                      SORT_DEFAULT);
1770             // FIXME
1771 #ifndef __WXWINCE__
1772             SetThreadLocale(lcid);
1773 #endif
1774             // NB: we must translate LCID to CRT's setlocale string ourselves,
1775             //     because SetThreadLocale does not modify change the
1776             //     interpretation of setlocale(LC_ALL, "") call:
1777             wxChar buffer[256];
1778             buffer[0] = wxT('\0');
1779             GetLocaleInfo(lcid, LOCALE_SENGLANGUAGE, buffer, 256);
1780             locale << buffer;
1781             if (GetLocaleInfo(lcid, LOCALE_SENGCOUNTRY, buffer, 256) > 0)
1782                 locale << wxT("_") << buffer;
1783             if (GetLocaleInfo(lcid, LOCALE_IDEFAULTANSICODEPAGE, buffer, 256) > 0)
1784             {
1785                 codepage = wxAtoi(buffer);
1786                 if (codepage != 0)
1787                     locale << wxT(".") << buffer;
1788             }
1789             if (locale.empty())
1790             {
1791                 wxLogLastError(wxT("SetThreadLocale"));
1792                 wxLogError(wxT("Cannot set locale to language %s."), name.c_str());
1793                 return false;
1794             }
1795             else
1796             {
1797             // FIXME
1798 #ifndef __WXWINCE__
1799                 retloc = wxSetlocale(LC_ALL, locale);
1800 #endif
1801 #ifdef SETLOCALE_FAILS_ON_UNICODE_LANGS
1802                 if (codepage == 0 && (const wxChar*)retloc == NULL)
1803                 {
1804                     retloc = wxT("C");
1805                 }
1806 #endif
1807             }
1808         }
1809     }
1810     else
1811     {
1812             // FIXME
1813 #ifndef __WXWINCE__
1814         retloc = wxSetlocale(LC_ALL, wxEmptyString);
1815 #else
1816         retloc = NULL;
1817 #endif
1818 #ifdef SETLOCALE_FAILS_ON_UNICODE_LANGS
1819         if ((const wxChar*)retloc == NULL)
1820         {
1821             wxChar buffer[16];
1822             if (GetLocaleInfo(LOCALE_USER_DEFAULT,
1823                               LOCALE_IDEFAULTANSICODEPAGE, buffer, 16) > 0 &&
1824                  wxStrcmp(buffer, wxT("0")) == 0)
1825             {
1826                 retloc = wxT("C");
1827             }
1828         }
1829 #endif
1830     }
1831
1832     if ( !retloc )
1833     {
1834         wxLogError(wxT("Cannot set locale to language %s."), name.c_str());
1835         return false;
1836     }
1837 #elif defined(__WXMAC__)
1838     if (lang == wxLANGUAGE_DEFAULT)
1839         locale = wxEmptyString;
1840     else
1841         locale = info->CanonicalName;
1842
1843     wxMB2WXbuf retloc = wxSetlocale(LC_ALL, locale);
1844
1845     if ( !retloc )
1846     {
1847         // Some C libraries don't like xx_YY form and require xx only
1848         retloc = wxSetlocale(LC_ALL, locale.Mid(0,2));
1849     }
1850     if ( !retloc )
1851     {
1852         wxLogError(wxT("Cannot set locale to '%s'."), locale.c_str());
1853         return false;
1854     }
1855 #else
1856     wxUnusedVar(flags);
1857     return false;
1858     #define WX_NO_LOCALE_SUPPORT
1859 #endif
1860
1861 #ifndef WX_NO_LOCALE_SUPPORT
1862     wxChar *szLocale = retloc ? wxStrdup(retloc) : NULL;
1863     bool ret = Init(name, canonical, szLocale,
1864                     (flags & wxLOCALE_LOAD_DEFAULT) != 0,
1865                     (flags & wxLOCALE_CONV_ENCODING) != 0);
1866     free(szLocale);
1867
1868     if (IsOk()) // setlocale() succeeded
1869         m_language = lang;
1870
1871     return ret;
1872 #endif // !WX_NO_LOCALE_SUPPORT
1873 }
1874
1875
1876
1877 void wxLocale::AddCatalogLookupPathPrefix(const wxString& prefix)
1878 {
1879     if ( gs_searchPrefixes.Index(prefix) == wxNOT_FOUND )
1880     {
1881         gs_searchPrefixes.Add(prefix);
1882     }
1883     //else: already have it
1884 }
1885
1886 /*static*/ int wxLocale::GetSystemLanguage()
1887 {
1888     CreateLanguagesDB();
1889
1890     // init i to avoid compiler warning
1891     size_t i = 0,
1892            count = ms_languagesDB->GetCount();
1893
1894 #if defined(__UNIX__) && !defined(__WXMAC__)
1895     // first get the string identifying the language from the environment
1896     wxString langFull;
1897     if (!wxGetEnv(wxT("LC_ALL"), &langFull) &&
1898         !wxGetEnv(wxT("LC_MESSAGES"), &langFull) &&
1899         !wxGetEnv(wxT("LANG"), &langFull))
1900     {
1901         // no language specified, threat it as English
1902         return wxLANGUAGE_ENGLISH;
1903     }
1904
1905     if ( langFull == _T("C") || langFull == _T("POSIX") )
1906     {
1907         // default C locale
1908         return wxLANGUAGE_ENGLISH;
1909     }
1910
1911     // the language string has the following form
1912     //
1913     //      lang[_LANG][.encoding][@modifier]
1914     //
1915     // (see environ(5) in the Open Unix specification)
1916     //
1917     // where lang is the primary language, LANG is a sublang/territory,
1918     // encoding is the charset to use and modifier "allows the user to select
1919     // a specific instance of localization data within a single category"
1920     //
1921     // for example, the following strings are valid:
1922     //      fr
1923     //      fr_FR
1924     //      de_DE.iso88591
1925     //      de_DE@euro
1926     //      de_DE.iso88591@euro
1927
1928     // for now we don't use the encoding, although we probably should (doing
1929     // translations of the msg catalogs on the fly as required) (TODO)
1930     //
1931     // we don't use the modifiers neither but we probably should translate
1932     // "euro" into iso885915
1933     size_t posEndLang = langFull.find_first_of(_T("@."));
1934     if ( posEndLang != wxString::npos )
1935     {
1936         langFull.Truncate(posEndLang);
1937     }
1938
1939     // in addition to the format above, we also can have full language names
1940     // in LANG env var - for example, SuSE is known to use LANG="german" - so
1941     // check for this
1942
1943     // do we have just the language (or sublang too)?
1944     bool justLang = langFull.length() == LEN_LANG;
1945     if ( justLang ||
1946          (langFull.length() == LEN_FULL && langFull[LEN_LANG] == wxT('_')) )
1947     {
1948         // 0. Make sure the lang is according to latest ISO 639
1949         //    (this is necessary because glibc uses iw and in instead
1950         //    of he and id respectively).
1951
1952         // the language itself (second part is the dialect/sublang)
1953         wxString langOrig = ExtractLang(langFull);
1954
1955         wxString lang;
1956         if ( langOrig == wxT("iw"))
1957             lang = _T("he");
1958         else if (langOrig == wxT("in"))
1959             lang = wxT("id");
1960         else if (langOrig == wxT("ji"))
1961             lang = wxT("yi");
1962         else if (langOrig == wxT("no_NO"))
1963             lang = wxT("nb_NO");
1964         else if (langOrig == wxT("no_NY"))
1965             lang = wxT("nn_NO");
1966         else if (langOrig == wxT("no"))
1967             lang = wxT("nb_NO");
1968         else
1969             lang = langOrig;
1970
1971         // did we change it?
1972         if ( lang != langOrig )
1973         {
1974             langFull = lang + ExtractNotLang(langFull);
1975         }
1976
1977         // 1. Try to find the language either as is:
1978         for ( i = 0; i < count; i++ )
1979         {
1980             if ( ms_languagesDB->Item(i).CanonicalName == langFull )
1981             {
1982                 break;
1983             }
1984         }
1985
1986         // 2. If langFull is of the form xx_YY, try to find xx:
1987         if ( i == count && !justLang )
1988         {
1989             for ( i = 0; i < count; i++ )
1990             {
1991                 if ( ms_languagesDB->Item(i).CanonicalName == lang )
1992                 {
1993                     break;
1994                 }
1995             }
1996         }
1997
1998         // 3. If langFull is of the form xx, try to find any xx_YY record:
1999         if ( i == count && justLang )
2000         {
2001             for ( i = 0; i < count; i++ )
2002             {
2003                 if ( ExtractLang(ms_languagesDB->Item(i).CanonicalName)
2004                         == langFull )
2005                 {
2006                     break;
2007                 }
2008             }
2009         }
2010     }
2011     else // not standard format
2012     {
2013         // try to find the name in verbose description
2014         for ( i = 0; i < count; i++ )
2015         {
2016             if (ms_languagesDB->Item(i).Description.CmpNoCase(langFull) == 0)
2017             {
2018                 break;
2019             }
2020         }
2021     }
2022 #elif defined(__WXMAC__)
2023     const wxChar * lc = NULL ;
2024     long lang = GetScriptVariable( smSystemScript, smScriptLang) ;
2025     switch( GetScriptManagerVariable( smRegionCode ) ) {
2026       case verUS :
2027         lc = wxT("en_US") ;
2028         break ;
2029       case verFrance :
2030         lc = wxT("fr_FR") ;
2031         break ;
2032       case verBritain :
2033         lc = wxT("en_GB") ;
2034         break ;
2035       case verGermany :
2036         lc = wxT("de_DE") ;
2037         break ;
2038       case verItaly :
2039         lc = wxT("it_IT") ;
2040         break ;
2041       case verNetherlands :
2042         lc = wxT("nl_NL") ;
2043         break ;
2044       case verFlemish :
2045         lc = wxT("nl_BE") ;
2046         break ;
2047       case verSweden :
2048         lc = wxT("sv_SE" );
2049         break ;
2050       case verSpain :
2051         lc = wxT("es_ES" );
2052         break ;
2053       case verDenmark :
2054         lc = wxT("da_DK") ;
2055         break ;
2056       case verPortugal :
2057         lc = wxT("pt_PT") ;
2058         break ;
2059       case verFrCanada:
2060         lc = wxT("fr_CA") ;
2061         break ;
2062       case verNorway:
2063         lc = wxT("nb_NO") ;
2064         break ;
2065       case verIsrael:
2066         lc = wxT("iw_IL") ;
2067         break ;
2068       case verJapan:
2069         lc = wxT("ja_JP") ;
2070         break ;
2071       case verAustralia:
2072         lc = wxT("en_AU") ;
2073         break ;
2074       case verArabic:
2075         lc = wxT("ar") ;
2076         break ;
2077       case verFinland:
2078         lc = wxT("fi_FI") ;
2079         break ;
2080       case verFrSwiss:
2081         lc = wxT("fr_CH") ;
2082         break ;
2083       case verGrSwiss:
2084         lc = wxT("de_CH") ;
2085         break ;
2086       case verGreece:
2087         lc = wxT("el_GR") ;
2088         break ;
2089       case verIceland:
2090         lc = wxT("is_IS") ;
2091         break ;
2092       case verMalta:
2093         lc = wxT("mt_MT") ;
2094         break ;
2095       case verCyprus:
2096       // _CY is not part of wx, so we have to translate according to the system language
2097         if ( lang == langGreek ) {
2098           lc = wxT("el_GR") ;
2099         }
2100         else if ( lang == langTurkish ) {
2101           lc = wxT("tr_TR") ;
2102         }
2103         break ;
2104       case verTurkey:
2105         lc = wxT("tr_TR") ;
2106         break ;
2107       case verYugoCroatian:
2108         lc = wxT("hr_HR") ;
2109         break ;
2110       case verIndiaHindi:
2111         lc = wxT("hi_IN") ;
2112         break ;
2113       case verPakistanUrdu:
2114         lc = wxT("ur_PK") ;
2115         break ;
2116       case verTurkishModified:
2117         lc = wxT("tr_TR") ;
2118         break ;
2119       case verItalianSwiss:
2120         lc = wxT("it_CH") ;
2121         break ;
2122       case verInternational:
2123         lc = wxT("en") ;
2124         break ;
2125       case verRomania:
2126         lc = wxT("ro_RO") ;
2127         break ;
2128       case verGreecePoly:
2129         lc = wxT("el_GR") ;
2130         break ;
2131       case verLithuania:
2132         lc = wxT("lt_LT") ;
2133         break ;
2134       case verPoland:
2135         lc = wxT("pl_PL") ;
2136         break ;
2137       case verMagyar :
2138       case verHungary:
2139         lc = wxT("hu_HU") ;
2140         break ;
2141       case verEstonia:
2142         lc = wxT("et_EE") ;
2143         break ;
2144       case verLatvia:
2145         lc = wxT("lv_LV") ;
2146         break ;
2147       case verSami:
2148         // not known
2149         break ;
2150       case verFaroeIsl:
2151         lc = wxT("fo_FO") ;
2152         break ;
2153       case verIran:
2154         lc = wxT("fa_IR") ;
2155         break ;
2156       case verRussia:
2157         lc = wxT("ru_RU") ;
2158         break ;
2159        case verIreland:
2160         lc = wxT("ga_IE") ;
2161         break ;
2162       case verKorea:
2163         lc = wxT("ko_KR") ;
2164         break ;
2165       case verChina:
2166         lc = wxT("zh_CN") ;
2167         break ;
2168       case verTaiwan:
2169         lc = wxT("zh_TW") ;
2170         break ;
2171       case verThailand:
2172         lc = wxT("th_TH") ;
2173         break ;
2174       case verCzech:
2175         lc = wxT("cs_CZ") ;
2176         break ;
2177       case verSlovak:
2178         lc = wxT("sk_SK") ;
2179         break ;
2180       case verBengali:
2181         lc = wxT("bn") ;
2182         break ;
2183       case verByeloRussian:
2184         lc = wxT("be_BY") ;
2185         break ;
2186       case verUkraine:
2187         lc = wxT("uk_UA") ;
2188         break ;
2189       case verGreeceAlt:
2190         lc = wxT("el_GR") ;
2191         break ;
2192       case verSerbian:
2193         lc = wxT("sr_YU") ;
2194         break ;
2195       case verSlovenian:
2196         lc = wxT("sl_SI") ;
2197         break ;
2198       case verMacedonian:
2199         lc = wxT("mk_MK") ;
2200         break ;
2201       case verCroatia:
2202         lc = wxT("hr_HR") ;
2203         break ;
2204       case verBrazil:
2205         lc = wxT("pt_BR ") ;
2206         break ;
2207       case verBulgaria:
2208         lc = wxT("bg_BG") ;
2209         break ;
2210       case verCatalonia:
2211         lc = wxT("ca_ES") ;
2212         break ;
2213       case verScottishGaelic:
2214         lc = wxT("gd") ;
2215         break ;
2216       case verManxGaelic:
2217         lc = wxT("gv") ;
2218         break ;
2219       case verBreton:
2220         lc = wxT("br") ;
2221         break ;
2222       case verNunavut:
2223         lc = wxT("iu_CA") ;
2224         break ;
2225       case verWelsh:
2226         lc = wxT("cy") ;
2227         break ;
2228       case verIrishGaelicScript:
2229         lc = wxT("ga_IE") ;
2230         break ;
2231       case verEngCanada:
2232         lc = wxT("en_CA") ;
2233         break ;
2234       case verBhutan:
2235         lc = wxT("dz_BT") ;
2236         break ;
2237       case verArmenian:
2238         lc = wxT("hy_AM") ;
2239         break ;
2240       case verGeorgian:
2241         lc = wxT("ka_GE") ;
2242         break ;
2243       case verSpLatinAmerica:
2244         lc = wxT("es_AR") ;
2245         break ;
2246       case verTonga:
2247         lc = wxT("to_TO" );
2248         break ;
2249       case verFrenchUniversal:
2250         lc = wxT("fr_FR") ;
2251         break ;
2252       case verAustria:
2253         lc = wxT("de_AT") ;
2254         break ;
2255       case verGujarati:
2256         lc = wxT("gu_IN") ;
2257         break ;
2258       case verPunjabi:
2259         lc = wxT("pa") ;
2260         break ;
2261       case verIndiaUrdu:
2262         lc = wxT("ur_IN") ;
2263         break ;
2264       case verVietnam:
2265         lc = wxT("vi_VN") ;
2266         break ;
2267       case verFrBelgium:
2268         lc = wxT("fr_BE") ;
2269         break ;
2270       case verUzbek:
2271         lc = wxT("uz_UZ") ;
2272         break ;
2273       case verSingapore:
2274         lc = wxT("zh_SG") ;
2275         break ;
2276       case verNynorsk:
2277         lc = wxT("nn_NO") ;
2278         break ;
2279       case verAfrikaans:
2280         lc = wxT("af_ZA") ;
2281         break ;
2282       case verEsperanto:
2283         lc = wxT("eo") ;
2284         break ;
2285       case verMarathi:
2286         lc = wxT("mr_IN") ;
2287         break ;
2288       case verTibetan:
2289         lc = wxT("bo") ;
2290         break ;
2291       case verNepal:
2292         lc = wxT("ne_NP") ;
2293         break ;
2294       case verGreenland:
2295         lc = wxT("kl_GL") ;
2296         break ;
2297       default :
2298         break ;
2299    }
2300   for ( i = 0; i < count; i++ )
2301   {
2302       if ( ms_languagesDB->Item(i).CanonicalName == lc )
2303       {
2304           break;
2305       }
2306   }
2307
2308 #elif defined(__WIN32__)
2309     LCID lcid = GetUserDefaultLCID();
2310     if ( lcid != 0 )
2311     {
2312         wxUint32 lang = PRIMARYLANGID(LANGIDFROMLCID(lcid));
2313         wxUint32 sublang = SUBLANGID(LANGIDFROMLCID(lcid));
2314
2315         for ( i = 0; i < count; i++ )
2316         {
2317             if (ms_languagesDB->Item(i).WinLang == lang &&
2318                 ms_languagesDB->Item(i).WinSublang == sublang)
2319             {
2320                 break;
2321             }
2322         }
2323     }
2324     //else: leave wxlang == wxLANGUAGE_UNKNOWN
2325 #endif // Unix/Win32
2326
2327     if ( i < count )
2328     {
2329         // we did find a matching entry, use it
2330         return ms_languagesDB->Item(i).Language;
2331     }
2332
2333     // no info about this language in the database
2334     return wxLANGUAGE_UNKNOWN;
2335 }
2336
2337 // ----------------------------------------------------------------------------
2338 // encoding stuff
2339 // ----------------------------------------------------------------------------
2340
2341 // this is a bit strange as under Windows we get the encoding name using its
2342 // numeric value and under Unix we do it the other way round, but this just
2343 // reflects the way different systems provide the encoding info
2344
2345 /* static */
2346 wxString wxLocale::GetSystemEncodingName()
2347 {
2348     wxString encname;
2349
2350 #if defined(__WIN32__) && !defined(__WXMICROWIN__)
2351     // FIXME: what is the error return value for GetACP()?
2352     UINT codepage = ::GetACP();
2353     encname.Printf(_T("windows-%u"), codepage);
2354 #elif defined(__WXMAC__)
2355     // default is just empty string, this resolves to the default system
2356     // encoding later
2357 #elif defined(__UNIX_LIKE__)
2358
2359 #if defined(HAVE_LANGINFO_H) && defined(CODESET)
2360     // GNU libc provides current character set this way (this conforms
2361     // to Unix98)
2362     char *oldLocale = strdup(setlocale(LC_CTYPE, NULL));
2363     setlocale(LC_CTYPE, "");
2364     const char *alang = nl_langinfo(CODESET);
2365     setlocale(LC_CTYPE, oldLocale);
2366     free(oldLocale);
2367
2368     if ( alang )
2369     {
2370         encname = wxString::FromAscii( alang );
2371     }
2372     else // nl_langinfo() failed
2373 #endif // HAVE_LANGINFO_H
2374     {
2375         // if we can't get at the character set directly, try to see if it's in
2376         // the environment variables (in most cases this won't work, but I was
2377         // out of ideas)
2378         char *lang = getenv( "LC_ALL");
2379         char *dot = lang ? strchr(lang, '.') : (char *)NULL;
2380         if (!dot)
2381         {
2382             lang = getenv( "LC_CTYPE" );
2383             if ( lang )
2384                 dot = strchr(lang, '.' );
2385         }
2386         if (!dot)
2387         {
2388             lang = getenv( "LANG");
2389             if ( lang )
2390                 dot = strchr(lang, '.');
2391         }
2392
2393         if ( dot )
2394         {
2395             encname = wxString::FromAscii( dot+1 );
2396         }
2397     }
2398 #endif // Win32/Unix
2399
2400     return encname;
2401 }
2402
2403 /* static */
2404 wxFontEncoding wxLocale::GetSystemEncoding()
2405 {
2406 #if defined(__WIN32__) && !defined(__WXMICROWIN__)
2407     UINT codepage = ::GetACP();
2408
2409     // wxWidgets only knows about CP1250-1257, 874, 932, 936, 949, 950
2410     if ( codepage >= 1250 && codepage <= 1257 )
2411     {
2412         return (wxFontEncoding)(wxFONTENCODING_CP1250 + codepage - 1250);
2413     }
2414
2415     if ( codepage == 874 )
2416     {
2417         return wxFONTENCODING_CP874;
2418     }
2419
2420     if ( codepage == 932 )
2421     {
2422         return wxFONTENCODING_CP932;
2423     }
2424
2425     if ( codepage == 936 )
2426     {
2427         return wxFONTENCODING_CP936;
2428     }
2429
2430     if ( codepage == 949 )
2431     {
2432         return wxFONTENCODING_CP949;
2433     }
2434
2435     if ( codepage == 950 )
2436     {
2437         return wxFONTENCODING_CP950;
2438     }
2439 #elif defined(__WXMAC__)
2440     TextEncoding encoding = 0 ;
2441 #if TARGET_CARBON
2442     encoding = CFStringGetSystemEncoding() ;
2443 #else
2444     UpgradeScriptInfoToTextEncoding ( smSystemScript , kTextLanguageDontCare , kTextRegionDontCare , NULL , &encoding ) ;
2445 #endif
2446     return wxMacGetFontEncFromSystemEnc( encoding ) ;
2447 #elif defined(__UNIX_LIKE__) && wxUSE_FONTMAP
2448     const wxString encname = GetSystemEncodingName();
2449     if ( !encname.empty() )
2450     {
2451         wxFontEncoding enc = wxFontMapperBase::GetEncodingFromName(encname);
2452
2453         // on some modern Linux systems (RedHat 8) the default system locale
2454         // is UTF8 -- but it isn't supported by wxGTK in ANSI build at all so
2455         // don't even try to use it in this case
2456 #if !wxUSE_UNICODE && (defined(__WXGTK__) || defined(__WXMOTIF__))
2457         if ( enc == wxFONTENCODING_UTF8 )
2458         {
2459             // the most similar supported encoding...
2460             enc = wxFONTENCODING_ISO8859_1;
2461         }
2462 #endif // !wxUSE_UNICODE
2463
2464         // GetEncodingFromName() returns wxFONTENCODING_DEFAULT for C locale
2465         // (a.k.a. US-ASCII) which is arguably a bug but keep it like this for
2466         // backwards compatibility and just take care to not return
2467         // wxFONTENCODING_DEFAULT from here as this surely doesn't make sense
2468         if ( enc != wxFONTENCODING_MAX && enc != wxFONTENCODING_DEFAULT )
2469         {
2470             return enc;
2471         }
2472         //else: return wxFONTENCODING_SYSTEM below
2473     }
2474 #endif // Win32/Unix
2475
2476     return wxFONTENCODING_SYSTEM;
2477 }
2478
2479 /* static */
2480 void wxLocale::AddLanguage(const wxLanguageInfo& info)
2481 {
2482     CreateLanguagesDB();
2483     ms_languagesDB->Add(info);
2484 }
2485
2486 /* static */
2487 const wxLanguageInfo *wxLocale::GetLanguageInfo(int lang)
2488 {
2489     CreateLanguagesDB();
2490
2491     // calling GetLanguageInfo(wxLANGUAGE_DEFAULT) is a natural thing to do, so
2492     // make it work
2493     if ( lang == wxLANGUAGE_DEFAULT )
2494         lang = GetSystemLanguage();
2495
2496     const size_t count = ms_languagesDB->GetCount();
2497     for ( size_t i = 0; i < count; i++ )
2498     {
2499         if ( ms_languagesDB->Item(i).Language == lang )
2500         {
2501             return &ms_languagesDB->Item(i);
2502         }
2503     }
2504
2505     return NULL;
2506 }
2507
2508 /* static */
2509 wxString wxLocale::GetLanguageName(int lang)
2510 {
2511     const wxLanguageInfo *info = GetLanguageInfo(lang);
2512     if ( !info )
2513         return wxEmptyString;
2514     else
2515         return info->Description;
2516 }
2517
2518 /* static */
2519 const wxLanguageInfo *wxLocale::FindLanguageInfo(const wxString& locale)
2520 {
2521     CreateLanguagesDB();
2522
2523     const wxLanguageInfo *infoRet = NULL;
2524
2525     const size_t count = ms_languagesDB->GetCount();
2526     for ( size_t i = 0; i < count; i++ )
2527     {
2528         const wxLanguageInfo *info = &ms_languagesDB->Item(i);
2529
2530         if ( wxStricmp(locale, info->CanonicalName) == 0 ||
2531                 wxStricmp(locale, info->Description) == 0 )
2532         {
2533             // exact match, stop searching
2534             infoRet = info;
2535             break;
2536         }
2537
2538         if ( wxStricmp(locale, info->CanonicalName.BeforeFirst(_T('_'))) == 0 )
2539         {
2540             // a match -- but maybe we'll find an exact one later, so continue
2541             // looking
2542             //
2543             // OTOH, maybe we had already found a language match and in this
2544             // case don't overwrite it becauce the entry for the default
2545             // country always appears first in ms_languagesDB
2546             if ( !infoRet )
2547                 infoRet = info;
2548         }
2549     }
2550
2551     return infoRet;
2552 }
2553
2554 wxString wxLocale::GetSysName() const
2555 {
2556             // FIXME
2557 #ifndef __WXWINCE__
2558     return wxSetlocale(LC_ALL, NULL);
2559 #else
2560     return wxEmptyString;
2561 #endif
2562 }
2563
2564 // clean up
2565 wxLocale::~wxLocale()
2566 {
2567     // free memory
2568     wxMsgCatalog *pTmpCat;
2569     while ( m_pMsgCat != NULL ) {
2570         pTmpCat = m_pMsgCat;
2571         m_pMsgCat = m_pMsgCat->m_pNext;
2572         delete pTmpCat;
2573     }
2574
2575     // restore old locale pointer
2576     wxSetLocale(m_pOldLocale);
2577
2578     // FIXME
2579 #ifndef __WXWINCE__
2580     wxSetlocale(LC_ALL, m_pszOldLocale);
2581 #endif
2582     free((wxChar *)m_pszOldLocale);     // const_cast
2583 }
2584
2585 // get the translation of given string in current locale
2586 const wxChar *wxLocale::GetString(const wxChar *szOrigString,
2587                                   const wxChar *szDomain) const
2588 {
2589     return GetString(szOrigString, szOrigString, size_t(-1), szDomain);
2590 }
2591
2592 const wxChar *wxLocale::GetString(const wxChar *szOrigString,
2593                                   const wxChar *szOrigString2,
2594                                   size_t n,
2595                                   const wxChar *szDomain) const
2596 {
2597     if ( wxIsEmpty(szOrigString) )
2598         return wxEmptyString;
2599
2600     const wxChar *pszTrans = NULL;
2601     wxMsgCatalog *pMsgCat;
2602
2603     if ( szDomain != NULL )
2604     {
2605         pMsgCat = FindCatalog(szDomain);
2606
2607         // does the catalog exist?
2608         if ( pMsgCat != NULL )
2609             pszTrans = pMsgCat->GetString(szOrigString, n);
2610     }
2611     else
2612     {
2613         // search in all domains
2614         for ( pMsgCat = m_pMsgCat; pMsgCat != NULL; pMsgCat = pMsgCat->m_pNext )
2615         {
2616             pszTrans = pMsgCat->GetString(szOrigString, n);
2617             if ( pszTrans != NULL )   // take the first found
2618                 break;
2619         }
2620     }
2621
2622     if ( pszTrans == NULL )
2623     {
2624 #ifdef __WXDEBUG__
2625         if ( !NoTransErr::Suppress() )
2626         {
2627             NoTransErr noTransErr;
2628
2629             wxLogTrace(TRACE_I18N,
2630                        _T("string \"%s\"[%ld] not found in %slocale '%s'."),
2631                        szOrigString, (long)n,
2632                        szDomain ? wxString::Format(_T("domain '%s' "), szDomain).c_str()
2633                                 : _T(""),
2634                        m_strLocale.c_str());
2635         }
2636 #endif // __WXDEBUG__
2637
2638         if (n == size_t(-1))
2639             return szOrigString;
2640         else
2641             return n == 1 ? szOrigString : szOrigString2;
2642     }
2643
2644     return pszTrans;
2645 }
2646
2647 wxString wxLocale::GetHeaderValue( const wxChar* szHeader,
2648                                    const wxChar* szDomain ) const
2649 {
2650     if ( wxIsEmpty(szHeader) )
2651         return wxEmptyString;
2652
2653     wxChar const * pszTrans = NULL;
2654     wxMsgCatalog *pMsgCat;
2655
2656     if ( szDomain != NULL )
2657     {
2658         pMsgCat = FindCatalog(szDomain);
2659
2660         // does the catalog exist?
2661         if ( pMsgCat == NULL )
2662             return wxEmptyString;
2663
2664         pszTrans = pMsgCat->GetString(wxEmptyString, (size_t)-1);
2665     }
2666     else
2667     {
2668         // search in all domains
2669         for ( pMsgCat = m_pMsgCat; pMsgCat != NULL; pMsgCat = pMsgCat->m_pNext )
2670         {
2671             pszTrans = pMsgCat->GetString(wxEmptyString, (size_t)-1);
2672             if ( pszTrans != NULL )   // take the first found
2673                 break;
2674         }
2675     }
2676
2677     if ( wxIsEmpty(pszTrans) )
2678       return wxEmptyString;
2679
2680     wxChar const * pszFound = wxStrstr(pszTrans, szHeader);
2681     if ( pszFound == NULL )
2682       return wxEmptyString;
2683
2684     pszFound += wxStrlen(szHeader) + 2 /* ': ' */;
2685
2686     // Every header is separated by \n
2687
2688     wxChar const * pszEndLine = wxStrchr(pszFound, wxT('\n'));
2689     if ( pszEndLine == NULL ) pszEndLine = pszFound + wxStrlen(pszFound);
2690
2691
2692     // wxString( wxChar*, length);
2693     wxString retVal( pszFound, pszEndLine - pszFound );
2694
2695     return retVal;
2696 }
2697
2698
2699 // find catalog by name in a linked list, return NULL if !found
2700 wxMsgCatalog *wxLocale::FindCatalog(const wxChar *szDomain) const
2701 {
2702     // linear search in the linked list
2703     wxMsgCatalog *pMsgCat;
2704     for ( pMsgCat = m_pMsgCat; pMsgCat != NULL; pMsgCat = pMsgCat->m_pNext )
2705     {
2706         if ( wxStricmp(pMsgCat->GetName(), szDomain) == 0 )
2707           return pMsgCat;
2708     }
2709
2710     return NULL;
2711 }
2712
2713 // check if the given catalog is loaded
2714 bool wxLocale::IsLoaded(const wxChar *szDomain) const
2715 {
2716   return FindCatalog(szDomain) != NULL;
2717 }
2718
2719 // add a catalog to our linked list
2720 bool wxLocale::AddCatalog(const wxChar *szDomain)
2721 {
2722     return AddCatalog(szDomain, wxLANGUAGE_ENGLISH, NULL);
2723 }
2724
2725 // add a catalog to our linked list
2726 bool wxLocale::AddCatalog(const wxChar *szDomain,
2727                           wxLanguage    msgIdLanguage,
2728                           const wxChar *msgIdCharset)
2729
2730 {
2731   wxMsgCatalog *pMsgCat = new wxMsgCatalog;
2732
2733   if ( pMsgCat->Load(m_strShort, szDomain, msgIdCharset, m_bConvertEncoding) ) {
2734     // add it to the head of the list so that in GetString it will
2735     // be searched before the catalogs added earlier
2736     pMsgCat->m_pNext = m_pMsgCat;
2737     m_pMsgCat = pMsgCat;
2738
2739     return true;
2740   }
2741   else {
2742     // don't add it because it couldn't be loaded anyway
2743     delete pMsgCat;
2744
2745     // It is OK to not load catalog if the msgid language and m_language match,
2746     // in which case we can directly display the texts embedded in program's
2747     // source code:
2748     if (m_language == msgIdLanguage)
2749         return true;
2750
2751     // If there's no exact match, we may still get partial match where the
2752     // (basic) language is same, but the country differs. For example, it's
2753     // permitted to use en_US strings from sources even if m_language is en_GB:
2754     const wxLanguageInfo *msgIdLangInfo = GetLanguageInfo(msgIdLanguage);
2755     if ( msgIdLangInfo &&
2756          msgIdLangInfo->CanonicalName.Mid(0, 2) == m_strShort.Mid(0, 2) )
2757     {
2758         return true;
2759     }
2760
2761     return false;
2762   }
2763 }
2764
2765 // ----------------------------------------------------------------------------
2766 // accessors for locale-dependent data
2767 // ----------------------------------------------------------------------------
2768
2769 #ifdef __WXMSW__
2770
2771 /* static */
2772 wxString wxLocale::GetInfo(wxLocaleInfo index, wxLocaleCategory WXUNUSED(cat))
2773 {
2774     wxString str;
2775     wxChar buffer[256];
2776     size_t count;
2777     buffer[0] = wxT('\0');
2778     switch (index)
2779     {
2780         case wxLOCALE_DECIMAL_POINT:
2781             count = ::GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SDECIMAL, buffer, 256);
2782             if (!count)
2783                 str << wxT(".");
2784             else
2785                 str << buffer;
2786             break;
2787 #if 0
2788         case wxSYS_LIST_SEPARATOR:
2789             count = ::GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SLIST, buffer, 256);
2790             if (!count)
2791                 str << wxT(",");
2792             else
2793                 str << buffer;
2794             break;
2795         case wxSYS_LEADING_ZERO: // 0 means no leading zero, 1 means leading zero
2796             count = ::GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_ILZERO, buffer, 256);
2797             if (!count)
2798                 str << wxT("0");
2799             else
2800                 str << buffer;
2801             break;
2802 #endif
2803         default:
2804             wxFAIL_MSG(wxT("Unknown System String !"));
2805     }
2806     return str;
2807 }
2808
2809 #else // !__WXMSW__
2810
2811 /* static */
2812 wxString wxLocale::GetInfo(wxLocaleInfo index, wxLocaleCategory cat)
2813 {
2814     struct lconv *locale_info = localeconv();
2815     switch (cat)
2816     {
2817         case wxLOCALE_CAT_NUMBER:
2818             switch (index)
2819             {
2820                 case wxLOCALE_THOUSANDS_SEP:
2821                     return wxString(locale_info->thousands_sep,
2822                                     *wxConvCurrent);
2823                 case wxLOCALE_DECIMAL_POINT:
2824                     return wxString(locale_info->decimal_point,
2825                                     *wxConvCurrent);
2826                 default:
2827                     return wxEmptyString;
2828             }
2829         case wxLOCALE_CAT_MONEY:
2830             switch (index)
2831             {
2832                 case wxLOCALE_THOUSANDS_SEP:
2833                     return wxString(locale_info->mon_thousands_sep,
2834                                     *wxConvCurrent);
2835                 case wxLOCALE_DECIMAL_POINT:
2836                     return wxString(locale_info->mon_decimal_point,
2837                                     *wxConvCurrent);
2838                 default:
2839                     return wxEmptyString;
2840             }
2841         default:
2842             return wxEmptyString;
2843     }
2844 }
2845
2846 #endif // __WXMSW__/!__WXMSW__
2847
2848 // ----------------------------------------------------------------------------
2849 // global functions and variables
2850 // ----------------------------------------------------------------------------
2851
2852 // retrieve/change current locale
2853 // ------------------------------
2854
2855 // the current locale object
2856 static wxLocale *g_pLocale = NULL;
2857
2858 wxLocale *wxGetLocale()
2859 {
2860   return g_pLocale;
2861 }
2862
2863 wxLocale *wxSetLocale(wxLocale *pLocale)
2864 {
2865   wxLocale *pOld = g_pLocale;
2866   g_pLocale = pLocale;
2867   return pOld;
2868 }
2869
2870
2871
2872 // ----------------------------------------------------------------------------
2873 // wxLocale module (for lazy destruction of languagesDB)
2874 // ----------------------------------------------------------------------------
2875
2876 class wxLocaleModule: public wxModule
2877 {
2878     DECLARE_DYNAMIC_CLASS(wxLocaleModule)
2879     public:
2880         wxLocaleModule() {}
2881         bool OnInit() { return true; }
2882         void OnExit() { wxLocale::DestroyLanguagesDB(); }
2883 };
2884
2885 IMPLEMENT_DYNAMIC_CLASS(wxLocaleModule, wxModule)
2886
2887
2888
2889 // ----------------------------------------------------------------------------
2890 // default languages table & initialization
2891 // ----------------------------------------------------------------------------
2892
2893
2894
2895 // --- --- --- generated code begins here --- --- ---
2896
2897 // This table is generated by misc/languages/genlang.py
2898 // When making changes, please put them into misc/languages/langtabl.txt
2899
2900 #if !defined(__WIN32__) || defined(__WXMICROWIN__)
2901
2902 #define SETWINLANG(info,lang,sublang)
2903
2904 #else
2905
2906 #define SETWINLANG(info,lang,sublang) \
2907     info.WinLang = lang, info.WinSublang = sublang;
2908
2909 #ifndef LANG_AFRIKAANS
2910 #define LANG_AFRIKAANS (0)
2911 #endif
2912 #ifndef LANG_ALBANIAN
2913 #define LANG_ALBANIAN (0)
2914 #endif
2915 #ifndef LANG_ARABIC
2916 #define LANG_ARABIC (0)
2917 #endif
2918 #ifndef LANG_ARMENIAN
2919 #define LANG_ARMENIAN (0)
2920 #endif
2921 #ifndef LANG_ASSAMESE
2922 #define LANG_ASSAMESE (0)
2923 #endif
2924 #ifndef LANG_AZERI
2925 #define LANG_AZERI (0)
2926 #endif
2927 #ifndef LANG_BASQUE
2928 #define LANG_BASQUE (0)
2929 #endif
2930 #ifndef LANG_BELARUSIAN
2931 #define LANG_BELARUSIAN (0)
2932 #endif
2933 #ifndef LANG_BENGALI
2934 #define LANG_BENGALI (0)
2935 #endif
2936 #ifndef LANG_BULGARIAN
2937 #define LANG_BULGARIAN (0)
2938 #endif
2939 #ifndef LANG_CATALAN
2940 #define LANG_CATALAN (0)
2941 #endif
2942 #ifndef LANG_CHINESE
2943 #define LANG_CHINESE (0)
2944 #endif
2945 #ifndef LANG_CROATIAN
2946 #define LANG_CROATIAN (0)
2947 #endif
2948 #ifndef LANG_CZECH
2949 #define LANG_CZECH (0)
2950 #endif
2951 #ifndef LANG_DANISH
2952 #define LANG_DANISH (0)
2953 #endif
2954 #ifndef LANG_DUTCH
2955 #define LANG_DUTCH (0)
2956 #endif
2957 #ifndef LANG_ENGLISH
2958 #define LANG_ENGLISH (0)
2959 #endif
2960 #ifndef LANG_ESTONIAN
2961 #define LANG_ESTONIAN (0)
2962 #endif
2963 #ifndef LANG_FAEROESE
2964 #define LANG_FAEROESE (0)
2965 #endif
2966 #ifndef LANG_FARSI
2967 #define LANG_FARSI (0)
2968 #endif
2969 #ifndef LANG_FINNISH
2970 #define LANG_FINNISH (0)
2971 #endif
2972 #ifndef LANG_FRENCH
2973 #define LANG_FRENCH (0)
2974 #endif
2975 #ifndef LANG_GEORGIAN
2976 #define LANG_GEORGIAN (0)
2977 #endif
2978 #ifndef LANG_GERMAN
2979 #define LANG_GERMAN (0)
2980 #endif
2981 #ifndef LANG_GREEK
2982 #define LANG_GREEK (0)
2983 #endif
2984 #ifndef LANG_GUJARATI
2985 #define LANG_GUJARATI (0)
2986 #endif
2987 #ifndef LANG_HEBREW
2988 #define LANG_HEBREW (0)
2989 #endif
2990 #ifndef LANG_HINDI
2991 #define LANG_HINDI (0)
2992 #endif
2993 #ifndef LANG_HUNGARIAN
2994 #define LANG_HUNGARIAN (0)
2995 #endif
2996 #ifndef LANG_ICELANDIC
2997 #define LANG_ICELANDIC (0)
2998 #endif
2999 #ifndef LANG_INDONESIAN
3000 #define LANG_INDONESIAN (0)
3001 #endif
3002 #ifndef LANG_ITALIAN
3003 #define LANG_ITALIAN (0)
3004 #endif
3005 #ifndef LANG_JAPANESE
3006 #define LANG_JAPANESE (0)
3007 #endif
3008 #ifndef LANG_KANNADA
3009 #define LANG_KANNADA (0)
3010 #endif
3011 #ifndef LANG_KASHMIRI
3012 #define LANG_KASHMIRI (0)
3013 #endif
3014 #ifndef LANG_KAZAK
3015 #define LANG_KAZAK (0)
3016 #endif
3017 #ifndef LANG_KONKANI
3018 #define LANG_KONKANI (0)
3019 #endif
3020 #ifndef LANG_KOREAN
3021 #define LANG_KOREAN (0)
3022 #endif
3023 #ifndef LANG_LATVIAN
3024 #define LANG_LATVIAN (0)
3025 #endif
3026 #ifndef LANG_LITHUANIAN
3027 #define LANG_LITHUANIAN (0)
3028 #endif
3029 #ifndef LANG_MACEDONIAN
3030 #define LANG_MACEDONIAN (0)
3031 #endif
3032 #ifndef LANG_MALAY
3033 #define LANG_MALAY (0)
3034 #endif
3035 #ifndef LANG_MALAYALAM
3036 #define LANG_MALAYALAM (0)
3037 #endif
3038 #ifndef LANG_MANIPURI
3039 #define LANG_MANIPURI (0)
3040 #endif
3041 #ifndef LANG_MARATHI
3042 #define LANG_MARATHI (0)
3043 #endif
3044 #ifndef LANG_NEPALI
3045 #define LANG_NEPALI (0)
3046 #endif
3047 #ifndef LANG_NORWEGIAN
3048 #define LANG_NORWEGIAN (0)
3049 #endif
3050 #ifndef LANG_ORIYA
3051 #define LANG_ORIYA (0)
3052 #endif
3053 #ifndef LANG_POLISH
3054 #define LANG_POLISH (0)
3055 #endif
3056 #ifndef LANG_PORTUGUESE
3057 #define LANG_PORTUGUESE (0)
3058 #endif
3059 #ifndef LANG_PUNJABI
3060 #define LANG_PUNJABI (0)
3061 #endif
3062 #ifndef LANG_ROMANIAN
3063 #define LANG_ROMANIAN (0)
3064 #endif
3065 #ifndef LANG_RUSSIAN
3066 #define LANG_RUSSIAN (0)
3067 #endif
3068 #ifndef LANG_SANSKRIT
3069 #define LANG_SANSKRIT (0)
3070 #endif
3071 #ifndef LANG_SERBIAN
3072 #define LANG_SERBIAN (0)
3073 #endif
3074 #ifndef LANG_SINDHI
3075 #define LANG_SINDHI (0)
3076 #endif
3077 #ifndef LANG_SLOVAK
3078 #define LANG_SLOVAK (0)
3079 #endif
3080 #ifndef LANG_SLOVENIAN
3081 #define LANG_SLOVENIAN (0)
3082 #endif
3083 #ifndef LANG_SPANISH
3084 #define LANG_SPANISH (0)
3085 #endif
3086 #ifndef LANG_SWAHILI
3087 #define LANG_SWAHILI (0)
3088 #endif
3089 #ifndef LANG_SWEDISH
3090 #define LANG_SWEDISH (0)
3091 #endif
3092 #ifndef LANG_TAMIL
3093 #define LANG_TAMIL (0)
3094 #endif
3095 #ifndef LANG_TATAR
3096 #define LANG_TATAR (0)
3097 #endif
3098 #ifndef LANG_TELUGU
3099 #define LANG_TELUGU (0)
3100 #endif
3101 #ifndef LANG_THAI
3102 #define LANG_THAI (0)
3103 #endif
3104 #ifndef LANG_TURKISH
3105 #define LANG_TURKISH (0)
3106 #endif
3107 #ifndef LANG_UKRAINIAN
3108 #define LANG_UKRAINIAN (0)
3109 #endif
3110 #ifndef LANG_URDU
3111 #define LANG_URDU (0)
3112 #endif
3113 #ifndef LANG_UZBEK
3114 #define LANG_UZBEK (0)
3115 #endif
3116 #ifndef LANG_VIETNAMESE
3117 #define LANG_VIETNAMESE (0)
3118 #endif
3119 #ifndef SUBLANG_ARABIC_ALGERIA
3120 #define SUBLANG_ARABIC_ALGERIA SUBLANG_DEFAULT
3121 #endif
3122 #ifndef SUBLANG_ARABIC_BAHRAIN
3123 #define SUBLANG_ARABIC_BAHRAIN SUBLANG_DEFAULT
3124 #endif
3125 #ifndef SUBLANG_ARABIC_EGYPT
3126 #define SUBLANG_ARABIC_EGYPT SUBLANG_DEFAULT
3127 #endif
3128 #ifndef SUBLANG_ARABIC_IRAQ
3129 #define SUBLANG_ARABIC_IRAQ SUBLANG_DEFAULT
3130 #endif
3131 #ifndef SUBLANG_ARABIC_JORDAN
3132 #define SUBLANG_ARABIC_JORDAN SUBLANG_DEFAULT
3133 #endif
3134 #ifndef SUBLANG_ARABIC_KUWAIT
3135 #define SUBLANG_ARABIC_KUWAIT SUBLANG_DEFAULT
3136 #endif
3137 #ifndef SUBLANG_ARABIC_LEBANON
3138 #define SUBLANG_ARABIC_LEBANON SUBLANG_DEFAULT
3139 #endif
3140 #ifndef SUBLANG_ARABIC_LIBYA
3141 #define SUBLANG_ARABIC_LIBYA SUBLANG_DEFAULT
3142 #endif
3143 #ifndef SUBLANG_ARABIC_MOROCCO
3144 #define SUBLANG_ARABIC_MOROCCO SUBLANG_DEFAULT
3145 #endif
3146 #ifndef SUBLANG_ARABIC_OMAN
3147 #define SUBLANG_ARABIC_OMAN SUBLANG_DEFAULT
3148 #endif
3149 #ifndef SUBLANG_ARABIC_QATAR
3150 #define SUBLANG_ARABIC_QATAR SUBLANG_DEFAULT
3151 #endif
3152 #ifndef SUBLANG_ARABIC_SAUDI_ARABIA
3153 #define SUBLANG_ARABIC_SAUDI_ARABIA SUBLANG_DEFAULT
3154 #endif
3155 #ifndef SUBLANG_ARABIC_SYRIA
3156 #define SUBLANG_ARABIC_SYRIA SUBLANG_DEFAULT
3157 #endif
3158 #ifndef SUBLANG_ARABIC_TUNISIA
3159 #define SUBLANG_ARABIC_TUNISIA SUBLANG_DEFAULT
3160 #endif
3161 #ifndef SUBLANG_ARABIC_UAE
3162 #define SUBLANG_ARABIC_UAE SUBLANG_DEFAULT
3163 #endif
3164 #ifndef SUBLANG_ARABIC_YEMEN
3165 #define SUBLANG_ARABIC_YEMEN SUBLANG_DEFAULT
3166 #endif
3167 #ifndef SUBLANG_AZERI_CYRILLIC
3168 #define SUBLANG_AZERI_CYRILLIC SUBLANG_DEFAULT
3169 #endif
3170 #ifndef SUBLANG_AZERI_LATIN
3171 #define SUBLANG_AZERI_LATIN SUBLANG_DEFAULT
3172 #endif
3173 #ifndef SUBLANG_CHINESE_SIMPLIFIED
3174 #define SUBLANG_CHINESE_SIMPLIFIED SUBLANG_DEFAULT
3175 #endif
3176 #ifndef SUBLANG_CHINESE_TRADITIONAL
3177 #define SUBLANG_CHINESE_TRADITIONAL SUBLANG_DEFAULT
3178 #endif
3179 #ifndef SUBLANG_CHINESE_HONGKONG
3180 #define SUBLANG_CHINESE_HONGKONG SUBLANG_DEFAULT
3181 #endif
3182 #ifndef SUBLANG_CHINESE_MACAU
3183 #define SUBLANG_CHINESE_MACAU SUBLANG_DEFAULT
3184 #endif
3185 #ifndef SUBLANG_CHINESE_SINGAPORE
3186 #define SUBLANG_CHINESE_SINGAPORE SUBLANG_DEFAULT
3187 #endif
3188 #ifndef SUBLANG_DUTCH
3189 #define SUBLANG_DUTCH SUBLANG_DEFAULT
3190 #endif
3191 #ifndef SUBLANG_DUTCH_BELGIAN
3192 #define SUBLANG_DUTCH_BELGIAN SUBLANG_DEFAULT
3193 #endif
3194 #ifndef SUBLANG_ENGLISH_UK
3195 #define SUBLANG_ENGLISH_UK SUBLANG_DEFAULT
3196 #endif
3197 #ifndef SUBLANG_ENGLISH_US
3198 #define SUBLANG_ENGLISH_US SUBLANG_DEFAULT
3199 #endif
3200 #ifndef SUBLANG_ENGLISH_AUS
3201 #define SUBLANG_ENGLISH_AUS SUBLANG_DEFAULT
3202 #endif
3203 #ifndef SUBLANG_ENGLISH_BELIZE
3204 #define SUBLANG_ENGLISH_BELIZE SUBLANG_DEFAULT
3205 #endif
3206 #ifndef SUBLANG_ENGLISH_CAN
3207 #define SUBLANG_ENGLISH_CAN SUBLANG_DEFAULT
3208 #endif
3209 #ifndef SUBLANG_ENGLISH_CARIBBEAN
3210 #define SUBLANG_ENGLISH_CARIBBEAN SUBLANG_DEFAULT
3211 #endif
3212 #ifndef SUBLANG_ENGLISH_EIRE
3213 #define SUBLANG_ENGLISH_EIRE SUBLANG_DEFAULT
3214 #endif
3215 #ifndef SUBLANG_ENGLISH_JAMAICA
3216 #define SUBLANG_ENGLISH_JAMAICA SUBLANG_DEFAULT
3217 #endif
3218 #ifndef SUBLANG_ENGLISH_NZ
3219 #define SUBLANG_ENGLISH_NZ SUBLANG_DEFAULT
3220 #endif
3221 #ifndef SUBLANG_ENGLISH_PHILIPPINES
3222 #define SUBLANG_ENGLISH_PHILIPPINES SUBLANG_DEFAULT
3223 #endif
3224 #ifndef SUBLANG_ENGLISH_SOUTH_AFRICA
3225 #define SUBLANG_ENGLISH_SOUTH_AFRICA SUBLANG_DEFAULT
3226 #endif
3227 #ifndef SUBLANG_ENGLISH_TRINIDAD
3228 #define SUBLANG_ENGLISH_TRINIDAD SUBLANG_DEFAULT
3229 #endif
3230 #ifndef SUBLANG_ENGLISH_ZIMBABWE
3231 #define SUBLANG_ENGLISH_ZIMBABWE SUBLANG_DEFAULT
3232 #endif
3233 #ifndef SUBLANG_FRENCH
3234 #define SUBLANG_FRENCH SUBLANG_DEFAULT
3235 #endif
3236 #ifndef SUBLANG_FRENCH_BELGIAN
3237 #define SUBLANG_FRENCH_BELGIAN SUBLANG_DEFAULT
3238 #endif
3239 #ifndef SUBLANG_FRENCH_CANADIAN
3240 #define SUBLANG_FRENCH_CANADIAN SUBLANG_DEFAULT
3241 #endif
3242 #ifndef SUBLANG_FRENCH_LUXEMBOURG
3243 #define SUBLANG_FRENCH_LUXEMBOURG SUBLANG_DEFAULT
3244 #endif
3245 #ifndef SUBLANG_FRENCH_MONACO
3246 #define SUBLANG_FRENCH_MONACO SUBLANG_DEFAULT
3247 #endif
3248 #ifndef SUBLANG_FRENCH_SWISS
3249 #define SUBLANG_FRENCH_SWISS SUBLANG_DEFAULT
3250 #endif
3251 #ifndef SUBLANG_GERMAN
3252 #define SUBLANG_GERMAN SUBLANG_DEFAULT
3253 #endif
3254 #ifndef SUBLANG_GERMAN_AUSTRIAN
3255 #define SUBLANG_GERMAN_AUSTRIAN SUBLANG_DEFAULT
3256 #endif
3257 #ifndef SUBLANG_GERMAN_LIECHTENSTEIN
3258 #define SUBLANG_GERMAN_LIECHTENSTEIN SUBLANG_DEFAULT
3259 #endif
3260 #ifndef SUBLANG_GERMAN_LUXEMBOURG
3261 #define SUBLANG_GERMAN_LUXEMBOURG SUBLANG_DEFAULT
3262 #endif
3263 #ifndef SUBLANG_GERMAN_SWISS
3264 #define SUBLANG_GERMAN_SWISS SUBLANG_DEFAULT
3265 #endif
3266 #ifndef SUBLANG_ITALIAN
3267 #define SUBLANG_ITALIAN SUBLANG_DEFAULT
3268 #endif
3269 #ifndef SUBLANG_ITALIAN_SWISS
3270 #define SUBLANG_ITALIAN_SWISS SUBLANG_DEFAULT
3271 #endif
3272 #ifndef SUBLANG_KASHMIRI_INDIA
3273 #define SUBLANG_KASHMIRI_INDIA SUBLANG_DEFAULT
3274 #endif
3275 #ifndef SUBLANG_KOREAN
3276 #define SUBLANG_KOREAN SUBLANG_DEFAULT
3277 #endif
3278 #ifndef SUBLANG_LITHUANIAN
3279 #define SUBLANG_LITHUANIAN SUBLANG_DEFAULT
3280 #endif
3281 #ifndef SUBLANG_MALAY_BRUNEI_DARUSSALAM
3282 #define SUBLANG_MALAY_BRUNEI_DARUSSALAM SUBLANG_DEFAULT
3283 #endif
3284 #ifndef SUBLANG_MALAY_MALAYSIA
3285 #define SUBLANG_MALAY_MALAYSIA SUBLANG_DEFAULT
3286 #endif
3287 #ifndef SUBLANG_NEPALI_INDIA
3288 #define SUBLANG_NEPALI_INDIA SUBLANG_DEFAULT
3289 #endif
3290 #ifndef SUBLANG_NORWEGIAN_BOKMAL
3291 #define SUBLANG_NORWEGIAN_BOKMAL SUBLANG_DEFAULT
3292 #endif
3293 #ifndef SUBLANG_NORWEGIAN_NYNORSK
3294 #define SUBLANG_NORWEGIAN_NYNORSK SUBLANG_DEFAULT
3295 #endif
3296 #ifndef SUBLANG_PORTUGUESE
3297 #define SUBLANG_PORTUGUESE SUBLANG_DEFAULT
3298 #endif
3299 #ifndef SUBLANG_PORTUGUESE_BRAZILIAN
3300 #define SUBLANG_PORTUGUESE_BRAZILIAN SUBLANG_DEFAULT
3301 #endif
3302 #ifndef SUBLANG_SERBIAN_CYRILLIC
3303 #define SUBLANG_SERBIAN_CYRILLIC SUBLANG_DEFAULT
3304 #endif
3305 #ifndef SUBLANG_SERBIAN_LATIN
3306 #define SUBLANG_SERBIAN_LATIN SUBLANG_DEFAULT
3307 #endif
3308 #ifndef SUBLANG_SPANISH
3309 #define SUBLANG_SPANISH SUBLANG_DEFAULT
3310 #endif
3311 #ifndef SUBLANG_SPANISH_ARGENTINA
3312 #define SUBLANG_SPANISH_ARGENTINA SUBLANG_DEFAULT
3313 #endif
3314 #ifndef SUBLANG_SPANISH_BOLIVIA
3315 #define SUBLANG_SPANISH_BOLIVIA SUBLANG_DEFAULT
3316 #endif
3317 #ifndef SUBLANG_SPANISH_CHILE
3318 #define SUBLANG_SPANISH_CHILE SUBLANG_DEFAULT
3319 #endif
3320 #ifndef SUBLANG_SPANISH_COLOMBIA
3321 #define SUBLANG_SPANISH_COLOMBIA SUBLANG_DEFAULT
3322 #endif
3323 #ifndef SUBLANG_SPANISH_COSTA_RICA
3324 #define SUBLANG_SPANISH_COSTA_RICA SUBLANG_DEFAULT
3325 #endif
3326 #ifndef SUBLANG_SPANISH_DOMINICAN_REPUBLIC
3327 #define SUBLANG_SPANISH_DOMINICAN_REPUBLIC SUBLANG_DEFAULT
3328 #endif
3329 #ifndef SUBLANG_SPANISH_ECUADOR
3330 #define SUBLANG_SPANISH_ECUADOR SUBLANG_DEFAULT
3331 #endif
3332 #ifndef SUBLANG_SPANISH_EL_SALVADOR
3333 #define SUBLANG_SPANISH_EL_SALVADOR SUBLANG_DEFAULT
3334 #endif
3335 #ifndef SUBLANG_SPANISH_GUATEMALA
3336 #define SUBLANG_SPANISH_GUATEMALA SUBLANG_DEFAULT
3337 #endif
3338 #ifndef SUBLANG_SPANISH_HONDURAS
3339 #define SUBLANG_SPANISH_HONDURAS SUBLANG_DEFAULT
3340 #endif
3341 #ifndef SUBLANG_SPANISH_MEXICAN
3342 #define SUBLANG_SPANISH_MEXICAN SUBLANG_DEFAULT
3343 #endif
3344 #ifndef SUBLANG_SPANISH_MODERN
3345 #define SUBLANG_SPANISH_MODERN SUBLANG_DEFAULT
3346 #endif
3347 #ifndef SUBLANG_SPANISH_NICARAGUA
3348 #define SUBLANG_SPANISH_NICARAGUA SUBLANG_DEFAULT
3349 #endif
3350 #ifndef SUBLANG_SPANISH_PANAMA
3351 #define SUBLANG_SPANISH_PANAMA SUBLANG_DEFAULT
3352 #endif
3353 #ifndef SUBLANG_SPANISH_PARAGUAY
3354 #define SUBLANG_SPANISH_PARAGUAY SUBLANG_DEFAULT
3355 #endif
3356 #ifndef SUBLANG_SPANISH_PERU
3357 #define SUBLANG_SPANISH_PERU SUBLANG_DEFAULT
3358 #endif
3359 #ifndef SUBLANG_SPANISH_PUERTO_RICO
3360 #define SUBLANG_SPANISH_PUERTO_RICO SUBLANG_DEFAULT
3361 #endif
3362 #ifndef SUBLANG_SPANISH_URUGUAY
3363 #define SUBLANG_SPANISH_URUGUAY SUBLANG_DEFAULT
3364 #endif
3365 #ifndef SUBLANG_SPANISH_VENEZUELA
3366 #define SUBLANG_SPANISH_VENEZUELA SUBLANG_DEFAULT
3367 #endif
3368 #ifndef SUBLANG_SWEDISH
3369 #define SUBLANG_SWEDISH SUBLANG_DEFAULT
3370 #endif
3371 #ifndef SUBLANG_SWEDISH_FINLAND
3372 #define SUBLANG_SWEDISH_FINLAND SUBLANG_DEFAULT
3373 #endif
3374 #ifndef SUBLANG_URDU_INDIA
3375 #define SUBLANG_URDU_INDIA SUBLANG_DEFAULT
3376 #endif
3377 #ifndef SUBLANG_URDU_PAKISTAN
3378 #define SUBLANG_URDU_PAKISTAN SUBLANG_DEFAULT
3379 #endif
3380 #ifndef SUBLANG_UZBEK_CYRILLIC
3381 #define SUBLANG_UZBEK_CYRILLIC SUBLANG_DEFAULT
3382 #endif
3383 #ifndef SUBLANG_UZBEK_LATIN
3384 #define SUBLANG_UZBEK_LATIN SUBLANG_DEFAULT
3385 #endif
3386
3387
3388 #endif // __WIN32__
3389
3390 #define LNG(wxlang, canonical, winlang, winsublang, desc) \
3391     info.Language = wxlang;                               \
3392     info.CanonicalName = wxT(canonical);                  \
3393     info.Description = wxT(desc);                         \
3394     SETWINLANG(info, winlang, winsublang)                 \
3395     AddLanguage(info);
3396
3397 void wxLocale::InitLanguagesDB()
3398 {
3399    wxLanguageInfo info;
3400    wxStringTokenizer tkn;
3401
3402    LNG(wxLANGUAGE_ABKHAZIAN,                  "ab"   , 0              , 0                                 , "Abkhazian")
3403    LNG(wxLANGUAGE_AFAR,                       "aa"   , 0              , 0                                 , "Afar")
3404    LNG(wxLANGUAGE_AFRIKAANS,                  "af_ZA", LANG_AFRIKAANS , SUBLANG_DEFAULT                   , "Afrikaans")
3405    LNG(wxLANGUAGE_ALBANIAN,                   "sq_AL", LANG_ALBANIAN  , SUBLANG_DEFAULT                   , "Albanian")
3406    LNG(wxLANGUAGE_AMHARIC,                    "am"   , 0              , 0                                 , "Amharic")
3407    LNG(wxLANGUAGE_ARABIC,                     "ar"   , LANG_ARABIC    , SUBLANG_DEFAULT                   , "Arabic")
3408    LNG(wxLANGUAGE_ARABIC_ALGERIA,             "ar_DZ", LANG_ARABIC    , SUBLANG_ARABIC_ALGERIA            , "Arabic (Algeria)")
3409    LNG(wxLANGUAGE_ARABIC_BAHRAIN,             "ar_BH", LANG_ARABIC    , SUBLANG_ARABIC_BAHRAIN            , "Arabic (Bahrain)")
3410    LNG(wxLANGUAGE_ARABIC_EGYPT,               "ar_EG", LANG_ARABIC    , SUBLANG_ARABIC_EGYPT              , "Arabic (Egypt)")
3411    LNG(wxLANGUAGE_ARABIC_IRAQ,                "ar_IQ", LANG_ARABIC    , SUBLANG_ARABIC_IRAQ               , "Arabic (Iraq)")
3412    LNG(wxLANGUAGE_ARABIC_JORDAN,              "ar_JO", LANG_ARABIC    , SUBLANG_ARABIC_JORDAN             , "Arabic (Jordan)")
3413    LNG(wxLANGUAGE_ARABIC_KUWAIT,              "ar_KW", LANG_ARABIC    , SUBLANG_ARABIC_KUWAIT             , "Arabic (Kuwait)")
3414    LNG(wxLANGUAGE_ARABIC_LEBANON,             "ar_LB", LANG_ARABIC    , SUBLANG_ARABIC_LEBANON            , "Arabic (Lebanon)")
3415    LNG(wxLANGUAGE_ARABIC_LIBYA,               "ar_LY", LANG_ARABIC    , SUBLANG_ARABIC_LIBYA              , "Arabic (Libya)")
3416    LNG(wxLANGUAGE_ARABIC_MOROCCO,             "ar_MA", LANG_ARABIC    , SUBLANG_ARABIC_MOROCCO            , "Arabic (Morocco)")
3417    LNG(wxLANGUAGE_ARABIC_OMAN,                "ar_OM", LANG_ARABIC    , SUBLANG_ARABIC_OMAN               , "Arabic (Oman)")
3418    LNG(wxLANGUAGE_ARABIC_QATAR,               "ar_QA", LANG_ARABIC    , SUBLANG_ARABIC_QATAR              , "Arabic (Qatar)")
3419    LNG(wxLANGUAGE_ARABIC_SAUDI_ARABIA,        "ar_SA", LANG_ARABIC    , SUBLANG_ARABIC_SAUDI_ARABIA       , "Arabic (Saudi Arabia)")
3420    LNG(wxLANGUAGE_ARABIC_SUDAN,               "ar_SD", 0              , 0                                 , "Arabic (Sudan)")
3421    LNG(wxLANGUAGE_ARABIC_SYRIA,               "ar_SY", LANG_ARABIC    , SUBLANG_ARABIC_SYRIA              , "Arabic (Syria)")
3422    LNG(wxLANGUAGE_ARABIC_TUNISIA,             "ar_TN", LANG_ARABIC    , SUBLANG_ARABIC_TUNISIA            , "Arabic (Tunisia)")
3423    LNG(wxLANGUAGE_ARABIC_UAE,                 "ar_AE", LANG_ARABIC    , SUBLANG_ARABIC_UAE                , "Arabic (Uae)")
3424    LNG(wxLANGUAGE_ARABIC_YEMEN,               "ar_YE", LANG_ARABIC    , SUBLANG_ARABIC_YEMEN              , "Arabic (Yemen)")
3425    LNG(wxLANGUAGE_ARMENIAN,                   "hy"   , LANG_ARMENIAN  , SUBLANG_DEFAULT                   , "Armenian")
3426    LNG(wxLANGUAGE_ASSAMESE,                   "as"   , LANG_ASSAMESE  , SUBLANG_DEFAULT                   , "Assamese")
3427    LNG(wxLANGUAGE_AYMARA,                     "ay"   , 0              , 0                                 , "Aymara")
3428    LNG(wxLANGUAGE_AZERI,                      "az"   , LANG_AZERI     , SUBLANG_DEFAULT                   , "Azeri")
3429    LNG(wxLANGUAGE_AZERI_CYRILLIC,             "az"   , LANG_AZERI     , SUBLANG_AZERI_CYRILLIC            , "Azeri (Cyrillic)")
3430    LNG(wxLANGUAGE_AZERI_LATIN,                "az"   , LANG_AZERI     , SUBLANG_AZERI_LATIN               , "Azeri (Latin)")
3431    LNG(wxLANGUAGE_BASHKIR,                    "ba"   , 0              , 0                                 , "Bashkir")
3432    LNG(wxLANGUAGE_BASQUE,                     "eu_ES", LANG_BASQUE    , SUBLANG_DEFAULT                   , "Basque")
3433    LNG(wxLANGUAGE_BELARUSIAN,                 "be_BY", LANG_BELARUSIAN, SUBLANG_DEFAULT                   , "Belarusian")
3434    LNG(wxLANGUAGE_BENGALI,                    "bn"   , LANG_BENGALI   , SUBLANG_DEFAULT                   , "Bengali")
3435    LNG(wxLANGUAGE_BHUTANI,                    "dz"   , 0              , 0                                 , "Bhutani")
3436    LNG(wxLANGUAGE_BIHARI,                     "bh"   , 0              , 0                                 , "Bihari")
3437    LNG(wxLANGUAGE_BISLAMA,                    "bi"   , 0              , 0                                 , "Bislama")
3438    LNG(wxLANGUAGE_BRETON,                     "br"   , 0              , 0                                 , "Breton")
3439    LNG(wxLANGUAGE_BULGARIAN,                  "bg_BG", LANG_BULGARIAN , SUBLANG_DEFAULT                   , "Bulgarian")
3440    LNG(wxLANGUAGE_BURMESE,                    "my"   , 0              , 0                                 , "Burmese")
3441    LNG(wxLANGUAGE_CAMBODIAN,                  "km"   , 0              , 0                                 , "Cambodian")
3442    LNG(wxLANGUAGE_CATALAN,                    "ca_ES", LANG_CATALAN   , SUBLANG_DEFAULT                   , "Catalan")
3443    LNG(wxLANGUAGE_CHINESE,                    "zh_TW", LANG_CHINESE   , SUBLANG_DEFAULT                   , "Chinese")
3444    LNG(wxLANGUAGE_CHINESE_SIMPLIFIED,         "zh_CN", LANG_CHINESE   , SUBLANG_CHINESE_SIMPLIFIED        , "Chinese (Simplified)")
3445    LNG(wxLANGUAGE_CHINESE_TRADITIONAL,        "zh_TW", LANG_CHINESE   , SUBLANG_CHINESE_TRADITIONAL       , "Chinese (Traditional)")
3446    LNG(wxLANGUAGE_CHINESE_HONGKONG,           "zh_HK", LANG_CHINESE   , SUBLANG_CHINESE_HONGKONG          , "Chinese (Hongkong)")
3447    LNG(wxLANGUAGE_CHINESE_MACAU,              "zh_MO", LANG_CHINESE   , SUBLANG_CHINESE_MACAU             , "Chinese (Macau)")
3448    LNG(wxLANGUAGE_CHINESE_SINGAPORE,          "zh_SG", LANG_CHINESE   , SUBLANG_CHINESE_SINGAPORE         , "Chinese (Singapore)")
3449    LNG(wxLANGUAGE_CHINESE_TAIWAN,             "zh_TW", LANG_CHINESE   , SUBLANG_CHINESE_TRADITIONAL       , "Chinese (Taiwan)")
3450    LNG(wxLANGUAGE_CORSICAN,                   "co"   , 0              , 0                                 , "Corsican")
3451    LNG(wxLANGUAGE_CROATIAN,                   "hr_HR", LANG_CROATIAN  , SUBLANG_DEFAULT                   , "Croatian")
3452    LNG(wxLANGUAGE_CZECH,                      "cs_CZ", LANG_CZECH     , SUBLANG_DEFAULT                   , "Czech")
3453    LNG(wxLANGUAGE_DANISH,                     "da_DK", LANG_DANISH    , SUBLANG_DEFAULT                   , "Danish")
3454    LNG(wxLANGUAGE_DUTCH,                      "nl_NL", LANG_DUTCH     , SUBLANG_DUTCH                     , "Dutch")
3455    LNG(wxLANGUAGE_DUTCH_BELGIAN,              "nl_BE", LANG_DUTCH     , SUBLANG_DUTCH_BELGIAN             , "Dutch (Belgian)")
3456    LNG(wxLANGUAGE_ENGLISH,                    "en_GB", LANG_ENGLISH   , SUBLANG_ENGLISH_UK                , "English")
3457    LNG(wxLANGUAGE_ENGLISH_UK,                 "en_GB", LANG_ENGLISH   , SUBLANG_ENGLISH_UK                , "English (U.K.)")
3458    LNG(wxLANGUAGE_ENGLISH_US,                 "en_US", LANG_ENGLISH   , SUBLANG_ENGLISH_US                , "English (U.S.)")
3459    LNG(wxLANGUAGE_ENGLISH_AUSTRALIA,          "en_AU", LANG_ENGLISH   , SUBLANG_ENGLISH_AUS               , "English (Australia)")
3460    LNG(wxLANGUAGE_ENGLISH_BELIZE,             "en_BZ", LANG_ENGLISH   , SUBLANG_ENGLISH_BELIZE            , "English (Belize)")
3461    LNG(wxLANGUAGE_ENGLISH_BOTSWANA,           "en_BW", 0              , 0                                 , "English (Botswana)")
3462    LNG(wxLANGUAGE_ENGLISH_CANADA,             "en_CA", LANG_ENGLISH   , SUBLANG_ENGLISH_CAN               , "English (Canada)")
3463    LNG(wxLANGUAGE_ENGLISH_CARIBBEAN,          "en_CB", LANG_ENGLISH   , SUBLANG_ENGLISH_CARIBBEAN         , "English (Caribbean)")
3464    LNG(wxLANGUAGE_ENGLISH_DENMARK,            "en_DK", 0              , 0                                 , "English (Denmark)")
3465    LNG(wxLANGUAGE_ENGLISH_EIRE,               "en_IE", LANG_ENGLISH   , SUBLANG_ENGLISH_EIRE              , "English (Eire)")
3466    LNG(wxLANGUAGE_ENGLISH_JAMAICA,            "en_JM", LANG_ENGLISH   , SUBLANG_ENGLISH_JAMAICA           , "English (Jamaica)")
3467    LNG(wxLANGUAGE_ENGLISH_NEW_ZEALAND,        "en_NZ", LANG_ENGLISH   , SUBLANG_ENGLISH_NZ                , "English (New Zealand)")
3468    LNG(wxLANGUAGE_ENGLISH_PHILIPPINES,        "en_PH", LANG_ENGLISH   , SUBLANG_ENGLISH_PHILIPPINES       , "English (Philippines)")
3469    LNG(wxLANGUAGE_ENGLISH_SOUTH_AFRICA,       "en_ZA", LANG_ENGLISH   , SUBLANG_ENGLISH_SOUTH_AFRICA      , "English (South Africa)")
3470    LNG(wxLANGUAGE_ENGLISH_TRINIDAD,           "en_TT", LANG_ENGLISH   , SUBLANG_ENGLISH_TRINIDAD          , "English (Trinidad)")
3471    LNG(wxLANGUAGE_ENGLISH_ZIMBABWE,           "en_ZW", LANG_ENGLISH   , SUBLANG_ENGLISH_ZIMBABWE          , "English (Zimbabwe)")
3472    LNG(wxLANGUAGE_ESPERANTO,                  "eo"   , 0              , 0                                 , "Esperanto")
3473    LNG(wxLANGUAGE_ESTONIAN,                   "et_EE", LANG_ESTONIAN  , SUBLANG_DEFAULT                   , "Estonian")
3474    LNG(wxLANGUAGE_FAEROESE,                   "fo_FO", LANG_FAEROESE  , SUBLANG_DEFAULT                   , "Faeroese")
3475    LNG(wxLANGUAGE_FARSI,                      "fa_IR", LANG_FARSI     , SUBLANG_DEFAULT                   , "Farsi")
3476    LNG(wxLANGUAGE_FIJI,                       "fj"   , 0              , 0                                 , "Fiji")
3477    LNG(wxLANGUAGE_FINNISH,                    "fi_FI", LANG_FINNISH   , SUBLANG_DEFAULT                   , "Finnish")
3478    LNG(wxLANGUAGE_FRENCH,                     "fr_FR", LANG_FRENCH    , SUBLANG_FRENCH                    , "French")
3479    LNG(wxLANGUAGE_FRENCH_BELGIAN,             "fr_BE", LANG_FRENCH    , SUBLANG_FRENCH_BELGIAN            , "French (Belgian)")
3480    LNG(wxLANGUAGE_FRENCH_CANADIAN,            "fr_CA", LANG_FRENCH    , SUBLANG_FRENCH_CANADIAN           , "French (Canadian)")
3481    LNG(wxLANGUAGE_FRENCH_LUXEMBOURG,          "fr_LU", LANG_FRENCH    , SUBLANG_FRENCH_LUXEMBOURG         , "French (Luxembourg)")
3482    LNG(wxLANGUAGE_FRENCH_MONACO,              "fr_MC", LANG_FRENCH    , SUBLANG_FRENCH_MONACO             , "French (Monaco)")
3483    LNG(wxLANGUAGE_FRENCH_SWISS,               "fr_CH", LANG_FRENCH    , SUBLANG_FRENCH_SWISS              , "French (Swiss)")
3484    LNG(wxLANGUAGE_FRISIAN,                    "fy"   , 0              , 0                                 , "Frisian")
3485    LNG(wxLANGUAGE_GALICIAN,                   "gl_ES", 0              , 0                                 , "Galician")
3486    LNG(wxLANGUAGE_GEORGIAN,                   "ka"   , LANG_GEORGIAN  , SUBLANG_DEFAULT                   , "Georgian")
3487    LNG(wxLANGUAGE_GERMAN,                     "de_DE", LANG_GERMAN    , SUBLANG_GERMAN                    , "German")
3488    LNG(wxLANGUAGE_GERMAN_AUSTRIAN,            "de_AT", LANG_GERMAN    , SUBLANG_GERMAN_AUSTRIAN           , "German (Austrian)")
3489    LNG(wxLANGUAGE_GERMAN_BELGIUM,             "de_BE", 0              , 0                                 , "German (Belgium)")
3490    LNG(wxLANGUAGE_GERMAN_LIECHTENSTEIN,       "de_LI", LANG_GERMAN    , SUBLANG_GERMAN_LIECHTENSTEIN      , "German (Liechtenstein)")
3491    LNG(wxLANGUAGE_GERMAN_LUXEMBOURG,          "de_LU", LANG_GERMAN    , SUBLANG_GERMAN_LUXEMBOURG         , "German (Luxembourg)")
3492    LNG(wxLANGUAGE_GERMAN_SWISS,               "de_CH", LANG_GERMAN    , SUBLANG_GERMAN_SWISS              , "German (Swiss)")
3493    LNG(wxLANGUAGE_GREEK,                      "el_GR", LANG_GREEK     , SUBLANG_DEFAULT                   , "Greek")
3494    LNG(wxLANGUAGE_GREENLANDIC,                "kl_GL", 0              , 0                                 , "Greenlandic")
3495    LNG(wxLANGUAGE_GUARANI,                    "gn"   , 0              , 0                                 , "Guarani")
3496    LNG(wxLANGUAGE_GUJARATI,                   "gu"   , LANG_GUJARATI  , SUBLANG_DEFAULT                   , "Gujarati")
3497    LNG(wxLANGUAGE_HAUSA,                      "ha"   , 0              , 0                                 , "Hausa")
3498    LNG(wxLANGUAGE_HEBREW,                     "he_IL", LANG_HEBREW    , SUBLANG_DEFAULT                   , "Hebrew")
3499    LNG(wxLANGUAGE_HINDI,                      "hi_IN", LANG_HINDI     , SUBLANG_DEFAULT                   , "Hindi")
3500    LNG(wxLANGUAGE_HUNGARIAN,                  "hu_HU", LANG_HUNGARIAN , SUBLANG_DEFAULT                   , "Hungarian")
3501    LNG(wxLANGUAGE_ICELANDIC,                  "is_IS", LANG_ICELANDIC , SUBLANG_DEFAULT                   , "Icelandic")
3502    LNG(wxLANGUAGE_INDONESIAN,                 "id_ID", LANG_INDONESIAN, SUBLANG_DEFAULT                   , "Indonesian")
3503    LNG(wxLANGUAGE_INTERLINGUA,                "ia"   , 0              , 0                                 , "Interlingua")
3504    LNG(wxLANGUAGE_INTERLINGUE,                "ie"   , 0              , 0                                 , "Interlingue")
3505    LNG(wxLANGUAGE_INUKTITUT,                  "iu"   , 0              , 0                                 , "Inuktitut")
3506    LNG(wxLANGUAGE_INUPIAK,                    "ik"   , 0              , 0                                 , "Inupiak")
3507    LNG(wxLANGUAGE_IRISH,                      "ga_IE", 0              , 0                                 , "Irish")
3508    LNG(wxLANGUAGE_ITALIAN,                    "it_IT", LANG_ITALIAN   , SUBLANG_ITALIAN                   , "Italian")
3509    LNG(wxLANGUAGE_ITALIAN_SWISS,              "it_CH", LANG_ITALIAN   , SUBLANG_ITALIAN_SWISS             , "Italian (Swiss)")
3510    LNG(wxLANGUAGE_JAPANESE,                   "ja_JP", LANG_JAPANESE  , SUBLANG_DEFAULT                   , "Japanese")
3511    LNG(wxLANGUAGE_JAVANESE,                   "jw"   , 0              , 0                                 , "Javanese")
3512    LNG(wxLANGUAGE_KANNADA,                    "kn"   , LANG_KANNADA   , SUBLANG_DEFAULT                   , "Kannada")
3513    LNG(wxLANGUAGE_KASHMIRI,                   "ks"   , LANG_KASHMIRI  , SUBLANG_DEFAULT                   , "Kashmiri")
3514    LNG(wxLANGUAGE_KASHMIRI_INDIA,             "ks_IN", LANG_KASHMIRI  , SUBLANG_KASHMIRI_INDIA            , "Kashmiri (India)")
3515    LNG(wxLANGUAGE_KAZAKH,                     "kk"   , LANG_KAZAK     , SUBLANG_DEFAULT                   , "Kazakh")
3516    LNG(wxLANGUAGE_KERNEWEK,                   "kw_GB", 0              , 0                                 , "Kernewek")
3517    LNG(wxLANGUAGE_KINYARWANDA,                "rw"   , 0              , 0                                 , "Kinyarwanda")
3518    LNG(wxLANGUAGE_KIRGHIZ,                    "ky"   , 0              , 0                                 , "Kirghiz")
3519    LNG(wxLANGUAGE_KIRUNDI,                    "rn"   , 0              , 0                                 , "Kirundi")
3520    LNG(wxLANGUAGE_KONKANI,                    ""     , LANG_KONKANI   , SUBLANG_DEFAULT                   , "Konkani")
3521    LNG(wxLANGUAGE_KOREAN,                     "ko_KR", LANG_KOREAN    , SUBLANG_KOREAN                    , "Korean")
3522    LNG(wxLANGUAGE_KURDISH,                    "ku"   , 0              , 0                                 , "Kurdish")
3523    LNG(wxLANGUAGE_LAOTHIAN,                   "lo"   , 0              , 0                                 , "Laothian")
3524    LNG(wxLANGUAGE_LATIN,                      "la"   , 0              , 0                                 , "Latin")
3525    LNG(wxLANGUAGE_LATVIAN,                    "lv_LV", LANG_LATVIAN   , SUBLANG_DEFAULT                   , "Latvian")
3526    LNG(wxLANGUAGE_LINGALA,                    "ln"   , 0              , 0                                 , "Lingala")
3527    LNG(wxLANGUAGE_LITHUANIAN,                 "lt_LT", LANG_LITHUANIAN, SUBLANG_LITHUANIAN                , "Lithuanian")
3528    LNG(wxLANGUAGE_MACEDONIAN,                 "mk_MK", LANG_MACEDONIAN, SUBLANG_DEFAULT                   , "Macedonian")
3529    LNG(wxLANGUAGE_MALAGASY,                   "mg"   , 0              , 0                                 , "Malagasy")
3530    LNG(wxLANGUAGE_MALAY,                      "ms_MY", LANG_MALAY     , SUBLANG_DEFAULT                   , "Malay")
3531    LNG(wxLANGUAGE_MALAYALAM,                  "ml"   , LANG_MALAYALAM , SUBLANG_DEFAULT                   , "Malayalam")
3532    LNG(wxLANGUAGE_MALAY_BRUNEI_DARUSSALAM,    "ms_BN", LANG_MALAY     , SUBLANG_MALAY_BRUNEI_DARUSSALAM   , "Malay (Brunei Darussalam)")
3533    LNG(wxLANGUAGE_MALAY_MALAYSIA,             "ms_MY", LANG_MALAY     , SUBLANG_MALAY_MALAYSIA            , "Malay (Malaysia)")
3534    LNG(wxLANGUAGE_MALTESE,                    "mt_MT", 0              , 0                                 , "Maltese")
3535    LNG(wxLANGUAGE_MANIPURI,                   ""     , LANG_MANIPURI  , SUBLANG_DEFAULT                   , "Manipuri")
3536    LNG(wxLANGUAGE_MAORI,                      "mi"   , 0              , 0                                 , "Maori")
3537    LNG(wxLANGUAGE_MARATHI,                    "mr_IN", LANG_MARATHI   , SUBLANG_DEFAULT                   , "Marathi")
3538    LNG(wxLANGUAGE_MOLDAVIAN,                  "mo"   , 0              , 0                                 , "Moldavian")
3539    LNG(wxLANGUAGE_MONGOLIAN,                  "mn"   , 0              , 0                                 , "Mongolian")
3540    LNG(wxLANGUAGE_NAURU,                      "na"   , 0              , 0                                 , "Nauru")
3541    LNG(wxLANGUAGE_NEPALI,                     "ne"   , LANG_NEPALI    , SUBLANG_DEFAULT                   , "Nepali")
3542    LNG(wxLANGUAGE_NEPALI_INDIA,               "ne_IN", LANG_NEPALI    , SUBLANG_NEPALI_INDIA              , "Nepali (India)")
3543    LNG(wxLANGUAGE_NORWEGIAN_BOKMAL,           "nb_NO", LANG_NORWEGIAN , SUBLANG_NORWEGIAN_BOKMAL          , "Norwegian (Bokmal)")
3544    LNG(wxLANGUAGE_NORWEGIAN_NYNORSK,          "nn_NO", LANG_NORWEGIAN , SUBLANG_NORWEGIAN_NYNORSK         , "Norwegian (Nynorsk)")
3545    LNG(wxLANGUAGE_OCCITAN,                    "oc"   , 0              , 0                                 , "Occitan")
3546    LNG(wxLANGUAGE_ORIYA,                      "or"   , LANG_ORIYA     , SUBLANG_DEFAULT                   , "Oriya")
3547    LNG(wxLANGUAGE_OROMO,                      "om"   , 0              , 0                                 , "(Afan) Oromo")
3548    LNG(wxLANGUAGE_PASHTO,                     "ps"   , 0              , 0                                 , "Pashto, Pushto")
3549    LNG(wxLANGUAGE_POLISH,                     "pl_PL", LANG_POLISH    , SUBLANG_DEFAULT                   , "Polish")
3550    LNG(wxLANGUAGE_PORTUGUESE,                 "pt_PT", LANG_PORTUGUESE, SUBLANG_PORTUGUESE                , "Portuguese")
3551    LNG(wxLANGUAGE_PORTUGUESE_BRAZILIAN,       "pt_BR", LANG_PORTUGUESE, SUBLANG_PORTUGUESE_BRAZILIAN      , "Portuguese (Brazilian)")
3552    LNG(wxLANGUAGE_PUNJABI,                    "pa"   , LANG_PUNJABI   , SUBLANG_DEFAULT                   , "Punjabi")
3553    LNG(wxLANGUAGE_QUECHUA,                    "qu"   , 0              , 0                                 , "Quechua")
3554    LNG(wxLANGUAGE_RHAETO_ROMANCE,             "rm"   , 0              , 0                                 , "Rhaeto-Romance")
3555    LNG(wxLANGUAGE_ROMANIAN,                   "ro_RO", LANG_ROMANIAN  , SUBLANG_DEFAULT                   , "Romanian")
3556    LNG(wxLANGUAGE_RUSSIAN,                    "ru_RU", LANG_RUSSIAN   , SUBLANG_DEFAULT                   , "Russian")
3557    LNG(wxLANGUAGE_RUSSIAN_UKRAINE,            "ru_UA", 0              , 0                                 , "Russian (Ukraine)")
3558    LNG(wxLANGUAGE_SAMOAN,                     "sm"   , 0              , 0                                 , "Samoan")
3559    LNG(wxLANGUAGE_SANGHO,                     "sg"   , 0              , 0                                 , "Sangho")
3560    LNG(wxLANGUAGE_SANSKRIT,                   "sa"   , LANG_SANSKRIT  , SUBLANG_DEFAULT                   , "Sanskrit")
3561    LNG(wxLANGUAGE_SCOTS_GAELIC,               "gd"   , 0              , 0                                 , "Scots Gaelic")
3562    LNG(wxLANGUAGE_SERBIAN_CYRILLIC,           "sr_YU", LANG_SERBIAN   , SUBLANG_SERBIAN_CYRILLIC          , "Serbian (Cyrillic)")
3563    LNG(wxLANGUAGE_SERBIAN_LATIN,              "sr_YU", LANG_SERBIAN   , SUBLANG_SERBIAN_LATIN             , "Serbian (Latin)")
3564    LNG(wxLANGUAGE_SERBO_CROATIAN,             "sh"   , 0              , 0                                 , "Serbo-Croatian")
3565    LNG(wxLANGUAGE_SESOTHO,                    "st"   , 0              , 0                                 , "Sesotho")
3566    LNG(wxLANGUAGE_SETSWANA,                   "tn"   , 0              , 0                                 , "Setswana")
3567    LNG(wxLANGUAGE_SHONA,                      "sn"   , 0              , 0                                 , "Shona")
3568    LNG(wxLANGUAGE_SINDHI,                     "sd"   , LANG_SINDHI    , SUBLANG_DEFAULT                   , "Sindhi")
3569    LNG(wxLANGUAGE_SINHALESE,                  "si"   , 0              , 0                                 , "Sinhalese")
3570    LNG(wxLANGUAGE_SISWATI,                    "ss"   , 0              , 0                                 , "Siswati")
3571    LNG(wxLANGUAGE_SLOVAK,                     "sk_SK", LANG_SLOVAK    , SUBLANG_DEFAULT                   , "Slovak")
3572    LNG(wxLANGUAGE_SLOVENIAN,                  "sl_SI", LANG_SLOVENIAN , SUBLANG_DEFAULT                   , "Slovenian")
3573    LNG(wxLANGUAGE_SOMALI,                     "so"   , 0              , 0                                 , "Somali")
3574    LNG(wxLANGUAGE_SPANISH,                    "es_ES", LANG_SPANISH   , SUBLANG_SPANISH                   , "Spanish")
3575    LNG(wxLANGUAGE_SPANISH_ARGENTINA,          "es_AR", LANG_SPANISH   , SUBLANG_SPANISH_ARGENTINA         , "Spanish (Argentina)")
3576    LNG(wxLANGUAGE_SPANISH_BOLIVIA,            "es_BO", LANG_SPANISH   , SUBLANG_SPANISH_BOLIVIA           , "Spanish (Bolivia)")
3577    LNG(wxLANGUAGE_SPANISH_CHILE,              "es_CL", LANG_SPANISH   , SUBLANG_SPANISH_CHILE             , "Spanish (Chile)")
3578    LNG(wxLANGUAGE_SPANISH_COLOMBIA,           "es_CO", LANG_SPANISH   , SUBLANG_SPANISH_COLOMBIA          , "Spanish (Colombia)")
3579    LNG(wxLANGUAGE_SPANISH_COSTA_RICA,         "es_CR", LANG_SPANISH   , SUBLANG_SPANISH_COSTA_RICA        , "Spanish (Costa Rica)")
3580    LNG(wxLANGUAGE_SPANISH_DOMINICAN_REPUBLIC, "es_DO", LANG_SPANISH   , SUBLANG_SPANISH_DOMINICAN_REPUBLIC, "Spanish (Dominican republic)")
3581    LNG(wxLANGUAGE_SPANISH_ECUADOR,            "es_EC", LANG_SPANISH   , SUBLANG_SPANISH_ECUADOR           , "Spanish (Ecuador)")
3582    LNG(wxLANGUAGE_SPANISH_EL_SALVADOR,        "es_SV", LANG_SPANISH   , SUBLANG_SPANISH_EL_SALVADOR       , "Spanish (El Salvador)")
3583    LNG(wxLANGUAGE_SPANISH_GUATEMALA,          "es_GT", LANG_SPANISH   , SUBLANG_SPANISH_GUATEMALA         , "Spanish (Guatemala)")
3584    LNG(wxLANGUAGE_SPANISH_HONDURAS,           "es_HN", LANG_SPANISH   , SUBLANG_SPANISH_HONDURAS          , "Spanish (Honduras)")
3585    LNG(wxLANGUAGE_SPANISH_MEXICAN,            "es_MX", LANG_SPANISH   , SUBLANG_SPANISH_MEXICAN           , "Spanish (Mexican)")
3586    LNG(wxLANGUAGE_SPANISH_MODERN,             "es_ES", LANG_SPANISH   , SUBLANG_SPANISH_MODERN            , "Spanish (Modern)")
3587    LNG(wxLANGUAGE_SPANISH_NICARAGUA,          "es_NI", LANG_SPANISH   , SUBLANG_SPANISH_NICARAGUA         , "Spanish (Nicaragua)")
3588    LNG(wxLANGUAGE_SPANISH_PANAMA,             "es_PA", LANG_SPANISH   , SUBLANG_SPANISH_PANAMA            , "Spanish (Panama)")
3589    LNG(wxLANGUAGE_SPANISH_PARAGUAY,           "es_PY", LANG_SPANISH   , SUBLANG_SPANISH_PARAGUAY          , "Spanish (Paraguay)")
3590    LNG(wxLANGUAGE_SPANISH_PERU,               "es_PE", LANG_SPANISH   , SUBLANG_SPANISH_PERU              , "Spanish (Peru)")
3591    LNG(wxLANGUAGE_SPANISH_PUERTO_RICO,        "es_PR", LANG_SPANISH   , SUBLANG_SPANISH_PUERTO_RICO       , "Spanish (Puerto Rico)")
3592    LNG(wxLANGUAGE_SPANISH_URUGUAY,            "es_UY", LANG_SPANISH   , SUBLANG_SPANISH_URUGUAY           , "Spanish (Uruguay)")
3593    LNG(wxLANGUAGE_SPANISH_US,                 "es_US", 0              , 0                                 , "Spanish (U.S.)")
3594    LNG(wxLANGUAGE_SPANISH_VENEZUELA,          "es_VE", LANG_SPANISH   , SUBLANG_SPANISH_VENEZUELA         , "Spanish (Venezuela)")
3595    LNG(wxLANGUAGE_SUNDANESE,                  "su"   , 0              , 0                                 , "Sundanese")
3596    LNG(wxLANGUAGE_SWAHILI,                    "sw_KE", LANG_SWAHILI   , SUBLANG_DEFAULT                   , "Swahili")
3597    LNG(wxLANGUAGE_SWEDISH,                    "sv_SE", LANG_SWEDISH   , SUBLANG_SWEDISH                   , "Swedish")
3598    LNG(wxLANGUAGE_SWEDISH_FINLAND,            "sv_FI", LANG_SWEDISH   , SUBLANG_SWEDISH_FINLAND           , "Swedish (Finland)")
3599    LNG(wxLANGUAGE_TAGALOG,                    "tl_PH", 0              , 0                                 , "Tagalog")
3600    LNG(wxLANGUAGE_TAJIK,                      "tg"   , 0              , 0                                 , "Tajik")
3601    LNG(wxLANGUAGE_TAMIL,                      "ta"   , LANG_TAMIL     , SUBLANG_DEFAULT                   , "Tamil")
3602    LNG(wxLANGUAGE_TATAR,                      "tt"   , LANG_TATAR     , SUBLANG_DEFAULT                   , "Tatar")
3603    LNG(wxLANGUAGE_TELUGU,                     "te"   , LANG_TELUGU    , SUBLANG_DEFAULT                   , "Telugu")
3604    LNG(wxLANGUAGE_THAI,                       "th_TH", LANG_THAI      , SUBLANG_DEFAULT                   , "Thai")
3605    LNG(wxLANGUAGE_TIBETAN,                    "bo"   , 0              , 0                                 , "Tibetan")
3606    LNG(wxLANGUAGE_TIGRINYA,                   "ti"   , 0              , 0                                 , "Tigrinya")
3607    LNG(wxLANGUAGE_TONGA,                      "to"   , 0              , 0                                 , "Tonga")
3608    LNG(wxLANGUAGE_TSONGA,                     "ts"   , 0              , 0                                 , "Tsonga")
3609    LNG(wxLANGUAGE_TURKISH,                    "tr_TR", LANG_TURKISH   , SUBLANG_DEFAULT                   , "Turkish")
3610    LNG(wxLANGUAGE_TURKMEN,                    "tk"   , 0              , 0                                 , "Turkmen")
3611    LNG(wxLANGUAGE_TWI,                        "tw"   , 0              , 0                                 , "Twi")
3612    LNG(wxLANGUAGE_UIGHUR,                     "ug"   , 0              , 0                                 , "Uighur")
3613    LNG(wxLANGUAGE_UKRAINIAN,                  "uk_UA", LANG_UKRAINIAN , SUBLANG_DEFAULT                   , "Ukrainian")
3614    LNG(wxLANGUAGE_URDU,                       "ur"   , LANG_URDU      , SUBLANG_DEFAULT                   , "Urdu")
3615    LNG(wxLANGUAGE_URDU_INDIA,                 "ur_IN", LANG_URDU      , SUBLANG_URDU_INDIA                , "Urdu (India)")
3616    LNG(wxLANGUAGE_URDU_PAKISTAN,              "ur_PK", LANG_URDU      , SUBLANG_URDU_PAKISTAN             , "Urdu (Pakistan)")
3617    LNG(wxLANGUAGE_UZBEK,                      "uz"   , LANG_UZBEK     , SUBLANG_DEFAULT                   , "Uzbek")
3618    LNG(wxLANGUAGE_UZBEK_CYRILLIC,             "uz"   , LANG_UZBEK     , SUBLANG_UZBEK_CYRILLIC            , "Uzbek (Cyrillic)")
3619    LNG(wxLANGUAGE_UZBEK_LATIN,                "uz"   , LANG_UZBEK     , SUBLANG_UZBEK_LATIN               , "Uzbek (Latin)")
3620    LNG(wxLANGUAGE_VIETNAMESE,                 "vi_VN", LANG_VIETNAMESE, SUBLANG_DEFAULT                   , "Vietnamese")
3621    LNG(wxLANGUAGE_VOLAPUK,                    "vo"   , 0              , 0                                 , "Volapuk")
3622    LNG(wxLANGUAGE_WELSH,                      "cy"   , 0              , 0                                 , "Welsh")
3623    LNG(wxLANGUAGE_WOLOF,                      "wo"   , 0              , 0                                 , "Wolof")
3624    LNG(wxLANGUAGE_XHOSA,                      "xh"   , 0              , 0                                 , "Xhosa")
3625    LNG(wxLANGUAGE_YIDDISH,                    "yi"   , 0              , 0                                 , "Yiddish")
3626    LNG(wxLANGUAGE_YORUBA,                     "yo"   , 0              , 0                                 , "Yoruba")
3627    LNG(wxLANGUAGE_ZHUANG,                     "za"   , 0              , 0                                 , "Zhuang")
3628    LNG(wxLANGUAGE_ZULU,                       "zu"   , 0              , 0                                 , "Zulu")
3629
3630 }
3631 #undef LNG
3632
3633 // --- --- --- generated code ends here --- --- ---
3634
3635 #endif // wxUSE_INTL