]> git.saurik.com Git - wxWidgets.git/blobdiff - src/mac/carbon/cursor.cpp
check that the version of __sync_sub_and_fetch that returns a value is supported...
[wxWidgets.git] / src / mac / carbon / cursor.cpp
index 79633bf14da10cf8df5decc7b699f5558d375851..e8f64259474e6b51c9d6be7c30cd9f6b1bd6c799 100644 (file)
 /////////////////////////////////////////////////////////////////////////////
-// Name:        cursor.cpp
+// Name:        src/mac/carbon/cursor.cpp
 // Purpose:     wxCursor class
 // Author:      Stefan Csomor
 // Modified by:
 // Created:     1998-01-01
 // RCS-ID:      $Id$
 // Copyright:   (c) Stefan Csomor
-// Licence:       wxWindows licence
+// Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
-#ifdef __GNUG__
-#pragma implementation "cursor.h"
-#endif
-
-#include "wx/defs.h"
+#include "wx/wxprec.h"
 
-#include "wx/app.h"
 #include "wx/cursor.h"
-#include "wx/icon.h"
-#include "wx/image.h"
+
+#ifndef WX_PRECOMP
+    #include "wx/app.h"
+    #include "wx/icon.h"
+    #include "wx/image.h"
+#endif // WX_PRECOMP
+
+#include "wx/xpmdecod.h"
+
 #include "wx/mac/private.h"
 
-#if !USE_SHARED_LIBRARIES
-IMPLEMENT_DYNAMIC_CLASS(wxCursor, wxBitmap)
+
+IMPLEMENT_DYNAMIC_CLASS(wxCursor, wxGDIObject)
+
+
+class WXDLLEXPORT wxCursorRefData: public wxGDIRefData
+{
+    friend class wxCursor;
+
+    DECLARE_NO_COPY_CLASS(wxCursorRefData)
+
+public:
+    wxCursorRefData();
+    virtual ~wxCursorRefData();
+
+protected:
+#if wxMAC_USE_COCOA
+    WX_NSCursor m_hCursor;
+#else
+    WXHCURSOR     m_hCursor;
+    bool        m_disposeHandle;
+    bool        m_releaseHandle;
+    bool        m_isColorCursor;
+    long        m_themeCursor;
 #endif
+};
+
+#define M_CURSORDATA wx_static_cast(wxCursorRefData*, m_refData)
 
