src/mac/carbon/cursor.cpp

   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/mac/private.h"
  23
  24 #if !USE_SHARED_LIBRARIES
  25 IMPLEMENT_DYNAMIC_CLASS(wxCursor, wxBitmap)
  26 #endif
  27
  28 const short kwxCursorBullseye = 10 ;
  29 const short kwxCursorBlank = 11 ;
  30 const short kwxCursorPencil = 12 ;
  31 const short kwxCursorMagnifier = 13 ;
  32 const short kwxCursorNoEntry = 14 ;
  33 const short kwxCursorPaintBrush = 15 ;
  34 const short kwxCursorPointRight = 16 ;
  35 const short kwxCursorPointLeft = 17 ;
  36 const short kwxCursorQuestionArrow = 18 ;
  37 const short kwxCursorRightArrow = 19 ;
  38 const short kwxCursorSizeNS = 20 ;
  39 const short kwxCursorSize = 21 ;
  40 const short kwxCursorSizeNESW = 22 ;
  41 const short kwxCursorSizeNWSE = 23 ;
  42 const short kwxCursorRoller = 24 ;
  43
  44 wxCursor        gMacCurrentCursor ;
  45
  46 wxCursorRefData::wxCursorRefData()
  47 {
  48     m_width = 16;
  49     m_height = 16;
  50     m_hCursor = NULL ;
  51     m_disposeHandle = false ;
  52     m_releaseHandle = false ;
  53     m_isColorCursor = false ;
  54     m_themeCursor = -1 ;
  55 }
  56
  57 wxCursorRefData::~wxCursorRefData()
  58 {
  59     if ( m_isColorCursor )
  60     {
  61         ::DisposeCCursor( (CCrsrHandle) m_hCursor ) ;
  62     }
  63         else if ( m_disposeHandle )
  64         {
  65                 ::DisposeHandle( (Handle ) m_hCursor ) ;
  66         }
  67         else if ( m_releaseHandle )
  68         {
  69                 // we don't release the resource since it may already
  70                 // be in use again
  71         }
  72 }
  73
  74 // Cursors
  75 wxCursor::wxCursor()
  76 {
  77 }
  78
  79 wxCursor::wxCursor(const char WXUNUSED(bits)[], int WXUNUSED(width), int WXUNUSED(height),
  80     int WXUNUSED(hotSpotX), int WXUNUSED(hotSpotY), const char WXUNUSED(maskBits)[])
  81 {
  82 }
  83
  84 wxCursor::wxCursor( const wxImage &image )
  85 {
  86     CreateFromImage( image ) ;
  87 }
  88
  89 void wxCursor::CreateFromImage(const wxImage & image)
  90 {
  91     m_refData = new wxCursorRefData;
  92
  93     wxImage image16 = image.Scale(16,16) ;
  94         unsigned char * rgbBits = image16.GetData();
  95
  96
  97     int w = image16.GetWidth()  ;
  98     int h = image16.GetHeight() ;
  99     bool bHasMask = image16.HasMask() ;
 100
 101         int hotSpotX = image16.GetOptionInt(wxCUR_HOTSPOT_X);
 102     int hotSpotY = image16.GetOptionInt(wxCUR_HOTSPOT_Y);
 103     if (hotSpotX < 0 || hotSpotX >= w)
 104             hotSpotX = 0;
 105     if (hotSpotY < 0 || hotSpotY >= h)
 106             hotSpotY = 0;
 107
 108     M_CURSORDATA->m_hCursor = NewHandle( sizeof( Cursor ) ) ;
 109     M_CURSORDATA->m_disposeHandle = true ;
 110     HLock( (Handle) M_CURSORDATA->m_hCursor ) ;
 111     CursPtr cp = *(CursHandle)M_CURSORDATA->m_hCursor ;
 112     memset( cp->data , 0 , sizeof( Bits16 ) ) ;
 113     memset( cp->mask , 0 , sizeof( Bits16 ) ) ;
 114
 115         unsigned char mr = image16.GetMaskRed() ;
 116         unsigned char mg = image16.GetMaskGreen() ;
 117         unsigned char mb = image16.GetMaskBlue() ;
 118     for ( int y = 0 ; y < h ; ++y )
 119     {
 120         short rowbits = 0 ;
 121         short maskbits = 0 ;
 122
 123         for ( int x = 0 ; x < w ; ++x )
 124         {
 125                 long pos = (y * w + x) * 3;
 126
 127                 unsigned char r = rgbBits[pos] ;
 128                 unsigned char g = rgbBits[pos+1] ;
 129                 unsigned char b = rgbBits[pos+2] ;
 130                 if ( bHasMask && r==mr && g==mg && b==mb )
 131                 {
 132                         // masked area, does not appear anywhere
 133                 }
 134                 else
 135                 {
 136                         if ( (int)r + (int)g + (int)b < 0x60 )
 137                         {
 138                                 rowbits |= ( 1 << (15-x) ) ;
 139                         }
 140                         maskbits |= ( 1 << (15-x) ) ;
 141                 }
 142         }
 143         cp->data[y] = rowbits ;
 144         cp->mask[y] = maskbits ;
 145     }
 146     if ( !bHasMask )
 147     {
 148         memcpy( cp->mask , cp->data , sizeof( Bits16) ) ;
 149     }
 150
 151     cp->hotSpot.h = hotSpotX ;
 152     cp->hotSpot.v = hotSpotY ;
 153     HUnlock( (Handle) M_CURSORDATA->m_hCursor ) ;
 154 }
 155
 156 wxCursor::wxCursor(const wxString& cursor_file, long flags, int hotSpotX, int hotSpotY)
 157 {
 158     m_refData = new wxCursorRefData;
 159     if ( flags == wxBITMAP_TYPE_MACCURSOR_RESOURCE )
 160     {
 161         Str255 theName ;
 162
 163     #if TARGET_CARBON
 164         c2pstrcpy( (StringPtr) theName , cursor_file ) ;
 165     #else
 166         strcpy( (char *) theName , cursor_file ) ;
 167         c2pstr( (char *) theName ) ;
 168     #endif
 169
 170         wxStAppResource resload ;
 171         Handle resHandle = ::GetNamedResource( 'crsr' , theName ) ;
 172         if ( resHandle )
 173         {
 174                         short theId = -1 ;
 175                 OSType theType ;
 176                 GetResInfo( resHandle , &theId , &theType , theName ) ;
 177                 ReleaseResource( resHandle ) ;
 178                 M_CURSORDATA->m_hCursor = GetCCursor( theId ) ;
 179                 if ( M_CURSORDATA->m_hCursor )
 180                         M_CURSORDATA->m_isColorCursor = true ;
 181         }
 182         else
 183         {
 184                 Handle resHandle = ::GetNamedResource( 'CURS' , theName ) ;
 185                 if ( resHandle )
 186                 {
 187                                 short theId = -1 ;
 188                         OSType theType ;
 189                         GetResInfo( resHandle , &theId , &theType , theName ) ;
 190                         ReleaseResource( resHandle ) ;
 191                         M_CURSORDATA->m_hCursor = GetCursor( theId ) ;
 192                         if ( M_CURSORDATA->m_hCursor )
 193                                 M_CURSORDATA->m_releaseHandle = true ;
 194                 }
 195         }
 196     }
 197     else
 198     {
 199         wxImage image ;
 200         image.LoadFile( cursor_file , flags ) ;
 201         if( image.Ok() )
 202         {
 203             image.SetOption(wxCUR_HOTSPOT_X,hotSpotX ) ;
 204             image.SetOption(wxCUR_HOTSPOT_Y,hotSpotY ) ;
 205             delete m_refData ;
 206             CreateFromImage(image) ;
 207         }
 208     }
 209 }
 210
 211 // Cursors by stock number
 212 wxCursor::wxCursor(int cursor_type)
 213 {
 214   m_refData = new wxCursorRefData;
 215
 216   switch (cursor_type)
 217   {
 218     case wxCURSOR_WAIT:
 219       M_CURSORDATA->m_themeCursor = kThemeWatchCursor ;
 220       break;
 221     case wxCURSOR_IBEAM:
 222       M_CURSORDATA->m_themeCursor = kThemeIBeamCursor ;
 223       break;
 224     case wxCURSOR_CROSS:
 225       M_CURSORDATA->m_themeCursor = kThemeCrossCursor;
 226       break;
 227     case wxCURSOR_SIZENWSE:
 228       {
 229         wxStAppResource resload ;
 230         M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSizeNWSE);
 231       }
 232       break;
 233     case wxCURSOR_SIZENESW:
 234       {
 235         wxStAppResource resload ;
 236         M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSizeNESW);
 237       }
 238       break;
 239     case wxCURSOR_SIZEWE:
 240       {
 241         M_CURSORDATA->m_themeCursor = kThemeResizeLeftRightCursor;
 242       }
 243       break;
 244     case wxCURSOR_SIZENS:
 245       {
 246         wxStAppResource resload ;
 247         M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSizeNS);
 248       }
 249       break;
 250    case wxCURSOR_SIZING:
 251       {
 252         wxStAppResource resload ;
 253         M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorSize);
 254       }
 255       break;
 256     case wxCURSOR_HAND:
 257       {
 258         M_CURSORDATA->m_themeCursor = kThemePointingHandCursor;
 259       }
 260       break;
 261     case wxCURSOR_BULLSEYE:
 262         {
 263           wxStAppResource resload ;
 264           M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorBullseye);
 265         }
 266         break;
 267     case wxCURSOR_PENCIL:
 268         {
 269           wxStAppResource resload ;
 270           M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPencil);
 271         }
 272         break;
 273     case wxCURSOR_MAGNIFIER:
 274         {
 275           wxStAppResource resload ;
 276           M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorMagnifier);
 277         }
 278         break;
 279     case wxCURSOR_NO_ENTRY:
 280         {
 281           wxStAppResource resload ;
 282           M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorNoEntry);
 283         }
 284         break;
 285     case wxCURSOR_WATCH:
 286     {
 287       M_CURSORDATA->m_themeCursor = kThemeWatchCursor;
 288       break;
 289     }
 290     case wxCURSOR_PAINT_BRUSH:
 291     {
 292           wxStAppResource resload ;
 293           M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPaintBrush);
 294       break;
 295     }
 296     case wxCURSOR_POINT_LEFT:
 297     {
 298           wxStAppResource resload ;
 299           M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPointLeft);
 300       break;
 301     }
 302     case wxCURSOR_POINT_RIGHT:
 303     {
 304           wxStAppResource resload ;
 305           M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorPointRight);
 306       break;
 307     }
 308     case wxCURSOR_QUESTION_ARROW:
 309     {
 310       wxStAppResource resload ;
 311       M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorQuestionArrow);
 312       break;
 313     }
 314     case wxCURSOR_BLANK:
 315     {
 316       wxStAppResource resload ;
 317       M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorBlank);
 318       break;
 319     }
 320     case wxCURSOR_RIGHT_ARROW:
 321     {
 322       wxStAppResource resload ;
 323       M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorRightArrow);
 324       break;
 325     }
 326     case wxCURSOR_SPRAYCAN:
 327     {
 328       wxStAppResource resload ;
 329       M_CURSORDATA->m_hCursor = ::GetCursor(kwxCursorRoller);
 330       break;
 331     }
 332     case wxCURSOR_CHAR:
 333     case wxCURSOR_ARROW:
 334     case wxCURSOR_LEFT_BUTTON:
 335     case wxCURSOR_RIGHT_BUTTON:
 336     case wxCURSOR_MIDDLE_BUTTON:
 337      default:
 338       M_CURSORDATA->m_themeCursor = kThemeArrowCursor ;
 339       break;
 340         }
 341         if ( M_CURSORDATA->m_themeCursor == -1 )
 342                 M_CURSORDATA->m_releaseHandle = true ;
 343 }
 344
 345 void wxCursor::MacInstall() const
 346 {
 347         gMacCurrentCursor = *this ;
 348         if ( m_refData && M_CURSORDATA->m_themeCursor != -1 )
 349         {
 350                 SetThemeCursor( M_CURSORDATA->m_themeCursor ) ;
 351         }
 352         else if ( m_refData && M_CURSORDATA->m_hCursor )
 353         {
 354             if ( M_CURSORDATA->m_isColorCursor )
 355                     ::SetCCursor( (CCrsrHandle) M_CURSORDATA->m_hCursor ) ;
 356             else
 357                     ::SetCursor( * (CursHandle) M_CURSORDATA->m_hCursor ) ;
 358         }
 359         else
 360         {
 361                 SetThemeCursor( kThemeArrowCursor ) ;
 362         }
 363 }
 364
 365 wxCursor::~wxCursor()
 366 {
 367 }
 368
 369 // Global cursor setting
 370 void wxSetCursor(const wxCursor& cursor)
 371 {
 372         cursor.MacInstall() ;
 373 }
 374
 375