[wxWidgets.git] / src / mac / classic / cursor.cpp

/////////////////////////////////////////////////////////////////////////////
// Name:        cursor.cpp
// Purpose:     wxCursor class
// Author:      Stefan Csomor
// Modified by:
// Created:     1998-01-01
// RCS-ID:      $Id$
// Copyright:   (c) Stefan Csomor
// Licence:       wxWindows licence
/////////////////////////////////////////////////////////////////////////////

#ifdef __GNUG__
#pragma implementation "cursor.h"
#endif

#include "wx/defs.h"

#include "wx/app.h"
#include "wx/cursor.h"
#include "wx/icon.h"
#include "wx/image.h"
#include "wx/xpmdecod.h"

#include "wx/mac/private.h"

#if !USE_SHARED_LIBRARIES
IMPLEMENT_DYNAMIC_CLASS(wxCursor, wxBitmap)
#endif

const short kwxCursorBullseye = 10 ;
const short kwxCursorBlank = 11 ;
const short kwxCursorPencil = 12 ;
const short kwxCursorMagnifier = 13 ;
const short kwxCursorNoEntry = 14 ;
const short kwxCursorPaintBrush = 15 ;
const short kwxCursorPointRight = 16 ;
const short kwxCursorPointLeft = 17 ;
const short kwxCursorQuestionArrow = 18 ;
const short kwxCursorRightArrow = 19 ;
const short kwxCursorSizeNS = 20 ;
const short kwxCursorSize = 21 ;
const short kwxCursorSizeNESW = 22 ;
const short kwxCursorSizeNWSE = 23 ;
const short kwxCursorRoller = 24 ;

wxCursor    gMacCurrentCursor ;

wxCursorRefData::wxCursorRefData()
{
    m_width = 16; 
    m_height = 16;
    m_hCursor = NULL ;
    m_disposeHandle = false ;
    m_releaseHandle = false ;
    m_isColorCursor = false ;
    m_themeCursor = -1 ;
}

wxCursorRefData::~wxCursorRefData()
{
    if ( m_isColorCursor )
    {
        ::DisposeCCursor( (CCrsrHandle) m_hCursor ) ;
    }
    else if ( m_disposeHandle )
    {
        ::DisposeHandle( (Handle ) m_hCursor ) ;
    } 
    else if ( m_releaseHandle )
    {
        // we don't release the resource since it may already
        // be in use again
    }
}

// Cursors
wxCursor::wxCursor()
{
}

wxCursor::wxCursor(const char WXUNUSED(bits)[], int WXUNUSED(width), int WXUNUSED(height),
    int WXUNUSED(hotSpotX), int WXUNUSED(hotSpotY), const char WXUNUSED(maskBits)[])
{
}

wxCursor::wxCursor( const wxImage &image )
{
    CreateFromImage( image ) ;
}

wxCursor::wxCursor(const char **bits) 
{
    (void) CreateFromXpm(bits);
}

wxCursor::wxCursor(char **bits) 
{
    (void) CreateFromXpm((const char **)bits);
}

bool wxCursor::CreateFromXpm(const char **bits)
{
    wxCHECK_MSG( bits != NULL, FALSE, wxT("invalid cursor data") )
    wxXPMDecoder decoder;
    wxImage img = decoder.ReadData(bits);
    wxCHECK_MSG( img.Ok(), FALSE, wxT("invalid cursor data") )    
	CreateFromImage( img ) ;
    return TRUE;
}

short GetCTabIndex( CTabHandle colors , RGBColor *col )
{
    short retval = 0 ;
    unsigned long bestdiff = 0xFFFF ;
    for ( int i = 0 ; i < (**colors).ctSize ; ++i )
    {
        unsigned long diff = abs(col->red -  (**colors).ctTable[i].rgb.red ) +
            abs(col->green -  (**colors).ctTable[i].rgb.green ) +
            abs(col->blue -  (**colors).ctTable[i].rgb.blue ) ;
        if ( diff < bestdiff )
        {
            bestdiff = diff ;
            retval = (**colors).ctTable[i].value ;
        }
    }
    return retval ;
}

