src/mac/uma.cpp

#include "wx/defs.h"
#include "wx/dc.h"
#include "wx/mac/uma.h"
#include <MacTextEditor.h>

#ifndef __DARWIN__
#  include <Navigation.h>
#  if defined(TARGET_CARBON)
#    if PM_USE_SESSION_APIS
#      include <PMCore.h>
#    endif
#    include <PMApplication.h>
#  else
#    include <Printing.h>
#  endif
#endif

// 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 wxWindows code can safely assume that appearance 1.1
// windows manager, control manager, navigation services etc. are
// present

static bool	sUMAHasAppearance = false ;
static long sUMAAppearanceVersion = 0 ;
static bool sUMAHasAquaLayout = false ;
static bool sUMASystemInitialized = false ;

extern int gAGABackgroundColor ;
bool UMAHasAppearance() { return sUMAHasAppearance ; }
long UMAGetAppearanceVersion() { return sUMAAppearanceVersion ; }

static bool	sUMAHasWindowManager = false ;
static long sUMAWindowManagerAttr = 0 ;

bool UMAHasWindowManager() { return sUMAHasWindowManager ; }
long UMAGetWindowManagerAttr() { return sUMAWindowManagerAttr ; }
bool UMAHasAquaLayout() { return sUMAHasAquaLayout ; }
bool UMASystemIsInitialized() { return sUMASystemInitialized ; }

void UMACleanupToolbox()
{
	if ( sUMAHasAppearance )
	{
		UnregisterAppearanceClient() ;
	}
	if ( NavServicesAvailable() )
	{
		NavUnload() ;
	}
  if ( TXNTerminateTextension != (void*) kUnresolvedCFragSymbolAddress )
	  TXNTerminateTextension( ) ;
}
void UMAInitToolbox( UInt16 inMoreMastersCalls )
{
#if !TARGET_CARBON
	::MaxApplZone();
	for (long i = 1; i <= inMoreMastersCalls; i++)
		::MoreMasters();

	::InitGraf(&qd.thePort);
	::InitFonts();
	::InitMenus();
	::TEInit();
	::InitDialogs(0L);
	::FlushEvents(everyEvent, 0);
	::InitCursor();
	long total,contig;
	PurgeSpace(&total, &contig);
#else
	InitCursor();
#endif

	long theAppearance ;
	if ( Gestalt( gestaltAppearanceAttr, &theAppearance ) == noErr )
	{
		sUMAHasAppearance = true ;
		RegisterAppearanceClient();
		if ( Gestalt( gestaltAppearanceVersion, &theAppearance ) == noErr )
		{
			sUMAAppearanceVersion = theAppearance ;
		}
		else
		{
			sUMAAppearanceVersion = 0x0100 ;
		}
	}
	if ( Gestalt( gestaltWindowMgrAttr, &sUMAWindowManagerAttr ) == noErr )
	{
		sUMAHasWindowManager = sUMAWindowManagerAttr & gestaltWindowMgrPresent ;
	}

#if TARGET_CARBON
// Call currently implicitely done :		InitFloatingWindows() ;
#else
	if ( sUMAHasWindowManager )
		InitFloatingWindows() ;
	else
		InitWindows();
#endif

	if ( NavServicesAvailable() )
	{
		NavLoad() ;
	}

  if ( TXNInitTextension != (void*) kUnresolvedCFragSymbolAddress )
  {
    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) ;
#if TARGET_CARBON
    --noOfFontDescriptions ;
#endif
  	// kTXNAlwaysUseQuickDrawTextMask might be desirable because of speed increases but it crashes the app under OS X upon key stroke
  	TXNInitTextension(fontDescriptions,  noOfFontDescriptions, ( kTXNWantMoviesMask | kTXNWantSoundMask | kTXNWantGraphicsMask));
	}

  long menuMgrAttr ;
  Gestalt( gestaltMenuMgrAttr , &menuMgrAttr ) ;
  if ( menuMgrAttr & gestaltMenuMgrAquaLayoutMask )
    sUMAHasAquaLayout = true ;
  sUMASystemInitialized = true ;

}

