X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/8cb172b4f12fae80b06d5936108a1bc7f2521674..9d5507f7a2701395e1d5c121bd877bb9066ee6ea:/src/msw/evtloop.cpp?ds=inline diff --git a/src/msw/evtloop.cpp b/src/msw/evtloop.cpp index 73d459dac2..63f1688349 100644 --- a/src/msw/evtloop.cpp +++ b/src/msw/evtloop.cpp @@ -6,7 +6,7 @@ // Created: 01.06.01 // RCS-ID: $Id$ // Copyright: (c) 2001 Vadim Zeitlin -// License: wxWindows license +// License: wxWindows licence /////////////////////////////////////////////////////////////////////////////// // ============================================================================ @@ -17,10 +17,6 @@ // headers // ---------------------------------------------------------------------------- -#ifdef __GNUG__ - #pragma implementation "evtloop.h" -#endif - // For compilers that support precompilation, includes "wx.h". #include "wx/wxprec.h" @@ -29,226 +25,238 @@ #endif #ifndef WX_PRECOMP + #if wxUSE_GUI + #include "wx/window.h" + #endif + #include "wx/app.h" #endif //WX_PRECOMP #include "wx/evtloop.h" -#include "wx/window.h" -#include "wx/app.h" - +#include "wx/thread.h" +#include "wx/except.h" +#include "wx/ptr_scpd.h" #include "wx/msw/private.h" -// ---------------------------------------------------------------------------- -// wxEventLoopImpl -// ---------------------------------------------------------------------------- - -class WXDLLEXPORT wxEventLoopImpl -{ -public: - // ctor - wxEventLoopImpl() { SetExitCode(0); } - - // process a message - void ProcessMessage(MSG *msg); +#if wxUSE_GUI + #include "wx/tooltip.h" + #if wxUSE_THREADS + // define the list of MSG strutures + WX_DECLARE_LIST(MSG, wxMsgList); - // generate an idle message, return TRUE if more idle time requested - bool SendIdleMessage(); + #include "wx/listimpl.cpp" - // set/get the exit code - void SetExitCode(int exitcode) { m_exitcode = exitcode; } - int GetExitCode() const { return m_exitcode; } + WX_DEFINE_LIST(wxMsgList) + #endif // wxUSE_THREADS +#endif //wxUSE_GUI -private: - // preprocess a message, return TRUE if processed (i.e. no further - // dispatching required) - bool PreProcessMessage(MSG *msg); - - // the exit code of the event loop - int m_exitcode; -}; +#if wxUSE_BASE // ============================================================================ -// wxEventLoopImpl implementation +// wxMSWEventLoopBase implementation // ============================================================================ // ---------------------------------------------------------------------------- -// wxEventLoopImpl message processing +// ctor/dtor // ---------------------------------------------------------------------------- -void wxEventLoopImpl::ProcessMessage(MSG *msg) +wxMSWEventLoopBase::wxMSWEventLoopBase() { - // give us the chance to preprocess the message first - if ( !PreProcessMessage(msg) ) - { - // if it wasn't done, dispatch it to the corresponding window - ::TranslateMessage(msg); - ::DispatchMessage(msg); - } + m_shouldExit = false; + m_exitcode = 0; } -bool wxEventLoopImpl::PreProcessMessage(MSG *msg) +// ---------------------------------------------------------------------------- +// wxEventLoop message processing dispatching +// ---------------------------------------------------------------------------- + +bool wxMSWEventLoopBase::Pending() const { - HWND hWnd = msg->hwnd; - wxWindow *wndThis = wxGetWindowFromHWND((WXHWND)hWnd); + MSG msg; + return ::PeekMessage(&msg, 0, 0, 0, PM_NOREMOVE) != 0; +} -#if wxUSE_TOOLTIPS - // we must relay WM_MOUSEMOVE events to the tooltip ctrl if we want it to - // popup the tooltip bubbles - if ( wndThis && (msg->message == WM_MOUSEMOVE) ) - { - wxToolTip *tt = wndThis->GetToolTip(); - if ( tt ) - { - tt->RelayEvent((WXMSG *)msg); - } - } -#endif // wxUSE_TOOLTIPS +bool wxMSWEventLoopBase::GetNextMessage(WXMSG* msg) +{ + wxCHECK_MSG( IsRunning(), false, _T("can't get messages if not running") ); - // try translations first; find the youngest window with a translation - // table. - wxWindow *wnd; - for ( wnd = wndThis; wnd; wnd = wnd->GetParent() ) + const BOOL rc = ::GetMessage(msg, NULL, 0, 0); + + if ( rc == 0 ) { - if ( wnd->MSWTranslateMessage((WXMSG *)msg) ) - return TRUE; + // got WM_QUIT + return false; } - // Anyone for a non-translation message? Try youngest descendants first. - for ( wnd = wndThis; wnd; wnd = wnd->GetParent() ) + if ( rc == -1 ) { - if ( wnd->MSWProcessMessage((WXMSG *)msg) ) - return TRUE; + // should never happen, but let's test for it nevertheless + wxLogLastError(wxT("GetMessage")); + + // still break from the loop + return false; } - return FALSE; + return true; } -// ---------------------------------------------------------------------------- -// wxEventLoopImpl idle event processing -// ---------------------------------------------------------------------------- +#endif // wxUSE_BASE -bool wxEventLoopImpl::SendIdleMessage() -{ - wxIdleEvent event; - - return wxTheApp->ProcessEvent(event) && event.MoreRequested(); -} +#if wxUSE_GUI // ============================================================================ -// wxEventLoop implementation +// GUI wxEventLoop implementation // ============================================================================ -// ---------------------------------------------------------------------------- -// wxEventLoop running and exiting -// ---------------------------------------------------------------------------- +wxWindowMSW *wxGUIEventLoop::ms_winCritical = NULL; -wxEventLoop::~wxEventLoop() +bool wxGUIEventLoop::IsChildOfCriticalWindow(wxWindowMSW *win) { - wxASSERT_MSG( !m_impl, _T("should have been deleted in Run()") ); -} + while ( win ) + { + if ( win == ms_winCritical ) + return true; -bool wxEventLoop::IsRunning() const -{ - return m_impl != NULL; + win = win->GetParent(); + } + + return false; } -int wxEventLoop::Run() +bool wxGUIEventLoop::PreProcessMessage(WXMSG *msg) { - // event loops are not recursive, you need to create another loop! - wxCHECK_MSG( !IsRunning(), -1, _T("can't reenter a message loop") ); - - m_impl = new wxEventLoopImpl; + HWND hwnd = msg->hwnd; + wxWindow *wndThis = wxGetWindowFromHWND((WXHWND)hwnd); + wxWindow *wnd; - for ( ;; ) + // this might happen if we're in a modeless dialog, or if a wx control has + // children which themselves were not created by wx (i.e. wxActiveX control children) + if ( !wndThis ) { -#if wxUSE_THREADS - wxMutexGuiLeaveOrEnter(); -#endif // wxUSE_THREADS + while ( hwnd && (::GetWindowLong(hwnd, GWL_STYLE) & WS_CHILD )) + { + hwnd = ::GetParent(hwnd); - // generate and process idle events for as long as we don't have - // anything else to do - while ( !Pending() && m_impl->SendIdleMessage() ) - ; + // If the control has a wx parent, break and give the parent a chance + // to process the window message + wndThis = wxGetWindowFromHWND((WXHWND)hwnd); + if (wndThis != NULL) + break; + } - // a message came or no more idle processing to do, sit in Dispatch() - // waiting for the next message - if ( !Dispatch() ) + if ( !wndThis ) { - // we got WM_QUIT - break; + // this may happen if the event occurred in a standard modeless dialog (the + // only example of which I know of is the find/replace dialog) - then call + // IsDialogMessage() to make TAB navigation in it work + + // NOTE: IsDialogMessage() just eats all the messages (i.e. returns true for + // them) if we call it for the control itself + return hwnd && ::IsDialogMessage(hwnd, msg) != 0; } } - int exitcode = m_impl->GetExitCode(); - delete m_impl; - m_impl = NULL; + if ( !AllowProcessing(wndThis) ) + { + // not a child of critical window, so we eat the event but take care to + // stop an endless stream of WM_PAINTs which would have resulted if we + // didn't validate the invalidated part of the window + if ( msg->message == WM_PAINT ) + ::ValidateRect(hwnd, NULL); - return exitcode; -} + return true; + } -void wxEventLoop::Exit(int rc) -{ - wxCHECK_RET( IsRunning(), _T("can't call Exit() if not running") ); +#if wxUSE_TOOLTIPS + // we must relay WM_MOUSEMOVE events to the tooltip ctrl if we want it to + // popup the tooltip bubbles + if ( msg->message == WM_MOUSEMOVE ) + { + // we should do it if one of window children has an associated tooltip + // (and not just if the window has a tooltip itself) + if ( wndThis->HasToolTips() ) + wxToolTip::RelayEvent((WXMSG *)msg); + } +#endif // wxUSE_TOOLTIPS - m_impl->SetExitCode(rc); + // allow the window to prevent certain messages from being + // translated/processed (this is currently used by wxTextCtrl to always + // grab Ctrl-C/V/X, even if they are also accelerators in some parent) + if ( !wndThis->MSWShouldPreProcessMessage((WXMSG *)msg) ) + { + return false; + } - ::PostQuitMessage(rc); -} + // try translations first: the accelerators override everything + for ( wnd = wndThis; wnd; wnd = wnd->GetParent() ) + { + if ( wnd->MSWTranslateMessage((WXMSG *)msg)) + return true; -// ---------------------------------------------------------------------------- -// wxEventLoop message processing dispatching -// ---------------------------------------------------------------------------- + // stop at first top level window, i.e. don't try to process the key + // strokes originating in a dialog using the accelerators of the parent + // frame - this doesn't make much sense + if ( wnd->IsTopLevel() ) + break; + } -bool wxEventLoop::Pending() const -{ - MSG msg; - return ::PeekMessage(&msg, 0, 0, 0, PM_NOREMOVE) != 0; -} + // now try the other hooks (kbd navigation is handled here) + for ( wnd = wndThis; wnd; wnd = wnd->GetParent() ) + { + if ( wnd->MSWProcessMessage((WXMSG *)msg) ) + return true; -bool wxEventLoop::Dispatch() -{ - wxCHECK_MSG( IsRunning(), FALSE, _T("can't call Dispatch() if not running") ); + // also stop at first top level window here, just as above because + // if we don't do this, pressing ESC on a modal dialog shown as child + // of a modal dialog with wxID_CANCEL will cause the parent dialog to + // be closed, for example + if ( wnd->IsTopLevel() ) + break; + } - MSG msg; - BOOL rc = ::GetMessage(&msg, (HWND) NULL, 0, 0); + // no special preprocessing for this message, dispatch it normally + return false; +} - if ( rc == 0 ) +void wxGUIEventLoop::ProcessMessage(WXMSG *msg) +{ + // give us the chance to preprocess the message first + if ( !PreProcessMessage(msg) ) { - // got WM_QUIT - return FALSE; + // if it wasn't done, dispatch it to the corresponding window + ::TranslateMessage(msg); + ::DispatchMessage(msg); } +} - if ( rc == -1 ) - { - // should never happen, but let's test for it nevertheless - wxLogLastError(wxT("GetMessage")); - - // still break from the loop - return FALSE; - } +bool wxGUIEventLoop::Dispatch() +{ + MSG msg; + if ( !GetNextMessage(&msg) ) + return false; #if wxUSE_THREADS wxASSERT_MSG( wxThread::IsMain(), wxT("only the main thread can process Windows messages") ); - static bool s_hadGuiLock = TRUE; - static wxMsgArray s_aSavedMessages; + static bool s_hadGuiLock = true; + static wxMsgList s_aSavedMessages; // if a secondary thread owning the mutex is doing GUI calls, save all // messages for later processing - we can't process them right now because // it will lead to recursive library calls (and we're not reentrant) if ( !wxGuiOwnedByMainThread() ) { - s_hadGuiLock = FALSE; + s_hadGuiLock = false; // leave out WM_COMMAND messages: too dangerous, sometimes // the message will be processed twice - if ( !wxIsWaitingForThread() || - s_currentMsg.message != WM_COMMAND ) + if ( !wxIsWaitingForThread() || msg.message != WM_COMMAND ) { - s_aSavedMessages.Add(s_currentMsg); + MSG* pMsg = new MSG(msg); + s_aSavedMessages.Append(pMsg); } - return TRUE; + return true; } else { @@ -259,22 +267,77 @@ bool wxEventLoop::Dispatch() // messages normally - expect some things to break... if ( !s_hadGuiLock ) { - s_hadGuiLock = TRUE; + s_hadGuiLock = true; - size_t count = s_aSavedMessages.Count(); - for ( size_t n = 0; n < count; n++ ) + wxMsgList::compatibility_iterator node = s_aSavedMessages.GetFirst(); + while (node) { - MSG& msg = s_aSavedMessages[n]; - m_impl->ProcessMessage(&msg); - } + MSG* pMsg = node->GetData(); + s_aSavedMessages.Erase(node); + + ProcessMessage(pMsg); + delete pMsg; - s_aSavedMessages.Empty(); + node = s_aSavedMessages.GetFirst(); + } } } #endif // wxUSE_THREADS - m_impl->ProcessMessage(&msg); + ProcessMessage(&msg); + + return true; +} + +void wxGUIEventLoop::OnNextIteration() +{ +#if wxUSE_THREADS + wxMutexGuiLeaveOrEnter(); +#endif // wxUSE_THREADS +} + +void wxGUIEventLoop::WakeUp() +{ + ::PostMessage(NULL, WM_NULL, 0, 0); +} + +#else // !wxUSE_GUI + +#if wxUSE_CONSOLE_EVENTLOOP - return TRUE; +void wxConsoleEventLoop::OnNextIteration() +{ + if ( wxTheApp ) + wxTheApp->ProcessPendingEvents(); +} + +void wxConsoleEventLoop::WakeUp() +{ +#if wxUSE_THREADS + wxWakeUpMainThread(); +#endif +} + +bool wxConsoleEventLoop::Dispatch() +{ + MSG msg; + if ( !GetNextMessage(&msg) ) + return false; + + if ( msg.message == WM_TIMER ) + { + TIMERPROC proc = (TIMERPROC)msg.lParam; + if ( proc ) + (*proc)(NULL, 0, msg.wParam, 0); + } + else + { + wxLogDebug(_T("Ignoring unexpected message %d"), msg.message); + } + + return !m_shouldExit; } +#endif // wxUSE_CONSOLE_EVENTLOOP + +#endif //wxUSE_GUI