void wxCursor::CreateFromImage(const wxImage & image) 
{
    m_refData = new wxCursorRefData;

    wxImage image16 = image.Scale(16,16) ;
       unsigned char * rgbBits = image16.GetData();
 
    
    int w = image16.GetWidth()  ;
    int h = image16.GetHeight() ;
    bool bHasMask = image16.HasMask() ;

       int hotSpotX = image16.GetOptionInt(wxIMAGE_OPTION_CUR_HOTSPOT_X);
    int hotSpotY = image16.GetOptionInt(wxIMAGE_OPTION_CUR_HOTSPOT_Y);
    if (hotSpotX < 0 || hotSpotX >= w)
            hotSpotX = 0;
    if (hotSpotY < 0 || hotSpotY >= h)
            hotSpotY = 0;
            
#if 0
    // monochrome implementation
    M_CURSORDATA->m_hCursor = NewHandle( sizeof( Cursor ) ) ;
    M_CURSORDATA->m_disposeHandle = true ;
    HLock( (Handle) M_CURSORDATA->m_hCursor ) ;
    CursPtr cp = *(CursHandle)M_CURSORDATA->m_hCursor ;
    memset( cp->data , 0 , sizeof( Bits16 ) ) ;
    memset( cp->mask , 0 , sizeof( Bits16 ) ) ;
    
    unsigned char mr = image16.GetMaskRed() ;
    unsigned char mg = image16.GetMaskGreen() ;
    unsigned char mb = image16.GetMaskBlue() ;
    for ( int y = 0 ; y < h ; ++y )
    {
        short rowbits = 0 ;
        short maskbits = 0 ;
        
        for ( int x = 0 ; x < w ; ++x )
        {
            long pos = (y * w + x) * 3;

            unsigned char r = rgbBits[pos] ;
            unsigned char g = rgbBits[pos+1] ;
            unsigned char b = rgbBits[pos+2] ;
            if ( bHasMask && r==mr && g==mg && b==mb )
            {
                // masked area, does not appear anywhere
            }
            else
            {
                if ( (int)r + (int)g + (int)b < 0x0200 )
                {
                    rowbits |= ( 1 << (15-x) ) ;
                }
                maskbits |= ( 1 << (15-x) ) ;
            }
        }
        cp->data[y] = rowbits ;
        cp->mask[y] = maskbits ;
    }
    if ( !bHasMask )
    {
        memcpy( cp->mask , cp->data , sizeof( Bits16) ) ;
    }
    cp->hotSpot.h = hotSpotX ;
    cp->hotSpot.v = hotSpotY ;
    HUnlock( (Handle) M_CURSORDATA->m_hCursor ) ;
#else
    PixMapHandle pm = (PixMapHandle) NewHandleClear( sizeof (PixMap))  ;
    short extent = 16 ;
    short bytesPerPixel = 1 ;
    short depth = 8 ;
    Rect bounds = { 0 , 0 , extent , extent } ;
    CCrsrHandle ch = (CCrsrHandle) NewHandleClear ( sizeof( CCrsr ) ) ;
    CTabHandle newColors = GetCTable( 8 ) ;
    HandToHand((Handle *) &newColors);
    // set the values to the indices
    for ( int i = 0 ; i < (**newColors).ctSize ; ++i )
    {
        (**newColors).ctTable[i].value = i ;
    }
    HLock( (Handle) ch) ;
    (**ch).crsrType = 0x8001 ; // color cursors
    (**ch).crsrMap = pm ; 
    short bytesPerRow = bytesPerPixel * extent ;

    (**pm).baseAddr = 0; 
    (**pm).rowBytes = bytesPerRow | 0x8000;
    (**pm).bounds = bounds;        
    (**pm).pmVersion = 0;           
    (**pm).packType = 0;            
    (**pm).packSize = 0;            
    (**pm).hRes = 0x00480000; /* 72 DPI default res */
    (**pm).vRes = 0x00480000; /* 72 DPI default res */
    (**pm).pixelSize = depth;
    (**pm).pixelType = 0;
    (**pm).cmpCount = 1; 
    (**pm).cmpSize = depth;
    (**pm).pmTable = newColors;

    (**ch).crsrData = NewHandleClear( extent * bytesPerRow ) ;  
    (**ch).crsrXData = NULL ;
    (**ch).crsrXValid = 0;
    (**ch).crsrXHandle = NULL;

    (**ch).crsrHotSpot.h = hotSpotX ;
    (**ch).crsrHotSpot.v = hotSpotY ;
    (**ch).crsrXTable = NULL ; 
    (**ch).crsrID = GetCTSeed() ;
    
    memset( (**ch).crsr1Data  , 0 , sizeof( Bits16 ) ) ;
    memset( (**ch).crsrMask , 0 , sizeof( Bits16 ) ) ;
    
    unsigned char mr = image16.GetMaskRed() ;
    unsigned char mg = image16.GetMaskGreen() ;
    unsigned char mb = image16.GetMaskBlue() ;
    for ( int y = 0 ; y < h ; ++y )
    {
        short rowbits = 0 ;
        short maskbits = 0 ;
        
        for ( int x = 0 ; x < w ; ++x )
        {
            long pos = (y * w + x) * 3;

            unsigned char r = rgbBits[pos] ;
            unsigned char g = rgbBits[pos+1] ;
            unsigned char b = rgbBits[pos+2] ;
            RGBColor col = { 0xFFFF ,0xFFFF, 0xFFFF } ;
            
            if ( bHasMask && r==mr && g==mg && b==mb )
            {
                // masked area, does not appear anywhere
            }
            else
            {
                if ( (int)r + (int)g + (int)b < 0x0200 )
                {
                    rowbits |= ( 1 << (15-x) ) ;
                }
                maskbits |= ( 1 << (15-x) ) ;
                
                col = *((RGBColor*) wxColor( r , g , b ).GetPixel()) ;
            }
            *((*(**ch).crsrData) + y * bytesPerRow + x) = 
                GetCTabIndex( newColors , &col) ;
        }
        (**ch).crsr1Data[y] = rowbits ;
        (**ch).crsrMask[y] = maskbits ;
    }
    if ( !bHasMask )
    {
        memcpy( (**ch).crsrMask , (**ch).crsr1Data , sizeof( Bits16) ) ;
    }
    
    HUnlock((Handle) ch) ;
    M_CURSORDATA->m_hCursor = ch ;
    M_CURSORDATA->m_isColorCursor = true ;
#endif
}