/*
Boolean CanUseATSUI()
	{
	long result;
	OSErr err = Gestalt(gestaltATSUVersion, &result);
	return (err == noErr);
	}
*/
// process manager
long UMAGetProcessMode()
{
	OSErr err ;
	ProcessInfoRec processinfo;
	ProcessSerialNumber procno ;

	procno.highLongOfPSN = NULL ;
	procno.lowLongOfPSN = kCurrentProcess ;
	processinfo.processInfoLength = sizeof(ProcessInfoRec);
	processinfo.processName = NULL;
	processinfo.processAppSpec = NULL;

	err = ::GetProcessInformation( &procno , &processinfo ) ;
	wxASSERT( err == noErr ) ;
	return processinfo.processMode ;
}

bool UMAGetProcessModeDoesActivateOnFGSwitch()
{
	return UMAGetProcessMode() & modeDoesActivateOnFGSwitch ;
}

// menu manager

void UMASetMenuTitle( MenuRef menu , StringPtr title )
{
/*
#if !TARGET_CARBON
	long 			size = GetHandleSize( (Handle) menu ) ;
	const long 		headersize = 14 ;
	int				oldlen = (**menu).menuData[0] + 1;
	int				newlen = title[0] + 1 ;

	if ( oldlen < newlen )
	{
		// enlarge before adjusting
		SetHandleSize( (Handle) menu , size + (newlen - oldlen ) );
	}

	if ( oldlen != newlen )
		memmove( (char*) (**menu).menuData + newlen , (char*) (**menu).menuData + oldlen , size - headersize - oldlen ) ;

	memcpy( (char*) (**menu).menuData , title ,  newlen ) ;
	if ( oldlen > newlen )
	{
		// shrink after
		SetHandleSize( (Handle) menu , size + (newlen - oldlen ) ) ;
	}
#else
*/
	SetMenuTitle( menu , title ) ;
//#endif
}

UInt32 UMAMenuEvent( EventRecord *inEvent )
{
		return MenuEvent( inEvent ) ;
}

void 			UMAEnableMenuItem( MenuRef inMenu , MenuItemIndex inItem )
{
	EnableMenuItem( inMenu , inItem ) ;
}

void 			UMADisableMenuItem( MenuRef inMenu , MenuItemIndex inItem )
{
	DisableMenuItem( inMenu , inItem ) ;
}

void UMAAppendSubMenuItem( MenuRef menu , StringPtr l , SInt16 id )
{
	Str255 label ;
	memcpy( label , l , l[0]+1 ) ;
	// hardcoded adding of the submenu combination for mac

	int theEnd = label[0] + 1;
	if (theEnd > 251)
		theEnd = 251; // mac allows only 255 characters
	label[theEnd++] = '/';
	label[theEnd++] = hMenuCmd;
	label[theEnd++] = '!';
	label[theEnd++] = id ;
	label[theEnd] = 0x00;
	label[0] = theEnd;
	MacAppendMenu(menu, label);
}

void UMAInsertSubMenuItem( MenuRef menu , StringPtr l , MenuItemIndex item , SInt16 id  )
{
	Str255 label ;
	memcpy( label , l , l[0]+1 ) ;
	// hardcoded adding of the submenu combination for mac

	int theEnd = label[0] + 1;
	if (theEnd > 251)
		theEnd = 251; // mac allows only 255 characters
	label[theEnd++] = '/';
	label[theEnd++] = hMenuCmd;
	label[theEnd++] = '!';
	label[theEnd++] = id;
	label[theEnd] = 0x00;
	label[0] = theEnd;
	MacInsertMenuItem(menu, label , item);
}

void UMAAppendMenuItem( MenuRef menu , StringPtr l , SInt16 key, UInt8 modifiers )
{
	Str255 label ;
	memcpy( label , l , l[0]+1 ) ;
	if ( key )
	{
			int pos = label[0] ;
			label[++pos] = '/';
			label[++pos] = toupper( key );
			label[0] = pos ;
	}
	MacAppendMenu( menu , label ) ;
}

