]> git.saurik.com Git - wxWidgets.git/blame - src/mac/app.cpp
changes to match listctrl.h changes (forgot to commit yesterday, sorry)
[wxWidgets.git] / src / mac / app.cpp
CommitLineData
e9576ca5
SC
1/////////////////////////////////////////////////////////////////////////////
2// Name: app.cpp
3// Purpose: wxApp
4// Author: AUTHOR
5// Modified by:
6// Created: ??/??/98
7// RCS-ID: $Id$
8// Copyright: (c) AUTHOR
8461e4c2 9// Licence: wxWindows licence
e9576ca5
SC
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "app.h"
14#endif
15
03e11df5 16#include "wx/window.h"
e9576ca5
SC
17#include "wx/frame.h"
18#include "wx/app.h"
19#include "wx/utils.h"
20#include "wx/gdicmn.h"
21#include "wx/pen.h"
22#include "wx/brush.h"
23#include "wx/cursor.h"
ed5b9811 24#include "wx/intl.h"
e9576ca5
SC
25#include "wx/icon.h"
26#include "wx/palette.h"
27#include "wx/dc.h"
28#include "wx/dialog.h"
29#include "wx/msgdlg.h"
30#include "wx/log.h"
31#include "wx/module.h"
32#include "wx/memory.h"
2f1ae414 33#include "wx/tooltip.h"
b3c406a5 34#include "wx/textctrl.h"
03e11df5 35#include "wx/menu.h"
e9576ca5
SC
36#if wxUSE_WX_RESOURCES
37#include "wx/resource.h"
38#endif
39
40#include <string.h>
41
8be97d65
SC
42// mac
43
f5c6eb5c 44#ifndef __DARWIN__
03e11df5 45 #if __option(profile)
8461e4c2 46 #include <profiler.h>
03e11df5 47 #endif
9779893b 48#endif
519cb848 49
8be97d65
SC
50#include "apprsrc.h"
51
03e11df5
GD
52#include "wx/mac/uma.h"
53#include "wx/mac/macnotfy.h"
2f1ae414
SC
54
55#if wxUSE_SOCKETS
f5c6eb5c 56 #ifdef __DARWIN__
5fde6fcc 57 #include <CoreServices/CoreServices.h>
03e11df5
GD
58 #else
59 #include <OpenTransport.h>
60 #include <OpenTptInternet.h>
61 #endif
2f1ae414 62#endif
519cb848 63
e9576ca5
SC
64extern char *wxBuffer;
65extern wxList wxPendingDelete;
519cb848
SC
66extern wxList *wxWinMacWindowList;
67extern wxList *wxWinMacControlList;
e9576ca5 68
6418cb93 69wxApp *wxTheApp = NULL;
e9576ca5 70
2f1ae414 71#if !USE_SHARED_LIBRARY
e9576ca5
SC
72IMPLEMENT_DYNAMIC_CLASS(wxApp, wxEvtHandler)
73BEGIN_EVENT_TABLE(wxApp, wxEvtHandler)
74 EVT_IDLE(wxApp::OnIdle)
2f1ae414
SC
75 EVT_END_SESSION(wxApp::OnEndSession)
76 EVT_QUERY_END_SESSION(wxApp::OnQueryEndSession)
e9576ca5 77END_EVENT_TABLE()
2f1ae414 78#endif
e9576ca5 79
169935ad 80
8461e4c2 81const short kMacMinHeap = (29 * 1024) ;
8be97d65 82// platform specific static variables
169935ad 83
519cb848
SC
84const short kwxMacMenuBarResource = 1 ;
85const short kwxMacAppleMenuId = 1 ;
86
8461e4c2
VZ
87RgnHandle wxApp::s_macCursorRgn = NULL;
88wxWindow* wxApp::s_captureWindow = NULL ;
89int wxApp::s_lastMouseDown = 0 ;
90long wxApp::sm_lastMessageTime = 0;
519cb848 91
8461e4c2 92bool wxApp::s_macDefaultEncodingIsPC = true ;
519cb848
SC
93bool wxApp::s_macSupportPCMenuShortcuts = true ;
94long wxApp::s_macAboutMenuItemId = wxID_ABOUT ;
95wxString wxApp::s_macHelpMenuTitleName = "&Help" ;
96
72055702
SC
97pascal OSErr AEHandleODoc( const AppleEvent *event , AppleEvent *reply , long refcon ) ;
98pascal OSErr AEHandleOApp( const AppleEvent *event , AppleEvent *reply , long refcon ) ;
99pascal OSErr AEHandlePDoc( const AppleEvent *event , AppleEvent *reply , long refcon ) ;
100pascal OSErr AEHandleQuit( const AppleEvent *event , AppleEvent *reply , long refcon ) ;
101
102
007ae8d0 103pascal OSErr AEHandleODoc( const AppleEvent *event , AppleEvent *reply , long refcon )
519cb848 104{
8461e4c2
VZ
105 wxApp* app = (wxApp*) refcon ;
106 return wxTheApp->MacHandleAEODoc( (AppleEvent*) event , reply) ;
519cb848
SC
107}
108
007ae8d0 109pascal OSErr AEHandleOApp( const AppleEvent *event , AppleEvent *reply , long refcon )
519cb848 110{
8461e4c2
VZ
111 wxApp* app = (wxApp*) refcon ;
112 return wxTheApp->MacHandleAEOApp( (AppleEvent*) event , reply ) ;
519cb848
SC
113}
114
007ae8d0 115pascal OSErr AEHandlePDoc( const AppleEvent *event , AppleEvent *reply , long refcon )
519cb848 116{
8461e4c2
VZ
117 wxApp* app = (wxApp*) refcon ;
118 return wxTheApp->MacHandleAEPDoc( (AppleEvent*) event , reply ) ;
519cb848
SC
119}
120
007ae8d0 121pascal OSErr AEHandleQuit( const AppleEvent *event , AppleEvent *reply , long refcon )
519cb848 122{
8461e4c2
VZ
123 wxApp* app = (wxApp*) refcon ;
124 return wxTheApp->MacHandleAEQuit( (AppleEvent*) event , reply) ;
519cb848
SC
125}
126
5b781a67 127OSErr wxApp::MacHandleAEODoc(const AppleEvent *event , AppleEvent *reply)
519cb848 128{
c1fb8167 129 SysBeep(40) ;
8461e4c2
VZ
130 ProcessSerialNumber PSN ;
131 PSN.highLongOfPSN = 0 ;
132 PSN.lowLongOfPSN = kCurrentProcess ;
133 SetFrontProcess( &PSN ) ;
134 return noErr ;
519cb848
SC
135}
136
5b781a67 137OSErr wxApp::MacHandleAEPDoc(const AppleEvent *event , AppleEvent *reply)
519cb848 138{
8461e4c2 139 return noErr ;
519cb848
SC
140}
141
5b781a67 142OSErr wxApp::MacHandleAEOApp(const AppleEvent *event , AppleEvent *reply)
519cb848 143{
8461e4c2 144 return noErr ;
519cb848
SC
145}
146
5b781a67 147OSErr wxApp::MacHandleAEQuit(const AppleEvent *event , AppleEvent *reply)
519cb848 148{
8461e4c2
VZ
149 wxWindow* win = GetTopWindow() ;
150 if ( win )
151 {
152 win->Close(TRUE ) ;
153 }
154 else
155 {
156 ExitMainLoop() ;
157 }
158 return noErr ;
519cb848
SC
159}
160
8461e4c2
VZ
161char StringMac[] = "\x0d\x80\x81\x82\x83\x84\x85\x86\x87\x88\x89\x8a\x8b\x8c\x8d\x8e\x8f"
162 "\x90\x91\x92\x93\x94\x95\x96\x97\x98\x99\x9a\x9b\x9c\x9d\x9e\x9f"
163 "\xa0\xa1\xa2\xa3\xa4\xa5\xa6\xa7\xa8\xa9\xaa\xab\xac\xae\xaf"
164 "\xb1\xb4\xb5\xb6\xbb\xbc\xbe\xbf"
165 "\xc0\xc1\xc2\xc4\xc7\xc8\xc9\xcb\xcc\xcd\xce\xcf"
166 "\xd0\xd1\xd2\xd3\xd4\xd5\xd6\xd8\xca\xdb" ;
519cb848 167
2f1ae414 168char StringANSI[] = "\x0a\xC4\xC5\xC7\xC9\xD1\xD6\xDC\xE1\xE0\xE2\xE4\xE3\xE5\xE7\xE9\xE8"
8461e4c2
VZ
169 "\xEA\xEB\xED\xEC\xEE\xEF\xF1\xF3\xF2\xF4\xF6\xF5\xFA\xF9\xFB\xFC"
170 "\x86\xBA\xA2\xA3\xA7\x95\xB6\xDF\xAE\xA9\x99\xB4\xA8\xC6\xD8"
171 "\xB1\xA5\xB5\xF0\xAA\xBA\xE6\xF8"
172 "\xBF\xA1\xAC\x83\xAB\xBB\x85\xC0\xC3\xD5\x8C\x9C"
173 "\x96\x97\x93\x94\x91\x92\xF7\xFF\xA0\x80" ;
519cb848
SC
174
175void wxMacConvertFromPC( const char *from , char *to , int len )
176{
8461e4c2
VZ
177 char *c ;
178 if ( from == to )
179 {
180 for( int i = 0 ; i < len ; ++ i )
181 {
182 c = strchr( StringANSI , *from ) ;
183 if ( c != NULL )
184 {
185 *to = StringMac[ c - StringANSI] ;
186 }
187 ++to ;
188 ++from ;
189 }
190 }
191 else
192 {
193 for( int i = 0 ; i < len ; ++ i )
194 {
195 c = strchr( StringANSI , *from ) ;
196 if ( c != NULL )
197 {
198 *to = StringMac[ c - StringANSI] ;
199 }
200 else
201 {
202 *to = *from ;
203 }
204 ++to ;
205 ++from ;
206 }
207 }
519cb848
SC
208}
209
210void wxMacConvertToPC( const char *from , char *to , int len )
211{
8461e4c2
VZ
212 char *c ;
213 if ( from == to )
214 {
215 for( int i = 0 ; i < len ; ++ i )
216 {
217 c = strchr( StringMac , *from ) ;
218 if ( c != NULL )
219 {
220 *to = StringANSI[ c - StringMac] ;
221 }
222 ++to ;
223 ++from ;
224 }
225 }
226 else
227 {
228 for( int i = 0 ; i < len ; ++ i )
229 {
230 c = strchr( StringMac , *from ) ;
231 if ( c != NULL )
232 {
233 *to = StringANSI[ c - StringMac] ;
234 }
235 else
236 {
237 *to = *from ;
238 }
239 ++to ;
240 ++from ;
241 }
242 }
519cb848
SC
243}
244
9779893b 245void wxMacConvertFromPC( char * p )
519cb848 246{
8461e4c2
VZ
247 char *ptr = p ;
248 int len = strlen ( p ) ;
9779893b 249
8461e4c2 250 wxMacConvertFromPC( ptr , ptr , len ) ;
519cb848
SC
251}
252
9779893b 253void wxMacConvertFromPCForControls( char * p )
519cb848 254{
8461e4c2
VZ
255 char *ptr = p ;
256 int len = strlen ( p ) ;
257
258 wxMacConvertFromPC( ptr , ptr , len ) ;
259 for ( int i = 0 ; i < strlen ( ptr ) ; i++ )
260 {
261 if ( ptr[i] == '&' && ptr[i]+1 != ' ' )
262 {
263 memmove( &ptr[i] , &ptr[i+1] , strlen( &ptr[i+1] ) + 1) ;
264 }
265 }
519cb848
SC
266}
267
9779893b 268void wxMacConvertFromPC( unsigned char *p )
519cb848 269{
8461e4c2
VZ
270 char *ptr = (char*) p + 1 ;
271 int len = p[0] ;
9779893b 272
8461e4c2 273 wxMacConvertFromPC( ptr , ptr , len ) ;
519cb848
SC
274}
275
276extern char *wxBuffer ;
277
9779893b 278wxString wxMacMakeMacStringFromPC( const char * p )
519cb848 279{
8461e4c2
VZ
280 const char *ptr = p ;
281 int len = strlen ( p ) ;
282 char *buf = wxBuffer ;
283
284 if ( len >= BUFSIZ + 512 )
285 {
286 buf = new char [len+1] ;
287 }
288
289 wxMacConvertFromPC( ptr , buf , len ) ;
290 buf[len] = 0 ;
291 wxString result( buf ) ;
292 if ( buf != wxBuffer )
293 delete buf ;
294 return result ;
519cb848
SC
295}
296
297
9779893b 298void wxMacConvertToPC( char * p )
519cb848 299{
8461e4c2
VZ
300 char *ptr = p ;
301 int len = strlen ( p ) ;
9779893b 302
8461e4c2 303 wxMacConvertToPC( ptr , ptr , len ) ;
519cb848
SC
304}
305
9779893b 306void wxMacConvertToPC( unsigned char *p )
519cb848 307{
8461e4c2
VZ
308 char *ptr = (char*) p + 1 ;
309 int len = p[0] ;
9779893b 310
8461e4c2 311 wxMacConvertToPC( ptr , ptr , len ) ;
519cb848
SC
312}
313
9779893b 314wxString wxMacMakePCStringFromMac( const char * p )
519cb848 315{
8461e4c2
VZ
316 const char *ptr = p ;
317 int len = strlen ( p ) ;
318 char *buf = wxBuffer ;
319
320 if ( len >= BUFSIZ + 512 )
321 {
322 buf = new char [len+1] ;
323 }
324
325 wxMacConvertToPC( ptr , buf , len ) ;
326 buf[len] = 0 ;
327
328 wxString result( buf ) ;
329 if ( buf != wxBuffer )
330 delete buf ;
331 return result ;
519cb848 332}
169935ad 333
8461e4c2 334wxString wxMacMakeStringFromMacString( const char* from , bool mac2pcEncoding )
3d2791f1 335{
8461e4c2
VZ
336 if (mac2pcEncoding)
337 {
338 return wxMacMakePCStringFromMac( from ) ;
339 }
340 else
341 {
342 return wxString( from ) ;
343 }
3d2791f1
SC
344}
345
8461e4c2 346wxString wxMacMakeStringFromPascal( StringPtr from , bool mac2pcEncoding )
3d2791f1
SC
347{
348 // this is safe since a pascal string can never be larger than 256 bytes
349 char s[256] ;
350 CopyPascalStringToC( from , s ) ;
8461e4c2
VZ
351 if (mac2pcEncoding)
352 {
353 return wxMacMakePCStringFromMac( s ) ;
354 }
355 else
356 {
357 return wxString( s ) ;
358 }
3d2791f1
SC
359}
360
8461e4c2 361void wxMacStringToPascal( const char * from , StringPtr to , bool pc2macEncoding )
3d2791f1 362{
8461e4c2
VZ
363 if (pc2macEncoding)
364 {
365 CopyCStringToPascal( wxMacMakeMacStringFromPC( from ) , to ) ;
366 }
367 else
368 {
369 CopyCStringToPascal( from , to ) ;
370 }
3d2791f1 371}
e9576ca5
SC
372
373bool wxApp::Initialize()
374{
169935ad 375 int error = 0 ;
9779893b 376
8be97d65 377 // Mac-specific
9779893b 378
519cb848 379 UMAInitToolbox( 4 ) ;
0a67a93b 380 SetEventMask( everyEvent ) ;
8461e4c2 381 UMAShowWatchCursor() ;
8be97d65 382
4114d0af
GD
383#if defined(UNIVERSAL_INTERFACES_VERSION) && (UNIVERSAL_INTERFACES_VERSION >= 0x0340)
384 AEInstallEventHandler( kCoreEventClass , kAEOpenDocuments , NewAEEventHandlerUPP(AEHandleODoc) ,
03e11df5 385 (long) wxTheApp , FALSE ) ;
4114d0af 386 AEInstallEventHandler( kCoreEventClass , kAEOpenApplication , NewAEEventHandlerUPP(AEHandleOApp) ,
03e11df5 387 (long) wxTheApp , FALSE ) ;
4114d0af 388 AEInstallEventHandler( kCoreEventClass , kAEPrintDocuments , NewAEEventHandlerUPP(AEHandlePDoc) ,
03e11df5 389 (long) wxTheApp , FALSE ) ;
4114d0af 390 AEInstallEventHandler( kCoreEventClass , kAEQuitApplication , NewAEEventHandlerUPP(AEHandleQuit) ,
03e11df5
GD
391 (long) wxTheApp , FALSE ) ;
392#else
8461e4c2
VZ
393 AEInstallEventHandler( kCoreEventClass , kAEOpenDocuments , NewAEEventHandlerProc(AEHandleODoc) ,
394 (long) wxTheApp , FALSE ) ;
395 AEInstallEventHandler( kCoreEventClass , kAEOpenApplication , NewAEEventHandlerProc(AEHandleOApp) ,
396 (long) wxTheApp , FALSE ) ;
397 AEInstallEventHandler( kCoreEventClass , kAEPrintDocuments , NewAEEventHandlerProc(AEHandlePDoc) ,
398 (long) wxTheApp , FALSE ) ;
399 AEInstallEventHandler( kCoreEventClass , kAEQuitApplication , NewAEEventHandlerProc(AEHandleQuit) ,
400 (long) wxTheApp , FALSE ) ;
03e11df5 401#endif
8be97d65 402
9779893b 403
f5c6eb5c 404#ifndef __DARWIN__
8be97d65
SC
405 // test the minimal configuration necessary
406
8461e4c2
VZ
407 #if !TARGET_CARBON
408 long theSystem ;
409 long theMachine;
410
411 if (Gestalt(gestaltMachineType, &theMachine) != noErr)
412 {
413 error = kMacSTRWrongMachine;
414 }
415 else if (theMachine < gestaltMacPlus)
416 {
417 error = kMacSTRWrongMachine;
418 }
419 else if (Gestalt(gestaltSystemVersion, &theSystem) != noErr )
420 {
421 error = kMacSTROldSystem ;
422 }
72055702 423 else if ( theSystem < 0x0860 )
8461e4c2
VZ
424 {
425 error = kMacSTROldSystem ;
426 }
427 else if ((long)GetApplLimit() - (long)ApplicationZone() < kMacMinHeap)
428 {
429 error = kMacSTRSmallSize;
430 }
431 #endif
432 /*
433 else
434 {
435 if ( !UMAHasAppearance() )
436 {
437 error = kMacSTRNoPre8Yet ;
438 }
439 }
440 */
ed5b9811 441#endif
8be97d65 442
8461e4c2 443 // if we encountered any problems so far, give the error code and exit immediately
9779893b 444
169935ad 445 if ( error )
9779893b 446 {
8461e4c2
VZ
447 short itemHit;
448 Str255 message;
449
450 GetIndString(message, 128, error);
451 UMAShowArrowCursor() ;
452 ParamText("\pFatal Error", message, (ConstStr255Param)"\p", (ConstStr255Param)"\p");
453 itemHit = Alert(128, nil);
454 return FALSE ;
9779893b 455 }
519cb848 456
f5c6eb5c 457#ifndef __DARWIN__
03e11df5 458 #if __option(profile)
8461e4c2 459 ProfilerInit( collectDetailed, bestTimeBase , 20000 , 40 ) ;
03e11df5 460 #endif
9779893b 461#endif
519cb848 462
8be97d65 463 // now avoid exceptions thrown for new (bad_alloc)
9779893b 464
f5c6eb5c 465#ifndef __DARWIN__
8be97d65 466 std::__throws_bad_alloc = FALSE ;
03e11df5 467#endif
9779893b 468
8461e4c2 469 s_macCursorRgn = ::NewRgn() ;
8be97d65 470
e9576ca5
SC
471#ifdef __WXMSW__
472 wxBuffer = new char[1500];
473#else
474 wxBuffer = new char[BUFSIZ + 512];
475#endif
476
2f1ae414 477 wxClassInfo::InitializeClasses();
e9576ca5 478
2f1ae414
SC
479#if wxUSE_RESOURCES
480// wxGetResource(wxT("wxWindows"), wxT("OsVersion"), &wxOsVersion);
e9576ca5 481#endif
e9576ca5 482
2f1ae414
SC
483#if wxUSE_THREADS
484 wxPendingEventsLocker = new wxCriticalSection;
485#endif
e9576ca5
SC
486 wxTheColourDatabase = new wxColourDatabase(wxKEY_STRING);
487 wxTheColourDatabase->Initialize();
488
fc0daf84 489#ifdef __WXDEBUG__
0a67a93b
SC
490#if wxUSE_LOG
491 // flush the logged messages if any and install a 'safer' log target: the
492 // default one (wxLogGui) can't be used after the resources are freed just
493 // below and the user suppliedo ne might be even more unsafe (using any
494 // wxWindows GUI function is unsafe starting from now)
495 wxLog::DontCreateOnDemand();
496
497 // this will flush the old messages if any
498 delete wxLog::SetActiveTarget(new wxLogStderr);
499#endif // wxUSE_LOG
fc0daf84 500#endif
0a67a93b 501
e9576ca5
SC
502 wxInitializeStockLists();
503 wxInitializeStockObjects();
504
505#if wxUSE_WX_RESOURCES
506 wxInitializeResourceSystem();
507#endif
508
509 wxBitmap::InitStandardHandlers();
510
511 wxModule::RegisterModules();
03e11df5 512 if (!wxModule::InitializeModules()) {
519cb848 513 return FALSE;
03e11df5 514 }
e9576ca5 515
519cb848
SC
516 wxWinMacWindowList = new wxList(wxKEY_INTEGER);
517 wxWinMacControlList = new wxList(wxKEY_INTEGER);
518
2f1ae414 519 wxMacCreateNotifierTable() ;
9779893b 520
2f1ae414 521 UMAShowArrowCursor() ;
8461e4c2 522
e9576ca5
SC
523 return TRUE;
524}
525
526void wxApp::CleanUp()
527{
2f1ae414
SC
528#if wxUSE_LOG
529 // flush the logged messages if any and install a 'safer' log target: the
530 // default one (wxLogGui) can't be used after the resources are freed just
531 // below and the user suppliedo ne might be even more unsafe (using any
532 // wxWindows GUI function is unsafe starting from now)
533 wxLog::DontCreateOnDemand();
534
535 // this will flush the old messages if any
536 delete wxLog::SetActiveTarget(new wxLogStderr);
537#endif // wxUSE_LOG
538
539 // One last chance for pending objects to be cleaned up
540 wxTheApp->DeletePendingObjects();
541
e9576ca5
SC
542 wxModule::CleanUpModules();
543
544#if wxUSE_WX_RESOURCES
545 wxCleanUpResourceSystem();
546#endif
547
548 wxDeleteStockObjects() ;
549
2f1ae414
SC
550 // Destroy all GDI lists, etc.
551 wxDeleteStockLists();
e9576ca5
SC
552
553 delete wxTheColourDatabase;
554 wxTheColourDatabase = NULL;
555
556 wxBitmap::CleanUpHandlers();
557
558 delete[] wxBuffer;
559 wxBuffer = NULL;
560
2f1ae414 561 wxMacDestroyNotifierTable() ;
519cb848
SC
562 if (wxWinMacWindowList)
563 delete wxWinMacWindowList ;
564
2f1ae414
SC
565 delete wxPendingEvents;
566#if wxUSE_THREADS
567 delete wxPendingEventsLocker;
568 // If we don't do the following, we get an apparent memory leak.
569 ((wxEvtHandler&) wxDefaultValidator).ClearEventLocker();
570#endif
571
e9576ca5
SC
572 wxClassInfo::CleanUpClasses();
573
f5c6eb5c 574#ifndef __DARWIN__
03e11df5
GD
575 #if __option(profile)
576 ProfilerDump( "\papp.prof" ) ;
577 ProfilerTerm() ;
578 #endif
9779893b 579#endif
519cb848 580
e9576ca5
SC
581 delete wxTheApp;
582 wxTheApp = NULL;
9779893b 583
e9576ca5 584#if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
2f1ae414
SC
585 // At this point we want to check if there are any memory
586 // blocks that aren't part of the wxDebugContext itself,
587 // as a special case. Then when dumping we need to ignore
588 // wxDebugContext, too.
589 if (wxDebugContext::CountObjectsLeft(TRUE) > 0)
590 {
591 wxLogDebug(wxT("There were memory leaks."));
592 wxDebugContext::Dump();
593 wxDebugContext::PrintStatistics();
594 }
595 // wxDebugContext::SetStream(NULL, NULL);
e9576ca5 596#endif
9779893b 597
2f1ae414
SC
598#if wxUSE_LOG
599 // do it as the very last thing because everything else can log messages
600 delete wxLog::SetActiveTarget(NULL);
601#endif // wxUSE_LOG
169935ad 602
8461e4c2
VZ
603 UMACleanupToolbox() ;
604 if (s_macCursorRgn)
605 ::DisposeRgn(s_macCursorRgn);
2f1ae414 606
8461e4c2
VZ
607 #if 0
608 TerminateAE() ;
609 #endif
e9576ca5
SC
610}
611
92b002a4
RD
612//----------------------------------------------------------------------
613// wxEntry
614//----------------------------------------------------------------------
615
616int wxEntryStart( int argc, char *argv[] )
617{
618 return wxApp::Initialize();
619}
620
621
622int wxEntryInitGui()
623{
624 return wxTheApp->OnInitGui();
625}
626
627
628void wxEntryCleanup()
629{
630 wxApp::CleanUp();
631}
632
633
2f1ae414 634int wxEntry( int argc, char *argv[] , bool enterLoop )
e9576ca5 635{
7c551d95
SC
636#ifdef __MWERKS__
637#if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
638 // This seems to be necessary since there are 'rogue'
639 // objects present at this point (perhaps global objects?)
640 // Setting a checkpoint will ignore them as far as the
641 // memory checking facility is concerned.
642 // Of course you may argue that memory allocated in globals should be
643 // checked, but this is a reasonable compromise.
644 wxDebugContext::SetCheckpoint();
645#endif
646#endif
92b002a4 647 if (!wxEntryStart(argc, argv)) {
2f1ae414 648 return 0;
03e11df5 649 }
2f1ae414
SC
650 // create the application object or ensure that one already exists
651 if (!wxTheApp)
e9576ca5 652 {
2f1ae414
SC
653 // The app may have declared a global application object, but we recommend
654 // the IMPLEMENT_APP macro is used instead, which sets an initializer
655 // function for delayed, dynamic app object construction.
656 wxCHECK_MSG( wxApp::GetInitializerFunction(), 0,
657 wxT("No initializer - use IMPLEMENT_APP macro.") );
9779893b 658
2f1ae414
SC
659 wxTheApp = (wxApp*) (*wxApp::GetInitializerFunction()) ();
660 }
9779893b 661
2f1ae414 662 wxCHECK_MSG( wxTheApp, 0, wxT("You have to define an instance of wxApp!") );
e9576ca5 663
519cb848 664#ifdef __WXMAC__
2f1ae414 665 argc = 0 ; // currently we don't support files as parameters
519cb848
SC
666#endif
667
e9576ca5
SC
668 wxTheApp->argc = argc;
669 wxTheApp->argv = argv;
670
671 // GUI-specific initialization, such as creating an app context.
92b002a4 672 wxEntryInitGui();
9779893b 673
519cb848 674 // we could try to get the open apple events here to adjust argc and argv better
9779893b 675
e9576ca5
SC
676
677 // Here frames insert themselves automatically
678 // into wxTopLevelWindows by getting created
679 // in OnInit().
9779893b 680
e9576ca5 681 int retValue = 0;
9779893b 682
8461e4c2
VZ
683 if ( wxTheApp->OnInit() )
684 {
685 if ( enterLoop )
686 {
687 retValue = wxTheApp->OnRun();
688 }
689 else
690 // We want to initialize, but not run or exit immediately.
691 return 1;
692 }
693 //else: app initialization failed, so we skipped OnRun()
694
695 wxWindow *topWindow = wxTheApp->GetTopWindow();
696 if ( topWindow )
697 {
698 // Forcibly delete the window.
699 if ( topWindow->IsKindOf(CLASSINFO(wxFrame)) ||
700 topWindow->IsKindOf(CLASSINFO(wxDialog)) )
701 {
702 topWindow->Close(TRUE);
703 wxTheApp->DeletePendingObjects();
704 }
705 else
706 {
707 delete topWindow;
708 wxTheApp->SetTopWindow(NULL);
709 }
710 }
711
712 wxTheApp->OnExit();
713
92b002a4 714 wxEntryCleanup();
8461e4c2
VZ
715
716 return retValue;
03e11df5 717}
e9576ca5
SC
718
719// Static member initialization
2f1ae414 720wxAppInitializerFunction wxAppBase::m_appInitFn = (wxAppInitializerFunction) NULL;
e9576ca5
SC
721
722wxApp::wxApp()
723{
724 m_topWindow = NULL;
725 wxTheApp = this;
2f1ae414 726
e9576ca5 727 m_wantDebugOutput = TRUE ;
2f1ae414 728
e9576ca5
SC
729 argc = 0;
730 argv = NULL;
519cb848 731
e9576ca5 732 m_printMode = wxPRINT_WINDOWS;
e9576ca5
SC
733 m_exitOnFrameDelete = TRUE;
734 m_auto3D = TRUE;
735}
736
737bool wxApp::Initialized()
738{
519cb848 739 if (GetTopWindow())
e9576ca5 740 return TRUE;
519cb848
SC
741 else
742 return FALSE;
e9576ca5
SC
743}
744
745int wxApp::MainLoop()
746{
747 m_keepGoing = TRUE;
748
e9576ca5
SC
749 while (m_keepGoing)
750 {
8461e4c2 751 MacDoOneEvent() ;
e9576ca5 752 }
e9576ca5
SC
753
754 return 0;
755}
756
757// Returns TRUE if more time is needed.
758bool wxApp::ProcessIdle()
759{
760 wxIdleEvent event;
761 event.SetEventObject(this);
762 ProcessEvent(event);
763
764 return event.MoreRequested();
765}
766
767void wxApp::ExitMainLoop()
768{
769 m_keepGoing = FALSE;
770}
771
772// Is a message/event pending?
773bool wxApp::Pending()
774{
8461e4c2 775 EventRecord event ;
519cb848
SC
776
777 return EventAvail( everyEvent , &event ) ;
e9576ca5
SC
778}
779
780// Dispatch a message.
781void wxApp::Dispatch()
782{
8461e4c2 783 MacDoOneEvent() ;
e9576ca5
SC
784}
785
786void wxApp::OnIdle(wxIdleEvent& event)
787{
2f1ae414 788 static bool s_inOnIdle = FALSE;
e9576ca5 789
2f1ae414
SC
790 // Avoid recursion (via ProcessEvent default case)
791 if ( s_inOnIdle )
792 return;
e9576ca5 793
2f1ae414
SC
794
795 s_inOnIdle = TRUE;
e9576ca5
SC
796
797 // 'Garbage' collection of windows deleted with Close().
798 DeletePendingObjects();
799
800 // flush the logged messages if any
801 wxLog *pLog = wxLog::GetActiveTarget();
802 if ( pLog != NULL && pLog->HasPendingMessages() )
803 pLog->Flush();
804
805 // Send OnIdle events to all windows
806 bool needMore = SendIdleEvents();
807
808 if (needMore)
809 event.RequestMore(TRUE);
810
2f1ae414
SC
811 // If they are pending events, we must process them: pending events are
812 // either events to the threads other than main or events posted with
813 // wxPostEvent() functions
814 wxMacProcessNotifierAndPendingEvents();
815
816 s_inOnIdle = FALSE;
e9576ca5
SC
817}
818
9779893b
RD
819void wxWakeUpIdle()
820{
8461e4c2 821 wxMacWakeUp() ;
9779893b
RD
822}
823
e9576ca5
SC
824// Send idle event to all top-level windows
825bool wxApp::SendIdleEvents()
826{
827 bool needMore = FALSE;
8461e4c2
VZ
828 wxNode* node = wxTopLevelWindows.First();
829 while (node)
830 {
831 wxWindow* win = (wxWindow*) node->Data();
832 if (SendIdleEvents(win))
e9576ca5
SC
833 needMore = TRUE;
834
8461e4c2
VZ
835 node = node->Next();
836 }
e9576ca5
SC
837 return needMore;
838}
839
840// Send idle event to window and all subwindows
841bool wxApp::SendIdleEvents(wxWindow* win)
842{
843 bool needMore = FALSE;
844
8461e4c2
VZ
845 wxIdleEvent event;
846 event.SetEventObject(win);
847 win->ProcessEvent(event);
e9576ca5
SC
848
849 if (event.MoreRequested())
850 needMore = TRUE;
851
8461e4c2
VZ
852 wxNode* node = win->GetChildren().First();
853 while (node)
854 {
855 wxWindow* win = (wxWindow*) node->Data();
856 if (SendIdleEvents(win))
e9576ca5
SC
857 needMore = TRUE;
858
8461e4c2
VZ
859 node = node->Next();
860 }
e9576ca5
SC
861 return needMore ;
862}
863
864void wxApp::DeletePendingObjects()
865{
866 wxNode *node = wxPendingDelete.First();
867 while (node)
868 {
869 wxObject *obj = (wxObject *)node->Data();
9779893b 870
e9576ca5
SC
871 delete obj;
872
873 if (wxPendingDelete.Member(obj))
874 delete node;
875
876 // Deleting one object may have deleted other pending
877 // objects, so start from beginning of list again.
878 node = wxPendingDelete.First();
879 }
880}
881
2f1ae414
SC
882wxIcon
883wxApp::GetStdIcon(int which) const
e9576ca5 884{
2f1ae414
SC
885 switch(which)
886 {
887 case wxICON_INFORMATION:
888 return wxIcon("wxICON_INFO");
e9576ca5 889
2f1ae414
SC
890 case wxICON_QUESTION:
891 return wxIcon("wxICON_QUESTION");
892
893 case wxICON_EXCLAMATION:
894 return wxIcon("wxICON_WARNING");
895
896 default:
897 wxFAIL_MSG(wxT("requested non existent standard icon"));
898 // still fall through
899
900 case wxICON_HAND:
901 return wxIcon("wxICON_ERROR");
902 }
e9576ca5
SC
903}
904
905void wxExit()
906{
2f1ae414
SC
907 wxLogError(_("Fatal error: exiting"));
908
909 wxApp::CleanUp();
8461e4c2 910 ::ExitToShell() ;
e9576ca5
SC
911}
912
2f1ae414
SC
913void wxApp::OnEndSession(wxCloseEvent& WXUNUSED(event))
914{
915 if (GetTopWindow())
916 GetTopWindow()->Close(TRUE);
917}
918
919// Default behaviour: close the application with prompts. The
920// user can veto the close, and therefore the end session.
921void wxApp::OnQueryEndSession(wxCloseEvent& event)
922{
923 if (GetTopWindow())
924 {
925 if (!GetTopWindow()->Close(!event.CanVeto()))
926 event.Veto(TRUE);
927 }
928}
929
930extern "C" void wxCYield() ;
931void wxCYield()
932{
8461e4c2 933 wxYield() ;
2f1ae414
SC
934}
935
e9576ca5 936// Yield to other processes
cb2713bf 937
8461e4c2 938bool wxApp::Yield(bool onlyIfNeeded)
e9576ca5 939{
8461e4c2
VZ
940 static bool s_inYield = FALSE;
941
942 if (s_inYield)
943 {
944 if ( !onlyIfNeeded )
945 {
946 wxFAIL_MSG( wxT("wxYield called recursively" ) );
947 }
948
949 return FALSE;
950 }
951
952 s_inYield = TRUE;
cb2713bf 953
2f1ae414 954#if wxUSE_THREADS
cb2713bf 955 YieldToAnyThread() ;
2f1ae414 956#endif
cb2713bf 957 EventRecord event ;
2f1ae414 958
8461e4c2 959 long sleepTime = 1 ; //::GetCaretTime();
2f1ae414 960
8461e4c2
VZ
961 while ( !wxTheApp->IsExiting() && WaitNextEvent(everyEvent, &event,sleepTime, wxApp::s_macCursorRgn))
962 {
963 wxTheApp->MacHandleOneEvent( &event );
964 if ( event.what != kHighLevelEvent )
965 SetRectRgn( wxApp::s_macCursorRgn , event.where.h , event.where.v , event.where.h + 1 , event.where.v + 1 ) ;
966 }
2f1ae414 967
8461e4c2 968 wxMacProcessNotifierAndPendingEvents() ;
cb2713bf 969
8461e4c2 970 s_inYield = FALSE;
cb2713bf 971
8461e4c2 972 return TRUE;
169935ad
SC
973}
974
9779893b 975// platform specifics
169935ad 976
519cb848
SC
977void wxApp::MacSuspend( bool convertClipboard )
978{
8461e4c2
VZ
979 // we have to deactive the window manually
980
981 wxWindow* window = GetTopWindow() ;
982 if ( window )
983 window->MacActivate( MacGetCurrentEvent() , false ) ;
984
985 s_lastMouseDown = 0 ;
986 if( convertClipboard )
987 {
988 MacConvertPrivateToPublicScrap() ;
989 }
990
72055702 991 ::HideFloatingWindows() ;
519cb848
SC
992}
993
994void wxApp::MacResume( bool convertClipboard )
995{
8461e4c2
VZ
996 s_lastMouseDown = 0 ;
997 if( convertClipboard )
998 {
999 MacConvertPublicToPrivateScrap() ;
1000 }
9779893b 1001
72055702 1002 ::ShowFloatingWindows() ;
519cb848
SC
1003}
1004
1005void wxApp::MacConvertPrivateToPublicScrap()
1006{
519cb848
SC
1007}
1008
1009void wxApp::MacConvertPublicToPrivateScrap()
1010{
519cb848
SC
1011}
1012
9779893b 1013void wxApp::MacDoOneEvent()
169935ad
SC
1014{
1015 EventRecord event ;
1016
8461e4c2 1017 long sleepTime = 1 ; // GetCaretTime() / 4 ;
169935ad 1018
8461e4c2
VZ
1019 if (WaitNextEvent(everyEvent, &event,sleepTime, s_macCursorRgn))
1020 {
8be97d65 1021 MacHandleOneEvent( &event );
8461e4c2
VZ
1022 }
1023 else
1024 {
1025 // idlers
72055702 1026 WindowPtr window = ::FrontWindow() ;
8461e4c2 1027 if ( window )
72055702 1028 ::IdleControls( window ) ;
9779893b 1029
8461e4c2
VZ
1030 wxTheApp->ProcessIdle() ;
1031 }
1032 if ( event.what != kHighLevelEvent )
1033 SetRectRgn( s_macCursorRgn , event.where.h , event.where.v , event.where.h + 1 , event.where.v + 1 ) ;
519cb848 1034
8461e4c2 1035 // repeaters
519cb848 1036
0a67a93b 1037 DeletePendingObjects() ;
8461e4c2 1038 wxMacProcessNotifierAndPendingEvents() ;
169935ad
SC
1039}
1040
9779893b 1041void wxApp::MacHandleOneEvent( EventRecord *ev )
169935ad 1042{
8461e4c2
VZ
1043 m_macCurrentEvent = ev ;
1044
1045 wxApp::sm_lastMessageTime = ev->when ;
1046
1047 switch (ev->what)
1048 {
1049 case mouseDown:
1050 MacHandleMouseDownEvent( ev ) ;
1051 if ( ev->modifiers & controlKey )
1052 s_lastMouseDown = 2;
1053 else
1054 s_lastMouseDown = 1;
1055 break;
1056 case mouseUp:
1057 if ( s_lastMouseDown == 2 )
1058 {
1059 ev->modifiers |= controlKey ;
1060 }
1061 else
1062 {
1063 ev->modifiers &= ~controlKey ;
1064 }
1065 MacHandleMouseUpEvent( ev ) ;
1066 s_lastMouseDown = 0;
1067 break;
1068 case activateEvt:
1069 MacHandleActivateEvent( ev ) ;
1070 break;
1071 case updateEvt:
1072 MacHandleUpdateEvent( ev ) ;
1073 break;
1074 case keyDown:
1075 case autoKey:
1076 MacHandleKeyDownEvent( ev ) ;
1077 break;
1078 case keyUp:
1079 MacHandleKeyUpEvent( ev ) ;
1080 break;
1081 case diskEvt:
1082 MacHandleDiskEvent( ev ) ;
1083 break;
1084 case osEvt:
1085 MacHandleOSEvent( ev ) ;
1086 break;
1087 case kHighLevelEvent:
1088 MacHandleHighLevelEvent( ev ) ;
1089 break;
1090 default:
1091 break;
1092 }
1093 wxMacProcessNotifierAndPendingEvents() ;
169935ad
SC
1094}
1095
8be97d65 1096void wxApp::MacHandleHighLevelEvent( EventRecord *ev )
169935ad 1097{
8461e4c2 1098 ::AEProcessAppleEvent( ev ) ;
169935ad
SC
1099}
1100
519cb848
SC
1101bool s_macIsInModalLoop = false ;
1102
8be97d65 1103void wxApp::MacHandleMouseDownEvent( EventRecord *ev )
169935ad 1104{
8461e4c2 1105 wxToolTip::RemoveToolTips() ;
2f1ae414 1106
8461e4c2 1107 WindowRef window;
72055702 1108 WindowRef frontWindow = ::FrontNonFloatingWindow() ;
8461e4c2
VZ
1109 WindowAttributes frontWindowAttributes = NULL ;
1110 if ( frontWindow )
72055702 1111 ::GetWindowAttributes( frontWindow , &frontWindowAttributes ) ;
9779893b 1112
8461e4c2
VZ
1113 short windowPart = ::FindWindow(ev->where, &window);
1114 wxWindow* win = wxFindWinFromMacWindow( window ) ;
0a67a93b
SC
1115 if ( wxPendingDelete.Member(win) )
1116 return ;
9779893b 1117
8461e4c2
VZ
1118 BitMap screenBits;
1119 GetQDGlobalsScreenBits( &screenBits );
1120
1121 switch (windowPart)
1122 {
1123 case inMenuBar :
1124 if ( s_macIsInModalLoop )
1125 {
1126 SysBeep ( 30 ) ;
1127 }
1128 else
1129 {
1130 UInt32 menuresult = MenuSelect(ev->where) ;
1131 MacHandleMenuSelect( HiWord( menuresult ) , LoWord( menuresult ) );
1132 s_lastMouseDown = 0;
1133 }
1134 break ;
2f1ae414 1135#if !TARGET_CARBON
8461e4c2
VZ
1136 case inSysWindow :
1137 SystemClick( ev , window ) ;
1138 s_lastMouseDown = 0;
1139 break ;
2f1ae414 1140#endif
8461e4c2
VZ
1141 case inDrag :
1142 if ( window != frontWindow && s_macIsInModalLoop && !(ev->modifiers & cmdKey ) )
1143 {
1144 SysBeep ( 30 ) ;
1145 }
1146 else
1147 {
1148 DragWindow(window, ev->where, &screenBits.bounds);
1149 if (win)
1150 {
1151 GrafPtr port ;
1152 GetPort( &port ) ;
1153 Point pt = { 0, 0 } ;
1154 #if TARGET_CARBON
1155 SetPort( GetWindowPort(window) ) ;
1156 #else
1157 SetPort( (window) ) ;
1158 #endif
1159 SetOrigin( 0 , 0 ) ;
1160 LocalToGlobal( &pt ) ;
1161 SetPort( port ) ;
1162 win->SetSize( pt.h , pt.v , -1 ,
1163 -1 , wxSIZE_USE_EXISTING);
1164 }
1165 s_lastMouseDown = 0;
1166 }
1167 break ;
1168 case inGoAway:
1169 if (TrackGoAway(window, ev->where))
1170 {
1171 if ( win )
1172 win->Close() ;
1173 }
1174 s_lastMouseDown = 0;
1175 break;
1176 case inGrow:
1177 {
1178 int growResult = GrowWindow(window , ev->where, &screenBits.bounds);
1179 if (growResult != 0)
1180 {
1181 int newWidth = LoWord(growResult);
1182 int newHeight = HiWord(growResult);
1183 int oldWidth, oldHeight;
1184
1185
1186 if (win)
1187 {
1188 win->GetSize(&oldWidth, &oldHeight);
1189 if (newWidth == 0)
1190 newWidth = oldWidth;
1191 if (newHeight == 0)
1192 newHeight = oldHeight;
1193 win->SetSize( -1, -1, newWidth, newHeight, wxSIZE_USE_EXISTING);
1194 }
1195 }
1196 s_lastMouseDown = 0;
1197 }
1198 break;
1199 case inZoomIn:
1200 case inZoomOut:
1201 if (TrackBox(window, ev->where, windowPart))
1202 {
1203 // TODO setup size event
1204 ZoomWindow( window , windowPart , false ) ;
1205 if (win)
1206 {
1207 Rect tempRect ;
1208
1209 GetWindowPortBounds(window, &tempRect ) ;
1210 win->SetSize( -1, -1, tempRect.right-tempRect.left ,
1211 tempRect.bottom-tempRect.top, wxSIZE_USE_EXISTING);
1212 }
1213 }
1214 s_lastMouseDown = 0;
1215 break;
1216 case inCollapseBox :
1217 // TODO setup size event
1218 s_lastMouseDown = 0;
1219 break ;
1220
1221 case inContent :
1222 {
1223 GrafPtr port ;
1224 GetPort( &port ) ;
1225 #if TARGET_CARBON
1226 SetPort( GetWindowPort(window) ) ;
1227 #else
1228 SetPort( (window) ) ;
1229 #endif
1230 SetOrigin( 0 , 0 ) ;
1231 SetPort( port ) ;
1232 }
1233 if ( window != frontWindow && wxTheApp->s_captureWindow == NULL )
1234 {
1235 if ( s_macIsInModalLoop )
1236 {
1237 SysBeep ( 30 ) ;
1238 }
1239 else if ( UMAIsWindowFloating( window ) )
1240 {
1241 if ( win )
1242 win->MacMouseDown( ev , windowPart ) ;
1243 }
1244 else
1245 {
1246 if ( win )
1247 win->MacMouseDown( ev , windowPart ) ;
72055702 1248 ::SelectWindow( window ) ;
8461e4c2
VZ
1249 }
1250 }
1251 else
1252 {
1253 if ( win )
1254 win->MacMouseDown( ev , windowPart ) ;
1255 }
1256 break ;
1257
1258 default:
1259 break;
1260 }
169935ad
SC
1261}
1262
519cb848 1263void wxApp::MacHandleMouseUpEvent( EventRecord *ev )
169935ad 1264{
8461e4c2
VZ
1265 WindowRef window;
1266
1267 short windowPart = ::FindWindow(ev->where, &window);
1268
1269 switch (windowPart)
1270 {
1271 case inMenuBar :
1272 break ;
1273 case inSysWindow :
1274 break ;
1275 default:
1276 {
1277 wxWindow* win = wxFindWinFromMacWindow( window ) ;
1278 if ( win )
1279 win->MacMouseUp( ev , windowPart ) ;
1280 }
1281 break;
1282 }
169935ad
SC
1283}
1284
72055702 1285long wxMacTranslateKey(unsigned char key, unsigned char code) ;
7c551d95 1286long wxMacTranslateKey(unsigned char key, unsigned char code)
9779893b 1287{
8461e4c2 1288 long retval = key ;
9779893b 1289 switch (key)
519cb848 1290 {
8461e4c2
VZ
1291 case 0x01 :
1292 retval = WXK_HOME;
1293 break;
1294 case 0x03 :
1295 retval = WXK_RETURN;
1296 break;
1297 case 0x04 :
1298 retval = WXK_END;
1299 break;
1300 case 0x05 :
1301 retval = WXK_HELP;
1302 break;
1303 case 0x08 :
1304 retval = WXK_BACK;
1305 break;
1306 case 0x09 :
1307 retval = WXK_TAB;
1308 break;
1309 case 0x0b :
1310 retval = WXK_PAGEUP;
1311 break;
1312 case 0x0c :
1313 retval = WXK_PAGEDOWN;
1314 break;
1315 case 0x0d :
1316 retval = WXK_RETURN;
1317 break;
1318 case 0x10 :
1319 {
1320 switch( code )
1321 {
1322 case 0x7a :
1323 retval = WXK_F1 ;
1324 break;
1325 case 0x78 :
1326 retval = WXK_F2 ;
1327 break;
1328 case 0x63 :
1329 retval = WXK_F3 ;
1330 break;
1331 case 0x76 :
1332 retval = WXK_F4 ;
1333 break;
1334 case 0x60 :
1335 retval = WXK_F5 ;
1336 break;
1337 case 0x61 :
1338 retval = WXK_F6 ;
1339 break;
1340 case 0x62:
1341 retval = WXK_F7 ;
1342 break;
1343 case 0x64 :
1344 retval = WXK_F8 ;
1345 break;
1346 case 0x65 :
1347 retval = WXK_F9 ;
1348 break;
1349 case 0x6D :
1350 retval = WXK_F10 ;
1351 break;
1352 case 0x67 :
1353 retval = WXK_F11 ;
1354 break;
1355 case 0x6F :
1356 retval = WXK_F12 ;
1357 break;
1358 case 0x69 :
1359 retval = WXK_F13 ;
1360 break;
1361 case 0x6B :
1362 retval = WXK_F14 ;
1363 break;
1364 case 0x71 :
1365 retval = WXK_F15 ;
1366 break;
1367 }
1368 }
1369 break ;
1370 case 0x1b :
1371 retval = WXK_ESCAPE ;
1372 break ;
1373 case 0x1c :
1374 retval = WXK_LEFT ;
1375 break ;
1376 case 0x1d :
1377 retval = WXK_RIGHT ;
1378 break ;
1379 case 0x1e :
1380 retval = WXK_UP ;
1381 break ;
1382 case 0x1f :
1383 retval = WXK_DOWN ;
1384 break ;
1385 case 0x7F :
1386 retval = WXK_DELETE ;
1387 default:
1388 break ;
1389 } // end switch
1390
1391 return retval;
169935ad
SC
1392}
1393
519cb848 1394void wxApp::MacHandleKeyDownEvent( EventRecord *ev )
169935ad 1395{
8461e4c2
VZ
1396 wxToolTip::RemoveToolTips() ;
1397
1398 UInt32 menuresult = UMAMenuEvent(ev) ;
1399 if ( HiWord( menuresult ) )
1400 {
1401 if ( !s_macIsInModalLoop )
1402 MacHandleMenuSelect( HiWord( menuresult ) , LoWord( menuresult ) ) ;
1403 }
1404 else
1405 {
1406 short keycode ;
1407 short keychar ;
1408 keychar = short(ev->message & charCodeMask);
1409 keycode = short(ev->message & keyCodeMask) >> 8 ;
1410
1411 wxWindow* focus = wxWindow::FindFocus() ;
1412 if ( focus )
1413 {
1414 long keyval = wxMacTranslateKey(keychar, keycode) ;
1415
1416 wxKeyEvent event(wxEVT_KEY_DOWN);
1417 event.m_shiftDown = ev->modifiers & shiftKey;
1418 event.m_controlDown = ev->modifiers & controlKey;
1419 event.m_altDown = ev->modifiers & optionKey;
1420 event.m_metaDown = ev->modifiers & cmdKey;
1421 event.m_keyCode = keyval;
1422 event.m_x = ev->where.h;
1423 event.m_y = ev->where.v;
1424 event.m_timeStamp = ev->when;
1425 event.SetEventObject(focus);
1426 bool handled = focus->GetEventHandler()->ProcessEvent( event ) ;
1427 if ( !handled )
1428 {
1429 #if wxUSE_ACCEL
1430 if (!handled)
1431 {
1432 wxWindow *ancestor = focus;
1433 /*
1434 while (ancestor)
1435 {
1436 int command = ancestor->GetAcceleratorTable()->GetCommand( event );
1437 if (command != -1)
1438 {
1439 wxCommandEvent command_event( wxEVT_COMMAND_MENU_SELECTED, command );
1440 handled = ancestor->GetEventHandler()->ProcessEvent( command_event );
1441 break;
1442 }
1443 if (ancestor->m_isFrame)
1444 break;
1445 ancestor = ancestor->GetParent();
1446 }
1447 */
1448 }
1449 #endif // wxUSE_ACCEL
1450 }
1451 if (!handled)
1452 {
1453 wxKeyEvent event(wxEVT_CHAR);
1454 event.m_shiftDown = ev->modifiers & shiftKey;
1455 event.m_controlDown = ev->modifiers & controlKey;
1456 event.m_altDown = ev->modifiers & optionKey;
1457 event.m_metaDown = ev->modifiers & cmdKey;
1458 event.m_keyCode = keyval;
1459 event.m_x = ev->where.h;
1460 event.m_y = ev->where.v;
1461 event.m_timeStamp = ev->when;
1462 event.SetEventObject(focus);
1463 handled = focus->GetEventHandler()->ProcessEvent( event ) ;
1464 }
1465 if ( !handled &&
1466 (keyval == WXK_TAB) &&
1467 (!focus->HasFlag(wxTE_PROCESS_TAB)) &&
1468 (focus->GetParent()) &&
1469 (focus->GetParent()->HasFlag( wxTAB_TRAVERSAL)) )
1470 {
1471 wxNavigationKeyEvent new_event;
1472 new_event.SetEventObject( focus );
1473 new_event.SetDirection( !event.ShiftDown() );
1474 /* CTRL-TAB changes the (parent) window, i.e. switch notebook page */
1475 new_event.SetWindowChange( event.ControlDown() );
1476 new_event.SetCurrentFocus( focus );
1477 handled = focus->GetEventHandler()->ProcessEvent( new_event );
1478 }
1479 /* generate wxID_CANCEL if command-. or <esc> has been pressed (typically in dialogs) */
1480 if ( (!handled) &&
1481 (keyval == '.' && event.ControlDown() ) )
1482 {
1483 wxCommandEvent new_event(wxEVT_COMMAND_BUTTON_CLICKED,wxID_CANCEL);
1484 new_event.SetEventObject( focus );
1485 handled = focus->GetEventHandler()->ProcessEvent( new_event );
1486 }
1487 }
1488 }
169935ad
SC
1489}
1490
519cb848 1491void wxApp::MacHandleKeyUpEvent( EventRecord *ev )
169935ad 1492{
8461e4c2
VZ
1493 wxToolTip::RemoveToolTips() ;
1494
1495 UInt32 menuresult = UMAMenuEvent(ev) ;
1496 if ( HiWord( menuresult ) )
1497 {
1498 }
1499 else
1500 {
1501 short keycode ;
1502 short keychar ;
1503 keychar = short(ev->message & charCodeMask);
1504 keycode = short(ev->message & keyCodeMask) >> 8 ;
1505
1506 wxWindow* focus = wxWindow::FindFocus() ;
1507 if ( focus )
1508 {
1509 long keyval = wxMacTranslateKey(keychar, keycode) ;
1510
1511 wxKeyEvent event(wxEVT_KEY_UP);
1512 event.m_shiftDown = ev->modifiers & shiftKey;
1513 event.m_controlDown = ev->modifiers & controlKey;
1514 event.m_altDown = ev->modifiers & optionKey;
1515 event.m_metaDown = ev->modifiers & cmdKey;
1516 event.m_keyCode = keyval;
1517 event.m_x = ev->where.h;
1518 event.m_y = ev->where.v;
1519 event.m_timeStamp = ev->when;
1520 event.SetEventObject(focus);
1521 bool handled = focus->GetEventHandler()->ProcessEvent( event ) ;
1522 }
1523 }
169935ad
SC
1524}
1525
519cb848 1526void wxApp::MacHandleActivateEvent( EventRecord *ev )
169935ad 1527{
8461e4c2
VZ
1528 WindowRef window = (WindowRef) ev->message ;
1529 if ( window )
1530 {
1531 bool activate = (ev->modifiers & activeFlag ) ;
1532 WindowClass wclass ;
72055702 1533 ::GetWindowClass ( window , &wclass ) ;
8461e4c2
VZ
1534 if ( wclass == kFloatingWindowClass )
1535 {
1536 // if it is a floater we activate/deactivate the front non-floating window instead
72055702 1537 window = ::FrontNonFloatingWindow() ;
8461e4c2
VZ
1538 }
1539 wxWindow* win = wxFindWinFromMacWindow( window ) ;
1540 if ( win )
1541 win->MacActivate( ev , activate ) ;
1542 }
169935ad
SC
1543}
1544
519cb848 1545void wxApp::MacHandleUpdateEvent( EventRecord *ev )
169935ad 1546{
8461e4c2
VZ
1547 WindowRef window = (WindowRef) ev->message ;
1548 wxWindow * win = wxFindWinFromMacWindow( window ) ;
1549 if ( win )
1550 {
0a67a93b 1551 if ( !wxPendingDelete.Member(win) )
8461e4c2
VZ
1552 win->MacUpdate( ev ) ;
1553 }
1554 else
1555 {
1556 // since there is no way of telling this foreign window to update itself
1557 // we have to invalidate the update region otherwise we keep getting the same
1558 // event over and over again
1559 BeginUpdate( window ) ;
1560 EndUpdate( window ) ;
1561 }
169935ad
SC
1562}
1563
519cb848 1564void wxApp::MacHandleDiskEvent( EventRecord *ev )
169935ad 1565{
8461e4c2 1566 if ( HiWord( ev->message ) != noErr )
519cb848 1567 {
2f1ae414 1568 #if !TARGET_CARBON
8461e4c2
VZ
1569 OSErr err ;
1570 Point point ;
1571 SetPt( &point , 100 , 100 ) ;
9779893b 1572
8461e4c2
VZ
1573 err = DIBadMount( point , ev->message ) ;
1574 wxASSERT( err == noErr ) ;
2f1ae414 1575#endif
8461e4c2 1576 }
169935ad
SC
1577}
1578
519cb848 1579void wxApp::MacHandleOSEvent( EventRecord *ev )
169935ad 1580{
8461e4c2
VZ
1581 switch( ( ev->message & osEvtMessageMask ) >> 24 )
1582 {
1583 case suspendResumeMessage :
1584 {
1585 bool isResuming = ev->message & resumeFlag ;
5fde6fcc 1586#if !TARGET_CARBON
8461e4c2 1587 bool convertClipboard = ev->message & convertClipboardFlag ;
5fde6fcc 1588#else
8461e4c2 1589 bool convertClipboard = false;
5fde6fcc 1590#endif
8461e4c2
VZ
1591 bool doesActivate = UMAGetProcessModeDoesActivateOnFGSwitch() ;
1592 if ( isResuming )
1593 {
1594 WindowRef oldFrontWindow = NULL ;
1595 WindowRef newFrontWindow = NULL ;
1596
1597 // in case we don't take care of activating ourselves, we have to synchronize
1598 // our idea of the active window with the process manager's - which it already activated
1599
1600 if ( !doesActivate )
72055702 1601 oldFrontWindow = ::FrontNonFloatingWindow() ;
8461e4c2
VZ
1602
1603 MacResume( convertClipboard ) ;
1604
72055702 1605 newFrontWindow = ::FrontNonFloatingWindow() ;
8461e4c2
VZ
1606
1607 if ( oldFrontWindow )
1608 {
1609 wxWindow* win = wxFindWinFromMacWindow( oldFrontWindow ) ;
1610 if ( win )
1611 win->MacActivate( ev , false ) ;
1612 }
1613 if ( newFrontWindow )
1614 {
1615 wxWindow* win = wxFindWinFromMacWindow( newFrontWindow ) ;
1616 if ( win )
1617 win->MacActivate( ev , true ) ;
1618 }
1619 }
1620 else
1621 {
1622 MacSuspend( convertClipboard ) ;
1623
1624 // in case this suspending did close an active window, another one might
1625 // have surfaced -> lets deactivate that one
1626
72055702
SC
1627/* TODO : find out what to do on systems < 10 , perhaps FrontNonFloatingWindow
1628 WindowRef newActiveWindow = ::ActiveNonFloatingWindow() ;
8461e4c2
VZ
1629 if ( newActiveWindow )
1630 {
1631 wxWindow* win = wxFindWinFromMacWindow( newActiveWindow ) ;
1632 if ( win )
1633 win->MacActivate( ev , false ) ;
1634 }
72055702 1635*/
8461e4c2
VZ
1636 }
1637 }
1638 break ;
1639 case mouseMovedMessage :
1640 {
1641 WindowRef window;
1642
1643 wxWindow* currentMouseWindow = NULL ;
1644
1645 wxWindow::MacGetWindowFromPoint( wxPoint( ev->where.h , ev->where.v ) ,
1646 &currentMouseWindow ) ;
1647
1648 if ( currentMouseWindow != wxWindow::s_lastMouseWindow )
1649 {
1650 wxMouseEvent event ;
1651
1652 bool isDown = !(ev->modifiers & btnState) ; // 1 is for up
1653 bool controlDown = ev->modifiers & controlKey ; // for simulating right mouse
1654
1655 event.m_leftDown = isDown && !controlDown;
1656 event.m_middleDown = FALSE;
1657 event.m_rightDown = isDown && controlDown;
1658 event.m_shiftDown = ev->modifiers & shiftKey;
1659 event.m_controlDown = ev->modifiers & controlKey;
1660 event.m_altDown = ev->modifiers & optionKey;
1661 event.m_metaDown = ev->modifiers & cmdKey;
1662 event.m_x = ev->where.h;
1663 event.m_y = ev->where.v;
1664 event.m_timeStamp = ev->when;
1665 event.SetEventObject(this);
1666
1667 if ( wxWindow::s_lastMouseWindow )
1668 {
1669 wxMouseEvent eventleave(event ) ;
1670 eventleave.SetEventType( wxEVT_LEAVE_WINDOW ) ;
1671 wxWindow::s_lastMouseWindow->GetEventHandler()->ProcessEvent(eventleave);
1672 }
1673 if ( currentMouseWindow )
1674 {
1675 wxMouseEvent evententer(event ) ;
1676 evententer.SetEventType( wxEVT_ENTER_WINDOW ) ;
1677 currentMouseWindow->GetEventHandler()->ProcessEvent(evententer);
1678 }
1679 wxWindow::s_lastMouseWindow = currentMouseWindow ;
1680 }
1681
1682 short windowPart = ::FindWindow(ev->where, &window);
1683
1684 switch (windowPart)
1685 {
1686 // fixes for setting the cursor back from dominic mazzoni
1687 case inMenuBar :
1688 UMAShowArrowCursor();
1689 break ;
1690 case inSysWindow :
1691 UMAShowArrowCursor();
1692 break ;
1693 default:
1694 {
1695 if ( s_lastMouseDown == 0 )
1696 ev->modifiers |= btnState ;
1697
1698 wxWindow* win = wxFindWinFromMacWindow( window ) ;
1699 if ( win )
1700 win->MacMouseMoved( ev , windowPart ) ;
1701 else
1702 UMAShowArrowCursor();
1703
1704 }
1705 break;
1706 }
1707 }
1708 break ;
1709
1710 }
169935ad
SC
1711}
1712
519cb848 1713void wxApp::MacHandleMenuSelect( int macMenuId , int macMenuItemNum )
169935ad 1714{
8461e4c2
VZ
1715 if (macMenuId == 0)
1716 return; // no menu item selected
1717
1718 if (macMenuId == kwxMacAppleMenuId && macMenuItemNum > 1)
1719 {
1720 #if ! TARGET_CARBON
1721 Str255 deskAccessoryName ;
1722 GrafPtr savedPort ;
1723
1724 GetMenuItemText(GetMenuHandle(kwxMacAppleMenuId), macMenuItemNum, deskAccessoryName);
1725 GetPort(&savedPort);
1726 OpenDeskAcc(deskAccessoryName);
1727 SetPort(savedPort);
1728 #endif
1729 }
1730 else
1731 {
1732 wxWindow* frontwindow = wxFindWinFromMacWindow( ::FrontWindow() ) ;
1733 if ( frontwindow && wxMenuBar::MacGetInstalledMenuBar() )
1734 wxMenuBar::MacGetInstalledMenuBar()->MacMenuSelect( frontwindow->GetEventHandler() , 0 , macMenuId , macMenuItemNum ) ;
1735 }
1736 HiliteMenu(0);
169935ad
SC
1737}
1738
519cb848
SC
1739/*
1740long wxApp::MacTranslateKey(char key, int mods)
169935ad 1741{
169935ad
SC
1742}
1743
519cb848 1744void wxApp::MacAdjustCursor()
169935ad 1745{
169935ad
SC
1746}
1747
519cb848
SC
1748*/
1749/*
169935ad
SC
1750void
1751wxApp::macAdjustCursor()
1752{
519cb848 1753 if (ev->what != kHighLevelEvent)
169935ad 1754 {
8461e4c2
VZ
1755 wxWindow* theMacWxFrame = wxFrame::MacFindFrameOrDialog(::FrontWindow());
1756 if (theMacWxFrame)
1757 {
1758 if (!theMacWxFrame->MacAdjustCursor(ev->where))
1759 ::SetCursor(&(qd.arrow));
1760 }
169935ad
SC
1761 }
1762}
9779893b 1763*/