src/common/image.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        image.cpp
   3 // Purpose:     wxImage
   4 // Author:      Robert Roebling
   5 // RCS-ID:      $Id$
   6 // Copyright:   (c) Robert Roebling
   7 // Licence:     wxWindows licence
   8 /////////////////////////////////////////////////////////////////////////////
   9
  10 #ifdef __GNUG__
  11 #pragma implementation "image.h"
  12 #endif
  13
  14 // For compilers that support precompilation, includes "wx.h".
  15 #include "wx/wxprec.h"
  16
  17 #ifdef __BORLANDC__
  18     #pragma hdrstop
  19 #endif
  20
  21 #include "wx/defs.h"
  22
  23 #if wxUSE_IMAGE
  24
  25 #include "wx/image.h"
  26 #include "wx/bitmap.h"
  27 #include "wx/debug.h"
  28 #include "wx/log.h"
  29 #include "wx/app.h"
  30 #include "wx/filefn.h"
  31 #include "wx/wfstream.h"
  32 #include "wx/intl.h"
  33 #include "wx/module.h"
  34
  35 // For memcpy
  36 #include <string.h>
  37 #include <math.h>
  38
  39 #ifdef __SALFORDC__
  40     #undef FAR
  41 #endif
  42
  43
  44 //-----------------------------------------------------------------------------
  45 // wxImage
  46 //-----------------------------------------------------------------------------
  47
  48 class wxImageRefData: public wxObjectRefData
  49 {
  50 public:
  51     wxImageRefData();
  52     ~wxImageRefData();
  53
  54     int             m_width;
  55     int             m_height;
  56     unsigned char  *m_data;
  57     bool            m_hasMask;
  58     unsigned char   m_maskRed,m_maskGreen,m_maskBlue;
  59     bool            m_ok;
  60     bool            m_static;
  61 #if wxUSE_PALETTE
  62     wxPalette       m_palette;
  63 #endif // wxUSE_PALETTE
  64     wxArrayString   m_optionNames;
  65     wxArrayString   m_optionValues;
  66 };
  67
  68 wxImageRefData::wxImageRefData()
  69 {
  70     m_width = 0;
  71     m_height = 0;
  72     m_data = (unsigned char*) NULL;
  73     m_ok = FALSE;
  74     m_maskRed = 0;
  75     m_maskGreen = 0;
  76     m_maskBlue = 0;
  77     m_hasMask = FALSE;
  78     m_static = FALSE;
  79 }
  80
  81 wxImageRefData::~wxImageRefData()
  82 {
  83     if (m_data && !m_static)
  84         free( m_data );
  85 }
  86
  87 wxList wxImage::sm_handlers;
  88
  89 wxImage wxNullImage;
  90
  91 //-----------------------------------------------------------------------------
  92
  93 #define M_IMGDATA ((wxImageRefData *)m_refData)
  94
  95 IMPLEMENT_DYNAMIC_CLASS(wxImage, wxObject)
  96
  97 wxImage::wxImage()
  98 {
  99 }
 100
 101 wxImage::wxImage( int width, int height )
 102 {
 103     Create( width, height );
 104 }
 105
 106 wxImage::wxImage( int width, int height, unsigned char* data, bool static_data )
 107 {
 108     Create( width, height, data, static_data );
 109 }
 110
 111 wxImage::wxImage( const wxString& name, long type, int index )
 112 {
 113     LoadFile( name, type, index );
 114 }
 115
 116 wxImage::wxImage( const wxString& name, const wxString& mimetype, int index )
 117 {
 118     LoadFile( name, mimetype, index );
 119 }
 120
 121 #if wxUSE_STREAMS
 122 wxImage::wxImage( wxInputStream& stream, long type, int index )
 123 {
 124     LoadFile( stream, type, index );
 125 }
 126
 127 wxImage::wxImage( wxInputStream& stream, const wxString& mimetype, int index )
 128 {
 129     LoadFile( stream, mimetype, index );
 130 }
 131 #endif // wxUSE_STREAMS
 132
 133 wxImage::wxImage( const wxImage& image )
 134 {
 135     Ref(image);
 136 }
 137
 138 wxImage::wxImage( const wxImage* image )
 139 {
 140     if (image) Ref(*image);
 141 }
 142
 143 void wxImage::Create( int width, int height )
 144 {
 145     UnRef();
 146
 147     m_refData = new wxImageRefData();
 148
 149     M_IMGDATA->m_data = (unsigned char *) malloc( width*height*3 );
 150     if (M_IMGDATA->m_data)
 151     {
 152         for (int l = 0; l < width*height*3; l++) M_IMGDATA->m_data[l] = 0;
 153
 154         M_IMGDATA->m_width = width;
 155         M_IMGDATA->m_height = height;
 156         M_IMGDATA->m_ok = TRUE;
 157     }
 158     else
 159     {
 160         UnRef();
 161     }
 162 }
 163
 164 void wxImage::Create( int width, int height, unsigned char* data, bool static_data )
 165 {
 166     UnRef();
 167
 168     m_refData = new wxImageRefData();
 169
 170     M_IMGDATA->m_data = data;
 171     if (M_IMGDATA->m_data)
 172     {
 173         M_IMGDATA->m_width = width;
 174         M_IMGDATA->m_height = height;
 175         M_IMGDATA->m_ok = TRUE;
 176         M_IMGDATA->m_static = static_data;
 177     }
 178     else
 179     {
 180         UnRef();
 181     }
 182 }
 183
 184 void wxImage::Destroy()
 185 {
 186     UnRef();
 187 }
 188
 189 wxImage wxImage::Copy() const
 190 {
 191     wxImage image;
 192
 193     wxCHECK_MSG( Ok(), image, wxT("invalid image") );
 194
 195     image.Create( M_IMGDATA->m_width, M_IMGDATA->m_height );
 196
 197     char unsigned *data = image.GetData();
 198
 199     wxCHECK_MSG( data, image, wxT("unable to create image") );
 200
 201     if (M_IMGDATA->m_hasMask)
 202         image.SetMaskColour( M_IMGDATA->m_maskRed, M_IMGDATA->m_maskGreen, M_IMGDATA->m_maskBlue );
 203
 204     memcpy( data, GetData(), M_IMGDATA->m_width*M_IMGDATA->m_height*3 );
 205
 206     return image;
 207 }
 208
 209 wxImage wxImage::Scale( int width, int height ) const
 210 {
 211     wxImage image;
 212
 213     wxCHECK_MSG( Ok(), image, wxT("invalid image") );
 214
 215     // can't scale to/from 0 size
 216     wxCHECK_MSG( (width > 0) && (height > 0), image,
 217                  wxT("invalid new image size") );
 218
 219     long old_height = M_IMGDATA->m_height,
 220          old_width  = M_IMGDATA->m_width;
 221     wxCHECK_MSG( (old_height > 0) && (old_width > 0), image,
 222                  wxT("invalid old image size") );
 223
 224     image.Create( width, height );
 225
 226     char unsigned *data = image.GetData();
 227
 228     wxCHECK_MSG( data, image, wxT("unable to create image") );
 229
 230     if (M_IMGDATA->m_hasMask)
 231     {
 232         image.SetMaskColour( M_IMGDATA->m_maskRed,
 233                              M_IMGDATA->m_maskGreen,
 234                              M_IMGDATA->m_maskBlue );
 235     }
 236
 237     char unsigned *source_data = M_IMGDATA->m_data;
 238     char unsigned *target_data = data;
 239
 240 #if 0
 241     // This is nonsense, RR.
 242
 243     // We do (x, y) -> (x, y)*oldSize/newSize but the valid values of x and y
 244     // are from 0 to size-1, hence all decrement the sizes
 245     long old_old_width = old_width;
 246     old_height--;
 247     old_width--;
 248     height--;
 249     width--;
 250     for ( long j = 0; j <= height; j++ )
 251     {
 252         // don't crash for images with height == 1
 253         long y_offset = height ? (j * old_height / height)* old_old_width : 0;
 254
 255         for ( long i = 0; i <= width; i++ )
 256         {
 257             long x_offset = width ? (i * old_width) / width : 0;
 258
 259             memcpy( target_data, source_data + 3*(y_offset + x_offset), 3 );
 260             target_data += 3;
 261         }
 262     }
 263 #else
 264     for (long j = 0; j < height; j++)
 265     {
 266         long y_offset = (j * old_height / height) * old_width;
 267
 268         for (long i = 0; i < width; i++)
 269         {
 270             memcpy( target_data,
 271                 source_data + 3*(y_offset + ((i * old_width )/ width)),
 272                 3 );
 273             target_data += 3;
 274         }
 275     }
 276 #endif
 277
 278     // In case this is a cursor, make sure the hotspot is scalled accordingly:
 279     if ( HasOption(wxIMAGE_OPTION_CUR_HOTSPOT_X) )
 280         image.SetOption(wxIMAGE_OPTION_CUR_HOTSPOT_X,
 281                 (GetOptionInt(wxIMAGE_OPTION_CUR_HOTSPOT_X)*width)/old_width);
 282     if ( HasOption(wxIMAGE_OPTION_CUR_HOTSPOT_Y) )
 283         image.SetOption(wxIMAGE_OPTION_CUR_HOTSPOT_Y,
 284                 (GetOptionInt(wxIMAGE_OPTION_CUR_HOTSPOT_Y)*height)/old_height);
 285
 286     return image;
 287 }
 288
 289 wxImage wxImage::Rotate90( bool clockwise ) const
 290 {
 291     wxImage image;
 292
 293     wxCHECK_MSG( Ok(), image, wxT("invalid image") );
 294
 295     image.Create( M_IMGDATA->m_height, M_IMGDATA->m_width );
 296
 297     char unsigned *data = image.GetData();
 298
 299     wxCHECK_MSG( data, image, wxT("unable to create image") );
 300
 301     if (M_IMGDATA->m_hasMask)
 302         image.SetMaskColour( M_IMGDATA->m_maskRed, M_IMGDATA->m_maskGreen, M_IMGDATA->m_maskBlue );
 303
 304     long height = M_IMGDATA->m_height;
 305     long width  = M_IMGDATA->m_width;
 306
 307     char unsigned *source_data = M_IMGDATA->m_data;
 308     char unsigned *target_data;
 309
 310     for (long j = 0; j < height; j++)
 311     {
 312         for (long i = 0; i < width; i++)
 313         {
 314             if (clockwise)
 315                 target_data = data + (((i+1)*height) - j - 1)*3;
 316             else
 317                 target_data = data + ((height*(width-1)) + j - (i*height))*3;
 318             memcpy( target_data, source_data, 3 );
 319             source_data += 3;
 320         }
 321     }
 322
 323     return image;
 324 }
 325
 326 wxImage wxImage::Mirror( bool horizontally ) const
 327 {
 328     wxImage image;
 329
 330     wxCHECK_MSG( Ok(), image, wxT("invalid image") );
 331
 332     image.Create( M_IMGDATA->m_width, M_IMGDATA->m_height );
 333
 334     char unsigned *data = image.GetData();
 335
 336     wxCHECK_MSG( data, image, wxT("unable to create image") );
 337
 338     if (M_IMGDATA->m_hasMask)
 339         image.SetMaskColour( M_IMGDATA->m_maskRed, M_IMGDATA->m_maskGreen, M_IMGDATA->m_maskBlue );
 340
 341     long height = M_IMGDATA->m_height;
 342     long width  = M_IMGDATA->m_width;
 343
 344     char unsigned *source_data = M_IMGDATA->m_data;
 345     char unsigned *target_data;
 346
 347     if (horizontally)
 348     {
 349         for (long j = 0; j < height; j++)
 350         {
 351             data += width*3;
 352             target_data = data-3;
 353             for (long i = 0; i < width; i++)
 354             {
 355                 memcpy( target_data, source_data, 3 );
 356                 source_data += 3;
 357                 target_data -= 3;
 358             }
 359         }
 360     }
 361     else
 362     {
 363         for (long i = 0; i < height; i++)
 364         {
 365             target_data = data + 3*width*(height-1-i);
 366             memcpy( target_data, source_data, (size_t)3*width );
 367             source_data += 3*width;
 368         }
 369     }
 370
 371     return image;
 372 }
 373
 374 wxImage wxImage::GetSubImage( const wxRect &rect ) const
 375 {
 376     wxImage image;
 377
 378     wxCHECK_MSG( Ok(), image, wxT("invalid image") );
 379
 380     wxCHECK_MSG( (rect.GetLeft()>=0) && (rect.GetTop()>=0) && (rect.GetRight()<=GetWidth()) && (rect.GetBottom()<=GetHeight()),
 381                  image, wxT("invalid subimage size") );
 382
 383     int subwidth=rect.GetWidth();
 384     const int subheight=rect.GetHeight();
 385
 386     image.Create( subwidth, subheight );
 387
 388     char unsigned *subdata = image.GetData(), *data=GetData();
 389
 390     wxCHECK_MSG( subdata, image, wxT("unable to create image") );
 391
 392     if (M_IMGDATA->m_hasMask)
 393         image.SetMaskColour( M_IMGDATA->m_maskRed, M_IMGDATA->m_maskGreen, M_IMGDATA->m_maskBlue );
 394
 395     const int subleft=3*rect.GetLeft();
 396     const int width=3*GetWidth();
 397     subwidth*=3;
 398
 399     data+=rect.GetTop()*width+subleft;
 400
 401     for (long j = 0; j < subheight; ++j)
 402     {
 403         memcpy( subdata, data, subwidth);
 404         subdata+=subwidth;
 405         data+=width;
 406     }
 407
 408     return image;
 409 }
 410
 411 void wxImage::Paste( const wxImage &image, int x, int y )
 412 {
 413     wxCHECK_RET( Ok(), wxT("invalid image") );
 414     wxCHECK_RET( image.Ok(), wxT("invalid image") );
 415
 416     int xx = 0;
 417     int yy = 0;
 418     int width = image.GetWidth();
 419     int height = image.GetHeight();
 420
 421     if (x < 0)
 422     {
 423         xx = -x;
 424         width += x;
 425     }
 426     if (y < 0)
 427     {
 428         yy = -y;
 429         height += y;
 430     }
 431
 432     if ((x+xx)+width > M_IMGDATA->m_width)
 433         width = M_IMGDATA->m_width - (x+xx);
 434     if ((y+yy)+height > M_IMGDATA->m_height)
 435         height = M_IMGDATA->m_height - (y+yy);
 436
 437     if (width < 1) return;
 438     if (height < 1) return;
 439
 440     if ((!HasMask() && !image.HasMask()) ||
 441        ((HasMask() && image.HasMask() &&
 442          (GetMaskRed()==image.GetMaskRed()) &&
 443          (GetMaskGreen()==image.GetMaskGreen()) &&
 444          (GetMaskBlue()==image.GetMaskBlue()))))
 445     {
 446         width *= 3;
 447         unsigned char* source_data = image.GetData() + xx*3 + yy*3*image.GetWidth();
 448         int source_step = image.GetWidth()*3;
 449
 450         unsigned char* target_data = GetData() + (x+xx)*3 + (y+yy)*3*M_IMGDATA->m_width;
 451         int target_step = M_IMGDATA->m_width*3;
 452         for (int j = 0; j < height; j++)
 453         {
 454             memcpy( target_data, source_data, width );
 455             source_data += source_step;
 456             target_data += target_step;
 457         }
 458         return;
 459     }
 460
 461     if (!HasMask() && image.HasMask())
 462     {
 463         unsigned char r = image.GetMaskRed();
 464         unsigned char g = image.GetMaskGreen();
 465         unsigned char b = image.GetMaskBlue();
 466
 467         width *= 3;
 468         unsigned char* source_data = image.GetData() + xx*3 + yy*3*image.GetWidth();
 469         int source_step = image.GetWidth()*3;
 470
 471         unsigned char* target_data = GetData() + (x+xx)*3 + (y+yy)*3*M_IMGDATA->m_width;
 472         int target_step = M_IMGDATA->m_width*3;
 473
 474         for (int j = 0; j < height; j++)
 475         {
 476             for (int i = 0; i < width; i+=3)
 477             {
 478                 if ((source_data[i]   != r) &&
 479                     (source_data[i+1] != g) &&
 480                     (source_data[i+2] != b))
 481                 {
 482                     memcpy( target_data+i, source_data+i, 3 );
 483                 }
 484             }
 485             source_data += source_step;
 486             target_data += target_step;
 487         }
 488     }
 489 }
 490
 491 void wxImage::Replace( unsigned char r1, unsigned char g1, unsigned char b1,
 492                        unsigned char r2, unsigned char g2, unsigned char b2 )
 493 {
 494     wxCHECK_RET( Ok(), wxT("invalid image") );
 495
 496     char unsigned *data = GetData();
 497
 498     const int w = GetWidth();
 499     const int h = GetHeight();
 500
 501     for (int j = 0; j < h; j++)
 502         for (int i = 0; i < w; i++)
 503         {
 504             if ((data[0] == r1) && (data[1] == g1) && (data[2] == b1))
 505             {
 506                 data[0] = r2;
 507                 data[1] = g2;
 508                 data[2] = b2;
 509             }
 510             data += 3;
 511         }
 512 }
 513
 514 wxImage wxImage::ConvertToMono( unsigned char r, unsigned char g, unsigned char b ) const
 515 {
 516     wxImage image;
 517
 518     wxCHECK_MSG( Ok(), image, wxT("invalid image") );
 519
 520     image.Create( M_IMGDATA->m_width, M_IMGDATA->m_height );
 521
 522     char unsigned *data = image.GetData();
 523
 524     wxCHECK_MSG( data, image, wxT("unable to create image") );
 525
 526     if (M_IMGDATA->m_hasMask)
 527     {
 528         if (M_IMGDATA->m_maskRed == r && M_IMGDATA->m_maskGreen == g &&
 529                                          M_IMGDATA->m_maskBlue == b)
 530             image.SetMaskColour( 255, 255, 255 );
 531         else
 532             image.SetMaskColour( 0, 0, 0 );
 533     }
 534
 535     long size = M_IMGDATA->m_height * M_IMGDATA->m_width;
 536
 537     char unsigned *srcd = M_IMGDATA->m_data;
 538     char unsigned *tard = image.GetData();
 539
 540     for ( long i = 0; i < size; i++, srcd += 3, tard += 3 )
 541     {
 542         if (srcd[0] == r && srcd[1] == g && srcd[2] == b)
 543             tard[0] = tard[1] = tard[2] = 255;
 544         else
 545             tard[0] = tard[1] = tard[2] = 0;
 546     }
 547
 548     return image;
 549 }
 550
 551 void wxImage::SetRGB( int x, int y, unsigned char r, unsigned char g, unsigned char b )
 552 {
 553     wxCHECK_RET( Ok(), wxT("invalid image") );
 554
 555     int w = M_IMGDATA->m_width;
 556     int h = M_IMGDATA->m_height;
 557
 558     wxCHECK_RET( (x>=0) && (y>=0) && (x<w) && (y<h), wxT("invalid image index") );
 559
 560     long pos = (y * w + x) * 3;
 561
 562     M_IMGDATA->m_data[ pos   ] = r;
 563     M_IMGDATA->m_data[ pos+1 ] = g;
 564     M_IMGDATA->m_data[ pos+2 ] = b;
 565 }
 566
 567 unsigned char wxImage::GetRed( int x, int y ) const
 568 {
 569     wxCHECK_MSG( Ok(), 0, wxT("invalid image") );
 570
 571     int w = M_IMGDATA->m_width;
 572     int h = M_IMGDATA->m_height;
 573
 574     wxCHECK_MSG( (x>=0) && (y>=0) && (x<w) && (y<h), 0, wxT("invalid image index") );
 575
 576     long pos = (y * w + x) * 3;
 577
 578     return M_IMGDATA->m_data[pos];
 579 }
 580
 581 unsigned char wxImage::GetGreen( int x, int y ) const
 582 {
 583     wxCHECK_MSG( Ok(), 0, wxT("invalid image") );
 584
 585     int w = M_IMGDATA->m_width;
 586     int h = M_IMGDATA->m_height;
 587
 588     wxCHECK_MSG( (x>=0) && (y>=0) && (x<w) && (y<h), 0, wxT("invalid image index") );
 589
 590     long pos = (y * w + x) * 3;
 591
 592     return M_IMGDATA->m_data[pos+1];
 593 }
 594
 595 unsigned char wxImage::GetBlue( int x, int y ) const
 596 {
 597     wxCHECK_MSG( Ok(), 0, wxT("invalid image") );
 598
 599     int w = M_IMGDATA->m_width;
 600     int h = M_IMGDATA->m_height;
 601
 602     wxCHECK_MSG( (x>=0) && (y>=0) && (x<w) && (y<h), 0, wxT("invalid image index") );
 603
 604     long pos = (y * w + x) * 3;
 605
 606     return M_IMGDATA->m_data[pos+2];
 607 }
 608
 609 bool wxImage::Ok() const
 610 {
 611     // image of 0 width or height can't be considered ok - at least because it
 612     // causes crashes in ConvertToBitmap() if we don't catch it in time
 613     wxImageRefData *data = M_IMGDATA;
 614     return data && data->m_ok && data->m_width && data->m_height;
 615 }
 616
 617 char unsigned *wxImage::GetData() const
 618 {
 619     wxCHECK_MSG( Ok(), (char unsigned *)NULL, wxT("invalid image") );
 620
 621     return M_IMGDATA->m_data;
 622 }
 623
 624 void wxImage::SetData( char unsigned *data )
 625 {
 626     wxCHECK_RET( Ok(), wxT("invalid image") );
 627
 628     wxImageRefData *newRefData = new wxImageRefData();
 629
 630     newRefData->m_width = M_IMGDATA->m_width;
 631     newRefData->m_height = M_IMGDATA->m_height;
 632     newRefData->m_data = data;
 633     newRefData->m_ok = TRUE;
 634     newRefData->m_maskRed = M_IMGDATA->m_maskRed;
 635     newRefData->m_maskGreen = M_IMGDATA->m_maskGreen;
 636     newRefData->m_maskBlue = M_IMGDATA->m_maskBlue;
 637     newRefData->m_hasMask = M_IMGDATA->m_hasMask;
 638
 639     UnRef();
 640
 641     m_refData = newRefData;
 642 }
 643
 644 void wxImage::SetData( char unsigned *data, int new_width, int new_height )
 645 {
 646     wxImageRefData *newRefData = new wxImageRefData();
 647
 648     if (m_refData)
 649     {
 650         newRefData->m_width = new_width;
 651         newRefData->m_height = new_height;
 652         newRefData->m_data = data;
 653         newRefData->m_ok = TRUE;
 654         newRefData->m_maskRed = M_IMGDATA->m_maskRed;
 655         newRefData->m_maskGreen = M_IMGDATA->m_maskGreen;
 656         newRefData->m_maskBlue = M_IMGDATA->m_maskBlue;
 657         newRefData->m_hasMask = M_IMGDATA->m_hasMask;
 658     }
 659     else
 660     {
 661         newRefData->m_width = new_width;
 662         newRefData->m_height = new_height;
 663         newRefData->m_data = data;
 664         newRefData->m_ok = TRUE;
 665     }
 666
 667     UnRef();
 668
 669     m_refData = newRefData;
 670 }
 671
 672 void wxImage::SetMaskColour( unsigned char r, unsigned char g, unsigned char b )
 673 {
 674     wxCHECK_RET( Ok(), wxT("invalid image") );
 675
 676     M_IMGDATA->m_maskRed = r;
 677     M_IMGDATA->m_maskGreen = g;
 678     M_IMGDATA->m_maskBlue = b;
 679     M_IMGDATA->m_hasMask = TRUE;
 680 }
 681
 682 unsigned char wxImage::GetMaskRed() const
 683 {
 684     wxCHECK_MSG( Ok(), 0, wxT("invalid image") );
 685
 686     return M_IMGDATA->m_maskRed;
 687 }
 688
 689 unsigned char wxImage::GetMaskGreen() const
 690 {
 691     wxCHECK_MSG( Ok(), 0, wxT("invalid image") );
 692
 693     return M_IMGDATA->m_maskGreen;
 694 }
 695
 696 unsigned char wxImage::GetMaskBlue() const
 697 {
 698     wxCHECK_MSG( Ok(), 0, wxT("invalid image") );
 699
 700     return M_IMGDATA->m_maskBlue;
 701 }
 702
 703 void wxImage::SetMask( bool mask )
 704 {
 705     wxCHECK_RET( Ok(), wxT("invalid image") );
 706
 707     M_IMGDATA->m_hasMask = mask;
 708 }
 709
 710 bool wxImage::HasMask() const
 711 {
 712     wxCHECK_MSG( Ok(), FALSE, wxT("invalid image") );
 713
 714     return M_IMGDATA->m_hasMask;
 715 }
 716
 717 int wxImage::GetWidth() const
 718 {
 719     wxCHECK_MSG( Ok(), 0, wxT("invalid image") );
 720
 721     return M_IMGDATA->m_width;
 722 }
 723
 724 int wxImage::GetHeight() const
 725 {
 726     wxCHECK_MSG( Ok(), 0, wxT("invalid image") );
 727
 728     return M_IMGDATA->m_height;
 729 }
 730
 731
 732 bool wxImage::FindFirstUnusedColour(
 733             unsigned char *r, unsigned char *g, unsigned char *b,
 734             unsigned char startR, unsigned char startG, unsigned char startB) const
 735 {
 736     wxImageHistogram histogram;
 737     unsigned long key;
 738
 739     ComputeHistogram(histogram);
 740
 741     unsigned char r2 = startR;
 742     unsigned char g2 = startG;
 743     unsigned char b2 = startB;
 744
 745     key = (r2 << 16) | (g2 << 8) | b2;
 746
 747     while ( histogram.find(key) != histogram.end() )
 748     {
 749         // color already used
 750         r2++;
 751         if ( r2 >= 255 )
 752         {
 753             r2 = 0;
 754             g2++;
 755             if ( g2 >= 255 )
 756             {
 757                 g2 = 0;
 758                 b2++;
 759                 if ( b2 >= 255 )
 760                 {
 761                     wxLogError( _("GetUnusedColour:: No Unused Color in image ") );
 762                     return FALSE;
 763                 }
 764             }
 765         }
 766
 767         key = (r2 << 16) | (g2 << 8) | b2;
 768     }
 769
 770     if (r) *r = r2;
 771     if (g) *g = g2;
 772     if (b) *b = b2;
 773
 774     return TRUE;
 775 }
 776
 777
 778 bool wxImage::SetMaskFromImage(const wxImage& mask,
 779                                unsigned char mr, unsigned char mg, unsigned char mb)
 780 {
 781     // check that the images are the same size
 782     if ( (M_IMGDATA->m_height != mask.GetHeight() ) || (M_IMGDATA->m_width != mask.GetWidth () ) )
 783     {
 784         wxLogError( _("Image and Mask have different sizes") );
 785         return FALSE;
 786     }
 787
 788     // find unused colour
 789     unsigned char r,g,b ;
 790     if (!FindFirstUnusedColour(&r, &g, &b))
 791     {
 792         wxLogError( _("No Unused Color in image being masked") );
 793         return FALSE ;
 794     }
 795
 796     char unsigned *imgdata = GetData();
 797     char unsigned *maskdata = mask.GetData();
 798
 799     const int w = GetWidth();
 800     const int h = GetHeight();
 801
 802     for (int j = 0; j < h; j++)
 803     {
 804         for (int i = 0; i < w; i++)
 805         {
 806             if ((maskdata[0] == mr) && (maskdata[1]  == mg) && (maskdata[2] == mb))
 807             {
 808                 imgdata[0] = r;
 809                 imgdata[1] = g;
 810                 imgdata[2] = b;
 811             }
 812             imgdata  += 3;
 813             maskdata += 3;
 814         }
 815     }
 816
 817     SetMaskColour(r, g, b);
 818     SetMask(TRUE);
 819
 820     return TRUE;
 821 }
 822
 823 #if wxUSE_PALETTE
 824
 825 // Palette functions
 826
 827 bool wxImage::HasPalette() const
 828 {
 829     if (!Ok())
 830         return FALSE;
 831
 832     return M_IMGDATA->m_palette.Ok();
 833 }
 834
 835 const wxPalette& wxImage::GetPalette() const
 836 {
 837     wxCHECK_MSG( Ok(), wxNullPalette, wxT("invalid image") );
 838
 839     return M_IMGDATA->m_palette;
 840 }
 841
 842 void wxImage::SetPalette(const wxPalette& palette)
 843 {
 844     wxCHECK_RET( Ok(), wxT("invalid image") );
 845
 846     M_IMGDATA->m_palette = palette;
 847 }
 848
 849 #endif // wxUSE_PALETTE
 850
 851 // Option functions (arbitrary name/value mapping)
 852 void wxImage::SetOption(const wxString& name, const wxString& value)
 853 {
 854     wxCHECK_RET( Ok(), wxT("invalid image") );
 855
 856     int idx = M_IMGDATA->m_optionNames.Index(name, FALSE);
 857     if (idx == wxNOT_FOUND)
 858     {
 859         M_IMGDATA->m_optionNames.Add(name);
 860         M_IMGDATA->m_optionValues.Add(value);
 861     }
 862     else
 863     {
 864         M_IMGDATA->m_optionNames[idx] = name;
 865         M_IMGDATA->m_optionValues[idx] = value;
 866     }
 867 }
 868
 869 void wxImage::SetOption(const wxString& name, int value)
 870 {
 871     wxString valStr;
 872     valStr.Printf(wxT("%d"), value);
 873     SetOption(name, valStr);
 874 }
 875
 876 wxString wxImage::GetOption(const wxString& name) const
 877 {
 878     wxCHECK_MSG( Ok(), wxEmptyString, wxT("invalid image") );
 879
 880     int idx = M_IMGDATA->m_optionNames.Index(name, FALSE);
 881     if (idx == wxNOT_FOUND)
 882         return wxEmptyString;
 883     else
 884         return M_IMGDATA->m_optionValues[idx];
 885 }
 886
 887 int wxImage::GetOptionInt(const wxString& name) const
 888 {
 889     wxCHECK_MSG( Ok(), 0, wxT("invalid image") );
 890
 891     return wxAtoi(GetOption(name));
 892 }
 893
 894 bool wxImage::HasOption(const wxString& name) const
 895 {
 896     wxCHECK_MSG( Ok(), FALSE, wxT("invalid image") );
 897
 898     return (M_IMGDATA->m_optionNames.Index(name, FALSE) != wxNOT_FOUND);
 899 }
 900
 901 bool wxImage::LoadFile( const wxString& filename, long type, int index )
 902 {
 903 #if wxUSE_STREAMS
 904     if (wxFileExists(filename))
 905     {
 906         wxFileInputStream stream(filename);
 907         wxBufferedInputStream bstream( stream );
 908         return LoadFile(bstream, type, index);
 909     }
 910     else
 911     {
 912         wxLogError( _("Can't load image from file '%s': file does not exist."), filename.c_str() );
 913
 914         return FALSE;
 915     }
 916 #else // !wxUSE_STREAMS
 917     return FALSE;
 918 #endif // wxUSE_STREAMS
 919 }
 920
 921 bool wxImage::LoadFile( const wxString& filename, const wxString& mimetype, int index )
 922 {
 923 #if wxUSE_STREAMS
 924     if (wxFileExists(filename))
 925     {
 926         wxFileInputStream stream(filename);
 927         wxBufferedInputStream bstream( stream );
 928         return LoadFile(bstream, mimetype, index);
 929     }
 930     else
 931     {
 932         wxLogError( _("Can't load image from file '%s': file does not exist."), filename.c_str() );
 933
 934         return FALSE;
 935     }
 936 #else // !wxUSE_STREAMS
 937     return FALSE;
 938 #endif // wxUSE_STREAMS
 939 }
 940
 941
 942
 943 bool wxImage::SaveFile( const wxString& filename ) const
 944 {
 945     wxString ext = filename.AfterLast('.').Lower();
 946
 947     wxImageHandler * pHandler = FindHandler(ext, -1);
 948     if (pHandler)
 949     {
 950         SaveFile(filename, pHandler->GetType());
 951         return TRUE;
 952     }
 953
 954     wxLogError(_("Can't save image to file '%s': unknown extension."), filename.c_str());
 955
 956     return FALSE;
 957 }
 958
 959 bool wxImage::SaveFile( const wxString& filename, int type ) const
 960 {
 961 #if wxUSE_STREAMS
 962     ((wxImage*)this)->SetOption(wxIMAGE_OPTION_FILENAME, filename);
 963
 964     wxFileOutputStream stream(filename);
 965
 966     if ( stream.LastError() == wxStream_NOERROR )
 967     {
 968         wxBufferedOutputStream bstream( stream );
 969         return SaveFile(bstream, type);
 970     }
 971 #endif // wxUSE_STREAMS
 972
 973     return FALSE;
 974 }
 975
 976 bool wxImage::SaveFile( const wxString& filename, const wxString& mimetype ) const
 977 {
 978 #if wxUSE_STREAMS
 979     ((wxImage*)this)->SetOption(wxIMAGE_OPTION_FILENAME, filename);
 980
 981     wxFileOutputStream stream(filename);
 982
 983     if ( stream.LastError() == wxStream_NOERROR )
 984     {
 985         wxBufferedOutputStream bstream( stream );
 986         return SaveFile(bstream, mimetype);
 987     }
 988 #endif // wxUSE_STREAMS
 989
 990     return FALSE;
 991 }
 992
 993 bool wxImage::CanRead( const wxString &name )
 994 {
 995 #if wxUSE_STREAMS
 996   wxFileInputStream stream(name);
 997   return CanRead(stream);
 998 #else
 999   return FALSE;
1000 #endif
1001 }
1002
1003 int wxImage::GetImageCount( const wxString &name, long type )
1004 {
1005 #if wxUSE_STREAMS
1006   wxFileInputStream stream(name);
1007   return GetImageCount(stream, type);
1008 #else
1009   return 0;
1010 #endif
1011 }
1012
1013 #if wxUSE_STREAMS
1014
1015 bool wxImage::CanRead( wxInputStream &stream )
1016 {
1017     wxList &list=GetHandlers();
1018
1019     for ( wxList::Node *node = list.GetFirst(); node; node = node->GetNext() )
1020     {
1021         wxImageHandler *handler=(wxImageHandler*)node->GetData();
1022         if (handler->CanRead( stream ))
1023             return TRUE;
1024     }
1025
1026     return FALSE;
1027 }
1028
1029 int wxImage::GetImageCount( wxInputStream &stream, long type )
1030 {
1031     wxImageHandler *handler;
1032
1033     if ( type == wxBITMAP_TYPE_ANY )
1034     {
1035         wxList &list=GetHandlers();
1036
1037         for (wxList::Node *node = list.GetFirst(); node; node = node->GetNext())
1038         {
1039              handler=(wxImageHandler*)node->GetData();
1040              if ( handler->CanRead(stream) )
1041                  return handler->GetImageCount(stream);
1042
1043         }
1044
1045         wxLogWarning(_("No handler found for image type."));
1046         return 0;
1047     }
1048
1049     handler = FindHandler(type);
1050
1051     if ( !handler )
1052     {
1053         wxLogWarning(_("No image handler for type %d defined."), type);
1054         return FALSE;
1055     }
1056
1057     if ( handler->CanRead(stream) )
1058     {
1059         return handler->GetImageCount(stream);
1060     }
1061     else
1062     {
1063         wxLogError(_("Image file is not of type %d."), type);
1064         return 0;
1065     }
1066 }
1067
1068 bool wxImage::LoadFile( wxInputStream& stream, long type, int index )
1069 {
1070     UnRef();
1071
1072     m_refData = new wxImageRefData;
1073
1074     wxImageHandler *handler;
1075
1076     if ( type == wxBITMAP_TYPE_ANY )
1077     {
1078         wxList &list=GetHandlers();
1079
1080         for ( wxList::Node *node = list.GetFirst(); node; node = node->GetNext() )
1081         {
1082              handler=(wxImageHandler*)node->GetData();
1083              if ( handler->CanRead(stream) )
1084                  return handler->LoadFile(this, stream, TRUE/*verbose*/, index);
1085
1086         }
1087
1088         wxLogWarning( _("No handler found for image type.") );
1089         return FALSE;
1090     }
1091
1092     handler = FindHandler(type);
1093
1094     if (handler == NULL)
1095     {
1096         wxLogWarning( _("No image handler for type %d defined."), type );
1097
1098         return FALSE;
1099     }
1100
1101     return handler->LoadFile(this, stream, TRUE/*verbose*/, index);
1102 }
1103
1104 bool wxImage::LoadFile( wxInputStream& stream, const wxString& mimetype, int index )
1105 {
1106     UnRef();
1107
1108     m_refData = new wxImageRefData;
1109
1110     wxImageHandler *handler = FindHandlerMime(mimetype);
1111
1112     if (handler == NULL)
1113     {
1114         wxLogWarning( _("No image handler for type %s defined."), mimetype.GetData() );
1115
1116         return FALSE;
1117     }
1118
1119     return handler->LoadFile( this, stream, TRUE/*verbose*/, index );
1120 }
1121
1122 bool wxImage::SaveFile( wxOutputStream& stream, int type ) const
1123 {
1124     wxCHECK_MSG( Ok(), FALSE, wxT("invalid image") );
1125
1126     wxImageHandler *handler = FindHandler(type);
1127
1128     if (handler == NULL)
1129     {
1130         wxLogWarning( _("No image handler for type %d defined."), type );
1131
1132         return FALSE;
1133     }
1134
1135     return handler->SaveFile( (wxImage*)this, stream );
1136 }
1137
1138 bool wxImage::SaveFile( wxOutputStream& stream, const wxString& mimetype ) const
1139 {
1140     wxCHECK_MSG( Ok(), FALSE, wxT("invalid image") );
1141
1142     wxImageHandler *handler = FindHandlerMime(mimetype);
1143
1144     if (handler == NULL)
1145     {
1146         wxLogWarning( _("No image handler for type %s defined."), mimetype.GetData() );
1147
1148         return FALSE;
1149     }
1150
1151     return handler->SaveFile( (wxImage*)this, stream );
1152 }
1153 #endif // wxUSE_STREAMS
1154
1155 void wxImage::AddHandler( wxImageHandler *handler )
1156 {
1157     // make sure that the memory will be freed at the program end
1158     sm_handlers.DeleteContents(TRUE);
1159
1160     sm_handlers.Append( handler );
1161 }
1162
1163 void wxImage::InsertHandler( wxImageHandler *handler )
1164 {
1165     // make sure that the memory will be freed at the program end
1166     sm_handlers.DeleteContents(TRUE);
1167
1168     sm_handlers.Insert( handler );
1169 }
1170
1171 bool wxImage::RemoveHandler( const wxString& name )
1172 {
1173     wxImageHandler *handler = FindHandler(name);
1174     if (handler)
1175     {
1176         sm_handlers.DeleteObject(handler);
1177         return TRUE;
1178     }
1179     else
1180         return FALSE;
1181 }
1182
1183 wxImageHandler *wxImage::FindHandler( const wxString& name )
1184 {
1185     wxNode *node = sm_handlers.First();
1186     while (node)
1187     {
1188         wxImageHandler *handler = (wxImageHandler*)node->Data();
1189         if (handler->GetName().Cmp(name) == 0) return handler;
1190
1191         node = node->Next();
1192     }
1193     return (wxImageHandler *)NULL;
1194 }
1195
1196 wxImageHandler *wxImage::FindHandler( const wxString& extension, long bitmapType )
1197 {
1198     wxNode *node = sm_handlers.First();
1199     while (node)
1200     {
1201         wxImageHandler *handler = (wxImageHandler*)node->Data();
1202         if ( (handler->GetExtension().Cmp(extension) == 0) &&
1203             (bitmapType == -1 || handler->GetType() == bitmapType) )
1204             return handler;
1205         node = node->Next();
1206     }
1207     return (wxImageHandler*)NULL;
1208 }
1209
1210 wxImageHandler *wxImage::FindHandler( long bitmapType )
1211 {
1212     wxNode *node = sm_handlers.First();
1213     while (node)
1214     {
1215         wxImageHandler *handler = (wxImageHandler *)node->Data();
1216         if (handler->GetType() == bitmapType) return handler;
1217         node = node->Next();
1218     }
1219     return NULL;
1220 }
1221
1222 wxImageHandler *wxImage::FindHandlerMime( const wxString& mimetype )
1223 {
1224     wxNode *node = sm_handlers.First();
1225     while (node)
1226     {
1227         wxImageHandler *handler = (wxImageHandler *)node->Data();
1228         if (handler->GetMimeType().IsSameAs(mimetype, FALSE)) return handler;
1229         node = node->Next();
1230     }
1231     return NULL;
1232 }
1233
1234 void wxImage::InitStandardHandlers()
1235 {
1236 #if wxUSE_STREAMS
1237     AddHandler(new wxBMPHandler);
1238 #endif // wxUSE_STREAMS
1239
1240 #if wxUSE_XPM && !defined(__WXGTK__) && !defined(__WXMOTIF__)
1241     AddHandler(new wxXPMHandler);
1242 #endif
1243 }
1244
1245 void wxImage::CleanUpHandlers()
1246 {
1247     wxNode *node = sm_handlers.First();
1248     while (node)
1249     {
1250         wxImageHandler *handler = (wxImageHandler *)node->Data();
1251         wxNode *next = node->Next();
1252         delete handler;
1253         delete node;
1254         node = next;
1255     }
1256 }
1257
1258 //-----------------------------------------------------------------------------
1259 // wxImageHandler
1260 //-----------------------------------------------------------------------------
1261
1262 IMPLEMENT_ABSTRACT_CLASS(wxImageHandler,wxObject)
1263
1264 #if wxUSE_STREAMS
1265 bool wxImageHandler::LoadFile( wxImage *WXUNUSED(image), wxInputStream& WXUNUSED(stream), bool WXUNUSED(verbose), int WXUNUSED(index) )
1266 {
1267     return FALSE;
1268 }
1269
1270 bool wxImageHandler::SaveFile( wxImage *WXUNUSED(image), wxOutputStream& WXUNUSED(stream), bool WXUNUSED(verbose) )
1271 {
1272     return FALSE;
1273 }
1274
1275 int wxImageHandler::GetImageCount( wxInputStream& WXUNUSED(stream) )
1276 {
1277     return 1;
1278 }
1279
1280 bool wxImageHandler::CanRead( const wxString& name )
1281 {
1282     if (wxFileExists(name))
1283     {
1284         wxFileInputStream stream(name);
1285         return CanRead(stream);
1286     }
1287
1288     else {
1289         wxLogError( _("Can't check image format of file '%s': file does not exist."), name.c_str() );
1290
1291         return FALSE;
1292     }
1293 //    return FALSE;
1294 }
1295
1296 #endif // wxUSE_STREAMS
1297
1298
1299
1300 //-----------------------------------------------------------------------------
1301 // wxBitmap convertion routines
1302 //-----------------------------------------------------------------------------
1303
1304 #if wxUSE_GUI
1305
1306 #ifdef __WXGTK__
1307 wxBitmap wxImage::ConvertToMonoBitmap( unsigned char red, unsigned char green, unsigned char blue ) const
1308 {
1309     wxImage mono = this->ConvertToMono( red, green, blue );
1310     wxBitmap bitmap( mono, 1 );
1311     return bitmap;
1312 }
1313 #endif
1314
1315 wxBitmap wxImage::ConvertToBitmap() const
1316 {
1317     wxBitmap bitmap( *this );
1318     return bitmap;
1319 }
1320
1321 wxImage::wxImage( const wxBitmap &bitmap )
1322 {
1323     *this = bitmap.ConvertToImage();
1324 }
1325
1326 #endif
1327
1328
1329
1330 // A module to allow wxImage initialization/cleanup
1331 // without calling these functions from app.cpp or from
1332 // the user's application.
1333
1334 class wxImageModule: public wxModule
1335 {
1336 DECLARE_DYNAMIC_CLASS(wxImageModule)
1337 public:
1338     wxImageModule() {}
1339     bool OnInit() { wxImage::InitStandardHandlers(); return TRUE; };
1340     void OnExit() { wxImage::CleanUpHandlers(); };
1341 };
1342
1343 IMPLEMENT_DYNAMIC_CLASS(wxImageModule, wxModule)
1344
1345
1346 //-----------------------------------------------------------------------------
1347
1348 // GRG, Dic/99
1349 // Counts and returns the number of different colours. Optionally stops
1350 // when it exceeds 'stopafter' different colours. This is useful, for
1351 // example, to see if the image can be saved as 8-bit (256 colour or
1352 // less, in this case it would be invoked as CountColours(256)). Default
1353 // value for stopafter is -1 (don't care).
1354 //
1355 unsigned long wxImage::CountColours( unsigned long stopafter ) const
1356 {
1357     wxHashTable h;
1358     wxObject dummy;
1359     unsigned char r, g, b;
1360     unsigned char *p;
1361     unsigned long size, nentries, key;
1362
1363     p = GetData();
1364     size = GetWidth() * GetHeight();
1365     nentries = 0;
1366
1367     for (unsigned long j = 0; (j < size) && (nentries <= stopafter) ; j++)
1368     {
1369         r = *(p++);
1370         g = *(p++);
1371         b = *(p++);
1372         key = (r << 16) | (g << 8) | b;
1373
1374         if (h.Get(key) == NULL)
1375         {
1376             h.Put(key, &dummy);
1377             nentries++;
1378         }
1379     }
1380
1381     return nentries;
1382 }
1383
1384
1385 unsigned long wxImage::ComputeHistogram( wxImageHistogram &h ) const
1386 {
1387     unsigned char r, g, b;
1388     unsigned char *p;
1389     unsigned long size, nentries, key;
1390
1391     h.clear();
1392
1393     p = GetData();
1394     size = GetWidth() * GetHeight();
1395     nentries = 0;
1396
1397     for (unsigned long j = 0; j < size; j++)
1398     {
1399         r = *(p++);
1400         g = *(p++);
1401         b = *(p++);
1402         key = (r << 16) | (g << 8) | b;
1403
1404         wxImageHistogramEntry& entry = h[key];
1405         if ( entry.value++ == 0 )
1406             entry.index = nentries++;
1407     }
1408
1409     return nentries;
1410 }
1411
1412 /*
1413  * Rotation code by Carlos Moreno
1414  */
1415
1416 // GRG: I've removed wxRotationPoint - we already have wxRealPoint which
1417 //      does exactly the same thing. And I also got rid of wxRotationPixel
1418 //      bacause of potential problems in architectures where alignment
1419 //      is an issue, so I had to rewrite parts of the code.
1420
1421 static const double gs_Epsilon = 1e-10;
1422
1423 static inline int wxCint (double x)
1424 {
1425     return (x > 0) ? (int) (x + 0.5) : (int) (x - 0.5);
1426 }
1427
1428
1429 // Auxiliary function to rotate a point (x,y) with respect to point p0
1430 // make it inline and use a straight return to facilitate optimization
1431 // also, the function receives the sine and cosine of the angle to avoid
1432 // repeating the time-consuming calls to these functions -- sin/cos can
1433 // be computed and stored in the calling function.
1434
1435 inline wxRealPoint rotated_point (const wxRealPoint & p, double cos_angle, double sin_angle, const wxRealPoint & p0)
1436 {
1437     return wxRealPoint (p0.x + (p.x - p0.x) * cos_angle - (p.y - p0.y) * sin_angle,
1438                         p0.y + (p.y - p0.y) * cos_angle + (p.x - p0.x) * sin_angle);
1439 }
1440
1441 inline wxRealPoint rotated_point (double x, double y, double cos_angle, double sin_angle, const wxRealPoint & p0)
1442 {
1443     return rotated_point (wxRealPoint(x,y), cos_angle, sin_angle, p0);
1444 }
1445
1446 wxImage wxImage::Rotate(double angle, const wxPoint & centre_of_rotation, bool interpolating, wxPoint * offset_after_rotation) const
1447 {
1448     int i;
1449     angle = -angle;     // screen coordinates are a mirror image of "real" coordinates
1450
1451     // Create pointer-based array to accelerate access to wxImage's data
1452     unsigned char ** data = new unsigned char * [GetHeight()];
1453
1454     data[0] = GetData();
1455
1456     for (i = 1; i < GetHeight(); i++)
1457         data[i] = data[i - 1] + (3 * GetWidth());
1458
1459     // precompute coefficients for rotation formula
1460     // (sine and cosine of the angle)
1461     const double cos_angle = cos(angle);
1462     const double sin_angle = sin(angle);
1463
1464     // Create new Image to store the result
1465     // First, find rectangle that covers the rotated image;  to do that,
1466     // rotate the four corners
1467
1468     const wxRealPoint p0(centre_of_rotation.x, centre_of_rotation.y);
1469
1470     wxRealPoint p1 = rotated_point (0, 0, cos_angle, sin_angle, p0);
1471     wxRealPoint p2 = rotated_point (0, GetHeight(), cos_angle, sin_angle, p0);
1472     wxRealPoint p3 = rotated_point (GetWidth(), 0, cos_angle, sin_angle, p0);
1473     wxRealPoint p4 = rotated_point (GetWidth(), GetHeight(), cos_angle, sin_angle, p0);
1474
1475     int x1 = (int) floor (wxMin (wxMin(p1.x, p2.x), wxMin(p3.x, p4.x)));
1476     int y1 = (int) floor (wxMin (wxMin(p1.y, p2.y), wxMin(p3.y, p4.y)));
1477     int x2 = (int) ceil (wxMax (wxMax(p1.x, p2.x), wxMax(p3.x, p4.x)));
1478     int y2 = (int) ceil (wxMax (wxMax(p1.y, p2.y), wxMax(p3.y, p4.y)));
1479
1480     wxImage rotated (x2 - x1 + 1, y2 - y1 + 1);
1481
1482     if (offset_after_rotation != NULL)
1483     {
1484         *offset_after_rotation = wxPoint (x1, y1);
1485     }
1486
1487     // GRG: The rotated (destination) image is always accessed
1488     //      sequentially, so there is no need for a pointer-based
1489     //      array here (and in fact it would be slower).
1490     //
1491     unsigned char * dst = rotated.GetData();
1492
1493     // GRG: if the original image has a mask, use its RGB values
1494     //      as the blank pixel, else, fall back to default (black).
1495     //
1496     unsigned char blank_r = 0;
1497     unsigned char blank_g = 0;
1498     unsigned char blank_b = 0;
1499
1500     if (HasMask())
1501     {
1502         blank_r = GetMaskRed();
1503         blank_g = GetMaskGreen();
1504         blank_b = GetMaskBlue();
1505         rotated.SetMaskColour( blank_r, blank_g, blank_b );
1506     }
1507
1508     // Now, for each point of the rotated image, find where it came from, by
1509     // performing an inverse rotation (a rotation of -angle) and getting the
1510     // pixel at those coordinates
1511
1512     // GRG: I've taken the (interpolating) test out of the loops, so that
1513     //      it is done only once, instead of repeating it for each pixel.
1514
1515     int x;
1516     if (interpolating)
1517     {
1518         for (int y = 0; y < rotated.GetHeight(); y++)
1519         {
1520             for (x = 0; x < rotated.GetWidth(); x++)
1521             {
1522                 wxRealPoint src = rotated_point (x + x1, y + y1, cos_angle, -sin_angle, p0);
1523
1524                 if (-0.25 < src.x && src.x < GetWidth() - 0.75 &&
1525                     -0.25 < src.y && src.y < GetHeight() - 0.75)
1526                 {
1527                     // interpolate using the 4 enclosing grid-points.  Those
1528                     // points can be obtained using floor and ceiling of the
1529                     // exact coordinates of the point
1530                         // C.M. 2000-02-17:  when the point is near the border, special care is required.
1531
1532                     int x1, y1, x2, y2;
1533
1534                     if (0 < src.x && src.x < GetWidth() - 1)
1535                     {
1536                         x1 = wxCint(floor(src.x));
1537                         x2 = wxCint(ceil(src.x));
1538                     }
1539                     else    // else means that x is near one of the borders (0 or width-1)
1540                     {
1541                         x1 = x2 = wxCint (src.x);
1542                     }
1543
1544                     if (0 < src.y && src.y < GetHeight() - 1)
1545                     {
1546                         y1 = wxCint(floor(src.y));
1547                         y2 = wxCint(ceil(src.y));
1548                     }
1549                     else
1550                     {
1551                         y1 = y2 = wxCint (src.y);
1552                     }
1553
1554                     // get four points and the distances (square of the distance,
1555                     // for efficiency reasons) for the interpolation formula
1556
1557                     // GRG: Do not calculate the points until they are
1558                     //      really needed -- this way we can calculate
1559                     //      just one, instead of four, if d1, d2, d3
1560                     //      or d4 are < gs_Epsilon
1561
1562                     const double d1 = (src.x - x1) * (src.x - x1) + (src.y - y1) * (src.y - y1);
1563                     const double d2 = (src.x - x2) * (src.x - x2) + (src.y - y1) * (src.y - y1);
1564                     const double d3 = (src.x - x2) * (src.x - x2) + (src.y - y2) * (src.y - y2);
1565                     const double d4 = (src.x - x1) * (src.x - x1) + (src.y - y2) * (src.y - y2);
1566
1567                     // Now interpolate as a weighted average of the four surrounding
1568                     // points, where the weights are the distances to each of those points
1569
1570                     // If the point is exactly at one point of the grid of the source
1571                     // image, then don't interpolate -- just assign the pixel
1572
1573                     if (d1 < gs_Epsilon)        // d1,d2,d3,d4 are positive -- no need for abs()
1574                     {
1575                         unsigned char *p = data[y1] + (3 * x1);
1576                         *(dst++) = *(p++);
1577                         *(dst++) = *(p++);
1578                         *(dst++) = *(p++);
1579                     }
1580                     else if (d2 < gs_Epsilon)
1581                     {
1582                         unsigned char *p = data[y1] + (3 * x2);
1583                         *(dst++) = *(p++);
1584                         *(dst++) = *(p++);
1585                         *(dst++) = *(p++);
1586                     }
1587                     else if (d3 < gs_Epsilon)
1588                     {
1589                         unsigned char *p = data[y2] + (3 * x2);
1590                         *(dst++) = *(p++);
1591                         *(dst++) = *(p++);
1592                         *(dst++) = *(p++);
1593                     }
1594                     else if (d4 < gs_Epsilon)
1595                     {
1596                         unsigned char *p = data[y2] + (3 * x1);
1597                         *(dst++) = *(p++);
1598                         *(dst++) = *(p++);
1599                         *(dst++) = *(p++);
1600                     }
1601                     else
1602                     {
1603                         // weights for the weighted average are proportional to the inverse of the distance
1604                         unsigned char *v1 = data[y1] + (3 * x1);
1605                         unsigned char *v2 = data[y1] + (3 * x2);
1606                         unsigned char *v3 = data[y2] + (3 * x2);
1607                         unsigned char *v4 = data[y2] + (3 * x1);
1608
1609                         const double w1 = 1/d1, w2 = 1/d2, w3 = 1/d3, w4 = 1/d4;
1610
1611                         // GRG: Unrolled.
1612
1613                         *(dst++) = (unsigned char)
1614                             ( (w1 * *(v1++) + w2 * *(v2++) +
1615                                w3 * *(v3++) + w4 * *(v4++)) /
1616                               (w1 + w2 + w3 + w4) );
1617                         *(dst++) = (unsigned char)
1618                             ( (w1 * *(v1++) + w2 * *(v2++) +
1619                                w3 * *(v3++) + w4 * *(v4++)) /
1620                               (w1 + w2 + w3 + w4) );
1621                         *(dst++) = (unsigned char)
1622                             ( (w1 * *(v1++) + w2 * *(v2++) +
1623                                w3 * *(v3++) + w4 * *(v4++)) /
1624                               (w1 + w2 + w3 + w4) );
1625                     }
1626                 }
1627                 else
1628                 {
1629                     *(dst++) = blank_r;
1630                     *(dst++) = blank_g;
1631                     *(dst++) = blank_b;
1632                 }
1633             }
1634         }
1635     }
1636     else    // not interpolating
1637     {
1638         for (int y = 0; y < rotated.GetHeight(); y++)
1639         {
1640             for (x = 0; x < rotated.GetWidth(); x++)
1641             {
1642                 wxRealPoint src = rotated_point (x + x1, y + y1, cos_angle, -sin_angle, p0);
1643
1644                 const int xs = wxCint (src.x);      // wxCint rounds to the
1645                 const int ys = wxCint (src.y);      // closest integer
1646
1647                 if (0 <= xs && xs < GetWidth() &&
1648                     0 <= ys && ys < GetHeight())
1649                 {
1650                     unsigned char *p = data[ys] + (3 * xs);
1651                     *(dst++) = *(p++);
1652                     *(dst++) = *(p++);
1653                     *(dst++) = *(p++);
1654                 }
1655                 else
1656                 {
1657                     *(dst++) = blank_r;
1658                     *(dst++) = blank_g;
1659                     *(dst++) = blank_b;
1660                 }
1661             }
1662         }
1663     }
1664
1665     delete [] data;
1666
1667     return rotated;
1668 }
1669
1670 #endif // wxUSE_IMAGE