src/common/intl.cpp

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