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