wxMGL revitalised with OpenWatcom.
[wxWidgets.git] / src / mgl / evtloop.cpp
1 ///////////////////////////////////////////////////////////////////////////////
2 // Name: src/mgl/evtloop.cpp
3 // Purpose: implements wxEventLoop for MGL
4 // Author: Vaclav Slavik
5 // RCS-ID: $Id$
6 // Copyright: (c) 2001-2002 SciTech Software, Inc. (www.scitechsoft.com)
7 // License: wxWindows licence
8 ///////////////////////////////////////////////////////////////////////////////
9
10 // ----------------------------------------------------------------------------
11 // headers
12 // ----------------------------------------------------------------------------
13
14 // For compilers that support precompilation, includes "wx.h".
15 #include "wx/wxprec.h"
16
17 #ifdef __BORLANDC__
18 #pragma hdrstop
19 #endif
20
21 #ifndef WX_PRECOMP
22 #include "wx/window.h"
23 #include "wx/app.h"
24 #include "wx/thread.h"
25 #endif //WX_PRECOMP
26
27 #include "wx/evtloop.h"
28 #include "wx/timer.h"
29 #include "wx/mgl/private.h"
30
31 // ----------------------------------------------------------------------------
32 // wxEventLoopImpl
33 // ----------------------------------------------------------------------------
34
35 class WXDLLEXPORT wxEventLoopImpl
36 {
37 public:
38 // ctor
39 wxEventLoopImpl()
40 {
41 SetExitCode(0);
42 SetKeepLooping(true);
43 }
44
45 // process an event
46 void Dispatch();
47
48 // generate an idle event, return true if more idle time requested
49 bool SendIdleEvent();
50
51 // set/get the exit code
52 void SetExitCode(int exitcode) { m_exitcode = exitcode; }
53 int GetExitCode() const { return m_exitcode; }
54
55 void SetKeepLooping(bool k) { m_keepLooping = k; }
56 bool GetKeepLooping() const { return m_keepLooping; }
57
58 private:
59
60 // the exit code of the event loop
61 int m_exitcode;
62 // false if the loop should end
63 bool m_keepLooping;
64 };
65
66 // ============================================================================
67 // wxEventLoopImpl implementation
68 // ============================================================================
69
70 void wxEventLoopImpl::Dispatch()
71 {
72 event_t evt;
73
74 // VS: The code bellow is equal to MGL's EVT_halt implementation, with
75 // two things added: sleeping (busy waiting is stupid, lets make CPU's
76 // life a bit easier) and timers updating
77
78 // EVT_halt(&evt, EVT_EVERYEVT);
79 for (;;)
80 {
81 #if wxUSE_TIMER
82 wxTimer::NotifyTimers();
83 MGL_wmUpdateDC(g_winMng);
84 #endif
85 EVT_pollJoystick();
86 if ( EVT_getNext(&evt, EVT_EVERYEVT) ) break;
87 PM_sleep(10);
88 }
89 // end of EVT_halt
90
91 MGL_wmProcessEvent(g_winMng, &evt);
92 }
93
94 bool wxEventLoopImpl::SendIdleEvent()
95 {
96 return wxTheApp->ProcessIdle();
97 }
98
99 // ============================================================================
100 // wxEventLoop implementation
101 // ============================================================================
102
103 // ----------------------------------------------------------------------------
104 // wxEventLoop running and exiting
105 // ----------------------------------------------------------------------------
106
107 wxEventLoop *wxEventLoopBase::ms_activeLoop = NULL;
108
109 wxEventLoop::~wxEventLoop()
110 {
111 wxASSERT_MSG( !m_impl, _T("should have been deleted in Run()") );
112 }
113
114 int wxEventLoop::Run()
115 {
116 // event loops are not recursive, you need to create another loop!
117 wxCHECK_MSG( !IsRunning(), -1, _T("can't reenter a message loop") );
118
119 m_impl = new wxEventLoopImpl;
120
121 wxEventLoop *oldLoop = ms_activeLoop;
122 ms_activeLoop = this;
123
124 for ( ;; )
125 {
126 #if wxUSE_THREADS
127 //wxMutexGuiLeaveOrEnter(); // FIXME_MGL - huh?
128 #endif // wxUSE_THREADS
129
130 // generate and process idle events for as long as we don't have
131 // anything else to do
132 while ( !Pending() && m_impl->SendIdleEvent() ) {}
133
134 // a message came or no more idle processing to do, sit in Dispatch()
135 // waiting for the next message
136 if ( !Dispatch() )
137 {
138 // app terminated
139 break;
140 }
141 }
142
143 int exitcode = m_impl->GetExitCode();
144 delete m_impl;
145 m_impl = NULL;
146
147 ms_activeLoop = oldLoop;
148
149 return exitcode;
150 }
151
152 void wxEventLoop::Exit(int rc)
153 {
154 wxCHECK_RET( IsRunning(), _T("can't call Exit() if not running") );
155
156 m_impl->SetExitCode(rc);
157 m_impl->SetKeepLooping(false);
158
159 // Send a dummy event so that the app won't block in EVT_halt if there
160 // are no user-generated events in the queue:
161 EVT_post(0, EVT_USEREVT, 0, 0);
162 }
163
164 // ----------------------------------------------------------------------------
165 // wxEventLoop message processing dispatching
166 // ----------------------------------------------------------------------------
167
168 bool wxEventLoop::Pending() const
169 {
170 // update the display here, so that wxYield refreshes display and
171 // changes take effect immediately, not after emptying events queue:
172 MGL_wmUpdateDC(g_winMng);
173
174 // is there an event in the queue?
175 event_t evt;
176 return (bool)(EVT_peekNext(&evt, EVT_EVERYEVT));
177 }
178
179 bool wxEventLoop::Dispatch()
180 {
181 wxCHECK_MSG( IsRunning(), false, _T("can't call Dispatch() if not running") );
182
183 m_impl->Dispatch();
184 return m_impl->GetKeepLooping();
185 }