Applied patches for #15184 (wxRichTextAction fix for when the command identifier...
[wxWidgets.git] / tests / test.cpp
1 ///////////////////////////////////////////////////////////////////////////////
2 // Name: test.cpp
3 // Purpose: Test program for wxWidgets
4 // Author: Mike Wetherell
5 // RCS-ID: $Id$
6 // Copyright: (c) 2004 Mike Wetherell
7 // Licence: wxWindows licence
8 ///////////////////////////////////////////////////////////////////////////////
9
10 // ----------------------------------------------------------------------------
11 // headers
12 // ----------------------------------------------------------------------------
13
14 // For compilers that support precompilation, includes "wx/wx.h"
15 // and "wx/cppunit.h"
16 #include "testprec.h"
17
18 #ifdef __BORLANDC__
19 #pragma hdrstop
20 #endif
21
22 // for all others, include the necessary headers
23 #ifndef WX_PRECOMP
24 #include "wx/wx.h"
25 #endif
26
27 #include "wx/beforestd.h"
28 #ifdef __VISUALC__
29 #pragma warning(disable:4100)
30 #endif
31
32 #include <cppunit/TestListener.h>
33 #include <cppunit/Protector.h>
34 #include <cppunit/Test.h>
35 #include <cppunit/TestResult.h>
36 #include <cppunit/TestFailure.h>
37 #include <cppunit/TestResultCollector.h>
38
39 #ifdef __VISUALC__
40 #pragma warning(default:4100)
41 #endif
42 #include "wx/afterstd.h"
43
44 #include "wx/cmdline.h"
45 #include <exception>
46 #include <iostream>
47
48 #ifdef __WINDOWS__
49 #include "wx/msw/msvcrt.h"
50 #endif
51
52 #ifdef __WXOSX__
53 #include "wx/osx/private.h"
54 #endif
55
56 #if wxUSE_GUI
57 #include "testableframe.h"
58 #endif
59
60 #include "wx/socket.h"
61 #include "wx/evtloop.h"
62
63 using namespace std;
64
65 using CppUnit::Test;
66 using CppUnit::TestSuite;
67 using CppUnit::TestFactoryRegistry;
68
69
70 // ----------------------------------------------------------------------------
71 // helper classes
72 // ----------------------------------------------------------------------------
73
74 // exception class for MSVC debug CRT assertion failures
75 #ifdef wxUSE_VC_CRTDBG
76
77 struct CrtAssertFailure
78 {
79 CrtAssertFailure(const char *message) : m_msg(message) { }
80
81 const wxString m_msg;
82
83 wxDECLARE_NO_ASSIGN_CLASS(CrtAssertFailure);
84 };
85
86 #endif // wxUSE_VC_CRTDBG
87
88 #if wxDEBUG_LEVEL
89
90 // Information about the last not yet handled assertion.
91 static wxString s_lastAssertMessage;
92
93 static wxString FormatAssertMessage(const wxString& file,
94 int line,
95 const wxString& func,
96 const wxString& cond,
97 const wxString& msg)
98 {
99 wxString str;
100 str << "wxWidgets assert: " << cond << " failed "
101 "at " << file << ":" << line << " in " << func
102 << " with message '" << msg << "'";
103 return str;
104 }
105
106 static void TestAssertHandler(const wxString& file,
107 int line,
108 const wxString& func,
109 const wxString& cond,
110 const wxString& msg)
111 {
112 // Determine whether we can safely throw an exception to just make the test
113 // fail or whether we need to abort (in this case "msg" will contain the
114 // explanation why did we decide to do it).
115 wxString abortReason;
116
117 const wxString
118 assertMessage = FormatAssertMessage(file, line, func, cond, msg);
119
120 if ( !wxIsMainThread() )
121 {
122 // Exceptions thrown from worker threads are not caught currently and
123 // so we'd just die without any useful information -- abort instead.
124 abortReason << assertMessage << "in a worker thread.";
125 }
126 else if ( uncaught_exception() )
127 {
128 // Throwing while already handling an exception would result in
129 // terminate() being called and we wouldn't get any useful information
130 // about why the test failed then.
131 if ( s_lastAssertMessage.empty() )
132 {
133 abortReason << assertMessage << "while handling an exception";
134 }
135 else // In this case the exception is due to a previous assert.
136 {
137 abortReason << s_lastAssertMessage << "\n and another "
138 << assertMessage << " while handling it.";
139 }
140 }
141 else // Can "safely" throw from here.
142 {
143 // Remember this in case another assert happens while handling this
144 // exception: we want to show the original assert as it's usually more
145 // useful to determine the real root of the problem.
146 s_lastAssertMessage = assertMessage;
147
148 throw TestAssertFailure(file, line, func, cond, msg);
149 }
150
151 wxFputs(abortReason, stderr);
152 fflush(stderr);
153 _exit(-1);
154 }
155
156 #endif // wxDEBUG_LEVEL
157
158 // this function should only be called from a catch clause
159 static string GetExceptionMessage()
160 {
161 wxString msg;
162
163 try
164 {
165 throw;
166 }
167 #if wxDEBUG_LEVEL
168 catch ( TestAssertFailure& )
169 {
170 msg = s_lastAssertMessage;
171 s_lastAssertMessage.clear();
172 }
173 #endif // wxDEBUG_LEVEL
174 #ifdef wxUSE_VC_CRTDBG
175 catch ( CrtAssertFailure& e )
176 {
177 msg << "CRT assert failure: " << e.m_msg;
178 }
179 #endif // wxUSE_VC_CRTDBG
180 catch ( std::exception& e )
181 {
182 msg << "std::exception: " << e.what();
183 }
184 catch ( ... )
185 {
186 msg = "Unknown exception caught.";
187 }
188
189 return string(msg.mb_str());
190 }
191
192 // Protector adding handling of wx-specific (this includes MSVC debug CRT in
193 // this context) exceptions
194 class wxUnitTestProtector : public CppUnit::Protector
195 {
196 public:
197 virtual bool protect(const CppUnit::Functor &functor,
198 const CppUnit::ProtectorContext& context)
199 {
200 try
201 {
202 return functor();
203 }
204 catch ( std::exception& )
205 {
206 // cppunit deals with the standard exceptions itself, let it do as
207 // it output more details (especially for std::exception-derived
208 // CppUnit::Exception) than we do
209 throw;
210 }
211 catch ( ... )
212 {
213 reportError(context, CppUnit::Message("Uncaught exception",
214 GetExceptionMessage()));
215 }
216
217 return false;
218 }
219 };
220
221 // Displays the test name before starting to execute it: this helps with
222 // diagnosing where exactly does a test crash or hang when/if it does.
223 class DetailListener : public CppUnit::TestListener
224 {
225 public:
226 DetailListener(bool doTiming = false):
227 CppUnit::TestListener(),
228 m_timing(doTiming)
229 {
230 }
231
232 virtual void startTest(CppUnit::Test *test)
233 {
234 printf(" %-60s ", test->getName().c_str());
235 m_result = RESULT_OK;
236 m_watch.Start();
237 }
238
239 virtual void addFailure(const CppUnit::TestFailure& failure)
240 {
241 m_result = failure.isError() ? RESULT_ERROR : RESULT_FAIL;
242 }
243
244 virtual void endTest(CppUnit::Test * WXUNUSED(test))
245 {
246 m_watch.Pause();
247 printf("%s", GetResultStr(m_result));
248 if (m_timing)
249 printf(" %6ld ms", m_watch.Time());
250 printf("\n");
251 }
252
253 protected :
254 enum ResultType
255 {
256 RESULT_OK = 0,
257 RESULT_FAIL,
258 RESULT_ERROR,
259 RESULT_MAX
260 };
261
262 const char* GetResultStr(ResultType type) const
263 {
264 static const char *resultTypeNames[] =
265 {
266 " OK",
267 "FAIL",
268 " ERR"
269 };
270
271 wxCOMPILE_TIME_ASSERT( WXSIZEOF(resultTypeNames) == RESULT_MAX,
272 ResultTypeNamesMismatch );
273
274 return resultTypeNames[type];
275 }
276
277 bool m_timing;
278 wxStopWatch m_watch;
279 ResultType m_result;
280 };
281
282 #if wxUSE_GUI
283 typedef wxApp TestAppBase;
284 #else
285 typedef wxAppConsole TestAppBase;
286 #endif
287
288 // The application class
289 //
290 class TestApp : public TestAppBase
291 {
292 public:
293 TestApp();
294
295 // standard overrides
296 virtual void OnInitCmdLine(wxCmdLineParser& parser);
297 virtual bool OnCmdLineParsed(wxCmdLineParser& parser);
298 virtual bool OnInit();
299 virtual int OnRun();
300 virtual int OnExit();
301
302 // used by events propagation test
303 virtual int FilterEvent(wxEvent& event);
304 virtual bool ProcessEvent(wxEvent& event);
305
306 void SetFilterEventFunc(FilterEventFunc f) { m_filterEventFunc = f; }
307 void SetProcessEventFunc(ProcessEventFunc f) { m_processEventFunc = f; }
308
309 private:
310 void List(Test *test, const string& parent = "") const;
311
312 // call List() if m_list or runner.addTest() otherwise
313 void AddTest(CppUnit::TestRunner& runner, Test *test)
314 {
315 if (m_list)
316 List(test);
317 else
318 runner.addTest(test);
319 }
320
321 // command lines options/parameters
322 bool m_list;
323 bool m_longlist;
324 bool m_detail;
325 bool m_timing;
326 wxArrayString m_registries;
327 wxLocale *m_locale;
328
329 // event loop for GUI tests
330 wxEventLoop* m_eventloop;
331
332 // event handling hooks
333 FilterEventFunc m_filterEventFunc;
334 ProcessEventFunc m_processEventFunc;
335 };
336
337 IMPLEMENT_APP_NO_MAIN(TestApp)
338
339
340 // ----------------------------------------------------------------------------
341 // global functions
342 // ----------------------------------------------------------------------------
343
344 #ifdef wxUSE_VC_CRTDBG
345
346 static int TestCrtReportHook(int reportType, char *message, int *)
347 {
348 if ( reportType != _CRT_ASSERT )
349 return FALSE;
350
351 throw CrtAssertFailure(message);
352 }
353
354 #endif // wxUSE_VC_CRTDBG
355
356 int main(int argc, char **argv)
357 {
358 // tests can be ran non-interactively so make sure we don't show any assert
359 // dialog boxes -- neither our own nor from MSVC debug CRT -- which would
360 // prevent them from completing
361
362 #if wxDEBUG_LEVEL
363 wxSetAssertHandler(TestAssertHandler);
364 #endif // wxDEBUG_LEVEL
365
366 #ifdef wxUSE_VC_CRTDBG
367 _CrtSetReportHook(TestCrtReportHook);
368 #endif // wxUSE_VC_CRTDBG
369
370 try
371 {
372 return wxEntry(argc, argv);
373 }
374 catch ( ... )
375 {
376 cerr << "\n" << GetExceptionMessage() << endl;
377 }
378
379 return -1;
380 }
381
382 extern void SetFilterEventFunc(FilterEventFunc func)
383 {
384 wxGetApp().SetFilterEventFunc(func);
385 }
386
387 extern void SetProcessEventFunc(ProcessEventFunc func)
388 {
389 wxGetApp().SetProcessEventFunc(func);
390 }
391
392 extern bool IsNetworkAvailable()
393 {
394 // NOTE: we could use wxDialUpManager here if it was in wxNet; since it's in
395 // wxCore we use a simple rough test:
396
397 wxSocketBase::Initialize();
398
399 wxIPV4address addr;
400 if (!addr.Hostname("www.google.com") || !addr.Service("www"))
401 {
402 wxSocketBase::Shutdown();
403 return false;
404 }
405
406 wxSocketClient sock;
407 sock.SetTimeout(10); // 10 secs
408 bool online = sock.Connect(addr);
409
410 wxSocketBase::Shutdown();
411
412 return online;
413 }
414
415 extern bool IsAutomaticTest()
416 {
417 static int s_isAutomatic = -1;
418 if ( s_isAutomatic == -1 )
419 {
420 // Allow setting an environment variable to emulate buildslave user for
421 // testing.
422 wxString username;
423 if ( !wxGetEnv("WX_TEST_USER", &username) )
424 username = wxGetUserId();
425
426 s_isAutomatic = username.Lower().Matches("buildslave*");
427 }
428
429 return s_isAutomatic == 1;
430 }
431
432 // helper of OnRun(): gets the test with the given name, returning NULL (and
433 // not an empty test suite) if there is no such test
434 static Test *GetTestByName(const wxString& name)
435 {
436 Test *
437 test = TestFactoryRegistry::getRegistry(string(name.mb_str())).makeTest();
438 if ( test )
439 {
440 TestSuite * const suite = dynamic_cast<TestSuite *>(test);
441 if ( !suite || !suite->countTestCases() )
442 {
443 // it's a bogus test, don't use it
444 delete test;
445 test = NULL;
446 }
447 }
448
449 return test;
450 }
451
452
453 // ----------------------------------------------------------------------------
454 // TestApp
455 // ----------------------------------------------------------------------------
456
457 TestApp::TestApp()
458 : m_list(false),
459 m_longlist(false)
460 {
461 m_filterEventFunc = NULL;
462 m_processEventFunc = NULL;
463
464 m_locale = NULL;
465 m_eventloop = NULL;
466 }
467
468 // Init
469 //
470 bool TestApp::OnInit()
471 {
472 if ( !TestAppBase::OnInit() )
473 return false;
474
475 #if wxUSE_GUI
476 cout << "Test program for wxWidgets GUI features\n"
477 #else
478 cout << "Test program for wxWidgets non-GUI features\n"
479 #endif
480 << "build: " << WX_BUILD_OPTIONS_SIGNATURE << std::endl;
481
482 if ( m_detail )
483 {
484 // Output some important information about the test environment.
485 cout << "Running under " << wxGetOsDescription() << ", "
486 "locale is " << setlocale(LC_ALL, NULL) << std::endl;
487 }
488
489 #if wxUSE_GUI
490 // create a hidden parent window to be used as parent for the GUI controls
491 wxTestableFrame* frame = new wxTestableFrame();
492 frame->Show();
493
494 m_eventloop = new wxEventLoop;
495 wxEventLoop::SetActive(m_eventloop);
496 #endif // wxUSE_GUI
497
498 return true;
499 }
500
501 // The table of command line options
502 //
503 void TestApp::OnInitCmdLine(wxCmdLineParser& parser)
504 {
505 TestAppBase::OnInitCmdLine(parser);
506
507 static const wxCmdLineEntryDesc cmdLineDesc[] = {
508 { wxCMD_LINE_SWITCH, "l", "list",
509 "list the test suites, do not run them",
510 wxCMD_LINE_VAL_NONE, 0 },
511 { wxCMD_LINE_SWITCH, "L", "longlist",
512 "list the test cases, do not run them",
513 wxCMD_LINE_VAL_NONE, 0 },
514 { wxCMD_LINE_SWITCH, "d", "detail",
515 "print the test case names, run them",
516 wxCMD_LINE_VAL_NONE, 0 },
517 { wxCMD_LINE_SWITCH, "t", "timing",
518 "print names and measure running time of individual test, run them",
519 wxCMD_LINE_VAL_NONE, 0 },
520 { wxCMD_LINE_OPTION, "", "locale",
521 "locale to use when running the program",
522 wxCMD_LINE_VAL_STRING, 0 },
523 { wxCMD_LINE_PARAM, NULL, NULL, "REGISTRY", wxCMD_LINE_VAL_STRING,
524 wxCMD_LINE_PARAM_OPTIONAL | wxCMD_LINE_PARAM_MULTIPLE },
525 wxCMD_LINE_DESC_END
526 };
527
528 parser.SetDesc(cmdLineDesc);
529 }
530
531 // Handle command line options
532 //
533 bool TestApp::OnCmdLineParsed(wxCmdLineParser& parser)
534 {
535 if (parser.GetParamCount())
536 {
537 for (size_t i = 0; i < parser.GetParamCount(); i++)
538 m_registries.push_back(parser.GetParam(i));
539 }
540
541 m_longlist = parser.Found("longlist");
542 m_list = m_longlist || parser.Found("list");
543 m_timing = parser.Found("timing");
544 m_detail = !m_timing && parser.Found("detail");
545
546 wxString loc;
547 if ( parser.Found("locale", &loc) )
548 {
549 const wxLanguageInfo * const info = wxLocale::FindLanguageInfo(loc);
550 if ( !info )
551 {
552 cerr << "Locale \"" << string(loc.mb_str()) << "\" is unknown.\n";
553 return false;
554 }
555
556 m_locale = new wxLocale(info->Language);
557 if ( !m_locale->IsOk() )
558 {
559 cerr << "Using locale \"" << string(loc.mb_str()) << "\" failed.\n";
560 return false;
561 }
562 }
563
564 return TestAppBase::OnCmdLineParsed(parser);
565 }
566
567 // Event handling
568 int TestApp::FilterEvent(wxEvent& event)
569 {
570 if ( m_filterEventFunc )
571 return (*m_filterEventFunc)(event);
572
573 return TestAppBase::FilterEvent(event);
574 }
575
576 bool TestApp::ProcessEvent(wxEvent& event)
577 {
578 if ( m_processEventFunc )
579 return (*m_processEventFunc)(event);
580
581 return TestAppBase::ProcessEvent(event);
582 }
583
584 // Run
585 //
586 int TestApp::OnRun()
587 {
588 #if wxUSE_GUI
589 #ifdef __WXOSX__
590 // make sure there's always an autorelease pool ready
591 wxMacAutoreleasePool autoreleasepool;
592 #endif
593 #endif
594
595 #if wxUSE_LOG
596 // Switch off logging unless --verbose
597 bool verbose = wxLog::GetVerbose();
598 wxLog::EnableLogging(verbose);
599 #else
600 bool verbose = false;
601 #endif
602
603 CppUnit::TextTestRunner runner;
604
605 if ( m_registries.empty() )
606 {
607 // run or list all tests which use the CPPUNIT_TEST_SUITE_REGISTRATION() macro
608 // (i.e. those registered in the "All tests" registry); if there are other
609 // tests not registered with the CPPUNIT_TEST_SUITE_REGISTRATION() macro
610 // then they won't be listed/run!
611 AddTest(runner, TestFactoryRegistry::getRegistry().makeTest());
612
613 if (m_list)
614 {
615 cout << "\nNote that the list above is not complete as it doesn't include the \n";
616 cout << "tests disabled by default.\n";
617 }
618 }
619 else // run only the selected tests
620 {
621 for (size_t i = 0; i < m_registries.size(); i++)
622 {
623 const wxString reg = m_registries[i];
624 Test *test = GetTestByName(reg);
625
626 if ( !test && !reg.EndsWith("TestCase") )
627 {
628 test = GetTestByName(reg + "TestCase");
629 }
630
631 if ( !test )
632 {
633 cerr << "No such test suite: " << string(reg.mb_str()) << endl;
634 return 2;
635 }
636
637 AddTest(runner, test);
638 }
639 }
640
641 if ( m_list )
642 return EXIT_SUCCESS;
643
644 runner.setOutputter(new CppUnit::CompilerOutputter(&runner.result(), cout));
645
646 // there is a bug
647 // (http://sf.net/tracker/index.php?func=detail&aid=1649369&group_id=11795&atid=111795)
648 // in some versions of cppunit: they write progress dots to cout (and not
649 // cerr) and don't flush it so all the dots appear at once at the end which
650 // is not very useful so unbuffer cout to work around this
651 cout.setf(ios::unitbuf);
652
653 // add detail listener if needed
654 DetailListener detailListener(m_timing);
655 if ( m_detail || m_timing )
656 runner.eventManager().addListener(&detailListener);
657
658 // finally ensure that we report our own exceptions nicely instead of
659 // giving "uncaught exception of unknown type" messages
660 runner.eventManager().pushProtector(new wxUnitTestProtector);
661
662 bool printProgress = !(verbose || m_detail || m_timing);
663 runner.run("", false, true, printProgress);
664
665 return runner.result().testFailures() == 0 ? EXIT_SUCCESS : EXIT_FAILURE;
666 }
667
668 int TestApp::OnExit()
669 {
670 delete m_locale;
671
672 #if wxUSE_GUI
673 delete GetTopWindow();
674 wxEventLoop::SetActive(NULL);
675 delete m_eventloop;
676 #endif // wxUSE_GUI
677
678 return 0;
679 }
680
681 // List the tests
682 //
683 void TestApp::List(Test *test, const string& parent /*=""*/) const
684 {
685 TestSuite *suite = dynamic_cast<TestSuite*>(test);
686 string name;
687
688 if (suite) {
689 // take the last component of the name and append to the parent
690 name = test->getName();
691 string::size_type i = name.find_last_of(".:");
692 if (i != string::npos)
693 name = name.substr(i + 1);
694 name = parent + "." + name;
695
696 // drop the 1st component from the display and indent
697 if (parent != "") {
698 string::size_type j = i = name.find('.', 1);
699 while ((j = name.find('.', j + 1)) != string::npos)
700 cout << " ";
701 cout << " " << name.substr(i + 1) << "\n";
702 }
703
704 typedef vector<Test*> Tests;
705 typedef Tests::const_iterator Iter;
706
707 const Tests& tests = suite->getTests();
708
709 for (Iter it = tests.begin(); it != tests.end(); ++it)
710 List(*it, name);
711 }
712 else if (m_longlist) {
713 string::size_type i = 0;
714 while ((i = parent.find('.', i + 1)) != string::npos)
715 cout << " ";
716 cout << " " << test->getName() << "\n";
717 }
718 }