- putchar('.');
- fflush(stdout);
- }
-
- nTested++;
- }
-
- wxPuts(_T(" done!"));
-}
-
-static void TestMultiplication()
-{
- wxPuts(_T("*** Testing wxLongLong multiplication ***\n"));
-
- wxLongLong a, b;
- size_t nTested = 0;
- for ( size_t n = 0; n < 100000; n++ )
- {
- a = RAND_LL();
- b = RAND_LL();
-
-#if wxUSE_LONGLONG_NATIVE
- wxLongLongNative aa(a.GetHi(), a.GetLo());
- wxLongLongNative bb(b.GetHi(), b.GetLo());
-
- wxASSERT_MSG( a*b == aa*bb, "multiplication failure" );
-#else // !wxUSE_LONGLONG_NATIVE
- wxPuts(_T("Can't do it without native long long type, test skipped."));
-
- return;
-#endif // wxUSE_LONGLONG_NATIVE
-
- if ( !(nTested % 1000) )
- {
- putchar('.');
- fflush(stdout);
- }
-
- nTested++;
- }
-
- wxPuts(_T(" done!"));
-}
-
-static void TestDivision()
-{
- wxPuts(_T("*** Testing wxLongLong division ***\n"));
-
- wxLongLong q, r;
- size_t nTested = 0;
- for ( size_t n = 0; n < 100000; n++ )
- {
- // get a random wxLongLong (shifting by 12 the MSB ensures that the
- // multiplication will not overflow)
- wxLongLong ll = MAKE_LL((rand() >> 12), rand(), rand(), rand());
-
- // get a random (but non null) long (not wxLongLong for now) to divide
- // it with
- long l;
- do
- {
- l = rand();
- }
- while ( !l );
-
- q = ll / l;
- r = ll % l;
-
-#if wxUSE_LONGLONG_NATIVE
- wxLongLongNative m(ll.GetHi(), ll.GetLo());
-
- wxLongLongNative p = m / l, s = m % l;
- wxASSERT_MSG( q == p && r == s, "division failure" );
-#else // !wxUSE_LONGLONG_NATIVE
- // verify the result
- wxASSERT_MSG( ll == q*l + r, "division failure" );
-#endif // wxUSE_LONGLONG_NATIVE
-
- if ( !(nTested % 1000) )
- {
- putchar('.');
- fflush(stdout);
- }
-
- nTested++;
- }
-
- wxPuts(_T(" done!"));
-}
-
-static void TestAddition()
-{
- wxPuts(_T("*** Testing wxLongLong addition ***\n"));
-
- wxLongLong a, b, c;
- size_t nTested = 0;
- for ( size_t n = 0; n < 100000; n++ )
- {
- a = RAND_LL();
- b = RAND_LL();
- c = a + b;
-
-#if wxUSE_LONGLONG_NATIVE
- wxASSERT_MSG( c == wxLongLongNative(a.GetHi(), a.GetLo()) +
- wxLongLongNative(b.GetHi(), b.GetLo()),
- "addition failure" );
-#else // !wxUSE_LONGLONG_NATIVE
- wxASSERT_MSG( c - b == a, "addition failure" );
-#endif // wxUSE_LONGLONG_NATIVE
-
- if ( !(nTested % 1000) )
- {
- putchar('.');
- fflush(stdout);
- }
-
- nTested++;
- }
-
- wxPuts(_T(" done!"));
-}
-
-static void TestBitOperations()
-{
- wxPuts(_T("*** Testing wxLongLong bit operation ***\n"));
-
- wxLongLong ll;
- size_t nTested = 0;
- for ( size_t n = 0; n < 100000; n++ )
- {
- ll = RAND_LL();
-
-#if wxUSE_LONGLONG_NATIVE
- for ( size_t n = 0; n < 33; n++ )
- {
- }
-#else // !wxUSE_LONGLONG_NATIVE
- wxPuts(_T("Can't do it without native long long type, test skipped."));
-
- return;
-#endif // wxUSE_LONGLONG_NATIVE
-
- if ( !(nTested % 1000) )
- {
- putchar('.');
- fflush(stdout);
- }
-
- nTested++;
- }
-
- wxPuts(_T(" done!"));
-}
-
-static void TestLongLongComparison()
-{
-#if wxUSE_LONGLONG_WX
- wxPuts(_T("*** Testing wxLongLong comparison ***\n"));
-
- static const long ls[2] =
- {
- 0x1234,
- -0x1234,
- };
-
- wxLongLongWx lls[2];
- lls[0] = ls[0];
- lls[1] = ls[1];
-
- for ( size_t n = 0; n < WXSIZEOF(testLongs); n++ )
- {
- bool res;
-
- for ( size_t m = 0; m < WXSIZEOF(lls); m++ )
- {
- res = lls[m] > testLongs[n];
- wxPrintf(_T("0x%lx > 0x%lx is %s (%s)\n"),
- ls[m], testLongs[n], res ? "true" : "false",
- res == (ls[m] > testLongs[n]) ? "ok" : "ERROR");
-
- res = lls[m] < testLongs[n];
- wxPrintf(_T("0x%lx < 0x%lx is %s (%s)\n"),
- ls[m], testLongs[n], res ? "true" : "false",
- res == (ls[m] < testLongs[n]) ? "ok" : "ERROR");
-
- res = lls[m] == testLongs[n];
- wxPrintf(_T("0x%lx == 0x%lx is %s (%s)\n"),
- ls[m], testLongs[n], res ? "true" : "false",
- res == (ls[m] == testLongs[n]) ? "ok" : "ERROR");
- }
- }
-#endif // wxUSE_LONGLONG_WX
-}
-
-static void TestLongLongToString()
-{
- wxPuts(_T("*** Testing wxLongLong::ToString() ***\n"));
-
- for ( size_t n = 0; n < WXSIZEOF(testLongs); n++ )
- {
- wxLongLong ll = testLongs[n];
- wxPrintf(_T("%ld == %s\n"), testLongs[n], ll.ToString().c_str());
- }
-
- wxLongLong ll(0x12345678, 0x87654321);
- wxPrintf(_T("0x1234567887654321 = %s\n"), ll.ToString().c_str());
-
- ll.Negate();
- wxPrintf(_T("-0x1234567887654321 = %s\n"), ll.ToString().c_str());
-}
-
-static void TestLongLongPrintf()
-{
- wxPuts(_T("*** Testing wxLongLong printing ***\n"));
-
-#ifdef wxLongLongFmtSpec
- wxLongLong ll = wxLL(0x1234567890abcdef);
- wxString s = wxString::Format(_T("%") wxLongLongFmtSpec _T("x"), ll);
- wxPrintf(_T("0x1234567890abcdef -> %s (%s)\n"),
- s.c_str(), s == _T("1234567890abcdef") ? _T("ok") : _T("ERROR"));
-#else // !wxLongLongFmtSpec
- #error "wxLongLongFmtSpec not defined for this compiler/platform"
-#endif
-}
-
-#undef MAKE_LL
-#undef RAND_LL
-
-#endif // TEST_LONGLONG
-
-// ----------------------------------------------------------------------------
-// path list
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_PATHLIST
-
-#ifdef __UNIX__
- #define CMD_IN_PATH _T("ls")
-#else
- #define CMD_IN_PATH _T("command.com")
-#endif
-
-static void TestPathList()
-{
- wxPuts(_T("*** Testing wxPathList ***\n"));
-
- wxPathList pathlist;
- pathlist.AddEnvList(_T("PATH"));
- wxString path = pathlist.FindValidPath(CMD_IN_PATH);
- if ( path.empty() )
- {
- wxPrintf(_T("ERROR: command not found in the path.\n"));
- }
- else
- {
- wxPrintf(_T("Command found in the path as '%s'.\n"), path.c_str());
- }
-}
-
-#endif // TEST_PATHLIST
-
-// ----------------------------------------------------------------------------
-// regular expressions
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_REGEX
-
-#include "wx/regex.h"
-
-static void TestRegExCompile()
-{
- wxPuts(_T("*** Testing RE compilation ***\n"));
-
- static struct RegExCompTestData
- {
- const wxChar *pattern;
- bool correct;
- } regExCompTestData[] =
- {
- { _T("foo"), true },
- { _T("foo("), false },
- { _T("foo(bar"), false },
- { _T("foo(bar)"), true },
- { _T("foo["), false },
- { _T("foo[bar"), false },
- { _T("foo[bar]"), true },
- { _T("foo{"), true },
- { _T("foo{1"), false },
- { _T("foo{bar"), true },
- { _T("foo{1}"), true },
- { _T("foo{1,2}"), true },
- { _T("foo{bar}"), true },
- { _T("foo*"), true },
- { _T("foo**"), false },
- { _T("foo+"), true },
- { _T("foo++"), false },
- { _T("foo?"), true },
- { _T("foo??"), false },
- { _T("foo?+"), false },
- };
-
- wxRegEx re;
- for ( size_t n = 0; n < WXSIZEOF(regExCompTestData); n++ )
- {
- const RegExCompTestData& data = regExCompTestData[n];
- bool ok = re.Compile(data.pattern);
-
- wxPrintf(_T("'%s' is %sa valid RE (%s)\n"),
- data.pattern,
- ok ? _T("") : _T("not "),
- ok == data.correct ? _T("ok") : _T("ERROR"));
- }
-}
-
-static void TestRegExMatch()
-{
- wxPuts(_T("*** Testing RE matching ***\n"));
-
- static struct RegExMatchTestData
- {
- const wxChar *pattern;
- const wxChar *text;
- bool correct;
- } regExMatchTestData[] =
- {
- { _T("foo"), _T("bar"), false },
- { _T("foo"), _T("foobar"), true },
- { _T("^foo"), _T("foobar"), true },
- { _T("^foo"), _T("barfoo"), false },
- { _T("bar$"), _T("barbar"), true },
- { _T("bar$"), _T("barbar "), false },
- };
-
- for ( size_t n = 0; n < WXSIZEOF(regExMatchTestData); n++ )
- {
- const RegExMatchTestData& data = regExMatchTestData[n];
-
- wxRegEx re(data.pattern);
- bool ok = re.Matches(data.text);
-
- wxPrintf(_T("'%s' %s %s (%s)\n"),
- data.pattern,
- ok ? _T("matches") : _T("doesn't match"),
- data.text,
- ok == data.correct ? _T("ok") : _T("ERROR"));
- }
-}
-
-static void TestRegExSubmatch()
-{
- wxPuts(_T("*** Testing RE subexpressions ***\n"));
-
- wxRegEx re(_T("([[:alpha:]]+) ([[:alpha:]]+) ([[:digit:]]+).*([[:digit:]]+)$"));
- if ( !re.IsValid() )
- {
- wxPuts(_T("ERROR: compilation failed."));
- return;
- }
-
- wxString text = _T("Fri Jul 13 18:37:52 CEST 2001");
-
- if ( !re.Matches(text) )
- {
- wxPuts(_T("ERROR: match expected."));
- }
- else
- {
- wxPrintf(_T("Entire match: %s\n"), re.GetMatch(text).c_str());
-
- wxPrintf(_T("Date: %s/%s/%s, wday: %s\n"),
- re.GetMatch(text, 3).c_str(),
- re.GetMatch(text, 2).c_str(),
- re.GetMatch(text, 4).c_str(),
- re.GetMatch(text, 1).c_str());
- }
-}
-
-static void TestRegExReplacement()
-{
- wxPuts(_T("*** Testing RE replacement ***"));
-
- static struct RegExReplTestData
- {
- const wxChar *text;
- const wxChar *repl;
- const wxChar *result;
- size_t count;
- } regExReplTestData[] =
- {
- { _T("foo123"), _T("bar"), _T("bar"), 1 },
- { _T("foo123"), _T("\\2\\1"), _T("123foo"), 1 },
- { _T("foo_123"), _T("\\2\\1"), _T("123foo"), 1 },
- { _T("123foo"), _T("bar"), _T("123foo"), 0 },
- { _T("123foo456foo"), _T("&&"), _T("123foo456foo456foo"), 1 },
- { _T("foo123foo123"), _T("bar"), _T("barbar"), 2 },
- { _T("foo123_foo456_foo789"), _T("bar"), _T("bar_bar_bar"), 3 },
- };
-
- const wxChar *pattern = _T("([a-z]+)[^0-9]*([0-9]+)");
- wxRegEx re(pattern);
-
- wxPrintf(_T("Using pattern '%s' for replacement.\n"), pattern);
-
- for ( size_t n = 0; n < WXSIZEOF(regExReplTestData); n++ )
- {
- const RegExReplTestData& data = regExReplTestData[n];
-
- wxString text = data.text;
- size_t nRepl = re.Replace(&text, data.repl);
-
- wxPrintf(_T("%s =~ s/RE/%s/g: %u match%s, result = '%s' ("),
- data.text, data.repl,
- nRepl, nRepl == 1 ? _T("") : _T("es"),
- text.c_str());
- if ( text == data.result && nRepl == data.count )
- {
- wxPuts(_T("ok)"));
- }
- else
- {
- wxPrintf(_T("ERROR: should be %u and '%s')\n"),
- data.count, data.result);
- }
- }
-}
-
-static void TestRegExInteractive()
-{
- wxPuts(_T("*** Testing RE interactively ***"));
-
- for ( ;; )
- {
- wxChar pattern[128];
- wxPrintf(_T("\nEnter a pattern: "));
- if ( !wxFgets(pattern, WXSIZEOF(pattern), stdin) )
- break;
-
- // kill the last '\n'
- pattern[wxStrlen(pattern) - 1] = 0;
-
- wxRegEx re;
- if ( !re.Compile(pattern) )
- {
- continue;
projects / wxWidgets.git / blobdiff