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