1 /////////////////////////////////////////////////////////////////////////////
8 // Copyright: (c) AUTHOR
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
13 #pragma implementation "app.h"
18 #include "wx/window.h"
20 #include "wx/button.h"
23 #include "wx/gdicmn.h"
26 #include "wx/cursor.h"
29 #include "wx/palette.h"
31 #include "wx/dialog.h"
32 #include "wx/msgdlg.h"
34 #include "wx/module.h"
35 #include "wx/memory.h"
36 #include "wx/tooltip.h"
37 #include "wx/textctrl.h"
39 #if wxUSE_WX_RESOURCES
40 # include "wx/resource.h"
55 #include "wx/mac/uma.h"
56 #include "wx/mac/macnotfy.h"
59 # include <CoreServices/CoreServices.h>
60 # if defined(WXMAKINGDLL)
61 # include <mach-o/dyld.h>
66 # include <ToolUtils.h>
67 # include <DiskInit.h>
71 extern char *wxBuffer
;
72 extern wxList wxPendingDelete
;
73 extern wxList
*wxWinMacWindowList
;
74 extern wxList
*wxWinMacControlList
;
76 wxApp
*wxTheApp
= NULL
;
78 #if !USE_SHARED_LIBRARY
79 IMPLEMENT_DYNAMIC_CLASS(wxApp
, wxEvtHandler
)
80 BEGIN_EVENT_TABLE(wxApp
, wxEvtHandler
)
81 EVT_IDLE(wxApp::OnIdle
)
82 EVT_END_SESSION(wxApp::OnEndSession
)
83 EVT_QUERY_END_SESSION(wxApp::OnQueryEndSession
)
88 const short kMacMinHeap
= (29 * 1024) ;
89 // platform specific static variables
91 const short kwxMacMenuBarResource
= 1 ;
92 const short kwxMacAppleMenuId
= 1 ;
94 WXHRGN
wxApp::s_macCursorRgn
= NULL
;
95 wxWindow
* wxApp::s_captureWindow
= NULL
;
96 int wxApp::s_lastMouseDown
= 0 ;
97 long wxApp::sm_lastMessageTime
= 0;
98 long wxApp::s_lastModifiers
= 0 ;
101 bool wxApp::s_macDefaultEncodingIsPC
= true ;
102 bool wxApp::s_macSupportPCMenuShortcuts
= true ;
103 long wxApp::s_macAboutMenuItemId
= wxID_ABOUT
;
104 wxString
wxApp::s_macHelpMenuTitleName
= "&Help" ;
106 pascal OSErr
AEHandleODoc( const AppleEvent
*event
, AppleEvent
*reply
, long refcon
) ;
107 pascal OSErr
AEHandleOApp( const AppleEvent
*event
, AppleEvent
*reply
, long refcon
) ;
108 pascal OSErr
AEHandlePDoc( const AppleEvent
*event
, AppleEvent
*reply
, long refcon
) ;
109 pascal OSErr
AEHandleQuit( const AppleEvent
*event
, AppleEvent
*reply
, long refcon
) ;
112 pascal OSErr
AEHandleODoc( const AppleEvent
*event
, AppleEvent
*reply
, long WXUNUSED(refcon
) )
114 // GD: UNUSED wxApp* app = (wxApp*) refcon ;
115 return wxTheApp
->MacHandleAEODoc( (AppleEvent
*) event
, reply
) ;
118 pascal OSErr
AEHandleOApp( const AppleEvent
*event
, AppleEvent
*reply
, long WXUNUSED(refcon
) )
120 // GD: UNUSED wxApp* app = (wxApp*) refcon ;
121 return wxTheApp
->MacHandleAEOApp( (AppleEvent
*) event
, reply
) ;
124 pascal OSErr
AEHandlePDoc( const AppleEvent
*event
, AppleEvent
*reply
, long WXUNUSED(refcon
) )
126 // GD: UNUSED wxApp* app = (wxApp*) refcon ;
127 return wxTheApp
->MacHandleAEPDoc( (AppleEvent
*) event
, reply
) ;
130 pascal OSErr
AEHandleQuit( const AppleEvent
*event
, AppleEvent
*reply
, long WXUNUSED(refcon
) )
132 // GD: UNUSED wxApp* app = (wxApp*) refcon ;
133 return wxTheApp
->MacHandleAEQuit( (AppleEvent
*) event
, reply
) ;
136 short wxApp::MacHandleAEODoc(const WXEVENTREF
WXUNUSED(event
) , WXEVENTREF
WXUNUSED(reply
))
139 ProcessSerialNumber PSN
;
140 PSN
.highLongOfPSN
= 0 ;
141 PSN
.lowLongOfPSN
= kCurrentProcess
;
142 SetFrontProcess( &PSN
) ;
146 short wxApp::MacHandleAEPDoc(const WXEVENTREF
WXUNUSED(event
) , WXEVENTREF
WXUNUSED(reply
))
151 short wxApp::MacHandleAEOApp(const WXEVENTREF
WXUNUSED(event
) , WXEVENTREF
WXUNUSED(reply
))
156 short wxApp::MacHandleAEQuit(const WXEVENTREF
WXUNUSED(event
) , WXEVENTREF
WXUNUSED(reply
))
158 wxWindow
* win
= GetTopWindow() ;
170 char StringMac
[] = "\x0d\x80\x81\x82\x83\x84\x85\x86\x87\x88\x89\x8a\x8b\x8c\x8d\x8e\x8f"
171 "\x90\x91\x92\x93\x94\x95\x96\x97\x98\x99\x9a\x9b\x9c\x9d\x9e\x9f"
172 "\xa0\xa1\xa2\xa3\xa4\xa5\xa6\xa7\xa8\xa9\xaa\xab\xac\xae\xaf"
173 "\xb1\xb4\xb5\xb6\xbb\xbc\xbe\xbf"
174 "\xc0\xc1\xc2\xc4\xc7\xc8\xc9\xcb\xcc\xcd\xce\xcf"
175 "\xd0\xd1\xd2\xd3\xd4\xd5\xd6\xd8\xca\xdb" ;
177 char StringANSI
[] = "\x0a\xC4\xC5\xC7\xC9\xD1\xD6\xDC\xE1\xE0\xE2\xE4\xE3\xE5\xE7\xE9\xE8"
178 "\xEA\xEB\xED\xEC\xEE\xEF\xF1\xF3\xF2\xF4\xF6\xF5\xFA\xF9\xFB\xFC"
179 "\x86\xBA\xA2\xA3\xA7\x95\xB6\xDF\xAE\xA9\x99\xB4\xA8\xC6\xD8"
180 "\xB1\xA5\xB5\xF0\xAA\xBA\xE6\xF8"
181 "\xBF\xA1\xAC\x83\xAB\xBB\x85\xC0\xC3\xD5\x8C\x9C"
182 "\x96\x97\x93\x94\x91\x92\xF7\xFF\xA0\x80" ;
184 void wxMacConvertFromPC( const char *from
, char *to
, int len
)
189 for( int i
= 0 ; i
< len
; ++ i
)
191 c
= strchr( StringANSI
, *from
) ;
194 *to
= StringMac
[ c
- StringANSI
] ;
202 for( int i
= 0 ; i
< len
; ++ i
)
204 c
= strchr( StringANSI
, *from
) ;
207 *to
= StringMac
[ c
- StringANSI
] ;
219 void wxMacConvertToPC( const char *from
, char *to
, int len
)
224 for( int i
= 0 ; i
< len
; ++ i
)
226 c
= strchr( StringMac
, *from
) ;
229 *to
= StringANSI
[ c
- StringMac
] ;
237 for( int i
= 0 ; i
< len
; ++ i
)
239 c
= strchr( StringMac
, *from
) ;
242 *to
= StringANSI
[ c
- StringMac
] ;
254 void wxMacConvertFromPC( char * p
)
257 int len
= strlen ( p
) ;
259 wxMacConvertFromPC( ptr
, ptr
, len
) ;
262 void wxMacConvertFromPCForControls( char * p
)
265 int len
= strlen ( p
) ;
267 wxMacConvertFromPC( ptr
, ptr
, len
) ;
268 for ( unsigned int i
= 0 ; i
< strlen ( ptr
) ; i
++ )
270 if ( ptr
[i
] == '&' && ptr
[i
]+1 != ' ' )
272 memmove( &ptr
[i
] , &ptr
[i
+1] , strlen( &ptr
[i
+1] ) + 1) ;
277 void wxMacConvertFromPC( unsigned char *p
)
279 char *ptr
= (char*) p
+ 1 ;
282 wxMacConvertFromPC( ptr
, ptr
, len
) ;
285 extern char *wxBuffer
;
287 wxString
wxMacMakeMacStringFromPC( const char * p
)
289 const char *ptr
= p
;
290 int len
= strlen ( p
) ;
291 char *buf
= wxBuffer
;
293 if ( len
>= BUFSIZ
+ 512 )
295 buf
= new char [len
+1] ;
298 wxMacConvertFromPC( ptr
, buf
, len
) ;
300 wxString
result( buf
) ;
301 if ( buf
!= wxBuffer
)
307 void wxMacConvertToPC( char * p
)
310 int len
= strlen ( p
) ;
312 wxMacConvertToPC( ptr
, ptr
, len
) ;
315 void wxMacConvertToPC( unsigned char *p
)
317 char *ptr
= (char*) p
+ 1 ;
320 wxMacConvertToPC( ptr
, ptr
, len
) ;
323 wxString
wxMacMakePCStringFromMac( const char * p
)
325 const char *ptr
= p
;
326 int len
= strlen ( p
) ;
327 char *buf
= wxBuffer
;
329 if ( len
>= BUFSIZ
+ 512 )
331 buf
= new char [len
+1] ;
334 wxMacConvertToPC( ptr
, buf
, len
) ;
337 wxString
result( buf
) ;
338 if ( buf
!= wxBuffer
)
343 wxString
wxMacMakeStringFromMacString( const char* from
, bool mac2pcEncoding
)
347 return wxMacMakePCStringFromMac( from
) ;
351 return wxString( from
) ;
355 wxString
wxMacMakeStringFromPascal( StringPtr from
, bool mac2pcEncoding
)
357 // this is safe since a pascal string can never be larger than 256 bytes
359 CopyPascalStringToC( from
, s
) ;
362 return wxMacMakePCStringFromMac( s
) ;
366 return wxString( s
) ;
370 void wxMacStringToPascal( const char * from
, StringPtr to
, bool pc2macEncoding
)
374 CopyCStringToPascal( wxMacMakeMacStringFromPC( from
) , to
) ;
378 CopyCStringToPascal( from
, to
) ;
382 #if defined(WXMAKINGDLL) && !defined(__DARWIN__)
383 // we know it's there ;-)
384 WXIMPORT
char std::__throws_bad_alloc
;
387 bool wxApp::Initialize()
393 UMAInitToolbox( 4 ) ;
394 SetEventMask( everyEvent
) ;
395 UMAShowWatchCursor() ;
397 #if defined(WXMAKINGDLL) && defined(__DARWIN__)
398 // open shared library resources from here since we don't have
399 // __wxinitialize in Mach-O shared libraries
400 wxStAppResource::OpenSharedLibraryResource(NULL
);
403 #if defined(UNIVERSAL_INTERFACES_VERSION) && (UNIVERSAL_INTERFACES_VERSION >= 0x0340)
404 AEInstallEventHandler( kCoreEventClass
, kAEOpenDocuments
,
405 NewAEEventHandlerUPP(AEHandleODoc
) ,
406 (long) wxTheApp
, FALSE
) ;
407 AEInstallEventHandler( kCoreEventClass
, kAEOpenApplication
,
408 NewAEEventHandlerUPP(AEHandleOApp
) ,
409 (long) wxTheApp
, FALSE
) ;
410 AEInstallEventHandler( kCoreEventClass
, kAEPrintDocuments
,
411 NewAEEventHandlerUPP(AEHandlePDoc
) ,
412 (long) wxTheApp
, FALSE
) ;
413 AEInstallEventHandler( kCoreEventClass
, kAEQuitApplication
,
414 NewAEEventHandlerUPP(AEHandleQuit
) ,
415 (long) wxTheApp
, FALSE
) ;
417 AEInstallEventHandler( kCoreEventClass
, kAEOpenDocuments
,
418 NewAEEventHandlerProc(AEHandleODoc
) ,
419 (long) wxTheApp
, FALSE
) ;
420 AEInstallEventHandler( kCoreEventClass
, kAEOpenApplication
,
421 NewAEEventHandlerProc(AEHandleOApp
) ,
422 (long) wxTheApp
, FALSE
) ;
423 AEInstallEventHandler( kCoreEventClass
, kAEPrintDocuments
,
424 NewAEEventHandlerProc(AEHandlePDoc
) ,
425 (long) wxTheApp
, FALSE
) ;
426 AEInstallEventHandler( kCoreEventClass
, kAEQuitApplication
,
427 NewAEEventHandlerProc(AEHandleQuit
) ,
428 (long) wxTheApp
, FALSE
) ;
432 // test the minimal configuration necessary
438 if (Gestalt(gestaltMachineType
, &theMachine
) != noErr
)
440 error
= kMacSTRWrongMachine
;
442 else if (theMachine
< gestaltMacPlus
)
444 error
= kMacSTRWrongMachine
;
446 else if (Gestalt(gestaltSystemVersion
, &theSystem
) != noErr
)
448 error
= kMacSTROldSystem
;
450 else if ( theSystem
< 0x0860 )
452 error
= kMacSTROldSystem
;
454 else if ((long)GetApplLimit() - (long)ApplicationZone() < kMacMinHeap
)
456 error
= kMacSTRSmallSize
;
462 if ( !UMAHasAppearance() )
464 error = kMacSTRNoPre8Yet ;
470 // if we encountered any problems so far, give the error code and exit immediately
474 wxStAppResource resload
;
478 GetIndString(message
, 128, error
);
479 UMAShowArrowCursor() ;
480 ParamText("\pFatal Error", message
, (ConstStr255Param
)"\p", (ConstStr255Param
)"\p");
481 itemHit
= Alert(128, nil
);
486 # if __option(profile)
487 ProfilerInit( collectDetailed
, bestTimeBase
, 20000 , 40 ) ;
492 // now avoid exceptions thrown for new (bad_alloc)
493 std::__throws_bad_alloc
= FALSE
;
496 s_macCursorRgn
= ::NewRgn() ;
498 wxBuffer
= new char[BUFSIZ
+ 512];
500 wxClassInfo::InitializeClasses();
503 // wxGetResource(wxT("wxWindows"), wxT("OsVersion"), &wxOsVersion);
507 wxPendingEventsLocker
= new wxCriticalSection
;
510 wxTheColourDatabase
= new wxColourDatabase(wxKEY_STRING
);
511 wxTheColourDatabase
->Initialize();
515 // flush the logged messages if any and install a 'safer' log target: the
516 // default one (wxLogGui) can't be used after the resources are freed just
517 // below and the user suppliedo ne might be even more unsafe (using any
518 // wxWindows GUI function is unsafe starting from now)
519 wxLog::DontCreateOnDemand();
521 // this will flush the old messages if any
522 delete wxLog::SetActiveTarget(new wxLogStderr
);
526 wxWinMacWindowList
= new wxList(wxKEY_INTEGER
);
527 wxWinMacControlList
= new wxList(wxKEY_INTEGER
);
529 wxInitializeStockLists();
530 wxInitializeStockObjects();
532 #if wxUSE_WX_RESOURCES
533 wxInitializeResourceSystem();
536 wxBitmap::InitStandardHandlers();
538 wxModule::RegisterModules();
539 if (!wxModule::InitializeModules()) {
543 wxMacCreateNotifierTable() ;
546 UMAShowArrowCursor() ;
551 void wxApp::CleanUp()
553 wxToolTip::RemoveToolTips() ;
555 // flush the logged messages if any and install a 'safer' log target: the
556 // default one (wxLogGui) can't be used after the resources are freed just
557 // below and the user suppliedo ne might be even more unsafe (using any
558 // wxWindows GUI function is unsafe starting from now)
559 wxLog::DontCreateOnDemand();
561 // this will flush the old messages if any
562 delete wxLog::SetActiveTarget(new wxLogStderr
);
565 // One last chance for pending objects to be cleaned up
566 wxTheApp
->DeletePendingObjects();
568 wxModule::CleanUpModules();
570 #if wxUSE_WX_RESOURCES
571 wxCleanUpResourceSystem();
574 wxDeleteStockObjects() ;
576 // Destroy all GDI lists, etc.
577 wxDeleteStockLists();
579 delete wxTheColourDatabase
;
580 wxTheColourDatabase
= NULL
;
582 wxBitmap::CleanUpHandlers();
587 wxMacDestroyNotifierTable() ;
588 if (wxWinMacWindowList
) {
589 delete wxWinMacWindowList
;
591 if (wxWinMacControlList
) {
592 delete wxWinMacControlList
;
594 delete wxPendingEvents
;
597 delete wxPendingEventsLocker
;
598 // If we don't do the following, we get an apparent memory leak.
599 ((wxEvtHandler
&) wxDefaultValidator
).ClearEventLocker();
602 wxClassInfo::CleanUpClasses();
605 # if __option(profile)
606 ProfilerDump( "\papp.prof" ) ;
614 #if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
615 // At this point we want to check if there are any memory
616 // blocks that aren't part of the wxDebugContext itself,
617 // as a special case. Then when dumping we need to ignore
618 // wxDebugContext, too.
619 if (wxDebugContext::CountObjectsLeft(TRUE
) > 0)
621 wxLogDebug(wxT("There were memory leaks."));
622 wxDebugContext::Dump();
623 wxDebugContext::PrintStatistics();
625 // wxDebugContext::SetStream(NULL, NULL);
629 // do it as the very last thing because everything else can log messages
630 delete wxLog::SetActiveTarget(NULL
);
633 #if defined(WXMAKINGDLL) && defined(__DARWIN__)
634 // close shared library resources from here since we don't have
635 // __wxterminate in Mach-O shared libraries
636 wxStAppResource::CloseSharedLibraryResource();
639 UMACleanupToolbox() ;
640 if (s_macCursorRgn
) {
641 ::DisposeRgn((RgnHandle
)s_macCursorRgn
);
649 //----------------------------------------------------------------------
651 //----------------------------------------------------------------------
653 // extern variable for shared library resource id
654 // need to be able to find it with NSLookupAndBindSymbol
655 short gSharedLibraryResource
= kResFileNotOpened
;
657 #if defined(WXMAKINGDLL) && defined(__DARWIN__)
658 CFBundleRef gSharedLibraryBundle
= NULL
;
659 #endif /* WXMAKINGDLL && __DARWIN__ */
661 wxStAppResource::wxStAppResource()
663 m_currentRefNum
= CurResFile() ;
664 if ( gSharedLibraryResource
!= kResFileNotOpened
)
666 UseResFile( gSharedLibraryResource
) ;
670 wxStAppResource::~wxStAppResource()
672 if ( m_currentRefNum
!= kResFileNotOpened
)
674 UseResFile( m_currentRefNum
) ;
678 void wxStAppResource::OpenSharedLibraryResource(const void *initBlock
)
680 gSharedLibraryResource
= kResFileNotOpened
;
683 if ( initBlock
!= NULL
) {
684 const CFragInitBlock
*theInitBlock
= (const CFragInitBlock
*)initBlock
;
685 FSSpec
*fileSpec
= NULL
;
687 if (theInitBlock
->fragLocator
.where
== kDataForkCFragLocator
) {
688 fileSpec
= theInitBlock
->fragLocator
.u
.onDisk
.fileSpec
;
690 else if (theInitBlock
->fragLocator
.where
== kResourceCFragLocator
) {
691 fileSpec
= theInitBlock
->fragLocator
.u
.inSegs
.fileSpec
;
694 if (fileSpec
!= NULL
) {
695 gSharedLibraryResource
= FSpOpenResFile(fileSpec
, fsRdPerm
);
700 // Open the shared library resource file if it is not yet open
703 const char *theLibPath
;
705 gSharedLibraryBundle
= CFBundleGetBundleWithIdentifier(CFSTR("com.wxwindows.wxWindows"));
706 if (gSharedLibraryBundle
!= NULL
) {
707 // wxWindows has been bundled into a framework
708 // load the framework resources
710 gSharedLibraryResource
= CFBundleOpenBundleResourceMap(gSharedLibraryBundle
);
713 // wxWindows is a simple dynamic shared library
714 // load the resources from the data fork of a separate resource file
719 OSErr theErr
= noErr
;
721 // get the library path
722 theSymbol
= NSLookupAndBindSymbol("_gSharedLibraryResource");
723 theModule
= NSModuleForSymbol(theSymbol
);
724 theLibPath
= NSLibraryNameForModule(theModule
);
726 // allocate copy to replace .dylib.* extension with .rsrc
727 theResPath
= strdup(theLibPath
);
728 if (theResPath
!= NULL
) {
729 theName
= strrchr(theResPath
, '/');
730 if (theName
== NULL
) {
731 // no directory elements in path
732 theName
= theResPath
;
734 // find ".dylib" shared library extension
735 theExt
= strstr(theName
, ".dylib");
736 // overwrite extension with ".rsrc"
737 strcpy(theExt
, ".rsrc");
739 wxLogDebug( theResPath
);
741 theErr
= FSPathMakeRef((UInt8
*) theResPath
, &theResRef
, false);
742 if (theErr
!= noErr
) {
743 // try in current directory (using name only)
744 theErr
= FSPathMakeRef((UInt8
*) theName
, &theResRef
, false);
747 // free duplicated resource file path
750 // open the resource file
751 if (theErr
== noErr
) {
752 theErr
= FSOpenResourceFile( &theResRef
, 0, NULL
, fsRdPerm
,
753 &gSharedLibraryResource
);
757 #endif /* __DARWIN__ */
759 #endif /* WXMAKINGDLL */
762 void wxStAppResource::CloseSharedLibraryResource()
765 // Close the shared library resource file
766 if (gSharedLibraryResource
!= kResFileNotOpened
) {
768 if (gSharedLibraryBundle
!= NULL
) {
769 CFBundleCloseBundleResourceMap(gSharedLibraryBundle
,
770 gSharedLibraryResource
);
771 gSharedLibraryBundle
= NULL
;
774 #endif /* __DARWIN__ */
776 CloseResFile(gSharedLibraryResource
);
778 gSharedLibraryResource
= kResFileNotOpened
;
780 #endif /* WXMAKINGDLL */
783 #if defined(WXMAKINGDLL) && !defined(__DARWIN__)
785 // for shared libraries we have to manually get the correct resource
786 // ref num upon initializing and releasing when terminating, therefore
787 // the __wxinitialize and __wxterminate must be used
790 void __sinit(void); /* (generated by linker) */
791 pascal OSErr
__initialize(const CFragInitBlock
*theInitBlock
);
792 pascal void __terminate(void);
795 pascal OSErr
__wxinitialize(const CFragInitBlock
*theInitBlock
)
797 wxStAppResource::OpenSharedLibraryResource( theInitBlock
) ;
798 return __initialize( theInitBlock
) ;
801 pascal void __wxterminate(void)
803 wxStAppResource::CloseSharedLibraryResource() ;
807 #endif /* WXMAKINGDLL && !__DARWIN__ */
809 int WXDLLEXPORT
wxEntryStart( int WXUNUSED(argc
), char *WXUNUSED(argv
)[] )
811 return wxApp::Initialize();
814 int WXDLLEXPORT
wxEntryInitGui()
816 return wxTheApp
->OnInitGui();
819 void WXDLLEXPORT
wxEntryCleanup()
824 int wxEntry( int argc
, char *argv
[] , bool enterLoop
)
827 #if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
828 // This seems to be necessary since there are 'rogue'
829 // objects present at this point (perhaps global objects?)
830 // Setting a checkpoint will ignore them as far as the
831 // memory checking facility is concerned.
832 // Of course you may argue that memory allocated in globals should be
833 // checked, but this is a reasonable compromise.
834 wxDebugContext::SetCheckpoint();
837 if (!wxEntryStart(argc
, argv
)) {
840 // create the application object or ensure that one already exists
843 // The app may have declared a global application object, but we recommend
844 // the IMPLEMENT_APP macro is used instead, which sets an initializer
845 // function for delayed, dynamic app object construction.
846 wxCHECK_MSG( wxApp::GetInitializerFunction(), 0,
847 wxT("No initializer - use IMPLEMENT_APP macro.") );
849 wxTheApp
= (wxApp
*) (*wxApp::GetInitializerFunction()) ();
852 wxCHECK_MSG( wxTheApp
, 0, wxT("You have to define an instance of wxApp!") );
855 // Mac OS X passes a process serial number command line argument when
856 // the application is launched from the Finder. This argument must be
857 // removed from the command line arguments before being handled by the
858 // application (otherwise applications would need to handle it)
862 strncpy(theArg
, argv
[1], 5);
864 if (strcmp(theArg
, "-psn_") == 0) {
865 // assume the argument is always the only one and remove it
870 argc
= 0 ; // currently we don't support files as parameters
872 // we could try to get the open apple events here to adjust argc and argv better
874 wxTheApp
->argc
= argc
;
875 wxTheApp
->argv
= argv
;
877 // GUI-specific initialization, such as creating an app context.
880 // Here frames insert themselves automatically
881 // into wxTopLevelWindows by getting created
886 if ( wxTheApp
->OnInit() )
890 retValue
= wxTheApp
->OnRun();
893 // We want to initialize, but not run or exit immediately.
896 //else: app initialization failed, so we skipped OnRun()
898 wxWindow
*topWindow
= wxTheApp
->GetTopWindow();
901 // Forcibly delete the window.
902 if ( topWindow
->IsKindOf(CLASSINFO(wxFrame
)) ||
903 topWindow
->IsKindOf(CLASSINFO(wxDialog
)) )
905 topWindow
->Close(TRUE
);
906 wxTheApp
->DeletePendingObjects();
911 wxTheApp
->SetTopWindow(NULL
);
924 bool wxMacConvertEventToRecord( EventRef event
, EventRecord
*rec
)
926 bool converted
= ConvertEventRefToEventRecord( event
,rec
) ;
927 OSStatus err
= noErr
;
930 switch( GetEventClass( event
) )
932 case kEventClassKeyboard
:
935 switch( GetEventKind(event
) )
937 case kEventRawKeyDown
:
938 rec
->what
= keyDown
;
940 case kEventRawKeyRepeat
:
941 rec
->what
= autoKey
;
943 case kEventRawKeyUp
:
946 case kEventRawKeyModifiersChanged
:
947 rec
->what
= nullEvent
;
956 unsigned char charCode
;
958 GetMouse( &rec
->where
) ;
960 err
= GetEventParameter(event
, kEventParamKeyModifiers
, typeUInt32
, NULL
, 4, NULL
, &modifiers
);
961 err
= GetEventParameter(event
, kEventParamKeyCode
, typeUInt32
, NULL
, 4, NULL
, &keyCode
);
962 err
= GetEventParameter(event
, kEventParamKeyMacCharCodes
, typeChar
, NULL
, 1, NULL
, &charCode
);
963 rec
->modifiers
= modifiers
;
964 rec
->message
= (keyCode
<< 8 ) + charCode
;
968 case kEventClassTextInput
:
970 switch( GetEventKind( event
) )
972 case kEventTextInputUnicodeForKeyEvent
:
975 err
= GetEventParameter( event
, kEventParamTextInputSendKeyboardEvent
,typeEventRef
,NULL
,sizeof(rawEvent
),NULL
,&rawEvent
) ;
979 unsigned char charCode
;
981 GetMouse( &rec
->where
) ;
982 rec
->what
= keyDown
;
983 err
= GetEventParameter(rawEvent
, kEventParamKeyModifiers
, typeUInt32
, NULL
, 4, NULL
, &modifiers
);
984 err
= GetEventParameter(rawEvent
, kEventParamKeyCode
, typeUInt32
, NULL
, 4, NULL
, &keyCode
);
985 err
= GetEventParameter(rawEvent
, kEventParamKeyMacCharCodes
, typeChar
, NULL
, 1, NULL
, &charCode
);
986 rec
->modifiers
= modifiers
;
987 rec
->message
= (keyCode
<< 8 ) + charCode
;
1002 pascal OSStatus
wxMacApplicationEventHandler( EventHandlerCallRef handler
, EventRef event
, void *data
)
1004 OSStatus result
= eventNotHandledErr
;
1007 switch ( GetEventClass( event
) )
1009 case kEventClassKeyboard
:
1010 if ( wxMacConvertEventToRecord( event
, &rec
) )
1012 wxTheApp
->MacHandleModifierEvents( &rec
) ;
1013 wxTheApp
->MacHandleOneEvent( &rec
) ;
1017 case kEventClassTextInput
:
1018 if ( wxMacConvertEventToRecord( event
, &rec
) )
1020 wxTheApp
->MacHandleModifierEvents( &rec
) ;
1021 wxTheApp
->MacHandleOneEvent( &rec
) ;
1033 bool wxApp::OnInit()
1035 if ( ! wxAppBase::OnInit() )
1038 #if 0 // TARGET_CARBON
1039 static const EventTypeSpec eventList
[] =
1041 { kEventClassKeyboard
, kEventRawKeyDown
} ,
1042 { kEventClassKeyboard
, kEventRawKeyRepeat
} ,
1043 { kEventClassKeyboard
, kEventRawKeyUp
} ,
1044 { kEventClassKeyboard
, kEventRawKeyModifiersChanged
} ,
1046 { kEventClassTextInput
, kEventTextInputUnicodeForKeyEvent
} ,
1049 InstallApplicationEventHandler(NewEventHandlerUPP(wxMacApplicationEventHandler
)
1050 , WXSIZEOF(eventList
), eventList
, this, NULL
);
1054 // Static member initialization
1055 wxAppInitializerFunction
wxAppBase::m_appInitFn
= (wxAppInitializerFunction
) NULL
;
1062 #if WXWIN_COMPATIBILITY_2_2
1063 m_wantDebugOutput
= TRUE
;
1069 m_printMode
= wxPRINT_WINDOWS
;
1070 SetExitOnFrameDelete(TRUE
);
1074 bool wxApp::Initialized()
1082 int wxApp::MainLoop()
1094 // Returns TRUE if more time is needed.
1095 bool wxApp::ProcessIdle()
1098 event
.SetEventObject(this);
1099 ProcessEvent(event
);
1101 return event
.MoreRequested();
1104 void wxApp::ExitMainLoop()
1106 m_keepGoing
= FALSE
;
1109 // Is a message/event pending?
1110 bool wxApp::Pending()
1114 return EventAvail( everyEvent
, &event
) ;
1117 // Dispatch a message.
1118 void wxApp::Dispatch()
1123 void wxApp::OnIdle(wxIdleEvent
& event
)
1125 static bool s_inOnIdle
= FALSE
;
1127 // Avoid recursion (via ProcessEvent default case)
1134 // 'Garbage' collection of windows deleted with Close().
1135 DeletePendingObjects();
1137 // flush the logged messages if any
1138 wxLog
*pLog
= wxLog::GetActiveTarget();
1139 if ( pLog
!= NULL
&& pLog
->HasPendingMessages() )
1142 // Send OnIdle events to all windows
1143 bool needMore
= SendIdleEvents();
1146 event
.RequestMore(TRUE
);
1148 // If they are pending events, we must process them: pending events are
1149 // either events to the threads other than main or events posted with
1150 // wxPostEvent() functions
1151 wxMacProcessNotifierAndPendingEvents();
1161 // Send idle event to all top-level windows
1162 bool wxApp::SendIdleEvents()
1164 bool needMore
= FALSE
;
1165 wxNode
* node
= wxTopLevelWindows
.First();
1168 wxWindow
* win
= (wxWindow
*) node
->Data();
1169 if (SendIdleEvents(win
))
1172 node
= node
->Next();
1177 // Send idle event to window and all subwindows
1178 bool wxApp::SendIdleEvents(wxWindow
* win
)
1180 bool needMore
= FALSE
;
1183 event
.SetEventObject(win
);
1184 win
->ProcessEvent(event
);
1186 if (event
.MoreRequested())
1189 wxNode
* node
= win
->GetChildren().First();
1192 wxWindow
* win
= (wxWindow
*) node
->Data();
1193 if (SendIdleEvents(win
))
1196 node
= node
->Next();
1201 void wxApp::DeletePendingObjects()
1203 wxNode
*node
= wxPendingDelete
.First();
1206 wxObject
*obj
= (wxObject
*)node
->Data();
1210 if (wxPendingDelete
.Member(obj
))
1213 // Deleting one object may have deleted other pending
1214 // objects, so start from beginning of list again.
1215 node
= wxPendingDelete
.First();
1221 wxLogError(_("Fatal error: exiting"));
1227 void wxApp::OnEndSession(wxCloseEvent
& WXUNUSED(event
))
1230 GetTopWindow()->Close(TRUE
);
1233 // Default behaviour: close the application with prompts. The
1234 // user can veto the close, and therefore the end session.
1235 void wxApp::OnQueryEndSession(wxCloseEvent
& event
)
1239 if (!GetTopWindow()->Close(!event
.CanVeto()))
1244 extern "C" void wxCYield() ;
1250 // Yield to other processes
1252 bool wxApp::Yield(bool onlyIfNeeded
)
1254 static bool s_inYield
= FALSE
;
1258 if ( !onlyIfNeeded
)
1260 wxFAIL_MSG( wxT("wxYield called recursively" ) );
1269 YieldToAnyThread() ;
1273 long sleepTime
= 1 ; //::GetCaretTime();
1275 while ( !wxTheApp
->IsExiting() && WaitNextEvent(everyEvent
, &event
,sleepTime
, (RgnHandle
) wxApp::s_macCursorRgn
))
1277 wxTheApp
->MacHandleModifierEvents( &event
) ;
1278 wxTheApp
->MacHandleOneEvent( &event
);
1279 if ( event
.what
!= kHighLevelEvent
)
1280 SetRectRgn( (RgnHandle
) wxApp::s_macCursorRgn
, event
.where
.h
, event
.where
.v
, event
.where
.h
+ 1 , event
.where
.v
+ 1 ) ;
1282 wxTheApp
->MacHandleModifierEvents( &event
) ;
1284 wxMacProcessNotifierAndPendingEvents() ;
1291 // platform specifics
1293 void wxApp::MacSuspend( bool convertClipboard
)
1295 // we have to deactive the top level windows manually
1297 wxNode
* node
= wxTopLevelWindows
.First();
1300 wxTopLevelWindow
* win
= (wxTopLevelWindow
*) node
->Data();
1301 win
->MacActivate( MacGetCurrentEvent() , false ) ;
1303 node
= node
->Next();
1306 s_lastMouseDown
= 0 ;
1307 if( convertClipboard
)
1309 MacConvertPrivateToPublicScrap() ;
1312 ::HideFloatingWindows() ;
1315 extern wxList wxModalDialogs
;
1317 void wxApp::MacResume( bool convertClipboard
)
1319 s_lastMouseDown
= 0 ;
1320 if( convertClipboard
)
1322 MacConvertPublicToPrivateScrap() ;
1325 ::ShowFloatingWindows() ;
1327 // raise modal dialogs in case a non modal window was selected to activate the app
1329 wxNode
* node
= wxModalDialogs
.First();
1332 wxDialog
* dialog
= (wxDialog
*) node
->Data();
1335 node
= node
->Next();
1339 void wxApp::MacConvertPrivateToPublicScrap()
1343 void wxApp::MacConvertPublicToPrivateScrap()
1347 void wxApp::MacDoOneEvent()
1351 long sleepTime
= 1; // GetCaretTime() / 4 ;
1353 if (WaitNextEvent(everyEvent
, &event
, sleepTime
, (RgnHandle
) s_macCursorRgn
))
1355 MacHandleModifierEvents( &event
) ;
1356 MacHandleOneEvent( &event
);
1360 MacHandleModifierEvents( &event
) ;
1362 WindowPtr window
= ::FrontWindow() ;
1364 ::IdleControls( window
) ;
1366 wxTheApp
->ProcessIdle() ;
1368 if ( event
.what
!= kHighLevelEvent
)
1369 SetRectRgn( (RgnHandle
) s_macCursorRgn
, event
.where
.h
, event
.where
.v
, event
.where
.h
+ 1 , event
.where
.v
+ 1 ) ;
1373 DeletePendingObjects() ;
1374 wxMacProcessNotifierAndPendingEvents() ;
1377 void wxApp::MacHandleModifierEvents( WXEVENTREF evr
)
1379 EventRecord
* ev
= (EventRecord
*) evr
;
1381 if ( ev
->what
== mouseDown
|| ev
->what
== mouseUp
|| ev
->what
== activateEvt
||
1382 ev
->what
== keyDown
|| ev
->what
== autoKey
|| ev
->what
== keyUp
|| ev
->what
== nullEvent
)
1384 // in these cases the modifiers are already correctly setup by carbon
1388 ev
->modifiers
= GetCurrentKeyModifiers() ;
1391 if ( ev
->modifiers
!= s_lastModifiers
&& wxWindow::FindFocus() != NULL
)
1393 wxKeyEvent
event(wxEVT_KEY_DOWN
);
1395 event
.m_shiftDown
= ev
->modifiers
& shiftKey
;
1396 event
.m_controlDown
= ev
->modifiers
& controlKey
;
1397 event
.m_altDown
= ev
->modifiers
& optionKey
;
1398 event
.m_metaDown
= ev
->modifiers
& cmdKey
;
1400 event
.m_x
= ev
->where
.h
;
1401 event
.m_y
= ev
->where
.v
;
1402 event
.m_timeStamp
= ev
->when
;
1403 wxWindow
* focus
= wxWindow::FindFocus() ;
1404 event
.SetEventObject(focus
);
1406 if ( (ev
->modifiers
^ s_lastModifiers
) & controlKey
)
1408 event
.m_keyCode
= WXK_CONTROL
;
1409 event
.SetEventType( ( ev
->modifiers
& controlKey
) ? wxEVT_KEY_DOWN
: wxEVT_KEY_UP
) ;
1410 focus
->GetEventHandler()->ProcessEvent( event
) ;
1412 if ( (ev
->modifiers
^ s_lastModifiers
) & shiftKey
)
1414 event
.m_keyCode
= WXK_SHIFT
;
1415 event
.SetEventType( ( ev
->modifiers
& shiftKey
) ? wxEVT_KEY_DOWN
: wxEVT_KEY_UP
) ;
1416 focus
->GetEventHandler()->ProcessEvent( event
) ;
1418 if ( (ev
->modifiers
^ s_lastModifiers
) & optionKey
)
1420 event
.m_keyCode
= WXK_ALT
;
1421 event
.SetEventType( ( ev
->modifiers
& optionKey
) ? wxEVT_KEY_DOWN
: wxEVT_KEY_UP
) ;
1422 focus
->GetEventHandler()->ProcessEvent( event
) ;
1424 s_lastModifiers
= ev
->modifiers
;
1428 void wxApp::MacHandleOneEvent( WXEVENTREF evr
)
1430 EventRecord
* ev
= (EventRecord
*) evr
;
1431 m_macCurrentEvent
= ev
;
1433 wxApp::sm_lastMessageTime
= ev
->when
;
1438 MacHandleMouseDownEvent( ev
) ;
1439 if ( ev
->modifiers
& controlKey
)
1440 s_lastMouseDown
= 2;
1442 s_lastMouseDown
= 1;
1445 if ( s_lastMouseDown
== 2 )
1447 ev
->modifiers
|= controlKey
;
1451 ev
->modifiers
&= ~controlKey
;
1453 MacHandleMouseUpEvent( ev
) ;
1454 s_lastMouseDown
= 0;
1457 MacHandleActivateEvent( ev
) ;
1460 MacHandleUpdateEvent( ev
) ;
1464 MacHandleKeyDownEvent( ev
) ;
1467 MacHandleKeyUpEvent( ev
) ;
1470 MacHandleDiskEvent( ev
) ;
1473 MacHandleOSEvent( ev
) ;
1475 case kHighLevelEvent
:
1476 MacHandleHighLevelEvent( ev
) ;
1481 wxMacProcessNotifierAndPendingEvents() ;
1484 void wxApp::MacHandleHighLevelEvent( WXEVENTREF evr
)
1486 EventRecord
* ev
= (EventRecord
*) evr
;
1487 ::AEProcessAppleEvent( ev
) ;
1490 bool s_macIsInModalLoop
= false ;
1492 void wxApp::MacHandleMouseDownEvent( WXEVENTREF evr
)
1494 EventRecord
* ev
= (EventRecord
*) evr
;
1495 wxToolTip::RemoveToolTips() ;
1498 WindowRef frontWindow
= ::FrontNonFloatingWindow() ;
1499 WindowAttributes frontWindowAttributes
= NULL
;
1501 ::GetWindowAttributes( frontWindow
, &frontWindowAttributes
) ;
1503 short windowPart
= ::FindWindow(ev
->where
, &window
);
1504 wxTopLevelWindowMac
* win
= wxFindWinFromMacWindow( window
) ;
1505 if ( wxPendingDelete
.Member(win
) )
1509 GetQDGlobalsScreenBits( &screenBits
);
1514 if ( s_macIsInModalLoop
)
1520 UInt32 menuresult
= MenuSelect(ev
->where
) ;
1521 MacHandleMenuSelect( HiWord( menuresult
) , LoWord( menuresult
) );
1522 s_lastMouseDown
= 0;
1527 SystemClick( ev
, window
) ;
1528 s_lastMouseDown
= 0;
1532 if ( window
!= frontWindow
&& s_macIsInModalLoop
&& !(ev
->modifiers
& cmdKey
) )
1538 DragWindow(window
, ev
->where
, &screenBits
.bounds
);
1543 Point pt
= { 0, 0 } ;
1544 SetPortWindowPort(window
) ;
1545 LocalToGlobal( &pt
) ;
1547 win
->SetSize( pt
.h
, pt
.v
, -1 ,
1548 -1 , wxSIZE_USE_EXISTING
);
1550 s_lastMouseDown
= 0;
1554 if (TrackGoAway(window
, ev
->where
))
1559 s_lastMouseDown
= 0;
1563 int growResult
= GrowWindow(window
, ev
->where
, &screenBits
.bounds
);
1564 if (growResult
!= 0)
1566 int newWidth
= LoWord(growResult
);
1567 int newHeight
= HiWord(growResult
);
1568 int oldWidth
, oldHeight
;
1573 win
->GetSize(&oldWidth
, &oldHeight
);
1575 newWidth
= oldWidth
;
1577 newHeight
= oldHeight
;
1578 win
->SetSize( -1, -1 , newWidth
, newHeight
, wxSIZE_USE_EXISTING
);
1581 s_lastMouseDown
= 0;
1586 if (TrackBox(window
, ev
->where
, windowPart
))
1588 // TODO setup size event
1589 ZoomWindow( window
, windowPart
, false ) ;
1595 Point pt
= { 0, 0 } ;
1596 SetPortWindowPort(window
) ;
1597 LocalToGlobal( &pt
) ;
1600 GetWindowPortBounds(window
, &tempRect
) ;
1601 win
->SetSize( pt
.h
, pt
.v
, tempRect
.right
-tempRect
.left
,
1602 tempRect
.bottom
-tempRect
.top
, wxSIZE_USE_EXISTING
);
1605 s_lastMouseDown
= 0;
1607 case inCollapseBox
:
1608 // TODO setup size event
1609 s_lastMouseDown
= 0;
1616 SetPortWindowPort(window
) ;
1619 if ( window
!= frontWindow
&& wxTheApp
->s_captureWindow
== NULL
)
1621 if ( s_macIsInModalLoop
)
1625 else if ( UMAIsWindowFloating( window
) )
1628 win
->MacMouseDown( ev
, windowPart
) ;
1633 win
->MacMouseDown( ev
, windowPart
) ;
1634 ::SelectWindow( window
) ;
1640 win
->MacMouseDown( ev
, windowPart
) ;
1649 void wxApp::MacHandleMouseUpEvent( WXEVENTREF evr
)
1651 EventRecord
* ev
= (EventRecord
*) evr
;
1654 short windowPart
= inNoWindow
;
1655 if ( wxTheApp
->s_captureWindow
)
1657 window
= (WindowRef
) s_captureWindow
->MacGetRootWindow() ;
1658 windowPart
= inContent
;
1662 windowPart
= ::FindWindow(ev
->where
, &window
) ;
1673 wxTopLevelWindowMac
* win
= wxFindWinFromMacWindow( window
) ;
1675 win
->MacMouseUp( ev
, windowPart
) ;
1681 long wxMacTranslateKey(unsigned char key
, unsigned char code
) ;
1682 long wxMacTranslateKey(unsigned char key
, unsigned char code
)
1691 retval
= WXK_RETURN
;
1706 retval
= WXK_PAGEUP
;
1709 retval
= WXK_PAGEDOWN
;
1712 retval
= WXK_RETURN
;
1767 retval
= WXK_ESCAPE
;
1773 retval
= WXK_RIGHT
;
1782 retval
= WXK_DELETE
;
1790 void wxApp::MacHandleKeyDownEvent( WXEVENTREF evr
)
1792 EventRecord
* ev
= (EventRecord
*) evr
;
1793 wxToolTip::RemoveToolTips() ;
1795 UInt32 menuresult
= UMAMenuEvent(ev
) ;
1796 if ( HiWord( menuresult
) )
1798 if ( !s_macIsInModalLoop
)
1799 MacHandleMenuSelect( HiWord( menuresult
) , LoWord( menuresult
) ) ;
1805 keychar
= short(ev
->message
& charCodeMask
);
1806 keycode
= short(ev
->message
& keyCodeMask
) >> 8 ;
1807 wxWindow
* focus
= wxWindow::FindFocus() ;
1808 // it is wxWindows Convention to have Ctrl Key Combinations at ASCII char value
1809 if ( (ev
->modifiers
& controlKey
) && keychar
>= 0 && keychar
< 0x20 )
1813 long keyval
= wxMacTranslateKey(keychar
, keycode
) ;
1815 if ( MacSendKeyDownEvent( focus
, keyval
, ev
->modifiers
, ev
->when
, ev
->where
.h
, ev
->where
.v
) == false )
1817 // has not been handled -> perform default
1818 wxControl
* control
= wxDynamicCast( focus
, wxControl
) ;
1819 if ( control
&& control
->GetMacControl() != NULL
)
1821 ::HandleControlKey( (ControlHandle
) control
->GetMacControl() , keycode
, keychar
, ev
->modifiers
) ;
1827 bool wxApp::MacSendKeyDownEvent( wxWindow
* focus
, long keyval
, long modifiers
, long when
, short wherex
, short wherey
)
1829 wxKeyEvent
event(wxEVT_KEY_DOWN
);
1830 bool handled
= false ;
1831 event
.m_shiftDown
= modifiers
& shiftKey
;
1832 event
.m_controlDown
= modifiers
& controlKey
;
1833 event
.m_altDown
= modifiers
& optionKey
;
1834 event
.m_metaDown
= modifiers
& cmdKey
;
1835 event
.m_keyCode
= wxToupper(keyval
);
1839 event
.m_timeStamp
= when
;
1840 event
.SetEventObject(focus
);
1841 handled
= focus
->GetEventHandler()->ProcessEvent( event
) ;
1842 if ( handled
&& event
.GetSkipped() )
1849 wxWindow
*ancestor
= focus
;
1852 int command
= ancestor
->GetAcceleratorTable()->GetCommand( event
);
1855 wxCommandEvent
command_event( wxEVT_COMMAND_MENU_SELECTED
, command
);
1856 handled
= ancestor
->GetEventHandler()->ProcessEvent( command_event
);
1859 if (ancestor
->IsTopLevel())
1861 ancestor
= ancestor
->GetParent();
1864 #endif // wxUSE_ACCEL
1868 event
.Skip( FALSE
) ;
1869 event
.SetEventType( wxEVT_CHAR
) ;
1870 event
.m_keyCode
= keyval
;
1872 handled
= focus
->GetEventHandler()->ProcessEvent( event
) ;
1873 if ( handled
&& event
.GetSkipped() )
1877 (keyval
== WXK_TAB
) &&
1878 // CS: copied the change below from wxGTK
1879 // VZ: testing for wxTE_PROCESS_TAB shouldn't be done here the control may
1880 // have this style, yet choose not to process this particular TAB in which
1881 // case TAB must still work as a navigational character
1883 (!focus
->HasFlag(wxTE_PROCESS_TAB
)) &&
1885 (focus
->GetParent()) &&
1886 (focus
->GetParent()->HasFlag( wxTAB_TRAVERSAL
)) )
1888 wxNavigationKeyEvent new_event
;
1889 new_event
.SetEventObject( focus
);
1890 new_event
.SetDirection( !event
.ShiftDown() );
1891 /* CTRL-TAB changes the (parent) window, i.e. switch notebook page */
1892 new_event
.SetWindowChange( event
.ControlDown() );
1893 new_event
.SetCurrentFocus( focus
);
1894 handled
= focus
->GetEventHandler()->ProcessEvent( new_event
);
1895 if ( handled
&& new_event
.GetSkipped() )
1898 // backdoor handler for default return and command escape
1899 if ( !handled
&& (!focus
->IsKindOf(CLASSINFO(wxControl
) ) || !focus
->MacCanFocus() ) )
1901 // if window is not having a focus still testing for default enter or cancel
1902 // TODO add the UMA version for ActiveNonFloatingWindow
1903 wxWindow
* focus
= wxFindWinFromMacWindow( FrontWindow() ) ;
1906 if ( keyval
== WXK_RETURN
)
1908 wxButton
*def
= wxDynamicCast(focus
->GetDefaultItem(),
1910 if ( def
&& def
->IsEnabled() )
1912 wxCommandEvent
event(wxEVT_COMMAND_BUTTON_CLICKED
, def
->GetId() );
1913 event
.SetEventObject(def
);
1914 def
->Command(event
);
1918 /* generate wxID_CANCEL if command-. or <esc> has been pressed (typically in dialogs) */
1919 else if (keyval
== WXK_ESCAPE
|| (keyval
== '.' && modifiers
& cmdKey
) )
1921 wxCommandEvent
new_event(wxEVT_COMMAND_BUTTON_CLICKED
,wxID_CANCEL
);
1922 new_event
.SetEventObject( focus
);
1923 handled
= focus
->GetEventHandler()->ProcessEvent( new_event
);
1931 void wxApp::MacHandleKeyUpEvent( WXEVENTREF evr
)
1933 EventRecord
* ev
= (EventRecord
*) evr
;
1934 wxToolTip::RemoveToolTips() ;
1936 UInt32 menuresult
= UMAMenuEvent(ev
) ;
1937 if ( HiWord( menuresult
) )
1944 keychar
= short(ev
->message
& charCodeMask
);
1945 keycode
= short(ev
->message
& keyCodeMask
) >> 8 ;
1946 // it is wxWindows Convention to have Ctrl Key Combinations at ASCII char value
1947 if ( (ev
->modifiers
& controlKey
) && keychar
>= 0 && keychar
< 0x20 )
1951 long keyval
= wxMacTranslateKey(keychar
, keycode
) ;
1953 wxWindow
* focus
= wxWindow::FindFocus() ;
1954 bool handled
= MacSendKeyUpEvent( focus
, keyval
, ev
->modifiers
, ev
->when
, ev
->where
.h
, ev
->where
.v
) ;
1955 // we don't have to do anything under classic here
1959 bool wxApp::MacSendKeyUpEvent( wxWindow
* focus
, long keyval
, long modifiers
, long when
, short wherex
, short wherey
)
1961 bool handled
= false ;
1964 wxKeyEvent
event(wxEVT_KEY_UP
);
1965 event
.m_shiftDown
= modifiers
& shiftKey
;
1966 event
.m_controlDown
= modifiers
& controlKey
;
1967 event
.m_altDown
= modifiers
& optionKey
;
1968 event
.m_metaDown
= modifiers
& cmdKey
;
1969 event
.m_keyCode
= wxToupper(keyval
);
1973 event
.m_timeStamp
= when
;
1974 event
.SetEventObject(focus
);
1975 handled
= focus
->GetEventHandler()->ProcessEvent( event
) ;
1979 void wxApp::MacHandleActivateEvent( WXEVENTREF evr
)
1981 EventRecord
* ev
= (EventRecord
*) evr
;
1982 WindowRef window
= (WindowRef
) ev
->message
;
1985 bool activate
= (ev
->modifiers
& activeFlag
) ;
1986 WindowClass wclass
;
1987 ::GetWindowClass ( window
, &wclass
) ;
1988 if ( wclass
== kFloatingWindowClass
)
1990 // if it is a floater we activate/deactivate the front non-floating window instead
1991 window
= ::FrontNonFloatingWindow() ;
1993 wxTopLevelWindowMac
* win
= wxFindWinFromMacWindow( window
) ;
1995 win
->MacActivate( ev
, activate
) ;
1999 void wxApp::MacHandleUpdateEvent( WXEVENTREF evr
)
2001 EventRecord
* ev
= (EventRecord
*) evr
;
2002 WindowRef window
= (WindowRef
) ev
->message
;
2003 wxTopLevelWindowMac
* win
= wxFindWinFromMacWindow( window
) ;
2006 if ( !wxPendingDelete
.Member(win
) )
2007 win
->MacUpdate( ev
->when
) ;
2011 // since there is no way of telling this foreign window to update itself
2012 // we have to invalidate the update region otherwise we keep getting the same
2013 // event over and over again
2014 BeginUpdate( window
) ;
2015 EndUpdate( window
) ;
2019 void wxApp::MacHandleDiskEvent( WXEVENTREF evr
)
2021 EventRecord
* ev
= (EventRecord
*) evr
;
2022 if ( HiWord( ev
->message
) != noErr
)
2027 SetPt( &point
, 100 , 100 ) ;
2029 err
= DIBadMount( point
, ev
->message
) ;
2030 wxASSERT( err
== noErr
) ;
2035 void wxApp::MacHandleOSEvent( WXEVENTREF evr
)
2037 EventRecord
* ev
= (EventRecord
*) evr
;
2038 switch( ( ev
->message
& osEvtMessageMask
) >> 24 )
2040 case suspendResumeMessage
:
2042 bool isResuming
= ev
->message
& resumeFlag
;
2044 bool convertClipboard
= ev
->message
& convertClipboardFlag
;
2046 bool convertClipboard
= false;
2048 bool doesActivate
= UMAGetProcessModeDoesActivateOnFGSwitch() ;
2051 WindowRef oldFrontWindow
= NULL
;
2052 WindowRef newFrontWindow
= NULL
;
2054 // in case we don't take care of activating ourselves, we have to synchronize
2055 // our idea of the active window with the process manager's - which it already activated
2057 if ( !doesActivate
)
2058 oldFrontWindow
= ::FrontNonFloatingWindow() ;
2060 MacResume( convertClipboard
) ;
2062 newFrontWindow
= ::FrontNonFloatingWindow() ;
2064 if ( oldFrontWindow
)
2066 wxTopLevelWindowMac
* win
= wxFindWinFromMacWindow( oldFrontWindow
) ;
2068 win
->MacActivate( ev
, false ) ;
2070 if ( newFrontWindow
)
2072 wxTopLevelWindowMac
* win
= wxFindWinFromMacWindow( newFrontWindow
) ;
2074 win
->MacActivate( ev
, true ) ;
2079 MacSuspend( convertClipboard
) ;
2081 // in case this suspending did close an active window, another one might
2082 // have surfaced -> lets deactivate that one
2084 /* TODO : find out what to do on systems < 10 , perhaps FrontNonFloatingWindow
2085 WindowRef newActiveWindow = ::ActiveNonFloatingWindow() ;
2086 if ( newActiveWindow )
2088 wxWindow* win = wxFindWinFromMacWindow( newActiveWindow ) ;
2090 win->MacActivate( ev , false ) ;
2096 case mouseMovedMessage
:
2100 wxWindow
* currentMouseWindow
= NULL
;
2102 wxWindow::MacGetWindowFromPoint( wxPoint( ev
->where
.h
, ev
->where
.v
) ,
2103 ¤tMouseWindow
) ;
2104 if ( currentMouseWindow
!= wxWindow::s_lastMouseWindow
)
2106 wxMouseEvent event
;
2108 bool isDown
= !(ev
->modifiers
& btnState
) ; // 1 is for up
2109 bool controlDown
= ev
->modifiers
& controlKey
; // for simulating right mouse
2111 event
.m_leftDown
= isDown
&& !controlDown
;
2112 event
.m_middleDown
= FALSE
;
2113 event
.m_rightDown
= isDown
&& controlDown
;
2114 event
.m_shiftDown
= ev
->modifiers
& shiftKey
;
2115 event
.m_controlDown
= ev
->modifiers
& controlKey
;
2116 event
.m_altDown
= ev
->modifiers
& optionKey
;
2117 event
.m_metaDown
= ev
->modifiers
& cmdKey
;
2118 event
.m_x
= ev
->where
.h
;
2119 event
.m_y
= ev
->where
.v
;
2120 event
.m_timeStamp
= ev
->when
;
2121 event
.SetEventObject(this);
2123 if ( wxWindow::s_lastMouseWindow
)
2125 wxMouseEvent
eventleave(event
);
2126 eventleave
.SetEventType( wxEVT_LEAVE_WINDOW
);
2127 wxWindow::s_lastMouseWindow
->ScreenToClient( &eventleave
.m_x
, &eventleave
.m_y
);
2128 eventleave
.SetEventObject( wxWindow::s_lastMouseWindow
) ;
2130 wxWindow::s_lastMouseWindow
->GetEventHandler()->ProcessEvent(eventleave
);
2132 if ( currentMouseWindow
)
2134 wxMouseEvent
evententer(event
);
2135 evententer
.SetEventType( wxEVT_ENTER_WINDOW
);
2136 currentMouseWindow
->ScreenToClient( &evententer
.m_x
, &evententer
.m_y
);
2137 evententer
.SetEventObject( currentMouseWindow
) ;
2138 currentMouseWindow
->GetEventHandler()->ProcessEvent(evententer
);
2140 wxWindow::s_lastMouseWindow
= currentMouseWindow
;
2143 short windowPart
= ::FindWindow(ev
->where
, &window
);
2147 // fixes for setting the cursor back from dominic mazzoni
2149 UMAShowArrowCursor();
2152 UMAShowArrowCursor();
2156 wxTopLevelWindowMac
* win
= wxFindWinFromMacWindow( window
) ;
2158 win
->MacMouseMoved( ev
, windowPart
) ;
2160 UMAShowArrowCursor();
2171 void wxApp::MacHandleMenuSelect( int macMenuId
, int macMenuItemNum
)
2174 return; // no menu item selected
2176 if (macMenuId
== kwxMacAppleMenuId
&& macMenuItemNum
> 1)
2179 Str255 deskAccessoryName
;
2182 GetMenuItemText(GetMenuHandle(kwxMacAppleMenuId
), macMenuItemNum
, deskAccessoryName
);
2183 GetPort(&savedPort
);
2184 OpenDeskAcc(deskAccessoryName
);
2190 wxWindow
* frontwindow
= wxFindWinFromMacWindow( ::FrontWindow() ) ;
2191 if ( frontwindow
&& wxMenuBar::MacGetInstalledMenuBar() )
2192 wxMenuBar::MacGetInstalledMenuBar()->MacMenuSelect( frontwindow
->GetEventHandler() , 0 , macMenuId
, macMenuItemNum
) ;
2198 long wxApp::MacTranslateKey(char key, int mods)
2202 void wxApp::MacAdjustCursor()
2209 wxApp::macAdjustCursor()
2211 if (ev->what != kHighLevelEvent)
2213 wxWindow* theMacWxFrame = wxFrame::MacFindFrameOrDialog(::FrontWindow());
2216 if (!theMacWxFrame->MacAdjustCursor(ev->where))
2217 ::SetCursor(&(qd.arrow));