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