wxCursor::wxCursor(const wxString& cursor_file, long flags, int hotSpotX, int hotSpotY)
{
    m_refData = new wxCursorRefData;
    if ( flags == wxBITMAP_TYPE_MACCURSOR_RESOURCE )
    {
        Str255 theName ;
		wxMacStringToPascal( cursor_file , theName ) ;
        
        wxStAppResource resload ;
        Handle resHandle = ::GetNamedResource( 'crsr' , theName ) ;
        if ( resHandle )
        {
            short theId = -1 ;
            OSType theType ;
            GetResInfo( resHandle , &theId , &theType , theName ) ;
            ReleaseResource( resHandle ) ;
            M_CURSORDATA->m_hCursor = GetCCursor( theId ) ;
            if ( M_CURSORDATA->m_hCursor )
                M_CURSORDATA->m_isColorCursor = true ;
        }
        else
        {       
            Handle resHandle = ::GetNamedResource( 'CURS' , theName ) ;
            if ( resHandle )
            {
                short theId = -1 ;
                OSType theType ;
                GetResInfo( resHandle , &theId , &theType , theName ) ;
                ReleaseResource( resHandle ) ;
                 M_CURSORDATA->m_hCursor = GetCursor( theId ) ;
                if ( M_CURSORDATA->m_hCursor )
                    M_CURSORDATA->m_releaseHandle = true ;
            }
        }
    }
    else
    {
        wxImage image ;
        image.LoadFile( cursor_file , flags ) ;
        if( image.Ok() )
        {
            image.SetOption(wxIMAGE_OPTION_CUR_HOTSPOT_X,hotSpotX ) ;
            image.SetOption(wxIMAGE_OPTION_CUR_HOTSPOT_Y,hotSpotY ) ;
            delete m_refData ;
            CreateFromImage(image) ;
        }
    }
}

