]> git.saurik.com Git - wxWidgets.git/blame - tests/intl/intltest.cpp
fix wxTextCtrl::Replace() under wxGTK; added unit test for it and describe its effect...
[wxWidgets.git] / tests / intl / intltest.cpp
CommitLineData
02f935fb
VS
1///////////////////////////////////////////////////////////////////////////////
2// Name: tests/intl/intltest.cpp
3// Purpose: wxLocale unit test
4// Author: Vaclav Slavik
5// Created: 2007-03-26
6// RCS-ID: $Id$
7// Copyright: (c) 2007 Vaclav Slavik
8///////////////////////////////////////////////////////////////////////////////
9
10// ----------------------------------------------------------------------------
11// headers
12// ----------------------------------------------------------------------------
13
14#include "testprec.h"
15
16#ifdef __BORLANDC__
17 #pragma hdrstop
18#endif
19
20#ifndef WX_PRECOMP
21 #include "wx/wx.h"
22#endif // WX_PRECOMP
23
24#include "wx/intl.h"
25
26#if wxUSE_INTL
27
28// ----------------------------------------------------------------------------
29// test class
30// ----------------------------------------------------------------------------
31
32class IntlTestCase : public CppUnit::TestCase
33{
34public:
35 IntlTestCase() {}
36
37 virtual void setUp();
38 virtual void tearDown();
39
40private:
41 CPPUNIT_TEST_SUITE( IntlTestCase );
42 CPPUNIT_TEST( Domain );
43 CPPUNIT_TEST( Headers );
44 CPPUNIT_TEST_SUITE_END();
45
46 void Domain();
47 void Headers();
48
49 wxLocale *m_locale;
50
51 DECLARE_NO_COPY_CLASS(IntlTestCase)
52};
53
54// register in the unnamed registry so that these tests are run by default
55CPPUNIT_TEST_SUITE_REGISTRATION( IntlTestCase );
56
57// also include in it's own registry so that these tests can be run alone
58CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( IntlTestCase, "IntlTestCase" );
59
60void IntlTestCase::setUp()
61{
62 wxLocale::AddCatalogLookupPathPrefix("./intl");
63
64 m_locale = new wxLocale;
65 // don't load default catalog, it may be unavailable:
66 bool loaded = m_locale->Init(wxLANGUAGE_FRENCH, wxLOCALE_CONV_ENCODING);
67 CPPUNIT_ASSERT( loaded );
68
69 m_locale->AddCatalog("internat");
70}
71
72void IntlTestCase::tearDown()
73{
74 delete m_locale;
75 m_locale = NULL;
76}
77
78void IntlTestCase::Domain()
79{
80 // _() searches all domains by default:
1de532f5 81 CPPUNIT_ASSERT_EQUAL( "&Ouvrir un fichier", _("&Open bogus file") );
02f935fb
VS
82
83 // search in our domain only:
1de532f5 84 CPPUNIT_ASSERT_EQUAL( "&Ouvrir un fichier", wxGetTranslation("&Open bogus file", "internat") );
02f935fb
VS
85
86 // search in a domain that doesn't have this string:
1de532f5 87 CPPUNIT_ASSERT_EQUAL( "&Open bogus file", wxGetTranslation("&Open bogus file", "BogusDomain") );
02f935fb
VS
88}
89
90void IntlTestCase::Headers()
91{
1de532f5
VZ
92 CPPUNIT_ASSERT_EQUAL( "wxWindows 2.0 i18n sample", m_locale->GetHeaderValue("Project-Id-Version") );
93 CPPUNIT_ASSERT_EQUAL( "1999-01-13 18:19+0100", m_locale->GetHeaderValue("POT-Creation-Date") );
94 CPPUNIT_ASSERT_EQUAL( "YEAR-MO-DA HO:MI+ZONE", m_locale->GetHeaderValue("PO-Revision-Date") );
95 CPPUNIT_ASSERT_EQUAL( "Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>", m_locale->GetHeaderValue("Last-Translator") );
96 CPPUNIT_ASSERT_EQUAL( "1.0", m_locale->GetHeaderValue("MIME-Version") );
97 CPPUNIT_ASSERT_EQUAL( "text/plain; charset=iso-8859-1", m_locale->GetHeaderValue("Content-Type") );
98 CPPUNIT_ASSERT_EQUAL( "8bit", m_locale->GetHeaderValue("Content-Transfer-Encoding") );
02f935fb
VS
99
100 // check that it fails with a bogus domain:
1de532f5 101 CPPUNIT_ASSERT_EQUAL( "", m_locale->GetHeaderValue("POT-Creation-Date", "Bogus") );
02f935fb
VS
102
103 // and that it fails for nonexisting header:
1de532f5 104 CPPUNIT_ASSERT_EQUAL( "", m_locale->GetHeaderValue("X-Not-Here") );
02f935fb
VS
105}
106
107#endif // wxUSE_INTL