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