+ 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 (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++;
+ }
+
+ 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()
+{
+#if wxUSE_LONGLONG_WX
+ puts("*** 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];
+ 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");
+ }
+ }
+#endif // wxUSE_LONGLONG_WX
+}
+
+static void TestLongLongPrint()
+{
+ wxPuts(_T("*** Testing wxLongLong printing ***\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());
+}
+
+#undef MAKE_LL
+#undef RAND_LL
+
+#endif // TEST_LONGLONG
+
+// ----------------------------------------------------------------------------
+// path list
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_PATHLIST
+
+static void TestPathList()
+{
+ puts("*** Testing wxPathList ***\n");
+
+ wxPathList pathlist;
+ pathlist.AddEnvList("PATH");
+ wxString path = pathlist.FindValidPath("ls");
+ if ( path.empty() )
+ {
+ printf("ERROR: command not found in the path.\n");
+ }
+ else
+ {
+ printf("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 ( ;; )
+ {
+ char pattern[128];
+ printf("\nEnter a pattern: ");
+ if ( !fgets(pattern, WXSIZEOF(pattern), stdin) )
+ break;
+
+ // kill the last '\n'
+ pattern[strlen(pattern) - 1] = 0;
+
+ wxRegEx re;
+ if ( !re.Compile(pattern) )
+ {
+ continue;
+ }
+
+ char text[128];
+ for ( ;; )
+ {
+ printf("Enter text to match: ");
+ if ( !fgets(text, WXSIZEOF(text), stdin) )
+ break;
+
+ // kill the last '\n'
+ text[strlen(text) - 1] = 0;
+
+ if ( !re.Matches(text) )
+ {
+ printf("No match.\n");
+ }
+ else
+ {
+ printf("Pattern matches at '%s'\n", re.GetMatch(text).c_str());
+
+ size_t start, len;
+ for ( size_t n = 1; ; n++ )
+ {
+ if ( !re.GetMatch(&start, &len, n) )
+ {
+ break;
+ }
+
+ printf("Subexpr %u matched '%s'\n",
+ n, wxString(text + start, len).c_str());
+ }
+ }
+ }
+ }
+}
+
+#endif // TEST_REGEX
+
+// ----------------------------------------------------------------------------
+// database
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_ODBC
+
+#include <wx/db.h>
+
+static void TestDbOpen()
+{
+ HENV henv;
+ wxDb db(henv);
+}
+
+#endif // TEST_ODBC
+
+// ----------------------------------------------------------------------------
+// registry and related stuff
+// ----------------------------------------------------------------------------
+
+// this is for MSW only
+#ifndef __WXMSW__
+ #undef TEST_REGCONF
+ #undef TEST_REGISTRY
+#endif
+
+#ifdef TEST_REGCONF
+
+#include "wx/confbase.h"
+#include "wx/msw/regconf.h"
+
+static void TestRegConfWrite()
+{
+ wxRegConfig regconf(_T("console"), _T("wxwindows"));
+ regconf.Write(_T("Hello"), wxString(_T("world")));
+}
+
+#endif // TEST_REGCONF
+
+#ifdef TEST_REGISTRY
+
+#include "wx/msw/registry.h"
+
+// I chose this one because I liked its name, but it probably only exists under
+// NT
+static const wxChar *TESTKEY =
+ _T("HKEY_LOCAL_MACHINE\\SYSTEM\\ControlSet001\\Control\\CrashControl");
+
+static void TestRegistryRead()
+{
+ puts("*** testing registry reading ***");
+
+ wxRegKey key(TESTKEY);
+ printf("The test key name is '%s'.\n", key.GetName().c_str());
+ if ( !key.Open() )
+ {
+ puts("ERROR: test key can't be opened, aborting test.");
+
+ return;
+ }
+
+ size_t nSubKeys, nValues;
+ if ( key.GetKeyInfo(&nSubKeys, NULL, &nValues, NULL) )
+ {
+ printf("It has %u subkeys and %u values.\n", nSubKeys, nValues);
+ }
+
+ printf("Enumerating values:\n");
+
+ long dummy;
+ wxString value;
+ bool cont = key.GetFirstValue(value, dummy);
+ while ( cont )
+ {
+ printf("Value '%s': type ", value.c_str());
+ switch ( key.GetValueType(value) )
+ {
+ case wxRegKey::Type_None: printf("ERROR (none)"); break;
+ case wxRegKey::Type_String: printf("SZ"); break;
+ case wxRegKey::Type_Expand_String: printf("EXPAND_SZ"); break;
+ case wxRegKey::Type_Binary: printf("BINARY"); break;
+ case wxRegKey::Type_Dword: printf("DWORD"); break;
+ case wxRegKey::Type_Multi_String: printf("MULTI_SZ"); break;
+ default: printf("other (unknown)"); break;
+ }
+
+ printf(", value = ");
+ if ( key.IsNumericValue(value) )
+ {
+ long val;
+ key.QueryValue(value, &val);
+ printf("%ld", val);
+ }
+ else // string
+ {
+ wxString val;
+ key.QueryValue(value, val);
+ printf("'%s'", val.c_str());
+
+ key.QueryRawValue(value, val);
+ printf(" (raw value '%s')", val.c_str());
+ }
+
+ putchar('\n');
+
+ cont = key.GetNextValue(value, dummy);
+ }
+}
+
+static void TestRegistryAssociation()
+{
+ /*
+ The second call to deleteself genertaes an error message, with a
+ messagebox saying .flo is crucial to system operation, while the .ddf
+ call also fails, but with no error message
+ */
+
+ wxRegKey key;
+
+ key.SetName("HKEY_CLASSES_ROOT\\.ddf" );
+ key.Create();
+ key = "ddxf_auto_file" ;
+ key.SetName("HKEY_CLASSES_ROOT\\.flo" );
+ key.Create();
+ key = "ddxf_auto_file" ;
+ key.SetName("HKEY_CLASSES_ROOT\\ddxf_auto_file\\DefaultIcon");
+ key.Create();
+ key = "program,0" ;
+ key.SetName("HKEY_CLASSES_ROOT\\ddxf_auto_file\\shell\\open\\command");
+ key.Create();
+ key = "program \"%1\"" ;
+
+ key.SetName("HKEY_CLASSES_ROOT\\.ddf" );
+ key.DeleteSelf();
+ key.SetName("HKEY_CLASSES_ROOT\\.flo" );
+ key.DeleteSelf();
+ key.SetName("HKEY_CLASSES_ROOT\\ddxf_auto_file\\DefaultIcon");
+ key.DeleteSelf();
+ key.SetName("HKEY_CLASSES_ROOT\\ddxf_auto_file\\shell\\open\\command");
+ key.DeleteSelf();
+}
+
+#endif // TEST_REGISTRY
+
+// ----------------------------------------------------------------------------
+// sockets
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_SOCKETS
+
+#include "wx/socket.h"
+#include "wx/protocol/protocol.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);
+ }
+}
+
+#endif // TEST_SOCKETS
+
+// ----------------------------------------------------------------------------
+// FTP
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_FTP
+
+#include "wx/protocol/ftp.h"
+
+static wxFTP ftp;
+
+#define FTP_ANONYMOUS
+
+#ifdef FTP_ANONYMOUS
+ static const char *directory = "/pub";
+ static const char *filename = "welcome.msg";
+#else
+ static const char *directory = "/etc";
+ static const char *filename = "issue";
+#endif
+
+static bool TestFtpConnect()
+{
+ puts("*** Testing FTP connect ***");
+
+#ifdef FTP_ANONYMOUS
+ static const char *hostname = "ftp.wxwindows.org";
+
+ printf("--- Attempting to connect to %s:21 anonymously...\n", hostname);
+#else // !FTP_ANONYMOUS
+ static const char *hostname = "localhost";
+
+ char user[256];
+ fgets(user, WXSIZEOF(user), stdin);
+ user[strlen(user) - 1] = '\0'; // chop off '\n'
+ ftp.SetUser(user);
+
+ char password[256];
+ printf("Password for %s: ", password);
+ fgets(password, WXSIZEOF(password), stdin);
+ password[strlen(password) - 1] = '\0'; // chop off '\n'
+ ftp.SetPassword(password);
+
+ printf("--- Attempting to connect to %s:21 as %s...\n", hostname, user);
+#endif // FTP_ANONYMOUS/!FTP_ANONYMOUS
+
+ if ( !ftp.Connect(hostname) )
+ {
+ printf("ERROR: failed to connect to %s\n", hostname);
+
+ return FALSE;
+ }
+ else
+ {
+ printf("--- Connected to %s, current directory is '%s'\n",
+ hostname, ftp.Pwd().c_str());
+ }
+
+ return TRUE;
+}
+
+// test (fixed?) wxFTP bug with wu-ftpd >= 2.6.0?
+static void TestFtpWuFtpd()
+{
+ wxFTP ftp;
+ static const char *hostname = "ftp.eudora.com";
+ if ( !ftp.Connect(hostname) )
+ {
+ printf("ERROR: failed to connect to %s\n", hostname);
+ }
+ else
+ {
+ static const char *filename = "eudora/pubs/draft-gellens-submit-09.txt";
+ wxInputStream *in = ftp.GetInputStream(filename);
+ if ( !in )
+ {
+ printf("ERROR: couldn't get input stream for %s\n", filename);
+ }
+ 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("Successfully retrieved the file.\n");
+ }
+
+ delete [] data;
+ delete in;
+ }
+ }
+}
+
+static void TestFtpList()
+{
+ puts("*** Testing wxFTP file listing ***\n");
+
+ // test CWD
+ if ( !ftp.ChDir(directory) )
+ {
+ printf("ERROR: failed to cd to %s\n", directory);
+ }
+
+ printf("Current directory is '%s'\n", ftp.Pwd().c_str());
+
+ // test NLIST and LIST
+ wxArrayString files;
+ if ( !ftp.GetFilesList(files) )
+ {
+ puts("ERROR: failed to get NLIST of files");
+ }
+ else
+ {
+ printf("Brief 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.GetDirList(files) )
+ {
+ puts("ERROR: failed to get LIST of files");
+ }
+ else
+ {
+ printf("Detailed 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 ..");
+ }
+
+ printf("Current directory is '%s'\n", ftp.Pwd().c_str());
+}
+
+static void TestFtpDownload()
+{
+ puts("*** Testing wxFTP download ***\n");
+
+ // test RETR
+ wxInputStream *in = ftp.GetInputStream(filename);
+ if ( !in )
+ {
+ printf("ERROR: couldn't get input stream for %s\n", filename);
+ }
+ else
+ {
+ size_t size = in->StreamSize();
+ printf("Reading file %s (%u bytes)...", filename, size);
+ fflush(stdout);
+
+ 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 TestFtpFileSize()
+{
+ puts("*** Testing FTP SIZE command ***");
+
+ if ( !ftp.ChDir(directory) )
+ {
+ printf("ERROR: failed to cd to %s\n", directory);
+ }
+
+ printf("Current directory is '%s'\n", ftp.Pwd().c_str());
+
+ if ( ftp.FileExists(filename) )
+ {
+ int size = ftp.GetFileSize(filename);
+ if ( size == -1 )
+ printf("ERROR: couldn't get size of '%s'\n", filename);
+ else
+ printf("Size of '%s' is %d bytes.\n", filename, size);
+ }
+ else
+ {
+ printf("ERROR: '%s' doesn't exist\n", filename);
+ }
+}
+
+static void TestFtpMisc()
+{
+ puts("*** Testing miscellaneous wxFTP functions ***");
+
+ if ( ftp.SendCommand("STAT") != '2' )
+ {
+ puts("ERROR: STAT failed");
+ }
+ else
+ {
+ printf("STAT returned:\n\n%s\n", ftp.GetLastResult().c_str());
+ }
+
+ if ( ftp.SendCommand("HELP SITE") != '2' )
+ {
+ puts("ERROR: HELP SITE failed");
+ }
+ else
+ {
+ printf("The list of site-specific commands:\n\n%s\n",
+ ftp.GetLastResult().c_str());
+ }
+}
+
+static void TestFtpInteractive()
+{
+ puts("\n*** Interactive wxFTP test ***");
+
+ char buf[128];
+
+ for ( ;; )
+ {
+ printf("Enter FTP command: ");
+ if ( !fgets(buf, WXSIZEOF(buf), stdin) )
+ break;
+
+ // kill the last '\n'
+ buf[strlen(buf) - 1] = 0;
+
+ // special handling of LIST and NLST as they require data connection
+ wxString start(buf, 4);
+ start.MakeUpper();
+ if ( start == "LIST" || start == "NLST" )
+ {
+ wxString wildcard;
+ if ( strlen(buf) > 4 )
+ wildcard = buf + 5;
+
+ wxArrayString files;
+ if ( !ftp.GetList(files, wildcard, start == "LIST") )
+ {
+ printf("ERROR: failed to get %s of files\n", start.c_str());
+ }
+ else
+ {
+ printf("--- %s of '%s' under '%s':\n",
+ start.c_str(), wildcard.c_str(), 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");
+ }
+ }
+ else // !list
+ {
+ char ch = ftp.SendCommand(buf);
+ printf("Command %s", ch ? "succeeded" : "failed");
+ if ( ch )
+ {
+ printf(" (return code %c)", ch);
+ }
+
+ printf(", server reply:\n%s\n\n", ftp.GetLastResult().c_str());
+ }
+ }
+
+ puts("\n*** done ***");
+}
+
+static void TestFtpUpload()
+{
+ puts("*** Testing wxFTP uploading ***\n");
+
+ // 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;
+ }
+
+ // send a command to check the remote file
+ if ( ftp.SendCommand(wxString("STAT ") + file1) != '2' )
+ {
+ printf("ERROR: STAT %s failed\n", file1);
+ }
+ else
+ {
+ printf("STAT %s returned:\n\n%s\n",
+ file1, ftp.GetLastResult().c_str());
+ }
+
+ out = ftp.GetOutputStream(file2);
+ if ( out )
+ {
+ printf("--- Uploading to %s ---\n", file1);
+ out->Write("Second hello", 12);
+ delete out;
+ }
+}
+
+#endif // TEST_FTP
+
+// ----------------------------------------------------------------------------
+// streams
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_STREAMS
+
+#include "wx/wfstream.h"
+#include "wx/mstream.h"
+
+static void TestFileStream()
+{
+ puts("*** Testing wxFileInputStream ***");
+
+ static const wxChar *filename = _T("testdata.fs");
+ {
+ wxFileOutputStream fsOut(filename);
+ fsOut.Write("foo", 3);
+ }
+
+ wxFileInputStream fsIn(filename);
+ printf("File stream size: %u\n", fsIn.GetSize());
+ while ( !fsIn.Eof() )
+ {
+ putchar(fsIn.GetC());
+ }
+
+ if ( !wxRemoveFile(filename) )
+ {
+ printf("ERROR: failed to remove the file '%s'.\n", filename);
+ }
+
+ puts("\n*** wxFileInputStream test done ***");
+}
+
+static void TestMemoryStream()
+{
+ puts("*** Testing wxMemoryInputStream ***");
+
+ wxChar buf[1024];
+ wxStrncpy(buf, _T("Hello, stream!"), WXSIZEOF(buf));
+
+ wxMemoryInputStream memInpStream(buf, wxStrlen(buf));
+ printf(_T("Memory stream size: %u\n"), memInpStream.GetSize());
+ while ( !memInpStream.Eof() )
+ {
+ putchar(memInpStream.GetC());
+ }
+
+ puts("\n*** wxMemoryInputStream test done ***");
+}
+
+#endif // TEST_STREAMS
+
+// ----------------------------------------------------------------------------
+// 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>");
+ }
projects / wxWidgets.git / blobdiff