+#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';
+ if ( parser.Found("project_name", &strVal) )
+ s << "Project:\t" << strVal << '\n';
+
+ wxLogMessage(s);
+}
+
+#endif // TEST_CMDLINE
+
+// ----------------------------------------------------------------------------
+// wxDir
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_DIR
+
+#include <wx/dir.h>
+
+#ifdef __UNIX__
+ static const wxChar *ROOTDIR = _T("/");
+ static const wxChar *TESTDIR = _T("/usr");
+#elif defined(__WXMSW__)
+ static const wxChar *ROOTDIR = _T("c:\\");
+ static const wxChar *TESTDIR = _T("d:\\");
+#else
+ #error "don't know where the root directory is"
+#endif
+
+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()
+{
+ puts("*** Testing wxDir::GetFirst/GetNext ***");
+
+ 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);
+
+ dir.Open(ROOTDIR);
+
+ 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);
+}
+
+class DirPrintTraverser : public wxDirTraverser
+{
+public:
+ virtual wxDirTraverseResult OnFile(const wxString& filename)
+ {
+ return wxDIR_CONTINUE;
+ }
+
+ virtual wxDirTraverseResult OnDir(const wxString& dirname)
+ {
+ wxString path, name, ext;
+ wxSplitPath(dirname, &path, &name, &ext);
+
+ if ( !ext.empty() )
+ name << _T('.') << ext;
+
+ wxString indent;
+ for ( const wxChar *p = path.c_str(); *p; p++ )
+ {
+ if ( wxIsPathSeparator(*p) )
+ indent += _T(" ");
+ }
+
+ printf("%s%s\n", indent.c_str(), name.c_str());
+
+ return wxDIR_CONTINUE;
+ }
+};
+
+static void TestDirTraverse()
+{
+ puts("*** Testing wxDir::Traverse() ***");
+
+ // enum all files
+ wxArrayString files;
+ size_t n = wxDir::GetAllFiles(TESTDIR, &files);
+ printf("There are %u files under '%s'\n", n, TESTDIR);
+ if ( n > 1 )
+ {
+ printf("First one is '%s'\n", files[0u].c_str());
+ printf(" last one is '%s'\n", files[n - 1].c_str());
+ }
+
+ // enum again with custom traverser
+ wxDir dir(TESTDIR);
+ DirPrintTraverser traverser;
+ dir.Traverse(traverser, _T(""), wxDIR_DIRS | wxDIR_HIDDEN);
+}
+
+#endif // TEST_DIR
+
+// ----------------------------------------------------------------------------
+// wxDllLoader
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_DLLLOADER
+
+#include <wx/dynlib.h>
+
+static void TestDllLoad()
+{
+#if defined(__WXMSW__)
+ static const wxChar *LIB_NAME = _T("kernel32.dll");
+ static const wxChar *FUNC_NAME = _T("lstrlenA");
+#elif defined(__UNIX__)
+ // weird: using just libc.so does *not* work!
+ static const wxChar *LIB_NAME = _T("/lib/libc-2.0.7.so");
+ static const wxChar *FUNC_NAME = _T("strlen");
+#else
+ #error "don't know how to test wxDllLoader on this platform"
+#endif
+
+ puts("*** testing wxDllLoader ***\n");
+
+ wxDllType dllHandle = wxDllLoader::LoadLibrary(LIB_NAME);
+ if ( !dllHandle )
+ {
+ wxPrintf(_T("ERROR: failed to load '%s'.\n"), LIB_NAME);
+ }
+ else
+ {
+ typedef int (*strlenType)(char *);
+ strlenType pfnStrlen = (strlenType)wxDllLoader::GetSymbol(dllHandle, FUNC_NAME);
+ if ( !pfnStrlen )
+ {
+ wxPrintf(_T("ERROR: function '%s' wasn't found in '%s'.\n"),
+ FUNC_NAME, LIB_NAME);
+ }
+ else
+ {
+ if ( pfnStrlen("foo") != 3 )
+ {
+ wxPrintf(_T("ERROR: loaded function is not strlen()!\n"));
+ }
+ else
+ {
+ puts("... ok");
+ }
+ }
+
+ wxDllLoader::UnloadLibrary(dllHandle);
+ }
+}
+
+#endif // TEST_DLLLOADER
+
+// ----------------------------------------------------------------------------
+// wxGet/SetEnv
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_ENVIRON
+
+#include <wx/utils.h>
+
+static wxString MyGetEnv(const wxString& var)
+{
+ wxString val;
+ if ( !wxGetEnv(var, &val) )
+ val = _T("<empty>");
+ else
+ val = wxString(_T('\'')) + val + _T('\'');
+
+ return val;
+}
+
+static void TestEnvironment()
+{
+ const wxChar *var = _T("wxTestVar");
+
+ puts("*** testing environment access functions ***");
+
+ printf("Initially getenv(%s) = %s\n", var, MyGetEnv(var).c_str());
+ wxSetEnv(var, _T("value for wxTestVar"));
+ printf("After wxSetEnv: getenv(%s) = %s\n", var, MyGetEnv(var).c_str());
+ wxSetEnv(var, _T("another value"));
+ printf("After 2nd wxSetEnv: getenv(%s) = %s\n", var, MyGetEnv(var).c_str());
+ wxUnsetEnv(var);
+ printf("After wxUnsetEnv: getenv(%s) = %s\n", var, MyGetEnv(var).c_str());
+ printf("PATH = %s\n", MyGetEnv(_T("PATH")).c_str());
+}
+
+#endif // TEST_ENVIRON
+
+// ----------------------------------------------------------------------------
+// wxExecute
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_EXECUTE
+
+#include <wx/utils.h>
+
+static void TestExecute()
+{
+ puts("*** testing wxExecute ***");
+
+#ifdef __UNIX__
+ #define COMMAND "cat -n ../../Makefile" // "echo hi"
+ #define SHELL_COMMAND "echo hi from shell"
+ #define REDIRECT_COMMAND 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
+
+// ----------------------------------------------------------------------------
+// file
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_FILE
+
+#include <wx/file.h>
+#include <wx/ffile.h>
+#include <wx/textfile.h>
+
+static void TestFileRead()
+{
+ puts("*** wxFile read test ***");
+
+ wxFile file(_T("testdata.fc"));
+ if ( file.IsOpened() )
+ {
+ printf("File length: %lu\n", file.Length());
+
+ puts("File dump:\n----------");
+
+ static const off_t len = 1024;
+ char buf[len];
+ for ( ;; )
+ {
+ off_t nRead = file.Read(buf, len);
+ if ( nRead == wxInvalidOffset )
+ {
+ printf("Failed to read the file.");
+ break;
+ }
+
+ fwrite(buf, nRead, 1, stdout);
+
+ if ( nRead < len )
+ break;
+ }
+
+ puts("----------");
+ }
+ else
+ {
+ printf("ERROR: can't open test file.\n");
+ }
+
+ puts("");
+}
+
+static void TestTextFileRead()
+{
+ puts("*** wxTextFile read test ***");
+
+ wxTextFile file(_T("testdata.fc"));
+ if ( file.Open() )
+ {
+ printf("Number of lines: %u\n", file.GetLineCount());
+ printf("Last line: '%s'\n", file.GetLastLine().c_str());
+
+ wxString s;
+
+ puts("\nDumping the entire file:");
+ for ( s = file.GetFirstLine(); !file.Eof(); s = file.GetNextLine() )
+ {
+ printf("%6u: %s\n", file.GetCurrentLine() + 1, s.c_str());
+ }
+ printf("%6u: %s\n", file.GetCurrentLine() + 1, s.c_str());
+
+ puts("\nAnd now backwards:");
+ for ( s = file.GetLastLine();
+ file.GetCurrentLine() != 0;
+ s = file.GetPrevLine() )
+ {
+ printf("%6u: %s\n", file.GetCurrentLine() + 1, s.c_str());
+ }
+ printf("%6u: %s\n", file.GetCurrentLine() + 1, s.c_str());
+ }
+ else
+ {
+ printf("ERROR: can't open '%s'\n", file.GetName());
+ }
+
+ puts("");
+}
+
+static void TestFileCopy()
+{
+ puts("*** Testing wxCopyFile ***");
+
+ static const wxChar *filename1 = _T("testdata.fc");
+ static const wxChar *filename2 = _T("test2");
+ if ( !wxCopyFile(filename1, filename2) )
+ {
+ puts("ERROR: failed to copy file");
+ }
+ else
+ {
+ wxFFile f1(filename1, "rb"),
+ f2(filename2, "rb");
+
+ if ( !f1.IsOpened() || !f2.IsOpened() )
+ {
+ puts("ERROR: failed to open file(s)");
+ }
+ else
+ {
+ wxString s1, s2;
+ if ( !f1.ReadAll(&s1) || !f2.ReadAll(&s2) )
+ {
+ puts("ERROR: failed to read file(s)");
+ }
+ else
+ {
+ if ( (s1.length() != s2.length()) ||
+ (memcmp(s1.c_str(), s2.c_str(), s1.length()) != 0) )
+ {
+ puts("ERROR: copy error!");
+ }
+ else
+ {
+ puts("File was copied ok.");
+ }
+ }
+ }
+ }
+
+ if ( !wxRemoveFile(filename2) )
+ {
+ puts("ERROR: failed to remove the file");
+ }
+
+ puts("");
+}
+
+#endif // TEST_FILE
+
+// ----------------------------------------------------------------------------
+// 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
+
+// ----------------------------------------------------------------------------
+// wxFileName
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_FILENAME
+
+#include <wx/filename.h>
+
+static struct FileNameInfo
+{
+ const wxChar *fullname;
+ const wxChar *path;
+ const wxChar *name;
+ const wxChar *ext;
+} filenames[] =
+{
+ { _T("/usr/bin/ls"), _T("/usr/bin"), _T("ls"), _T("") },
+ { _T("/usr/bin/"), _T("/usr/bin"), _T(""), _T("") },
+ { _T("~/.zshrc"), _T("~"), _T(".zshrc"), _T("") },
+ { _T("../../foo"), _T("../.."), _T("foo"), _T("") },
+ { _T("foo.bar"), _T(""), _T("foo"), _T("bar") },
+ { _T("~/foo.bar"), _T("~"), _T("foo"), _T("bar") },
+ { _T("Mahogany-0.60/foo.bar"), _T("Mahogany-0.60"), _T("foo"), _T("bar") },
+ { _T("/tmp/wxwin.tar.bz"), _T("/tmp"), _T("wxwin.tar"), _T("bz") },
+};
+
+static void TestFileNameConstruction()
+{
+ puts("*** testing wxFileName construction ***");
+
+ for ( size_t n = 0; n < WXSIZEOF(filenames); n++ )
+ {
+ wxFileName fn(filenames[n].fullname, wxPATH_UNIX);
+
+ printf("Filename: '%s'\t", fn.GetFullPath().c_str());
+ if ( !fn.Normalize(wxPATH_NORM_ALL, _T(""), wxPATH_UNIX) )
+ {
+ puts("ERROR (couldn't be normalized)");
+ }
+ else
+ {
+ printf("normalized: '%s'\n", fn.GetFullPath().c_str());
+ }
+ }
+
+ puts("");
+}
+
+static void TestFileNameSplit()
+{
+ puts("*** testing wxFileName splitting ***");
+
+ for ( size_t n = 0; n < WXSIZEOF(filenames); n++ )
+ {
+ const FileNameInfo &fni = filenames[n];
+ wxString path, name, ext;
+ wxFileName::SplitPath(fni.fullname, &path, &name, &ext);
+
+ printf("%s -> path = '%s', name = '%s', ext = '%s'",
+ fni.fullname, path.c_str(), name.c_str(), ext.c_str());
+ if ( path != fni.path )
+ printf(" (ERROR: path = '%s')", fni.path);
+ if ( name != fni.name )
+ printf(" (ERROR: name = '%s')", fni.name);
+ if ( ext != fni.ext )
+ printf(" (ERROR: ext = '%s')", fni.ext);
+ puts("");
+ }
+
+ puts("");
+}
+
+static void TestFileNameComparison()
+{
+ // TODO!
+}
+
+static void TestFileNameOperations()
+{
+ // TODO!
+}
+
+static void TestFileNameCwd()
+{
+ // TODO!
+}
+
+#endif // TEST_FILENAME
+
+// ----------------------------------------------------------------------------
+// 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
+
+// ----------------------------------------------------------------------------
+// wxList
+// ----------------------------------------------------------------------------
+
+#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
+
+// ----------------------------------------------------------------------------
+// wxLocale
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_LOCALE
+
+#include "wx/intl.h"
+#include "wx/utils.h" // for wxSetEnv
+
+static wxLocale gs_localeDefault(wxLANGUAGE_ENGLISH);
+
+// find the name of the language from its value
+static const char *GetLangName(int lang)
+{
+ static const char *languageNames[] =
+ {
+ "DEFAULT",
+ "UNKNOWN",
+ "ABKHAZIAN",
+ "AFAR",
+ "AFRIKAANS",
+ "ALBANIAN",
+ "AMHARIC",
+ "ARABIC",
+ "ARABIC_ALGERIA",
+ "ARABIC_BAHRAIN",
+ "ARABIC_EGYPT",
+ "ARABIC_IRAQ",
+ "ARABIC_JORDAN",
+ "ARABIC_KUWAIT",
+ "ARABIC_LEBANON",
+ "ARABIC_LIBYA",
+ "ARABIC_MOROCCO",
+ "ARABIC_OMAN",
+ "ARABIC_QATAR",
+ "ARABIC_SAUDI_ARABIA",
+ "ARABIC_SUDAN",
+ "ARABIC_SYRIA",
+ "ARABIC_TUNISIA",
+ "ARABIC_UAE",
+ "ARABIC_YEMEN",
+ "ARMENIAN",
+ "ASSAMESE",
+ "AYMARA",
+ "AZERI",
+ "AZERI_CYRILLIC",
+ "AZERI_LATIN",
+ "BASHKIR",
+ "BASQUE",
+ "BELARUSIAN",
+ "BENGALI",
+ "BHUTANI",
+ "BIHARI",
+ "BISLAMA",
+ "BRETON",
+ "BULGARIAN",
+ "BURMESE",
+ "CAMBODIAN",
+ "CATALAN",
+ "CHINESE",
+ "CHINESE_SIMPLIFIED",
+ "CHINESE_TRADITIONAL",
+ "CHINESE_HONGKONG",
+ "CHINESE_MACAU",
+ "CHINESE_SINGAPORE",
+ "CHINESE_TAIWAN",
+ "CORSICAN",
+ "CROATIAN",
+ "CZECH",
+ "DANISH",
+ "DUTCH",
+ "DUTCH_BELGIAN",
+ "ENGLISH",
+ "ENGLISH_UK",
+ "ENGLISH_US",
+ "ENGLISH_AUSTRALIA",
+ "ENGLISH_BELIZE",
+ "ENGLISH_BOTSWANA",
+ "ENGLISH_CANADA",
+ "ENGLISH_CARIBBEAN",
+ "ENGLISH_DENMARK",
+ "ENGLISH_EIRE",
+ "ENGLISH_JAMAICA",
+ "ENGLISH_NEW_ZEALAND",
+ "ENGLISH_PHILIPPINES",
+ "ENGLISH_SOUTH_AFRICA",
+ "ENGLISH_TRINIDAD",
+ "ENGLISH_ZIMBABWE",
+ "ESPERANTO",
+ "ESTONIAN",
+ "FAEROESE",
+ "FARSI",
+ "FIJI",
+ "FINNISH",
+ "FRENCH",
+ "FRENCH_BELGIAN",
+ "FRENCH_CANADIAN",
+ "FRENCH_LUXEMBOURG",
+ "FRENCH_MONACO",
+ "FRENCH_SWISS",
+ "FRISIAN",
+ "GALICIAN",
+ "GEORGIAN",
+ "GERMAN",
+ "GERMAN_AUSTRIAN",
+ "GERMAN_BELGIUM",
+ "GERMAN_LIECHTENSTEIN",
+ "GERMAN_LUXEMBOURG",
+ "GERMAN_SWISS",
+ "GREEK",
+ "GREENLANDIC",
+ "GUARANI",
+ "GUJARATI",
+ "HAUSA",
+ "HEBREW",
+ "HINDI",
+ "HUNGARIAN",
+ "ICELANDIC",
+ "INDONESIAN",
+ "INTERLINGUA",
+ "INTERLINGUE",
+ "INUKTITUT",
+ "INUPIAK",
+ "IRISH",
+ "ITALIAN",
+ "ITALIAN_SWISS",
+ "JAPANESE",
+ "JAVANESE",
+ "KANNADA",
+ "KASHMIRI",
+ "KASHMIRI_INDIA",
+ "KAZAKH",
+ "KERNEWEK",
+ "KINYARWANDA",
+ "KIRGHIZ",
+ "KIRUNDI",
+ "KONKANI",
+ "KOREAN",
+ "KURDISH",
+ "LAOTHIAN",
+ "LATIN",
+ "LATVIAN",
+ "LINGALA",
+ "LITHUANIAN",
+ "MACEDONIAN",
+ "MALAGASY",
+ "MALAY",
+ "MALAYALAM",
+ "MALAY_BRUNEI_DARUSSALAM",
+ "MALAY_MALAYSIA",
+ "MALTESE",
+ "MANIPURI",
+ "MAORI",
+ "MARATHI",
+ "MOLDAVIAN",
+ "MONGOLIAN",
+ "NAURU",
+ "NEPALI",
+ "NEPALI_INDIA",
+ "NORWEGIAN_BOKMAL",
+ "NORWEGIAN_NYNORSK",
+ "OCCITAN",
+ "ORIYA",
+ "OROMO",
+ "PASHTO",
+ "POLISH",
+ "PORTUGUESE",
+ "PORTUGUESE_BRAZILIAN",
+ "PUNJABI",
+ "QUECHUA",
+ "RHAETO_ROMANCE",
+ "ROMANIAN",
+ "RUSSIAN",
+ "RUSSIAN_UKRAINE",
+ "SAMOAN",
+ "SANGHO",
+ "SANSKRIT",
+ "SCOTS_GAELIC",
+ "SERBIAN",
+ "SERBIAN_CYRILLIC",
+ "SERBIAN_LATIN",
+ "SERBO_CROATIAN",
+ "SESOTHO",
+ "SETSWANA",
+ "SHONA",
+ "SINDHI",
+ "SINHALESE",
+ "SISWATI",
+ "SLOVAK",
+ "SLOVENIAN",
+ "SOMALI",
+ "SPANISH",
+ "SPANISH_ARGENTINA",
+ "SPANISH_BOLIVIA",
+ "SPANISH_CHILE",
+ "SPANISH_COLOMBIA",
+ "SPANISH_COSTA_RICA",
+ "SPANISH_DOMINICAN_REPUBLIC",
+ "SPANISH_ECUADOR",
+ "SPANISH_EL_SALVADOR",
+ "SPANISH_GUATEMALA",
+ "SPANISH_HONDURAS",
+ "SPANISH_MEXICAN",
+ "SPANISH_MODERN",
+ "SPANISH_NICARAGUA",
+ "SPANISH_PANAMA",
+ "SPANISH_PARAGUAY",
+ "SPANISH_PERU",
+ "SPANISH_PUERTO_RICO",
+ "SPANISH_URUGUAY",
+ "SPANISH_US",
+ "SPANISH_VENEZUELA",
+ "SUNDANESE",
+ "SWAHILI",
+ "SWEDISH",
+ "SWEDISH_FINLAND",
+ "TAGALOG",
+ "TAJIK",
+ "TAMIL",
+ "TATAR",
+ "TELUGU",
+ "THAI",
+ "TIBETAN",
+ "TIGRINYA",
+ "TONGA",
+ "TSONGA",
+ "TURKISH",
+ "TURKMEN",
+ "TWI",
+ "UIGHUR",
+ "UKRAINIAN",
+ "URDU",
+ "URDU_INDIA",
+ "URDU_PAKISTAN",
+ "UZBEK",
+ "UZBEK_CYRILLIC",
+ "UZBEK_LATIN",
+ "VIETNAMESE",
+ "VOLAPUK",
+ "WELSH",
+ "WOLOF",
+ "XHOSA",
+ "YIDDISH",
+ "YORUBA",
+ "ZHUANG",
+ "ZULU",
+ };
+
+ if ( (size_t)lang < WXSIZEOF(languageNames) )
+ return languageNames[lang];
+ else
+ return "INVALID";
+}
+
+static void TestDefaultLang()
+{
+ puts("*** Testing wxLocale::GetSystemLanguage ***");
+
+ static const wxChar *langStrings[] =
+ {
+ NULL, // system default
+ _T("C"),
+ _T("fr"),
+ _T("fr_FR"),
+ _T("en"),
+ _T("en_GB"),
+ _T("en_US"),
+ _T("de_DE.iso88591"),
+ _T("german"),
+ _T("?"), // invalid lang spec
+ _T("klingonese"), // I bet on some systems it does exist...
+ };
+
+ wxPrintf(_T("The default system encoding is %s (%d)\n"),
+ wxLocale::GetSystemEncodingName().c_str(),
+ wxLocale::GetSystemEncoding());
+
+ for ( size_t n = 0; n < WXSIZEOF(langStrings); n++ )
+ {
+ const char *langStr = langStrings[n];
+ if ( langStr )
+ {
+ // FIXME: this doesn't do anything at all under Windows, we need
+ // to create a new wxLocale!
+ wxSetEnv(_T("LC_ALL"), langStr);
+ }
+
+ int lang = gs_localeDefault.GetSystemLanguage();
+ printf("Locale for '%s' is %s.\n",
+ langStr ? langStr : "system default", GetLangName(lang));
+ }
+}
+
+#endif // TEST_LOCALE
+
+// ----------------------------------------------------------------------------
+// MIME types
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_MIME
+
+#include <wx/mimetype.h>
+
+static void TestMimeEnum()
+{
+ wxPuts(_T("*** Testing wxMimeTypesManager::EnumAllFileTypes() ***\n"));
+
+ wxArrayString mimetypes;
+
+ size_t count = wxTheMimeTypesManager->EnumAllFileTypes(mimetypes);
+
+ printf("*** All %u known filetypes: ***\n", count);
+
+ wxArrayString exts;
+ wxString desc;
+
+ for ( size_t n = 0; n < count; n++ )
+ {
+ wxFileType *filetype =
+ wxTheMimeTypesManager->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());
+ }
+
+ puts("");
+}
+
+static void TestMimeOverride()
+{
+ wxPuts(_T("*** Testing wxMimeTypesManager additional files loading ***\n"));
+
+ static const wxChar *mailcap = _T("/tmp/mailcap");
+ static const wxChar *mimetypes = _T("/tmp/mime.types");
+
+ if ( wxFile::Exists(mailcap) )
+ wxPrintf(_T("Loading mailcap from '%s': %s\n"),
+ mailcap,
+ wxTheMimeTypesManager->ReadMailcap(mailcap) ? _T("ok") : _T("ERROR"));
+ else
+ wxPrintf(_T("WARN: mailcap file '%s' doesn't exist, not loaded.\n"),
+ mailcap);
+
+ if ( wxFile::Exists(mimetypes) )
+ wxPrintf(_T("Loading mime.types from '%s': %s\n"),
+ mimetypes,
+ wxTheMimeTypesManager->ReadMimeTypes(mimetypes) ? _T("ok") : _T("ERROR"));
+ else
+ wxPrintf(_T("WARN: mime.types file '%s' doesn't exist, not loaded.\n"),
+ mimetypes);
+
+ puts("");
+}
+
+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 = wxTheMimeTypesManager->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;
+ }
+ }
+
+ puts("");
+}
+
+static void TestMimeAssociate()
+{
+ wxPuts(_T("*** Testing creation of filetype association ***\n"));
+
+ wxFileTypeInfo ftInfo(
+ _T("application/x-xyz"),
+ _T("xyzview '%s'"), // open cmd
+ _T(""), // print cmd
+ _T("XYZ File") // description
+ _T(".xyz"), // extensions
+ NULL // end of extensions
+ );
+ ftInfo.SetShortDesc(_T("XYZFile")); // used under Win32 only
+
+ wxFileType *ft = wxTheMimeTypesManager->Associate(ftInfo);
+ if ( !ft )
+ {
+ wxPuts(_T("ERROR: failed to create association!"));
+ }
+ else
+ {
+ // TODO: read it back
+ delete ft;
+ }
+
+ puts("");
+}
+
+#endif // TEST_MIME
+
+// ----------------------------------------------------------------------------
+// misc information functions
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_INFO_FUNCTIONS
+
+#include <wx/utils.h>
+
+static void TestDiskInfo()
+{
+ puts("*** Testing wxGetDiskSpace() ***");
+
+ for ( ;; )
+ {
+ char pathname[128];
+ printf("\nEnter a directory name: ");
+ if ( !fgets(pathname, WXSIZEOF(pathname), stdin) )
+ break;
+
+ // kill the last '\n'
+ pathname[strlen(pathname) - 1] = 0;
+
+ wxLongLong total, free;
+ if ( !wxGetDiskSpace(pathname, &total, &free) )
+ {
+ wxPuts(_T("ERROR: wxGetDiskSpace failed."));
+ }
+ else
+ {
+ wxPrintf(_T("%sKb total, %sKb free on '%s'.\n"),
+ (total / 1024).ToString().c_str(),
+ (free / 1024).ToString().c_str(),
+ pathname);
+ }
+ }
+}
+
+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())
+
+static const long testLongs[] =
+{
+ 0,
+ 1,
+ -1,
+ LONG_MAX,
+ LONG_MIN,
+ 0x1234,
+ -0x1234
+};
+
+#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()
+{
+#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
+
+// ----------------------------------------------------------------------------
+// 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>");
+ }
+
+ 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/fontenc.h>
+#include <wx/encconv.h>
+#include <wx/buffer.h>
+
+static void TestUtf8()
+{
+ puts("*** Testing UTF8 support ***\n");
+
+ static const char textInUtf8[] =
+ {
+ 208, 157, 208, 181, 209, 129, 208, 186, 208, 176, 208, 183, 208, 176,
+ 208, 189, 208, 189, 208, 190, 32, 208, 191, 208, 190, 209, 128, 208,
+ 176, 208, 180, 208, 190, 208, 178, 208, 176, 208, 187, 32, 208, 188,
+ 208, 181, 208, 189, 209, 143, 32, 209, 129, 208, 178, 208, 190, 208,
+ 181, 208, 185, 32, 208, 186, 209, 128, 209, 131, 209, 130, 208, 181,
+ 208, 185, 209, 136, 208, 181, 208, 185, 32, 208, 189, 208, 190, 208,
+ 178, 208, 190, 209, 129, 209, 130, 209, 140, 209, 142, 0
+ };
+
+ char buf[1024];
+ wchar_t wbuf[1024];
+ if ( wxConvUTF8.MB2WC(wbuf, textInUtf8, WXSIZEOF(textInUtf8)) <= 0 )
+ {
+ puts("ERROR: UTF-8 decoding failed.");
+ }
+ else
+ {
+ // using wxEncodingConverter
+#if 0
+ wxEncodingConverter ec;
+ ec.Init(wxFONTENCODING_UNICODE, wxFONTENCODING_KOI8);
+ ec.Convert(wbuf, buf);
+#else // using wxCSConv
+ wxCSConv conv(_T("koi8-r"));
+ if ( conv.WC2MB(buf, wbuf, 0 /* not needed wcslen(wbuf) */) <= 0 )
+ {
+ puts("ERROR: conversion to KOI8-R failed.");
+ }
+ else
+#endif
+
+ printf("The resulting string (in koi8-r): %s\n", buf);
+ }
+}
+
+#endif // TEST_WCHAR
+
+// ----------------------------------------------------------------------------
+// ZIP stream
+// ----------------------------------------------------------------------------
+
+#ifdef TEST_ZIP
+
+#include "wx/filesys.h"
+#include "wx/fs_zip.h"
+#include "wx/zipstrm.h"
+
+static const wxChar *TESTFILE_ZIP = _T("testdata.zip");
+
+static void TestZipStreamRead()
+{
+ puts("*** Testing ZIP reading ***\n");
+
+ static const wxChar *filename = _T("foo");
+ wxZipInputStream istr(TESTFILE_ZIP, filename);
+ printf("Archive size: %u\n", istr.GetSize());
+
+ printf("Dumping the file '%s':\n", filename);
+ while ( !istr.Eof() )
+ {
+ putchar(istr.GetC());
+ fflush(stdout);
+ }
+
+ puts("\n----- done ------");
+}
+
+static void DumpZipDirectory(wxFileSystem& fs,
+ const wxString& dir,
+ const wxString& indent)
+{
+ wxString prefix = wxString::Format(_T("%s#zip:%s"),
+ TESTFILE_ZIP, dir.c_str());
+ wxString wildcard = prefix + _T("/*");
+
+ wxString dirname = fs.FindFirst(wildcard, wxDIR);
+ while ( !dirname.empty() )
+ {
+ if ( !dirname.StartsWith(prefix + _T('/'), &dirname) )
+ {
+ wxPrintf(_T("ERROR: unexpected wxFileSystem::FindNext result\n"));
+
+ break;
+ }
+
+ wxPrintf(_T("%s%s\n"), indent.c_str(), dirname.c_str());
+
+ DumpZipDirectory(fs, dirname,
+ indent + wxString(_T(' '), 4));
+
+ dirname = fs.FindNext();
+ }
+
+ wxString filename = fs.FindFirst(wildcard, wxFILE);
+ while ( !filename.empty() )
+ {
+ if ( !filename.StartsWith(prefix, &filename) )
+ {
+ wxPrintf(_T("ERROR: unexpected wxFileSystem::FindNext result\n"));
+
+ break;
+ }
+
+ wxPrintf(_T("%s%s\n"), indent.c_str(), filename.c_str());
+
+ filename = fs.FindNext();
+ }
+}
+
+static void TestZipFileSystem()
+{
+ puts("*** Testing ZIP file system ***\n");
+
+ wxFileSystem::AddHandler(new wxZipFSHandler);
+ wxFileSystem fs;
+ wxPrintf(_T("Dumping all files in the archive %s:\n"), TESTFILE_ZIP);
+
+ DumpZipDirectory(fs, _T(""), wxString(_T(' '), 4));
+}
+
+#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 <math.h>
+
+#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 ***");
projects / wxWidgets.git / blobdiff