void UMAInsertMenuItem( MenuRef menu , StringPtr l , MenuItemIndex item , SInt16 key, UInt8 modifiers )
{
	Str255 label ;
	memcpy( label , l , l[0]+1 ) ;
	if ( key )
	{
			int pos = label[0] ;
			label[++pos] = '/';
			label[++pos] = toupper( key );
			label[0] = pos ;
	}
	MacInsertMenuItem( menu , label , item) ;
}

// quickdraw

int gPrOpenCounter = 0 ;

OSStatus UMAPrOpen(void *macPrintSession)
{
#if !TARGET_CARBON
	OSErr err = noErr ;
	++gPrOpenCounter ;
	if ( gPrOpenCounter == 1 )
	{
		PrOpen() ;
		err = PrError() ;
		wxASSERT( err == noErr ) ;
	}
	return err ;
#else
	OSStatus err = noErr ;
	++gPrOpenCounter ;
	if ( gPrOpenCounter == 1 )
	{
  #if PM_USE_SESSION_APIS
	    err = PMCreateSession((PMPrintSession *)macPrintSession) ;
  #else
	    err = PMBegin() ;
  #endif
		wxASSERT( err == noErr ) ;
	}
	return err ;
#endif
}

OSStatus UMAPrClose(void *macPrintSession)
{
#if !TARGET_CARBON
	OSErr err = noErr ;
	wxASSERT( gPrOpenCounter >= 1 ) ;
	if ( gPrOpenCounter == 1 )
	{
		PrClose() ;
		err = PrError() ;
		wxASSERT( err == noErr ) ;
	}
	--gPrOpenCounter ;
	return err ;
#else
	OSStatus err = noErr ;
	wxASSERT( gPrOpenCounter >= 1 ) ;
	if ( gPrOpenCounter == 1 )
	{
  #if PM_USE_SESSION_APIS
	    err = PMRelease(*(PMPrintSession *)macPrintSession) ;
	    *(PMPrintSession *)macPrintSession = kPMNoReference;
  #else
	    err = PMEnd() ;
  #endif
	}
	--gPrOpenCounter ;
	return err ;
#endif
}

#if !TARGET_CARBON

pascal QDGlobalsPtr GetQDGlobalsPtr (void) ;
pascal QDGlobalsPtr GetQDGlobalsPtr (void)
{
	return QDGlobalsPtr (* (Ptr*) LMGetCurrentA5 ( ) - 0xCA);
}

#endif

void UMAShowWatchCursor()
{
	OSErr err = noErr;

	CursHandle watchFob = GetCursor (watchCursor);

	if (!watchFob)
		err = nilHandleErr;
	else
	{
	#if TARGET_CARBON
//		Cursor preservedArrow;
//		GetQDGlobalsArrow (&preservedArrow);
//		SetQDGlobalsArrow (*watchFob);
//		InitCursor ( );
//		SetQDGlobalsArrow (&preservedArrow);
		SetCursor (*watchFob);
	#else
		SetCursor (*watchFob);
	#endif
	}
}

void			UMAShowArrowCursor()
{
#if TARGET_CARBON
	Cursor arrow;
	SetCursor (GetQDGlobalsArrow (&arrow));
#else
	SetCursor (&(qd.arrow));
#endif
}

// 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 			UMASetWTitleC( WindowRef inWindowRef , const char *title )
{
	Str255	ptitle ;
	strncpy( (char*)ptitle , title , 96 ) ;
	ptitle[96] = 0 ;
#if TARGET_CARBON
	c2pstrcpy( ptitle, (char *)ptitle ) ;
#else
	c2pstr( (char*)ptitle ) ;
#endif
	SetWTitle( inWindowRef , ptitle ) ;
}

