src/mac/carbon/dc.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        dc.cpp
   3 // Purpose:     wxDC class
   4 // Author:      AUTHOR
   5 // Modified by:
   6 // Created:     01/02/97
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) AUTHOR
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation "dc.h"
  14 #endif
  15
  16 #include "wx/dc.h"
  17 #include "wx/app.h"
  18 #include "wx/mac/uma.h"
  19 #include "wx/dcmemory.h"
  20 #include "wx/region.h"
  21 #include "wx/image.h"
  22 #include "wx/log.h"
  23
  24
  25 #if __MSL__ >= 0x6000
  26 #include "math.h"
  27 using namespace std ;
  28 #endif
  29
  30 #include "wx/mac/private.h"
  31 #include "ATSUnicode.h"
  32 #include "TextCommon.h"
  33 #include "TextEncodingConverter.h"
  34
  35 #if !USE_SHARED_LIBRARY
  36 IMPLEMENT_ABSTRACT_CLASS(wxDC, wxObject)
  37 #endif
  38
  39 //-----------------------------------------------------------------------------
  40 // constants
  41 //-----------------------------------------------------------------------------
  42
  43 #define mm2inches               0.0393700787402
  44 #define inches2mm               25.4
  45 #define mm2twips                56.6929133859
  46 #define twips2mm                0.0176388888889
  47 #define mm2pt                   2.83464566929
  48 #define pt2mm                   0.352777777778
  49 #ifndef __DARWIN__
  50 const double M_PI = 3.14159265358979 ;
  51 #endif
  52 const double RAD2DEG  = 180.0 / M_PI;
  53 const short kEmulatedMode = -1 ;
  54 const short kUnsupportedMode = -2 ;
  55
  56 wxMacPortSetter::wxMacPortSetter( const wxDC* dc ) :
  57         m_ph( (GrafPtr) dc->m_macPort )
  58 {
  59         wxASSERT( dc->Ok() ) ;
  60         m_dc = dc ;
  61         dc->MacSetupPort(&m_ph) ;
  62 }
  63
  64 wxMacPortSetter::~wxMacPortSetter()
  65 {
  66         m_dc->MacCleanupPort(&m_ph) ;
  67 }
  68
  69 //-----------------------------------------------------------------------------
  70 // Local functions
  71 //-----------------------------------------------------------------------------
  72
  73 static inline double dmin(double a, double b) { return a < b ? a : b; }
  74 static inline double dmax(double a, double b) { return a > b ? a : b; }
  75 static inline double DegToRad(double deg) { return (deg * M_PI) / 180.0; }
  76
  77 //-----------------------------------------------------------------------------
  78 // wxDC
  79 //-----------------------------------------------------------------------------
  80
  81 // this function emulates all wx colour manipulations, used to verify the implementation
  82 // by setting the mode in the blitting functions to kEmulatedMode
  83
  84 void wxMacCalculateColour( int logical_func , const RGBColor &srcColor , RGBColor &dstColor ) ;
  85 void wxMacCalculateColour( int logical_func , const RGBColor &srcColor , RGBColor &dstColor )
  86 {
  87     switch ( logical_func )
  88     {
  89         case wxAND:        // src AND dst
  90             dstColor.red = dstColor.red & srcColor.red ;
  91             dstColor.green = dstColor.green & srcColor.green ;
  92             dstColor.blue = dstColor.blue & srcColor.blue ;
  93             break ;
  94         case wxAND_INVERT: // (NOT src) AND dst
  95             dstColor.red = dstColor.red & ~srcColor.red ;
  96             dstColor.green = dstColor.green & ~srcColor.green ;
  97             dstColor.blue = dstColor.blue & ~srcColor.blue ;
  98             break ;
  99         case wxAND_REVERSE:// src AND (NOT dst)
 100             dstColor.red = ~dstColor.red & srcColor.red ;
 101             dstColor.green = ~dstColor.green & srcColor.green ;
 102             dstColor.blue = ~dstColor.blue & srcColor.blue ;
 103             break ;
 104         case wxCLEAR:      // 0
 105             dstColor.red = 0 ;
 106             dstColor.green = 0 ;
 107             dstColor.blue = 0 ;
 108             break ;
 109         case wxCOPY:       // src
 110             dstColor.red = srcColor.red ;
 111             dstColor.green = srcColor.green ;
 112             dstColor.blue = srcColor.blue ;
 113                 break ;
 114         case wxEQUIV:      // (NOT src) XOR dst
 115             dstColor.red = dstColor.red ^ ~srcColor.red ;
 116             dstColor.green = dstColor.green ^ ~srcColor.green ;
 117             dstColor.blue = dstColor.blue ^ ~srcColor.blue ;
 118             break ;
 119         case wxINVERT:     // NOT dst
 120             dstColor.red = ~dstColor.red ;
 121             dstColor.green = ~dstColor.green ;
 122             dstColor.blue = ~dstColor.blue ;
 123                 break ;
 124         case wxNAND:       // (NOT src) OR (NOT dst)
 125             dstColor.red = ~dstColor.red | ~srcColor.red ;
 126             dstColor.green = ~dstColor.green | ~srcColor.green ;
 127             dstColor.blue = ~dstColor.blue | ~srcColor.blue ;
 128             break ;
 129         case wxNOR:        // (NOT src) AND (NOT dst)
 130             dstColor.red = ~dstColor.red & ~srcColor.red ;
 131             dstColor.green = ~dstColor.green & ~srcColor.green ;
 132             dstColor.blue = ~dstColor.blue & ~srcColor.blue ;
 133             break ;
 134         case wxNO_OP:      // dst
 135             break ;
 136         case wxOR:         // src OR dst
 137             dstColor.red = dstColor.red | srcColor.red ;
 138             dstColor.green = dstColor.green | srcColor.green ;
 139             dstColor.blue = dstColor.blue | srcColor.blue ;
 140             break ;
 141         case wxOR_INVERT:  // (NOT src) OR dst
 142             dstColor.red = dstColor.red | ~srcColor.red ;
 143             dstColor.green = dstColor.green | ~srcColor.green ;
 144             dstColor.blue = dstColor.blue | ~srcColor.blue ;
 145             break ;
 146         case wxOR_REVERSE: // src OR (NOT dst)
 147             dstColor.red = ~dstColor.red | srcColor.red ;
 148             dstColor.green = ~dstColor.green | srcColor.green ;
 149             dstColor.blue = ~dstColor.blue | srcColor.blue ;
 150                 break ;
 151         case wxSET:        // 1
 152             dstColor.red = 0xFFFF ;
 153             dstColor.green = 0xFFFF ;
 154             dstColor.blue = 0xFFFF ;
 155             break ;
 156         case wxSRC_INVERT: // (NOT src)
 157             dstColor.red = ~srcColor.red ;
 158             dstColor.green = ~srcColor.green ;
 159             dstColor.blue = ~srcColor.blue ;
 160                 break ;
 161         case wxXOR:        // src XOR dst
 162             dstColor.red = dstColor.red ^ srcColor.red ;
 163             dstColor.green = dstColor.green ^ srcColor.green ;
 164             dstColor.blue = dstColor.blue ^ srcColor.blue ;
 165                 break ;
 166     }
 167
 168 }
 169
 170 wxDC::wxDC()
 171 {
 172   m_ok = FALSE;
 173   m_colour = TRUE;
 174
 175   m_mm_to_pix_x = mm2pt;
 176   m_mm_to_pix_y = mm2pt;
 177
 178   m_internalDeviceOriginX = 0;
 179   m_internalDeviceOriginY = 0;
 180   m_externalDeviceOriginX = 0;
 181   m_externalDeviceOriginY = 0;
 182
 183   m_logicalScaleX = 1.0;
 184   m_logicalScaleY = 1.0;
 185   m_userScaleX = 1.0;
 186   m_userScaleY = 1.0;
 187   m_scaleX = 1.0;
 188   m_scaleY = 1.0;
 189
 190   m_needComputeScaleX = FALSE;
 191   m_needComputeScaleY = FALSE;
 192
 193   m_macPort = NULL ;
 194   m_macMask = NULL ;
 195   m_ok = FALSE ;
 196
 197         m_macFontInstalled = false ;
 198         m_macBrushInstalled = false ;
 199         m_macPenInstalled = false ;
 200
 201         m_macLocalOrigin.x = m_macLocalOrigin.y = 0 ;
 202         m_macBoundaryClipRgn = NewRgn() ;
 203         m_macCurrentClipRgn = NewRgn() ;
 204
 205         SetRectRgn( (RgnHandle) m_macBoundaryClipRgn , -32000 , -32000 , 32000 , 32000 ) ;
 206         SetRectRgn( (RgnHandle) m_macCurrentClipRgn , -32000 , -32000 , 32000 , 32000 ) ;
 207
 208     m_pen = *wxBLACK_PEN;
 209     m_font = *wxNORMAL_FONT;
 210     m_brush = *wxWHITE_BRUSH;
 211     m_macCurrentPortStateHelper = NULL ;
 212     m_macATSUIStyle = NULL ;
 213     m_macAliasWasEnabled = false;
 214     m_macForegroundPixMap = NULL ;
 215     m_macBackgroundPixMap = NULL ;
 216 }
 217
 218 wxDC::~wxDC(void)
 219 {
 220     DisposeRgn( (RgnHandle) m_macBoundaryClipRgn ) ;
 221     DisposeRgn( (RgnHandle) m_macCurrentClipRgn ) ;
 222 }
 223 void wxDC::MacSetupPort(wxMacPortStateHelper* help) const
 224 {
 225     wxASSERT( m_macCurrentPortStateHelper == NULL ) ;
 226     m_macCurrentPortStateHelper = help ;
 227         SetClip( (RgnHandle) m_macCurrentClipRgn);
 228
 229         m_macFontInstalled = false ;
 230         m_macBrushInstalled = false ;
 231         m_macPenInstalled = false ;
 232 }
 233
 234 void wxDC::MacCleanupPort(wxMacPortStateHelper* help) const
 235 {
 236     wxASSERT( m_macCurrentPortStateHelper == help ) ;
 237     m_macCurrentPortStateHelper = NULL ;
 238     if( m_macATSUIStyle )
 239     {
 240         ::ATSUDisposeStyle((ATSUStyle)m_macATSUIStyle);
 241         m_macATSUIStyle = NULL ;
 242     }
 243     if ( m_macAliasWasEnabled )
 244     {
 245         SetAntiAliasedTextEnabled(m_macFormerAliasState, m_macFormerAliasSize);
 246         m_macAliasWasEnabled = false ;
 247     }
 248     if ( m_macForegroundPixMap )
 249     {
 250         Pattern blackColor ;
 251         ::PenPat(GetQDGlobalsBlack(&blackColor));
 252         DisposePixPat( (PixPatHandle) m_macForegroundPixMap ) ;
 253         m_macForegroundPixMap = NULL ;
 254     }
 255     if ( m_macBackgroundPixMap )
 256     {
 257         Pattern whiteColor ;
 258         ::BackPat(GetQDGlobalsWhite(&whiteColor));
 259         DisposePixPat( (PixPatHandle) m_macBackgroundPixMap ) ;
 260         m_macBackgroundPixMap = NULL ;
 261     }
 262 }
 263
 264 void wxDC::DoDrawBitmap( const wxBitmap &bmp, wxCoord x, wxCoord y, bool useMask )
 265 {
 266      wxCHECK_RET( Ok(), wxT("invalid window dc") );
 267
 268      wxCHECK_RET( bmp.Ok(), wxT("invalid bitmap") );
 269
 270      wxMacPortSetter helper(this) ;
 271
 272      wxCoord xx = XLOG2DEVMAC(x);
 273      wxCoord yy = YLOG2DEVMAC(y);
 274      wxCoord w = bmp.GetWidth();
 275      wxCoord h = bmp.GetHeight();
 276      wxCoord ww = XLOG2DEVREL(w);
 277      wxCoord hh = YLOG2DEVREL(h);
 278
 279      // Set up drawing mode
 280      short  mode = (m_logicalFunction == wxCOPY ? srcCopy :
 281                     //m_logicalFunction == wxCLEAR ? WHITENESS :
 282                     //m_logicalFunction == wxSET ? BLACKNESS :
 283                     m_logicalFunction == wxINVERT ? hilite :
 284                    //m_logicalFunction == wxAND ? MERGECOPY :
 285                     m_logicalFunction == wxOR ? srcOr :
 286                     m_logicalFunction == wxSRC_INVERT ? notSrcCopy :
 287                     m_logicalFunction == wxXOR ? srcXor :
 288                     m_logicalFunction == wxOR_REVERSE ? notSrcOr :
 289                     //m_logicalFunction == wxAND_REVERSE ? SRCERASE :
 290                     //m_logicalFunction == wxSRC_OR ? srcOr :
 291                     //m_logicalFunction == wxSRC_AND ? SRCAND :
 292                     srcCopy );
 293
 294      if ( bmp.GetBitmapType() == kMacBitmapTypePict ) {
 295          Rect bitmaprect = { 0 , 0 , hh, ww };
 296          ::OffsetRect( &bitmaprect, xx, yy ) ;
 297          ::DrawPicture( (PicHandle) bmp.GetPict(), &bitmaprect ) ;
 298     }
 299      else if ( bmp.GetBitmapType() == kMacBitmapTypeGrafWorld )
 300      {
 301          GWorldPtr    bmapworld = MAC_WXHBITMAP( bmp.GetHBITMAP() );
 302          PixMapHandle bmappixels ;
 303
 304          // Set foreground and background colours (for bitmaps depth = 1)
 305          if(bmp.GetDepth() == 1)
 306         {
 307              RGBColor fore = MAC_WXCOLORREF(m_textForegroundColour.GetPixel());
 308              RGBColor back = MAC_WXCOLORREF(m_textBackgroundColour.GetPixel());
 309              RGBForeColor(&fore);
 310              RGBBackColor(&back);
 311          }
 312          else
 313          {
 314              RGBColor white = { 0xFFFF, 0xFFFF,0xFFFF} ;
 315              RGBColor black = { 0,0,0} ;
 316              RGBForeColor( &black ) ;
 317              RGBBackColor( &white ) ;
 318          }
 319
 320          bmappixels = GetGWorldPixMap( bmapworld ) ;
 321
 322          wxCHECK_RET(LockPixels(bmappixels),
 323                      wxT("DoDrawBitmap:  Unable to lock pixels"));
 324
 325          Rect source = { 0, 0, h, w };
 326          Rect dest   = { yy, xx, yy + hh, xx + ww };
 327
 328          if ( useMask && bmp.GetMask() )
 329          {
 330              if( LockPixels(GetGWorldPixMap(MAC_WXHBITMAP(bmp.GetMask()->GetMaskBitmap()))))
 331              {
 332                  CopyDeepMask
 333                      (
 334                       GetPortBitMapForCopyBits(bmapworld),
 335                       GetPortBitMapForCopyBits(MAC_WXHBITMAP(bmp.GetMask()->GetMaskBitmap())),
 336                       GetPortBitMapForCopyBits( MAC_WXHBITMAP(m_macPort) ),
 337                       &source, &source, &dest, mode, NULL
 338                       );
 339                  UnlockPixels(GetGWorldPixMap(MAC_WXHBITMAP(bmp.GetMask()->GetMaskBitmap())));
 340              }
 341          }
 342          else {
 343              CopyBits( GetPortBitMapForCopyBits( bmapworld ),
 344                        GetPortBitMapForCopyBits( MAC_WXHBITMAP(m_macPort) ),
 345                        &source, &dest, mode, NULL ) ;
 346          }
 347          UnlockPixels( bmappixels ) ;
 348      }
 349      else if ( bmp.GetBitmapType() == kMacBitmapTypeIcon )
 350      {
 351         Rect bitmaprect = { 0 , 0 , bmp.GetHeight(), bmp.GetWidth() } ;
 352         OffsetRect( &bitmaprect, xx, yy ) ;
 353         PlotCIconHandle( &bitmaprect , atNone , ttNone , MAC_WXHICON(bmp.GetHICON()) ) ;
 354      }
 355      m_macPenInstalled = false ;
 356      m_macBrushInstalled = false ;
 357      m_macFontInstalled = false ;
 358
 359 }
 360
 361 void wxDC::DoDrawIcon( const wxIcon &icon, wxCoord x, wxCoord y )
 362 {
 363      wxCHECK_RET(Ok(), wxT("Invalid dc  wxDC::DoDrawIcon"));
 364
 365      wxCHECK_RET(icon.Ok(), wxT("Invalid icon wxDC::DoDrawIcon"));
 366
 367     DoDrawBitmap( icon , x , y , icon.GetMask() != NULL ) ;
 368 }
 369 void wxDC::DoSetClippingRegion( wxCoord x, wxCoord y, wxCoord width, wxCoord height )
 370 {
 371     wxCHECK_RET(Ok(), wxT("wxDC::DoSetClippingRegion  Invalid DC"));
 372     wxCoord xx, yy, ww, hh;
 373
 374     xx = XLOG2DEVMAC(x);
 375     yy = YLOG2DEVMAC(y);
 376     ww = XLOG2DEVREL(width);
 377     hh = YLOG2DEVREL(height);
 378
 379     SetRectRgn( (RgnHandle) m_macCurrentClipRgn , xx , yy , xx + ww , yy + hh ) ;
 380     SectRgn( (RgnHandle) m_macCurrentClipRgn , (RgnHandle) m_macBoundaryClipRgn , (RgnHandle) m_macCurrentClipRgn ) ;
 381
 382     if( m_clipping )
 383     {
 384         m_clipX1 = wxMax( m_clipX1 , xx );
 385         m_clipY1 = wxMax( m_clipY1 , yy );
 386         m_clipX2 = wxMin( m_clipX2, (xx + ww));
 387         m_clipY2 = wxMin( m_clipY2, (yy + hh));
 388     }
 389     else
 390     {
 391         m_clipping = TRUE;
 392         m_clipX1 = xx;
 393         m_clipY1 = yy;
 394         m_clipX2 = xx + ww;
 395         m_clipY2 = yy + hh;
 396     }
 397
 398 }
 399 void wxDC::DoSetClippingRegionAsRegion( const wxRegion &region  )
 400 {
 401     wxCHECK_RET( Ok(), wxT("invalid window dc") ) ;
 402
 403         wxMacPortSetter helper(this) ;
 404     if (region.Empty())
 405     {
 406         DestroyClippingRegion();
 407         return;
 408     }
 409
 410     wxCoord x, y, w, h;
 411     region.GetBox( x, y, w, h );
 412     wxCoord xx, yy, ww, hh;
 413
 414     xx = XLOG2DEVMAC(x);
 415     yy = YLOG2DEVMAC(y);
 416     ww = XLOG2DEVREL(w);
 417     hh = YLOG2DEVREL(h);
 418
 419     // if we have a scaling that we cannot map onto native regions
 420     // we must use the box
 421
 422     if ( ww != w || hh != h )
 423     {
 424         wxDC::DoSetClippingRegion( x, y, w, h );
 425     }
 426     else
 427     {
 428         CopyRgn( (RgnHandle) region.GetWXHRGN() , (RgnHandle) m_macCurrentClipRgn ) ;
 429         if ( xx != x || yy != y )
 430         {
 431             OffsetRgn( (RgnHandle) m_macCurrentClipRgn , xx - x , yy - y ) ;
 432         }
 433         SectRgn( (RgnHandle) m_macCurrentClipRgn , (RgnHandle) m_macBoundaryClipRgn , (RgnHandle) m_macCurrentClipRgn ) ;
 434         if( m_clipping )
 435         {
 436             m_clipX1 = wxMax( m_clipX1 , xx );
 437             m_clipY1 = wxMax( m_clipY1 , yy );
 438             m_clipX2 = wxMin( m_clipX2, (xx + ww));
 439             m_clipY2 = wxMin( m_clipY2, (yy + hh));
 440         }
 441         else
 442         {
 443             m_clipping = TRUE;
 444             m_clipX1 = xx;
 445             m_clipY1 = yy;
 446             m_clipX2 = xx + ww;
 447             m_clipY2 = yy + hh;
 448         }
 449     }
 450
 451 }
 452
 453 void wxDC::DestroyClippingRegion()
 454 {
 455   wxMacPortSetter helper(this) ;
 456   CopyRgn( (RgnHandle) m_macBoundaryClipRgn , (RgnHandle) m_macCurrentClipRgn ) ;
 457   m_clipping = FALSE;
 458 }
 459 void wxDC::DoGetSize( int* width, int* height ) const
 460 {
 461   *width = m_maxX-m_minX;
 462   *height = m_maxY-m_minY;
 463 }
 464 void wxDC::DoGetSizeMM( int* width, int* height ) const
 465 {
 466   int w = 0;
 467   int h = 0;
 468   GetSize( &w, &h );
 469   *width = long( double(w) / (m_scaleX*m_mm_to_pix_x) );
 470   *height = long( double(h) / (m_scaleY*m_mm_to_pix_y) );
 471 }
 472 void wxDC::SetTextForeground( const wxColour &col )
 473 {
 474     wxCHECK_RET(Ok(), wxT("Invalid DC"));
 475     m_textForegroundColour = col;
 476     m_macFontInstalled = false ;
 477 }
 478 void wxDC::SetTextBackground( const wxColour &col )
 479 {
 480     wxCHECK_RET(Ok(), wxT("Invalid DC"));
 481     m_textBackgroundColour = col;
 482     m_macFontInstalled = false ;
 483 }
 484 void wxDC::SetMapMode( int mode )
 485 {
 486   switch (mode)
 487   {
 488     case wxMM_TWIPS:
 489       SetLogicalScale( twips2mm*m_mm_to_pix_x, twips2mm*m_mm_to_pix_y );
 490       break;
 491     case wxMM_POINTS:
 492       SetLogicalScale( pt2mm*m_mm_to_pix_x, pt2mm*m_mm_to_pix_y );
 493       break;
 494     case wxMM_METRIC:
 495       SetLogicalScale( m_mm_to_pix_x, m_mm_to_pix_y );
 496       break;
 497     case wxMM_LOMETRIC:
 498       SetLogicalScale( m_mm_to_pix_x/10.0, m_mm_to_pix_y/10.0 );
 499       break;
 500     default:
 501     case wxMM_TEXT:
 502       SetLogicalScale( 1.0, 1.0 );
 503       break;
 504   }
 505   if (mode != wxMM_TEXT)
 506   {
 507     m_needComputeScaleX = TRUE;
 508     m_needComputeScaleY = TRUE;
 509   }
 510 }
 511 void wxDC::SetUserScale( double x, double y )
 512 {
 513   // allow negative ? -> no
 514   m_userScaleX = x;
 515   m_userScaleY = y;
 516   ComputeScaleAndOrigin();
 517 }
 518 void wxDC::SetLogicalScale( double x, double y )
 519 {
 520   // allow negative ?
 521   m_logicalScaleX = x;
 522   m_logicalScaleY = y;
 523   ComputeScaleAndOrigin();
 524 }
 525 void wxDC::SetLogicalOrigin( wxCoord x, wxCoord y )
 526 {
 527   m_logicalOriginX = x * m_signX;   // is this still correct ?
 528   m_logicalOriginY = y * m_signY;
 529   ComputeScaleAndOrigin();
 530 }
 531 void wxDC::SetDeviceOrigin( wxCoord x, wxCoord y )
 532 {
 533   m_externalDeviceOriginX = x;
 534   m_externalDeviceOriginY = y;
 535   ComputeScaleAndOrigin();
 536 }
 537
 538 #if 0
 539 void wxDC::SetInternalDeviceOrigin( long x, long y )
 540 {
 541   m_internalDeviceOriginX = x;
 542   m_internalDeviceOriginY = y;
 543   ComputeScaleAndOrigin();
 544 }
 545 void wxDC::GetInternalDeviceOrigin( long *x, long *y )
 546 {
 547   if (x) *x = m_internalDeviceOriginX;
 548   if (y) *y = m_internalDeviceOriginY;
 549 }
 550 #endif
 551 void wxDC::SetAxisOrientation( bool xLeftRight, bool yBottomUp )
 552 {
 553   m_signX = (xLeftRight ?  1 : -1);
 554   m_signY = (yBottomUp  ? -1 :  1);
 555   ComputeScaleAndOrigin();
 556 }
 557
 558 wxSize wxDC::GetPPI() const
 559 {
 560     return wxSize(72, 72);
 561 }
 562
 563 int wxDC::GetDepth() const
 564 {
 565     if ( IsPortColor( (CGrafPtr) m_macPort ) )
 566     {
 567         return ( (**GetPortPixMap( (CGrafPtr) m_macPort)).pixelSize ) ;
 568     }
 569     return 1 ;
 570 }
 571
 572 void wxDC::ComputeScaleAndOrigin()
 573 {
 574   // CMB: copy scale to see if it changes
 575   double origScaleX = m_scaleX;
 576   double origScaleY = m_scaleY;
 577
 578   m_scaleX = m_logicalScaleX * m_userScaleX;
 579   m_scaleY = m_logicalScaleY * m_userScaleY;
 580
 581   m_deviceOriginX = m_internalDeviceOriginX + m_externalDeviceOriginX;
 582   m_deviceOriginY = m_internalDeviceOriginY + m_externalDeviceOriginY;
 583
 584   // CMB: if scale has changed call SetPen to recalulate the line width
 585   if (m_scaleX != origScaleX || m_scaleY != origScaleY)
 586   {
 587     // this is a bit artificial, but we need to force wxDC to think
 588     // the pen has changed
 589     wxPen* pen = & GetPen();
 590     wxPen tempPen;
 591     m_pen = tempPen;
 592     SetPen(* pen);
 593   }
 594 }
 595 void  wxDC::SetPalette( const wxPalette& palette )
 596 {
 597 }
 598
 599 void  wxDC::SetBackgroundMode( int mode )
 600 {
 601         m_backgroundMode = mode ;
 602 }
 603
 604 void  wxDC::SetFont( const wxFont &font )
 605 {
 606     m_font = font;
 607     m_macFontInstalled = false ;
 608 }
 609
 610 void  wxDC::SetPen( const wxPen &pen )
 611 {
 612         if ( m_pen == pen )
 613                 return ;
 614
 615   m_pen = pen;
 616
 617   m_macPenInstalled = false ;
 618 }
 619
 620 void  wxDC::SetBrush( const wxBrush &brush )
 621 {
 622   if (m_brush == brush)
 623         return;
 624
 625   m_brush = brush;
 626   m_macBrushInstalled = false ;
 627 }
 628
 629 void  wxDC::SetBackground( const wxBrush &brush )
 630 {
 631   if (m_backgroundBrush == brush)
 632         return;
 633
 634   m_backgroundBrush = brush;
 635
 636   if (!m_backgroundBrush.Ok())
 637         return;
 638    m_macBrushInstalled = false ;
 639 }
 640
 641 void  wxDC::SetLogicalFunction( int function )
 642 {
 643         if (m_logicalFunction == function)
 644                 return;
 645
 646         m_logicalFunction = function ;
 647         m_macFontInstalled = false ;
 648         m_macBrushInstalled = false ;
 649         m_macPenInstalled = false ;
 650 }
 651
 652 extern bool wxDoFloodFill(wxDC *dc, wxCoord x, wxCoord y,
 653                           const wxColour & col, int style);
 654
 655 bool wxDC::DoFloodFill(wxCoord x, wxCoord y,
 656                        const wxColour& col, int style)
 657 {
 658     return wxDoFloodFill(this, x, y, col, style);
 659 }
 660
 661 bool  wxDC::DoGetPixel( wxCoord x, wxCoord y, wxColour *col ) const
 662 {
 663     wxCHECK_MSG( Ok(), false, wxT("wxDC::DoGetPixel  Invalid DC") );
 664     wxMacPortSetter helper(this) ;
 665
 666     RGBColor colour;
 667
 668     GetCPixel( XLOG2DEVMAC(x), YLOG2DEVMAC(y), &colour );
 669
 670     // Convert from Mac colour to wx
 671     col->Set( colour.red   >> 8,
 672               colour.green >> 8,
 673               colour.blue  >> 8);
 674
 675     return true ;
 676 }
 677
 678 void  wxDC::DoDrawLine( wxCoord x1, wxCoord y1, wxCoord x2, wxCoord y2 )
 679 {
 680   wxCHECK_RET(Ok(), wxT("Invalid DC"));
 681
 682   wxMacPortSetter helper(this) ;
 683
 684   if (m_pen.GetStyle() != wxTRANSPARENT)
 685   {
 686                 MacInstallPen() ;
 687                 wxCoord offset = ( (m_pen.GetWidth() == 0 ? 1 :
 688                             m_pen.GetWidth() ) * (wxCoord)m_scaleX - 1) / 2;
 689
 690         wxCoord xx1 = XLOG2DEVMAC(x1) - offset;
 691         wxCoord yy1 = YLOG2DEVMAC(y1) - offset;
 692         wxCoord xx2 = XLOG2DEVMAC(x2) - offset;
 693         wxCoord yy2 = YLOG2DEVMAC(y2) - offset;
 694
 695         if ((m_pen.GetCap() == wxCAP_ROUND) &&
 696             (m_pen.GetWidth() <= 1))
 697         {
 698             // Implement LAST_NOT for MAC at least for
 699             // orthogonal lines. RR.
 700                 if (xx1 == xx2)
 701                 {
 702                         if (yy1 < yy2)
 703                                 yy2--;
 704                     if (yy1 > yy2)
 705                         yy2++;
 706                 }
 707                 if (yy1 == yy2)
 708                 {
 709                         if (xx1 < xx2)
 710                                 xx2--;
 711                     if (xx1 > xx2)
 712                         xx2++;
 713                 }
 714         }
 715
 716                 ::MoveTo(xx1, yy1);
 717                 ::LineTo(xx2, yy2);
 718   }
 719 }
 720
 721 void  wxDC::DoCrossHair( wxCoord x, wxCoord y )
 722 {
 723     wxCHECK_RET( Ok(), wxT("wxDC::DoCrossHair  Invalid window dc") );
 724
 725     if (m_pen.GetStyle() != wxTRANSPARENT)
 726     {
 727         int w = 0;
 728         int h = 0;
 729         GetSize( &w, &h );
 730         wxCoord xx = XLOG2DEVMAC(x);
 731         wxCoord yy = YLOG2DEVMAC(y);
 732
 733         MacInstallPen();
 734         ::MoveTo( XLOG2DEVMAC(0), yy );
 735         ::LineTo( XLOG2DEVMAC(w), yy );
 736         ::MoveTo( xx, YLOG2DEVMAC(0) );
 737         ::LineTo( xx, YLOG2DEVMAC(h) );
 738
 739         CalcBoundingBox(x, y);
 740         CalcBoundingBox(x+w, y+h);
 741
 742     }
 743 }
 744
 745 /*
 746  * To draw arcs properly the angles need to be converted from the WX style:
 747  * Angles start on the +ve X axis and go anti-clockwise (As you would draw on
 748  * a normal axis on paper).
 749  * TO
 750  * the Mac style:
 751  * Angles start on the +ve y axis and go clockwise.
 752  * To achive this I work out which quadrant the angle lies in then map this to
 753  * the equivalent quadrant on the Mac.  (Sin and Cos values reveal which
 754  * quadrant you are in).
 755  */
 756 static double wxConvertWXangleToMACangle(double angle)
 757 {
 758     double sin_a, cos_a;
 759
 760     sin_a = sin(angle / RAD2DEG);
 761     cos_a = cos(angle / RAD2DEG);
 762
 763     if( (sin_a >= 0.0) && (cos_a >= 0.0) ) {
 764         angle = acos(sin_a) * RAD2DEG;
 765     }
 766     else if( (sin_a >= 0.0) && (cos_a <= 0.0) ) {
 767         sin_a *= -1;
 768         angle = acos(sin_a) * RAD2DEG + 180;
 769     }
 770     else if( (sin_a <= 0.0) && (cos_a >=  0.0) ) {
 771         angle = acos(sin_a) * RAD2DEG + 180;
 772     }
 773     else if( (sin_a <  0.0) && (cos_a <  0.0) ) {
 774         sin_a *= -1;
 775         angle = acos(sin_a) * RAD2DEG + 180;
 776     }
 777     return angle;
 778 }
 779
 780 void  wxDC::DoDrawArc( wxCoord x1, wxCoord y1,
 781                            wxCoord x2, wxCoord y2,
 782                            wxCoord xc, wxCoord yc )
 783 {
 784     wxCHECK_RET(Ok(), wxT("wxDC::DoDrawArc  Invalid DC"));
 785
 786     wxCoord xx1 = XLOG2DEVMAC(x1);
 787     wxCoord yy1 = YLOG2DEVMAC(y1);
 788     wxCoord xx2 = XLOG2DEVMAC(x2);
 789     wxCoord yy2 = YLOG2DEVMAC(y2);
 790     wxCoord xxc = XLOG2DEVMAC(xc);
 791     wxCoord yyc = YLOG2DEVMAC(yc);
 792     double dx = xx1 - xxc;
 793     double dy = yy1 - yyc;
 794     double radius = sqrt((double)(dx*dx+dy*dy));
 795     wxCoord rad   = (wxCoord)radius;
 796     double radius1, radius2;
 797
 798     if (xx1 == xx2 && yy1 == yy2)
 799     {
 800         radius1 = 0.0;
 801         radius2 = 360.0;
 802     }
 803     else if (radius == 0.0)
 804     {
 805         radius1 = radius2 = 0.0;
 806     }
 807     else
 808     {
 809         radius1 = (xx1 - xxc == 0) ?
 810             (yy1 - yyc < 0) ? 90.0 : -90.0 :
 811             -atan2(double(yy1-yyc), double(xx1-xxc)) * RAD2DEG;
 812          radius2 = (xx2 - xxc == 0) ?
 813             (yy2 - yyc < 0) ? 90.0 : -90.0 :
 814             -atan2(double(yy2-yyc), double(xx2-xxc)) * RAD2DEG;
 815      }
 816      wxCoord alpha2 = wxCoord(radius2 - radius1);
 817     wxCoord alpha1 = wxCoord(wxConvertWXangleToMACangle(radius1));
 818      if( (xx1 > xx2) || (yy1 > yy2) ) {
 819         alpha2 *= -1;
 820     }
 821
 822     Rect r = { yyc - rad, xxc - rad, yyc + rad, xxc + rad };
 823
 824     if(m_brush.GetStyle() != wxTRANSPARENT) {
 825         MacInstallBrush();
 826         PaintArc(&r, alpha1, alpha2);
 827     }
 828     if(m_pen.GetStyle() != wxTRANSPARENT) {
 829         MacInstallPen();
 830         FrameArc(&r, alpha1, alpha2);
 831     }
 832 }
 833
 834 void  wxDC::DoDrawEllipticArc( wxCoord x, wxCoord y, wxCoord w, wxCoord h,
 835                                    double sa, double ea )
 836 {
 837     wxCHECK_RET(Ok(), wxT("wxDC::DoDrawEllepticArc  Invalid DC"));
 838
 839     Rect r;
 840     double angle = sa - ea;  // Order important Mac in opposite direction to wx
 841
 842     wxCoord xx = XLOG2DEVMAC(x);
 843     wxCoord yy = YLOG2DEVMAC(y);
 844     wxCoord ww = m_signX * XLOG2DEVREL(w);
 845     wxCoord hh = m_signY * YLOG2DEVREL(h);
 846
 847     // handle -ve width and/or height
 848     if (ww < 0) { ww = -ww; xx = xx - ww; }
 849     if (hh < 0) { hh = -hh; yy = yy - hh; }
 850
 851     sa = wxConvertWXangleToMACangle(sa);
 852
 853     r.top    = yy;
 854     r.left   = xx;
 855     r.bottom = yy + hh;
 856     r.right  = xx + ww;
 857
 858     if(m_brush.GetStyle() != wxTRANSPARENT) {
 859         MacInstallBrush();
 860         PaintArc(&r, (short)sa, (short)angle);
 861     }
 862     if(m_pen.GetStyle() != wxTRANSPARENT) {
 863         MacInstallPen();
 864         FrameArc(&r, (short)sa, (short)angle);
 865     }
 866 }
 867
 868 void  wxDC::DoDrawPoint( wxCoord x, wxCoord y )
 869 {
 870   wxCHECK_RET(Ok(), wxT("Invalid DC"));
 871
 872   wxMacPortSetter helper(this) ;
 873
 874   if (m_pen.GetStyle() != wxTRANSPARENT)
 875   {
 876         wxCoord xx1 = XLOG2DEVMAC(x);
 877         wxCoord yy1 = YLOG2DEVMAC(y);
 878         RGBColor pencolor = MAC_WXCOLORREF( m_pen.GetColour().GetPixel());
 879         ::SetCPixel( xx1,yy1,&pencolor) ;
 880         CalcBoundingBox(x, y);
 881   }
 882 }
 883
 884 void  wxDC::DoDrawLines(int n, wxPoint points[],
 885                              wxCoord xoffset, wxCoord yoffset)
 886 {
 887   wxCHECK_RET(Ok(), wxT("Invalid DC"));
 888   wxMacPortSetter helper(this) ;
 889
 890   if (m_pen.GetStyle() == wxTRANSPARENT)
 891         return;
 892
 893   MacInstallPen() ;
 894
 895   wxCoord offset = ( (m_pen.GetWidth() == 0 ? 1 :
 896                       m_pen.GetWidth() ) * (wxCoord)m_scaleX - 1) / 2 ;
 897
 898   wxCoord x1, x2 , y1 , y2 ;
 899   x1 = XLOG2DEVMAC(points[0].x + xoffset);
 900   y1 = YLOG2DEVMAC(points[0].y + yoffset);
 901   ::MoveTo(x1 - offset, y1 - offset );
 902
 903   for (int i = 0; i < n-1; i++)
 904   {
 905     x2 = XLOG2DEVMAC(points[i+1].x + xoffset);
 906     y2 = YLOG2DEVMAC(points[i+1].y + yoffset);
 907     ::LineTo( x2 - offset, y2 - offset );
 908   }
 909 }
 910
 911 void  wxDC::DoDrawPolygon(int n, wxPoint points[],
 912                                wxCoord xoffset, wxCoord yoffset,
 913                                int fillStyle )
 914 {
 915         wxCHECK_RET(Ok(), wxT("Invalid DC"));
 916         wxMacPortSetter helper(this) ;
 917
 918         wxCoord x1, x2 , y1 , y2 ;
 919
 920     if ( m_brush.GetStyle() == wxTRANSPARENT && m_pen.GetStyle() == wxTRANSPARENT )
 921         return ;
 922
 923         PolyHandle polygon = OpenPoly();
 924
 925         x1 = XLOG2DEVMAC(points[0].x + xoffset);
 926         y1 = YLOG2DEVMAC(points[0].y + yoffset);
 927         ::MoveTo(x1,y1);
 928
 929         for (int i = 1; i < n; i++)
 930         {
 931                 x2 = XLOG2DEVMAC(points[i].x + xoffset);
 932                 y2 = YLOG2DEVMAC(points[i].y + yoffset);
 933                 ::LineTo(x2, y2);
 934         }
 935
 936     // close the polyline if necessary
 937     if ( x1 != x2 || y1 != y2 )
 938     {
 939         ::LineTo(x1,y1 ) ;
 940     }
 941
 942         ClosePoly();
 943
 944         if (m_brush.GetStyle() != wxTRANSPARENT)
 945         {
 946
 947                 MacInstallBrush();
 948                 ::PaintPoly( polygon );
 949
 950         }
 951
 952         if (m_pen.GetStyle() != wxTRANSPARENT)
 953         {
 954
 955                 MacInstallPen() ;
 956                 ::FramePoly( polygon ) ;
 957
 958         }
 959         KillPoly( polygon );
 960 }
 961
 962 void wxDC::DoDrawRectangle(wxCoord x, wxCoord y, wxCoord width, wxCoord height)
 963 {
 964     wxCHECK_RET(Ok(), wxT("Invalid DC"));
 965     wxMacPortSetter helper(this) ;
 966
 967         wxCoord xx = XLOG2DEVMAC(x);
 968         wxCoord yy = YLOG2DEVMAC(y);
 969         wxCoord ww = m_signX * XLOG2DEVREL(width);
 970         wxCoord hh = m_signY * YLOG2DEVREL(height);
 971
 972         // CMB: draw nothing if transformed w or h is 0
 973         if (ww == 0 || hh == 0)
 974                 return;
 975
 976         // CMB: handle -ve width and/or height
 977         if (ww < 0)
 978         {
 979                 ww = -ww;
 980                 xx = xx - ww;
 981         }
 982
 983         if (hh < 0)
 984         {
 985                 hh = -hh;
 986                 yy = yy - hh;
 987         }
 988
 989         Rect rect = { yy , xx , yy + hh , xx + ww } ;
 990
 991         if (m_brush.GetStyle() != wxTRANSPARENT)
 992         {
 993                 MacInstallBrush() ;
 994                 ::PaintRect( &rect ) ;
 995         }
 996
 997         if (m_pen.GetStyle() != wxTRANSPARENT)
 998         {
 999                 MacInstallPen() ;
1000                 ::FrameRect( &rect ) ;
1001         }
1002 }
1003
1004 void  wxDC::DoDrawRoundedRectangle(wxCoord x, wxCoord y,
1005                                         wxCoord width, wxCoord height,
1006                                         double radius)
1007 {
1008     wxCHECK_RET(Ok(), wxT("Invalid DC"));
1009     wxMacPortSetter helper(this) ;
1010
1011     if (radius < 0.0)
1012             radius = - radius * ((width < height) ? width : height);
1013
1014         wxCoord xx = XLOG2DEVMAC(x);
1015         wxCoord yy = YLOG2DEVMAC(y);
1016         wxCoord ww = m_signX * XLOG2DEVREL(width);
1017         wxCoord hh = m_signY * YLOG2DEVREL(height);
1018
1019         // CMB: draw nothing if transformed w or h is 0
1020         if (ww == 0 || hh == 0)
1021                 return;
1022
1023         // CMB: handle -ve width and/or height
1024         if (ww < 0)
1025         {
1026                 ww = -ww;
1027                 xx = xx - ww;
1028         }
1029
1030         if (hh < 0)
1031         {
1032                 hh = -hh;
1033                 yy = yy - hh;
1034         }
1035
1036         Rect rect = { yy , xx , yy + hh , xx + ww } ;
1037
1038         if (m_brush.GetStyle() != wxTRANSPARENT)
1039         {
1040                 MacInstallBrush() ;
1041                 ::PaintRoundRect( &rect , int(radius * 2) , int(radius * 2) ) ;
1042         }
1043
1044         if (m_pen.GetStyle() != wxTRANSPARENT)
1045         {
1046                 MacInstallPen() ;
1047                 ::FrameRoundRect( &rect , int(radius * 2) , int(radius * 2) ) ;
1048         }
1049 }
1050
1051 void  wxDC::DoDrawEllipse(wxCoord x, wxCoord y, wxCoord width, wxCoord height)
1052 {
1053     wxCHECK_RET(Ok(), wxT("Invalid DC"));
1054     wxMacPortSetter helper(this) ;
1055
1056         wxCoord xx = XLOG2DEVMAC(x);
1057         wxCoord yy = YLOG2DEVMAC(y);
1058         wxCoord ww = m_signX * XLOG2DEVREL(width);
1059         wxCoord hh = m_signY * YLOG2DEVREL(height);
1060
1061         // CMB: draw nothing if transformed w or h is 0
1062         if (ww == 0 || hh == 0)
1063                 return;
1064
1065         // CMB: handle -ve width and/or height
1066         if (ww < 0)
1067         {
1068                 ww = -ww;
1069                 xx = xx - ww;
1070         }
1071
1072         if (hh < 0)
1073         {
1074                 hh = -hh;
1075                 yy = yy - hh;
1076         }
1077
1078         Rect rect = { yy , xx , yy + hh , xx + ww } ;
1079
1080         if (m_brush.GetStyle() != wxTRANSPARENT)
1081         {
1082                 MacInstallBrush() ;
1083                 ::PaintOval( &rect ) ;
1084         }
1085
1086         if (m_pen.GetStyle() != wxTRANSPARENT)
1087         {
1088                 MacInstallPen() ;
1089                 ::FrameOval( &rect ) ;
1090         }
1091 }
1092
1093
1094
1095 bool  wxDC::CanDrawBitmap(void) const
1096 {
1097         return true ;
1098 }
1099
1100
1101 bool  wxDC::DoBlit(wxCoord xdest, wxCoord ydest, wxCoord width, wxCoord height,
1102                         wxDC *source, wxCoord xsrc, wxCoord ysrc, int logical_func , bool useMask,
1103                         wxCoord xsrcMask,  wxCoord ysrcMask )
1104 {
1105     wxCHECK_MSG(Ok(), false, wxT("wxDC::DoBlit Illegal dc"));
1106     wxCHECK_MSG(source->Ok(), false, wxT("wxDC::DoBlit  Illegal source DC"));
1107
1108     if ( logical_func == wxNO_OP )
1109         return TRUE ;
1110
1111     if (xsrcMask == -1 && ysrcMask == -1)
1112     {
1113         xsrcMask = xsrc; ysrcMask = ysrc;
1114     }
1115
1116     // correct the parameter in case this dc does not have a mask at all
1117
1118     if ( useMask && !source->m_macMask )
1119         useMask = false ;
1120
1121         Rect srcrect , dstrect ;
1122         srcrect.top = source->YLOG2DEVMAC(ysrc) ;
1123         srcrect.left = source->XLOG2DEVMAC(xsrc)  ;
1124         srcrect.right = source->XLOG2DEVMAC(xsrc + width ) ;
1125         srcrect.bottom = source->YLOG2DEVMAC(ysrc + height) ;
1126         dstrect.top = YLOG2DEVMAC(ydest) ;
1127         dstrect.left = XLOG2DEVMAC(xdest) ;
1128         dstrect.bottom = YLOG2DEVMAC(ydest + height )  ;
1129         dstrect.right = XLOG2DEVMAC(xdest + width ) ;
1130
1131     short mode = kUnsupportedMode ;
1132     bool invertDestinationFirst = false ;
1133     switch ( logical_func )
1134     {
1135                 case wxAND:        // src AND dst
1136                     mode = srcOr ; // ok
1137                     break ;
1138                 case wxAND_INVERT: // (NOT src) AND dst
1139                     mode = notSrcOr  ; // ok
1140                     break ;
1141                 case wxAND_REVERSE:// src AND (NOT dst)
1142                     invertDestinationFirst = true ;
1143                     mode = srcOr ;
1144                     break ;
1145                 case wxCLEAR:      // 0
1146                     mode = kEmulatedMode ;
1147                     break ;
1148         case wxCOPY:       // src
1149                         mode = srcCopy ; // ok
1150                         break ;
1151                 case wxEQUIV:      // (NOT src) XOR dst
1152                     mode = srcXor ; // ok
1153                     break ;
1154                 case wxINVERT:     // NOT dst
1155                         mode = kEmulatedMode ; //or hilite ;
1156                         break ;
1157                 case wxNAND:       // (NOT src) OR (NOT dst)
1158                     invertDestinationFirst = true ;
1159                     mode = srcBic ;
1160                     break ;
1161                 case wxNOR:        // (NOT src) AND (NOT dst)
1162                     invertDestinationFirst = true ;
1163                     mode = notSrcOr ;
1164                     break ;
1165                 case wxNO_OP:      // dst
1166                     mode = kEmulatedMode ; // this has already been handled upon entry
1167                     break ;
1168                 case wxOR:         // src OR dst
1169                     mode = notSrcBic ;
1170                     break ;
1171                 case wxOR_INVERT:  // (NOT src) OR dst
1172                     mode = srcBic ;
1173                     break ;
1174                 case wxOR_REVERSE: // src OR (NOT dst)
1175                     invertDestinationFirst = true ;
1176                         mode = notSrcBic ;
1177                         break ;
1178                 case wxSET:        // 1
1179                     mode = kEmulatedMode ;
1180                     break ;
1181                 case wxSRC_INVERT: // (NOT src)
1182                         mode = notSrcCopy ; // ok
1183                         break ;
1184                 case wxXOR:        // src XOR dst
1185                         mode = notSrcXor ; // ok
1186                         break ;
1187
1188         default :
1189                         break ;
1190
1191     }
1192
1193     if ( mode == kUnsupportedMode )
1194     {
1195         wxFAIL_MSG("unsupported blitting mode" )
1196         return FALSE ;
1197     }
1198
1199         CGrafPtr                        sourcePort = (CGrafPtr) source->m_macPort ;
1200         PixMapHandle    bmappixels =  GetGWorldPixMap( sourcePort ) ;
1201         if ( LockPixels(bmappixels) )
1202         {
1203         wxMacPortSetter helper(this) ;
1204         RGBColor tempColor ;
1205
1206         if ( source->GetDepth() == 1 )
1207         {
1208             RGBForeColor( &MAC_WXCOLORREF(m_textForegroundColour.GetPixel()) ) ;
1209             RGBBackColor( &MAC_WXCOLORREF(m_textBackgroundColour.GetPixel()) ) ;
1210         }
1211         else
1212         {
1213             // the modes need this, otherwise we'll end up having really nice colors...
1214             RGBColor    white = { 0xFFFF, 0xFFFF,0xFFFF} ;
1215             RGBColor    black = { 0,0,0} ;
1216             RGBForeColor( &black ) ;
1217             RGBBackColor( &white ) ;
1218         }
1219
1220                 if ( useMask && source->m_macMask )
1221                 {
1222                     if ( mode == srcCopy )
1223                     {
1224                         if ( LockPixels( GetGWorldPixMap( MAC_WXHBITMAP(source->m_macMask) ) ) )
1225                         {
1226                                 CopyMask( GetPortBitMapForCopyBits( sourcePort ) ,
1227                                             GetPortBitMapForCopyBits( MAC_WXHBITMAP(source->m_macMask) ) ,
1228                                             GetPortBitMapForCopyBits( MAC_WXHBITMAP(m_macPort) ) ,
1229                                                 &srcrect, &srcrect , &dstrect ) ;
1230                                 UnlockPixels( GetGWorldPixMap( MAC_WXHBITMAP(source->m_macMask) )  ) ;
1231                         }
1232                     }
1233                     else
1234                     {
1235                 RgnHandle clipRgn = NewRgn() ;
1236                 LockPixels( GetGWorldPixMap( MAC_WXHBITMAP(source->m_macMask) ) ) ;
1237                 BitMapToRegion( clipRgn , (BitMap*) *GetGWorldPixMap( MAC_WXHBITMAP(source->m_macMask) ) ) ;
1238                 UnlockPixels( GetGWorldPixMap( MAC_WXHBITMAP(source->m_macMask) ) ) ;
1239                 OffsetRgn( clipRgn , -srcrect.left + dstrect.left, -srcrect.top +  dstrect.top ) ;
1240                 if ( mode == kEmulatedMode )
1241                 {
1242                     Pattern pat ;
1243                             ::PenPat(GetQDGlobalsBlack(&pat));
1244                     if ( logical_func == wxSET )
1245                     {
1246                         RGBColor col= { 0xFFFF, 0xFFFF, 0xFFFF } ;
1247                                 ::RGBForeColor( &col  ) ;
1248                         ::PaintRgn( clipRgn ) ;
1249                     }
1250                     else if ( logical_func == wxCLEAR )
1251                     {
1252                         RGBColor col= { 0x0000, 0x0000, 0x0000 } ;
1253                                 ::RGBForeColor( &col  ) ;
1254                         ::PaintRgn( clipRgn ) ;
1255                     }
1256                     else if ( logical_func == wxINVERT )
1257                     {
1258                         MacInvertRgn( clipRgn ) ;
1259                     }
1260                     else
1261                     {
1262                         for ( int y = 0 ; y < srcrect.right - srcrect.left ; ++y )
1263                         {
1264                             for ( int x = 0 ; x < srcrect.bottom - srcrect.top ; ++x )
1265                             {
1266                                 Point dstPoint = { dstrect.top + y , dstrect.left + x } ;
1267                                 Point srcPoint = { srcrect.top + y , srcrect.left + x } ;
1268                                 if ( PtInRgn( dstPoint , clipRgn ) )
1269                                 {
1270                                     RGBColor srcColor ;
1271                                     RGBColor dstColor ;
1272
1273                                     SetPort( (GrafPtr) sourcePort ) ;
1274                                     GetCPixel(  srcPoint.h , srcPoint.v , &srcColor) ;
1275                                     SetPort( (GrafPtr) m_macPort ) ;
1276                                     GetCPixel( dstPoint.h , dstPoint.v , &dstColor ) ;
1277
1278                                     wxMacCalculateColour( logical_func , srcColor ,  dstColor ) ;
1279                                     SetCPixel( dstPoint.h , dstPoint.v , &dstColor ) ;
1280                                 }
1281                             }
1282                         }
1283                     }
1284                 }
1285                 else
1286                 {
1287                     if ( invertDestinationFirst )
1288                     {
1289                         MacInvertRgn( clipRgn ) ;
1290                     }
1291                                 CopyBits( GetPortBitMapForCopyBits( sourcePort ) ,
1292                                     GetPortBitMapForCopyBits( MAC_WXHBITMAP(m_macPort) ) ,
1293                                         &srcrect, &dstrect, mode, clipRgn ) ;
1294                     }
1295                     DisposeRgn( clipRgn ) ;
1296                 }
1297                 }
1298                 else
1299                 {
1300             RgnHandle clipRgn = NewRgn() ;
1301             SetRectRgn( clipRgn , dstrect.left , dstrect.top , dstrect.right , dstrect.bottom ) ;
1302                     if ( mode == kEmulatedMode )
1303                     {
1304                 Pattern pat ;
1305                     ::PenPat(GetQDGlobalsBlack(&pat));
1306                 if ( logical_func == wxSET )
1307                 {
1308                     RGBColor col= { 0xFFFF, 0xFFFF, 0xFFFF } ;
1309                         ::RGBForeColor( &col  ) ;
1310                     ::PaintRgn( clipRgn ) ;
1311                 }
1312                 else if ( logical_func == wxCLEAR )
1313                 {
1314                     RGBColor col= { 0x0000, 0x0000, 0x0000 } ;
1315                         ::RGBForeColor( &col  ) ;
1316                     ::PaintRgn( clipRgn ) ;
1317                 }
1318                 else if ( logical_func == wxINVERT )
1319                 {
1320                     MacInvertRgn( clipRgn ) ;
1321                 }
1322                 else
1323                 {
1324                     for ( int y = 0 ; y < srcrect.right - srcrect.left ; ++y )
1325                     {
1326                         for ( int x = 0 ; x < srcrect.bottom - srcrect.top ; ++x )
1327                         {
1328                             Point dstPoint = { dstrect.top + y , dstrect.left + x } ;
1329                             Point srcPoint = { srcrect.top + y , srcrect.left + x } ;
1330
1331                             {
1332                                 RGBColor srcColor ;
1333                                 RGBColor dstColor ;
1334
1335                                 SetPort( (GrafPtr) sourcePort ) ;
1336                                 GetCPixel(  srcPoint.h , srcPoint.v , &srcColor) ;
1337                                 SetPort( (GrafPtr) m_macPort ) ;
1338                                 GetCPixel( dstPoint.h , dstPoint.v , &dstColor ) ;
1339
1340                                 wxMacCalculateColour( logical_func , srcColor ,  dstColor ) ;
1341                                 SetCPixel( dstPoint.h , dstPoint.v , &dstColor ) ;
1342                             }
1343                         }
1344                     }
1345                 }
1346
1347                 }
1348                 else
1349                 {
1350                 if ( invertDestinationFirst )
1351                 {
1352                     MacInvertRgn( clipRgn ) ;
1353                 }
1354                         CopyBits( GetPortBitMapForCopyBits( sourcePort ) ,
1355                             GetPortBitMapForCopyBits( MAC_WXHBITMAP(m_macPort) ) ,
1356                                 &srcrect, &dstrect, mode, NULL ) ;
1357                 }
1358                 DisposeRgn( clipRgn ) ;
1359                 }
1360                 UnlockPixels( bmappixels ) ;
1361         }
1362
1363         m_macPenInstalled = false ;
1364         m_macBrushInstalled = false ;
1365         m_macFontInstalled = false ;
1366
1367   return TRUE;
1368 }
1369
1370 inline Fixed    IntToFixed( int inInt )
1371         {
1372                 return (((SInt32) inInt) << 16);
1373         }
1374
1375
1376 void  wxDC::DoDrawRotatedText(const wxString& str, wxCoord x, wxCoord y,
1377                               double angle)
1378 {
1379     wxCHECK_RET( Ok(), wxT("wxDC::DoDrawRotatedText  Invalid window dc") );
1380
1381     if (angle == 0.0)
1382     {
1383         DrawText(str, x, y);
1384         return;
1385     }
1386
1387     wxMacPortSetter helper(this) ;
1388     MacInstallFont() ;
1389
1390         wxString text ;
1391         if ( wxApp::s_macDefaultEncodingIsPC )
1392         {
1393                 text = wxMacMakeMacStringFromPC( str ) ;
1394         }
1395         else
1396         {
1397                 text = str ;
1398         }
1399
1400         wxFontRefData * font = (wxFontRefData*) m_font.GetRefData() ;
1401     if ( 0 )
1402     {
1403         m_macFormerAliasState = IsAntiAliasedTextEnabled(&m_macFormerAliasSize);
1404         SetAntiAliasedTextEnabled(true, m_scaleY * font->m_macFontSize);
1405         m_macAliasWasEnabled = true ;
1406     }
1407
1408     OSStatus status = noErr ;
1409
1410         TECObjectRef ec;
1411         status = TECCreateConverter(&ec, kTextEncodingMacRoman, kTextEncodingUnicodeDefault);
1412         wxASSERT_MSG( status == noErr , "couldn't start converter" ) ;
1413
1414     ByteCount byteOutLen ;
1415     ByteCount byteInLen = text.Length() ;
1416     ByteCount byteBufferLen = byteInLen *2 ;
1417     char* buf = new char[byteBufferLen] ;
1418
1419         status = TECConvertText(ec, (ConstTextPtr)text.c_str() , byteInLen, &byteInLen,
1420             (TextPtr)buf, byteBufferLen, &byteOutLen);
1421
1422         wxASSERT_MSG( status == noErr , "couldn't convert text" ) ;
1423         status = TECDisposeConverter(ec);
1424         wxASSERT_MSG( status == noErr , "couldn't dispose converter" ) ;
1425
1426         ATSUTextLayout atsuLayout ;
1427         UniCharCount chars = byteOutLen / 2 ;
1428     status = ::ATSUCreateTextLayoutWithTextPtr( (UniCharArrayPtr) buf , 0 , byteOutLen / 2 , byteOutLen / 2 , 1 ,
1429         &chars , (ATSUStyle*) &m_macATSUIStyle , &atsuLayout ) ;
1430         wxASSERT_MSG( status == noErr , "couldn't create the layout of the rotated text" );
1431
1432     Fixed atsuAngle = IntToFixed( angle ) ;
1433         ByteCount angleSize = sizeof(Fixed) ;
1434         ATSUAttributeTag rotationTag = kATSULineRotationTag ;
1435         ATSUAttributeValuePtr   angleValue = &atsuAngle ;
1436         status = ::ATSUSetLayoutControls(atsuLayout , 1 , &rotationTag , &angleSize , &angleValue ) ;
1437
1438         status = ::ATSUDrawText( atsuLayout, kATSUFromTextBeginning, kATSUToTextEnd,
1439                                         IntToFixed(XLOG2DEVMAC(x) ) , IntToFixed(YLOG2DEVMAC(y) ) );
1440         wxASSERT_MSG( status == noErr , "couldn't draw the rotated text" );
1441     Rect rect ;
1442         status = ::ATSUMeasureTextImage( atsuLayout, kATSUFromTextBeginning, kATSUToTextEnd,
1443                                         IntToFixed(XLOG2DEVMAC(x) ) , IntToFixed(YLOG2DEVMAC(y) ) , &rect );
1444         wxASSERT_MSG( status == noErr , "couldn't measure the rotated text" );
1445
1446     OffsetRect( &rect , -m_macLocalOrigin.x , -m_macLocalOrigin.y ) ;
1447     CalcBoundingBox(XDEV2LOG(rect.left), YDEV2LOG(rect.top) );
1448     CalcBoundingBox(XDEV2LOG(rect.right), YDEV2LOG(rect.bottom) );
1449     ::ATSUDisposeTextLayout(atsuLayout);
1450     delete[] buf ;
1451 }
1452
1453 void  wxDC::DoDrawText(const wxString& strtext, wxCoord x, wxCoord y)
1454 {
1455     wxCHECK_RET(Ok(), wxT("wxDC::DoDrawText  Invalid DC"));
1456     wxMacPortSetter helper(this) ;
1457
1458         long xx = XLOG2DEVMAC(x);
1459         long yy = YLOG2DEVMAC(y);
1460
1461         MacInstallFont() ;
1462     if ( 0 )
1463     {
1464         m_macFormerAliasState = IsAntiAliasedTextEnabled(&m_macFormerAliasSize);
1465         SetAntiAliasedTextEnabled(true, 8);
1466         m_macAliasWasEnabled = true ;
1467     }
1468
1469         FontInfo fi ;
1470         ::GetFontInfo( &fi ) ;
1471
1472         yy += fi.ascent ;
1473         ::MoveTo( xx , yy );
1474         if (  m_backgroundMode == wxTRANSPARENT )
1475         {
1476                 ::TextMode( srcOr) ;
1477         }
1478         else
1479         {
1480                 ::TextMode( srcCopy ) ;
1481         }
1482
1483         const char *text = NULL ;
1484         int length = 0 ;
1485         wxString macText ;
1486
1487         if ( wxApp::s_macDefaultEncodingIsPC )
1488         {
1489                 macText = wxMacMakeMacStringFromPC( strtext ) ;
1490                 text = macText ;
1491                 length = macText.Length() ;
1492         }
1493         else
1494         {
1495                 text = strtext ;
1496                 length = strtext.Length() ;
1497         }
1498
1499         int laststop = 0 ;
1500         int i = 0 ;
1501         int line = 0 ;
1502
1503         while( i < length )
1504         {
1505                 if( text[i] == 13 || text[i] == 10)
1506                 {
1507                         ::DrawText( text , laststop , i - laststop ) ;
1508                         line++ ;
1509                         ::MoveTo( xx , yy + line*(fi.descent + fi.ascent + fi.leading) );
1510                         laststop = i+1 ;
1511                 }
1512                 i++ ;
1513         }
1514
1515         ::DrawText( text , laststop , i - laststop ) ;
1516         ::TextMode( srcOr ) ;
1517 }
1518
1519 bool  wxDC::CanGetTextExtent() const
1520 {
1521         wxCHECK_MSG(Ok(), false, wxT("Invalid DC"));
1522
1523         return true ;
1524 }
1525
1526 void  wxDC::DoGetTextExtent( const wxString &string, wxCoord *width, wxCoord *height,
1527                      wxCoord *descent, wxCoord *externalLeading ,
1528                      wxFont *theFont ) const
1529 {
1530    wxCHECK_RET(Ok(), wxT("Invalid DC"));
1531    wxMacPortSetter helper(this) ;
1532
1533         wxFont formerFont = m_font ;
1534
1535         if ( theFont )
1536         {
1537                 wxFontRefData * font = (wxFontRefData*) m_font.GetRefData() ;
1538
1539                 if ( font )
1540                 {
1541                         ::TextFont( font->m_macFontNum ) ;
1542                         ::TextSize( YLOG2DEVREL( font->m_macFontSize) ) ;
1543                         ::TextFace( font->m_macFontStyle ) ;
1544                 }
1545         }
1546         else
1547         {
1548                 MacInstallFont() ;
1549         }
1550
1551         FontInfo fi ;
1552         ::GetFontInfo( &fi ) ;
1553
1554         if ( height )
1555                 *height = YDEV2LOGREL( fi.descent + fi.ascent ) ;
1556         if ( descent )
1557                 *descent =YDEV2LOGREL( fi.descent );
1558         if ( externalLeading )
1559                 *externalLeading = YDEV2LOGREL( fi.leading ) ;
1560
1561         const char *text = NULL ;
1562         int length = 0 ;
1563         wxString macText ;
1564         if ( wxApp::s_macDefaultEncodingIsPC )
1565         {
1566                 macText = wxMacMakeMacStringFromPC( string ) ;
1567                 text = macText ;
1568                 length = macText.Length() ;
1569         }
1570         else
1571         {
1572                 text = string ;
1573                 length = string.Length() ;
1574         }
1575
1576         int laststop = 0 ;
1577         int i = 0 ;
1578         int curwidth = 0 ;
1579         if ( width )
1580         {
1581                 *width = 0 ;
1582
1583                 while( i < length )
1584                 {
1585                         if( text[i] == 13 || text[i] == 10)
1586                         {
1587                                 if ( height )
1588                                         *height += YDEV2LOGREL( fi.descent + fi.ascent + fi.leading ) ;
1589                                 curwidth = ::TextWidth( text , laststop , i - laststop ) ;
1590                                 if ( curwidth > *width )
1591                                         *width = XDEV2LOGREL( curwidth ) ;
1592                                 laststop = i+1 ;
1593                         }
1594                         i++ ;
1595                 }
1596
1597                 curwidth = ::TextWidth( text , laststop , i - laststop ) ;
1598                 if ( curwidth > *width )
1599                         *width = XDEV2LOGREL( curwidth ) ;
1600         }
1601
1602         if ( theFont )
1603         {
1604                 m_macFontInstalled = false ;
1605         }
1606 }
1607
1608 wxCoord   wxDC::GetCharWidth(void) const
1609 {
1610     wxCHECK_MSG(Ok(), 1, wxT("Invalid DC"));
1611
1612    wxMacPortSetter helper(this) ;
1613
1614         MacInstallFont() ;
1615
1616     int width = ::TextWidth( "n" , 0 , 1 ) ;
1617
1618         return YDEV2LOGREL(width) ;
1619 }
1620
1621 wxCoord   wxDC::GetCharHeight(void) const
1622 {
1623     wxCHECK_MSG(Ok(), 1, wxT("Invalid DC"));
1624
1625     wxMacPortSetter helper(this) ;
1626
1627         MacInstallFont() ;
1628
1629         FontInfo fi ;
1630         ::GetFontInfo( &fi ) ;
1631
1632         return YDEV2LOGREL( fi.descent + fi.ascent );
1633 }
1634
1635 void  wxDC::Clear(void)
1636 {
1637     wxCHECK_RET(Ok(), wxT("Invalid DC"));
1638     wxMacPortSetter helper(this) ;
1639         Rect rect = { -32000 , -32000 , 32000 , 32000 } ;
1640
1641         if (m_backgroundBrush.GetStyle() != wxTRANSPARENT)
1642         {
1643             ::PenNormal() ;
1644             //MacInstallBrush() ;
1645         MacSetupBackgroundForCurrentPort( m_backgroundBrush ) ;
1646                 ::EraseRect( &rect ) ;
1647         }
1648 }
1649
1650 void wxDC::MacInstallFont() const
1651 {
1652     wxCHECK_RET(Ok(), wxT("Invalid DC"));
1653 //      if ( m_macFontInstalled )
1654 //              return ;
1655         Pattern blackColor ;
1656
1657         wxFontRefData * font = (wxFontRefData*) m_font.GetRefData() ;
1658
1659         if ( font )
1660         {
1661                 ::TextFont( font->m_macFontNum ) ;
1662                 ::TextSize( short(m_scaleY * font->m_macFontSize) ) ;
1663                 ::TextFace( font->m_macFontStyle ) ;
1664
1665                 m_macFontInstalled = true ;
1666                 m_macBrushInstalled = false ;
1667                 m_macPenInstalled = false ;
1668
1669                 RGBColor forecolor = MAC_WXCOLORREF( m_textForegroundColour.GetPixel());
1670                 RGBColor backcolor = MAC_WXCOLORREF( m_textBackgroundColour.GetPixel());
1671                 ::RGBForeColor( &forecolor );
1672                 ::RGBBackColor( &backcolor );
1673         }
1674         else
1675         {
1676                 short fontnum ;
1677
1678                 GetFNum( "\pGeneva" , &fontnum ) ;
1679                 ::TextFont( fontnum ) ;
1680                 ::TextSize( short(m_scaleY * 10) ) ;
1681                 ::TextFace( 0 ) ;
1682
1683                 // todo reset after spacing changes - or store the current spacing somewhere
1684
1685                 m_macFontInstalled = true ;
1686                 m_macBrushInstalled = false ;
1687                 m_macPenInstalled = false ;
1688
1689                 RGBColor forecolor = MAC_WXCOLORREF( m_textForegroundColour.GetPixel());
1690                 RGBColor backcolor = MAC_WXCOLORREF( m_textBackgroundColour.GetPixel());
1691                 ::RGBForeColor( &forecolor );
1692                 ::RGBBackColor( &backcolor );
1693         }
1694
1695         short mode = patCopy ;
1696
1697         // todo :
1698
1699         switch( m_logicalFunction )
1700         {
1701                 case wxCOPY:       // src
1702                         mode = patCopy ;
1703                         break ;
1704                 case wxINVERT:     // NOT dst
1705                         ::PenPat(GetQDGlobalsBlack(&blackColor));
1706                         mode = patXor ;
1707                         break ;
1708                 case wxXOR:        // src XOR dst
1709                         mode = patXor ;
1710                         break ;
1711                 case wxOR_REVERSE: // src OR (NOT dst)
1712                         mode = notPatOr ;
1713                         break ;
1714                 case wxSRC_INVERT: // (NOT src)
1715                         mode = notPatCopy ;
1716                         break ;
1717
1718                 // unsupported TODO
1719
1720                 case wxCLEAR:      // 0
1721                 case wxAND_REVERSE:// src AND (NOT dst)
1722                 case wxAND:        // src AND dst
1723                 case wxAND_INVERT: // (NOT src) AND dst
1724                 case wxNO_OP:      // dst
1725                 case wxNOR:        // (NOT src) AND (NOT dst)
1726                 case wxEQUIV:      // (NOT src) XOR dst
1727                 case wxOR_INVERT:  // (NOT src) OR dst
1728                 case wxNAND:       // (NOT src) OR (NOT dst)
1729                 case wxOR:         // src OR dst
1730                 case wxSET:        // 1
1731 //              case wxSRC_OR:     // source _bitmap_ OR destination
1732 //              case wxSRC_AND:     // source _bitmap_ AND destination
1733                         break ;
1734         }
1735         ::PenMode( mode ) ;
1736
1737     OSStatus status = noErr ;
1738
1739     Fixed atsuSize = IntToFixed(m_scaleY * font->m_macFontSize) ;
1740
1741     Style qdStyle = font->m_macFontStyle ;
1742         ATSUFontID      atsuFont = font->m_macATSUFontID ;
1743
1744     status = ::ATSUCreateStyle(&(ATSUStyle)m_macATSUIStyle) ;
1745         wxASSERT_MSG( status == noErr , "couldn't create ATSU style" ) ;
1746
1747         ATSUAttributeTag atsuTags[] =
1748         {
1749             kATSUFontTag ,
1750             kATSUSizeTag ,
1751             kATSUColorTag ,
1752
1753             kATSUQDBoldfaceTag ,
1754             kATSUQDItalicTag ,
1755             kATSUQDUnderlineTag ,
1756             kATSUQDCondensedTag ,
1757             kATSUQDExtendedTag ,
1758
1759         } ;
1760
1761     ByteCount atsuSizes[sizeof(atsuTags)/sizeof(ATSUAttributeTag)] =
1762     {
1763         sizeof( ATSUFontID ) ,
1764         sizeof( Fixed ) ,
1765         sizeof( RGBColor ) ,
1766         sizeof( Boolean ) ,
1767         sizeof( Boolean ) ,
1768         sizeof( Boolean ) ,
1769         sizeof( Boolean ) ,
1770         sizeof( Boolean ) ,
1771     } ;
1772
1773     Boolean kTrue = true ;
1774     Boolean kFalse = false ;
1775
1776         ATSUAttributeValuePtr   atsuValues[sizeof(atsuTags)/sizeof(ATSUAttributeTag)] =
1777         {
1778             &atsuFont ,
1779             &atsuSize ,
1780             &MAC_WXCOLORREF( m_textForegroundColour.GetPixel() ) ,
1781
1782             (qdStyle & bold) ? &kTrue : &kFalse ,
1783             (qdStyle & italic) ? &kTrue : &kFalse ,
1784             (qdStyle & underline) ? &kTrue : &kFalse ,
1785             (qdStyle & condense) ? &kTrue : &kFalse ,
1786             (qdStyle & extend) ? &kTrue : &kFalse ,
1787         } ;
1788
1789         status = ::ATSUSetAttributes((ATSUStyle)m_macATSUIStyle, sizeof(atsuTags)/sizeof(ATSUAttributeTag),
1790             atsuTags, atsuSizes, atsuValues);
1791         wxASSERT_MSG( status == noErr , "couldn't set create ATSU style" ) ;
1792
1793 }
1794
1795 Pattern gHatchPatterns[] =
1796 {
1797     { 0xFF , 0xFF , 0xFF , 0xFF , 0xFF , 0xFF , 0xFF , 0xFF } ,
1798     { 0x01 , 0x02 , 0x04 , 0x08 , 0x10 , 0x20 , 0x40 , 0x80 } ,
1799     { 0x80 , 0x40 , 0x20 , 0x10 , 0x08 , 0x04 , 0x02 , 0x01 } ,
1800     { 0x10 , 0x10 , 0x10 , 0xFF , 0x10 , 0x10 , 0x10 , 0x10 } ,
1801     { 0x00 , 0x00 , 0x00 , 0xFF , 0x00 , 0x00 , 0x00 , 0x00 } ,
1802     { 0x10 , 0x10 , 0x10 , 0x10 , 0x10 , 0x10 , 0x10 , 0x10 } ,
1803     { 0x81 , 0x42 , 0x24 , 0x18 , 0x18 , 0x24 , 0x42 , 0x81 } ,
1804 } ;
1805
1806 static void wxMacGetHatchPattern(int hatchStyle, Pattern *pattern)
1807 {
1808         int theIndex = 1 ;
1809
1810         switch(hatchStyle)
1811         {
1812                 case wxBDIAGONAL_HATCH:
1813                         theIndex = 2;
1814                         break;
1815                 case wxFDIAGONAL_HATCH:
1816                         theIndex = 3;
1817                         break;
1818                 case wxCROSS_HATCH:
1819                         theIndex = 4;
1820                         break;
1821                 case wxHORIZONTAL_HATCH:
1822                         theIndex = 5;
1823                         break;
1824                 case wxVERTICAL_HATCH:
1825                         theIndex = 6;
1826                         break;
1827                 case wxCROSSDIAG_HATCH:
1828                         theIndex = 7;
1829                         break;
1830                 default:
1831                         theIndex = 1; // solid pattern
1832                         break;
1833         }
1834         *pattern = gHatchPatterns[theIndex-1] ;
1835 }
1836
1837 void wxDC::MacInstallPen() const
1838 {
1839     wxCHECK_RET(Ok(), wxT("Invalid DC"));
1840
1841         Pattern  blackColor;
1842
1843 //      if ( m_macPenInstalled )
1844 //              return ;
1845
1846         RGBColor forecolor = MAC_WXCOLORREF( m_pen.GetColour().GetPixel());
1847         RGBColor backcolor = MAC_WXCOLORREF( m_backgroundBrush.GetColour().GetPixel());
1848         ::RGBForeColor( &forecolor );
1849         ::RGBBackColor( &backcolor );
1850
1851         ::PenNormal() ;
1852         int penWidth = m_pen.GetWidth() * (int) m_scaleX ;
1853
1854         // null means only one pixel, at whatever resolution
1855         if ( penWidth == 0 )
1856                 penWidth = 1 ;
1857         ::PenSize(penWidth, penWidth);
1858
1859         int penStyle = m_pen.GetStyle();
1860
1861         if (penStyle == wxSOLID)
1862         {
1863                 ::PenPat(GetQDGlobalsBlack(&blackColor));
1864         }
1865         else if (IS_HATCH(penStyle))
1866         {
1867                 Pattern pat ;
1868                 wxMacGetHatchPattern(penStyle, &pat);
1869                 ::PenPat(&pat);
1870         }
1871         else
1872         {
1873             Pattern pat = *GetQDGlobalsBlack(&blackColor) ;
1874             switch( penStyle )
1875             {
1876                 case wxDOT :
1877                 for ( int i = 0 ; i < 8 ; ++i )
1878                 {
1879                     pat.pat[i] = 0xCC ;
1880                 }
1881                     break ;
1882                 case wxLONG_DASH :
1883                 for ( int i = 0 ; i < 8 ; ++i )
1884                 {
1885                     pat.pat[i] = 0xFE ;
1886                 }
1887                     break ;
1888                 case wxSHORT_DASH :
1889                 for ( int i = 0 ; i < 8 ; ++i )
1890                 {
1891                     pat.pat[i] = 0xEE ;
1892                 }
1893                     break ;
1894                 case wxDOT_DASH :
1895                 for ( int i = 0 ; i < 8 ; ++i )
1896                 {
1897                     pat.pat[i] = 0x6F ;
1898                 }
1899                     break ;
1900                 case wxUSER_DASH :
1901                     {
1902                         wxDash* dash ;
1903                         int number = m_pen.GetDashes(&dash) ;
1904                         // right now we don't allocate larger pixmaps
1905                         for ( int i = 0 ; i < 8 ; ++i )
1906                         {
1907                             pat.pat[i] = dash[0] ;
1908                         }
1909                     }
1910                     break ;
1911             }
1912                 ::PenPat(&pat);
1913         }
1914
1915         short mode = patCopy ;
1916
1917         // todo :
1918
1919         switch( m_logicalFunction )
1920         {
1921                 case wxCOPY:       // only foreground color, leave background (thus not patCopy)
1922                         mode = patOr ;
1923                         break ;
1924                 case wxINVERT:     // NOT dst
1925 //                      ::PenPat(GetQDGlobalsBlack(&blackColor));
1926                         mode = patXor ;
1927                         break ;
1928                 case wxXOR:        // src XOR dst
1929                         mode = patXor ;
1930                         break ;
1931                 case wxOR_REVERSE: // src OR (NOT dst)
1932                         mode = notPatOr ;
1933                         break ;
1934                 case wxSRC_INVERT: // (NOT src)
1935                         mode = notPatCopy ;
1936                         break ;
1937
1938                 // unsupported TODO
1939
1940                 case wxCLEAR:      // 0
1941                 case wxAND_REVERSE:// src AND (NOT dst)
1942                 case wxAND:        // src AND dst
1943                 case wxAND_INVERT: // (NOT src) AND dst
1944                 case wxNO_OP:      // dst
1945                 case wxNOR:        // (NOT src) AND (NOT dst)
1946                 case wxEQUIV:      // (NOT src) XOR dst
1947                 case wxOR_INVERT:  // (NOT src) OR dst
1948                 case wxNAND:       // (NOT src) OR (NOT dst)
1949                 case wxOR:         // src OR dst
1950                 case wxSET:        // 1
1951 //              case wxSRC_OR:     // source _bitmap_ OR destination
1952 //              case wxSRC_AND:     // source _bitmap_ AND destination
1953                         break ;
1954         }
1955         ::PenMode( mode ) ;
1956         m_macPenInstalled = true ;
1957         m_macBrushInstalled = false ;
1958         m_macFontInstalled = false ;
1959 }
1960
1961 void wxDC::MacSetupBackgroundForCurrentPort(const wxBrush& background )
1962 {
1963     Pattern whiteColor ;
1964     switch( background.MacGetBrushKind() )
1965     {
1966       case kwxMacBrushTheme :
1967         {
1968                 ::SetThemeBackground( background.GetMacTheme() , wxDisplayDepth() , true ) ;
1969           break ;
1970         }
1971       case kwxMacBrushThemeBackground :
1972         {
1973                 Rect extent ;
1974                 ThemeBackgroundKind bg = background.GetMacThemeBackground( &extent ) ;
1975                 ::ApplyThemeBackground( bg , &extent ,kThemeStateActive , wxDisplayDepth() , true ) ;
1976           break ;
1977         }
1978       case kwxMacBrushColour :
1979         {
1980             ::RGBBackColor( &MAC_WXCOLORREF( background.GetColour().GetPixel()) );
1981                 int brushStyle = background.GetStyle();
1982                 if (brushStyle == wxSOLID)
1983                         ::BackPat(GetQDGlobalsWhite(&whiteColor));
1984                 else if (IS_HATCH(brushStyle))
1985                 {
1986                         Pattern pat ;
1987                         wxMacGetHatchPattern(brushStyle, &pat);
1988                         ::BackPat(&pat);
1989                 }
1990                 else
1991                 {
1992                         ::BackPat(GetQDGlobalsWhite(&whiteColor));
1993                 }
1994           break ;
1995         }
1996     }
1997 }
1998
1999 void wxDC::MacInstallBrush() const
2000 {
2001     wxCHECK_RET(Ok(), wxT("Invalid DC"));
2002
2003         Pattern  blackColor ;
2004 //      if ( m_macBrushInstalled )
2005 //              return ;
2006
2007         // foreground
2008
2009         bool backgroundTransparent = (GetBackgroundMode() == wxTRANSPARENT) ;
2010
2011         ::RGBForeColor( &MAC_WXCOLORREF( m_brush.GetColour().GetPixel()) );
2012         ::RGBBackColor( &MAC_WXCOLORREF( m_backgroundBrush.GetColour().GetPixel()) );
2013
2014         int brushStyle = m_brush.GetStyle();
2015         if (brushStyle == wxSOLID)
2016         {
2017                 ::PenPat(GetQDGlobalsBlack(&blackColor));
2018     }
2019         else if (IS_HATCH(brushStyle))
2020         {
2021                 Pattern pat ;
2022                 wxMacGetHatchPattern(brushStyle, &pat);
2023                 ::PenPat(&pat);
2024         }
2025         else if ( m_brush.GetStyle() == wxSTIPPLE || m_brush.GetStyle() == wxSTIPPLE_MASK_OPAQUE )
2026         {
2027             // we force this in order to be compliant with wxMSW
2028             backgroundTransparent = false ;
2029             // for these the text fore (and back for MASK_OPAQUE) colors are used
2030             wxBitmap* bitmap = m_brush.GetStipple() ;
2031             int width = bitmap->GetWidth() ;
2032             int height = bitmap->GetHeight() ;
2033         GWorldPtr gw = NULL ;
2034
2035             if ( m_brush.GetStyle() == wxSTIPPLE )
2036                 gw = MAC_WXHBITMAP(bitmap->GetHBITMAP())  ;
2037             else
2038                 gw = MAC_WXHBITMAP(bitmap->GetMask()->GetMaskBitmap()) ;
2039
2040         PixMapHandle gwpixmaphandle = GetGWorldPixMap( gw ) ;
2041         LockPixels( gwpixmaphandle ) ;
2042
2043             bool isMonochrome = !IsPortColor( gw ) ;
2044
2045         if ( !isMonochrome )
2046         {
2047             if ( (**gwpixmaphandle).pixelSize == 1 )
2048                 isMonochrome = true ;
2049         }
2050
2051         if ( isMonochrome && width == 8 && height == 8 )
2052             {
2053                 ::RGBForeColor( &MAC_WXCOLORREF( m_textForegroundColour.GetPixel()) );
2054                 ::RGBForeColor( &MAC_WXCOLORREF( m_textBackgroundColour.GetPixel()) );
2055             BitMap* gwbitmap = (BitMap*) *gwpixmaphandle ; // since the color depth is 1 it is a BitMap
2056             UInt8 *gwbits = (UInt8*) gwbitmap->baseAddr ;
2057             int alignment = gwbitmap->rowBytes & 0x7FFF ;
2058             Pattern pat ;
2059             for ( int i = 0 ; i < 8 ; ++i )
2060             {
2061                 pat.pat[i] = gwbits[i*alignment+0] ;
2062             }
2063             UnlockPixels( GetGWorldPixMap( gw ) ) ;
2064             ::PenPat( &pat ) ;
2065             }
2066             else
2067             {
2068  // this will be the code to handle power of 2 patterns, we will have to arrive at a nice
2069  // caching scheme before putting this into production
2070                 Handle      image;
2071                 long            imageSize;
2072                 PixPatHandle pixpat = NewPixPat() ;
2073
2074                 CopyPixMap(gwpixmaphandle, (**pixpat).patMap);
2075             imageSize = GetPixRowBytes((**pixpat).patMap) *
2076                             ((**(**pixpat).patMap).bounds.bottom -
2077                             (**(**pixpat).patMap).bounds.top);
2078
2079             PtrToHand( (**gwpixmaphandle).baseAddr, &image, imageSize );
2080             (**pixpat).patData = image;
2081             if ( isMonochrome )
2082             {
2083                     CTabHandle ctable = ((**((**pixpat).patMap)).pmTable) ;
2084                     ColorSpecPtr ctspec = (ColorSpecPtr) &(**ctable).ctTable ;
2085                     if ( ctspec[0].rgb.red == 0x0000 )
2086                     {
2087                         ctspec[1].rgb = MAC_WXCOLORREF( m_textBackgroundColour.GetPixel()) ;
2088                         ctspec[0].rgb = MAC_WXCOLORREF( m_textForegroundColour.GetPixel()) ;
2089                     }
2090                     else
2091                     {
2092                         ctspec[0].rgb = MAC_WXCOLORREF( m_textBackgroundColour.GetPixel()) ;
2093                         ctspec[1].rgb = MAC_WXCOLORREF( m_textForegroundColour.GetPixel()) ;
2094                     }
2095                     ::CTabChanged( ctable ) ;
2096             }
2097             ::PenPixPat(pixpat);
2098             m_macForegroundPixMap = pixpat ;
2099             }
2100             UnlockPixels( gwpixmaphandle ) ;
2101         }
2102     else
2103     {
2104             ::PenPat(GetQDGlobalsBlack(&blackColor));
2105         }
2106
2107         short mode = patCopy ;
2108         switch( m_logicalFunction )
2109         {
2110                 case wxCOPY:       // src
2111                     if ( backgroundTransparent )
2112                         mode = patOr ;
2113                     else
2114                             mode = patCopy ;
2115                         break ;
2116                 case wxINVERT:     // NOT dst
2117                     if ( !backgroundTransparent )
2118                     {
2119                             ::PenPat(GetQDGlobalsBlack(&blackColor));
2120                         }
2121                         mode = patXor ;
2122                         break ;
2123                 case wxXOR:        // src XOR dst
2124                         mode = patXor ;
2125                         break ;
2126                 case wxOR_REVERSE: // src OR (NOT dst)
2127                         mode = notPatOr ;
2128                         break ;
2129                 case wxSRC_INVERT: // (NOT src)
2130                         mode = notPatCopy ;
2131                         break ;
2132
2133                 // unsupported TODO
2134
2135                 case wxCLEAR:      // 0
2136                 case wxAND_REVERSE:// src AND (NOT dst)
2137                 case wxAND:        // src AND dst
2138                 case wxAND_INVERT: // (NOT src) AND dst
2139                 case wxNO_OP:      // dst
2140                 case wxNOR:        // (NOT src) AND (NOT dst)
2141                 case wxEQUIV:      // (NOT src) XOR dst
2142                 case wxOR_INVERT:  // (NOT src) OR dst
2143                 case wxNAND:       // (NOT src) OR (NOT dst)
2144                 case wxOR:         // src OR dst
2145                 case wxSET:        // 1
2146 //              case wxSRC_OR:     // source _bitmap_ OR destination
2147 //              case wxSRC_AND:     // source _bitmap_ AND destination
2148                         break ;
2149         }
2150         ::PenMode( mode ) ;
2151         m_macBrushInstalled = true ;
2152         m_macPenInstalled = false ;
2153         m_macFontInstalled = false ;
2154 }
2155
2156 // ---------------------------------------------------------------------------
2157 // coordinates transformations
2158 // ---------------------------------------------------------------------------
2159
2160
2161 wxCoord wxDCBase::DeviceToLogicalX(wxCoord x) const
2162 {
2163     return ((wxDC *)this)->XDEV2LOG(x);
2164 }
2165
2166 wxCoord wxDCBase::DeviceToLogicalY(wxCoord y) const
2167 {
2168     return ((wxDC *)this)->YDEV2LOG(y);
2169 }
2170
2171 wxCoord wxDCBase::DeviceToLogicalXRel(wxCoord x) const
2172 {
2173     return ((wxDC *)this)->XDEV2LOGREL(x);
2174 }
2175
2176 wxCoord wxDCBase::DeviceToLogicalYRel(wxCoord y) const
2177 {
2178     return ((wxDC *)this)->YDEV2LOGREL(y);
2179 }
2180
2181 wxCoord wxDCBase::LogicalToDeviceX(wxCoord x) const
2182 {
2183     return ((wxDC *)this)->XLOG2DEV(x);
2184 }
2185
2186 wxCoord wxDCBase::LogicalToDeviceY(wxCoord y) const
2187 {
2188     return ((wxDC *)this)->YLOG2DEV(y);
2189 }
2190
2191 wxCoord wxDCBase::LogicalToDeviceXRel(wxCoord x) const
2192 {
2193     return ((wxDC *)this)->XLOG2DEVREL(x);
2194 }
2195
2196 wxCoord wxDCBase::LogicalToDeviceYRel(wxCoord y) const
2197 {
2198     return ((wxDC *)this)->YLOG2DEVREL(y);
2199 }