// Cursors by stock number
wxCursor::wxCursor(int cursor_type)
{
    m_refData = new wxCursorRefData;
    
    switch (cursor_type)
    {
    case wxCURSOR_COPY_ARROW:
        M_CURSORDATA->m_themeCursor = kThemeCopyArrowCursor ;
        break;
    case wxCURSOR_WAIT:
        M_CURSORDATA->m_themeCursor = kThemeWatchCursor ;
        break;
    case wxCURSOR_IBEAM:
        M_CURSORDATA->m_themeCursor = kThemeIBeamCursor ;
        break;
    case wxCURSOR_CROSS:
        M_CURSORDATA->m_themeCursor = kThemeCrossCursor;
        break;
    case wxCURSOR_SIZENWSE:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSizeNWSE);
        }
        break;
    case wxCURSOR_SIZENESW:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSizeNESW);
        }
        break;
    case wxCURSOR_SIZEWE:
        {
            M_CURSORDATA->m_themeCursor = kThemeResizeLeftRightCursor;
        }
        break;
    case wxCURSOR_SIZENS:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSizeNS);
        }
        break;
    case wxCURSOR_SIZING:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSize);
        }
        break;
    case wxCURSOR_HAND:
        {
            M_CURSORDATA->m_themeCursor = kThemePointingHandCursor;
        }
        break;
    case wxCURSOR_BULLSEYE:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorBullseye);
        }
        break;
    case wxCURSOR_PENCIL:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPencil);
        }
        break;
    case wxCURSOR_MAGNIFIER:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorMagnifier);
        }
        break;
    case wxCURSOR_NO_ENTRY:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorNoEntry);
        }
        break;
    case wxCURSOR_WATCH:
        {
            M_CURSORDATA->m_themeCursor = kThemeWatchCursor;
            break;
        }
    case wxCURSOR_PAINT_BRUSH:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPaintBrush);
            break;
        }
    case wxCURSOR_POINT_LEFT:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPointLeft);
            break;
        }
    case wxCURSOR_POINT_RIGHT:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPointRight);
            break;
        }
    case wxCURSOR_QUESTION_ARROW:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorQuestionArrow);
            break;
        }
    case wxCURSOR_BLANK:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorBlank);
            break;
        }
    case wxCURSOR_RIGHT_ARROW:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorRightArrow);
            break;
        }
    case wxCURSOR_SPRAYCAN:
        {
            wxStAppResource resload ;
            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorRoller);
            break;
        }
    case wxCURSOR_CHAR:
    case wxCURSOR_ARROW:
    case wxCURSOR_LEFT_BUTTON:
    case wxCURSOR_RIGHT_BUTTON:
    case wxCURSOR_MIDDLE_BUTTON:
    default:
        M_CURSORDATA->m_themeCursor = kThemeArrowCursor ;
        break;
    }
    if ( M_CURSORDATA->m_themeCursor == -1 )
        M_CURSORDATA->m_releaseHandle = true ;
}

void wxCursor::MacInstall() const 
{
    gMacCurrentCursor = *this ;
    if ( m_refData && M_CURSORDATA->m_themeCursor != -1 )
    {
        SetThemeCursor( M_CURSORDATA->m_themeCursor ) ;
    }
    else if ( m_refData && M_CURSORDATA->m_hCursor )
    {
        if ( M_CURSORDATA->m_isColorCursor )
            ::SetCCursor( (CCrsrHandle) M_CURSORDATA->m_hCursor ) ;
        else
            ::SetCursor( * (CursHandle) M_CURSORDATA->m_hCursor ) ;
    }
    else
    {
        SetThemeCursor( kThemeArrowCursor ) ;
    }
}

wxCursor::~wxCursor()
{
}

