-// ----------------------------------------------------------------------------
-// conditional compilation
-// ----------------------------------------------------------------------------
-
-// what to test (in alphabetic order)?
-
-//#define TEST_ARRAYS
-//#define TEST_CMDLINE
-//#define TEST_DATETIME
-//#define TEST_DIR
-//#define TEST_EXECUTE
-//#define TEST_FILECONF
-//#define TEST_HASH
-//#define TEST_LOG
-//#define TEST_LONGLONG
-//#define TEST_MIME
-#define TEST_INFO_FUNCTIONS
-//#define TEST_SOCKETS
-//#define TEST_STRINGS
-//#define TEST_THREADS
-//#define TEST_TIMER
-
-// ============================================================================
-// implementation
-// ============================================================================
-
-// ----------------------------------------------------------------------------
-// helper functions
-// ----------------------------------------------------------------------------
-
-#if defined(TEST_STRINGS) || defined(TEST_SOCKETS)
-
-// replace TABs with \t and CRs with \n
-static wxString MakePrintable(const wxChar *s)
-{
- wxString str(s);
- (void)str.Replace(_T("\t"), _T("\\t"));
- (void)str.Replace(_T("\n"), _T("\\n"));
- (void)str.Replace(_T("\r"), _T("\\r"));
-
- return str;
-}
-
-#endif // MakePrintable() is used
-
-// ----------------------------------------------------------------------------
-// wxCmdLineParser
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_CMDLINE
-
-#include <wx/cmdline.h>
-#include <wx/datetime.h>
-
-static void ShowCmdLine(const wxCmdLineParser& parser)
-{
- wxString s = "Input files: ";
-
- size_t count = parser.GetParamCount();
- for ( size_t param = 0; param < count; param++ )
- {
- s << parser.GetParam(param) << ' ';
- }
-
- s << '\n'
- << "Verbose:\t" << (parser.Found("v") ? "yes" : "no") << '\n'
- << "Quiet:\t" << (parser.Found("q") ? "yes" : "no") << '\n';
-
- wxString strVal;
- long lVal;
- wxDateTime dt;
- if ( parser.Found("o", &strVal) )
- s << "Output file:\t" << strVal << '\n';
- if ( parser.Found("i", &strVal) )
- s << "Input dir:\t" << strVal << '\n';
- if ( parser.Found("s", &lVal) )
- s << "Size:\t" << lVal << '\n';
- if ( parser.Found("d", &dt) )
- s << "Date:\t" << dt.FormatISODate() << '\n';
-
- wxLogMessage(s);
-}
-
-#endif // TEST_CMDLINE
-
-// ----------------------------------------------------------------------------
-// wxDir
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_DIR
-
-#include <wx/dir.h>
-
-static void TestDirEnumHelper(wxDir& dir,
- int flags = wxDIR_DEFAULT,
- const wxString& filespec = wxEmptyString)
-{
- wxString filename;
-
- if ( !dir.IsOpened() )
- return;
-
- bool cont = dir.GetFirst(&filename, filespec, flags);
- while ( cont )
- {
- printf("\t%s\n", filename.c_str());
-
- cont = dir.GetNext(&filename);
- }
-
- puts("");
-}
-
-static void TestDirEnum()
-{
- wxDir dir(wxGetCwd());
-
- puts("Enumerating everything in current directory:");
- TestDirEnumHelper(dir);
-
- puts("Enumerating really everything in current directory:");
- TestDirEnumHelper(dir, wxDIR_DEFAULT | wxDIR_DOTDOT);
-
- puts("Enumerating object files in current directory:");
- TestDirEnumHelper(dir, wxDIR_DEFAULT, "*.o");
-
- puts("Enumerating directories in current directory:");
- TestDirEnumHelper(dir, wxDIR_DIRS);
-
- puts("Enumerating files in current directory:");
- TestDirEnumHelper(dir, wxDIR_FILES);
-
- puts("Enumerating files including hidden in current directory:");
- TestDirEnumHelper(dir, wxDIR_FILES | wxDIR_HIDDEN);
-
-#ifdef __UNIX__
- dir.Open("/");
-#elif defined(__WXMSW__)
- dir.Open("c:\\");
-#else
- #error "don't know where the root directory is"
-#endif
-
- puts("Enumerating everything in root directory:");
- TestDirEnumHelper(dir, wxDIR_DEFAULT);
-
- puts("Enumerating directories in root directory:");
- TestDirEnumHelper(dir, wxDIR_DIRS);
-
- puts("Enumerating files in root directory:");
- TestDirEnumHelper(dir, wxDIR_FILES);
-
- puts("Enumerating files including hidden in root directory:");
- TestDirEnumHelper(dir, wxDIR_FILES | wxDIR_HIDDEN);
-
- puts("Enumerating files in non existing directory:");
- wxDir dirNo("nosuchdir");
- TestDirEnumHelper(dirNo);
-}
-
-#endif // TEST_DIR
-
-// ----------------------------------------------------------------------------
-// wxExecute
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_EXECUTE
-
-#include <wx/utils.h>
-
-static void TestExecute()
-{
- puts("*** testing wxExecute ***");
-
-#ifdef __UNIX__
- #define COMMAND "echo hi"
- #define SHELL_COMMAND "echo hi from shell"
- #define REDIRECT_COMMAND "date"
-#elif defined(__WXMSW__)
- #define COMMAND "command.com -c 'echo hi'"
- #define SHELL_COMMAND "echo hi"
- #define REDIRECT_COMMAND COMMAND
-#else
- #error "no command to exec"
-#endif // OS
-
- printf("Testing wxShell: ");
- fflush(stdout);
- if ( wxShell(SHELL_COMMAND) )
- puts("Ok.");
- else
- puts("ERROR.");
-
- printf("Testing wxExecute: ");
- fflush(stdout);
- if ( wxExecute(COMMAND, TRUE /* sync */) == 0 )
- puts("Ok.");
- else
- puts("ERROR.");
-
-#if 0 // no, it doesn't work (yet?)
- printf("Testing async wxExecute: ");
- fflush(stdout);
- if ( wxExecute(COMMAND) != 0 )
- puts("Ok (command launched).");
- else
- puts("ERROR.");
-#endif // 0
-
- printf("Testing wxExecute with redirection:\n");
- wxArrayString output;
- if ( wxExecute(REDIRECT_COMMAND, output) != 0 )
- {
- puts("ERROR.");
- }
- else
- {
- size_t count = output.GetCount();
- for ( size_t n = 0; n < count; n++ )
- {
- printf("\t%s\n", output[n].c_str());
- }
-
- puts("Ok.");
- }
-}
-
-#endif // TEST_EXECUTE
-
-// ----------------------------------------------------------------------------
-// wxFileConfig
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_FILECONF
-
-#include <wx/confbase.h>
-#include <wx/fileconf.h>
-
-static const struct FileConfTestData
-{
- const wxChar *name; // value name
- const wxChar *value; // the value from the file
-} fcTestData[] =
-{
- { _T("value1"), _T("one") },
- { _T("value2"), _T("two") },
- { _T("novalue"), _T("default") },
-};
-
-static void TestFileConfRead()
-{
- puts("*** testing wxFileConfig loading/reading ***");
-
- wxFileConfig fileconf(_T("test"), wxEmptyString,
- _T("testdata.fc"), wxEmptyString,
- wxCONFIG_USE_RELATIVE_PATH);
-
- // test simple reading
- puts("\nReading config file:");
- wxString defValue(_T("default")), value;
- for ( size_t n = 0; n < WXSIZEOF(fcTestData); n++ )
- {
- const FileConfTestData& data = fcTestData[n];
- value = fileconf.Read(data.name, defValue);
- printf("\t%s = %s ", data.name, value.c_str());
- if ( value == data.value )
- {
- puts("(ok)");
- }
- else
- {
- printf("(ERROR: should be %s)\n", data.value);
- }
- }
-
- // test enumerating the entries
- puts("\nEnumerating all root entries:");
- long dummy;
- wxString name;
- bool cont = fileconf.GetFirstEntry(name, dummy);
- while ( cont )
- {
- printf("\t%s = %s\n",
- name.c_str(),
- fileconf.Read(name.c_str(), _T("ERROR")).c_str());
-
- cont = fileconf.GetNextEntry(name, dummy);
- }
-}
-
-#endif // TEST_FILECONF
-
-// ----------------------------------------------------------------------------
-// wxHashTable
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_HASH
-
-#include <wx/hash.h>
-
-struct Foo
-{
- Foo(int n_) { n = n_; count++; }
- ~Foo() { count--; }
-
- int n;
-
- static size_t count;
-};
-
-size_t Foo::count = 0;
-
-WX_DECLARE_LIST(Foo, wxListFoos);
-WX_DECLARE_HASH(Foo, wxListFoos, wxHashFoos);
-
-#include <wx/listimpl.cpp>
-
-WX_DEFINE_LIST(wxListFoos);
-
-static void TestHash()
-{
- puts("*** Testing wxHashTable ***\n");
-
- {
- wxHashFoos hash;
- hash.DeleteContents(TRUE);
-
- printf("Hash created: %u foos in hash, %u foos totally\n",
- hash.GetCount(), Foo::count);
-
- static const int hashTestData[] =
- {
- 0, 1, 17, -2, 2, 4, -4, 345, 3, 3, 2, 1,
- };
-
- size_t n;
- for ( n = 0; n < WXSIZEOF(hashTestData); n++ )
- {
- hash.Put(hashTestData[n], n, new Foo(n));
- }
-
- printf("Hash filled: %u foos in hash, %u foos totally\n",
- hash.GetCount(), Foo::count);
-
- puts("Hash access test:");
- for ( n = 0; n < WXSIZEOF(hashTestData); n++ )
- {
- printf("\tGetting element with key %d, value %d: ",
- hashTestData[n], n);
- Foo *foo = hash.Get(hashTestData[n], n);
- if ( !foo )
- {
- printf("ERROR, not found.\n");
- }
- else
- {
- printf("%d (%s)\n", foo->n,
- (size_t)foo->n == n ? "ok" : "ERROR");
- }
- }
-
- printf("\nTrying to get an element not in hash: ");
-
- if ( hash.Get(1234) || hash.Get(1, 0) )
- {
- puts("ERROR: found!");
- }
- else
- {
- puts("ok (not found)");
- }
- }
-
- printf("Hash destroyed: %u foos left\n", Foo::count);
-}
-
-#endif // TEST_HASH
-
-// ----------------------------------------------------------------------------
-// MIME types
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_MIME
-
-#include <wx/mimetype.h>
-
-static void TestMimeEnum()
-{
- wxMimeTypesManager mimeTM;
- wxArrayString mimetypes;
-
- size_t count = mimeTM.EnumAllFileTypes(mimetypes);
-
- printf("*** All %u known filetypes: ***\n", count);
-
- wxArrayString exts;
- wxString desc;
-
- for ( size_t n = 0; n < count; n++ )
- {
- wxFileType *filetype = mimeTM.GetFileTypeFromMimeType(mimetypes[n]);
- if ( !filetype )
- {
- printf("nothing known about the filetype '%s'!\n",
- mimetypes[n].c_str());
- continue;
- }
-
- filetype->GetDescription(&desc);
- filetype->GetExtensions(exts);
-
- filetype->GetIcon(NULL);
-
- wxString extsAll;
- for ( size_t e = 0; e < exts.GetCount(); e++ )
- {
- if ( e > 0 )
- extsAll << _T(", ");
- extsAll += exts[e];
- }
-
- printf("\t%s: %s (%s)\n",
- mimetypes[n].c_str(), desc.c_str(), extsAll.c_str());
- }
-}
-
-#endif // TEST_MIME
-
-// ----------------------------------------------------------------------------
-// misc information functions
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_INFO_FUNCTIONS
-
-#include <wx/utils.h>
-
-static void TestOsInfo()
-{
- puts("*** Testing OS info functions ***\n");
-
- int major, minor;
- wxGetOsVersion(&major, &minor);
- printf("Running under: %s, version %d.%d\n",
- wxGetOsDescription().c_str(), major, minor);
-
- printf("%ld free bytes of memory left.\n", wxGetFreeMemory());
-
- printf("Host name is %s (%s).\n",
- wxGetHostName().c_str(), wxGetFullHostName().c_str());
-
- puts("");
-}
-
-static void TestUserInfo()
-{
- puts("*** Testing user info functions ***\n");
-
- printf("User id is:\t%s\n", wxGetUserId().c_str());
- printf("User name is:\t%s\n", wxGetUserName().c_str());
- printf("Home dir is:\t%s\n", wxGetHomeDir().c_str());
- printf("Email address:\t%s\n", wxGetEmailAddress().c_str());
-
- puts("");
-}
-
-#endif // TEST_INFO_FUNCTIONS
-
-// ----------------------------------------------------------------------------
-// long long
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_LONGLONG
-
-#include <wx/longlong.h>
-#include <wx/timer.h>
-
-// make a 64 bit number from 4 16 bit ones
-#define MAKE_LL(x1, x2, x3, x4) wxLongLong((x1 << 16) | x2, (x3 << 16) | x3)
-
-// get a random 64 bit number
-#define RAND_LL() MAKE_LL(rand(), rand(), rand(), rand())
-
-#if wxUSE_LONGLONG_WX
-inline bool operator==(const wxLongLongWx& a, const wxLongLongNative& b)
- { return a.GetHi() == b.GetHi() && a.GetLo() == b.GetLo(); }
-inline bool operator==(const wxLongLongNative& a, const wxLongLongWx& b)
- { return a.GetHi() == b.GetHi() && a.GetLo() == b.GetLo(); }
-#endif // wxUSE_LONGLONG_WX
-
-static void TestSpeed()
-{
- static const long max = 100000000;
- long n;
-
- {
- wxStopWatch sw;
-
- long l = 0;
- for ( n = 0; n < max; n++ )
- {
- l += n;
- }
-
- printf("Summing longs took %ld milliseconds.\n", sw.Time());
- }
-
-#if wxUSE_LONGLONG_NATIVE
- {
- wxStopWatch sw;
-
- wxLongLong_t l = 0;
- for ( n = 0; n < max; n++ )
- {
- l += n;
- }
-
- printf("Summing wxLongLong_t took %ld milliseconds.\n", sw.Time());
- }
-#endif // wxUSE_LONGLONG_NATIVE
-
- {
- wxStopWatch sw;
-
- wxLongLong l;
- for ( n = 0; n < max; n++ )
- {
- l += n;
- }
-
- printf("Summing wxLongLongs took %ld milliseconds.\n", sw.Time());
- }
-}
-
-static void TestLongLongConversion()
-{
- puts("*** Testing wxLongLong conversions ***\n");
-
- wxLongLong a;
- size_t nTested = 0;
- for ( size_t n = 0; n < 100000; n++ )
- {
- a = RAND_LL();
-
-#if wxUSE_LONGLONG_NATIVE
- wxLongLongNative b(a.GetHi(), a.GetLo());
-
- wxASSERT_MSG( a == b, "conversions failure" );
-#else
- puts("Can't do it without native long long type, test skipped.");
-
- return;
-#endif // wxUSE_LONGLONG_NATIVE
-
- if ( !(nTested % 1000) )
- {
- putchar('.');
- fflush(stdout);
- }
-
- nTested++;
- }
-
- puts(" done!");
-}
-
-static void TestMultiplication()
-{
- puts("*** 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
- puts("Can't do it without native long long type, test skipped.");
-
- return;
-#endif // wxUSE_LONGLONG_NATIVE
-
- if ( !(nTested % 1000) )
- {
- putchar('.');
- fflush(stdout);
- }
-
- nTested++;
- }
-
- puts(" done!");
-}
-
-static void TestDivision()
-{
- puts("*** 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 long (not wxLongLong for now) to divide it with
- long l = rand();
- 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++;
- }
-
- puts(" done!");
-}
-
-static void TestAddition()
-{
- puts("*** 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++;
- }
-
- puts(" done!");
-}
-
-static void TestBitOperations()
-{
- puts("*** Testing wxLongLong bit operation ***\n");
-
- wxLongLong a, c;
- size_t nTested = 0;
- for ( size_t n = 0; n < 100000; n++ )
- {
- a = RAND_LL();
-
-#if wxUSE_LONGLONG_NATIVE
- for ( size_t n = 0; n < 33; n++ )
- {
- wxLongLongNative b(a.GetHi(), a.GetLo());
-
- b >>= n;
- c = a >> n;
-
- wxASSERT_MSG( b == c, "bit shift failure" );
-
- b = wxLongLongNative(a.GetHi(), a.GetLo()) << n;
- c = a << n;
-
- wxASSERT_MSG( b == c, "bit shift failure" );
- }
-
-#else // !wxUSE_LONGLONG_NATIVE
- puts("Can't do it without native long long type, test skipped.");
-
- return;
-#endif // wxUSE_LONGLONG_NATIVE
-
- if ( !(nTested % 1000) )
- {
- putchar('.');
- fflush(stdout);
- }
-
- nTested++;
- }
-
- puts(" done!");
-}
-
-#undef MAKE_LL
-#undef RAND_LL
-
-#endif // TEST_LONGLONG
-
-// ----------------------------------------------------------------------------
-// sockets
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_SOCKETS
-
-#include <wx/socket.h>
-#include <wx/protocol/protocol.h>
-#include <wx/protocol/ftp.h>
-#include <wx/protocol/http.h>
-
-static void TestSocketServer()
-{
- puts("*** Testing wxSocketServer ***\n");
-
- static const int PORT = 3000;
-
- wxIPV4address addr;
- addr.Service(PORT);
-
- wxSocketServer *server = new wxSocketServer(addr);
- if ( !server->Ok() )
- {
- puts("ERROR: failed to bind");
-
- return;
- }
-
- for ( ;; )
- {
- printf("Server: waiting for connection on port %d...\n", PORT);
-
- wxSocketBase *socket = server->Accept();
- if ( !socket )
- {
- puts("ERROR: wxSocketServer::Accept() failed.");
- break;
- }
-
- puts("Server: got a client.");
-
- server->SetTimeout(60); // 1 min
-
- while ( socket->IsConnected() )
- {
- wxString s;
- char ch = '\0';
- for ( ;; )
- {
- if ( socket->Read(&ch, sizeof(ch)).Error() )
- {
- // don't log error if the client just close the connection
- if ( socket->IsConnected() )
- {
- puts("ERROR: in wxSocket::Read.");
- }
-
- break;
- }
-
- if ( ch == '\r' )
- continue;
-
- if ( ch == '\n' )
- break;
-
- s += ch;
- }
-
- if ( ch != '\n' )
- {
- break;
- }
-
- printf("Server: got '%s'.\n", s.c_str());
- if ( s == _T("bye") )
- {
- delete socket;
-
- break;
- }
-
- socket->Write(s.MakeUpper().c_str(), s.length());
- socket->Write("\r\n", 2);
- printf("Server: wrote '%s'.\n", s.c_str());
- }
-
- puts("Server: lost a client.");
-
- socket->Destroy();
- }
-
- // same as "delete server" but is consistent with GUI programs
- server->Destroy();
-}
-
-static void TestSocketClient()
-{
- puts("*** Testing wxSocketClient ***\n");
-
- static const char *hostname = "www.wxwindows.org";
-
- wxIPV4address addr;
- addr.Hostname(hostname);
- addr.Service(80);
-
- printf("--- Attempting to connect to %s:80...\n", hostname);
-
- wxSocketClient client;
- if ( !client.Connect(addr) )
- {
- printf("ERROR: failed to connect to %s\n", hostname);
- }
- else
- {
- printf("--- Connected to %s:%u...\n",
- addr.Hostname().c_str(), addr.Service());
-
- char buf[8192];
-
- // could use simply "GET" here I suppose
- wxString cmdGet =
- wxString::Format("GET http://%s/\r\n", hostname);
- client.Write(cmdGet, cmdGet.length());
- printf("--- Sent command '%s' to the server\n",
- MakePrintable(cmdGet).c_str());
- client.Read(buf, WXSIZEOF(buf));
- printf("--- Server replied:\n%s", buf);
- }
-}
-
-static void TestProtocolFtp()
-{
- puts("*** Testing wxFTP ***\n");
-
- wxLog::AddTraceMask(_T("ftp"));
-
- static const char *hostname = "ftp.wxwindows.org";
-
- printf("--- Attempting to connect to %s:21...\n", hostname);
-
- wxFTP ftp;
- if ( !ftp.Connect(hostname) )
- {
- printf("ERROR: failed to connect to %s\n", hostname);
- }
- else
- {
- printf("--- Connected to %s, current directory is '%s'\n",
- hostname, ftp.Pwd().c_str());
- if ( !ftp.ChDir(_T("pub")) )
- {
- puts("ERROR: failed to cd to pub");
- }
-
- wxArrayString files;
- if ( !ftp.GetList(files) )
- {
- puts("ERROR: failed to get list of files");
- }
- else
- {
- printf("List of files under '%s':\n", ftp.Pwd().c_str());
- size_t count = files.GetCount();
- for ( size_t n = 0; n < count; n++ )
- {
- printf("\t%s\n", files[n].c_str());
- }
- puts("End of the file list");
- }
-
- if ( !ftp.ChDir(_T("..")) )
- {
- puts("ERROR: failed to cd to ..");
- }
-
- static const char *filename = "welcome.msg";
- wxInputStream *in = ftp.GetInputStream(filename);
- if ( !in )
- {
- puts("ERROR: couldn't get input stream");
- }
- else
- {
- size_t size = in->StreamSize();
- printf("Reading file %s (%u bytes)...", filename, size);
-
- char *data = new char[size];
- if ( !in->Read(data, size) )
- {
- puts("ERROR: read error");
- }
- else
- {
- printf("\nContents of %s:\n%s\n", filename, data);
- }
-
- delete [] data;
- delete in;
- }
- }
-}
-
-#endif // TEST_SOCKETS
-
-// ----------------------------------------------------------------------------
-// timers
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_TIMER
-
-#include <wx/timer.h>
-#include <wx/utils.h>
-
-static void TestStopWatch()
-{
- puts("*** Testing wxStopWatch ***\n");
-
- wxStopWatch sw;
- printf("Sleeping 3 seconds...");
- wxSleep(3);
- printf("\telapsed time: %ldms\n", sw.Time());
-
- sw.Pause();
- printf("Sleeping 2 more seconds...");
- wxSleep(2);
- printf("\telapsed time: %ldms\n", sw.Time());
-
- sw.Resume();
- printf("And 3 more seconds...");
- wxSleep(3);
- printf("\telapsed time: %ldms\n", sw.Time());
-
- wxStopWatch sw2;
- puts("\nChecking for 'backwards clock' bug...");
- for ( size_t n = 0; n < 70; n++ )
- {
- sw2.Start();
-
- for ( size_t m = 0; m < 100000; m++ )
- {
- if ( sw.Time() < 0 || sw2.Time() < 0 )
- {
- puts("\ntime is negative - ERROR!");
- }
- }
-
- putchar('.');
- }
-
- puts(", ok.");
-}
-
-#endif // TEST_TIMER
-
-// ----------------------------------------------------------------------------
-// date time
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_DATETIME
-
-#include <wx/date.h>
-
-#include <wx/datetime.h>
-
-// the test data
-struct Date
-{
- wxDateTime::wxDateTime_t day;
- wxDateTime::Month month;
- int year;
- wxDateTime::wxDateTime_t hour, min, sec;
- double jdn;
- wxDateTime::WeekDay wday;
- time_t gmticks, ticks;
-
- void Init(const wxDateTime::Tm& tm)
- {
- day = tm.mday;
- month = tm.mon;
- year = tm.year;
- hour = tm.hour;
- min = tm.min;
- sec = tm.sec;
- jdn = 0.0;
- gmticks = ticks = -1;
- }
-
- wxDateTime DT() const
- { return wxDateTime(day, month, year, hour, min, sec); }
-
- bool SameDay(const wxDateTime::Tm& tm) const
- {
- return day == tm.mday && month == tm.mon && year == tm.year;
- }
-
- wxString Format() const
- {
- wxString s;
- s.Printf("%02d:%02d:%02d %10s %02d, %4d%s",
- hour, min, sec,
- wxDateTime::GetMonthName(month).c_str(),
- day,
- abs(wxDateTime::ConvertYearToBC(year)),
- year > 0 ? "AD" : "BC");
- return s;
- }
-
- wxString FormatDate() const
- {
- wxString s;
- s.Printf("%02d-%s-%4d%s",
- day,
- wxDateTime::GetMonthName(month, wxDateTime::Name_Abbr).c_str(),
- abs(wxDateTime::ConvertYearToBC(year)),
- year > 0 ? "AD" : "BC");
- return s;
- }
-};
-
-static const Date testDates[] =
-{
- { 1, wxDateTime::Jan, 1970, 00, 00, 00, 2440587.5, wxDateTime::Thu, 0, -3600 },
- { 21, wxDateTime::Jan, 2222, 00, 00, 00, 2532648.5, wxDateTime::Mon, -1, -1 },
- { 29, wxDateTime::May, 1976, 12, 00, 00, 2442928.0, wxDateTime::Sat, 202219200, 202212000 },
- { 29, wxDateTime::Feb, 1976, 00, 00, 00, 2442837.5, wxDateTime::Sun, 194400000, 194396400 },
- { 1, wxDateTime::Jan, 1900, 12, 00, 00, 2415021.0, wxDateTime::Mon, -1, -1 },
- { 1, wxDateTime::Jan, 1900, 00, 00, 00, 2415020.5, wxDateTime::Mon, -1, -1 },
- { 15, wxDateTime::Oct, 1582, 00, 00, 00, 2299160.5, wxDateTime::Fri, -1, -1 },
- { 4, wxDateTime::Oct, 1582, 00, 00, 00, 2299149.5, wxDateTime::Mon, -1, -1 },
- { 1, wxDateTime::Mar, 1, 00, 00, 00, 1721484.5, wxDateTime::Thu, -1, -1 },
- { 1, wxDateTime::Jan, 1, 00, 00, 00, 1721425.5, wxDateTime::Mon, -1, -1 },
- { 31, wxDateTime::Dec, 0, 00, 00, 00, 1721424.5, wxDateTime::Sun, -1, -1 },
- { 1, wxDateTime::Jan, 0, 00, 00, 00, 1721059.5, wxDateTime::Sat, -1, -1 },
- { 12, wxDateTime::Aug, -1234, 00, 00, 00, 1270573.5, wxDateTime::Fri, -1, -1 },
- { 12, wxDateTime::Aug, -4000, 00, 00, 00, 260313.5, wxDateTime::Sat, -1, -1 },
- { 24, wxDateTime::Nov, -4713, 00, 00, 00, -0.5, wxDateTime::Mon, -1, -1 },
-};
-
-// this test miscellaneous static wxDateTime functions
-static void TestTimeStatic()
-{
- puts("\n*** wxDateTime static methods test ***");
-
- // some info about the current date
- int year = wxDateTime::GetCurrentYear();
- printf("Current year %d is %sa leap one and has %d days.\n",
- year,
- wxDateTime::IsLeapYear(year) ? "" : "not ",
- wxDateTime::GetNumberOfDays(year));
-
- wxDateTime::Month month = wxDateTime::GetCurrentMonth();
- printf("Current month is '%s' ('%s') and it has %d days\n",
- wxDateTime::GetMonthName(month, wxDateTime::Name_Abbr).c_str(),
- wxDateTime::GetMonthName(month).c_str(),
- wxDateTime::GetNumberOfDays(month));
-
- // leap year logic
- static const size_t nYears = 5;
- static const size_t years[2][nYears] =
- {
- // first line: the years to test
- { 1990, 1976, 2000, 2030, 1984, },
-
- // second line: TRUE if leap, FALSE otherwise
- { FALSE, TRUE, TRUE, FALSE, TRUE }
- };
-
- for ( size_t n = 0; n < nYears; n++ )
- {
- int year = years[0][n];
- bool should = years[1][n] != 0,
- is = wxDateTime::IsLeapYear(year);
-
- printf("Year %d is %sa leap year (%s)\n",
- year,
- is ? "" : "not ",
- should == is ? "ok" : "ERROR");
-
- wxASSERT( should == wxDateTime::IsLeapYear(year) );
- }
-}
-
-// test constructing wxDateTime objects
-static void TestTimeSet()
-{
- puts("\n*** wxDateTime construction test ***");
-
- for ( size_t n = 0; n < WXSIZEOF(testDates); n++ )
- {
- const Date& d1 = testDates[n];
- wxDateTime dt = d1.DT();
-
- Date d2;
- d2.Init(dt.GetTm());
-
- wxString s1 = d1.Format(),
- s2 = d2.Format();
-
- printf("Date: %s == %s (%s)\n",
- s1.c_str(), s2.c_str(),
- s1 == s2 ? "ok" : "ERROR");
- }
-}
-
-// test time zones stuff
-static void TestTimeZones()
-{
- puts("\n*** wxDateTime timezone test ***");
-
- wxDateTime now = wxDateTime::Now();
-
- printf("Current GMT time:\t%s\n", now.Format("%c", wxDateTime::GMT0).c_str());
- printf("Unix epoch (GMT):\t%s\n", wxDateTime((time_t)0).Format("%c", wxDateTime::GMT0).c_str());
- printf("Unix epoch (EST):\t%s\n", wxDateTime((time_t)0).Format("%c", wxDateTime::EST).c_str());
- printf("Current time in Paris:\t%s\n", now.Format("%c", wxDateTime::CET).c_str());
- printf(" Moscow:\t%s\n", now.Format("%c", wxDateTime::MSK).c_str());
- printf(" New York:\t%s\n", now.Format("%c", wxDateTime::EST).c_str());
-
- wxDateTime::Tm tm = now.GetTm();
- if ( wxDateTime(tm) != now )
- {
- printf("ERROR: got %s instead of %s\n",
- wxDateTime(tm).Format().c_str(), now.Format().c_str());
- }
-}
-
-// test some minimal support for the dates outside the standard range
-static void TestTimeRange()
-{
- puts("\n*** wxDateTime out-of-standard-range dates test ***");
-
- static const char *fmt = "%d-%b-%Y %H:%M:%S";
-
- printf("Unix epoch:\t%s\n",
- wxDateTime(2440587.5).Format(fmt).c_str());
- printf("Feb 29, 0: \t%s\n",
- wxDateTime(29, wxDateTime::Feb, 0).Format(fmt).c_str());
- printf("JDN 0: \t%s\n",
- wxDateTime(0.0).Format(fmt).c_str());
- printf("Jan 1, 1AD:\t%s\n",
- wxDateTime(1, wxDateTime::Jan, 1).Format(fmt).c_str());
- printf("May 29, 2099:\t%s\n",
- wxDateTime(29, wxDateTime::May, 2099).Format(fmt).c_str());
-}
-
-static void TestTimeTicks()
-{
- puts("\n*** wxDateTime ticks test ***");
-
- for ( size_t n = 0; n < WXSIZEOF(testDates); n++ )
- {
- const Date& d = testDates[n];
- if ( d.ticks == -1 )
- continue;
-
- wxDateTime dt = d.DT();
- long ticks = (dt.GetValue() / 1000).ToLong();
- printf("Ticks of %s:\t% 10ld", d.Format().c_str(), ticks);
- if ( ticks == d.ticks )
- {
- puts(" (ok)");
- }
- else
- {
- printf(" (ERROR: should be %ld, delta = %ld)\n",
- d.ticks, ticks - d.ticks);
- }
-
- dt = d.DT().ToTimezone(wxDateTime::GMT0);
- ticks = (dt.GetValue() / 1000).ToLong();
- printf("GMtks of %s:\t% 10ld", d.Format().c_str(), ticks);
- if ( ticks == d.gmticks )
- {
- puts(" (ok)");
- }
- else
- {
- printf(" (ERROR: should be %ld, delta = %ld)\n",
- d.gmticks, ticks - d.gmticks);
- }
- }
-
- puts("");
-}
-
-// test conversions to JDN &c
-static void TestTimeJDN()
-{
- puts("\n*** wxDateTime to JDN test ***");
-
- for ( size_t n = 0; n < WXSIZEOF(testDates); n++ )
- {
- const Date& d = testDates[n];
- wxDateTime dt(d.day, d.month, d.year, d.hour, d.min, d.sec);
- double jdn = dt.GetJulianDayNumber();
-
- printf("JDN of %s is:\t% 15.6f", d.Format().c_str(), jdn);
- if ( jdn == d.jdn )
- {
- puts(" (ok)");
- }
- else
- {
- printf(" (ERROR: should be %f, delta = %f)\n",
- d.jdn, jdn - d.jdn);
- }
- }
-}
-
-// test week days computation
-static void TestTimeWDays()
-{
- puts("\n*** wxDateTime weekday test ***");
-
- // test GetWeekDay()
- size_t n;
- for ( n = 0; n < WXSIZEOF(testDates); n++ )
- {
- const Date& d = testDates[n];
- wxDateTime dt(d.day, d.month, d.year, d.hour, d.min, d.sec);
-
- wxDateTime::WeekDay wday = dt.GetWeekDay();
- printf("%s is: %s",
- d.Format().c_str(),
- wxDateTime::GetWeekDayName(wday).c_str());
- if ( wday == d.wday )
- {
- puts(" (ok)");
- }
- else
- {
- printf(" (ERROR: should be %s)\n",
- wxDateTime::GetWeekDayName(d.wday).c_str());
- }
- }
-
- puts("");
-
- // test SetToWeekDay()
- struct WeekDateTestData
- {
- Date date; // the real date (precomputed)
- int nWeek; // its week index in the month
- wxDateTime::WeekDay wday; // the weekday
- wxDateTime::Month month; // the month
- int year; // and the year
-
- wxString Format() const
- {
- wxString s, which;
- switch ( nWeek < -1 ? -nWeek : nWeek )
- {
- case 1: which = "first"; break;
- case 2: which = "second"; break;
- case 3: which = "third"; break;
- case 4: which = "fourth"; break;
- case 5: which = "fifth"; break;
-
- case -1: which = "last"; break;
- }
-
- if ( nWeek < -1 )
- {
- which += " from end";
- }
-
- s.Printf("The %s %s of %s in %d",
- which.c_str(),
- wxDateTime::GetWeekDayName(wday).c_str(),
- wxDateTime::GetMonthName(month).c_str(),
- year);
-
- return s;
- }
- };
-
- // the array data was generated by the following python program
- /*
-from DateTime import *
-from whrandom import *
-from string import *
-
-monthNames = [ 'Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec' ]
-wdayNames = [ 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat', 'Sun' ]
-
-week = DateTimeDelta(7)
-
-for n in range(20):
- year = randint(1900, 2100)
- month = randint(1, 12)
- day = randint(1, 28)
- dt = DateTime(year, month, day)
- wday = dt.day_of_week
-
- countFromEnd = choice([-1, 1])
- weekNum = 0;
-
- while dt.month is month:
- dt = dt - countFromEnd * week
- weekNum = weekNum + countFromEnd
-
- data = { 'day': rjust(`day`, 2), 'month': monthNames[month - 1], 'year': year, 'weekNum': rjust(`weekNum`, 2), 'wday': wdayNames[wday] }
-
- print "{ { %(day)s, wxDateTime::%(month)s, %(year)d }, %(weekNum)d, "\
- "wxDateTime::%(wday)s, wxDateTime::%(month)s, %(year)d }," % data
- */
-
- static const WeekDateTestData weekDatesTestData[] =
- {
- { { 20, wxDateTime::Mar, 2045 }, 3, wxDateTime::Mon, wxDateTime::Mar, 2045 },
- { { 5, wxDateTime::Jun, 1985 }, -4, wxDateTime::Wed, wxDateTime::Jun, 1985 },
- { { 12, wxDateTime::Nov, 1961 }, -3, wxDateTime::Sun, wxDateTime::Nov, 1961 },
- { { 27, wxDateTime::Feb, 2093 }, -1, wxDateTime::Fri, wxDateTime::Feb, 2093 },
- { { 4, wxDateTime::Jul, 2070 }, -4, wxDateTime::Fri, wxDateTime::Jul, 2070 },
- { { 2, wxDateTime::Apr, 1906 }, -5, wxDateTime::Mon, wxDateTime::Apr, 1906 },
- { { 19, wxDateTime::Jul, 2023 }, -2, wxDateTime::Wed, wxDateTime::Jul, 2023 },
- { { 5, wxDateTime::May, 1958 }, -4, wxDateTime::Mon, wxDateTime::May, 1958 },
- { { 11, wxDateTime::Aug, 1900 }, 2, wxDateTime::Sat, wxDateTime::Aug, 1900 },
- { { 14, wxDateTime::Feb, 1945 }, 2, wxDateTime::Wed, wxDateTime::Feb, 1945 },
- { { 25, wxDateTime::Jul, 1967 }, -1, wxDateTime::Tue, wxDateTime::Jul, 1967 },
- { { 9, wxDateTime::May, 1916 }, -4, wxDateTime::Tue, wxDateTime::May, 1916 },
- { { 20, wxDateTime::Jun, 1927 }, 3, wxDateTime::Mon, wxDateTime::Jun, 1927 },
- { { 2, wxDateTime::Aug, 2000 }, 1, wxDateTime::Wed, wxDateTime::Aug, 2000 },
- { { 20, wxDateTime::Apr, 2044 }, 3, wxDateTime::Wed, wxDateTime::Apr, 2044 },
- { { 20, wxDateTime::Feb, 1932 }, -2, wxDateTime::Sat, wxDateTime::Feb, 1932 },
- { { 25, wxDateTime::Jul, 2069 }, 4, wxDateTime::Thu, wxDateTime::Jul, 2069 },
- { { 3, wxDateTime::Apr, 1925 }, 1, wxDateTime::Fri, wxDateTime::Apr, 1925 },
- { { 21, wxDateTime::Mar, 2093 }, 3, wxDateTime::Sat, wxDateTime::Mar, 2093 },
- { { 3, wxDateTime::Dec, 2074 }, -5, wxDateTime::Mon, wxDateTime::Dec, 2074 },
- };
-
- static const char *fmt = "%d-%b-%Y";
-
- wxDateTime dt;
- for ( n = 0; n < WXSIZEOF(weekDatesTestData); n++ )
- {
- const WeekDateTestData& wd = weekDatesTestData[n];
-
- dt.SetToWeekDay(wd.wday, wd.nWeek, wd.month, wd.year);
-
- printf("%s is %s", wd.Format().c_str(), dt.Format(fmt).c_str());
-
- const Date& d = wd.date;
- if ( d.SameDay(dt.GetTm()) )
- {
- puts(" (ok)");
- }
- else
- {
- dt.Set(d.day, d.month, d.year);
-
- printf(" (ERROR: should be %s)\n", dt.Format(fmt).c_str());
- }
- }
-}
-
-// test the computation of (ISO) week numbers
-static void TestTimeWNumber()
-{
- puts("\n*** wxDateTime week number test ***");
-
- struct WeekNumberTestData
- {
- Date date; // the date
- wxDateTime::wxDateTime_t week; // the week number in the year
- wxDateTime::wxDateTime_t wmon; // the week number in the month
- wxDateTime::wxDateTime_t wmon2; // same but week starts with Sun
- wxDateTime::wxDateTime_t dnum; // day number in the year
- };
-
- // data generated with the following python script:
- /*
-from DateTime import *
-from whrandom import *
-from string import *
-
-monthNames = [ 'Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec' ]
-wdayNames = [ 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat', 'Sun' ]
-
-def GetMonthWeek(dt):
- weekNumMonth = dt.iso_week[1] - DateTime(dt.year, dt.month, 1).iso_week[1] + 1
- if weekNumMonth < 0:
- weekNumMonth = weekNumMonth + 53
- return weekNumMonth
-
-def GetLastSundayBefore(dt):
- if dt.iso_week[2] == 7:
- return dt
- else:
- return dt - DateTimeDelta(dt.iso_week[2])
-
-for n in range(20):
- year = randint(1900, 2100)
- month = randint(1, 12)
- day = randint(1, 28)
- dt = DateTime(year, month, day)
- dayNum = dt.day_of_year
- weekNum = dt.iso_week[1]
- weekNumMonth = GetMonthWeek(dt)
-
- weekNumMonth2 = 0
- dtSunday = GetLastSundayBefore(dt)
-
- while dtSunday >= GetLastSundayBefore(DateTime(dt.year, dt.month, 1)):
- weekNumMonth2 = weekNumMonth2 + 1
- dtSunday = dtSunday - DateTimeDelta(7)
-
- data = { 'day': rjust(`day`, 2), \
- 'month': monthNames[month - 1], \
- 'year': year, \
- 'weekNum': rjust(`weekNum`, 2), \
- 'weekNumMonth': weekNumMonth, \
- 'weekNumMonth2': weekNumMonth2, \
- 'dayNum': rjust(`dayNum`, 3) }
-
- print " { { %(day)s, "\
- "wxDateTime::%(month)s, "\
- "%(year)d }, "\
- "%(weekNum)s, "\
- "%(weekNumMonth)s, "\
- "%(weekNumMonth2)s, "\
- "%(dayNum)s }," % data
-
- */
- static const WeekNumberTestData weekNumberTestDates[] =
- {
- { { 27, wxDateTime::Dec, 1966 }, 52, 5, 5, 361 },
- { { 22, wxDateTime::Jul, 1926 }, 29, 4, 4, 203 },
- { { 22, wxDateTime::Oct, 2076 }, 43, 4, 4, 296 },
- { { 1, wxDateTime::Jul, 1967 }, 26, 1, 1, 182 },
- { { 8, wxDateTime::Nov, 2004 }, 46, 2, 2, 313 },
- { { 21, wxDateTime::Mar, 1920 }, 12, 3, 4, 81 },
- { { 7, wxDateTime::Jan, 1965 }, 1, 2, 2, 7 },
- { { 19, wxDateTime::Oct, 1999 }, 42, 4, 4, 292 },
- { { 13, wxDateTime::Aug, 1955 }, 32, 2, 2, 225 },
- { { 18, wxDateTime::Jul, 2087 }, 29, 3, 3, 199 },
- { { 2, wxDateTime::Sep, 2028 }, 35, 1, 1, 246 },
- { { 28, wxDateTime::Jul, 1945 }, 30, 5, 4, 209 },
- { { 15, wxDateTime::Jun, 1901 }, 24, 3, 3, 166 },
- { { 10, wxDateTime::Oct, 1939 }, 41, 3, 2, 283 },
- { { 3, wxDateTime::Dec, 1965 }, 48, 1, 1, 337 },
- { { 23, wxDateTime::Feb, 1940 }, 8, 4, 4, 54 },
- { { 2, wxDateTime::Jan, 1987 }, 1, 1, 1, 2 },
- { { 11, wxDateTime::Aug, 2079 }, 32, 2, 2, 223 },
- { { 2, wxDateTime::Feb, 2063 }, 5, 1, 1, 33 },
- { { 16, wxDateTime::Oct, 1942 }, 42, 3, 3, 289 },
- };
-
- for ( size_t n = 0; n < WXSIZEOF(weekNumberTestDates); n++ )
- {
- const WeekNumberTestData& wn = weekNumberTestDates[n];
- const Date& d = wn.date;
-
- wxDateTime dt = d.DT();
-
- wxDateTime::wxDateTime_t
- week = dt.GetWeekOfYear(wxDateTime::Monday_First),
- wmon = dt.GetWeekOfMonth(wxDateTime::Monday_First),
- wmon2 = dt.GetWeekOfMonth(wxDateTime::Sunday_First),
- dnum = dt.GetDayOfYear();
-
- printf("%s: the day number is %d",
- d.FormatDate().c_str(), dnum);
- if ( dnum == wn.dnum )
- {
- printf(" (ok)");
- }
- else
- {
- printf(" (ERROR: should be %d)", wn.dnum);
- }
-
- printf(", week in month is %d", wmon);
- if ( wmon == wn.wmon )
- {
- printf(" (ok)");
- }
- else
- {
- printf(" (ERROR: should be %d)", wn.wmon);
- }
-
- printf(" or %d", wmon2);
- if ( wmon2 == wn.wmon2 )
- {
- printf(" (ok)");
- }
- else
- {
- printf(" (ERROR: should be %d)", wn.wmon2);
- }
-
- printf(", week in year is %d", week);
- if ( week == wn.week )
- {
- puts(" (ok)");
- }
- else
- {
- printf(" (ERROR: should be %d)\n", wn.week);
- }
- }
-}
-
-// test DST calculations
-static void TestTimeDST()
-{
- puts("\n*** wxDateTime DST test ***");
-
- printf("DST is%s in effect now.\n\n",
- wxDateTime::Now().IsDST() ? "" : " not");
-
- // taken from http://www.energy.ca.gov/daylightsaving.html
- static const Date datesDST[2][2004 - 1900 + 1] =
- {
- {
- { 1, wxDateTime::Apr, 1990 },
- { 7, wxDateTime::Apr, 1991 },
- { 5, wxDateTime::Apr, 1992 },
- { 4, wxDateTime::Apr, 1993 },
- { 3, wxDateTime::Apr, 1994 },
- { 2, wxDateTime::Apr, 1995 },
- { 7, wxDateTime::Apr, 1996 },
- { 6, wxDateTime::Apr, 1997 },
- { 5, wxDateTime::Apr, 1998 },
- { 4, wxDateTime::Apr, 1999 },
- { 2, wxDateTime::Apr, 2000 },
- { 1, wxDateTime::Apr, 2001 },
- { 7, wxDateTime::Apr, 2002 },
- { 6, wxDateTime::Apr, 2003 },
- { 4, wxDateTime::Apr, 2004 },
- },
- {
- { 28, wxDateTime::Oct, 1990 },
- { 27, wxDateTime::Oct, 1991 },
- { 25, wxDateTime::Oct, 1992 },
- { 31, wxDateTime::Oct, 1993 },
- { 30, wxDateTime::Oct, 1994 },
- { 29, wxDateTime::Oct, 1995 },
- { 27, wxDateTime::Oct, 1996 },
- { 26, wxDateTime::Oct, 1997 },
- { 25, wxDateTime::Oct, 1998 },
- { 31, wxDateTime::Oct, 1999 },
- { 29, wxDateTime::Oct, 2000 },
- { 28, wxDateTime::Oct, 2001 },
- { 27, wxDateTime::Oct, 2002 },
- { 26, wxDateTime::Oct, 2003 },
- { 31, wxDateTime::Oct, 2004 },
- }
- };
-
- int year;
- for ( year = 1990; year < 2005; year++ )
- {
- wxDateTime dtBegin = wxDateTime::GetBeginDST(year, wxDateTime::USA),
- dtEnd = wxDateTime::GetEndDST(year, wxDateTime::USA);
-
- printf("DST period in the US for year %d: from %s to %s",
- year, dtBegin.Format().c_str(), dtEnd.Format().c_str());
-
- size_t n = year - 1990;
- const Date& dBegin = datesDST[0][n];
- const Date& dEnd = datesDST[1][n];
-
- if ( dBegin.SameDay(dtBegin.GetTm()) && dEnd.SameDay(dtEnd.GetTm()) )
- {
- puts(" (ok)");
- }
- else
- {
- printf(" (ERROR: should be %s %d to %s %d)\n",
- wxDateTime::GetMonthName(dBegin.month).c_str(), dBegin.day,
- wxDateTime::GetMonthName(dEnd.month).c_str(), dEnd.day);
- }
- }
-
- puts("");
-
- for ( year = 1990; year < 2005; year++ )
- {
- printf("DST period in Europe for year %d: from %s to %s\n",
- year,
- wxDateTime::GetBeginDST(year, wxDateTime::Country_EEC).Format().c_str(),
- wxDateTime::GetEndDST(year, wxDateTime::Country_EEC).Format().c_str());
- }
-}
-
-// test wxDateTime -> text conversion
-static void TestTimeFormat()
-{
- puts("\n*** wxDateTime formatting test ***");
-
- // some information may be lost during conversion, so store what kind
- // of info should we recover after a round trip
- enum CompareKind
- {
- CompareNone, // don't try comparing
- CompareBoth, // dates and times should be identical
- CompareDate, // dates only
- CompareTime // time only
- };
-
- static const struct
- {
- CompareKind compareKind;
- const char *format;
- } formatTestFormats[] =
- {
- { CompareBoth, "---> %c" },
- { CompareDate, "Date is %A, %d of %B, in year %Y" },
- { CompareBoth, "Date is %x, time is %X" },
- { CompareTime, "Time is %H:%M:%S or %I:%M:%S %p" },
- { CompareNone, "The day of year: %j, the week of year: %W" },
- };
-
- static const Date formatTestDates[] =
- {
- { 29, wxDateTime::May, 1976, 18, 30, 00 },
- { 31, wxDateTime::Dec, 1999, 23, 30, 00 },
-#if 0
- // this test can't work for other centuries because it uses two digit
- // years in formats, so don't even try it
- { 29, wxDateTime::May, 2076, 18, 30, 00 },
- { 29, wxDateTime::Feb, 2400, 02, 15, 25 },
- { 01, wxDateTime::Jan, -52, 03, 16, 47 },
-#endif
- };
-
- // an extra test (as it doesn't depend on date, don't do it in the loop)
- printf("%s\n", wxDateTime::Now().Format("Our timezone is %Z").c_str());
-
- for ( size_t d = 0; d < WXSIZEOF(formatTestDates) + 1; d++ )
- {
- puts("");
-
- wxDateTime dt = d == 0 ? wxDateTime::Now() : formatTestDates[d - 1].DT();
- for ( size_t n = 0; n < WXSIZEOF(formatTestFormats); n++ )
- {
- wxString s = dt.Format(formatTestFormats[n].format);
- printf("%s", s.c_str());
-
- // what can we recover?
- int kind = formatTestFormats[n].compareKind;
-
- // convert back
- wxDateTime dt2;
- const wxChar *result = dt2.ParseFormat(s, formatTestFormats[n].format);
- if ( !result )
- {
- // converion failed - should it have?
- if ( kind == CompareNone )
- puts(" (ok)");
- else
- puts(" (ERROR: conversion back failed)");
- }
- else if ( *result )
- {
- // should have parsed the entire string
- puts(" (ERROR: conversion back stopped too soon)");
- }
- else
- {
- bool equal = FALSE; // suppress compilaer warning
- switch ( kind )
- {
- case CompareBoth:
- equal = dt2 == dt;
- break;
-
- case CompareDate:
- equal = dt.IsSameDate(dt2);
- break;
-
- case CompareTime:
- equal = dt.IsSameTime(dt2);
- break;
- }
-
- if ( !equal )
- {
- printf(" (ERROR: got back '%s' instead of '%s')\n",
- dt2.Format().c_str(), dt.Format().c_str());
- }
- else
- {
- puts(" (ok)");
- }
- }
- }
- }
-}
-
-// test text -> wxDateTime conversion
-static void TestTimeParse()
-{
- puts("\n*** wxDateTime parse test ***");
-
- struct ParseTestData
- {
- const char *format;
- Date date;
- bool good;
- };
-
- static const ParseTestData parseTestDates[] =
- {
- { "Sat, 18 Dec 1999 00:46:40 +0100", { 18, wxDateTime::Dec, 1999, 00, 46, 40 }, TRUE },
- { "Wed, 1 Dec 1999 05:17:20 +0300", { 1, wxDateTime::Dec, 1999, 03, 17, 20 }, TRUE },
- };
-
- for ( size_t n = 0; n < WXSIZEOF(parseTestDates); n++ )
- {
- const char *format = parseTestDates[n].format;
-
- printf("%s => ", format);
-
- wxDateTime dt;
- if ( dt.ParseRfc822Date(format) )
- {
- printf("%s ", dt.Format().c_str());
-
- if ( parseTestDates[n].good )
- {
- wxDateTime dtReal = parseTestDates[n].date.DT();
- if ( dt == dtReal )
- {
- puts("(ok)");
- }
- else
- {
- printf("(ERROR: should be %s)\n", dtReal.Format().c_str());
- }
- }
- else
- {
- puts("(ERROR: bad format)");
- }
- }
- else
- {
- printf("bad format (%s)\n",
- parseTestDates[n].good ? "ERROR" : "ok");
- }
- }
-}
-
-static void TestInteractive()
-{
- puts("\n*** interactive wxDateTime tests ***");
-
- char buf[128];
-
- for ( ;; )
- {
- printf("Enter a date: ");
- if ( !fgets(buf, WXSIZEOF(buf), stdin) )
- break;
-
- wxDateTime dt;
- if ( !dt.ParseDate(buf) )
- {
- puts("failed to parse the date");
-
- continue;
- }
-
- printf("%s: day %u, week of month %u/%u, week of year %u\n",
- dt.FormatISODate().c_str(),
- dt.GetDayOfYear(),
- dt.GetWeekOfMonth(wxDateTime::Monday_First),
- dt.GetWeekOfMonth(wxDateTime::Sunday_First),
- dt.GetWeekOfYear(wxDateTime::Monday_First));
- }
-
- puts("\n*** done ***");
-}
-
-static void TestTimeArithmetics()
-{
- puts("\n*** testing arithmetic operations on wxDateTime ***");
-
- static const struct
- {
- wxDateSpan span;
- const char *name;
- } testArithmData[] =
- {
- { wxDateSpan::Day(), "day" },
- { wxDateSpan::Week(), "week" },
- { wxDateSpan::Month(), "month" },
- { wxDateSpan::Year(), "year" },
- { wxDateSpan(1, 2, 3, 4), "year, 2 months, 3 weeks, 4 days" },
- };
-
- wxDateTime dt(29, wxDateTime::Dec, 1999), dt1, dt2;
-
- for ( size_t n = 0; n < WXSIZEOF(testArithmData); n++ )
- {
- wxDateSpan span = testArithmData[n].span;
- dt1 = dt + span;
- dt2 = dt - span;
-
- const char *name = testArithmData[n].name;
- printf("%s + %s = %s, %s - %s = %s\n",
- dt.FormatISODate().c_str(), name, dt1.FormatISODate().c_str(),
- dt.FormatISODate().c_str(), name, dt2.FormatISODate().c_str());
-
- printf("Going back: %s", (dt1 - span).FormatISODate().c_str());
- if ( dt1 - span == dt )
- {
- puts(" (ok)");
- }
- else
- {
- printf(" (ERROR: should be %s)\n", dt.FormatISODate().c_str());
- }
-
- printf("Going forward: %s", (dt2 + span).FormatISODate().c_str());
- if ( dt2 + span == dt )
- {
- puts(" (ok)");
- }
- else
- {
- printf(" (ERROR: should be %s)\n", dt.FormatISODate().c_str());
- }
-
- printf("Double increment: %s", (dt2 + 2*span).FormatISODate().c_str());
- if ( dt2 + 2*span == dt1 )
- {
- puts(" (ok)");
- }
- else
- {
- printf(" (ERROR: should be %s)\n", dt2.FormatISODate().c_str());
- }
-
- puts("");
- }
-}
-
-static void TestTimeHolidays()
-{
- puts("\n*** testing wxDateTimeHolidayAuthority ***\n");
-
- wxDateTime::Tm tm = wxDateTime(29, wxDateTime::May, 2000).GetTm();
- wxDateTime dtStart(1, tm.mon, tm.year),
- dtEnd = dtStart.GetLastMonthDay();
-
- wxDateTimeArray hol;
- wxDateTimeHolidayAuthority::GetHolidaysInRange(dtStart, dtEnd, hol);
-
- const wxChar *format = "%d-%b-%Y (%a)";
-
- printf("All holidays between %s and %s:\n",
- dtStart.Format(format).c_str(), dtEnd.Format(format).c_str());
-
- size_t count = hol.GetCount();
- for ( size_t n = 0; n < count; n++ )
- {
- printf("\t%s\n", hol[n].Format(format).c_str());
- }
-
- puts("");
-}
-
-#if 0
-
-// test compatibility with the old wxDate/wxTime classes
-static void TestTimeCompatibility()
-{
- puts("\n*** wxDateTime compatibility test ***");
-
- printf("wxDate for JDN 0: %s\n", wxDate(0l).FormatDate().c_str());
- printf("wxDate for MJD 0: %s\n", wxDate(2400000).FormatDate().c_str());
-
- double jdnNow = wxDateTime::Now().GetJDN();
- long jdnMidnight = (long)(jdnNow - 0.5);
- printf("wxDate for today: %s\n", wxDate(jdnMidnight).FormatDate().c_str());
-
- jdnMidnight = wxDate().Set().GetJulianDate();
- printf("wxDateTime for today: %s\n",
- wxDateTime((double)(jdnMidnight + 0.5)).Format("%c", wxDateTime::GMT0).c_str());
-
- int flags = wxEUROPEAN;//wxFULL;
- wxDate date;
- date.Set();
- printf("Today is %s\n", date.FormatDate(flags).c_str());
- for ( int n = 0; n < 7; n++ )
- {
- printf("Previous %s is %s\n",
- wxDateTime::GetWeekDayName((wxDateTime::WeekDay)n),
- date.Previous(n + 1).FormatDate(flags).c_str());
- }
-}
-
-#endif // 0
-
-#endif // TEST_DATETIME
-
-// ----------------------------------------------------------------------------
-// threads
-// ----------------------------------------------------------------------------
-
-#ifdef TEST_THREADS