+#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()