// Global cursor setting
void wxSetCursor(const wxCursor& cursor)
{
    cursor.MacInstall() ;
}
Commit	Line	Data
2646f485 SC	1	/////////////////////////////////////////////////////////////////////////////
	2	// Name: cursor.cpp
	3	// Purpose: wxCursor class
	4	// Author: Stefan Csomor
	5	// Modified by:
	6	// Created: 1998-01-01
	7	// RCS-ID: $Id$
	8	// Copyright: (c) Stefan Csomor
	9	// Licence: wxWindows licence
	10	/////////////////////////////////////////////////////////////////////////////
	11
	12	#ifdef __GNUG__
	13	#pragma implementation "cursor.h"
	14	#endif
	15
	16	#include "wx/defs.h"
	17
	18	#include "wx/app.h"
	19	#include "wx/cursor.h"
	20	#include "wx/icon.h"
	21	#include "wx/image.h"
	22	#include "wx/xpmdecod.h"
	23
	24	#include "wx/mac/private.h"
	25
	26	#if !USE_SHARED_LIBRARIES
	27	IMPLEMENT_DYNAMIC_CLASS(wxCursor, wxBitmap)
	28	#endif
	29
	30	const short kwxCursorBullseye = 10 ;
	31	const short kwxCursorBlank = 11 ;
	32	const short kwxCursorPencil = 12 ;
	33	const short kwxCursorMagnifier = 13 ;
	34	const short kwxCursorNoEntry = 14 ;
	35	const short kwxCursorPaintBrush = 15 ;
	36	const short kwxCursorPointRight = 16 ;
	37	const short kwxCursorPointLeft = 17 ;
	38	const short kwxCursorQuestionArrow = 18 ;
	39	const short kwxCursorRightArrow = 19 ;
	40	const short kwxCursorSizeNS = 20 ;
	41	const short kwxCursorSize = 21 ;
	42	const short kwxCursorSizeNESW = 22 ;
	43	const short kwxCursorSizeNWSE = 23 ;
	44	const short kwxCursorRoller = 24 ;
	45
	46	wxCursor gMacCurrentCursor ;
	47
	48	wxCursorRefData::wxCursorRefData()
	49	{
	50	m_width = 16;
	51	m_height = 16;
	52	m_hCursor = NULL ;
	53	m_disposeHandle = false ;
	54	m_releaseHandle = false ;
	55	m_isColorCursor = false ;
	56	m_themeCursor = -1 ;
	57	}
	58
	59	wxCursorRefData::~wxCursorRefData()
	60	{
	61	if ( m_isColorCursor )
	62	{
	63	::DisposeCCursor( (CCrsrHandle) m_hCursor ) ;
	64	}
65	else if ( m_disposeHandle )
66	{
67	::DisposeHandle( (Handle ) m_hCursor ) ;
68	}
69	else if ( m_releaseHandle )
70	{
71	// we don't release the resource since it may already
72	// be in use again
73	}
74	}
75
76	// Cursors
77	wxCursor::wxCursor()
78	{
79	}
80
81	wxCursor::wxCursor(const char WXUNUSED(bits)[], int WXUNUSED(width), int WXUNUSED(height),
82	int WXUNUSED(hotSpotX), int WXUNUSED(hotSpotY), const char WXUNUSED(maskBits)[])
83	{
84	}
85
86	wxCursor::wxCursor( const wxImage &image )
87	{
88	CreateFromImage( image ) ;
89	}
90
91	wxCursor::wxCursor(const char **bits)
92	{
93	(void) CreateFromXpm(bits);
94	}
95
96	wxCursor::wxCursor(char **bits)
97	{
98	(void) CreateFromXpm((const char **)bits);
99	}
100
101	bool wxCursor::CreateFromXpm(const char **bits)
102	{
103	wxCHECK_MSG( bits != NULL, FALSE, wxT("invalid cursor data") )
104	wxXPMDecoder decoder;
105	wxImage img = decoder.ReadData(bits);
106	wxCHECK_MSG( img.Ok(), FALSE, wxT("invalid cursor data") )
107	CreateFromImage( img ) ;
108	return TRUE;
109	}
110
111	short GetCTabIndex( CTabHandle colors , RGBColor *col )
112	{
113	short retval = 0 ;
114	unsigned long bestdiff = 0xFFFF ;
115	for ( int i = 0 ; i < (**colors).ctSize ; ++i )
116	{
117	unsigned long diff = abs(col->red - (**colors).ctTable[i].rgb.red ) +
118	abs(col->green - (**colors).ctTable[i].rgb.green ) +
119	abs(col->blue - (**colors).ctTable[i].rgb.blue ) ;
120	if ( diff < bestdiff )
121	{
122	bestdiff = diff ;
123	retval = (**colors).ctTable[i].value ;
124	}
125	}
126	return retval ;
127	}
128
129	void wxCursor::CreateFromImage(const wxImage & image)
130	{
131	m_refData = new wxCursorRefData;
132
133	wxImage image16 = image.Scale(16,16) ;
134	unsigned char * rgbBits = image16.GetData();
135
136
137	int w = image16.GetWidth() ;
138	int h = image16.GetHeight() ;
139	bool bHasMask = image16.HasMask() ;
140
141	int hotSpotX = image16.GetOptionInt(wxIMAGE_OPTION_CUR_HOTSPOT_X);
142	int hotSpotY = image16.GetOptionInt(wxIMAGE_OPTION_CUR_HOTSPOT_Y);
143	if (hotSpotX < 0 \|\| hotSpotX >= w)
144	hotSpotX = 0;
145	if (hotSpotY < 0 \|\| hotSpotY >= h)
146	hotSpotY = 0;
147
148	#if 0
149	// monochrome implementation
150	M_CURSORDATA->m_hCursor = NewHandle( sizeof( Cursor ) ) ;
151	M_CURSORDATA->m_disposeHandle = true ;
152	HLock( (Handle) M_CURSORDATA->m_hCursor ) ;
153	CursPtr cp = *(CursHandle)M_CURSORDATA->m_hCursor ;
154	memset( cp->data , 0 , sizeof( Bits16 ) ) ;
155	memset( cp->mask , 0 , sizeof( Bits16 ) ) ;
156
157	unsigned char mr = image16.GetMaskRed() ;
158	unsigned char mg = image16.GetMaskGreen() ;
159	unsigned char mb = image16.GetMaskBlue() ;
160	for ( int y = 0 ; y < h ; ++y )
161	{
162	short rowbits = 0 ;
163	short maskbits = 0 ;
164
165	for ( int x = 0 ; x < w ; ++x )
166	{
167	long pos = (y * w + x) * 3;
168
169	unsigned char r = rgbBits[pos] ;
170	unsigned char g = rgbBits[pos+1] ;
171	unsigned char b = rgbBits[pos+2] ;
172	if ( bHasMask && r==mr && g==mg && b==mb )
173	{
174	// masked area, does not appear anywhere
175	}
176	else
177	{
178	if ( (int)r + (int)g + (int)b < 0x0200 )
179	{
180	rowbits \|= ( 1 << (15-x) ) ;
181	}
182	maskbits \|= ( 1 << (15-x) ) ;
183	}
184	}
185	cp->data[y] = rowbits ;
186	cp->mask[y] = maskbits ;
187	}
188	if ( !bHasMask )
189	{
190	memcpy( cp->mask , cp->data , sizeof( Bits16) ) ;
191	}
192	cp->hotSpot.h = hotSpotX ;
193	cp->hotSpot.v = hotSpotY ;
194	HUnlock( (Handle) M_CURSORDATA->m_hCursor ) ;
195	#else
196	PixMapHandle pm = (PixMapHandle) NewHandleClear( sizeof (PixMap)) ;
197	short extent = 16 ;
198	short bytesPerPixel = 1 ;
199	short depth = 8 ;
200	Rect bounds = { 0 , 0 , extent , extent } ;
201	CCrsrHandle ch = (CCrsrHandle) NewHandleClear ( sizeof( CCrsr ) ) ;
202	CTabHandle newColors = GetCTable( 8 ) ;
203	HandToHand((Handle *) &newColors);
204	// set the values to the indices
205	for ( int i = 0 ; i < (**newColors).ctSize ; ++i )
206	{
207	(**newColors).ctTable[i].value = i ;
208	}
209	HLock( (Handle) ch) ;
210	(**ch).crsrType = 0x8001 ; // color cursors
211	(**ch).crsrMap = pm ;
212	short bytesPerRow = bytesPerPixel * extent ;
213
214	(**pm).baseAddr = 0;
215	(**pm).rowBytes = bytesPerRow \| 0x8000;
216	(**pm).bounds = bounds;
217	(**pm).pmVersion = 0;
218	(**pm).packType = 0;
219	(**pm).packSize = 0;
220	(*pm).hRes = 0x00480000; / 72 DPI default res */
221	(*pm).vRes = 0x00480000; / 72 DPI default res */
222	(**pm).pixelSize = depth;
223	(**pm).pixelType = 0;
224	(**pm).cmpCount = 1;
225	(**pm).cmpSize = depth;
226	(**pm).pmTable = newColors;
227
228	(*ch).crsrData = NewHandleClear( extent bytesPerRow ) ;
229	(**ch).crsrXData = NULL ;
230	(**ch).crsrXValid = 0;
231	(**ch).crsrXHandle = NULL;
232
233	(**ch).crsrHotSpot.h = hotSpotX ;
234	(**ch).crsrHotSpot.v = hotSpotY ;
235	(**ch).crsrXTable = NULL ;
236	(**ch).crsrID = GetCTSeed() ;
237
238	memset( (**ch).crsr1Data , 0 , sizeof( Bits16 ) ) ;
239	memset( (**ch).crsrMask , 0 , sizeof( Bits16 ) ) ;
240
241	unsigned char mr = image16.GetMaskRed() ;
242	unsigned char mg = image16.GetMaskGreen() ;
243	unsigned char mb = image16.GetMaskBlue() ;
244	for ( int y = 0 ; y < h ; ++y )
245	{
246	short rowbits = 0 ;
247	short maskbits = 0 ;
248
249	for ( int x = 0 ; x < w ; ++x )
250	{
251	long pos = (y * w + x) * 3;
252
253	unsigned char r = rgbBits[pos] ;
254	unsigned char g = rgbBits[pos+1] ;
255	unsigned char b = rgbBits[pos+2] ;
256	RGBColor col = { 0xFFFF ,0xFFFF, 0xFFFF } ;
257
258	if ( bHasMask && r==mr && g==mg && b==mb )
259	{
260	// masked area, does not appear anywhere
261	}
262	else
263	{
264	if ( (int)r + (int)g + (int)b < 0x0200 )
265	{
266	rowbits \|= ( 1 << (15-x) ) ;
267	}
268	maskbits \|= ( 1 << (15-x) ) ;
269
270	col = ((RGBColor) wxColor( r , g , b ).GetPixel()) ;
271	}
272	(((*ch).crsrData) + y bytesPerRow + x) =
273	GetCTabIndex( newColors , &col) ;
274	}
275	(**ch).crsr1Data[y] = rowbits ;
276	(**ch).crsrMask[y] = maskbits ;
277	}
278	if ( !bHasMask )
279	{
280	memcpy( (ch).crsrMask , (ch).crsr1Data , sizeof( Bits16) ) ;
281	}
282
283	HUnlock((Handle) ch) ;
284	M_CURSORDATA->m_hCursor = ch ;
285	M_CURSORDATA->m_isColorCursor = true ;
286	#endif
287	}
288
289	wxCursor::wxCursor(const wxString& cursor_file, long flags, int hotSpotX, int hotSpotY)
290	{
291	m_refData = new wxCursorRefData;
292	if ( flags == wxBITMAP_TYPE_MACCURSOR_RESOURCE )
293	{
294	Str255 theName ;
295	wxMacStringToPascal( cursor_file , theName ) ;
296
297	wxStAppResource resload ;
298	Handle resHandle = ::GetNamedResource( 'crsr' , theName ) ;
299	if ( resHandle )
300	{
301	short theId = -1 ;
302	OSType theType ;
303	GetResInfo( resHandle , &theId , &theType , theName ) ;
304	ReleaseResource( resHandle ) ;
305	M_CURSORDATA->m_hCursor = GetCCursor( theId ) ;
306	if ( M_CURSORDATA->m_hCursor )
307	M_CURSORDATA->m_isColorCursor = true ;
308	}
309	else
310	{
311	Handle resHandle = ::GetNamedResource( 'CURS' , theName ) ;
312	if ( resHandle )
313	{
314	short theId = -1 ;
315	OSType theType ;
316	GetResInfo( resHandle , &theId , &theType , theName ) ;
317	ReleaseResource( resHandle ) ;
318	M_CURSORDATA->m_hCursor = GetCursor( theId ) ;
319	if ( M_CURSORDATA->m_hCursor )
320	M_CURSORDATA->m_releaseHandle = true ;
321	}
322	}
323	}
324	else
325	{
326	wxImage image ;
327	image.LoadFile( cursor_file , flags ) ;
328	if( image.Ok() )
329	{
330	image.SetOption(wxIMAGE_OPTION_CUR_HOTSPOT_X,hotSpotX ) ;
331	image.SetOption(wxIMAGE_OPTION_CUR_HOTSPOT_Y,hotSpotY ) ;
332	delete m_refData ;
333	CreateFromImage(image) ;
334	}
335	}
336	}
337
338	// Cursors by stock number
339	wxCursor::wxCursor(int cursor_type)
340	{
341	m_refData = new wxCursorRefData;
342
343	switch (cursor_type)
344	{
345	case wxCURSOR_COPY_ARROW:
346	M_CURSORDATA->m_themeCursor = kThemeCopyArrowCursor ;
347	break;
348	case wxCURSOR_WAIT:
349	M_CURSORDATA->m_themeCursor = kThemeWatchCursor ;
350	break;
351	case wxCURSOR_IBEAM:
352	M_CURSORDATA->m_themeCursor = kThemeIBeamCursor ;
353	break;
354	case wxCURSOR_CROSS:
355	M_CURSORDATA->m_themeCursor = kThemeCrossCursor;
356	break;
357	case wxCURSOR_SIZENWSE:
358	{
359	wxStAppResource resload ;
360	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSizeNWSE);
361	}
362	break;
363	case wxCURSOR_SIZENESW:
364	{
365	wxStAppResource resload ;
366	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSizeNESW);
367	}
368	break;
369	case wxCURSOR_SIZEWE:
370	{
371	M_CURSORDATA->m_themeCursor = kThemeResizeLeftRightCursor;
372	}
373	break;
374	case wxCURSOR_SIZENS:
375	{
376	wxStAppResource resload ;
377	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSizeNS);
378	}
379	break;
380	case wxCURSOR_SIZING:
381	{
382	wxStAppResource resload ;
383	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSize);
384	}
385	break;
386	case wxCURSOR_HAND:
387	{
388	M_CURSORDATA->m_themeCursor = kThemePointingHandCursor;
389	}
390	break;
391	case wxCURSOR_BULLSEYE:
392	{
393	wxStAppResource resload ;
394	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorBullseye);
395	}
396	break;
397	case wxCURSOR_PENCIL:
398	{
399	wxStAppResource resload ;
400	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPencil);
401	}
402	break;
403	case wxCURSOR_MAGNIFIER:
404	{
405	wxStAppResource resload ;
406	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorMagnifier);
407	}
408	break;
409	case wxCURSOR_NO_ENTRY:
410	{
411	wxStAppResource resload ;
412	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorNoEntry);
413	}
414	break;
415	case wxCURSOR_WATCH:
416	{
417	M_CURSORDATA->m_themeCursor = kThemeWatchCursor;
418	break;
419	}
420	case wxCURSOR_PAINT_BRUSH:
421	{
422	wxStAppResource resload ;
423	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPaintBrush);
424	break;
425	}
426	case wxCURSOR_POINT_LEFT:
427	{
428	wxStAppResource resload ;
429	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPointLeft);
430	break;
431	}
432	case wxCURSOR_POINT_RIGHT:
433	{
434	wxStAppResource resload ;
435	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPointRight);
436	break;
437	}
438	case wxCURSOR_QUESTION_ARROW:
439	{
440	wxStAppResource resload ;
441	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorQuestionArrow);
442	break;
443	}
444	case wxCURSOR_BLANK:
445	{
446	wxStAppResource resload ;
447	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorBlank);
448	break;
449	}
450	case wxCURSOR_RIGHT_ARROW:
451	{
452	wxStAppResource resload ;
453	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorRightArrow);
454	break;
455	}
456	case wxCURSOR_SPRAYCAN:
457	{
458	wxStAppResource resload ;
459	M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorRoller);
460	break;
461	}
462	case wxCURSOR_CHAR:
463	case wxCURSOR_ARROW:
464	case wxCURSOR_LEFT_BUTTON:
465	case wxCURSOR_RIGHT_BUTTON:
466	case wxCURSOR_MIDDLE_BUTTON:
467	default:
468	M_CURSORDATA->m_themeCursor = kThemeArrowCursor ;
469	break;
470	}
471	if ( M_CURSORDATA->m_themeCursor == -1 )
472	M_CURSORDATA->m_releaseHandle = true ;
473	}
474
475	void wxCursor::MacInstall() const
476	{
477	gMacCurrentCursor = *this ;
478	if ( m_refData && M_CURSORDATA->m_themeCursor != -1 )
479	{
480	SetThemeCursor( M_CURSORDATA->m_themeCursor ) ;
481	}
482	else if ( m_refData && M_CURSORDATA->m_hCursor )
483	{
484	if ( M_CURSORDATA->m_isColorCursor )
485	::SetCCursor( (CCrsrHandle) M_CURSORDATA->m_hCursor ) ;
486	else
487	::SetCursor( * (CursHandle) M_CURSORDATA->m_hCursor ) ;
488	}
489	else
490	{
491	SetThemeCursor( kThemeArrowCursor ) ;
492	}
493	}
494
495	wxCursor::~wxCursor()
496	{
497	}
498
499	// Global cursor setting
500	void wxSetCursor(const wxCursor& cursor)
501	{
502	cursor.MacInstall() ;
503	}
504
505