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