]> git.saurik.com Git - wxWidgets.git/blob - src/mac/uma.cpp
don't inherit the controls colours from the parent - at least for the background...
[wxWidgets.git] / src / mac / uma.cpp
1 #include "wx/defs.h"
2 #include "wx/dc.h"
3 #include "wx/mac/uma.h"
4 #include <MacTextEditor.h>
5
6 #ifndef __DARWIN__
7 # include <Navigation.h>
8 # if defined(TARGET_CARBON)
9 # if PM_USE_SESSION_APIS
10 # include <PMCore.h>
11 # endif
12 # include <PMApplication.h>
13 # else
14 # include <Printing.h>
15 # endif
16 #endif
17
18 // since we have decided that we only support 8.6 upwards we are
19 // checking for these minimum requirements in the startup code of
20 // the application so all wxWindows code can safely assume that appearance 1.1
21 // windows manager, control manager, navigation services etc. are
22 // present
23
24 #define wxUSE_MLTE 0
25
26
27 static bool sUMAHasAppearance = false ;
28 static long sUMAAppearanceVersion = 0 ;
29 static bool sUMAHasAquaLayout = false ;
30 static bool sUMASystemInitialized = false ;
31
32 extern int gAGABackgroundColor ;
33 bool UMAHasAppearance() { return sUMAHasAppearance ; }
34 long UMAGetAppearanceVersion() { return sUMAAppearanceVersion ; }
35
36 static bool sUMAHasWindowManager = false ;
37 static long sUMAWindowManagerAttr = 0 ;
38
39 bool UMAHasWindowManager() { return sUMAHasWindowManager ; }
40 long UMAGetWindowManagerAttr() { return sUMAWindowManagerAttr ; }
41 bool UMAHasAquaLayout() { return sUMAHasAquaLayout ; }
42 bool UMASystemIsInitialized() { return sUMASystemInitialized ; }
43
44 void UMACleanupToolbox()
45 {
46 if ( sUMAHasAppearance )
47 {
48 UnregisterAppearanceClient() ;
49 }
50 if ( NavServicesAvailable() )
51 {
52 NavUnload() ;
53 }
54 #if wxUSE_MLTE
55 TXNTerminateTextension( ) ;
56 #endif
57 }
58 void UMAInitToolbox( UInt16 inMoreMastersCalls )
59 {
60 #if !TARGET_CARBON
61 ::MaxApplZone();
62 for (long i = 1; i <= inMoreMastersCalls; i++)
63 ::MoreMasters();
64
65 ::InitGraf(&qd.thePort);
66 ::InitFonts();
67 ::InitMenus();
68 ::TEInit();
69 ::InitDialogs(0L);
70 ::FlushEvents(everyEvent, 0);
71 ::InitCursor();
72 long total,contig;
73 PurgeSpace(&total, &contig);
74 #else
75 InitCursor();
76 #endif
77
78 long theAppearance ;
79 if ( Gestalt( gestaltAppearanceAttr, &theAppearance ) == noErr )
80 {
81 sUMAHasAppearance = true ;
82 RegisterAppearanceClient();
83 if ( Gestalt( gestaltAppearanceVersion, &theAppearance ) == noErr )
84 {
85 sUMAAppearanceVersion = theAppearance ;
86 }
87 else
88 {
89 sUMAAppearanceVersion = 0x0100 ;
90 }
91 }
92 if ( Gestalt( gestaltWindowMgrAttr, &sUMAWindowManagerAttr ) == noErr )
93 {
94 sUMAHasWindowManager = sUMAWindowManagerAttr & gestaltWindowMgrPresent ;
95 }
96
97 #if TARGET_CARBON
98 // Call currently implicitely done : InitFloatingWindows() ;
99 #else
100 if ( sUMAHasWindowManager )
101 InitFloatingWindows() ;
102 else
103 InitWindows();
104 #endif
105
106 if ( NavServicesAvailable() )
107 {
108 NavLoad() ;
109 }
110
111 #if wxUSE_MLTE
112 TXNMacOSPreferredFontDescription defaults;
113 defaults.fontID = kFontIDGeneva ;
114 defaults.pointSize = (10 << 16) ;
115 defaults.fontStyle = kTXNDefaultFontStyle;
116 defaults.encoding = kTXNSystemDefaultEncoding;
117 TXNInitTextension(&defaults, 1, (kTXNAlwaysUseQuickDrawTextMask | kTXNWantMoviesMask | kTXNWantSoundMask | kTXNWantGraphicsMask));
118 #endif
119 long menuMgrAttr ;
120 Gestalt( gestaltMenuMgrAttr , &menuMgrAttr ) ;
121 if ( menuMgrAttr & gestaltMenuMgrAquaLayoutMask )
122 sUMAHasAquaLayout = true ;
123 sUMASystemInitialized = true ;
124
125 }
126
127 /*
128 Boolean CanUseATSUI()
129 {
130 long result;
131 OSErr err = Gestalt(gestaltATSUVersion, &result);
132 return (err == noErr);
133 }
134 */
135 // process manager
136 long UMAGetProcessMode()
137 {
138 OSErr err ;
139 ProcessInfoRec processinfo;
140 ProcessSerialNumber procno ;
141
142 procno.highLongOfPSN = NULL ;
143 procno.lowLongOfPSN = kCurrentProcess ;
144 processinfo.processInfoLength = sizeof(ProcessInfoRec);
145 processinfo.processName = NULL;
146 processinfo.processAppSpec = NULL;
147
148 err = ::GetProcessInformation( &procno , &processinfo ) ;
149 wxASSERT( err == noErr ) ;
150 return processinfo.processMode ;
151 }
152
153 bool UMAGetProcessModeDoesActivateOnFGSwitch()
154 {
155 return UMAGetProcessMode() & modeDoesActivateOnFGSwitch ;
156 }
157
158 // menu manager
159
160 void UMASetMenuTitle( MenuRef menu , StringPtr title )
161 {
162 /*
163 #if !TARGET_CARBON
164 long size = GetHandleSize( (Handle) menu ) ;
165 const long headersize = 14 ;
166 int oldlen = (**menu).menuData[0] + 1;
167 int newlen = title[0] + 1 ;
168
169 if ( oldlen < newlen )
170 {
171 // enlarge before adjusting
172 SetHandleSize( (Handle) menu , size + (newlen - oldlen ) );
173 }
174
175 if ( oldlen != newlen )
176 memmove( (char*) (**menu).menuData + newlen , (char*) (**menu).menuData + oldlen , size - headersize - oldlen ) ;
177
178 memcpy( (char*) (**menu).menuData , title , newlen ) ;
179 if ( oldlen > newlen )
180 {
181 // shrink after
182 SetHandleSize( (Handle) menu , size + (newlen - oldlen ) ) ;
183 }
184 #else
185 */
186 SetMenuTitle( menu , title ) ;
187 //#endif
188 }
189
190 UInt32 UMAMenuEvent( EventRecord *inEvent )
191 {
192 return MenuEvent( inEvent ) ;
193 }
194
195 void UMAEnableMenuItem( MenuRef inMenu , MenuItemIndex inItem )
196 {
197 EnableMenuItem( inMenu , inItem ) ;
198 }
199
200 void UMADisableMenuItem( MenuRef inMenu , MenuItemIndex inItem )
201 {
202 DisableMenuItem( inMenu , inItem ) ;
203 }
204
205 void UMAAppendSubMenuItem( MenuRef menu , StringPtr l , SInt16 id )
206 {
207 Str255 label ;
208 memcpy( label , l , l[0]+1 ) ;
209 // hardcoded adding of the submenu combination for mac
210
211 int theEnd = label[0] + 1;
212 if (theEnd > 251)
213 theEnd = 251; // mac allows only 255 characters
214 label[theEnd++] = '/';
215 label[theEnd++] = hMenuCmd;
216 label[theEnd++] = '!';
217 label[theEnd++] = id ;
218 label[theEnd] = 0x00;
219 label[0] = theEnd;
220 MacAppendMenu(menu, label);
221 }
222
223 void UMAInsertSubMenuItem( MenuRef menu , StringPtr l , MenuItemIndex item , SInt16 id )
224 {
225 Str255 label ;
226 memcpy( label , l , l[0]+1 ) ;
227 // hardcoded adding of the submenu combination for mac
228
229 int theEnd = label[0] + 1;
230 if (theEnd > 251)
231 theEnd = 251; // mac allows only 255 characters
232 label[theEnd++] = '/';
233 label[theEnd++] = hMenuCmd;
234 label[theEnd++] = '!';
235 label[theEnd++] = id;
236 label[theEnd] = 0x00;
237 label[0] = theEnd;
238 MacInsertMenuItem(menu, label , item);
239 }
240
241 void UMAAppendMenuItem( MenuRef menu , StringPtr l , SInt16 key, UInt8 modifiers )
242 {
243 Str255 label ;
244 memcpy( label , l , l[0]+1 ) ;
245 if ( key )
246 {
247 int pos = label[0] ;
248 label[++pos] = '/';
249 label[++pos] = toupper( key );
250 label[0] = pos ;
251 }
252 MacAppendMenu( menu , label ) ;
253 }
254
255 void UMAInsertMenuItem( MenuRef menu , StringPtr l , MenuItemIndex item , SInt16 key, UInt8 modifiers )
256 {
257 Str255 label ;
258 memcpy( label , l , l[0]+1 ) ;
259 if ( key )
260 {
261 int pos = label[0] ;
262 label[++pos] = '/';
263 label[++pos] = toupper( key );
264 label[0] = pos ;
265 }
266 MacInsertMenuItem( menu , label , item) ;
267 }
268
269 // quickdraw
270
271 int gPrOpenCounter = 0 ;
272
273 OSStatus UMAPrOpen(void *macPrintSession)
274 {
275 #if !TARGET_CARBON
276 OSErr err = noErr ;
277 ++gPrOpenCounter ;
278 if ( gPrOpenCounter == 1 )
279 {
280 PrOpen() ;
281 err = PrError() ;
282 wxASSERT( err == noErr ) ;
283 }
284 return err ;
285 #else
286 OSStatus err = noErr ;
287 ++gPrOpenCounter ;
288 if ( gPrOpenCounter == 1 )
289 {
290 #if PM_USE_SESSION_APIS
291 err = PMCreateSession((PMPrintSession *)macPrintSession) ;
292 #else
293 err = PMBegin() ;
294 #endif
295 wxASSERT( err == noErr ) ;
296 }
297 return err ;
298 #endif
299 }
300
301 OSStatus UMAPrClose(void *macPrintSession)
302 {
303 #if !TARGET_CARBON
304 OSErr err = noErr ;
305 wxASSERT( gPrOpenCounter >= 1 ) ;
306 if ( gPrOpenCounter == 1 )
307 {
308 PrClose() ;
309 err = PrError() ;
310 wxASSERT( err == noErr ) ;
311 }
312 --gPrOpenCounter ;
313 return err ;
314 #else
315 OSStatus err = noErr ;
316 wxASSERT( gPrOpenCounter >= 1 ) ;
317 if ( gPrOpenCounter == 1 )
318 {
319 #if PM_USE_SESSION_APIS
320 err = PMRelease(*(PMPrintSession *)macPrintSession) ;
321 *(PMPrintSession *)macPrintSession = kPMNoReference;
322 #else
323 err = PMEnd() ;
324 #endif
325 }
326 --gPrOpenCounter ;
327 return err ;
328 #endif
329 }
330
331 #if !TARGET_CARBON
332
333 pascal QDGlobalsPtr GetQDGlobalsPtr (void) ;
334 pascal QDGlobalsPtr GetQDGlobalsPtr (void)
335 {
336 return QDGlobalsPtr (* (Ptr*) LMGetCurrentA5 ( ) - 0xCA);
337 }
338
339 #endif
340
341 void UMAShowWatchCursor()
342 {
343 OSErr err = noErr;
344
345 CursHandle watchFob = GetCursor (watchCursor);
346
347 if (!watchFob)
348 err = nilHandleErr;
349 else
350 {
351 #if TARGET_CARBON
352 // Cursor preservedArrow;
353 // GetQDGlobalsArrow (&preservedArrow);
354 // SetQDGlobalsArrow (*watchFob);
355 // InitCursor ( );
356 // SetQDGlobalsArrow (&preservedArrow);
357 SetCursor (*watchFob);
358 #else
359 SetCursor (*watchFob);
360 #endif
361 }
362 }
363
364 void UMAShowArrowCursor()
365 {
366 #if TARGET_CARBON
367 Cursor arrow;
368 SetCursor (GetQDGlobalsArrow (&arrow));
369 #else
370 SetCursor (&(qd.arrow));
371 #endif
372 }
373
374 // window manager
375
376 GrafPtr UMAGetWindowPort( WindowRef inWindowRef )
377 {
378 wxASSERT( inWindowRef != NULL ) ;
379 #if TARGET_CARBON
380 return (GrafPtr) GetWindowPort( inWindowRef ) ;
381 #else
382 return (GrafPtr) inWindowRef ;
383 #endif
384 }
385
386 void UMADisposeWindow( WindowRef inWindowRef )
387 {
388 wxASSERT( inWindowRef != NULL ) ;
389 DisposeWindow( inWindowRef ) ;
390 }
391
392 void UMASetWTitleC( WindowRef inWindowRef , const char *title )
393 {
394 Str255 ptitle ;
395 strncpy( (char*)ptitle , title , 96 ) ;
396 ptitle[96] = 0 ;
397 #if TARGET_CARBON
398 c2pstrcpy( ptitle, (char *)ptitle ) ;
399 #else
400 c2pstr( (char*)ptitle ) ;
401 #endif
402 SetWTitle( inWindowRef , ptitle ) ;
403 }
404
405 void UMAGetWTitleC( WindowRef inWindowRef , char *title )
406 {
407 GetWTitle( inWindowRef , (unsigned char*)title ) ;
408 #if TARGET_CARBON
409 p2cstrcpy( title, (unsigned char *)title ) ;
410 #else
411 p2cstr( (unsigned char*)title ) ;
412 #endif
413 }
414
415 // appearance additions
416
417 void UMAActivateControl( ControlHandle inControl )
418 {
419 // we have to add the control after again to the update rgn
420 // otherwise updates get lost
421 if ( !IsControlActive( inControl ) )
422 {
423 bool visible = IsControlVisible( inControl ) ;
424 if ( visible )
425 SetControlVisibility( inControl , false , false ) ;
426 ::ActivateControl( inControl ) ;
427 if ( visible ) {
428 SetControlVisibility( inControl , true , false ) ;
429 Rect ctrlBounds ;
430 InvalWindowRect(GetControlOwner(inControl),GetControlBounds(inControl,&ctrlBounds) ) ;
431 }
432 }
433 }
434
435 void UMADrawControl( ControlHandle inControl )
436 {
437 WindowRef theWindow = GetControlOwner(inControl) ;
438 RgnHandle updateRgn = NewRgn() ;
439 GetWindowUpdateRgn( theWindow , updateRgn ) ;
440 Point zero = { 0 , 0 } ;
441 LocalToGlobal( &zero ) ;
442 OffsetRgn( updateRgn , -zero.h , -zero.v ) ;
443 ::DrawControlInCurrentPort( inControl ) ;
444 InvalWindowRgn( theWindow, updateRgn) ;
445 DisposeRgn( updateRgn ) ;
446 }
447
448 void UMAMoveControl( ControlHandle inControl , short x , short y )
449 {
450 bool visible = IsControlVisible( inControl ) ;
451 if ( visible ) {
452 SetControlVisibility( inControl , false , false ) ;
453 Rect ctrlBounds ;
454 InvalWindowRect(GetControlOwner(inControl),GetControlBounds(inControl,&ctrlBounds) ) ;
455 }
456 ::MoveControl( inControl , x , y ) ;
457 if ( visible ) {
458 SetControlVisibility( inControl , true , false ) ;
459 Rect ctrlBounds ;
460 InvalWindowRect(GetControlOwner(inControl),GetControlBounds(inControl,&ctrlBounds) ) ;
461 }
462 }
463
464 void UMASizeControl( ControlHandle inControl , short x , short y )
465 {
466 bool visible = IsControlVisible( inControl ) ;
467 if ( visible ) {
468 SetControlVisibility( inControl , false , false ) ;
469 Rect ctrlBounds ;
470 InvalWindowRect(GetControlOwner(inControl),GetControlBounds(inControl,&ctrlBounds) ) ;
471 }
472 ::SizeControl( inControl , x , y ) ;
473 if ( visible ) {
474 SetControlVisibility( inControl , true , false ) ;
475 Rect ctrlBounds ;
476 InvalWindowRect(GetControlOwner(inControl),GetControlBounds(inControl,&ctrlBounds) ) ;
477 }
478 }
479
480 void UMADeactivateControl( ControlHandle inControl )
481 {
482 // we have to add the control after again to the update rgn
483 // otherwise updates get lost
484 bool visible = IsControlVisible( inControl ) ;
485 if ( visible )
486 SetControlVisibility( inControl , false , false ) ;
487 ::DeactivateControl( inControl ) ;
488 if ( visible ) {
489 SetControlVisibility( inControl , true , false ) ;
490 Rect ctrlBounds ;
491 InvalWindowRect(GetControlOwner(inControl),GetControlBounds(inControl,&ctrlBounds) ) ;
492 }
493 }
494 // shows the control and adds the region to the update region
495 void UMAShowControl (ControlHandle inControl)
496 {
497 SetControlVisibility( inControl , true , false ) ;
498 Rect ctrlBounds ;
499 InvalWindowRect(GetControlOwner(inControl),GetControlBounds(inControl,&ctrlBounds) ) ;
500 }
501
502 // shows the control and adds the region to the update region
503 void UMAHideControl (ControlHandle inControl)
504 {
505 SetControlVisibility( inControl , false , false ) ;
506 Rect ctrlBounds ;
507 InvalWindowRect(GetControlOwner(inControl),GetControlBounds(inControl,&ctrlBounds) ) ;
508 }
509 // keyboard focus
510 OSErr UMASetKeyboardFocus (WindowPtr inWindow,
511 ControlHandle inControl,
512 ControlFocusPart inPart)
513 {
514 OSErr err = noErr;
515 GrafPtr port ;
516 GetPort( &port ) ;
517
518 SetPortWindowPort( inWindow ) ;
519
520 err = SetKeyboardFocus( inWindow , inControl , inPart ) ;
521 SetPort( port ) ;
522 return err ;
523 }
524
525
526
527
528 // events
529 void UMAUpdateControls( WindowPtr inWindow , RgnHandle inRgn )
530 {
531 RgnHandle updateRgn = NewRgn() ;
532 GetWindowUpdateRgn( inWindow , updateRgn ) ;
533
534 Point zero = { 0 , 0 } ;
535 LocalToGlobal( &zero ) ;
536 OffsetRgn( updateRgn , -zero.h , -zero.v ) ;
537
538 UpdateControls( inWindow , inRgn ) ;
539 InvalWindowRgn( inWindow, updateRgn) ;
540 DisposeRgn( updateRgn ) ;
541
542 }
543
544 bool UMAIsWindowFloating( WindowRef inWindow )
545 {
546 WindowClass cl ;
547
548 GetWindowClass( inWindow , &cl ) ;
549 return cl == kFloatingWindowClass ;
550 }
551
552 bool UMAIsWindowModal( WindowRef inWindow )
553 {
554 WindowClass cl ;
555
556 GetWindowClass( inWindow , &cl ) ;
557 return cl < kFloatingWindowClass ;
558 }
559
560 // others
561
562 void UMAHighlightAndActivateWindow( WindowRef inWindowRef , bool inActivate )
563 {
564 if ( inWindowRef )
565 {
566 // bool isHighlighted = IsWindowHighlited( inWindowRef ) ;
567 // if ( inActivate != isHightlited )
568 GrafPtr port ;
569 GetPort( &port ) ;
570 SetPortWindowPort( inWindowRef ) ;
571 HiliteWindow( inWindowRef , inActivate ) ;
572 ControlHandle control = NULL ;
573 ::GetRootControl( inWindowRef , & control ) ;
574 if ( control )
575 {
576 if ( inActivate )
577 UMAActivateControl( control ) ;
578 else
579 UMADeactivateControl( control ) ;
580 }
581 SetPort( port ) ;
582 }
583 }
584 OSStatus UMADrawThemePlacard( const Rect *inRect , ThemeDrawState inState )
585 {
586 return ::DrawThemePlacard( inRect , inState ) ;
587 }
588
589 #if !TARGET_CARBON
590 static OSStatus helpMenuStatus = noErr ;
591 static MenuItemIndex firstCustomItemIndex = 0 ;
592 #endif
593
594 OSStatus UMAGetHelpMenu(
595 MenuRef * outHelpMenu,
596 MenuItemIndex * outFirstCustomItemIndex)
597 {
598 #if TARGET_CARBON
599 return HMGetHelpMenu( outHelpMenu , outFirstCustomItemIndex ) ;
600 #else
601 MenuRef helpMenuHandle ;
602 helpMenuStatus = HMGetHelpMenuHandle( &helpMenuHandle ) ;
603 if ( firstCustomItemIndex == 0 && helpMenuStatus == noErr )
604 {
605 firstCustomItemIndex = CountMenuItems( helpMenuHandle ) + 1 ;
606 }
607 if ( outFirstCustomItemIndex )
608 {
609 *outFirstCustomItemIndex = firstCustomItemIndex ;
610 }
611 *outHelpMenu = helpMenuHandle ;
612 return helpMenuStatus ;
613 #endif
614 }
615
616 wxMacPortStateHelper::wxMacPortStateHelper( GrafPtr newport)
617 {
618 m_clip = NULL ;
619 Setup( newport ) ;
620 }
621
622 wxMacPortStateHelper::wxMacPortStateHelper()
623 {
624 m_clip = NULL ;
625 }
626
627 void wxMacPortStateHelper::Setup( GrafPtr newport )
628 {
629 GetPort( &m_oldPort ) ;
630 SetPort( newport ) ;
631 wxASSERT_MSG( m_clip == NULL , "Cannot call setup twice" ) ;
632 m_clip = NewRgn() ;
633 GetClip( m_clip );
634 m_textFont = GetPortTextFont( (CGrafPtr) newport);
635 m_textSize = GetPortTextSize( (CGrafPtr) newport);
636 m_textStyle = GetPortTextFace( (CGrafPtr) newport);
637 m_textMode = GetPortTextMode( (CGrafPtr) newport);
638 GetThemeDrawingState( &m_drawingState ) ;
639 m_currentPort = newport ;
640 }
641 void wxMacPortStateHelper::Clear()
642 {
643 if ( m_clip )
644 {
645 DisposeRgn( m_clip ) ;
646 DisposeThemeDrawingState( m_drawingState ) ;
647 m_clip = NULL ;
648 }
649 }
650
651 wxMacPortStateHelper::~wxMacPortStateHelper()
652 {
653 if ( m_clip )
654 {
655 SetPort( m_currentPort ) ;
656 SetClip( m_clip ) ;
657 DisposeRgn( m_clip ) ;
658 TextFont( m_textFont );
659 TextSize( m_textSize );
660 TextFace( m_textStyle );
661 TextMode( m_textMode );
662 SetThemeDrawingState( m_drawingState , true ) ;
663 SetPort( m_oldPort ) ;
664 }
665 }
666