]> git.saurik.com Git - wxWidgets.git/blob - src/osx/carbon/evtloop.cpp
allowing direct native tlw modal loops
[wxWidgets.git] / src / osx / carbon / evtloop.cpp
1 ///////////////////////////////////////////////////////////////////////////////
2 // Name: src/osx/carbon/evtloop.cpp
3 // Purpose: implementation of wxEventLoop for wxMac
4 // Author: Vadim Zeitlin
5 // Modified by:
6 // Created: 2006-01-12
7 // RCS-ID: $Id$
8 // Copyright: (c) 2006 Vadim Zeitlin <vadim@wxwindows.org>
9 // Licence: wxWindows licence
10 ///////////////////////////////////////////////////////////////////////////////
11
12 // ============================================================================
13 // declarations
14 // ============================================================================
15
16 // ----------------------------------------------------------------------------
17 // headers
18 // ----------------------------------------------------------------------------
19
20 // for compilers that support precompilation, includes "wx.h".
21 #include "wx/wxprec.h"
22
23 #ifdef __BORLANDC__
24 #pragma hdrstop
25 #endif
26
27 #include "wx/evtloop.h"
28
29 #ifndef WX_PRECOMP
30 #include "wx/app.h"
31 #include "wx/log.h"
32 #endif // WX_PRECOMP
33
34 #if wxUSE_GUI
35 #include "wx/nonownedwnd.h"
36 #endif
37
38 #include "wx/osx/private.h"
39
40 // ============================================================================
41 // wxEventLoop implementation
42 // ============================================================================
43
44 wxGUIEventLoop::wxGUIEventLoop()
45 {
46 }
47
48 static void DispatchAndReleaseEvent(EventRef theEvent)
49 {
50 if ( wxTheApp )
51 wxTheApp->MacSetCurrentEvent( theEvent, NULL );
52
53 OSStatus status = SendEventToEventTarget(theEvent, GetEventDispatcherTarget());
54 if (status == eventNotHandledErr && wxTheApp)
55 wxTheApp->MacHandleUnhandledEvent(theEvent);
56
57 ReleaseEvent( theEvent );
58 }
59
60 int wxGUIEventLoop::DoDispatchTimeout(unsigned long timeout)
61 {
62 wxMacAutoreleasePool autoreleasepool;
63
64 EventRef event;
65 OSStatus status = ReceiveNextEvent(0, NULL, timeout/1000, true, &event);
66 switch ( status )
67 {
68 default:
69 wxFAIL_MSG( "unexpected ReceiveNextEvent() error" );
70 // fall through
71
72 case eventLoopTimedOutErr:
73 return -1;
74
75 case eventLoopQuitErr:
76 // according to QA1061 this may also occur
77 // when a WakeUp Process is executed
78 return 0;
79
80 case noErr:
81 DispatchAndReleaseEvent(event);
82 return 1;
83 }
84 }
85
86 void wxGUIEventLoop::DoRun()
87 {
88 wxMacAutoreleasePool autoreleasepool;
89 RunApplicationEventLoop();
90 }
91
92 void wxGUIEventLoop::DoStop()
93 {
94 QuitApplicationEventLoop();
95 }
96
97 // TODO move into a evtloop_osx.cpp
98
99 wxModalEventLoop::wxModalEventLoop(wxWindow *modalWindow)
100 {
101 m_modalWindow = dynamic_cast<wxNonOwnedWindow*> (modalWindow);
102 wxASSERT_MSG( m_modalWindow != NULL, "must pass in a toplevel window for modal event loop" );
103 m_modalNativeWindow = m_modalWindow->GetWXWindow();
104 }
105
106 wxModalEventLoop::wxModalEventLoop(WXWindow modalNativeWindow)
107 {
108 m_modalWindow = NULL;
109 wxASSERT_MSG( modalNativeWindow != NULL, "must pass in a toplevel window for modal event loop" );
110 m_modalNativeWindow = modalNativeWindow;
111 }
112
113 // END move into a evtloop_osx.cpp
114
115 void wxModalEventLoop::DoRun()
116 {
117 wxMacAutoreleasePool autoreleasepool;
118
119 bool resetGroupParent = false;
120
121 WindowGroupRef windowGroup = NULL;
122 WindowGroupRef formerParentGroup = NULL;
123
124 // make sure modal dialogs are in the right layer so that they are not covered
125 if ( m_modalWindow != NULL )
126 {
127 if ( m_modalWindow->GetParent() == NULL )
128 {
129 windowGroup = GetWindowGroup(m_modalNativeWindow) ;
130 if ( windowGroup != GetWindowGroupOfClass( kMovableModalWindowClass ) )
131 {
132 formerParentGroup = GetWindowGroupParent( windowGroup );
133 SetWindowGroupParent( windowGroup, GetWindowGroupOfClass( kMovableModalWindowClass ) );
134 resetGroupParent = true;
135 }
136 }
137 }
138
139 m_modalWindow->SetFocus();
140
141 RunAppModalLoopForWindow(m_modalNativeWindow);
142
143 if ( resetGroupParent )
144 {
145 SetWindowGroupParent( windowGroup , formerParentGroup );
146 }
147
148 }
149
150 void wxModalEventLoop::DoStop()
151 {
152 wxMacAutoreleasePool autoreleasepool;
153 QuitAppModalLoopForWindow(m_modalNativeWindow);
154 }
155
156