-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 ;
+ClassicCursor gMacCursors[kwxCursorLast+1] =
+{
+
+{
+{0x0000, 0x03E0, 0x0630, 0x0808, 0x1004, 0x31C6, 0x2362, 0x2222,
+0x2362, 0x31C6, 0x1004, 0x0808, 0x0630, 0x03E0, 0x0000, 0x0000},
+{0x0000, 0x03E0, 0x07F0, 0x0FF8, 0x1FFC, 0x3FFE, 0x3FFE, 0x3FFE,
+0x3FFE, 0x3FFE, 0x1FFC, 0x0FF8, 0x07F0, 0x03E0, 0x0000, 0x0000},
+{0x0007, 0x0008}
+},
+
+{
+{0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
+0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000},
+{0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
+0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000},
+{0x0000, 0x0000}
+},
+
+{
+{0x00F0, 0x0088, 0x0108, 0x0190, 0x0270, 0x0220, 0x0440, 0x0440,
+0x0880, 0x0880, 0x1100, 0x1E00, 0x1C00, 0x1800, 0x1000, 0x0000},
+{0x00F0, 0x00F8, 0x01F8, 0x01F0, 0x03F0, 0x03E0, 0x07C0, 0x07C0,
+0x0F80, 0x0F80, 0x1F00, 0x1E00, 0x1C00, 0x1800, 0x1000, 0x0000},
+{0x000E, 0x0003}
+},
+
+{
+{0x0000, 0x1E00, 0x2100, 0x4080, 0x4080, 0x4080, 0x4080, 0x2180,
+0x1FC0, 0x00E0, 0x0070, 0x0038, 0x001C, 0x000E, 0x0006, 0x0000},
+{0x3F00, 0x7F80, 0xFFC0, 0xFFC0, 0xFFC0, 0xFFC0, 0xFFC0, 0x7FC0,
+0x3FE0, 0x1FF0, 0x00F8, 0x007C, 0x003E, 0x001F, 0x000F, 0x0007},
+{0x0004, 0x0004}
+},
+
+{
+{0x0000, 0x07E0, 0x1FF0, 0x3838, 0x3C0C, 0x6E0E, 0x6706, 0x6386,
+0x61C6, 0x60E6, 0x7076, 0x303C, 0x1C1C, 0x0FF8, 0x07E0, 0x0000},
+{0x0540, 0x0FF0, 0x3FF8, 0x3C3C, 0x7E0E, 0xFF0F, 0x6F86, 0xE7C7,
+0x63E6, 0xE1F7, 0x70FE, 0x707E, 0x3C3C, 0x1FFC, 0x0FF0, 0x0540},
+{0x0007, 0x0007}
+},
+
+{
+{0x0000, 0x0380, 0x0380, 0x0380, 0x0380, 0x0380, 0x0380, 0x0FE0,
+0x1FF0, 0x1FF0, 0x0000, 0x1FF0, 0x1FF0, 0x1550, 0x1550, 0x1550},
+{0x07C0, 0x07C0, 0x07C0, 0x07C0, 0x07C0, 0x07C0, 0x0FE0, 0x1FF0,
+0x3FF8, 0x3FF8, 0x3FF8, 0x3FF8, 0x3FF8, 0x3FF8, 0x3FF8, 0x3FF8},
+{0x000B, 0x0007}
+},
+
+{
+{0x00C0, 0x0140, 0x0640, 0x08C0, 0x3180, 0x47FE, 0x8001, 0x8001,
+0x81FE, 0x8040, 0x01C0, 0x0040, 0x03C0, 0xC080, 0x3F80, 0x0000},
+{0x00C0, 0x01C0, 0x07C0, 0x0FC0, 0x3F80, 0x7FFE, 0xFFFF, 0xFFFF,
+0xFFFE, 0xFFC0, 0xFFC0, 0xFFC0, 0xFFC0, 0xFF80, 0x3F80, 0x0000},
+{0x0006, 0x000F}
+},
+
+{
+{0x0100, 0x0280, 0x0260, 0x0310, 0x018C, 0x7FE3, 0x8000, 0x8000,
+0x7F80, 0x0200, 0x0380, 0x0200, 0x03C0, 0x0107, 0x01F8, 0x0000},
+{0x0100, 0x0380, 0x03E0, 0x03F0, 0x01FC, 0x7FFF, 0xFFFF, 0xFFFF,
+0xFFFF, 0x03FF, 0x03FF, 0x03FF, 0x03FF, 0x01FF, 0x01F8, 0x0000},
+{0x0006, 0x0000}
+},
+
+{
+{0x0000, 0x4078, 0x60FC, 0x71CE, 0x7986, 0x7C06, 0x7E0E, 0x7F1C,
+0x7FB8, 0x7C30, 0x6C30, 0x4600, 0x0630, 0x0330, 0x0300, 0x0000},
+{0xC078, 0xE0FC, 0xF1FE, 0xFBFF, 0xFFCF, 0xFF8F, 0xFF1F, 0xFFBE,
+0xFFFC, 0xFE78, 0xFF78, 0xEFF8, 0xCFF8, 0x87F8, 0x07F8, 0x0300},
+{0x0001, 0x0001}
+},
+
+{
+{0x0000, 0x0002, 0x0006, 0x000E, 0x001E, 0x003E, 0x007E, 0x00FE,
+0x01FE, 0x003E, 0x0036, 0x0062, 0x0060, 0x00C0, 0x00C0, 0x0000},
+{0x0003, 0x0007, 0x000F, 0x001F, 0x003F, 0x007F, 0x00FF, 0x01FF,
+0x03FF, 0x07FF, 0x007F, 0x00F7, 0x00F3, 0x01E1, 0x01E0, 0x01C0},
+{0x0001, 0x000E}
+},
+
+{
+{0x0000, 0x0080, 0x01C0, 0x03E0, 0x0080, 0x0080, 0x0080, 0x1FFC,
+0x1FFC, 0x0080, 0x0080, 0x0080, 0x03E0, 0x01C0, 0x0080, 0x0000},
+{0x0080, 0x01C0, 0x03E0, 0x07F0, 0x0FF8, 0x01C0, 0x3FFE, 0x3FFE,
+0x3FFE, 0x3FFE, 0x01C0, 0x0FF8, 0x07F0, 0x03E0, 0x01C0, 0x0080},
+{0x0007, 0x0008}
+},
+
+{
+{0x0000, 0x0080, 0x01C0, 0x03E0, 0x0080, 0x0888, 0x188C, 0x3FFE,
+0x188C, 0x0888, 0x0080, 0x03E0, 0x01C0, 0x0080, 0x0000, 0x0000},
+{0x0080, 0x01C0, 0x03E0, 0x07F0, 0x0BE8, 0x1DDC, 0x3FFE, 0x7FFF,
+0x3FFE, 0x1DDC, 0x0BE8, 0x07F0, 0x03E0, 0x01C0, 0x0080, 0x0000},
+{0x0007, 0x0008}
+},
+
+{
+{0x0000, 0x001E, 0x000E, 0x060E, 0x0712, 0x03A0, 0x01C0, 0x00E0,
+0x0170, 0x1238, 0x1C18, 0x1C00, 0x1E00, 0x0000, 0x0000, 0x0000},
+{0x007F, 0x003F, 0x0E1F, 0x0F0F, 0x0F97, 0x07E3, 0x03E1, 0x21F0,
+0x31F8, 0x3A7C, 0x3C3C, 0x3E1C, 0x3F00, 0x3F80, 0x0000, 0x0000},
+{0x0006, 0x0009}
+},
+
+{
+{0x0000, 0x7800, 0x7000, 0x7060, 0x48E0, 0x05C0, 0x0380, 0x0700,
+0x0E80, 0x1C48, 0x1838, 0x0038, 0x0078, 0x0000, 0x0000, 0x0000},
+{0xFE00, 0xFC00, 0xF870, 0xF0F0, 0xE9F0, 0xC7E0, 0x87C0, 0x0F84,
+0x1F8C, 0x3E5C, 0x3C3C, 0x387C, 0x00FC, 0x01FC, 0x0000, 0x0000},
+{0x0006, 0x0006}
+},
+
+{
+{0x0006, 0x000E, 0x001C, 0x0018, 0x0020, 0x0040, 0x00F8, 0x0004,
+0x1FF4, 0x200C, 0x2AA8, 0x1FF0, 0x1F80, 0x3800, 0x6000, 0x8000},
+{0x000F, 0x001F, 0x003E, 0x007C, 0x0070, 0x00E0, 0x01FC, 0x3FF6,
+0x7FF6, 0x7FFE, 0x7FFC, 0x7FF8, 0x3FF0, 0x7FC0, 0xF800, 0xE000},
+{0x000A, 0x0006}
+},
+
+};
 
 wxCursor    gMacCurrentCursor ;
 
