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