tests/xlocale/xlocale.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        tests/xlocale/xlocale.cpp
   3 // Purpose:     wxXLocale & related unit test
   4 // Author:      Brian Vanderburg II, Vadim Zeitlin
   5 // Created:     2008-01-16
   6 // RCS-ID:      $Id$
   7 // Copyright:   (c) 2008 Brian Vanderburg II
   8 //                  2008 Vadim Zeitlin <vadim@wxwidgets.org>
   9 // Licence:     wxWindows licence
  10 ///////////////////////////////////////////////////////////////////////////////
  11
  12 // ----------------------------------------------------------------------------
  13 // headers
  14 // ----------------------------------------------------------------------------
  15
  16 #include "testprec.h"
  17
  18 #ifdef __BORLANDC__
  19     #pragma hdrstop
  20 #endif
  21
  22 #if wxUSE_XLOCALE
  23
  24 #ifndef WX_PRECOMP
  25     #include "wx/wx.h"
  26 #endif // WX_PRECOMP
  27
  28 #include "wx/xlocale.h"
  29
  30 // --------------------------------------------------------------------------
  31 // test class
  32 // --------------------------------------------------------------------------
  33
  34 class XLocaleTestCase : public CppUnit::TestCase
  35 {
  36 public:
  37     XLocaleTestCase() { }
  38
  39 private:
  40     CPPUNIT_TEST_SUITE( XLocaleTestCase );
  41         CPPUNIT_TEST( TestCtor );
  42         CPPUNIT_TEST( PreserveLocale );
  43         CPPUNIT_TEST( TestCtypeFunctions );
  44         CPPUNIT_TEST( TestStdlibFunctions );
  45     CPPUNIT_TEST_SUITE_END();
  46
  47     void TestCtor();
  48     void PreserveLocale();
  49     void TestCtypeFunctions();
  50     void TestStdlibFunctions();
  51
  52     void TestCtypeFunctionsWith(const wxXLocale& loc);
  53     void TestStdlibFunctionsWith(const wxXLocale& loc);
  54
  55     DECLARE_NO_COPY_CLASS(XLocaleTestCase)
  56 };
  57
  58 // register in the unnamed registry so that these tests are run by default
  59 CPPUNIT_TEST_SUITE_REGISTRATION( XLocaleTestCase );
  60
  61 // also include in its own registry so that these tests can be run alone
  62 CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( XLocaleTestCase, "XLocaleTestCase" );
  63
  64
  65 // test the different wxXLocale ctors
  66 void XLocaleTestCase::TestCtor()
  67 {
  68     CPPUNIT_ASSERT( !wxXLocale().IsOk() );
  69     CPPUNIT_ASSERT( wxCLocale.IsOk() );
  70     CPPUNIT_ASSERT( wxXLocale("C").IsOk() );
  71     CPPUNIT_ASSERT( !wxXLocale("bloordyblop").IsOk() );
  72
  73     if (!wxLocale::IsAvailable(wxLANGUAGE_FRENCH))
  74         return;     // you should have french support installed to continue this test!
  75
  76 #ifdef wxHAS_XLOCALE_SUPPORT
  77     CPPUNIT_ASSERT( wxXLocale(wxLANGUAGE_FRENCH).IsOk() );
  78 #ifdef __WXMSW__
  79     CPPUNIT_ASSERT( wxXLocale("french").IsOk() );
  80 #else
  81     CPPUNIT_ASSERT( wxXLocale("fr_FR").IsOk() );
  82 #endif
  83 #endif
  84 }
  85
  86 void XLocaleTestCase::PreserveLocale()
  87 {
  88     // Test that using locale functions doesn't change the global C locale.
  89     const wxString origLocale(setlocale(LC_ALL, NULL));
  90
  91     wxStrtod_l(wxT("1.234"), NULL, wxCLocale);
  92
  93     CPPUNIT_ASSERT_EQUAL( origLocale, setlocale(LC_ALL, NULL) );
  94 }
  95
  96 // test the ctype functions with the given locale
  97 void XLocaleTestCase::TestCtypeFunctionsWith(const wxXLocale& loc)
  98 {
  99     // NOTE: here go the checks which must pass under _any_ locale "loc";
 100     //       checks for specific locales are in TestCtypeFunctions()
 101
 102
 103     // isalnum
 104     CPPUNIT_ASSERT( wxIsalnum_l('0', loc) );
 105     CPPUNIT_ASSERT( wxIsalnum_l('9', loc) );
 106     CPPUNIT_ASSERT( wxIsalnum_l('A', loc) );
 107     CPPUNIT_ASSERT( wxIsalnum_l('Z', loc) );
 108     CPPUNIT_ASSERT( wxIsalnum_l('a', loc) );
 109     CPPUNIT_ASSERT( wxIsalnum_l('z', loc) );
 110     CPPUNIT_ASSERT( !wxIsalnum_l('*', loc) );
 111     CPPUNIT_ASSERT( !wxIsalnum_l('@', loc) );
 112     CPPUNIT_ASSERT( !wxIsalnum_l('+', loc) );
 113
 114     // isalpha
 115     CPPUNIT_ASSERT( !wxIsalpha_l('0', loc) );
 116     CPPUNIT_ASSERT( !wxIsalpha_l('9', loc) );
 117     CPPUNIT_ASSERT( wxIsalpha_l('A', loc) );
 118     CPPUNIT_ASSERT( wxIsalpha_l('Z', loc) );
 119     CPPUNIT_ASSERT( wxIsalpha_l('a', loc) );
 120     CPPUNIT_ASSERT( wxIsalpha_l('z', loc) );
 121     CPPUNIT_ASSERT( !wxIsalpha_l('*', loc) );
 122     CPPUNIT_ASSERT( !wxIsalpha_l('@', loc) );
 123     CPPUNIT_ASSERT( !wxIsalpha_l('+', loc) );
 124
 125     // TODO: iscntrl
 126
 127     // isdigit
 128     CPPUNIT_ASSERT( wxIsdigit_l('0', loc) );
 129     CPPUNIT_ASSERT( wxIsdigit_l('9', loc) );
 130     CPPUNIT_ASSERT( !wxIsdigit_l('A', loc) );
 131     CPPUNIT_ASSERT( !wxIsdigit_l('Z', loc) );
 132     CPPUNIT_ASSERT( !wxIsdigit_l('a', loc) );
 133     CPPUNIT_ASSERT( !wxIsdigit_l('z', loc) );
 134
 135     // TODO: isgraph
 136
 137     // islower
 138     CPPUNIT_ASSERT( !wxIslower_l('A', loc) );
 139     CPPUNIT_ASSERT( !wxIslower_l('Z', loc) );
 140     CPPUNIT_ASSERT( wxIslower_l('a', loc) );
 141     CPPUNIT_ASSERT( wxIslower_l('z', loc) );
 142     CPPUNIT_ASSERT( !wxIslower_l('0', loc) );
 143     CPPUNIT_ASSERT( !wxIslower_l('9', loc) );
 144
 145
 146     // TODO: isprint
 147     // TODO: ispunct
 148
 149     // isspace
 150     CPPUNIT_ASSERT( wxIsspace_l(' ', loc) );
 151     CPPUNIT_ASSERT( wxIsspace_l('\t', loc) );
 152     CPPUNIT_ASSERT( wxIsspace_l('\r', loc) );
 153     CPPUNIT_ASSERT( wxIsspace_l('\n', loc) );
 154     CPPUNIT_ASSERT( !wxIsspace_l('0', loc) );
 155     CPPUNIT_ASSERT( !wxIsspace_l('a', loc) );
 156     CPPUNIT_ASSERT( !wxIsspace_l('A', loc) );
 157
 158     // isupper
 159     CPPUNIT_ASSERT( !wxIsupper_l('0', loc) );
 160     CPPUNIT_ASSERT( !wxIsupper_l('9', loc) );
 161     CPPUNIT_ASSERT( wxIsupper_l('A', loc) );
 162     CPPUNIT_ASSERT( wxIsupper_l('Z', loc) );
 163     CPPUNIT_ASSERT( !wxIsupper_l('a', loc) );
 164     CPPUNIT_ASSERT( !wxIsupper_l('z', loc) );
 165
 166     // isxdigit
 167     CPPUNIT_ASSERT( wxIsxdigit_l('0', loc) );
 168     CPPUNIT_ASSERT( wxIsxdigit_l('9', loc) );
 169     CPPUNIT_ASSERT( wxIsxdigit_l('A', loc) );
 170     CPPUNIT_ASSERT( wxIsxdigit_l('F', loc) );
 171     CPPUNIT_ASSERT( !wxIsxdigit_l('Z', loc) );
 172     CPPUNIT_ASSERT( wxIsxdigit_l('a', loc) );
 173     CPPUNIT_ASSERT( wxIsxdigit_l('f', loc) );
 174     CPPUNIT_ASSERT( !wxIsxdigit_l('z', loc) );
 175
 176     // tolower
 177     CPPUNIT_ASSERT_EQUAL( 'a', (char)wxTolower_l('A', loc) );
 178     CPPUNIT_ASSERT_EQUAL( 'a', (char)wxTolower_l('a', loc) );
 179     CPPUNIT_ASSERT_EQUAL( 'z', (char)wxTolower_l('Z', loc) );
 180     CPPUNIT_ASSERT_EQUAL( 'z', (char)wxTolower_l('z', loc) );
 181     CPPUNIT_ASSERT_EQUAL( '0', (char)wxTolower_l('0', loc) );
 182     CPPUNIT_ASSERT_EQUAL( '9', (char)wxTolower_l('9', loc) );
 183
 184     // toupper
 185     CPPUNIT_ASSERT_EQUAL( 'A', (char)wxToupper_l('A', loc) );
 186     CPPUNIT_ASSERT_EQUAL( 'A', (char)wxToupper_l('a', loc) );
 187     CPPUNIT_ASSERT_EQUAL( 'Z', (char)wxToupper_l('Z', loc) );
 188     CPPUNIT_ASSERT_EQUAL( 'Z', (char)wxToupper_l('z', loc) );
 189     CPPUNIT_ASSERT_EQUAL( '0', (char)wxToupper_l('0', loc) );
 190     CPPUNIT_ASSERT_EQUAL( '9', (char)wxToupper_l('9', loc) );
 191 }
 192
 193 // test the stdlib functions with the given locale
 194 void XLocaleTestCase::TestStdlibFunctionsWith(const wxXLocale& loc)
 195 {
 196     // NOTE: here go the checks which must pass under _any_ locale "loc";
 197     //       checks for specific locales are in TestStdlibFunctions()
 198
 199 #if wxUSE_UNICODE
 200     wchar_t* endptr;
 201 #else
 202     char* endptr;
 203 #endif
 204
 205     // strtod (don't use decimal separator as it's locale-specific)
 206     CPPUNIT_ASSERT_EQUAL( 0.0,        wxStrtod_l(wxT("0"), NULL, loc) );
 207     CPPUNIT_ASSERT_EQUAL( 1234.0,     wxStrtod_l(wxT("1234"), NULL, loc) );
 208
 209     // strtol
 210     endptr = NULL;
 211     CPPUNIT_ASSERT_EQUAL( 100,        wxStrtol_l(wxT("100"), NULL, 0, loc) );
 212     CPPUNIT_ASSERT_EQUAL( 0xFF,       wxStrtol_l(wxT("0xFF"), NULL, 0, loc) );
 213     CPPUNIT_ASSERT_EQUAL( 2001,       wxStrtol_l(wxT("2001 60c0c0 -1101110100110100100000 0x6fffff"), &endptr, 10, loc) );
 214     CPPUNIT_ASSERT_EQUAL( 0x60c0c0,   wxStrtol_l(endptr, &endptr, 16, loc) );
 215     CPPUNIT_ASSERT_EQUAL( -0x374D20,  wxStrtol_l(endptr, &endptr, 2, loc) );
 216     CPPUNIT_ASSERT_EQUAL( 0x6fffff,   wxStrtol_l(endptr, NULL, 0, loc) );
 217
 218     // strtoul
 219     // NOTE: 3147483647 and 0xEE6B2800 are greater than LONG_MAX (on 32bit machines) but
 220     //       smaller than ULONG_MAX
 221     CPPUNIT_ASSERT_EQUAL( 3147483647ul,  wxStrtoul_l(wxT("3147483647"), NULL, 0, loc) );
 222     CPPUNIT_ASSERT_EQUAL( 0xEE6B2800ul, wxStrtoul_l(wxT("0xEE6B2800"), NULL, 0, loc) );
 223
 224     // TODO: test for "failure" behaviour of the functions above
 225 }
 226
 227 void XLocaleTestCase::TestCtypeFunctions()
 228 {
 229     TestCtypeFunctionsWith(wxCLocale);
 230
 231 #ifdef wxHAS_XLOCALE_SUPPORT
 232
 233     // french
 234
 235     if (!wxLocale::IsAvailable(wxLANGUAGE_FRENCH))
 236         return;     // you should have french support installed to continue this test!
 237
 238     wxXLocale locFR(wxLANGUAGE_FRENCH);
 239     CPPUNIT_ASSERT( locFR.IsOk() ); // doesn't make sense to continue otherwise
 240
 241     TestCtypeFunctionsWith(locFR);
 242
 243     CPPUNIT_ASSERT( wxIsalpha_l(wxT('\xe9'), locFR) );
 244     CPPUNIT_ASSERT( wxIslower_l(wxT('\xe9'), locFR) );
 245     CPPUNIT_ASSERT( !wxIslower_l(wxT('\xc9'), locFR) );
 246     CPPUNIT_ASSERT( wxIsupper_l(wxT('\xc9'), locFR) );
 247     CPPUNIT_ASSERT( wxIsalpha_l(wxT('\xe7'), locFR) );
 248     CPPUNIT_ASSERT( wxIslower_l(wxT('\xe7'), locFR) );
 249     CPPUNIT_ASSERT( wxIsupper_l(wxT('\xc7'), locFR) );
 250
 251
 252     // italian
 253
 254     if (!wxLocale::IsAvailable(wxLANGUAGE_ITALIAN))
 255         return;     // you should have italian support installed to continue this test!
 256
 257     wxXLocale locIT(wxLANGUAGE_ITALIAN);
 258     CPPUNIT_ASSERT( locIT.IsOk() ); // doesn't make sense to continue otherwise
 259
 260     TestCtypeFunctionsWith(locIT);
 261
 262     CPPUNIT_ASSERT( wxIsalpha_l(wxT('\xe1'), locIT) );
 263     CPPUNIT_ASSERT( wxIslower_l(wxT('\xe1'), locIT) );
 264 #endif
 265 }
 266
 267 void XLocaleTestCase::TestStdlibFunctions()
 268 {
 269     TestStdlibFunctionsWith(wxCLocale);
 270
 271 #if wxUSE_UNICODE
 272     wchar_t* endptr;
 273 #else
 274     char* endptr;
 275 #endif
 276
 277     // strtod checks specific for C locale
 278     endptr = NULL;
 279     CPPUNIT_ASSERT_EQUAL( 0.0,        wxStrtod_l(wxT("0.000"), NULL, wxCLocale) );
 280     CPPUNIT_ASSERT_EQUAL( 1.234,      wxStrtod_l(wxT("1.234"), NULL, wxCLocale) );
 281     CPPUNIT_ASSERT_EQUAL( -1.234E-5,  wxStrtod_l(wxT("-1.234E-5"), NULL, wxCLocale) );
 282     CPPUNIT_ASSERT_EQUAL( 365.24,     wxStrtod_l(wxT("365.24 29.53"), &endptr, wxCLocale) );
 283     CPPUNIT_ASSERT_EQUAL( 29.53,      wxStrtod_l(endptr, NULL, wxCLocale) );
 284
 285 #ifdef wxHAS_XLOCALE_SUPPORT
 286
 287     // french
 288
 289     if (!wxLocale::IsAvailable(wxLANGUAGE_FRENCH))
 290         return;     // you should have french support installed to continue this test!
 291
 292     wxXLocale locFR(wxLANGUAGE_FRENCH);
 293     CPPUNIT_ASSERT( locFR.IsOk() ); // doesn't make sense to continue otherwise
 294
 295     TestCtypeFunctionsWith(locFR);
 296
 297     // comma as decimal point:
 298     CPPUNIT_ASSERT_EQUAL( 1.234, wxStrtod_l(wxT("1,234"), NULL, locFR) );
 299
 300     // space as thousands separator is not recognized by wxStrtod_l():
 301     CPPUNIT_ASSERT( 1234.5 != wxStrtod_l(wxT("1 234,5"), NULL, locFR) );
 302
 303
 304     // italian
 305
 306     if (!wxLocale::IsAvailable(wxLANGUAGE_ITALIAN))
 307         return;     // you should have italian support installed to continue this test!
 308
 309     wxXLocale locIT(wxLANGUAGE_ITALIAN);
 310     CPPUNIT_ASSERT( locIT.IsOk() ); // doesn't make sense to continue otherwise
 311
 312     TestStdlibFunctionsWith(locIT);
 313
 314     // comma as decimal point:
 315     CPPUNIT_ASSERT_EQUAL( 1.234, wxStrtod_l(wxT("1,234"), NULL, locIT) );
 316
 317     // dot as thousands separator is not recognized by wxStrtod_l():
 318     CPPUNIT_ASSERT( 1234.5 != wxStrtod_l(wxT("1.234,5"), NULL, locIT) );
 319 #endif
 320 }
 321
 322 #endif // wxUSE_XLOCALE