tests/intl/intltest.cpp

   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
  32 class IntlTestCase : public CppUnit::TestCase
  33 {
  34 public:
  35     IntlTestCase() { m_locale=NULL; }
  36
  37     virtual void setUp();
  38     virtual void tearDown();
  39
  40 private:
  41     CPPUNIT_TEST_SUITE( IntlTestCase );
  42         CPPUNIT_TEST( Domain );
  43         CPPUNIT_TEST( Headers );
  44         CPPUNIT_TEST( DateTimeFmtFrench );
  45         CPPUNIT_TEST( DateTimeFmtC );
  46         CPPUNIT_TEST( IsAvailable );
  47     CPPUNIT_TEST_SUITE_END();
  48
  49     void Domain();
  50     void Headers();
  51     void DateTimeFmtFrench();
  52     void DateTimeFmtC();
  53     void IsAvailable();
  54
  55     wxLocale *m_locale;
  56
  57     DECLARE_NO_COPY_CLASS(IntlTestCase)
  58 };
  59
  60 // register in the unnamed registry so that these tests are run by default
  61 CPPUNIT_TEST_SUITE_REGISTRATION( IntlTestCase );
  62
  63 // also include in it's own registry so that these tests can be run alone
  64 CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( IntlTestCase, "IntlTestCase" );
  65
  66 void IntlTestCase::setUp()
  67 {
  68     // Check that French locale is supported, this test doesn't work without it
  69     // and all the other function need to check whether m_locale is non-NULL
  70     // before continuing
  71     if ( !wxLocale::IsAvailable(wxLANGUAGE_FRENCH) )
  72         return;
  73
  74     wxLocale::AddCatalogLookupPathPrefix("./intl");
  75
  76     m_locale = new wxLocale;
  77     CPPUNIT_ASSERT( m_locale );
  78
  79     // don't load default catalog, it may be unavailable:
  80     bool loaded = m_locale->Init(wxLANGUAGE_FRENCH, wxLOCALE_DONT_LOAD_DEFAULT);
  81     CPPUNIT_ASSERT( loaded );
  82
  83     m_locale->AddCatalog("internat");
  84 }
  85
  86 void IntlTestCase::tearDown()
  87 {
  88     if (m_locale)
  89     {
  90         delete m_locale;
  91         m_locale = NULL;
  92     }
  93 }
  94
  95 void IntlTestCase::Domain()
  96 {
  97     if (!m_locale)
  98         return;
  99
 100     // _() searches all domains by default:
 101     CPPUNIT_ASSERT_EQUAL( "&Ouvrir un fichier", _("&Open bogus file") );
 102
 103     // search in our domain only:
 104     CPPUNIT_ASSERT_EQUAL( "&Ouvrir un fichier", wxGetTranslation("&Open bogus file", "internat") );
 105
 106     // search in a domain that doesn't have this string:
 107     CPPUNIT_ASSERT_EQUAL( "&Open bogus file", wxGetTranslation("&Open bogus file", "BogusDomain") );
 108 }
 109
 110 void IntlTestCase::Headers()
 111 {
 112     if ( !m_locale )
 113         return;
 114
 115     CPPUNIT_ASSERT_EQUAL( "wxWindows 2.0 i18n sample", m_locale->GetHeaderValue("Project-Id-Version") );
 116     CPPUNIT_ASSERT_EQUAL( "1999-01-13 18:19+0100", m_locale->GetHeaderValue("POT-Creation-Date") );
 117     CPPUNIT_ASSERT_EQUAL( "YEAR-MO-DA HO:MI+ZONE", m_locale->GetHeaderValue("PO-Revision-Date") );
 118     CPPUNIT_ASSERT_EQUAL( "Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>", m_locale->GetHeaderValue("Last-Translator") );
 119     CPPUNIT_ASSERT_EQUAL( "1.0", m_locale->GetHeaderValue("MIME-Version") );
 120     CPPUNIT_ASSERT_EQUAL( "text/plain; charset=iso-8859-1", m_locale->GetHeaderValue("Content-Type") );
 121     CPPUNIT_ASSERT_EQUAL( "8bit", m_locale->GetHeaderValue("Content-Transfer-Encoding") );
 122
 123     // check that it fails with a bogus domain:
 124     CPPUNIT_ASSERT_EQUAL( "", m_locale->GetHeaderValue("POT-Creation-Date", "Bogus") );
 125
 126     // and that it fails for nonexisting header:
 127     CPPUNIT_ASSERT_EQUAL( "", m_locale->GetHeaderValue("X-Not-Here") );
 128 }
 129
 130 static wxString
 131 NormalizeFormat(const wxString& fmtOrig)
 132 {
 133     wxString fmt(fmtOrig);
 134
 135 #ifdef __GLIBC__
 136     // glibc uses some extensions in its formats which we need to convert to
 137     // standard form
 138     fmt.Replace("%T", "%H:%M:%S");
 139     fmt.Replace("%e", "%d");
 140 #endif // __GLIBC__
 141
 142     return fmt;
 143 }
 144
 145 #define WX_ASSERT_EQUAL_FORMAT(msg, expected, actual) \
 146     if ( !actual.empty() ) \
 147         CPPUNIT_ASSERT_EQUAL_MESSAGE(msg, expected, NormalizeFormat(actual))
 148
 149 void IntlTestCase::DateTimeFmtFrench()
 150 {
 151     if ( !m_locale )
 152         return;
 153
 154 #ifdef __GLIBC__
 155     // glibc also uses dots for French locale separator for some reason (the
 156     // standard format uses slashes)
 157     static const char *FRENCH_DATE_FMT = "%d.%m.%Y";
 158     static const char *FRENCH_LONG_DATE_FMT = "%a %d %b %Y";
 159     static const char *FRENCH_DATE_TIME_FMT = "%a %d %b %Y %H:%M:%S %Z";
 160 #else
 161     static const char *FRENCH_DATE_FMT = "%d/%m/%Y";
 162     static const char *FRENCH_LONG_DATE_FMT = "%A %d %B %Y";
 163 #ifdef __WXOSX__
 164     static const char *FRENCH_DATE_TIME_FMT = "%A %d %B %Y %H:%M:%S";
 165 #else
 166     static const char *FRENCH_DATE_TIME_FMT = "%d/%m/%Y %H:%M:%S";
 167 #endif
 168 #endif
 169
 170     WX_ASSERT_EQUAL_FORMAT( "French short date", FRENCH_DATE_FMT,
 171                    m_locale->GetInfo(wxLOCALE_SHORT_DATE_FMT) );
 172     WX_ASSERT_EQUAL_FORMAT( "French long date", FRENCH_LONG_DATE_FMT,
 173                     m_locale->GetInfo(wxLOCALE_LONG_DATE_FMT) );
 174     WX_ASSERT_EQUAL_FORMAT( "French date and time", FRENCH_DATE_TIME_FMT,
 175                     m_locale->GetInfo(wxLOCALE_DATE_TIME_FMT) );
 176     WX_ASSERT_EQUAL_FORMAT( "French time", "%H:%M:%S",
 177                     m_locale->GetInfo(wxLOCALE_TIME_FMT) );
 178 }
 179
 180 void IntlTestCase::DateTimeFmtC()
 181 {
 182     // again, glibc uses different defaults
 183 #ifdef __GLIBC__
 184     static const char *C_DATE_FMT = "%m/%d/%y";
 185     static const char *C_LONG_DATE_FMT = "%a %b %d %Y";
 186     static const char *C_DATE_TIME_FMT = "%a %b %d %H:%M:%S %Y";
 187 #else
 188     static const char *C_DATE_FMT = "%d/%m/%Y";
 189     static const char *C_LONG_DATE_FMT = "%A %d %B %Y";
 190 #ifdef __WXOSX__
 191     static const char *C_DATE_TIME_FMT = "%A %d %B %Y %H:%M:%S";
 192 #else
 193     static const char *C_DATE_TIME_FMT = "%d/%m/%Y %H:%M:%S";
 194 #endif
 195 #endif
 196
 197     setlocale(LC_ALL, "C");
 198
 199     WX_ASSERT_EQUAL_FORMAT( "C short date", C_DATE_FMT,
 200                     m_locale->GetInfo(wxLOCALE_SHORT_DATE_FMT) );
 201     WX_ASSERT_EQUAL_FORMAT( "C long date", C_LONG_DATE_FMT,
 202                     m_locale->GetInfo(wxLOCALE_LONG_DATE_FMT) );
 203     WX_ASSERT_EQUAL_FORMAT( "C date and time", C_DATE_TIME_FMT,
 204                     m_locale->GetInfo(wxLOCALE_DATE_TIME_FMT) );
 205     WX_ASSERT_EQUAL_FORMAT( "C time", "%H:%M:%S",
 206                     m_locale->GetInfo(wxLOCALE_TIME_FMT) );
 207 }
 208
 209 void IntlTestCase::IsAvailable()
 210 {
 211     const wxString origLocale(setlocale(LC_ALL, NULL));
 212
 213     // Calling IsAvailable() shouldn't change the locale.
 214     wxLocale::IsAvailable(wxLANGUAGE_ENGLISH);
 215
 216     CPPUNIT_ASSERT_EQUAL( origLocale, setlocale(LC_ALL, NULL) );
 217 }
 218
 219 #endif // wxUSE_INTL