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