void 			UMAGetWTitleC( WindowRef inWindowRef , char *title )
{
	GetWTitle( inWindowRef , (unsigned char*)title ) ;
#if TARGET_CARBON
	p2cstrcpy( title, (unsigned char *)title ) ;
#else
	p2cstr( (unsigned char*)title ) ;
#endif
}

// appearance additions

void UMAActivateControl( ControlHandle inControl )
{
    // 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),GetControlBounds(inControl,&ctrlBounds) ) ;
        }
  }
}

void UMADrawControl( ControlHandle inControl )
{
    WindowRef theWindow = GetControlOwner(inControl) ;
    RgnHandle updateRgn = NewRgn() ;
    GetWindowUpdateRgn( theWindow , updateRgn ) ;
	  Point zero = { 0 , 0 } ;
	  LocalToGlobal( &zero ) ;
	  OffsetRgn( updateRgn , -zero.h , -zero.v ) ;
    ::DrawControlInCurrentPort( inControl ) ;
    InvalWindowRgn( theWindow, updateRgn) ;
	  DisposeRgn( updateRgn ) ;
}

void UMAMoveControl( ControlHandle inControl , short x , short y )
{
  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) ) ;
  }
}

void UMASizeControl( ControlHandle inControl , short x , short y )
{
  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) ) ;
  }
}

void UMADeactivateControl( ControlHandle inControl )
{
    // 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),GetControlBounds(inControl,&ctrlBounds) ) ;
     }
}
// shows the control and adds the region to the update region
void UMAShowControl						(ControlHandle 			inControl)
{
        SetControlVisibility( inControl , true , false ) ;
        Rect ctrlBounds ;
        InvalWindowRect(GetControlOwner(inControl),GetControlBounds(inControl,&ctrlBounds) ) ;
}

// shows the control and adds the region to the update region
void UMAHideControl						(ControlHandle 			inControl)
{
        SetControlVisibility( inControl , false , false ) ;
        Rect ctrlBounds ;
        InvalWindowRect(GetControlOwner(inControl),GetControlBounds(inControl,&ctrlBounds) ) ;
}
// keyboard focus
OSErr UMASetKeyboardFocus				(WindowPtr 				inWindow,
								 ControlHandle 			inControl,
								 ControlFocusPart 		inPart)
{
	OSErr err = noErr;
	GrafPtr port ;
	GetPort( &port ) ;

	SetPortWindowPort( inWindow ) ;

  err = SetKeyboardFocus( inWindow , inControl , inPart ) ;
	SetPort( port ) ;
	return err ;
}


// events
void UMAUpdateControls( WindowPtr inWindow , RgnHandle inRgn )
{
  RgnHandle updateRgn = NewRgn() ;
  GetWindowUpdateRgn( inWindow , updateRgn ) ;

	Point zero = { 0 , 0 } ;
	LocalToGlobal( &zero ) ;
	OffsetRgn( updateRgn , -zero.h , -zero.v ) ;

  UpdateControls( inWindow , inRgn ) ;
  InvalWindowRgn( inWindow, updateRgn) ;
	DisposeRgn( updateRgn ) ;

}

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 != isHightlited )
		GrafPtr port ;
		GetPort( &port ) ;
		SetPortWindowPort( inWindowRef ) ;
		HiliteWindow( inWindowRef , inActivate ) ;
		ControlHandle control = NULL ;
		::GetRootControl( inWindowRef , & control ) ;
		if ( control )
		{
			if ( inActivate )
				UMAActivateControl( control ) ;
			else
				UMADeactivateControl( control ) ;
		}
		SetPort( port ) ;
	}
}
OSStatus UMADrawThemePlacard( const Rect *inRect , ThemeDrawState inState )
{
  return ::DrawThemePlacard( inRect , inState ) ;
}

#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
}

wxMacPortStateHelper::wxMacPortStateHelper( GrafPtr newport)
{
  m_clip = NULL ;
  Setup( newport ) ;
}

wxMacPortStateHelper::wxMacPortStateHelper()
{
	m_clip = NULL ;
}

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