tests/interactive/input.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        tests/interactive/input.cpp
   3 // Purpose:     Miscellaneous tests requiring user input
   4 // Author:      Francesco Montorsi (extracted from console sample)
   5 // Created:     2010-06-21
   6 // RCS-ID:      $Id$
   7 // Copyright:   (c) 2010 wxWidgets team
   8 ///////////////////////////////////////////////////////////////////////////////
   9
  10 // ============================================================================
  11 // declarations
  12 // ============================================================================
  13
  14 // ----------------------------------------------------------------------------
  15 // headers
  16 // ----------------------------------------------------------------------------
  17
  18 #include "testprec.h"
  19
  20 #ifdef __BORLANDC__
  21     #pragma hdrstop
  22 #endif
  23
  24 #include "wx/app.h"
  25 #include "wx/wxcrt.h"           // for wxPuts
  26 #include "wx/wxcrtvararg.h"     // for wxPrintf
  27
  28 // ----------------------------------------------------------------------------
  29 // conditional compilation
  30 // ----------------------------------------------------------------------------
  31
  32 #define TEST_SNGLINST
  33 #define TEST_FTP
  34 #define TEST_INFO_FUNCTIONS
  35 #if wxUSE_REGEX
  36     #define TEST_REGEX
  37 #endif
  38 #define TEST_DATETIME
  39
  40 // ----------------------------------------------------------------------------
  41 // test class
  42 // ----------------------------------------------------------------------------
  43
  44 class InteractiveInputTestCase : public CppUnit::TestCase
  45 {
  46 public:
  47     InteractiveInputTestCase() { }
  48
  49 private:
  50     CPPUNIT_TEST_SUITE( InteractiveInputTestCase );
  51         CPPUNIT_TEST( TestSingleIstance );
  52         CPPUNIT_TEST( TestFtpInteractive );
  53         CPPUNIT_TEST( TestDiskInfo );
  54         CPPUNIT_TEST( TestRegExInteractive );
  55         CPPUNIT_TEST( TestDateTimeInteractive );
  56     CPPUNIT_TEST_SUITE_END();
  57
  58     void TestSingleIstance();
  59     void TestFtpInteractive();
  60     void TestDiskInfo();
  61     void TestRegExInteractive();
  62     void TestDateTimeInteractive();
  63
  64     wxDECLARE_NO_COPY_CLASS(InteractiveInputTestCase);
  65 };
  66
  67 // ----------------------------------------------------------------------------
  68 // CppUnit macros
  69 // ----------------------------------------------------------------------------
  70
  71 //CPPUNIT_TEST_SUITE_REGISTRATION( InteractiveInputTestCase );
  72     // do not run this test by default!
  73
  74 CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( InteractiveInputTestCase, "InteractiveInputTestCase" );
  75
  76 // ============================================================================
  77 // implementation
  78 // ============================================================================
  79
  80 // ----------------------------------------------------------------------------
  81 // misc information functions
  82 // ----------------------------------------------------------------------------
  83
  84 #include "wx/utils.h"
  85
  86 void InteractiveInputTestCase::TestDiskInfo()
  87 {
  88 #ifdef TEST_INFO_FUNCTIONS
  89     wxPuts(wxT("*** Testing wxGetDiskSpace() ***"));
  90
  91     for ( ;; )
  92     {
  93         wxChar pathname[128];
  94         wxPrintf(wxT("Enter a directory name (press ENTER or type 'quit' to escape): "));
  95         if ( !wxFgets(pathname, WXSIZEOF(pathname), stdin) )
  96             break;
  97
  98         // kill the last '\n'
  99         pathname[wxStrlen(pathname) - 1] = 0;
 100
 101         if (pathname[0] == '\0' || wxStrcmp(pathname, "quit") == 0)
 102             break;
 103
 104         wxLongLong total, free;
 105         if ( !wxGetDiskSpace(pathname, &total, &free) )
 106         {
 107             wxPuts(wxT("ERROR: wxGetDiskSpace failed."));
 108         }
 109         else
 110         {
 111             wxPrintf(wxT("%sKb total, %sKb free on '%s'.\n"),
 112                     (total / 1024).ToString().c_str(),
 113                     (free / 1024).ToString().c_str(),
 114                     pathname);
 115         }
 116
 117         wxPuts("\n");
 118     }
 119
 120     wxPuts("\n");
 121 #endif // TEST_INFO_FUNCTIONS
 122 }
 123
 124
 125 // ----------------------------------------------------------------------------
 126 // regular expressions
 127 // ----------------------------------------------------------------------------
 128
 129 #include "wx/regex.h"
 130
 131 void InteractiveInputTestCase::TestRegExInteractive()
 132 {
 133 #ifdef TEST_REGEX
 134     wxPuts(wxT("*** Testing RE interactively ***"));
 135
 136     for ( ;; )
 137     {
 138         wxChar pattern[128];
 139         wxPrintf(wxT("Enter a pattern (press ENTER or type 'quit' to escape): "));
 140         if ( !wxFgets(pattern, WXSIZEOF(pattern), stdin) )
 141             break;
 142
 143         // kill the last '\n'
 144         pattern[wxStrlen(pattern) - 1] = 0;
 145
 146         if (pattern[0] == '\0' || wxStrcmp(pattern, "quit") == 0)
 147             break;
 148
 149         wxRegEx re;
 150         if ( !re.Compile(pattern) )
 151         {
 152             continue;
 153         }
 154
 155         wxChar text[128];
 156         for ( ;; )
 157         {
 158             wxPrintf(wxT("Enter text to match: "));
 159             if ( !wxFgets(text, WXSIZEOF(text), stdin) )
 160                 break;
 161
 162             // kill the last '\n'
 163             text[wxStrlen(text) - 1] = 0;
 164
 165             if ( !re.Matches(text) )
 166             {
 167                 wxPrintf(wxT("No match.\n"));
 168             }
 169             else
 170             {
 171                 wxPrintf(wxT("Pattern matches at '%s'\n"), re.GetMatch(text).c_str());
 172
 173                 size_t start, len;
 174                 for ( size_t n = 1; ; n++ )
 175                 {
 176                     if ( !re.GetMatch(&start, &len, n) )
 177                     {
 178                         break;
 179                     }
 180
 181                     wxPrintf(wxT("Subexpr %u matched '%s'\n"),
 182                              n, wxString(text + start, len).c_str());
 183                 }
 184             }
 185         }
 186
 187         wxPuts("\n");
 188     }
 189 #endif // TEST_REGEX
 190 }
 191
 192
 193 // ----------------------------------------------------------------------------
 194 // FTP
 195 // ----------------------------------------------------------------------------
 196
 197 #include "wx/protocol/ftp.h"
 198 #include "wx/protocol/log.h"
 199
 200 #define FTP_ANONYMOUS
 201 #ifdef FTP_ANONYMOUS
 202     static const wxChar *hostname = wxT("ftp.wxwidgets.org");
 203 #else
 204     static const wxChar *hostname = "localhost";
 205 #endif
 206
 207 void InteractiveInputTestCase::TestFtpInteractive()
 208 {
 209 #ifdef TEST_FTP
 210     wxFTP ftp;
 211
 212     wxPuts(wxT("\n*** Interactive wxFTP test ***"));
 213
 214 #ifdef FTP_ANONYMOUS
 215     wxPrintf(wxT("--- Attempting to connect to %s:21 anonymously...\n"), hostname);
 216 #else // !FTP_ANONYMOUS
 217     wxChar user[256];
 218     wxFgets(user, WXSIZEOF(user), stdin);
 219     user[wxStrlen(user) - 1] = '\0'; // chop off '\n'
 220     ftp.SetUser(user);
 221
 222     wxChar password[256];
 223     wxPrintf(wxT("Password for %s: "), password);
 224     wxFgets(password, WXSIZEOF(password), stdin);
 225     password[wxStrlen(password) - 1] = '\0'; // chop off '\n'
 226     ftp.SetPassword(password);
 227
 228     wxPrintf(wxT("--- Attempting to connect to %s:21 as %s...\n"), hostname, user);
 229 #endif // FTP_ANONYMOUS/!FTP_ANONYMOUS
 230
 231     if ( !ftp.Connect(hostname) )
 232     {
 233         wxPrintf(wxT("ERROR: failed to connect to %s\n"), hostname);
 234
 235         return;
 236     }
 237     else
 238     {
 239         wxPrintf(wxT("--- Connected to %s, current directory is '%s'\n"),
 240                  hostname, ftp.Pwd().c_str());
 241     }
 242
 243     wxChar buf[128];
 244     for ( ;; )
 245     {
 246         wxPrintf(wxT("Enter FTP command (press ENTER or type 'quit' to escape): "));
 247         if ( !wxFgets(buf, WXSIZEOF(buf), stdin) )
 248             break;
 249
 250         // kill the last '\n'
 251         buf[wxStrlen(buf) - 1] = 0;
 252
 253         if (buf[0] == '\0' || wxStrcmp(buf, "quit") == 0)
 254             break;
 255
 256         // special handling of LIST and NLST as they require data connection
 257         wxString start(buf, 4);
 258         start.MakeUpper();
 259         if ( start == wxT("LIST") || start == wxT("NLST") )
 260         {
 261             wxString wildcard;
 262             if ( wxStrlen(buf) > 4 )
 263                 wildcard = buf + 5;
 264
 265             wxArrayString files;
 266             if ( !ftp.GetList(files, wildcard, start == wxT("LIST")) )
 267             {
 268                 wxPrintf(wxT("ERROR: failed to get %s of files\n"), start.c_str());
 269             }
 270             else
 271             {
 272                 wxPrintf(wxT("--- %s of '%s' under '%s':\n"),
 273                        start.c_str(), wildcard.c_str(), ftp.Pwd().c_str());
 274                 size_t count = files.GetCount();
 275                 for ( size_t n = 0; n < count; n++ )
 276                 {
 277                     wxPrintf(wxT("\t%s\n"), files[n].c_str());
 278                 }
 279                 wxPuts(wxT("--- End of the file list"));
 280             }
 281         }
 282         else // !list
 283         {
 284             wxChar ch = ftp.SendCommand(buf);
 285             wxPrintf(wxT("Command %s"), ch ? wxT("succeeded") : wxT("failed"));
 286             if ( ch )
 287             {
 288                 wxPrintf(wxT(" (return code %c)"), ch);
 289             }
 290
 291             wxPrintf(wxT(", server reply:\n%s\n\n"), ftp.GetLastResult().c_str());
 292         }
 293     }
 294
 295     wxPuts(wxT("\n"));
 296 #endif // TEST_FTP
 297 }
 298
 299 // ----------------------------------------------------------------------------
 300 // date time
 301 // ----------------------------------------------------------------------------
 302
 303 #include "wx/math.h"
 304 #include "wx/datetime.h"
 305
 306 void InteractiveInputTestCase::TestDateTimeInteractive()
 307 {
 308 #ifdef TEST_DATETIME
 309     wxPuts(wxT("\n*** interactive wxDateTime tests ***"));
 310
 311     wxChar buf[128];
 312
 313     for ( ;; )
 314     {
 315         wxPrintf(wxT("Enter a date (press ENTER or type 'quit' to escape): "));
 316         if ( !wxFgets(buf, WXSIZEOF(buf), stdin) )
 317             break;
 318
 319         // kill the last '\n'
 320         buf[wxStrlen(buf) - 1] = 0;
 321
 322         if ( buf[0] == '\0' || wxStrcmp(buf, "quit") == 0 )
 323             break;
 324
 325         wxDateTime dt;
 326         const wxChar *p = dt.ParseDate(buf);
 327         if ( !p )
 328         {
 329             wxPrintf(wxT("ERROR: failed to parse the date '%s'.\n"), buf);
 330
 331             continue;
 332         }
 333         else if ( *p )
 334         {
 335             wxPrintf(wxT("WARNING: parsed only first %u characters.\n"), p - buf);
 336         }
 337
 338         wxPrintf(wxT("%s: day %u, week of month %u/%u, week of year %u\n"),
 339                  dt.Format(wxT("%b %d, %Y")).c_str(),
 340                  dt.GetDayOfYear(),
 341                  dt.GetWeekOfMonth(wxDateTime::Monday_First),
 342                  dt.GetWeekOfMonth(wxDateTime::Sunday_First),
 343                  dt.GetWeekOfYear(wxDateTime::Monday_First));
 344     }
 345
 346     wxPuts("\n");
 347 #endif // TEST_DATETIME
 348 }
 349
 350
 351 // ----------------------------------------------------------------------------
 352 // single instance
 353 // ----------------------------------------------------------------------------
 354
 355 #include "wx/snglinst.h"
 356
 357 void InteractiveInputTestCase::TestSingleIstance()
 358 {
 359 #ifdef TEST_SNGLINST
 360     wxPuts(wxT("\n*** Testing wxSingleInstanceChecker ***"));
 361
 362     wxSingleInstanceChecker checker;
 363     if ( checker.Create(wxT(".wxconsole.lock")) )
 364     {
 365         if ( checker.IsAnotherRunning() )
 366         {
 367             wxPrintf(wxT("Another instance of the program is running, exiting.\n"));
 368             return;
 369         }
 370
 371         // wait some time to give time to launch another instance
 372         wxPuts(wxT("If you try to run another instance of this program now, it won't start."));
 373         wxPrintf(wxT("Press \"Enter\" to exit wxSingleInstanceChecker test and proceed..."));
 374         wxFgetc(stdin);
 375     }
 376     else // failed to create
 377     {
 378         wxPrintf(wxT("Failed to init wxSingleInstanceChecker.\n"));
 379     }
 380
 381     wxPuts("\n");
 382 #endif // defined(TEST_SNGLINST)
 383 }
 384