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