+#if !wxMAC_USE_COCOA
+CursHandle wxGetStockCursor( int number )
+{
+    wxASSERT_MSG( number >= 0 && number <=kwxCursorLast , wxT("invalid stock cursor id") ) ;
+    CursHandle c = (CursHandle) NewHandle( sizeof(Cursor) ) ;
+    memcpy( *c, &gMacCursors[number], sizeof(Cursor) ) ;
+
+#ifndef WORDS_BIGENDIAN
+    short *sptr = (short*) *c ;
+    for ( int i = 0 ; i < 2 * 16 /* image and mask */ ; ++i, ++sptr )
+    {
+        *sptr = CFSwapInt16( *sptr ) ;
+    }
+#endif
+    return c ;
+}
+#endif
+
 wxCursorRefData::wxCursorRefData()
 {
-    m_width = 16; 
-    m_height = 16;
-    m_hCursor = NULL ;
-    m_disposeHandle = false ;
-    m_releaseHandle = false ;
-    m_isColorCursor = false ;
-    m_themeCursor = -1 ;
+    m_hCursor = NULL;
+#if wxMAC_USE_COCOA
+#else
+    m_disposeHandle = false;
+    m_releaseHandle = false;
+    m_isColorCursor = false;
+    m_themeCursor = -1;
+#endif
 }
 
 wxCursorRefData::~wxCursorRefData()
 {
+#if wxMAC_USE_COCOA
+    if ( m_hCursor )
+        wxMacCocoaRelease(m_hCursor);
+#else
     if ( m_isColorCursor )
     {
-        ::DisposeCCursor( (CCrsrHandle) m_hCursor ) ;
+#ifndef __LP64__
+               ::DisposeCCursor( (CCrsrHandle) m_hCursor ) ;
+#endif
     }
     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
     }
