+#ifdef TEST_LIST
+
+#include <wx/list.h>
+
+WX_DECLARE_LIST(Bar, wxListBars);
+#include <wx/listimpl.cpp>
+WX_DEFINE_LIST(wxListBars);
+
+static void TestListCtor()
+{
+ puts("*** Testing wxList construction ***\n");
+
+ {
+ wxListBars list1;
+ list1.Append(new Bar(_T("first")));
+ list1.Append(new Bar(_T("second")));
+
+ printf("After 1st list creation: %u objects in the list, %u objects total.\n",
+ list1.GetCount(), Bar::GetNumber());
+
+ wxListBars list2;
+ list2 = list1;
+
+ printf("After 2nd list creation: %u and %u objects in the lists, %u objects total.\n",
+ list1.GetCount(), list2.GetCount(), Bar::GetNumber());
+
+ list1.DeleteContents(TRUE);
+ }
+
+ printf("After list destruction: %u objects left.\n", Bar::GetNumber());
+}
+
+#endif // TEST_LIST
+
+// ----------------------------------------------------------------------------
+// MIME types
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_MIME
+
+#include <wx/mimetype.h>
+
+static wxMimeTypesManager g_mimeManager;
+
+static void TestMimeEnum()
+{
+ wxArrayString mimetypes;
+
+ size_t count = g_mimeManager.EnumAllFileTypes(mimetypes);
+
+ printf("*** All %u known filetypes: ***\n", count);
+
+ wxArrayString exts;
+ wxString desc;
+
+ for ( size_t n = 0; n < count; n++ )
+ {
+ wxFileType *filetype = g_mimeManager.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());
+ }
+}
+
+static void TestMimeOverride()
+{
+ wxPuts(_T("*** Testing wxMimeTypesManager additional files loading ***\n"));
+
+ wxString mailcap = _T("/tmp/mailcap"),
+ mimetypes = _T("/tmp/mime.types");
+
+ wxPrintf(_T("Loading mailcap from '%s': %s\n"),
+ mailcap.c_str(),
+ g_mimeManager.ReadMailcap(mailcap) ? _T("ok") : _T("ERROR"));
+ wxPrintf(_T("Loading mime.types from '%s': %s\n"),
+ mimetypes.c_str(),
+ g_mimeManager.ReadMimeTypes(mimetypes) ? _T("ok") : _T("ERROR"));
+}
+
+static void TestMimeFilename()
+{
+ wxPuts(_T("*** Testing MIME type from filename query ***\n"));
+
+ static const wxChar *filenames[] =
+ {
+ _T("readme.txt"),
+ _T("document.pdf"),
+ _T("image.gif"),
+ };
+
+ for ( size_t n = 0; n < WXSIZEOF(filenames); n++ )
+ {
+ const wxString fname = filenames[n];
+ wxString ext = fname.AfterLast(_T('.'));
+ wxFileType *ft = g_mimeManager.GetFileTypeFromExtension(ext);
+ if ( !ft )
+ {
+ wxPrintf(_T("WARNING: extension '%s' is unknown.\n"), ext.c_str());
+ }
+ else
+ {
+ wxString desc;
+ if ( !ft->GetDescription(&desc) )
+ desc = _T("<no description>");
+
+ wxString cmd;
+ if ( !ft->GetOpenCommand(&cmd,
+ wxFileType::MessageParameters(fname, _T(""))) )
+ cmd = _T("<no command available>");
+
+ wxPrintf(_T("To open %s (%s) do '%s'.\n"),
+ fname.c_str(), desc.c_str(), cmd.c_str());
+
+ delete ft;
+ }
+ }
+}
+
+#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 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
+ 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 TestLongLongComparison()
+{
+ puts("*** Testing wxLongLong comparison ***\n");
+
+ static const long testLongs[] =
+ {
+ 0,
+ 1,
+ -1,
+ LONG_MAX,
+ LONG_MIN,
+ 0x1234,
+ -0x1234
+ };
+
+ 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];
+ printf("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];
+ printf("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];
+ printf("0x%lx == 0x%lx is %s (%s)\n",
+ ls[m], testLongs[n], res ? "true" : "false",
+ res == (ls[m] == testLongs[n]) ? "ok" : "ERROR");
+ }
+ }
+}
+
+#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 download ***\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;
+ }
+ }
+}
+
+static void TestProtocolFtpUpload()
+{
+ puts("*** Testing wxFTP uploading ***\n");
+
+ wxLog::AddTraceMask(_T("ftp"));
+
+ static const char *hostname = "localhost";
+
+ printf("--- Attempting to connect to %s:21...\n", hostname);
+
+ wxFTP ftp;
+ ftp.SetUser("zeitlin");
+ ftp.SetPassword("insert your password here");
+ 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());
+
+ // upload a file
+ static const char *file1 = "test1";
+ static const char *file2 = "test2";
+ wxOutputStream *out = ftp.GetOutputStream(file1);
+ if ( out )
+ {
+ printf("--- Uploading to %s ---\n", file1);
+ out->Write("First hello", 11);
+ delete out;
+ }
+
+ out = ftp.GetOutputStream(file2);
+ if ( out )
+ {
+ printf("--- Uploading to %s ---\n", file1);
+ out->Write("Second hello", 12);
+ delete out;
+ }
+ }
+}
+
+#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
+
+// ----------------------------------------------------------------------------
+// vCard support
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_VCARD
+
+#include <wx/vcard.h>
+
+static void DumpVObject(size_t level, const wxVCardObject& vcard)
+{
+ void *cookie;
+ wxVCardObject *vcObj = vcard.GetFirstProp(&cookie);
+ while ( vcObj )
+ {
+ printf("%s%s",
+ wxString(_T('\t'), level).c_str(),
+ vcObj->GetName().c_str());
+
+ wxString value;
+ switch ( vcObj->GetType() )
+ {
+ case wxVCardObject::String:
+ case wxVCardObject::UString:
+ {
+ wxString val;
+ vcObj->GetValue(&val);
+ value << _T('"') << val << _T('"');
+ }
+ break;
+
+ case wxVCardObject::Int:
+ {
+ unsigned int i;
+ vcObj->GetValue(&i);
+ value.Printf(_T("%u"), i);
+ }
+ break;
+
+ case wxVCardObject::Long:
+ {
+ unsigned long l;
+ vcObj->GetValue(&l);
+ value.Printf(_T("%lu"), l);
+ }
+ break;
+
+ case wxVCardObject::None:
+ break;
+
+ case wxVCardObject::Object:
+ value = _T("<node>");
+ break;
+
+ default:
+ value = _T("<unknown value type>");
+ }
+
+ if ( !!value )
+ printf(" = %s", value.c_str());
+ putchar('\n');
+
+ DumpVObject(level + 1, *vcObj);
+
+ delete vcObj;
+ vcObj = vcard.GetNextProp(&cookie);
+ }
+}
+
+static void DumpVCardAddresses(const wxVCard& vcard)
+{
+ puts("\nShowing all addresses from vCard:\n");
+
+ size_t nAdr = 0;
+ void *cookie;
+ wxVCardAddress *addr = vcard.GetFirstAddress(&cookie);
+ while ( addr )
+ {
+ wxString flagsStr;
+ int flags = addr->GetFlags();
+ if ( flags & wxVCardAddress::Domestic )
+ {
+ flagsStr << _T("domestic ");
+ }
+ if ( flags & wxVCardAddress::Intl )
+ {
+ flagsStr << _T("international ");
+ }
+ if ( flags & wxVCardAddress::Postal )
+ {
+ flagsStr << _T("postal ");
+ }
+ if ( flags & wxVCardAddress::Parcel )
+ {
+ flagsStr << _T("parcel ");
+ }
+ if ( flags & wxVCardAddress::Home )
+ {
+ flagsStr << _T("home ");
+ }
+ if ( flags & wxVCardAddress::Work )
+ {
+ flagsStr << _T("work ");
+ }
+
+ printf("Address %u:\n"
+ "\tflags = %s\n"
+ "\tvalue = %s;%s;%s;%s;%s;%s;%s\n",
+ ++nAdr,
+ flagsStr.c_str(),
+ addr->GetPostOffice().c_str(),
+ addr->GetExtAddress().c_str(),
+ addr->GetStreet().c_str(),
+ addr->GetLocality().c_str(),
+ addr->GetRegion().c_str(),
+ addr->GetPostalCode().c_str(),
+ addr->GetCountry().c_str()
+ );
+
+ delete addr;
+ addr = vcard.GetNextAddress(&cookie);
+ }
+}
+
+static void DumpVCardPhoneNumbers(const wxVCard& vcard)
+{
+ puts("\nShowing all phone numbers from vCard:\n");
+
+ size_t nPhone = 0;
+ void *cookie;
+ wxVCardPhoneNumber *phone = vcard.GetFirstPhoneNumber(&cookie);
+ while ( phone )
+ {
+ wxString flagsStr;
+ int flags = phone->GetFlags();
+ if ( flags & wxVCardPhoneNumber::Voice )
+ {
+ flagsStr << _T("voice ");
+ }
+ if ( flags & wxVCardPhoneNumber::Fax )
+ {
+ flagsStr << _T("fax ");
+ }
+ if ( flags & wxVCardPhoneNumber::Cellular )
+ {
+ flagsStr << _T("cellular ");
+ }
+ if ( flags & wxVCardPhoneNumber::Modem )
+ {
+ flagsStr << _T("modem ");
+ }
+ if ( flags & wxVCardPhoneNumber::Home )
+ {
+ flagsStr << _T("home ");
+ }
+ if ( flags & wxVCardPhoneNumber::Work )
+ {
+ flagsStr << _T("work ");
+ }
+
+ printf("Phone number %u:\n"
+ "\tflags = %s\n"
+ "\tvalue = %s\n",
+ ++nPhone,
+ flagsStr.c_str(),
+ phone->GetNumber().c_str()
+ );
+
+ delete phone;
+ phone = vcard.GetNextPhoneNumber(&cookie);
+ }
+}
+
+static void TestVCardRead()
+{
+ puts("*** Testing wxVCard reading ***\n");
+
+ wxVCard vcard(_T("vcard.vcf"));
+ if ( !vcard.IsOk() )
+ {
+ puts("ERROR: couldn't load vCard.");
+ }
+ else
+ {
+ // read individual vCard properties
+ wxVCardObject *vcObj = vcard.GetProperty("FN");
+ wxString value;
+ if ( vcObj )
+ {
+ vcObj->GetValue(&value);
+ delete vcObj;
+ }
+ else
+ {
+ value = _T("<none>");
+ }
+
+ printf("Full name retrieved directly: %s\n", value.c_str());
+
+
+ if ( !vcard.GetFullName(&value) )
+ {
+ value = _T("<none>");
+ }
+
+ printf("Full name from wxVCard API: %s\n", value.c_str());
+
+ // now show how to deal with multiply occuring properties
+ DumpVCardAddresses(vcard);
+ DumpVCardPhoneNumbers(vcard);
+
+ // and finally show all
+ puts("\nNow dumping the entire vCard:\n"
+ "-----------------------------\n");
+
+ DumpVObject(0, vcard);
+ }
+}
+
+static void TestVCardWrite()
+{
+ puts("*** Testing wxVCard writing ***\n");
+
+ wxVCard vcard;
+ if ( !vcard.IsOk() )
+ {
+ puts("ERROR: couldn't create vCard.");
+ }
+ else
+ {
+ // set some fields
+ vcard.SetName("Zeitlin", "Vadim");
+ vcard.SetFullName("Vadim Zeitlin");
+ vcard.SetOrganization("wxWindows", "R&D");
+
+ // just dump the vCard back
+ puts("Entire vCard follows:\n");
+ puts(vcard.Write());
+ }
+}
+
+#endif // TEST_VCARD
+
+// ----------------------------------------------------------------------------
+// wide char (Unicode) support
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_WCHAR
+
+#include <wx/strconv.h>
+#include <wx/buffer.h>
+
+static void TestUtf8()
+{
+ puts("*** Testing UTF8 support ***\n");
+
+ wxString testString = "français";
+#if 0
+"************ French - Français ****************"
+"Juste un petit exemple pour dire que les français aussi"
+"ont à cœur de pouvoir utiliser tous leurs caractères ! :)";
+#endif
+
+ wxWCharBuffer wchBuf = testString.wc_str(wxConvUTF8);
+ const wchar_t *pwz = (const wchar_t *)wchBuf;
+ wxString testString2(pwz, wxConvLocal);
+
+ printf("Decoding '%s' => '%s'\n", testString.c_str(), testString2.c_str());
+
+ char *psz = "fran" "\xe7" "ais";
+ size_t len = strlen(psz);
+ wchar_t *pwz2 = new wchar_t[len + 1];
+ for ( size_t n = 0; n <= len; n++ )
+ {
+ pwz2[n] = (wchar_t)(unsigned char)psz[n];
+ }
+
+ wxString testString3(pwz2, wxConvUTF8);
+ delete [] pwz2;
+
+ printf("Encoding '%s' -> '%s'\n", psz, testString3.c_str());
+}
+
+#endif // TEST_WCHAR
+
+// ----------------------------------------------------------------------------
+// ZIP stream
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_ZIP
+
+#include "wx/zipstrm.h"
+
+static void TestZipStreamRead()
+{
+ puts("*** Testing ZIP reading ***\n");
+
+ wxZipInputStream istr(_T("idx.zip"), _T("IDX.txt"));
+ printf("Archive size: %u\n", istr.GetSize());
+
+ puts("Dumping the file:");
+ while ( !istr.Eof() )
+ {
+ putchar(istr.GetC());
+ fflush(stdout);
+ }
+
+ puts("\n----- done ------");
+}
+
+#endif // TEST_ZIP
+
+// ----------------------------------------------------------------------------
+// ZLIB stream
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_ZLIB
+
+#include <wx/zstream.h>
+#include <wx/wfstream.h>
+
+static const wxChar *FILENAME_GZ = _T("test.gz");
+static const char *TEST_DATA = "hello and hello again";
+
+static void TestZlibStreamWrite()
+{
+ puts("*** Testing Zlib stream reading ***\n");
+
+ wxFileOutputStream fileOutStream(FILENAME_GZ);
+ wxZlibOutputStream ostr(fileOutStream, 0);
+ printf("Compressing the test string... ");
+ ostr.Write(TEST_DATA, sizeof(TEST_DATA));
+ if ( !ostr )
+ {
+ puts("(ERROR: failed)");
+ }
+ else
+ {
+ puts("(ok)");
+ }
+
+ puts("\n----- done ------");
+}
+
+static void TestZlibStreamRead()
+{
+ puts("*** Testing Zlib stream reading ***\n");
+
+ wxFileInputStream fileInStream(FILENAME_GZ);
+ wxZlibInputStream istr(fileInStream);
+ printf("Archive size: %u\n", istr.GetSize());
+
+ puts("Dumping the file:");
+ while ( !istr.Eof() )
+ {
+ putchar(istr.GetC());
+ fflush(stdout);
+ }
+
+ puts("\n----- done ------");
+}
+
+#endif // TEST_ZLIB
+
+// ----------------------------------------------------------------------------
+// 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());