1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: wxWidgets thread sample
4 // Author: Guilhem Lavaux, Vadim Zeitlin
8 // Copyright: (c) 1998-2002 wxWidgets team
9 // Licence: wxWindows license
10 /////////////////////////////////////////////////////////////////////////////
12 // For compilers that support precompilation, includes "wx/wx.h".
13 #include "wx/wxprec.h"
24 #error "This sample requires thread support!"
25 #endif // wxUSE_THREADS
27 #include "wx/thread.h"
28 #include "wx/dynarray.h"
29 #include "wx/numdlg.h"
31 #include "wx/progdlg.h"
33 // define this to use wxExecute in the exec tests, otherwise just use system
37 #define EXEC(cmd) wxExecute((cmd), wxEXEC_SYNC)
39 #define EXEC(cmd) system(cmd)
43 WX_DEFINE_ARRAY_PTR(wxThread
*, wxArrayThread
);
45 // Define a new application type
46 class MyApp
: public wxApp
52 virtual bool OnInit();
55 // all the threads currently alive - as soon as the thread terminates, it's
56 // removed from the array
57 wxArrayThread m_threads
;
59 // crit section protects access to all of the arrays below
60 wxCriticalSection m_critsect
;
62 // semaphore used to wait for the threads to exit, see MyFrame::OnQuit()
63 wxSemaphore m_semAllDone
;
65 // the last exiting thread should post to m_semAllDone if this is true
66 // (protected by the same m_critsect)
67 bool m_waitingUntilAllDone
;
70 // Create a new application object
73 // Define a new frame type
74 class MyFrame
: public wxFrame
78 MyFrame(wxFrame
*frame
, const wxString
& title
, int x
, int y
, int w
, int h
);
82 void WriteText(const wxString
& text
) { m_txtctrl
->WriteText(text
); }
84 // accessors for MyWorkerThread (called in its context!)
89 void OnQuit(wxCommandEvent
& event
);
90 void OnClear(wxCommandEvent
& event
);
92 void OnStartThread(wxCommandEvent
& event
);
93 void OnStartThreads(wxCommandEvent
& event
);
94 void OnStopThread(wxCommandEvent
& event
);
95 void OnPauseThread(wxCommandEvent
& event
);
96 void OnResumeThread(wxCommandEvent
& event
);
98 void OnStartWorker(wxCommandEvent
& event
);
99 void OnWorkerEvent(wxCommandEvent
& event
);
100 void OnUpdateWorker(wxUpdateUIEvent
& event
);
102 void OnExecMain(wxCommandEvent
& event
);
103 void OnExecThread(wxCommandEvent
& event
);
105 void OnShowCPUs(wxCommandEvent
& event
);
106 void OnAbout(wxCommandEvent
& event
);
108 void OnIdle(wxIdleEvent
&event
);
111 // helper function - creates a new thread (but doesn't run it)
112 MyThread
*CreateThread();
114 // just some place to put our messages in
115 wxTextCtrl
*m_txtctrl
;
117 // remember the number of running threads and total number of threads
118 size_t m_nRunning
, m_nCount
;
120 // the progress dialog which we show while worker thread is running
121 wxProgressDialog
*m_dlgProgress
;
123 // was the worker thread cancelled by user?
126 // protects m_cancelled
127 wxCriticalSection m_critsectWork
;
129 DECLARE_EVENT_TABLE()
132 // ID for the menu commands
138 THREAD_START_THREAD
= 201,
139 THREAD_START_THREADS
,
142 THREAD_RESUME_THREAD
,
151 WORKER_EVENT
// this one gets sent from the worker thread
154 // ----------------------------------------------------------------------------
156 // ----------------------------------------------------------------------------
158 class MyThread
: public wxThread
161 MyThread(MyFrame
*frame
);
163 // thread execution starts here
164 virtual void *Entry();
166 // called when the thread exits - whether it terminates normally or is
167 // stopped with Delete() (but not when it is Kill()ed!)
168 virtual void OnExit();
170 // write something to the text control
171 void WriteText(const wxString
& text
);
178 MyThread::MyThread(MyFrame
*frame
)
185 void MyThread::WriteText(const wxString
& text
)
189 // before doing any GUI calls we must ensure that this thread is the only
195 m_frame
->WriteText(msg
);
200 void MyThread::OnExit()
202 wxCriticalSectionLocker
locker(wxGetApp().m_critsect
);
204 wxArrayThread
& threads
= wxGetApp().m_threads
;
205 threads
.Remove(this);
207 if ( threads
.IsEmpty() )
209 // signal the main thread that there are no more threads left if it is
211 if ( wxGetApp().m_waitingUntilAllDone
)
213 wxGetApp().m_waitingUntilAllDone
= false;
215 wxGetApp().m_semAllDone
.Post();
220 void *MyThread::Entry()
224 text
.Printf(wxT("Thread 0x%lx started (priority = %u).\n"),
225 GetId(), GetPriority());
227 // wxLogMessage(text); -- test wxLog thread safeness
229 for ( m_count
= 0; m_count
< 10; m_count
++ )
231 // check if we were asked to exit
235 text
.Printf(wxT("[%u] Thread 0x%lx here.\n"), m_count
, GetId());
238 // wxSleep() can't be called from non-GUI thread!
239 wxThread::Sleep(1000);
242 text
.Printf(wxT("Thread 0x%lx finished.\n"), GetId());
244 // wxLogMessage(text); -- test wxLog thread safeness
249 // ----------------------------------------------------------------------------
251 // ----------------------------------------------------------------------------
253 class MyWorkerThread
: public wxThread
256 MyWorkerThread(MyFrame
*frame
);
258 // thread execution starts here
259 virtual void *Entry();
261 // called when the thread exits - whether it terminates normally or is
262 // stopped with Delete() (but not when it is Kill()ed!)
263 virtual void OnExit();
270 MyWorkerThread::MyWorkerThread(MyFrame
*frame
)
277 void MyWorkerThread::OnExit()
281 void *MyWorkerThread::Entry()
283 for ( m_count
= 0; !m_frame
->Cancelled() && (m_count
< 100); m_count
++ )
285 // check if we were asked to exit
289 // create any type of command event here
290 wxCommandEvent
event( wxEVT_COMMAND_MENU_SELECTED
, WORKER_EVENT
);
291 event
.SetInt( m_count
);
293 // send in a thread-safe way
294 wxPostEvent( m_frame
, event
);
296 // wxSleep() can't be called from non-main thread!
297 wxThread::Sleep(200);
300 wxCommandEvent
event( wxEVT_COMMAND_MENU_SELECTED
, WORKER_EVENT
);
301 event
.SetInt(-1); // that's all
302 wxPostEvent( m_frame
, event
);
307 // ----------------------------------------------------------------------------
308 // a thread which simply calls wxExecute
309 // ----------------------------------------------------------------------------
311 class MyExecThread
: public wxThread
314 MyExecThread(const wxChar
*command
) : wxThread(wxTHREAD_JOINABLE
),
320 virtual ExitCode
Entry()
322 return (ExitCode
)EXEC(m_command
);
329 // ----------------------------------------------------------------------------
331 // ----------------------------------------------------------------------------
333 BEGIN_EVENT_TABLE(MyFrame
, wxFrame
)
334 EVT_MENU(THREAD_QUIT
, MyFrame::OnQuit
)
335 EVT_MENU(THREAD_CLEAR
, MyFrame::OnClear
)
336 EVT_MENU(THREAD_START_THREAD
, MyFrame::OnStartThread
)
337 EVT_MENU(THREAD_START_THREADS
, MyFrame::OnStartThreads
)
338 EVT_MENU(THREAD_STOP_THREAD
, MyFrame::OnStopThread
)
339 EVT_MENU(THREAD_PAUSE_THREAD
, MyFrame::OnPauseThread
)
340 EVT_MENU(THREAD_RESUME_THREAD
, MyFrame::OnResumeThread
)
342 EVT_MENU(THREAD_EXEC_MAIN
, MyFrame::OnExecMain
)
343 EVT_MENU(THREAD_EXEC_THREAD
, MyFrame::OnExecThread
)
345 EVT_MENU(THREAD_SHOWCPUS
, MyFrame::OnShowCPUs
)
346 EVT_MENU(THREAD_ABOUT
, MyFrame::OnAbout
)
348 EVT_UPDATE_UI(THREAD_START_WORKER
, MyFrame::OnUpdateWorker
)
349 EVT_MENU(THREAD_START_WORKER
, MyFrame::OnStartWorker
)
350 EVT_MENU(WORKER_EVENT
, MyFrame::OnWorkerEvent
)
352 EVT_IDLE(MyFrame::OnIdle
)
358 m_waitingUntilAllDone
= false;
361 // `Main program' equivalent, creating windows and returning main app frame
364 // uncomment this to get some debugging messages from the trace code
365 // on the console (or just set WXTRACE env variable to include "thread")
366 //wxLog::AddTraceMask("thread");
368 // Create the main frame window
369 MyFrame
*frame
= new MyFrame((wxFrame
*)NULL
, _T("wxWidgets threads sample"),
373 wxMenuBar
*menuBar
= new wxMenuBar
;
375 wxMenu
*menuFile
= new wxMenu
;
376 menuFile
->Append(THREAD_CLEAR
, _T("&Clear log\tCtrl-L"));
377 menuFile
->AppendSeparator();
378 menuFile
->Append(THREAD_QUIT
, _T("E&xit\tAlt-X"));
379 menuBar
->Append(menuFile
, _T("&File"));
381 wxMenu
*menuThread
= new wxMenu
;
382 menuThread
->Append(THREAD_START_THREAD
, _T("&Start a new thread\tCtrl-N"));
383 menuThread
->Append(THREAD_START_THREADS
, _T("Start &many threads at once"));
384 menuThread
->Append(THREAD_STOP_THREAD
, _T("S&top a running thread\tCtrl-S"));
385 menuThread
->AppendSeparator();
386 menuThread
->Append(THREAD_PAUSE_THREAD
, _T("&Pause a running thread\tCtrl-P"));
387 menuThread
->Append(THREAD_RESUME_THREAD
, _T("&Resume suspended thread\tCtrl-R"));
388 menuThread
->AppendSeparator();
389 menuThread
->Append(THREAD_START_WORKER
, _T("Start &worker thread\tCtrl-W"));
390 menuBar
->Append(menuThread
, _T("&Thread"));
392 wxMenu
*menuExec
= new wxMenu
;
393 menuExec
->Append(THREAD_EXEC_MAIN
, _T("&Launch a program from main thread\tF5"));
394 menuExec
->Append(THREAD_EXEC_THREAD
, _T("L&aunch a program from a thread\tCtrl-F5"));
395 menuBar
->Append(menuExec
, _T("&Execute"));
397 wxMenu
*menuHelp
= new wxMenu
;
398 menuHelp
->Append(THREAD_SHOWCPUS
, _T("&Show CPU count"));
399 menuHelp
->AppendSeparator();
400 menuHelp
->Append(THREAD_ABOUT
, _T("&About..."));
401 menuBar
->Append(menuHelp
, _T("&Help"));
403 frame
->SetMenuBar(menuBar
);
413 // My frame constructor
414 MyFrame::MyFrame(wxFrame
*frame
, const wxString
& title
,
415 int x
, int y
, int w
, int h
)
416 : wxFrame(frame
, wxID_ANY
, title
, wxPoint(x
, y
), wxSize(w
, h
))
418 m_nRunning
= m_nCount
= 0;
420 m_dlgProgress
= (wxProgressDialog
*)NULL
;
424 #endif // wxUSE_STATUSBAR
426 m_txtctrl
= new wxTextCtrl(this, wxID_ANY
, _T(""), wxPoint(0, 0), wxSize(0, 0),
427 wxTE_MULTILINE
| wxTE_READONLY
);
433 // NB: although the OS will terminate all the threads anyhow when the main
434 // one exits, it's good practice to do it ourselves -- even if it's not
435 // completely trivial in this example
437 // tell all the threads to terminate: note that they can't terminate while
438 // we're deleting them because they will block in their OnExit() -- this is
439 // important as otherwise we might access invalid array elements
442 wxGetApp().m_critsect
.Enter();
444 // check if we have any threads running first
445 const wxArrayThread
& threads
= wxGetApp().m_threads
;
446 size_t count
= threads
.GetCount();
450 // set the flag for MyThread::OnExit()
451 wxGetApp().m_waitingUntilAllDone
= true;
454 while ( ! threads
.IsEmpty() )
456 thread
= threads
.Last();
458 wxGetApp().m_critsect
.Leave();
462 wxGetApp().m_critsect
.Enter();
466 wxGetApp().m_critsect
.Leave();
470 // now wait for them to really terminate
471 wxGetApp().m_semAllDone
.Wait();
473 //else: no threads to terminate, no condition to wait for
476 MyThread
*MyFrame::CreateThread()
478 MyThread
*thread
= new MyThread(this);
480 if ( thread
->Create() != wxTHREAD_NO_ERROR
)
482 wxLogError(wxT("Can't create thread!"));
485 wxCriticalSectionLocker
enter(wxGetApp().m_critsect
);
486 wxGetApp().m_threads
.Add(thread
);
491 void MyFrame::OnStartThreads(wxCommandEvent
& WXUNUSED(event
) )
493 static long s_num
= 10;
495 s_num
= wxGetNumberFromUser(_T("How many threads to start: "), _T(""),
496 _T("wxThread sample"), s_num
, 1, 10000, this);
504 size_t count
= (size_t)s_num
, n
;
506 wxArrayThread threads
;
508 // first create them all...
509 for ( n
= 0; n
< count
; n
++ )
511 wxThread
*thr
= CreateThread();
513 // we want to show the effect of SetPriority(): the first thread will
514 // have the lowest priority, the second - the highest, all the rest
517 thr
->SetPriority(WXTHREAD_MIN_PRIORITY
);
519 thr
->SetPriority(WXTHREAD_MAX_PRIORITY
);
521 thr
->SetPriority(WXTHREAD_DEFAULT_PRIORITY
);
528 msg
.Printf(wxT("%d new threads created."), count
);
529 SetStatusText(msg
, 1);
530 #endif // wxUSE_STATUSBAR
532 // ...and then start them
533 for ( n
= 0; n
< count
; n
++ )
539 void MyFrame::OnStartThread(wxCommandEvent
& WXUNUSED(event
) )
541 MyThread
*thread
= CreateThread();
543 if ( thread
->Run() != wxTHREAD_NO_ERROR
)
545 wxLogError(wxT("Can't start thread!"));
549 SetStatusText(_T("New thread started."), 1);
550 #endif // wxUSE_STATUSBAR
553 void MyFrame::OnStopThread(wxCommandEvent
& WXUNUSED(event
) )
555 wxGetApp().m_critsect
.Enter();
557 // stop the last thread
558 if ( wxGetApp().m_threads
.IsEmpty() )
560 wxLogError(wxT("No thread to stop!"));
562 wxGetApp().m_critsect
.Leave();
566 wxThread
*thread
= wxGetApp().m_threads
.Last();
568 // it's important to leave critical section before calling Delete()
569 // because delete will (implicitly) call OnExit() which also tries
570 // to enter the same crit section - would dead lock.
571 wxGetApp().m_critsect
.Leave();
576 SetStatusText(_T("Thread stopped."), 1);
577 #endif // wxUSE_STATUSBAR
581 void MyFrame::OnResumeThread(wxCommandEvent
& WXUNUSED(event
) )
583 wxCriticalSectionLocker
enter(wxGetApp().m_critsect
);
585 // resume first suspended thread
586 size_t n
= 0, count
= wxGetApp().m_threads
.Count();
587 while ( n
< count
&& !wxGetApp().m_threads
[n
]->IsPaused() )
592 wxLogError(wxT("No thread to resume!"));
596 wxGetApp().m_threads
[n
]->Resume();
599 SetStatusText(_T("Thread resumed."), 1);
600 #endif // wxUSE_STATUSBAR
604 void MyFrame::OnPauseThread(wxCommandEvent
& WXUNUSED(event
) )
606 wxCriticalSectionLocker
enter(wxGetApp().m_critsect
);
608 // pause last running thread
609 int n
= wxGetApp().m_threads
.Count() - 1;
610 while ( n
>= 0 && !wxGetApp().m_threads
[n
]->IsRunning() )
615 wxLogError(wxT("No thread to pause!"));
619 wxGetApp().m_threads
[n
]->Pause();
622 SetStatusText(_T("Thread paused."), 1);
623 #endif // wxUSE_STATUSBAR
627 // set the frame title indicating the current number of threads
628 void MyFrame::OnIdle(wxIdleEvent
& event
)
630 wxCriticalSectionLocker
enter(wxGetApp().m_critsect
);
632 // update the counts of running/total threads
634 nCount
= wxGetApp().m_threads
.Count();
635 for ( size_t n
= 0; n
< nCount
; n
++ )
637 if ( wxGetApp().m_threads
[n
]->IsRunning() )
641 if ( nCount
!= m_nCount
|| nRunning
!= m_nRunning
)
643 m_nRunning
= nRunning
;
646 wxLogStatus(this, wxT("%u threads total, %u running."), nCount
, nRunning
);
648 //else: avoid flicker - don't print anything
653 void MyFrame::OnQuit(wxCommandEvent
& WXUNUSED(event
) )
658 void MyFrame::OnExecMain(wxCommandEvent
& WXUNUSED(event
))
660 wxLogMessage(wxT("The exit code from the main program is %ld"),
661 EXEC(_T("/bin/echo \"main program\"")));
664 void MyFrame::OnExecThread(wxCommandEvent
& WXUNUSED(event
))
666 MyExecThread
thread(wxT("/bin/echo \"child thread\""));
669 wxLogMessage(wxT("The exit code from a child thread is %ld"),
670 (long)thread
.Wait());
673 void MyFrame::OnShowCPUs(wxCommandEvent
& WXUNUSED(event
))
677 int nCPUs
= wxThread::GetCPUCount();
681 msg
= _T("Unknown number of CPUs");
685 msg
= _T("WARNING: you're running without any CPUs!");
689 msg
= _T("This system only has one CPU.");
693 msg
.Printf(wxT("This system has %d CPUs"), nCPUs
);
699 void MyFrame::OnAbout(wxCommandEvent
& WXUNUSED(event
) )
701 wxMessageDialog
dialog(this,
702 _T("wxWidgets multithreaded application sample\n")
703 _T("(c) 1998 Julian Smart, Guilhem Lavaux\n")
704 _T("(c) 1999 Vadim Zeitlin\n")
705 _T("(c) 2000 Robert Roebling"),
706 _T("About wxThread sample"),
707 wxOK
| wxICON_INFORMATION
);
712 void MyFrame::OnClear(wxCommandEvent
& WXUNUSED(event
))
717 void MyFrame::OnUpdateWorker(wxUpdateUIEvent
& event
)
719 event
.Enable( m_dlgProgress
== NULL
);
722 void MyFrame::OnStartWorker(wxCommandEvent
& WXUNUSED(event
))
724 MyWorkerThread
*thread
= new MyWorkerThread(this);
726 if ( thread
->Create() != wxTHREAD_NO_ERROR
)
728 wxLogError(wxT("Can't create thread!"));
731 m_dlgProgress
= new wxProgressDialog
733 _T("Progress dialog"),
734 _T("Wait until the thread terminates or press [Cancel]"),
740 wxPD_ESTIMATED_TIME
|
744 // thread is not running yet, no need for crit sect
750 void MyFrame::OnWorkerEvent(wxCommandEvent
& event
)
753 WriteText( _T("Got message from worker thread: ") );
754 WriteText( event
.GetString() );
755 WriteText( _T("\n") );
757 int n
= event
.GetInt();
760 m_dlgProgress
->Destroy();
761 m_dlgProgress
= (wxProgressDialog
*)NULL
;
763 // the dialog is aborted because the event came from another thread, so
764 // we may need to wake up the main event loop for the dialog to be
770 if ( !m_dlgProgress
->Update(n
) )
772 wxCriticalSectionLocker
lock(m_critsectWork
);
780 bool MyFrame::Cancelled()
782 wxCriticalSectionLocker
lock(m_critsectWork
);