+#endif
 }
 
-// Cursors
 wxCursor::wxCursor()
 {
 }
@@ -83,128 +243,281 @@ wxCursor::wxCursor(const char WXUNUSED(bits)[], int WXUNUSED(width), int WXUNUSE
 
 wxCursor::wxCursor( const wxImage &image )
 {
+#if wxUSE_IMAGE
     CreateFromImage( image ) ;
+#endif
+}
+
+wxCursor::wxCursor(const char **bits)
+{
+    (void) CreateFromXpm(bits);
+}
+
+wxCursor::wxCursor(char **bits)
+{
+    (void) CreateFromXpm((const char **)bits);
 }
 
-void wxCursor::CreateFromImage(const wxImage & image) 
+bool wxCursor::CreateFromXpm(const char **bits)
+{
+#if wxUSE_IMAGE
+    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;
+#else
+    return false;
+#endif
+}
+
+WXHCURSOR wxCursor::GetHCURSOR() const
+{
+    return (M_CURSORDATA ? M_CURSORDATA->m_hCursor : 0);
+}
+
+bool wxCursor::IsOk() const
+{
+#if wxMAC_USE_COCOA
+    return GetHCURSOR() != NULL;
+#else
+    return (m_refData != NULL && ( M_CURSORDATA->m_hCursor != NULL || M_CURSORDATA->m_themeCursor != -1 ) ) ;
+#endif
+}
+
+#if !wxMAC_USE_COCOA
+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 ;
+}
+#endif
+
+#if wxUSE_IMAGE
+
+void wxCursor::CreateFromImage(const wxImage & image)
 {
     m_refData = new wxCursorRefData;
+    int hotSpotX = image.GetOptionInt(wxIMAGE_OPTION_CUR_HOTSPOT_X);
+    int hotSpotY = image.GetOptionInt(wxIMAGE_OPTION_CUR_HOTSPOT_Y);
+#if wxMAC_USE_COCOA
+    wxBitmap bmp( image );
+    CGImageRef cgimage = wxMacCreateCGImageFromBitmap(bmp);
+    if ( cgimage )
+    {
+        M_CURSORDATA->m_hCursor = wxMacCocoaCreateCursorFromCGImage( cgimage, hotSpotX, hotSpotY ); 
+        CFRelease( cgimage );
+    }
+#else
+#ifndef __LP64__
+    int w = 16;
+    int h = 16;
+
+    int image_w = image.GetWidth();
+    int image_h = image.GetHeight();
 
-    wxImage image16 = image.Scale(16,16) ;
-       unsigned char * rgbBits = image16.GetData();
-    
-    int w = image16.GetWidth()  ;
-    int h = image16.GetHeight() ;
+    wxASSERT_MSG( hotSpotX >= 0 && hotSpotX < image_w &&
+                  hotSpotY >= 0 && hotSpotY < image_h,
+                  wxT("invalid cursor hot spot coordinates") );
+
+    wxImage image16(image); // final image of correct size
+
+    // if image is too small then place it in the center, resize it if too big
+    if ((w > image_w) && (h > image_h))
+    {
+        wxPoint offset((w - image_w) / 2, (h - image_h) / 2);
+        hotSpotX = hotSpotX + offset.x;
+        hotSpotY = hotSpotY + offset.y;
+
+        image16 = image.Size(wxSize(w, h), offset);
+    }
+    else if ((w != image_w) || (h != image_h))
+    {
+        hotSpotX = int(hotSpotX * double(w) / double(image_w));
+        hotSpotY = int(hotSpotY * double(h) / double(image_h));
+
+        image16 = image.Scale(w, h);
+    }
+
+    unsigned char * rgbBits = image16.GetData();
     bool bHasMask = image16.HasMask() ;
 
-       int hotSpotX = image16.GetOptionInt(wxCUR_HOTSPOT_X);
-    int hotSpotY = image16.GetOptionInt(wxCUR_HOTSPOT_Y);
-    if (hotSpotX < 0 || hotSpotX >= w)
-            hotSpotX = 0;
-    if (hotSpotY < 0 || hotSpotY >= h)
-            hotSpotY = 0;
-            
-    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 ) ) ;
-    
+    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 = 0 ;
+    (**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 ;
-        
+        short rowbits = 0, 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 )
+            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 < 0x60 )
-                {
-                    rowbits |= ( 1 << (15-x) ) ;
-                }
-                maskbits |= ( 1 << (15-x) ) ;
+                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) ;
         }
