]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/mac/carbon/toplevel.cpp
projects / wxWidgets.git / blame_incremental
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (non-incremental) | history | HEAD
fix some possible crashes due to uninitialized variables - thanks to Steve Hartwell...
[wxWidgets.git] / src / mac / carbon / toplevel.cpp
... / ...
CommitLineData
1///////////////////////////////////////////////////////////////////////////////
2// Name: mac/toplevel.cpp
3// Purpose: implements wxTopLevelWindow for Mac
4// Author: Stefan Csomor
5// Modified by:
6// Created: 24.09.01
7// RCS-ID: $Id$
8// Copyright: (c) 2001-2004 Stefan Csomor
9// License: wxWindows licence
10///////////////////////////////////////////////////////////////////////////////
11
12// ============================================================================
13// declarations
14// ============================================================================
15
16// ----------------------------------------------------------------------------
17// headers
18// ----------------------------------------------------------------------------
19
20#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
21 #pragma implementation "toplevel.h"
22#endif
23
24// For compilers that support precompilation, includes "wx.h".
25#include "wx/wxprec.h"
26
27#ifdef __BORLANDC__
28 #pragma hdrstop
29#endif
30
31#ifndef WX_PRECOMP
32 #include "wx/app.h"
33 #include "wx/toplevel.h"
34 #include "wx/frame.h"
35 #include "wx/string.h"
36 #include "wx/log.h"
37 #include "wx/intl.h"
38 #include "wx/settings.h"
39 #include "wx/strconv.h"
40 #include "wx/control.h"
41#endif //WX_PRECOMP
42
43#include "wx/mac/uma.h"
44#include "wx/mac/aga.h"
45#include "wx/app.h"
46#include "wx/tooltip.h"
47#include "wx/dnd.h"
48#if wxUSE_SYSTEM_OPTIONS
49 #include "wx/sysopt.h"
50#endif
51
52#include <ToolUtils.h>
53
54//For targeting OSX
55#include "wx/mac/private.h"
56
57// ----------------------------------------------------------------------------
58// globals
59// ----------------------------------------------------------------------------
60
61// list of all frames and modeless dialogs
62wxWindowList wxModelessWindows;
63
64static pascal long wxShapedMacWindowDef(short varCode, WindowRef window, SInt16 message, SInt32 param);
65
66// ============================================================================
67// wxTopLevelWindowMac implementation
68// ============================================================================
69
70BEGIN_EVENT_TABLE(wxTopLevelWindowMac, wxTopLevelWindowBase)
71END_EVENT_TABLE()
72
73
74// ---------------------------------------------------------------------------
75// Carbon Events
76// ---------------------------------------------------------------------------
77
78extern long wxMacTranslateKey(unsigned char key, unsigned char code) ;
79
80static const EventTypeSpec eventList[] =
81{
82 // TODO remove control related event like key and mouse (except for WindowLeave events)
83#if 1
84 { kEventClassTextInput, kEventTextInputUnicodeForKeyEvent } ,
85
86 { kEventClassKeyboard, kEventRawKeyDown } ,
87 { kEventClassKeyboard, kEventRawKeyRepeat } ,
88 { kEventClassKeyboard, kEventRawKeyUp } ,
89 { kEventClassKeyboard, kEventRawKeyModifiersChanged } ,
90#endif
91
92 { kEventClassWindow , kEventWindowShown } ,
93 { kEventClassWindow , kEventWindowActivated } ,
94 { kEventClassWindow , kEventWindowDeactivated } ,
95 { kEventClassWindow , kEventWindowBoundsChanging } ,
96 { kEventClassWindow , kEventWindowBoundsChanged } ,
97 { kEventClassWindow , kEventWindowClose } ,
98
99 // we have to catch these events on the toplevel window level, as controls don't get the
100 // raw mouse events anymore
101
102 { kEventClassMouse , kEventMouseDown } ,
103 { kEventClassMouse , kEventMouseUp } ,
104 { kEventClassMouse , kEventMouseWheelMoved } ,
105 { kEventClassMouse , kEventMouseMoved } ,
106 { kEventClassMouse , kEventMouseDragged } ,
107} ;
108
109static pascal OSStatus TextInputEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
110{
111 OSStatus result = eventNotHandledErr ;
112
113 wxWindow* focus = wxWindow::FindFocus() ;
114 char charCode ;
115 UInt32 keyCode ;
116 UInt32 modifiers ;
117 Point point ;
118
119 EventRef rawEvent ;
120
121 GetEventParameter( event , kEventParamTextInputSendKeyboardEvent ,typeEventRef,NULL,sizeof(rawEvent),NULL,&rawEvent ) ;
122
123 GetEventParameter( rawEvent, kEventParamKeyMacCharCodes, typeChar, NULL,sizeof(char), NULL,&charCode );
124 GetEventParameter( rawEvent, kEventParamKeyCode, typeUInt32, NULL, sizeof(UInt32), NULL, &keyCode );
125 GetEventParameter( rawEvent, kEventParamKeyModifiers, typeUInt32, NULL, sizeof(UInt32), NULL, &modifiers);
126 GetEventParameter( rawEvent, kEventParamMouseLocation, typeQDPoint, NULL,
127 sizeof( Point ), NULL, &point );
128
129 switch ( GetEventKind( event ) )
130 {
131 case kEventTextInputUnicodeForKeyEvent :
132 // this is only called when no default handler has jumped in, eg a wxControl on a floater window does not
133 // get its own kEventTextInputUnicodeForKeyEvent, so we route back the
134 wxControl* control = wxDynamicCast( focus , wxControl ) ;
135 if ( control )
136 {
137 ControlRef macControl = (ControlRef) control->GetHandle() ;
138 if ( macControl )
139 {
140 ::HandleControlKey( macControl , keyCode , charCode , modifiers ) ;
141 result = noErr ;
142 }
143 }
144 /*
145 // this may lead to double events sent to a window in case all handlers have skipped the key down event
146 UInt32 when = EventTimeToTicks( GetEventTime( event ) ) ;
147 UInt32 message = (keyCode << 8) + charCode;
148
149 if ( (focus != NULL) && wxTheApp->MacSendKeyDownEvent(
150 focus , message , modifiers , when , point.h , point.v ) )
151 {
152 result = noErr ;
153 }
154 */
155 break ;
156 }
157
158 return result ;
159}
160
161static pascal OSStatus KeyboardEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
162{
163 OSStatus result = eventNotHandledErr ;
164 // call DoFindFocus instead of FindFocus, because for Composite Windows(like WxGenericListCtrl)
165 // FindFocus does not return the actual focus window,but the enclosing window
166 wxWindow* focus = wxWindow::DoFindFocus();
167 if ( focus == NULL )
168 return result ;
169
170 char charCode ;
171 wxChar uniChar = 0 ;
172 UInt32 keyCode ;
173 UInt32 modifiers ;
174 Point point ;
175 UInt32 when = EventTimeToTicks( GetEventTime( event ) ) ;
176
177#if wxUSE_UNICODE
178 UInt32 dataSize = 0 ;
179 if ( GetEventParameter( event, kEventParamKeyUnicodes, typeUnicodeText, NULL, 0 , &dataSize , NULL ) == noErr )
180 {
181 UniChar buf[2] ;
182
183 UniChar* charBuf = buf ;
184
185 if ( dataSize > 4 )
186 charBuf = new UniChar[ dataSize / sizeof( UniChar) ] ;
187 GetEventParameter( event, kEventParamKeyUnicodes, typeUnicodeText, NULL, dataSize , NULL , charBuf ) ;
188#if SIZEOF_WCHAR_T == 2
189 uniChar = charBuf[0] ;
190#else
191 wxMBConvUTF16BE converter ;
192 converter.MB2WC( &uniChar , (const char*)charBuf , 1 ) ;
193#endif
194 if ( dataSize > 4 )
195 delete[] charBuf ;
196 }
197#endif
198
199 GetEventParameter( event, kEventParamKeyMacCharCodes, typeChar, NULL,sizeof(char), NULL,&charCode );
200 GetEventParameter( event, kEventParamKeyCode, typeUInt32, NULL, sizeof(UInt32), NULL, &keyCode );
201 GetEventParameter(event, kEventParamKeyModifiers, typeUInt32, NULL, sizeof(UInt32), NULL, &modifiers);
202 GetEventParameter( event, kEventParamMouseLocation, typeQDPoint, NULL,
203 sizeof( Point ), NULL, &point );
204
205 UInt32 message = (keyCode << 8) + charCode;
206 switch( GetEventKind( event ) )
207 {
208 case kEventRawKeyRepeat :
209 case kEventRawKeyDown :
210 {
211 WXEVENTREF formerEvent = wxTheApp->MacGetCurrentEvent() ;
212 WXEVENTHANDLERCALLREF formerHandler = wxTheApp->MacGetCurrentEventHandlerCallRef() ;
213 wxTheApp->MacSetCurrentEvent( event , handler ) ;
214 if ( (focus != NULL) && wxTheApp->MacSendKeyDownEvent(
215 focus , message , modifiers , when , point.h , point.v , uniChar ) )
216 {
217 result = noErr ;
218 }
219 wxTheApp->MacSetCurrentEvent( formerEvent , formerHandler ) ;
220 }
221 break ;
222 case kEventRawKeyUp :
223 if ( (focus != NULL) && wxTheApp->MacSendKeyUpEvent(
224 focus , message , modifiers , when , point.h , point.v , uniChar ) )
225 {
226 result = noErr ;
227 }
228 break ;
229 case kEventRawKeyModifiersChanged :
230 {
231 wxKeyEvent event(wxEVT_KEY_DOWN);
232
233 event.m_shiftDown = modifiers & shiftKey;
234 event.m_controlDown = modifiers & controlKey;
235 event.m_altDown = modifiers & optionKey;
236 event.m_metaDown = modifiers & cmdKey;
237#if wxUSE_UNICODE
238 event.m_uniChar = uniChar ;
239#endif
240 event.m_x = point.h;
241 event.m_y = point.v;
242 event.SetTimestamp(when);
243 event.SetEventObject(focus);
244
245 if ( focus && (modifiers ^ wxApp::s_lastModifiers ) & controlKey )
246 {
247 event.m_keyCode = WXK_CONTROL ;
248 event.SetEventType( ( modifiers & controlKey ) ? wxEVT_KEY_DOWN : wxEVT_KEY_UP ) ;
249 focus->GetEventHandler()->ProcessEvent( event ) ;
250 }
251 if ( focus && (modifiers ^ wxApp::s_lastModifiers ) & shiftKey )
252 {
253 event.m_keyCode = WXK_SHIFT ;
254 event.SetEventType( ( modifiers & shiftKey ) ? wxEVT_KEY_DOWN : wxEVT_KEY_UP ) ;
255 focus->GetEventHandler()->ProcessEvent( event ) ;
256 }
257 if ( focus && (modifiers ^ wxApp::s_lastModifiers ) & optionKey )
258 {
259 event.m_keyCode = WXK_ALT ;
260 event.SetEventType( ( modifiers & optionKey ) ? wxEVT_KEY_DOWN : wxEVT_KEY_UP ) ;
261 focus->GetEventHandler()->ProcessEvent( event ) ;
262 }
263 if ( focus && (modifiers ^ wxApp::s_lastModifiers ) & cmdKey )
264 {
265 event.m_keyCode = WXK_COMMAND ;
266 event.SetEventType( ( modifiers & cmdKey ) ? wxEVT_KEY_DOWN : wxEVT_KEY_UP ) ;
267 focus->GetEventHandler()->ProcessEvent( event ) ;
268 }
269 wxApp::s_lastModifiers = modifiers ;
270 }
271 break ;
272 }
273
274 return result ;
275}
276
277// we don't interfere with foreign controls on our toplevel windows, therefore we always give back eventNotHandledErr
278// for windows that we didn't create (like eg Scrollbars in a databrowser) , or for controls where we did not handle the
279// mouse down at all
280
281// This handler can also be called from app level where data (ie target window) may be null or a non wx window
282
283wxWindow* g_MacLastWindow = NULL ;
284
285static EventMouseButton lastButton = 0 ;
286
287static void SetupMouseEvent( wxMouseEvent &wxevent , wxMacCarbonEvent &cEvent )
288{
289 UInt32 modifiers = cEvent.GetParameter<UInt32>(kEventParamKeyModifiers, typeUInt32) ;
290 Point screenMouseLocation = cEvent.GetParameter<Point>(kEventParamMouseLocation) ;
291
292 // this parameter are not given for all events
293 EventMouseButton button = 0 ;
294 UInt32 clickCount = 0 ;
295 cEvent.GetParameter<EventMouseButton>(kEventParamMouseButton, typeMouseButton , &button) ;
296 cEvent.GetParameter<UInt32>(kEventParamClickCount, typeUInt32 , &clickCount ) ;
297
298 wxevent.m_x = screenMouseLocation.h;
299 wxevent.m_y = screenMouseLocation.v;
300 wxevent.m_shiftDown = modifiers & shiftKey;
301 wxevent.m_controlDown = modifiers & controlKey;
302 wxevent.m_altDown = modifiers & optionKey;
303 wxevent.m_metaDown = modifiers & cmdKey;
304 wxevent.SetTimestamp( cEvent.GetTicks() ) ;
305 // a control click is interpreted as a right click
306 if ( button == kEventMouseButtonPrimary && (modifiers & controlKey) )
307 {
308 button = kEventMouseButtonSecondary ;
309 }
310
311 // otherwise we report double clicks by connecting a left click with a ctrl-left click
312 if ( clickCount > 1 && button != lastButton )
313 clickCount = 1 ;
314
315 // we must make sure that our synthetic 'right' button corresponds in
316 // mouse down, moved and mouse up, and does not deliver a right down and left up
317
318 if ( cEvent.GetKind() == kEventMouseDown )
319 lastButton = button ;
320
321 if ( button == 0 )
322 lastButton = 0 ;
323 else if ( lastButton )
324 button = lastButton ;
325
326 // determinate the correct down state, wx does not want a 'down' for a mouseUp event, while mac delivers
327 // this button
328 if ( button != 0 && cEvent.GetKind() != kEventMouseUp )
329 {
330 switch( button )
331 {
332 case kEventMouseButtonPrimary :
333 wxevent.m_leftDown = true ;
334 break ;
335 case kEventMouseButtonSecondary :
336 wxevent.m_rightDown = true ;
337 break ;
338 case kEventMouseButtonTertiary :
339 wxevent.m_middleDown = true ;
340 break ;
341 }
342 }
343 // translate into wx types
344 switch ( cEvent.GetKind() )
345 {
346 case kEventMouseDown :
347 switch( button )
348 {
349 case kEventMouseButtonPrimary :
350 wxevent.SetEventType(clickCount > 1 ? wxEVT_LEFT_DCLICK : wxEVT_LEFT_DOWN ) ;
351 break ;
352 case kEventMouseButtonSecondary :
353 wxevent.SetEventType( clickCount > 1 ? wxEVT_RIGHT_DCLICK : wxEVT_RIGHT_DOWN ) ;
354 break ;
355 case kEventMouseButtonTertiary :
356 wxevent.SetEventType(clickCount > 1 ? wxEVT_MIDDLE_DCLICK : wxEVT_MIDDLE_DOWN ) ;
357 break ;
358 }
359 break ;
360 case kEventMouseUp :
361 switch( button )
362 {
363 case kEventMouseButtonPrimary :
364 wxevent.SetEventType( wxEVT_LEFT_UP ) ;
365 break ;
366 case kEventMouseButtonSecondary :
367 wxevent.SetEventType( wxEVT_RIGHT_UP ) ;
368 break ;
369 case kEventMouseButtonTertiary :
370 wxevent.SetEventType( wxEVT_MIDDLE_UP ) ;
371 break ;
372 }
373 break ;
374 case kEventMouseWheelMoved :
375 {
376 wxevent.SetEventType(wxEVT_MOUSEWHEEL ) ;
377
378 // EventMouseWheelAxis axis = cEvent.GetParameter<EventMouseWheelAxis>(kEventParamMouseWheelAxis, typeMouseWheelAxis) ;
379 SInt32 delta = cEvent.GetParameter<SInt32>(kEventParamMouseWheelDelta, typeLongInteger) ;
380
381 wxevent.m_wheelRotation = delta;
382 wxevent.m_wheelDelta = 1;
383 wxevent.m_linesPerAction = 1;
384 break ;
385 }
386 default :
387 wxevent.SetEventType(wxEVT_MOTION ) ;
388 break ;
389 }
390}
391
392ControlRef wxMacFindSubControl( wxTopLevelWindowMac* toplevelWindow, Point location , ControlRef superControl , ControlPartCode *outPart )
393{
394 if ( superControl )
395 {
396 UInt16 childrenCount = 0 ;
397 OSStatus err = CountSubControls( superControl , &childrenCount ) ;
398 if ( err == errControlIsNotEmbedder )
399 return NULL ;
400 wxASSERT_MSG( err == noErr , wxT("Unexpected error when accessing subcontrols") ) ;
401
402 for ( UInt16 i = childrenCount ; i >=1 ; --i )
403 {
404 ControlHandle sibling ;
405 err = GetIndexedSubControl( superControl , i , & sibling ) ;
406 if ( err == errControlIsNotEmbedder )
407 return NULL ;
408
409 wxASSERT_MSG( err == noErr , wxT("Unexpected error when accessing subcontrols") ) ;
410 if ( IsControlVisible( sibling ) )
411 {
412 Rect r ;
413 UMAGetControlBoundsInWindowCoords( sibling , &r ) ;
414 if ( MacPtInRect( location , &r ) )
415 {
416 ControlHandle child = wxMacFindSubControl( toplevelWindow , location , sibling , outPart ) ;
417 if ( child )
418 return child ;
419 else
420 {
421 Point testLocation = location ;
422
423 if ( toplevelWindow && toplevelWindow->MacUsesCompositing() )
424 {
425 testLocation.h -= r.left ;
426 testLocation.v -= r.top ;
427 }
428
429 *outPart = TestControl( sibling , testLocation ) ;
430 return sibling ;
431 }
432 }
433 }
434 }
435 }
436 return NULL ;
437}
438
439ControlRef wxMacFindControlUnderMouse( wxTopLevelWindowMac* toplevelWindow , Point location , WindowRef window , ControlPartCode *outPart )
440{
441#if TARGET_API_MAC_OSX
442 if ( UMAGetSystemVersion() >= 0x1030 && ( toplevelWindow == 0 || toplevelWindow->MacUsesCompositing() ) )
443 return FindControlUnderMouse( location , window , outPart ) ;
444#endif
445 ControlRef rootControl = NULL ;
446 verify_noerr( GetRootControl( window , &rootControl ) ) ;
447 return wxMacFindSubControl( toplevelWindow , location , rootControl , outPart ) ;
448
449}
450pascal OSStatus wxMacTopLevelMouseEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
451{
452 wxTopLevelWindowMac* toplevelWindow = (wxTopLevelWindowMac*) data ;
453
454 OSStatus result = eventNotHandledErr ;
455
456 wxMacCarbonEvent cEvent( event ) ;
457
458 Point screenMouseLocation = cEvent.GetParameter<Point>(kEventParamMouseLocation) ;
459 Point windowMouseLocation = screenMouseLocation ;
460
461 WindowRef window ;
462 short windowPart = ::FindWindow(screenMouseLocation, &window);
463
464 wxWindow* currentMouseWindow = NULL ;
465 ControlRef control = NULL ;
466
467 if ( window )
468 {
469 QDGlobalToLocalPoint( UMAGetWindowPort(window ) , &windowMouseLocation ) ;
470
471 if ( wxApp::s_captureWindow && wxApp::s_captureWindow->MacGetTopLevelWindowRef() == (WXWindow) window && windowPart == inContent )
472 {
473 currentMouseWindow = wxApp::s_captureWindow ;
474 }
475 else if ( (IsWindowActive(window) && windowPart == inContent) )
476 {
477 ControlPartCode part ;
478 control = wxMacFindControlUnderMouse( toplevelWindow , windowMouseLocation , window , &part ) ;
479 // if there is no control below the mouse position, send the event to the toplevel window itself
480 if ( control == 0 )
481 currentMouseWindow = (wxWindow*) data ;
482 else
483 {
484 currentMouseWindow = wxFindControlFromMacControl( control ) ;
485 if ( currentMouseWindow == NULL && cEvent.GetKind() == kEventMouseMoved )
486 {
487#if wxUSE_TOOLBAR
488 // for wxToolBar to function we have to send certaint events to it
489 // instead of its children (wxToolBarTools)
490 ControlRef parent ;
491 GetSuperControl(control, &parent );
492 wxWindow *wxParent = wxFindControlFromMacControl( parent ) ;
493 if ( wxParent && wxParent->IsKindOf( CLASSINFO( wxToolBar ) ) )
494 currentMouseWindow = wxParent ;
495#endif
496 }
497 }
498 }
499 }
500
501 wxMouseEvent wxevent(wxEVT_LEFT_DOWN);
502 SetupMouseEvent( wxevent , cEvent ) ;
503
504 // handle all enter / leave events
505
506 if ( currentMouseWindow != g_MacLastWindow )
507 {
508 if ( g_MacLastWindow )
509 {
510 wxMouseEvent eventleave(wxevent);
511 eventleave.SetEventType( wxEVT_LEAVE_WINDOW );
512 g_MacLastWindow->ScreenToClient( &eventleave.m_x, &eventleave.m_y );
513 eventleave.SetEventObject( g_MacLastWindow ) ;
514
515#if wxUSE_TOOLTIPS
516 wxToolTip::RelayEvent( g_MacLastWindow , eventleave);
517#endif // wxUSE_TOOLTIPS
518 g_MacLastWindow->GetEventHandler()->ProcessEvent(eventleave);
519 }
520 if ( currentMouseWindow )
521 {
522 wxMouseEvent evententer(wxevent);
523 evententer.SetEventType( wxEVT_ENTER_WINDOW );
524 currentMouseWindow->ScreenToClient( &evententer.m_x, &evententer.m_y );
525 evententer.SetEventObject( currentMouseWindow ) ;
526#if wxUSE_TOOLTIPS
527 wxToolTip::RelayEvent( currentMouseWindow , evententer);
528#endif // wxUSE_TOOLTIPS
529 currentMouseWindow->GetEventHandler()->ProcessEvent(evententer);
530 }
531 g_MacLastWindow = currentMouseWindow ;
532 }
533
534 if ( windowPart == inMenuBar )
535 {
536 // special case menu bar, as we are having a low-level runloop we must do it ourselves
537 if ( cEvent.GetKind() == kEventMouseDown )
538 {
539 ::MenuSelect( screenMouseLocation ) ;
540 result = noErr ;
541 }
542 } // if ( windowPart == inMenuBar )
543 else if ( currentMouseWindow )
544 {
545 wxWindow *currentMouseWindowParent = currentMouseWindow->GetParent();
546
547 currentMouseWindow->ScreenToClient( &wxevent.m_x , &wxevent.m_y ) ;
548
549 wxevent.SetEventObject( currentMouseWindow ) ;
550
551 // make tooltips current
552
553 #if wxUSE_TOOLTIPS
554 if ( wxevent.GetEventType() == wxEVT_MOTION
555 || wxevent.GetEventType() == wxEVT_ENTER_WINDOW
556 || wxevent.GetEventType() == wxEVT_LEAVE_WINDOW )
557 wxToolTip::RelayEvent( currentMouseWindow , wxevent);
558 #endif // wxUSE_TOOLTIPS
559 if ( currentMouseWindow->GetEventHandler()->ProcessEvent(wxevent) )
560 {
561 if ((currentMouseWindowParent != NULL) &&
562 (currentMouseWindowParent->GetChildren().Find(currentMouseWindow) == NULL))
563 currentMouseWindow = NULL;
564
565 result = noErr;
566 }
567 else
568 {
569 // if the user code did _not_ handle the event, then perform the
570 // default processing
571 if ( wxevent.GetEventType() == wxEVT_LEFT_DOWN )
572 {
573 // ... that is set focus to this window
574 if (currentMouseWindow->AcceptsFocus() && wxWindow::FindFocus()!=currentMouseWindow)
575 currentMouseWindow->SetFocus();
576 }
577
578 ControlPartCode dummyPart ;
579 // if built-in find control is finding the wrong control (ie static box instead of overlaid
580 // button, we cannot let the standard handler do its job, but must handle manually
581
582 if ( ( cEvent.GetKind() == kEventMouseDown )
583#ifdef __WXMAC_OSX__
584 &&
585 (FindControlUnderMouse(windowMouseLocation , window , &dummyPart) !=
586 wxMacFindControlUnderMouse( toplevelWindow , windowMouseLocation , window , &dummyPart ) )
587#endif
588 )
589 {
590 if ( currentMouseWindow->MacIsReallyEnabled() )
591 {
592 EventModifiers modifiers = cEvent.GetParameter<EventModifiers>(kEventParamKeyModifiers, typeUInt32) ;
593 Point clickLocation = windowMouseLocation ;
594
595 if ( toplevelWindow->MacUsesCompositing() )
596 currentMouseWindow->MacRootWindowToWindow( &clickLocation.h , &clickLocation.v ) ;
597
598 HandleControlClick( (ControlRef) currentMouseWindow->GetHandle() , clickLocation ,
599 modifiers , (ControlActionUPP ) -1 ) ;
600
601 if ((currentMouseWindowParent != NULL) &&
602 (currentMouseWindowParent->GetChildren().Find(currentMouseWindow) == NULL))
603 currentMouseWindow = NULL;
604 }
605 result = noErr ;
606 }
607 }
608 if ( cEvent.GetKind() == kEventMouseUp && wxApp::s_captureWindow )
609 {
610 wxApp::s_captureWindow = NULL ;
611 // update cursor ?
612 }
613
614 // update cursor
615
616 wxWindow* cursorTarget = currentMouseWindow ;
617 wxPoint cursorPoint( wxevent.m_x , wxevent.m_y ) ;
618
619 while( cursorTarget && !cursorTarget->MacSetupCursor( cursorPoint ) )
620 {
621 cursorTarget = cursorTarget->GetParent() ;
622 if ( cursorTarget )
623 cursorPoint += cursorTarget->GetPosition();
624 }
625
626 } // else if ( currentMouseWindow )
627 else
628 {
629 // don't mess with controls we don't know about
630 // for some reason returning eventNotHandledErr does not lead to the correct behaviour
631 // so we try sending them the correct control directly
632 if ( cEvent.GetKind() == kEventMouseDown && toplevelWindow && control )
633 {
634 EventModifiers modifiers = cEvent.GetParameter<EventModifiers>(kEventParamKeyModifiers, typeUInt32) ;
635 Point clickLocation = windowMouseLocation ;
636 if ( toplevelWindow->MacUsesCompositing() )
637 {
638#ifdef __WXMAC_OSX__
639 HIPoint hiPoint ;
640 hiPoint.x = clickLocation.h ;
641 hiPoint.y = clickLocation.v ;
642 HIViewConvertPoint( &hiPoint , (ControlRef) toplevelWindow->GetHandle() , control ) ;
643 clickLocation.h = (int)hiPoint.x ;
644 clickLocation.v = (int)hiPoint.y ;
645#endif
646 }
647 HandleControlClick( control , clickLocation ,
648 modifiers , (ControlActionUPP ) -1 ) ;
649 result = noErr ;
650 }
651 }
652 return result ;
653}
654
655static pascal OSStatus wxMacTopLevelWindowEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
656{
657 OSStatus result = eventNotHandledErr ;
658
659 wxMacCarbonEvent cEvent( event ) ;
660
661 // WindowRef windowRef = cEvent.GetParameter<WindowRef>(kEventParamDirectObject) ;
662 wxTopLevelWindowMac* toplevelWindow = (wxTopLevelWindowMac*) data ;
663
664 switch( GetEventKind( event ) )
665 {
666 case kEventWindowActivated :
667 {
668 toplevelWindow->MacActivate( cEvent.GetTicks() , true) ;
669 wxActivateEvent wxevent(wxEVT_ACTIVATE, true , toplevelWindow->GetId());
670 wxevent.SetTimestamp( cEvent.GetTicks() ) ;
671 wxevent.SetEventObject(toplevelWindow);
672 toplevelWindow->GetEventHandler()->ProcessEvent(wxevent);
673 // we still sending an eventNotHandledErr in order to allow for default processing
674 break ;
675 }
676 case kEventWindowDeactivated :
677 {
678 toplevelWindow->MacActivate(cEvent.GetTicks() , false) ;
679 wxActivateEvent wxevent(wxEVT_ACTIVATE, false , toplevelWindow->GetId());
680 wxevent.SetTimestamp( cEvent.GetTicks() ) ;
681 wxevent.SetEventObject(toplevelWindow);
682 toplevelWindow->GetEventHandler()->ProcessEvent(wxevent);
683 // we still sending an eventNotHandledErr in order to allow for default processing
684 break ;
685 }
686 case kEventWindowShown :
687 toplevelWindow->Refresh() ;
688 result = noErr ;
689 break ;
690 case kEventWindowClose :
691 toplevelWindow->Close() ;
692 result = noErr ;
693 break ;
694 case kEventWindowBoundsChanged :
695 {
696 UInt32 attributes = cEvent.GetParameter<UInt32>(kEventParamAttributes,typeUInt32) ;
697 Rect newRect = cEvent.GetParameter<Rect>(kEventParamCurrentBounds) ;
698 wxRect r( newRect.left , newRect.top , newRect.right - newRect.left , newRect.bottom - newRect.top ) ;
699 if ( attributes & kWindowBoundsChangeSizeChanged )
700 {
701 // according to the other ports we handle this within the OS level
702 // resize event, not within a wxSizeEvent
703 wxFrame *frame = wxDynamicCast( toplevelWindow , wxFrame ) ;
704 if ( frame )
705 {
706 #if wxUSE_STATUSBAR
707 frame->PositionStatusBar();
708 #endif
709 #if wxUSE_TOOLBAR
710 frame->PositionToolBar();
711 #endif
712 }
713
714 wxSizeEvent event( r.GetSize() , toplevelWindow->GetId() ) ;
715 event.SetEventObject( toplevelWindow ) ;
716
717 toplevelWindow->GetEventHandler()->ProcessEvent(event) ;
718 toplevelWindow->wxWindowMac::MacSuperChangedPosition() ; // like this only children will be notified
719 }
720 if ( attributes & kWindowBoundsChangeOriginChanged )
721 {
722 wxMoveEvent event( r.GetLeftTop() , toplevelWindow->GetId() ) ;
723 event.SetEventObject( toplevelWindow ) ;
724 toplevelWindow->GetEventHandler()->ProcessEvent(event) ;
725 }
726 result = noErr ;
727 break ;
728 }
729 case kEventWindowBoundsChanging :
730 {
731 UInt32 attributes = cEvent.GetParameter<UInt32>(kEventParamAttributes,typeUInt32) ;
732 Rect newRect = cEvent.GetParameter<Rect>(kEventParamCurrentBounds) ;
733
734 if ( (attributes & kWindowBoundsChangeSizeChanged) || (attributes & kWindowBoundsChangeOriginChanged) )
735 {
736 // all (Mac) rects are in content area coordinates, all wxRects in structure coordinates
737 int left , top , right , bottom ;
738 toplevelWindow->MacGetContentAreaInset( left , top , right , bottom ) ;
739 wxRect r( newRect.left - left , newRect.top - top ,
740 newRect.right - newRect.left + left + right , newRect.bottom - newRect.top + top + bottom ) ;
741 // this is a EVT_SIZING not a EVT_SIZE type !
742 wxSizeEvent wxevent( r , toplevelWindow->GetId() ) ;
743 wxevent.SetEventObject( toplevelWindow ) ;
744 wxRect adjustR = r ;
745 if ( toplevelWindow->GetEventHandler()->ProcessEvent(wxevent) )
746 adjustR = wxevent.GetRect() ;
747
748 if ( toplevelWindow->GetMaxWidth() != -1 && adjustR.GetWidth() > toplevelWindow->GetMaxWidth() )
749 adjustR.SetWidth( toplevelWindow->GetMaxWidth() ) ;
750 if ( toplevelWindow->GetMaxHeight() != -1 && adjustR.GetHeight() > toplevelWindow->GetMaxHeight() )
751 adjustR.SetHeight( toplevelWindow->GetMaxHeight() ) ;
752 if ( toplevelWindow->GetMinWidth() != -1 && adjustR.GetWidth() < toplevelWindow->GetMinWidth() )
753 adjustR.SetWidth( toplevelWindow->GetMinWidth() ) ;
754 if ( toplevelWindow->GetMinHeight() != -1 && adjustR.GetHeight() < toplevelWindow->GetMinHeight() )
755 adjustR.SetHeight( toplevelWindow->GetMinHeight() ) ;
756 const Rect adjustedRect = { adjustR.y + top , adjustR.x + left , adjustR.y + adjustR.height - bottom , adjustR.x + adjustR.width - right } ;
757 if ( !EqualRect( &newRect , &adjustedRect ) )
758 cEvent.SetParameter<Rect>( kEventParamCurrentBounds , &adjustedRect ) ;
759 toplevelWindow->wxWindowMac::MacSuperChangedPosition() ; // like this only children will be notified
760 }
761
762 result = noErr ;
763 break ;
764 }
765 default :
766 break ;
767 }
768 return result ;
769}
770
771pascal OSStatus wxMacTopLevelEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
772{
773 OSStatus result = eventNotHandledErr ;
774
775 switch ( GetEventClass( event ) )
776 {
777 case kEventClassKeyboard :
778 result = KeyboardEventHandler( handler, event , data ) ;
779 break ;
780 case kEventClassTextInput :
781 result = TextInputEventHandler( handler, event , data ) ;
782 break ;
783 case kEventClassWindow :
784 result = wxMacTopLevelWindowEventHandler( handler, event , data ) ;
785 break ;
786 case kEventClassMouse :
787 result = wxMacTopLevelMouseEventHandler( handler, event , data ) ;
788 break ;
789 default :
790 break ;
791 }
792 return result ;
793}
794
795DEFINE_ONE_SHOT_HANDLER_GETTER( wxMacTopLevelEventHandler )
796
797// ---------------------------------------------------------------------------
798// wxWindowMac utility functions
799// ---------------------------------------------------------------------------
800
801// Find an item given the Macintosh Window Reference
802
803#if KEY_wxList_DEPRECATED
804wxList wxWinMacWindowList(wxKEY_INTEGER);
805wxTopLevelWindowMac *wxFindWinFromMacWindow(WindowRef inWindowRef)
806{
807 wxNode *node = wxWinMacWindowList.Find((long)inWindowRef);
808 if (!node)
809 return NULL;
810 return (wxTopLevelWindowMac *)node->GetData();
811}
812
813void wxAssociateWinWithMacWindow(WindowRef inWindowRef, wxTopLevelWindowMac *win) ;
814void wxAssociateWinWithMacWindow(WindowRef inWindowRef, wxTopLevelWindowMac *win)
815{
816 // adding NULL WindowRef is (first) surely a result of an error and
817 // (secondly) breaks menu command processing
818 wxCHECK_RET( inWindowRef != (WindowRef) NULL, wxT("attempt to add a NULL WindowRef to window list") );
819
820 if ( !wxWinMacWindowList.Find((long)inWindowRef) )
821 wxWinMacWindowList.Append((long)inWindowRef, win);
822}
823
824void wxRemoveMacWindowAssociation(wxTopLevelWindowMac *win) ;
825void wxRemoveMacWindowAssociation(wxTopLevelWindowMac *win)
826{
827 wxWinMacWindowList.DeleteObject(win);
828}
829#else
830
831WX_DECLARE_HASH_MAP(WindowRef, wxTopLevelWindowMac*, wxPointerHash, wxPointerEqual, MacWindowMap);
832
833static MacWindowMap wxWinMacWindowList;
834
835wxTopLevelWindowMac *wxFindWinFromMacWindow(WindowRef inWindowRef)
836{
837 MacWindowMap::iterator node = wxWinMacWindowList.find(inWindowRef);
838
839 return (node == wxWinMacWindowList.end()) ? NULL : node->second;
840}
841
842void wxAssociateWinWithMacWindow(WindowRef inWindowRef, wxTopLevelWindowMac *win) ;
843void wxAssociateWinWithMacWindow(WindowRef inWindowRef, wxTopLevelWindowMac *win)
844{
845 // adding NULL WindowRef is (first) surely a result of an error and
846 // nothing else :-)
847 wxCHECK_RET( inWindowRef != (WindowRef) NULL, wxT("attempt to add a NULL WindowRef to window list") );
848
849 wxWinMacWindowList[inWindowRef] = win;
850}
851
852void wxRemoveMacWindowAssociation(wxTopLevelWindowMac *win) ;
853void wxRemoveMacWindowAssociation(wxTopLevelWindowMac *win)
854{
855 MacWindowMap::iterator it;
856 for ( it = wxWinMacWindowList.begin(); it != wxWinMacWindowList.end(); ++it )
857 {
858 if ( it->second == win )
859 {
860 wxWinMacWindowList.erase(it);
861 break;
862 }
863 }
864}
865#endif // deprecated wxList
866
867// ----------------------------------------------------------------------------
868// wxTopLevelWindowMac creation
869// ----------------------------------------------------------------------------
870
871wxTopLevelWindowMac *wxTopLevelWindowMac::s_macDeactivateWindow = NULL;
872
873typedef struct
874{
875 wxPoint m_position ;
876 wxSize m_size ;
877} FullScreenData ;
878
879void wxTopLevelWindowMac::Init()
880{
881 m_iconized =
882 m_maximizeOnShow = FALSE;
883 m_macWindow = NULL ;
884#if TARGET_API_MAC_OSX
885 if ( UMAGetSystemVersion() >= 0x1030 )
886 {
887 m_macUsesCompositing = TRUE;
888 }
889 else
890#endif
891 {
892 m_macUsesCompositing = FALSE;
893 }
894 m_macEventHandler = NULL ;
895 m_macFullScreenData = NULL ;
896}
897
898class wxMacDeferredWindowDeleter : public wxObject
899{
900public :
901 wxMacDeferredWindowDeleter( WindowRef windowRef )
902 {
903 m_macWindow = windowRef ;
904 }
905 virtual ~wxMacDeferredWindowDeleter()
906 {
907 UMADisposeWindow( (WindowRef) m_macWindow ) ;
908 }
909 protected :
910 WindowRef m_macWindow ;
911} ;
912
913bool wxTopLevelWindowMac::Create(wxWindow *parent,
914 wxWindowID id,
915 const wxString& title,
916 const wxPoint& pos,
917 const wxSize& size,
918 long style,
919 const wxString& name)
920{
921 // init our fields
922 Init();
923
924 m_windowStyle = style;
925
926 SetName(name);
927
928 m_windowId = id == -1 ? NewControlId() : id;
929 wxWindow::SetTitle( title ) ;
930
931 MacCreateRealWindow( title, pos , size , MacRemoveBordersFromStyle(style) , name ) ;
932
933 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE));
934
935 if (GetExtraStyle() & wxFRAME_EX_METAL)
936 MacSetMetalAppearance(true);
937
938 wxTopLevelWindows.Append(this);
939
940 if ( parent )
941 parent->AddChild(this);
942
943 return TRUE;
944}
945
946wxTopLevelWindowMac::~wxTopLevelWindowMac()
947{
948 if ( m_macWindow )
949 {
950#if wxUSE_TOOLTIPS
951 wxToolTip::NotifyWindowDelete(m_macWindow) ;
952#endif
953 wxPendingDelete.Append( new wxMacDeferredWindowDeleter( (WindowRef) m_macWindow ) ) ;
954 }
955
956 if ( m_macEventHandler )
957 {
958 ::RemoveEventHandler((EventHandlerRef) m_macEventHandler);
959 m_macEventHandler = NULL ;
960 }
961
962 wxRemoveMacWindowAssociation( this ) ;
963
964 if ( wxModelessWindows.Find(this) )
965 wxModelessWindows.DeleteObject(this);
966
967 FullScreenData *data = (FullScreenData *) m_macFullScreenData ;
968 delete data ;
969 m_macFullScreenData = NULL ;
970}
971
972
973// ----------------------------------------------------------------------------
974// wxTopLevelWindowMac maximize/minimize
975// ----------------------------------------------------------------------------
976
977void wxTopLevelWindowMac::Maximize(bool maximize)
978{
979 wxMacPortStateHelper help( (GrafPtr) GetWindowPort( (WindowRef) m_macWindow) ) ;
980 wxMacWindowClipper clip (this);
981 ZoomWindow( (WindowRef)m_macWindow , maximize ? inZoomOut : inZoomIn , false ) ;
982}
983
984bool wxTopLevelWindowMac::IsMaximized() const
985{
986 return IsWindowInStandardState( (WindowRef)m_macWindow , NULL , NULL ) ;
987}
988
989void wxTopLevelWindowMac::Iconize(bool iconize)
990{
991 if ( IsWindowCollapsable((WindowRef)m_macWindow) )
992 CollapseWindow((WindowRef)m_macWindow , iconize ) ;
993}
994
995bool wxTopLevelWindowMac::IsIconized() const
996{
997 return IsWindowCollapsed((WindowRef)m_macWindow ) ;
998}
999
1000void wxTopLevelWindowMac::Restore()
1001{
1002 // not available on mac
1003}
1004
1005// ----------------------------------------------------------------------------
1006// wxTopLevelWindowMac misc
1007// ----------------------------------------------------------------------------
1008
1009wxPoint wxTopLevelWindowMac::GetClientAreaOrigin() const
1010{
1011 return wxPoint(0,0) ;
1012}
1013
1014void wxTopLevelWindowMac::SetIcon(const wxIcon& icon)
1015{
1016 // this sets m_icon
1017 wxTopLevelWindowBase::SetIcon(icon);
1018}
1019
1020void wxTopLevelWindowMac::MacSetBackgroundBrush( const wxBrush &brush )
1021{
1022 wxTopLevelWindowBase::MacSetBackgroundBrush( brush ) ;
1023
1024 if ( m_macBackgroundBrush.Ok() && m_macBackgroundBrush.GetStyle() != wxTRANSPARENT && m_macBackgroundBrush.MacGetBrushKind() == kwxMacBrushTheme )
1025 {
1026 SetThemeWindowBackground( (WindowRef) m_macWindow , m_macBackgroundBrush.MacGetTheme() , false ) ;
1027 }
1028}
1029
1030void wxTopLevelWindowMac::MacInstallTopLevelWindowEventHandler()
1031{
1032 if ( m_macEventHandler != NULL )
1033 {
1034 verify_noerr( ::RemoveEventHandler( (EventHandlerRef) m_macEventHandler ) ) ;
1035 }
1036 InstallWindowEventHandler(MAC_WXHWND(m_macWindow), GetwxMacTopLevelEventHandlerUPP(),
1037 GetEventTypeCount(eventList), eventList, this, (EventHandlerRef *)&m_macEventHandler);
1038}
1039
1040void wxTopLevelWindowMac::MacCreateRealWindow( const wxString& title,
1041 const wxPoint& pos,
1042 const wxSize& size,
1043 long style,
1044 const wxString& name )
1045{
1046 OSStatus err = noErr ;
1047 SetName(name);
1048 m_windowStyle = style;
1049 m_isShown = FALSE;
1050
1051 // create frame.
1052
1053 Rect theBoundsRect;
1054
1055 int x = (int)pos.x;
1056 int y = (int)pos.y;
1057
1058 wxRect display = wxGetClientDisplayRect() ;
1059
1060 if ( x == wxDefaultPosition.x )
1061 x = display.x ;
1062
1063 if ( y == wxDefaultPosition.y )
1064 y = display.y ;
1065
1066 int w = WidthDefault(size.x);
1067 int h = HeightDefault(size.y);
1068
1069 ::SetRect(&theBoundsRect, x, y , x + w, y + h);
1070
1071 // translate the window attributes in the appropriate window class and attributes
1072
1073 WindowClass wclass = 0;
1074 WindowAttributes attr = kWindowNoAttributes ;
1075 WindowGroupRef group = NULL ;
1076
1077 if ( HasFlag( wxFRAME_TOOL_WINDOW) )
1078 {
1079 if (
1080 HasFlag( wxMINIMIZE_BOX ) || HasFlag( wxMAXIMIZE_BOX ) ||
1081 HasFlag( wxSYSTEM_MENU ) || HasFlag( wxCAPTION ) ||
1082 HasFlag(wxTINY_CAPTION_HORIZ) || HasFlag(wxTINY_CAPTION_VERT)
1083 )
1084 {
1085 wclass = kFloatingWindowClass ;
1086 if ( HasFlag(wxTINY_CAPTION_VERT) )
1087 {
1088 attr |= kWindowSideTitlebarAttribute ;
1089 }
1090 }
1091 else
1092 {
1093 wclass = kPlainWindowClass ;
1094 }
1095 }
1096 else if ( HasFlag( wxCAPTION ) )
1097 {
1098 wclass = kDocumentWindowClass ;
1099 }
1100#if defined( __WXMAC__ ) && TARGET_API_MAC_OSX && ( MAC_OS_X_VERSION_MAX_ALLOWED >= MAC_OS_X_VERSION_10_2 )
1101 else if ( HasFlag( wxFRAME_DRAWER ) )
1102 {
1103 wclass = kDrawerWindowClass;
1104 // we must force compositing on a drawer
1105 m_macUsesCompositing = TRUE ;
1106 }
1107#endif //10.2 and up
1108 else
1109 {
1110 if ( HasFlag( wxMINIMIZE_BOX ) || HasFlag( wxMAXIMIZE_BOX ) ||
1111 HasFlag( wxCLOSE_BOX ) || HasFlag( wxSYSTEM_MENU ) )
1112 {
1113 wclass = kDocumentWindowClass ;
1114 }
1115 else
1116 {
1117 wclass = kPlainWindowClass ;
1118 }
1119 }
1120
1121 if ( HasFlag( wxMINIMIZE_BOX ) && wclass != kPlainWindowClass )
1122 {
1123 attr |= kWindowCollapseBoxAttribute ;
1124 }
1125 if ( HasFlag( wxMAXIMIZE_BOX ) && wclass != kPlainWindowClass )
1126 {
1127 attr |= kWindowFullZoomAttribute ;
1128 }
1129 if ( HasFlag( wxRESIZE_BORDER ) && wclass != kPlainWindowClass )
1130 {
1131 attr |= kWindowResizableAttribute ;
1132 }
1133 if ( HasFlag( wxCLOSE_BOX) && wclass != kPlainWindowClass )
1134 {
1135 attr |= kWindowCloseBoxAttribute ;
1136 }
1137
1138 if (UMAGetSystemVersion() >= 0x1000)
1139 {
1140 // turn on live resizing (OS X only)
1141 attr |= kWindowLiveResizeAttribute;
1142 }
1143
1144 if ( HasFlag(wxSTAY_ON_TOP) )
1145 {
1146 group = GetWindowGroupOfClass(kUtilityWindowClass) ;
1147 }
1148
1149#if TARGET_API_MAC_OSX
1150 if ( m_macUsesCompositing )
1151 attr |= kWindowCompositingAttribute;
1152#endif
1153
1154 if ( HasFlag(wxFRAME_SHAPED) )
1155 {
1156 WindowDefSpec customWindowDefSpec;
1157 customWindowDefSpec.defType = kWindowDefProcPtr;
1158 customWindowDefSpec.u.defProc = NewWindowDefUPP(wxShapedMacWindowDef);
1159
1160 err = ::CreateCustomWindow( &customWindowDefSpec, wclass,
1161 attr, &theBoundsRect,
1162 (WindowRef*) &m_macWindow);
1163 }
1164 else
1165 {
1166 err = ::CreateNewWindow( wclass , attr , &theBoundsRect , (WindowRef*)&m_macWindow ) ;
1167 }
1168
1169 if ( err == noErr && m_macWindow != NULL && group != NULL )
1170 SetWindowGroup( (WindowRef) m_macWindow , group ) ;
1171
1172 wxCHECK_RET( err == noErr, wxT("Mac OS error when trying to create new window") );
1173
1174 // the create commands are only for content rect, so we have to set the size again as
1175 // structure bounds
1176 SetWindowBounds( (WindowRef) m_macWindow , kWindowStructureRgn , &theBoundsRect ) ;
1177
1178 wxAssociateWinWithMacWindow( (WindowRef) m_macWindow , this ) ;
1179 UMASetWTitle( (WindowRef) m_macWindow , title , m_font.GetEncoding() ) ;
1180 m_peer = new wxMacControl(this , true /*isRootControl*/) ;
1181#if TARGET_API_MAC_OSX
1182
1183 if ( m_macUsesCompositing )
1184 {
1185 // There is a bug in 10.2.X for ::GetRootControl returning the window view instead of
1186 // the content view, so we have to retrieve it explicitely
1187 HIViewFindByID( HIViewGetRoot( (WindowRef) m_macWindow ) , kHIViewWindowContentID ,
1188 m_peer->GetControlRefAddr() ) ;
1189 if ( !m_peer->Ok() )
1190 {
1191 // compatibility mode fallback
1192 GetRootControl( (WindowRef) m_macWindow , m_peer->GetControlRefAddr() ) ;
1193 }
1194 }
1195#endif
1196 {
1197 ::CreateRootControl( (WindowRef)m_macWindow , m_peer->GetControlRefAddr() ) ;
1198 }
1199 // the root control level handleer
1200 MacInstallEventHandler( (WXWidget) m_peer->GetControlRef() ) ;
1201
1202 // the frame window event handler
1203 InstallStandardEventHandler( GetWindowEventTarget(MAC_WXHWND(m_macWindow)) ) ;
1204 MacInstallTopLevelWindowEventHandler() ;
1205
1206 DoSetWindowVariant( m_windowVariant ) ;
1207
1208 m_macFocus = NULL ;
1209
1210 if ( HasFlag(wxFRAME_SHAPED) )
1211 {
1212 // default shape matches the window size
1213 wxRegion rgn(0, 0, w, h);
1214 SetShape(rgn);
1215 }
1216
1217 wxWindowCreateEvent event(this);
1218 GetEventHandler()->ProcessEvent(event);
1219}
1220
1221void wxTopLevelWindowMac::ClearBackground()
1222{
1223 wxWindow::ClearBackground() ;
1224}
1225
1226// Raise the window to the top of the Z order
1227void wxTopLevelWindowMac::Raise()
1228{
1229 ::SelectWindow( (WindowRef)m_macWindow ) ;
1230}
1231
1232// Lower the window to the bottom of the Z order
1233void wxTopLevelWindowMac::Lower()
1234{
1235 ::SendBehind( (WindowRef)m_macWindow , NULL ) ;
1236}
1237
1238
1239void wxTopLevelWindowMac::MacDelayedDeactivation(long timestamp)
1240{
1241 if(s_macDeactivateWindow)
1242 {
1243 wxLogDebug(wxT("Doing delayed deactivation of %p"),s_macDeactivateWindow);
1244 s_macDeactivateWindow->MacActivate(timestamp, false);
1245 }
1246}
1247
1248void wxTopLevelWindowMac::MacActivate( long timestamp , bool inIsActivating )
1249{
1250 // wxLogDebug(wxT("TopLevel=%p::MacActivate"),this);
1251
1252 if(s_macDeactivateWindow==this)
1253 s_macDeactivateWindow=NULL;
1254 MacDelayedDeactivation(timestamp);
1255 MacPropagateHiliteChanged() ;
1256}
1257
1258void wxTopLevelWindowMac::SetTitle(const wxString& title)
1259{
1260 wxWindow::SetTitle( title ) ;
1261 UMASetWTitle( (WindowRef)m_macWindow , title , m_font.GetEncoding() ) ;
1262}
1263
1264bool wxTopLevelWindowMac::Show(bool show)
1265{
1266 if ( !wxTopLevelWindowBase::Show(show) )
1267 return FALSE;
1268
1269 if (show)
1270 {
1271 #if wxUSE_SYSTEM_OPTIONS //code contributed by Ryan Wilcox December 18, 2003
1272 if ( (wxSystemOptions::HasOption(wxMAC_WINDOW_PLAIN_TRANSITION) ) && ( wxSystemOptions::GetOptionInt( wxMAC_WINDOW_PLAIN_TRANSITION ) == 1) )
1273 {
1274 ::ShowWindow( (WindowRef)m_macWindow );
1275 }
1276 else
1277 #endif
1278 {
1279 ::TransitionWindow((WindowRef)m_macWindow,kWindowZoomTransitionEffect,kWindowShowTransitionAction,nil);
1280 }
1281 ::SelectWindow( (WindowRef)m_macWindow ) ;
1282 // as apps expect a size event to occur at this moment
1283 wxSizeEvent event( GetSize() , m_windowId);
1284 event.SetEventObject(this);
1285 GetEventHandler()->ProcessEvent(event);
1286 }
1287 else
1288 {
1289 #if wxUSE_SYSTEM_OPTIONS
1290 if ( (wxSystemOptions::HasOption(wxMAC_WINDOW_PLAIN_TRANSITION) ) && ( wxSystemOptions::GetOptionInt( wxMAC_WINDOW_PLAIN_TRANSITION ) == 1) )
1291 {
1292 ::HideWindow((WindowRef) m_macWindow );
1293 }
1294 else
1295 #endif
1296 {
1297 ::TransitionWindow((WindowRef)m_macWindow,kWindowZoomTransitionEffect,kWindowHideTransitionAction,nil);
1298 }
1299 }
1300
1301 MacPropagateVisibilityChanged() ;
1302
1303 return TRUE ;
1304}
1305
1306bool wxTopLevelWindowMac::ShowFullScreen(bool show, long style)
1307{
1308 if ( show )
1309 {
1310 FullScreenData *data = (FullScreenData *)m_macFullScreenData ;
1311 delete data ;
1312 data = new FullScreenData() ;
1313
1314 m_macFullScreenData = data ;
1315 data->m_position = GetPosition() ;
1316 data->m_size = GetSize() ;
1317
1318 if ( style & wxFULLSCREEN_NOMENUBAR )
1319 {
1320 HideMenuBar() ;
1321 }
1322 int left , top , right , bottom ;
1323 wxRect client = wxGetClientDisplayRect() ;
1324
1325 int x, y, w, h ;
1326
1327 x = client.x ;
1328 y = client.y ;
1329 w = client.width ;
1330 h = client.height ;
1331
1332 MacGetContentAreaInset( left , top , right , bottom ) ;
1333
1334 if ( style & wxFULLSCREEN_NOCAPTION )
1335 {
1336 y -= top ;
1337 h += top ;
1338 }
1339 if ( style & wxFULLSCREEN_NOBORDER )
1340 {
1341 x -= left ;
1342 w += left + right ;
1343 h += bottom ;
1344 }
1345 if ( style & wxFULLSCREEN_NOTOOLBAR )
1346 {
1347 // TODO
1348 }
1349 if ( style & wxFULLSCREEN_NOSTATUSBAR )
1350 {
1351 // TODO
1352 }
1353 SetSize( x , y , w, h ) ;
1354 }
1355 else
1356 {
1357 ShowMenuBar() ;
1358 FullScreenData *data = (FullScreenData *) m_macFullScreenData ;
1359 SetPosition( data->m_position ) ;
1360 SetSize( data->m_size ) ;
1361 delete data ;
1362 m_macFullScreenData = NULL ;
1363 }
1364 return FALSE;
1365}
1366
1367bool wxTopLevelWindowMac::IsFullScreen() const
1368{
1369 return m_macFullScreenData != NULL ;
1370}
1371
1372// we are still using coordinates of the content view, todo switch to structure bounds
1373
1374void wxTopLevelWindowMac::MacGetContentAreaInset( int &left , int &top , int &right , int &bottom )
1375{
1376 Rect content ;
1377 Rect structure ;
1378 GetWindowBounds( (WindowRef) m_macWindow, kWindowStructureRgn , &structure ) ;
1379 GetWindowBounds( (WindowRef) m_macWindow, kWindowContentRgn , &content ) ;
1380
1381 left = content.left - structure.left ;
1382 top = content.top - structure.top ;
1383 right = structure.right - content.right ;
1384 bottom = structure.bottom - content.bottom ;
1385}
1386
1387void wxTopLevelWindowMac::DoMoveWindow(int x, int y, int width, int height)
1388{
1389 m_cachedClippedRectValid = false ;
1390 Rect bounds = { y , x , y + height , x + width } ;
1391 verify_noerr(SetWindowBounds( (WindowRef) m_macWindow, kWindowStructureRgn , &bounds )) ;
1392 wxWindowMac::MacSuperChangedPosition() ; // like this only children will be notified
1393}
1394
1395void wxTopLevelWindowMac::DoGetPosition( int *x, int *y ) const
1396{
1397 Rect bounds ;
1398 verify_noerr(GetWindowBounds((WindowRef) m_macWindow, kWindowStructureRgn , &bounds )) ;
1399 if(x) *x = bounds.left ;
1400 if(y) *y = bounds.top ;
1401}
1402void wxTopLevelWindowMac::DoGetSize( int *width, int *height ) const
1403{
1404 Rect bounds ;
1405 verify_noerr(GetWindowBounds((WindowRef) m_macWindow, kWindowStructureRgn , &bounds )) ;
1406 if(width) *width = bounds.right - bounds.left ;
1407 if(height) *height = bounds.bottom - bounds.top ;
1408}
1409
1410void wxTopLevelWindowMac::DoGetClientSize( int *width, int *height ) const
1411{
1412 Rect bounds ;
1413 verify_noerr(GetWindowBounds((WindowRef) m_macWindow, kWindowContentRgn , &bounds )) ;
1414 if(width) *width = bounds.right - bounds.left ;
1415 if(height) *height = bounds.bottom - bounds.top ;
1416}
1417
1418void wxTopLevelWindowMac::MacSetMetalAppearance( bool set )
1419{
1420#if TARGET_API_MAC_OSX
1421 wxASSERT_MSG( m_macUsesCompositing ,
1422 wxT("Cannot set metal appearance on a non-compositing window") ) ;
1423
1424 MacChangeWindowAttributes( set ? kWindowMetalAttribute : kWindowNoAttributes ,
1425 set ? kWindowNoAttributes : kWindowMetalAttribute ) ;
1426#endif
1427}
1428
1429bool wxTopLevelWindowMac::MacGetMetalAppearance() const
1430{
1431#if TARGET_API_MAC_OSX
1432 return MacGetWindowAttributes() & kWindowMetalAttribute ;
1433#else
1434 return false ;
1435#endif
1436}
1437
1438void wxTopLevelWindowMac::MacChangeWindowAttributes( wxUint32 attributesToSet , wxUint32 attributesToClear )
1439{
1440 ChangeWindowAttributes ( (WindowRef) m_macWindow , attributesToSet, attributesToClear ) ;
1441}
1442
1443wxUint32 wxTopLevelWindowMac::MacGetWindowAttributes() const
1444{
1445 UInt32 attr = 0 ;
1446 GetWindowAttributes((WindowRef) m_macWindow , &attr ) ;
1447 return attr ;
1448}
1449
1450void wxTopLevelWindowMac::MacPerformUpdates()
1451{
1452#if TARGET_API_MAC_OSX
1453 if ( m_macUsesCompositing )
1454 {
1455#if MAC_OS_X_VERSION_MAX_ALLOWED >= MAC_OS_X_VERSION_10_3
1456 // for composited windows this also triggers a redraw of all
1457 // invalid views in the window
1458 if( UMAGetSystemVersion() >= 0x1030 )
1459 HIWindowFlush((WindowRef) m_macWindow) ;
1460 else
1461#endif
1462 {
1463 // the only way to trigger the redrawing on earlier systems is to call
1464 // ReceiveNextEvent
1465
1466 EventRef currentEvent = (EventRef) wxTheApp->MacGetCurrentEvent() ;
1467 UInt32 currentEventClass = 0 ;
1468 UInt32 currentEventKind = 0 ;
1469 if ( currentEvent != NULL )
1470 {
1471 currentEventClass = ::GetEventClass( currentEvent ) ;
1472 currentEventKind = ::GetEventKind( currentEvent ) ;
1473 }
1474 if ( currentEventClass != kEventClassMenu )
1475 {
1476 // when tracking a menu, strange redraw errors occur if we flush now, so leave..
1477 EventRef theEvent;
1478 OSStatus status = noErr ;
1479 status = ReceiveNextEvent( 0 , NULL , kEventDurationNoWait , false , &theEvent ) ;
1480 }
1481 }
1482 }
1483 else
1484#endif
1485 {
1486 BeginUpdate( (WindowRef) m_macWindow ) ;
1487
1488 RgnHandle updateRgn = NewRgn();
1489 if ( updateRgn )
1490 {
1491 GetPortVisibleRegion( GetWindowPort( (WindowRef)m_macWindow ), updateRgn );
1492 UpdateControls( (WindowRef)m_macWindow , updateRgn ) ;
1493 // if ( !EmptyRgn( updateRgn ) )
1494 // MacDoRedraw( updateRgn , 0 , true) ;
1495 DisposeRgn( updateRgn );
1496 }
1497 EndUpdate( (WindowRef)m_macWindow ) ;
1498 QDFlushPortBuffer( GetWindowPort( (WindowRef)m_macWindow ) , NULL ) ;
1499 }
1500}
1501
1502// Attracts the users attention to this window if the application is
1503// inactive (should be called when a background event occurs)
1504
1505static pascal void wxMacNMResponse( NMRecPtr ptr )
1506{
1507 NMRemove( ptr ) ;
1508 DisposePtr( (Ptr) ptr ) ;
1509}
1510
1511
1512void wxTopLevelWindowMac::RequestUserAttention(int flags )
1513{
1514 NMRecPtr notificationRequest = (NMRecPtr) NewPtr( sizeof( NMRec) ) ;
1515 static wxMacNMUPP nmupp( wxMacNMResponse )
1516 ;
1517 memset( notificationRequest , 0 , sizeof(*notificationRequest) ) ;
1518 notificationRequest->qType = nmType ;
1519 notificationRequest->nmMark = 1 ;
1520 notificationRequest->nmIcon = 0 ;
1521 notificationRequest->nmSound = 0 ;
1522 notificationRequest->nmStr = NULL ;
1523 notificationRequest->nmResp = nmupp ;
1524 verify_noerr( NMInstall( notificationRequest ) ) ;
1525}
1526
1527// ---------------------------------------------------------------------------
1528// Shape implementation
1529// ---------------------------------------------------------------------------
1530
1531
1532bool wxTopLevelWindowMac::SetShape(const wxRegion& region)
1533{
1534 wxCHECK_MSG( HasFlag(wxFRAME_SHAPED), FALSE,
1535 _T("Shaped windows must be created with the wxFRAME_SHAPED style."));
1536
1537 // The empty region signifies that the shape should be removed from the
1538 // window.
1539 if ( region.IsEmpty() )
1540 {
1541 wxSize sz = GetClientSize();
1542 wxRegion rgn(0, 0, sz.x, sz.y);
1543 return SetShape(rgn);
1544 }
1545
1546 // Make a copy of the region
1547 RgnHandle shapeRegion = NewRgn();
1548 CopyRgn( (RgnHandle)region.GetWXHRGN(), shapeRegion );
1549
1550 // Dispose of any shape region we may already have
1551 RgnHandle oldRgn = (RgnHandle)GetWRefCon( (WindowRef)MacGetWindowRef() );
1552 if ( oldRgn )
1553 DisposeRgn(oldRgn);
1554
1555 // Save the region so we can use it later
1556 SetWRefCon((WindowRef)MacGetWindowRef(), (SInt32)shapeRegion);
1557
1558 // Tell the window manager that the window has changed shape
1559 ReshapeCustomWindow((WindowRef)MacGetWindowRef());
1560 return TRUE;
1561}
1562
1563// ---------------------------------------------------------------------------
1564// Support functions for shaped windows, based on Apple's CustomWindow sample at
1565// http://developer.apple.com/samplecode/Sample_Code/Human_Interface_Toolbox/Mac_OS_High_Level_Toolbox/CustomWindow.htm
1566// ---------------------------------------------------------------------------
1567
1568static void wxShapedMacWindowGetPos(WindowRef window, Rect* inRect)
1569{
1570 GetWindowPortBounds(window, inRect);
1571 Point pt = {inRect->left, inRect->top};
1572 QDLocalToGlobalPoint( GetWindowPort(window) , &pt ) ;
1573 inRect->top = pt.v;
1574 inRect->left = pt.h;
1575 inRect->bottom += pt.v;
1576 inRect->right += pt.h;
1577}
1578
1579
1580static SInt32 wxShapedMacWindowGetFeatures(WindowRef window, SInt32 param)
1581{
1582 /*------------------------------------------------------
1583 Define which options your custom window supports.
1584 --------------------------------------------------------*/
1585 //just enable everything for our demo
1586 *(OptionBits*)param=//kWindowCanGrow|
1587 //kWindowCanZoom|
1588 //kWindowCanCollapse|
1589 //kWindowCanGetWindowRegion|
1590 //kWindowHasTitleBar|
1591 //kWindowSupportsDragHilite|
1592 kWindowCanDrawInCurrentPort|
1593 //kWindowCanMeasureTitle|
1594 kWindowWantsDisposeAtProcessDeath|
1595 kWindowSupportsGetGrowImageRegion|
1596 kWindowDefSupportsColorGrafPort;
1597 return 1;
1598}
1599
1600// The content region is left as a rectangle matching the window size, this is
1601// so the origin in the paint event, and etc. still matches what the
1602// programmer expects.
1603static void wxShapedMacWindowContentRegion(WindowRef window, RgnHandle rgn)
1604{
1605 SetEmptyRgn(rgn);
1606 wxTopLevelWindowMac* win = wxFindWinFromMacWindow(window);
1607 if (win)
1608 {
1609 Rect r ;
1610 wxShapedMacWindowGetPos(window, &r ) ;
1611 RectRgn( rgn , &r ) ;
1612 }
1613}
1614
1615// The structure region is set to the shape given to the SetShape method.
1616static void wxShapedMacWindowStructureRegion(WindowRef window, RgnHandle rgn)
1617{
1618 RgnHandle cachedRegion = (RgnHandle) GetWRefCon(window);
1619
1620 SetEmptyRgn(rgn);
1621 if (cachedRegion)
1622 {
1623 Rect windowRect;
1624 wxShapedMacWindowGetPos(window, &windowRect); //how big is the window
1625 CopyRgn(cachedRegion, rgn); //make a copy of our cached region
1626 OffsetRgn(rgn, windowRect.left, windowRect.top); // position it over window
1627 //MapRgn(rgn, &mMaskSize, &windowRect); //scale it to our actual window size
1628 }
1629}
1630
1631
1632
1633static SInt32 wxShapedMacWindowGetRegion(WindowRef window, SInt32 param)
1634{
1635 GetWindowRegionPtr rgnRec=(GetWindowRegionPtr)param;
1636
1637 switch(rgnRec->regionCode)
1638 {
1639 case kWindowStructureRgn:
1640 wxShapedMacWindowStructureRegion(window, rgnRec->winRgn);
1641 break;
1642 case kWindowContentRgn:
1643 wxShapedMacWindowContentRegion(window, rgnRec->winRgn);
1644 break;
1645 default:
1646 SetEmptyRgn(rgnRec->winRgn);
1647 } //switch
1648
1649 return noErr;
1650}
1651
1652
1653static SInt32 wxShapedMacWindowHitTest(WindowRef window,SInt32 param)
1654{
1655 /*------------------------------------------------------
1656 Determine the region of the window which was hit
1657 --------------------------------------------------------*/
1658 Point hitPoint;
1659 static RgnHandle tempRgn=nil;
1660
1661 if(!tempRgn)
1662 tempRgn=NewRgn();
1663
1664 SetPt(&hitPoint,LoWord(param),HiWord(param));//get the point clicked
1665
1666 //Mac OS 8.5 or later
1667 wxShapedMacWindowStructureRegion(window, tempRgn);
1668 if (PtInRgn(hitPoint, tempRgn)) //in window content region?
1669 return wInContent;
1670
1671 return wNoHit;//no significant area was hit.
1672}
1673
1674
1675static pascal long wxShapedMacWindowDef(short varCode, WindowRef window, SInt16 message, SInt32 param)
1676{
1677 switch(message)
1678 {
1679 case kWindowMsgHitTest:
1680 return wxShapedMacWindowHitTest(window,param);
1681
1682 case kWindowMsgGetFeatures:
1683 return wxShapedMacWindowGetFeatures(window,param);
1684
1685 // kWindowMsgGetRegion is sent during CreateCustomWindow and ReshapeCustomWindow
1686 case kWindowMsgGetRegion:
1687 return wxShapedMacWindowGetRegion(window,param);
1688 }
1689
1690 return 0;
1691}
1692
1693// ---------------------------------------------------------------------------
1694
wxWidgets (Impactor)