///////////////////////////////////////////////////////////////////////////// // Name: src/mac/carbon/uma.cpp // Purpose: UMA support // Author: Stefan Csomor // Modified by: // Created: 04/01/98 // RCS-ID: $Id: uma.cpp 57897 2009-01-07 20:07:09Z SC $ // Copyright: (c) Stefan Csomor // Licence: The wxWindows licence ///////////////////////////////////////////////////////////////////////////// #include "wx/wxprec.h" #if wxUSE_GUI #include "wx/toplevel.h" #include "wx/dc.h" #ifndef __DARWIN__ # include # include # if defined(TARGET_CARBON) # if PM_USE_SESSION_APIS # include # endif # include # else # include # endif #endif #include "wx/mac/uma.h" // since we have decided that we only support 8.6 upwards we are // checking for these minimum requirements in the startup code of // the application so all wxWidgets code can safely assume that appearance 1.1 // windows manager, control manager, navigation services etc. are // present static SInt32 sUMASystemVersion = 0 ; long UMAGetSystemVersion() { return sUMASystemVersion ; } void UMACleanupToolbox() { } void UMAInitToolbox( UInt16 inMoreMastersCalls, bool isEmbedded ) { ::InitCursor(); if ( Gestalt(gestaltSystemVersion, &sUMASystemVersion) != noErr) sUMASystemVersion = 0x0000 ; #ifndef __LP64__ { FontFamilyID fontId ; Str255 fontName ; SInt16 fontSize ; Style fontStyle ; GetThemeFont(kThemeSmallSystemFont , GetApplicationScript() , fontName , &fontSize , &fontStyle ) ; GetFNum( fontName, &fontId ); TXNMacOSPreferredFontDescription fontDescriptions[] = { { fontId , (fontSize << 16) , kTXNDefaultFontStyle, kTXNSystemDefaultEncoding } } ; int noOfFontDescriptions = sizeof( fontDescriptions ) / sizeof(TXNMacOSPreferredFontDescription) ; OptionBits options = 0 ; if ( UMAGetSystemVersion() < 0x1000 ) options |= kTXNAlwaysUseQuickDrawTextMask ; TXNInitTextension( fontDescriptions, noOfFontDescriptions, options ); } #endif UMASetSystemIsInitialized( true ); } // process manager long UMAGetProcessMode() { OSErr err ; ProcessInfoRec processinfo; ProcessSerialNumber procno ; procno.highLongOfPSN = 0 ; procno.lowLongOfPSN = kCurrentProcess ; processinfo.processInfoLength = sizeof(ProcessInfoRec); processinfo.processName = NULL; #ifndef __LP64__ processinfo.processAppSpec = NULL; #endif err = ::GetProcessInformation( &procno , &processinfo ) ; wxASSERT( err == noErr ) ; return processinfo.processMode ; } bool UMAGetProcessModeDoesActivateOnFGSwitch() { return UMAGetProcessMode() & modeDoesActivateOnFGSwitch ; } // menu manager MenuRef UMANewMenu( SInt16 id , const wxString& title , wxFontEncoding encoding ) { wxString str = wxStripMenuCodes( title ) ; MenuRef menu ; #if TARGET_CARBON CreateNewMenu( id , 0 , &menu ) ; SetMenuTitleWithCFString( menu , wxMacCFStringHolder(str , encoding ) ) ; #else Str255 ptitle ; wxMacStringToPascal( str , ptitle ) ; menu = ::NewMenu( id , ptitle ) ; #endif return menu ; } void UMASetMenuTitle( MenuRef menu , const wxString& title , wxFontEncoding encoding ) { wxString str = wxStripMenuCodes( title ) ; #if TARGET_CARBON SetMenuTitleWithCFString( menu , wxMacCFStringHolder(str , encoding) ) ; #else Str255 ptitle ; wxMacStringToPascal( str , ptitle ) ; SetMenuTitle( menu , ptitle ) ; #endif } void UMASetMenuItemText( MenuRef menu, MenuItemIndex item, const wxString& title, wxFontEncoding encoding ) { // we don't strip the accels here anymore, must be done before wxString str = title ; #if TARGET_CARBON SetMenuItemTextWithCFString( menu , item , wxMacCFStringHolder(str , encoding) ) ; #else Str255 ptitle ; wxMacStringToPascal( str , ptitle ) ; SetMenuItemText( menu , item , ptitle ) ; #endif } UInt32 UMAMenuEvent( EventRecord *inEvent ) { return MenuEvent( inEvent ) ; } void UMAEnableMenuItem( MenuRef inMenu , MenuItemIndex inItem , bool enable) { if ( enable ) EnableMenuItem( inMenu , inItem ) ; else DisableMenuItem( inMenu , inItem ) ; } void UMAAppendSubMenuItem( MenuRef menu , const wxString& title, wxFontEncoding encoding , SInt16 id ) { AppendMenuItemTextWithCFString( menu, CFSTR("A"), 0, 0,NULL); UMASetMenuItemText( menu, (SInt16) ::CountMenuItems(menu), title , encoding ); SetMenuItemHierarchicalID( menu , CountMenuItems( menu ) , id ) ; } void UMAInsertSubMenuItem( MenuRef menu , const wxString& title, wxFontEncoding encoding , MenuItemIndex item , SInt16 id ) { InsertMenuItemTextWithCFString( menu, CFSTR("A"), item, 0, 0); UMASetMenuItemText( menu, item+1, title , encoding ); SetMenuItemHierarchicalID( menu , item+1 , id ) ; } void UMASetMenuItemShortcut( MenuRef menu , MenuItemIndex item , wxAcceleratorEntry *entry ) { if ( !entry ) { SetMenuItemModifiers( menu, item , kMenuNoModifiers ); SetMenuItemKeyGlyph( menu, item , kMenuNullGlyph ); SetItemCmd( menu, item , 0 ); return ; } UInt8 modifiers = 0 ; SInt16 key = entry->GetKeyCode() ; if ( key ) { bool explicitCommandKey = (entry->GetFlags() & wxACCEL_CMD); if ( !explicitCommandKey ) modifiers |= kMenuNoCommandModifier ; if (entry->GetFlags() & wxACCEL_ALT) modifiers |= kMenuOptionModifier ; if (entry->GetFlags() & wxACCEL_SHIFT) modifiers |= kMenuShiftModifier ; if (entry->GetFlags() & wxACCEL_CTRL) modifiers |= kMenuControlModifier ; SInt16 glyph = 0 ; SInt16 macKey = key ; if ( key >= WXK_F1 && key <= WXK_F15 ) { // for some reasons this must be 0 right now // everything else leads to just the first function key item // to be selected. Thanks to Ryan Wilcox for finding out. macKey = 0 ; glyph = kMenuF1Glyph + ( key - WXK_F1 ) ; if ( key >= WXK_F13 ) glyph += 12 ; } else { switch ( key ) { case WXK_BACK : macKey = kBackspaceCharCode ; glyph = kMenuDeleteLeftGlyph ; break ; case WXK_TAB : macKey = kTabCharCode ; glyph = kMenuTabRightGlyph ; break ; case kEnterCharCode : macKey = kEnterCharCode ; glyph = kMenuEnterGlyph ; break ; case WXK_RETURN : macKey = kReturnCharCode ; glyph = kMenuReturnGlyph ; break ; case WXK_ESCAPE : macKey = kEscapeCharCode ; glyph = kMenuEscapeGlyph ; break ; case WXK_SPACE : macKey = ' ' ; glyph = kMenuSpaceGlyph ; break ; case WXK_DELETE : macKey = kDeleteCharCode ; glyph = kMenuDeleteRightGlyph ; break ; case WXK_CLEAR : macKey = kClearCharCode ; glyph = kMenuClearGlyph ; break ; case WXK_PAGEUP : macKey = kPageUpCharCode ; glyph = kMenuPageUpGlyph ; break ; case WXK_PAGEDOWN : macKey = kPageDownCharCode ; glyph = kMenuPageDownGlyph ; break ; case WXK_LEFT : macKey = kLeftArrowCharCode ; glyph = kMenuLeftArrowGlyph ; break ; case WXK_UP : macKey = kUpArrowCharCode ; glyph = kMenuUpArrowGlyph ; break ; case WXK_RIGHT : macKey = kRightArrowCharCode ; glyph = kMenuRightArrowGlyph ; break ; case WXK_DOWN : macKey = kDownArrowCharCode ; glyph = kMenuDownArrowGlyph ; break ; case WXK_HOME : macKey = kHomeCharCode ; glyph = kMenuNorthwestArrowGlyph ; break ; case WXK_END : macKey = kEndCharCode ; glyph = kMenuSoutheastArrowGlyph ; break ; default : macKey = toupper( key ) ; break ; } } // 1d and 1e have special meaning to SetItemCmd, so // do not use for these character codes. if (key != WXK_UP && key != WXK_RIGHT && key != WXK_DOWN && key != WXK_LEFT) SetItemCmd( menu, item , macKey ); SetMenuItemModifiers( menu, item , modifiers ) ; if ( glyph ) SetMenuItemKeyGlyph( menu, item , glyph ) ; } } void UMAAppendMenuItem( MenuRef menu , const wxString& title, wxFontEncoding encoding , wxAcceleratorEntry *entry ) { AppendMenuItemTextWithCFString( menu, CFSTR("A"), 0, 0,NULL); // don't attempt to interpret metacharacters like a '-' at the beginning (would become a separator otherwise) ChangeMenuItemAttributes( menu , ::CountMenuItems(menu), kMenuItemAttrIgnoreMeta , 0 ) ; UMASetMenuItemText(menu, (SInt16) ::CountMenuItems(menu), title , encoding ); UMASetMenuItemShortcut( menu , (SInt16) ::CountMenuItems(menu), entry ) ; } void UMAInsertMenuItem( MenuRef menu , const wxString& title, wxFontEncoding encoding , MenuItemIndex item , wxAcceleratorEntry *entry ) { InsertMenuItemTextWithCFString( menu, CFSTR("A"), item, 0, 0); // don't attempt to interpret metacharacters like a '-' at the beginning (would become a separator otherwise) ChangeMenuItemAttributes( menu , item+1, kMenuItemAttrIgnoreMeta , 0 ) ; UMASetMenuItemText(menu, item+1 , title , encoding ); UMASetMenuItemShortcut( menu , item+1 , entry ) ; } // quickdraw #if !TARGET_CARBON int gPrOpenCounter = 0 ; OSStatus UMAPrOpen() { OSErr err = noErr ; ++gPrOpenCounter ; if ( gPrOpenCounter == 1 ) { PrOpen() ; err = PrError() ; wxASSERT( err == noErr ) ; } return err ; } OSStatus UMAPrClose() { OSErr err = noErr ; wxASSERT( gPrOpenCounter >= 1 ) ; if ( gPrOpenCounter == 1 ) { PrClose() ; err = PrError() ; wxASSERT( err == noErr ) ; } --gPrOpenCounter ; return err ; } pascal QDGlobalsPtr GetQDGlobalsPtr() ; pascal QDGlobalsPtr GetQDGlobalsPtr() { return QDGlobalsPtr (* (Ptr*) LMGetCurrentA5 ( ) - 0xCA); } #endif void UMAShowWatchCursor() { SetThemeCursor(kThemeWatchCursor); } void UMAShowArrowCursor() { SetThemeCursor(kThemeArrowCursor); } // window manager GrafPtr UMAGetWindowPort( WindowRef inWindowRef ) { wxASSERT( inWindowRef != NULL ) ; #if TARGET_CARBON return (GrafPtr) GetWindowPort( inWindowRef ) ; #else return (GrafPtr) inWindowRef ; #endif } void UMADisposeWindow( WindowRef inWindowRef ) { wxASSERT( inWindowRef != NULL ) ; DisposeWindow( inWindowRef ) ; } void UMASetWTitle( WindowRef inWindowRef , const wxString& title , wxFontEncoding encoding ) { #if TARGET_CARBON SetWindowTitleWithCFString( inWindowRef , wxMacCFStringHolder(title , encoding) ) ; #else Str255 ptitle ; wxMacStringToPascal( title , ptitle ) ; SetWTitle( inWindowRef , ptitle ) ; #endif } // appearance additions void UMASetControlTitle( ControlRef inControl , const wxString& title , wxFontEncoding encoding ) { #if TARGET_CARBON SetControlTitleWithCFString( inControl , wxMacCFStringHolder(title , encoding) ) ; #else Str255 ptitle ; wxMacStringToPascal( title , ptitle ) ; SetControlTitle( inControl , ptitle ) ; #endif } void UMAActivateControl( ControlRef inControl ) { #if TARGET_API_MAC_OSX ::ActivateControl( inControl ) ; #else // we have to add the control after again to the update rgn // otherwise updates get lost if ( !IsControlActive( inControl ) ) { bool visible = IsControlVisible( inControl ) ; if ( visible ) SetControlVisibility( inControl , false , false ) ; ::ActivateControl( inControl ) ; if ( visible ) { SetControlVisibility( inControl , true , false ) ; Rect ctrlBounds ; InvalWindowRect( GetControlOwner(inControl), UMAGetControlBoundsInWindowCoords(inControl, &ctrlBounds) ) ; } } #endif } void UMAMoveControl( ControlRef inControl , short x , short y ) { #if TARGET_API_MAC_OSX ::MoveControl( inControl , x , y ) ; #else bool visible = IsControlVisible( inControl ) ; if ( visible ) { SetControlVisibility( inControl , false , false ) ; Rect ctrlBounds ; InvalWindowRect( GetControlOwner(inControl), GetControlBounds(inControl, &ctrlBounds) ) ; } ::MoveControl( inControl , x , y ) ; if ( visible ) { SetControlVisibility( inControl , true , false ) ; Rect ctrlBounds ; InvalWindowRect( GetControlOwner(inControl), GetControlBounds(inControl, &ctrlBounds) ) ; } #endif } void UMASizeControl( ControlRef inControl , short x , short y ) { #if TARGET_API_MAC_OSX ::SizeControl( inControl , x , y ) ; #else bool visible = IsControlVisible( inControl ) ; if ( visible ) { SetControlVisibility( inControl , false , false ) ; Rect ctrlBounds ; InvalWindowRect( GetControlOwner(inControl), GetControlBounds(inControl, &ctrlBounds) ) ; } ::SizeControl( inControl , x , y ) ; if ( visible ) { SetControlVisibility( inControl , true , false ) ; Rect ctrlBounds ; InvalWindowRect( GetControlOwner(inControl), GetControlBounds(inControl, &ctrlBounds) ) ; } #endif } void UMADeactivateControl( ControlRef inControl ) { #if TARGET_API_MAC_OSX ::DeactivateControl( inControl ) ; #else // we have to add the control after again to the update rgn // otherwise updates get lost bool visible = IsControlVisible( inControl ) ; if ( visible ) SetControlVisibility( inControl , false , false ) ; ::DeactivateControl( inControl ) ; if ( visible ) { SetControlVisibility( inControl , true , false ) ; Rect ctrlBounds ; InvalWindowRect( GetControlOwner(inControl), UMAGetControlBoundsInWindowCoords(inControl, &ctrlBounds) ) ; } #endif } // shows the control and adds the region to the update region void UMAShowControl( ControlRef inControl ) { SetControlVisibility( inControl , true , false ) ; HIViewSetNeedsDisplay( inControl, true ); } // hides the control and adds the region to the update region void UMAHideControl( ControlRef inControl ) { SetControlVisibility( inControl , false , false ) ; HIViewSetNeedsDisplay( inControl, true ); } // keyboard focus OSErr UMASetKeyboardFocus( WindowPtr inWindow, ControlRef inControl, ControlFocusPart inPart ) { OSErr err = noErr; #ifndef __LP64__ GrafPtr port ; GetPort( &port ) ; SetPortWindowPort( inWindow ) ; #endif err = SetKeyboardFocus( inWindow , inControl , inPart ) ; #ifndef __LP64__ SetPort( port ) ; #endif return err ; } bool UMAIsWindowFloating( WindowRef inWindow ) { WindowClass cl ; GetWindowClass( inWindow , &cl ) ; return cl == kFloatingWindowClass ; } bool UMAIsWindowModal( WindowRef inWindow ) { WindowClass cl ; GetWindowClass( inWindow , &cl ) ; return cl < kFloatingWindowClass ; } // others void UMAHighlightAndActivateWindow( WindowRef inWindowRef , bool inActivate ) { if ( inWindowRef ) { // bool isHighlighted = IsWindowHighlited( inWindowRef ) ; // if ( inActivate != isHighlighted ) #ifndef __LP64__ GrafPtr port ; GetPort( &port ) ; SetPortWindowPort( inWindowRef ) ; #endif HiliteWindow( inWindowRef , inActivate ) ; ControlRef control = NULL ; ::GetRootControl( inWindowRef , &control ) ; if ( control ) { if ( inActivate ) UMAActivateControl( control ) ; else UMADeactivateControl( control ) ; } #ifndef __LP64__ SetPort( port ) ; #endif } } OSStatus UMADrawThemePlacard( const Rect *inRect , ThemeDrawState inState ) { #ifndef __LP64__ return ::DrawThemePlacard( inRect , inState ) ; #else return noErr; #endif } #if !TARGET_CARBON static OSStatus helpMenuStatus = noErr ; static MenuItemIndex firstCustomItemIndex = 0 ; #endif OSStatus UMAGetHelpMenu( MenuRef * outHelpMenu, MenuItemIndex * outFirstCustomItemIndex) { #if TARGET_CARBON return HMGetHelpMenu( outHelpMenu , outFirstCustomItemIndex ) ; #else MenuRef helpMenuHandle ; helpMenuStatus = HMGetHelpMenuHandle( &helpMenuHandle ) ; if ( firstCustomItemIndex == 0 && helpMenuStatus == noErr ) firstCustomItemIndex = CountMenuItems( helpMenuHandle ) + 1 ; if ( outFirstCustomItemIndex ) *outFirstCustomItemIndex = firstCustomItemIndex ; *outHelpMenu = helpMenuHandle ; return helpMenuStatus ; #endif } #ifndef __LP64__ wxMacPortStateHelper::wxMacPortStateHelper( GrafPtr newport ) { m_clip = NULL ; Setup( newport ) ; } wxMacPortStateHelper::wxMacPortStateHelper() { m_clip = NULL ; } void wxMacPortStateHelper::Setup( GrafPtr newport ) { GetPort( &m_oldPort ) ; SetPort( newport ) ; SetOrigin(0, 0); wxASSERT_MSG( m_clip == NULL , wxT("Cannot call setup twice") ) ; m_clip = NewRgn() ; GetClip( m_clip ); m_textFont = GetPortTextFont( (CGrafPtr) newport ); m_textSize = GetPortTextSize( (CGrafPtr) newport ); m_textStyle = GetPortTextFace( (CGrafPtr) newport ); m_textMode = GetPortTextMode( (CGrafPtr) newport ); GetThemeDrawingState( &m_drawingState ) ; m_currentPort = newport ; } void wxMacPortStateHelper::Clear() { if ( m_clip ) { DisposeRgn( m_clip ) ; DisposeThemeDrawingState( m_drawingState ) ; m_clip = NULL ; } } wxMacPortStateHelper::~wxMacPortStateHelper() { if ( m_clip ) { SetPort( m_currentPort ) ; SetClip( m_clip ) ; DisposeRgn( m_clip ) ; TextFont( m_textFont ); TextSize( m_textSize ); TextFace( m_textStyle ); TextMode( m_textMode ); SetThemeDrawingState( m_drawingState , true ) ; SetPort( m_oldPort ) ; } } #endif Rect * UMAGetControlBoundsInWindowCoords( ControlRef theControl, Rect *bounds ) { GetControlBounds( theControl , bounds ) ; #if TARGET_API_MAC_OSX WindowRef tlwref = GetControlOwner( theControl ) ; wxTopLevelWindowMac* tlwwx = wxFindWinFromMacWindow( tlwref ) ; if ( tlwwx != NULL ) { ControlRef rootControl = tlwwx->GetPeer()->GetControlRef() ; HIPoint hiPoint = CGPointMake( 0 , 0 ) ; HIViewConvertPoint( &hiPoint , HIViewGetSuperview(theControl) , rootControl ) ; OffsetRect( bounds , (short) hiPoint.x , (short) hiPoint.y ) ; } #endif return bounds ; } size_t UMAPutBytesCFRefCallback( void *info, const void *bytes, size_t count ) { CFMutableDataRef data = (CFMutableDataRef) info; if ( data ) { CFDataAppendBytes( data, (const UInt8*) bytes, count ); } return count; } void UMAReleaseCFDataProviderCallback( void *info, const void *data, size_t count ) { if ( info ) CFRelease( (CFDataRef) info ); } void UMAReleaseCFDataConsumerCallback( void *info ) { if ( info ) CFRelease( (CFDataRef) info ); } CGDataProviderRef UMACGDataProviderCreateWithCFData( CFDataRef data ) { if ( data == NULL ) return NULL; #if MAC_OS_X_VERSION_MAX_ALLOWED >= MAC_OS_X_VERSION_10_4 if( &CGDataProviderCreateWithCFData != NULL ) { return CGDataProviderCreateWithCFData( data ); } #endif // make sure we keep it until done CFRetain( data ); CGDataProviderRef provider = CGDataProviderCreateWithData( (void*) data , CFDataGetBytePtr( data ) , CFDataGetLength( data ), UMAReleaseCFDataProviderCallback ); // if provider couldn't be created, release the data again if ( provider == NULL ) CFRelease( data ); return provider; } CGDataConsumerRef UMACGDataConsumerCreateWithCFData( CFMutableDataRef data ) { if ( data == NULL ) return NULL; #if MAC_OS_X_VERSION_MAX_ALLOWED >= MAC_OS_X_VERSION_10_4 if( &CGDataConsumerCreateWithCFData != NULL ) { return CGDataConsumerCreateWithCFData( data ); } #endif // make sure we keep it until done CFRetain( data ); CGDataConsumerCallbacks callbacks; callbacks.putBytes = UMAPutBytesCFRefCallback; callbacks.releaseConsumer = UMAReleaseCFDataConsumerCallback; CGDataConsumerRef consumer = CGDataConsumerCreate( data , &callbacks ); // if consumer couldn't be created, release the data again if ( consumer == NULL ) CFRelease( data ); return consumer; } #endif // wxUSE_GUI #if wxUSE_BASE static bool sUMASystemInitialized = false ; bool UMASystemIsInitialized() { return sUMASystemInitialized ; } void UMASetSystemIsInitialized(bool val) { sUMASystemInitialized = val; } #endif // wxUSE_BASE