-        cp->data[y] = rowbits ;
-        cp->mask[y] = maskbits ;
+#ifdef WORDS_BIGENDIAN
+        (**ch).crsr1Data[y] = rowbits ;
+        (**ch).crsrMask[y] = maskbits ;
+#else
+        (**ch).crsr1Data[y] = CFSwapInt16(rowbits) ;
+        (**ch).crsrMask[y] = CFSwapInt16(maskbits) ;
+#endif
     }
+
     if ( !bHasMask )
-    {
-        memcpy( cp->mask , cp->data , sizeof( Bits16) ) ;
-    }
-    
-    cp->hotSpot.h = hotSpotX ;
-    cp->hotSpot.v = hotSpotY ;
-    HUnlock( (Handle) M_CURSORDATA->m_hCursor ) ;
+        memcpy( (**ch).crsrMask , (**ch).crsr1Data , sizeof( Bits16) ) ;
+
+    HUnlock( (Handle)ch ) ;
+    M_CURSORDATA->m_hCursor = ch ;
+    M_CURSORDATA->m_isColorCursor = true ;
+#endif
+#endif
 }
 
+#endif //wxUSE_IMAGE
+
 wxCursor::wxCursor(const wxString& cursor_file, long flags, int hotSpotX, int hotSpotY)
 {
     m_refData = new wxCursorRefData;
     if ( flags == wxBITMAP_TYPE_MACCURSOR_RESOURCE )
     {
+#if wxMAC_USE_COCOA
+        wxFAIL_MSG( wxT("Not implemented") );
+#else
+#ifndef __LP64__
         Str255 theName ;
+        wxMacStringToPascal( cursor_file , theName ) ;
 
-    #if TARGET_CARBON
-        c2pstrcpy( (StringPtr) theName , cursor_file ) ;
-    #else
-        strcpy( (char *) theName , cursor_file ) ;
-        c2pstr( (char *) theName ) ;
-    #endif
-        
-        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 ) ;
+
+                M_CURSORDATA->m_hCursor = GetCursor( theId ) ;
                 if ( M_CURSORDATA->m_hCursor )
                     M_CURSORDATA->m_releaseHandle = true ;
             }
         }
+#endif
+#endif
     }
     else
     {
+#if wxUSE_IMAGE
         wxImage image ;
-        image.LoadFile( cursor_file , flags ) ;
-        if( image.Ok() )
+        image.LoadFile( cursor_file, flags ) ;
+        if ( image.Ok() )
         {
-            image.SetOption(wxCUR_HOTSPOT_X,hotSpotX ) ;
-            image.SetOption(wxCUR_HOTSPOT_Y,hotSpotY ) ;
-            delete m_refData ;
-            CreateFromImage(image) ;
+            image.SetOption( wxIMAGE_OPTION_CUR_HOTSPOT_X, hotSpotX ) ;
+            image.SetOption( wxIMAGE_OPTION_CUR_HOTSPOT_Y, hotSpotY ) ;
+            m_refData->DecRef() ;
+            m_refData = NULL ;
+            CreateFromImage( image ) ;
         }
+#endif
     }
 }
 
@@ -212,154 +525,139 @@ wxCursor::wxCursor(const wxString& cursor_file, long flags, int hotSpotX, int ho
 wxCursor::wxCursor(int cursor_type)
 {
     m_refData = new wxCursorRefData;
-    
+#if wxMAC_USE_COCOA
+    M_CURSORDATA->m_hCursor = wxMacCocoaCreateStockCursor( cursor_type );
+#else
     switch (cursor_type)
     {
+    case wxCURSOR_COPY_ARROW:
+        M_CURSORDATA->m_themeCursor = kThemeCopyArrowCursor;
+        break;
+
     case wxCURSOR_WAIT:
-        M_CURSORDATA->m_themeCursor = kThemeWatchCursor ;
+        M_CURSORDATA->m_themeCursor = kThemeWatchCursor;
         break;
+
     case wxCURSOR_IBEAM:
-        M_CURSORDATA->m_themeCursor = kThemeIBeamCursor ;
+        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);
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorSizeNWSE);
         break;
+
     case wxCURSOR_SIZENESW:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSizeNESW);
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorSizeNESW);
         break;
+
     case wxCURSOR_SIZEWE:
-        {
-            M_CURSORDATA->m_themeCursor = kThemeResizeLeftRightCursor;
-        }
+        M_CURSORDATA->m_themeCursor = kThemeResizeLeftRightCursor;
         break;
+
     case wxCURSOR_SIZENS:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSizeNS);
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorSizeNS);
         break;
+
     case wxCURSOR_SIZING:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSize);
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorSize);
         break;
+
     case wxCURSOR_HAND:
-        {
-            M_CURSORDATA->m_themeCursor = kThemePointingHandCursor;
-        }
+        M_CURSORDATA->m_themeCursor = kThemePointingHandCursor;
         break;
+
     case wxCURSOR_BULLSEYE:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorBullseye);
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorBullseye);
         break;
+
     case wxCURSOR_PENCIL:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPencil);
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorPencil);
         break;
+
     case wxCURSOR_MAGNIFIER:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorMagnifier);
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorMagnifier);
         break;
+
     case wxCURSOR_NO_ENTRY:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorNoEntry);
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorNoEntry);
         break;
+
     case wxCURSOR_WATCH:
-        {
-            M_CURSORDATA->m_themeCursor = kThemeWatchCursor;
-            break;
-        }
+        M_CURSORDATA->m_themeCursor = kThemeWatchCursor;
+        break;
+
     case wxCURSOR_PAINT_BRUSH:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPaintBrush);
-            break;
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorPaintBrush);
+        break;
+
     case wxCURSOR_POINT_LEFT:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPointLeft);
-            break;
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorPointLeft);
+        break;
+
     case wxCURSOR_POINT_RIGHT:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPointRight);
-            break;
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorPointRight);
+        break;
+
     case wxCURSOR_QUESTION_ARROW:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorQuestionArrow);
-            break;
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorQuestionArrow);
+        break;
+
     case wxCURSOR_BLANK:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorBlank);
-            break;
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorBlank);
+        break;
+
     case wxCURSOR_RIGHT_ARROW:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorRightArrow);
-            break;
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(kwxCursorRightArrow);
+        break;
+
     case wxCURSOR_SPRAYCAN:
-        {
-            wxStAppResource resload ;
-            M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorRoller);
-            break;
-        }
+        M_CURSORDATA->m_hCursor = wxGetStockCursor(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 ;
+        M_CURSORDATA->m_themeCursor = kThemeArrowCursor;
         break;
     }
+
     if ( M_CURSORDATA->m_themeCursor == -1 )
-        M_CURSORDATA->m_releaseHandle = true ;
+        M_CURSORDATA->m_releaseHandle = true;
+#endif
 }
 
-void wxCursor::MacInstall() const 
+void wxCursor::MacInstall() const
 {
     gMacCurrentCursor = *this ;
+#if wxMAC_USE_COCOA
+    if ( IsOk() )
+        wxMacCocoaSetCursor( M_CURSORDATA->m_hCursor );
+#else
     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 )
+#ifndef __LP64__
+       if ( M_CURSORDATA->m_isColorCursor )
             ::SetCCursor( (CCrsrHandle) M_CURSORDATA->m_hCursor ) ;
         else
             ::SetCursor( * (CursHandle) M_CURSORDATA->m_hCursor ) ;
+#endif
     }
     else
     {
         SetThemeCursor( kThemeArrowCursor ) ;
     }
+#endif
 }
 
 wxCursor::~wxCursor()
@@ -371,5 +669,3 @@ void wxSetCursor(const wxCursor& cursor)
 {
     cursor.MacInstall() ;
 }
-
-