]> git.saurik.com Git - wxWidgets.git/blame - src/common/imagbmp.cpp
adapt defines for ctrl/command key
[wxWidgets.git] / src / common / imagbmp.cpp
CommitLineData
e65ed37a 1/////////////////////////////////////////////////////////////////////////////
8898456d 2// Name: src/common/imagbmp.cpp
05813ada
VS
3// Purpose: wxImage BMP,ICO and CUR handlers
4// Author: Robert Roebling, Chris Elliott
e65ed37a 5// RCS-ID: $Id$
05813ada 6// Copyright: (c) Robert Roebling, Chris Elliott
65571936 7// Licence: wxWindows licence
e65ed37a
RR
8/////////////////////////////////////////////////////////////////////////////
9
e65ed37a
RR
10// For compilers that support precompilation, includes "wx.h".
11#include "wx/wxprec.h"
12
13#ifdef __BORLANDC__
8898456d 14 #pragma hdrstop
e65ed37a
RR
15#endif
16
e30285ab 17#if wxUSE_IMAGE
c96ea657 18
5ff14574
PC
19#include "wx/imagbmp.h"
20
8898456d 21#ifndef WX_PRECOMP
57bd4c60
WS
22 #ifdef __WXMSW__
23 #include "wx/msw/wrapwin.h"
24 #endif
8898456d
WS
25 #include "wx/log.h"
26 #include "wx/app.h"
0bca0373 27 #include "wx/bitmap.h"
5ff14574
PC
28 #include "wx/palette.h"
29 #include "wx/intl.h"
37ba70a5 30 #include "wx/math.h"
8898456d
WS
31#endif
32
e65ed37a
RR
33#include "wx/filefn.h"
34#include "wx/wfstream.h"
1971d23c 35#include "wx/quantize.h"
ef5571c6 36#include "wx/scopeguard.h"
72045d57 37#include "wx/anidecod.h"
e65ed37a
RR
38
39// For memcpy
40#include <string.h>
41
b4c47016
DS
42// ----------------------------------------------------------------------------
43// private functions
44// ----------------------------------------------------------------------------
45
46#if wxUSE_ICO_CUR
47
48static bool CanReadICOOrCUR(wxInputStream *stream, wxUint16 resourceType);
49
50#endif // wxUSE_ICO_CUR
51
e65ed37a 52//-----------------------------------------------------------------------------
05813ada 53// wxBMPHandler
e65ed37a
RR
54//-----------------------------------------------------------------------------
55
e65ed37a 56IMPLEMENT_DYNAMIC_CLASS(wxBMPHandler,wxImageHandler)
e65ed37a 57
e30285ab
VZ
58#if wxUSE_STREAMS
59
37b83ca6 60#ifndef BI_RGB
35b463c0
VZ
61 #define BI_RGB 0
62#endif
63
64#ifndef BI_RLE8
37b83ca6 65#define BI_RLE8 1
35b463c0
VZ
66#endif
67
68#ifndef BI_RLE4
37b83ca6
VS
69#define BI_RLE4 2
70#endif
71
72#ifndef BI_BITFIELDS
73#define BI_BITFIELDS 3
74#endif
75
76#define poffset (line * width * 3 + column * 3)
77
f6bcfd97
BP
78bool wxBMPHandler::SaveFile(wxImage *image,
79 wxOutputStream& stream,
80 bool verbose)
574c939e 81{
7beb59f3 82 return SaveDib(image, stream, verbose, true/*IsBmp*/, false/*IsMask*/);
37b83ca6
VS
83}
84
85bool wxBMPHandler::SaveDib(wxImage *image,
05813ada
VS
86 wxOutputStream& stream,
87 bool verbose,
88 bool IsBmp,
89 bool IsMask)
37b83ca6 90
f6bcfd97 91{
9a83f860 92 wxCHECK_MSG( image, false, wxT("invalid pointer in wxBMPHandler::SaveFile") );
f6bcfd97 93
a1b806b9 94 if ( !image->IsOk() )
f6bcfd97 95 {
574c939e 96 if ( verbose )
af588446 97 {
05813ada 98 wxLogError(_("BMP: Couldn't save invalid image."));
af588446 99 }
7beb59f3 100 return false;
f6bcfd97
BP
101 }
102
1971d23c
VZ
103 // get the format of the BMP file to save, else use 24bpp
104 unsigned format = wxBMP_24BPP;
fd94e8aa
VS
105 if ( image->HasOption(wxIMAGE_OPTION_BMP_FORMAT) )
106 format = image->GetOptionInt(wxIMAGE_OPTION_BMP_FORMAT);
1971d23c 107
574c939e 108 wxUint16 bpp; // # of bits per pixel
1971d23c
VZ
109 int palette_size; // # of color map entries, ie. 2^bpp colors
110
111 // set the bpp and appropriate palette_size, and do additional checks
05813ada 112 if ( (format == wxBMP_1BPP) || (format == wxBMP_1BPP_BW) )
1971d23c
VZ
113 {
114 bpp = 1;
115 palette_size = 2;
116 }
05813ada 117 else if ( format == wxBMP_4BPP )
1971d23c
VZ
118 {
119 bpp = 4;
120 palette_size = 16;
121 }
05813ada
VS
122 else if ( (format == wxBMP_8BPP) || (format == wxBMP_8BPP_GREY) ||
123 (format == wxBMP_8BPP_RED) || (format == wxBMP_8BPP_PALETTE) )
1971d23c
VZ
124 {
125 // need to set a wxPalette to use this, HOW TO CHECK IF VALID, SIZE?
b11e8fb6
VZ
126 if ((format == wxBMP_8BPP_PALETTE)
127#if wxUSE_PALETTE
128 && !image->HasPalette()
129#endif // wxUSE_PALETTE
130 )
1971d23c 131 {
05813ada 132 if ( verbose )
af588446 133 {
dc9b623b 134 wxLogError(_("BMP: wxImage doesn't have own wxPalette."));
af588446 135 }
7beb59f3 136 return false;
1971d23c
VZ
137 }
138 bpp = 8;
139 palette_size = 256;
140 }
141 else // you get 24bpp
142 {
143 format = wxBMP_24BPP;
144 bpp = 24;
145 palette_size = 0;
146 }
147
f6bcfd97 148 unsigned width = image->GetWidth();
2a6545a5
DS
149 unsigned row_padding = (4 - ((width * bpp + 7) / 8) % 4) % 4; // # bytes to pad to dword
150 unsigned row_width = (width * bpp + 7) / 8 + row_padding; // # of bytes per row
1971d23c 151
f6bcfd97
BP
152 struct
153 {
154 // BitmapHeader:
155 wxUint16 magic; // format magic, always 'BM'
156 wxUint32 filesize; // total file size, inc. headers
157 wxUint32 reserved; // for future use
158 wxUint32 data_offset; // image data offset in the file
33ac7e6f 159
f6bcfd97
BP
160 // BitmapInfoHeader:
161 wxUint32 bih_size; // 2nd part's size
162 wxUint32 width, height; // bitmap's dimensions
163 wxUint16 planes; // num of planes
164 wxUint16 bpp; // bits per pixel
165 wxUint32 compression; // compression method
166 wxUint32 size_of_bmp; // size of the bitmap
37ba70a5 167 wxUint32 h_res, v_res; // image resolution in pixels-per-meter
f6bcfd97
BP
168 wxUint32 num_clrs; // number of colors used
169 wxUint32 num_signif_clrs;// number of significant colors
170 } hdr;
1971d23c 171
f6bcfd97
BP
172 wxUint32 hdr_size = 14/*BitmapHeader*/ + 40/*BitmapInfoHeader*/;
173
174 hdr.magic = wxUINT16_SWAP_ON_BE(0x4D42/*'BM'*/);
1971d23c
VZ
175 hdr.filesize = wxUINT32_SWAP_ON_BE( hdr_size + palette_size*4 +
176 row_width * image->GetHeight() );
f6bcfd97 177 hdr.reserved = 0;
1971d23c 178 hdr.data_offset = wxUINT32_SWAP_ON_BE(hdr_size + palette_size*4);
33ac7e6f 179
f6bcfd97
BP
180 hdr.bih_size = wxUINT32_SWAP_ON_BE(hdr_size - 14);
181 hdr.width = wxUINT32_SWAP_ON_BE(image->GetWidth());
05813ada 182 if ( IsBmp )
37b83ca6 183 {
05813ada 184 hdr.height = wxUINT32_SWAP_ON_BE(image->GetHeight());
37b83ca6
VS
185 }
186 else
187 {
188 hdr.height = wxUINT32_SWAP_ON_BE(2 * image->GetHeight());
05813ada 189 }
f6bcfd97 190 hdr.planes = wxUINT16_SWAP_ON_BE(1); // always 1 plane
1971d23c 191 hdr.bpp = wxUINT16_SWAP_ON_BE(bpp);
f6bcfd97 192 hdr.compression = 0; // RGB uncompressed
33ac7e6f 193 hdr.size_of_bmp = wxUINT32_SWAP_ON_BE(row_width * image->GetHeight());
37ba70a5
VZ
194
195 // get the resolution from the image options or fall back to 72dpi standard
196 // for the BMP format if not specified
fe7f0a59
VZ
197 int hres, vres;
198 switch ( GetResolutionFromOptions(*image, &hres, &vres) )
37ba70a5
VZ
199 {
200 default:
9a83f860 201 wxFAIL_MSG( wxT("unexpected image resolution units") );
37ba70a5
VZ
202 // fall through
203
204 case wxIMAGE_RESOLUTION_NONE:
205 hres =
206 vres = 72;
207 // fall through to convert it to correct units
208
209 case wxIMAGE_RESOLUTION_INCHES:
210 // convert resolution in inches to resolution in centimeters
fe7f0a59
VZ
211 hres = (int)(10*mm2inches*hres);
212 vres = (int)(10*mm2inches*vres);
37ba70a5
VZ
213 // fall through to convert it to resolution in meters
214
215 case wxIMAGE_RESOLUTION_CM:
216 // convert resolution in centimeters to resolution in meters
217 hres *= 100;
218 vres *= 100;
219 break;
220 }
221
222 hdr.h_res = wxUINT32_SWAP_ON_BE(hres);
223 hdr.v_res = wxUINT32_SWAP_ON_BE(vres);
1971d23c
VZ
224 hdr.num_clrs = wxUINT32_SWAP_ON_BE(palette_size); // # colors in colormap
225 hdr.num_signif_clrs = 0; // all colors are significant
574c939e 226
05813ada 227 if ( IsBmp )
37b83ca6 228 {
05813ada
VS
229 if (// VS: looks ugly but compilers tend to do ugly things with structs,
230 // like aligning hdr.filesize's ofset to dword :(
231 // VZ: we should add padding then...
232 !stream.Write(&hdr.magic, 2) ||
233 !stream.Write(&hdr.filesize, 4) ||
234 !stream.Write(&hdr.reserved, 4) ||
574c939e 235 !stream.Write(&hdr.data_offset, 4)
05813ada
VS
236 )
237 {
238 if (verbose)
af588446 239 {
05813ada 240 wxLogError(_("BMP: Couldn't write the file (Bitmap) header."));
af588446 241 }
7beb59f3 242 return false;
05813ada
VS
243 }
244 }
245 if ( !IsMask )
f6bcfd97 246 {
05813ada
VS
247 if (
248 !stream.Write(&hdr.bih_size, 4) ||
249 !stream.Write(&hdr.width, 4) ||
250 !stream.Write(&hdr.height, 4) ||
251 !stream.Write(&hdr.planes, 2) ||
252 !stream.Write(&hdr.bpp, 2) ||
253 !stream.Write(&hdr.compression, 4) ||
254 !stream.Write(&hdr.size_of_bmp, 4) ||
255 !stream.Write(&hdr.h_res, 4) ||
256 !stream.Write(&hdr.v_res, 4) ||
257 !stream.Write(&hdr.num_clrs, 4) ||
258 !stream.Write(&hdr.num_signif_clrs, 4)
259 )
260 {
261 if (verbose)
af588446 262 {
05813ada 263 wxLogError(_("BMP: Couldn't write the file (BitmapInfo) header."));
af588446 264 }
7beb59f3 265 return false;
05813ada 266 }
f6bcfd97
BP
267 }
268
1971d23c
VZ
269 wxPalette *palette = NULL; // entries for quantized images
270 wxUint8 *rgbquad = NULL; // for the RGBQUAD bytes for the colormap
271 wxImage *q_image = NULL; // destination for quantized image
272
273 // if <24bpp use quantization to reduce colors for *some* of the formats
274 if ( (format == wxBMP_1BPP) || (format == wxBMP_4BPP) ||
05813ada 275 (format == wxBMP_8BPP) || (format == wxBMP_8BPP_PALETTE) )
1971d23c
VZ
276 {
277 // make a new palette and quantize the image
278 if (format != wxBMP_8BPP_PALETTE)
279 {
280 q_image = new wxImage();
281
282 // I get a delete error using Quantize when desired colors > 236
283 int quantize = ((palette_size > 236) ? 236 : palette_size);
284 // fill the destination too, it gives much nicer 4bpp images
285 wxQuantize::Quantize( *image, *q_image, &palette, quantize, 0,
286 wxQUANTIZE_FILL_DESTINATION_IMAGE );
287 }
288 else
289 {
b11e8fb6 290#if wxUSE_PALETTE
1971d23c 291 palette = new wxPalette(image->GetPalette());
b11e8fb6 292#endif // wxUSE_PALETTE
1971d23c
VZ
293 }
294
295 int i;
296 unsigned char r, g, b;
297 rgbquad = new wxUint8 [palette_size*4];
298
05813ada 299 for (i = 0; i < palette_size; i++)
1971d23c 300 {
b11e8fb6 301#if wxUSE_PALETTE
05813ada 302 if ( !palette->GetRGB(i, &r, &g, &b) )
b11e8fb6
VZ
303#endif // wxUSE_PALETTE
304 r = g = b = 0;
1971d23c
VZ
305
306 rgbquad[i*4] = b;
307 rgbquad[i*4+1] = g;
308 rgbquad[i*4+2] = r;
309 rgbquad[i*4+3] = 0;
310 }
311 }
312 // make a 256 entry greyscale colormap or 2 entry black & white
05813ada
VS
313 else if ( (format == wxBMP_8BPP_GREY) || (format == wxBMP_8BPP_RED) ||
314 (format == wxBMP_1BPP_BW) )
1971d23c 315 {
1971d23c
VZ
316 rgbquad = new wxUint8 [palette_size*4];
317
0ce5a3a8 318 for ( int i = 0; i < palette_size; i++ )
1971d23c 319 {
0ce5a3a8 320 // if 1BPP_BW then the value should be either 0 or 255
11846af3 321 wxUint8 c = (wxUint8)((i > 0) && (format == wxBMP_1BPP_BW) ? 255 : i);
0ce5a3a8
VZ
322
323 rgbquad[i*4] =
324 rgbquad[i*4+1] =
325 rgbquad[i*4+2] = c;
1971d23c
VZ
326 rgbquad[i*4+3] = 0;
327 }
328 }
329
330 // if the colormap was made, then it needs to be written
331 if (rgbquad)
332 {
05813ada 333 if ( !IsMask )
1971d23c 334 {
05813ada
VS
335 if ( !stream.Write(rgbquad, palette_size*4) )
336 {
337 if (verbose)
af588446 338 {
05813ada 339 wxLogError(_("BMP: Couldn't write RGB color map."));
af588446 340 }
05813ada 341 delete[] rgbquad;
b11e8fb6 342#if wxUSE_PALETTE
05813ada 343 delete palette;
b11e8fb6 344#endif // wxUSE_PALETTE
05813ada 345 delete q_image;
7beb59f3 346 return false;
05813ada
VS
347 }
348 }
1971d23c
VZ
349 delete []rgbquad;
350 }
351
352 // pointer to the image data, use quantized if available
f6bcfd97 353 wxUint8 *data = (wxUint8*) image->GetData();
a1b806b9 354 if (q_image) if (q_image->IsOk()) data = (wxUint8*) q_image->GetData();
1971d23c 355
f6bcfd97 356 wxUint8 *buffer = new wxUint8[row_width];
f6bcfd97
BP
357 memset(buffer, 0, row_width);
358 int y; unsigned x;
1971d23c 359 long int pixel;
f6bcfd97 360
05813ada 361 for (y = image->GetHeight() -1; y >= 0; y--)
f6bcfd97 362 {
05813ada 363 if ( format == wxBMP_24BPP ) // 3 bytes per pixel red,green,blue
1971d23c 364 {
05813ada 365 for ( x = 0; x < width; x++ )
1971d23c
VZ
366 {
367 pixel = 3*(y*width + x);
368
369 buffer[3*x ] = data[pixel+2];
370 buffer[3*x + 1] = data[pixel+1];
371 buffer[3*x + 2] = data[pixel];
372 }
373 }
374 else if ((format == wxBMP_8BPP) || // 1 byte per pixel in color
375 (format == wxBMP_8BPP_PALETTE))
376 {
377 for (x = 0; x < width; x++)
378 {
379 pixel = 3*(y*width + x);
b11e8fb6 380#if wxUSE_PALETTE
9a431f4d
WS
381 buffer[x] = (wxUint8)palette->GetPixel( data[pixel],
382 data[pixel+1],
383 data[pixel+2] );
b11e8fb6
VZ
384#else
385 // FIXME: what should this be? use some std palette maybe?
386 buffer[x] = 0;
387#endif // wxUSE_PALETTE
1971d23c
VZ
388 }
389 }
05813ada 390 else if ( format == wxBMP_8BPP_GREY ) // 1 byte per pix, rgb ave to grey
1971d23c
VZ
391 {
392 for (x = 0; x < width; x++)
393 {
394 pixel = 3*(y*width + x);
395 buffer[x] = (wxUint8)(.299*data[pixel] +
396 .587*data[pixel+1] +
397 .114*data[pixel+2]);
398 }
399 }
05813ada 400 else if ( format == wxBMP_8BPP_RED ) // 1 byte per pixel, red as greys
f6bcfd97 401 {
1971d23c
VZ
402 for (x = 0; x < width; x++)
403 {
404 buffer[x] = (wxUint8)data[3*(y*width + x)];
405 }
406 }
05813ada 407 else if ( format == wxBMP_4BPP ) // 4 bpp in color
1971d23c
VZ
408 {
409 for (x = 0; x < width; x+=2)
410 {
411 pixel = 3*(y*width + x);
412
413 // fill buffer, ignore if > width
b11e8fb6 414#if wxUSE_PALETTE
9a431f4d 415 buffer[x/2] = (wxUint8)(
b11e8fb6
VZ
416 ((wxUint8)palette->GetPixel(data[pixel],
417 data[pixel+1],
418 data[pixel+2]) << 4) |
419 (((x+1) > width)
420 ? 0
421 : ((wxUint8)palette->GetPixel(data[pixel+3],
422 data[pixel+4],
9a431f4d 423 data[pixel+5]) )) );
b11e8fb6
VZ
424#else
425 // FIXME: what should this be? use some std palette maybe?
426 buffer[x/2] = 0;
427#endif // wxUSE_PALETTE
1971d23c
VZ
428 }
429 }
05813ada 430 else if ( format == wxBMP_1BPP ) // 1 bpp in "color"
1971d23c
VZ
431 {
432 for (x = 0; x < width; x+=8)
433 {
434 pixel = 3*(y*width + x);
435
b11e8fb6 436#if wxUSE_PALETTE
9a431f4d
WS
437 buffer[x/8] = (wxUint8)(
438 ((wxUint8)palette->GetPixel(data[pixel], data[pixel+1], data[pixel+2]) << 7) |
1971d23c
VZ
439 (((x+1) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+3], data[pixel+4], data[pixel+5]) << 6)) |
440 (((x+2) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+6], data[pixel+7], data[pixel+8]) << 5)) |
441 (((x+3) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+9], data[pixel+10], data[pixel+11]) << 4)) |
442 (((x+4) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+12], data[pixel+13], data[pixel+14]) << 3)) |
443 (((x+5) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+15], data[pixel+16], data[pixel+17]) << 2)) |
444 (((x+6) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+18], data[pixel+19], data[pixel+20]) << 1)) |
9a431f4d 445 (((x+7) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+21], data[pixel+22], data[pixel+23]) )) );
b11e8fb6
VZ
446#else
447 // FIXME: what should this be? use some std palette maybe?
448 buffer[x/8] = 0;
449#endif // wxUSE_PALETTE
1971d23c
VZ
450 }
451 }
05813ada 452 else if ( format == wxBMP_1BPP_BW ) // 1 bpp B&W colormap from red color ONLY
1971d23c
VZ
453 {
454 for (x = 0; x < width; x+=8)
455 {
456 pixel = 3*(y*width + x);
457
9a431f4d 458 buffer[x/8] = (wxUint8)(
05813ada
VS
459 (((wxUint8)(data[pixel] /128.)) << 7) |
460 (((x+1) > width) ? 0 : (((wxUint8)(data[pixel+3] /128.)) << 6)) |
461 (((x+2) > width) ? 0 : (((wxUint8)(data[pixel+6] /128.)) << 5)) |
462 (((x+3) > width) ? 0 : (((wxUint8)(data[pixel+9] /128.)) << 4)) |
463 (((x+4) > width) ? 0 : (((wxUint8)(data[pixel+12]/128.)) << 3)) |
464 (((x+5) > width) ? 0 : (((wxUint8)(data[pixel+15]/128.)) << 2)) |
465 (((x+6) > width) ? 0 : (((wxUint8)(data[pixel+18]/128.)) << 1)) |
9a431f4d 466 (((x+7) > width) ? 0 : (((wxUint8)(data[pixel+21]/128.)) )) );
1971d23c 467 }
f6bcfd97 468 }
33ac7e6f 469
05813ada 470 if ( !stream.Write(buffer, row_width) )
f6bcfd97
BP
471 {
472 if (verbose)
af588446 473 {
f6bcfd97 474 wxLogError(_("BMP: Couldn't write data."));
af588446 475 }
f6bcfd97 476 delete[] buffer;
b11e8fb6
VZ
477#if wxUSE_PALETTE
478 delete palette;
479#endif // wxUSE_PALETTE
480 delete q_image;
7beb59f3 481 return false;
f6bcfd97
BP
482 }
483 }
484 delete[] buffer;
b11e8fb6
VZ
485#if wxUSE_PALETTE
486 delete palette;
487#endif // wxUSE_PALETTE
488 delete q_image;
f6bcfd97 489
7beb59f3 490 return true;
f6bcfd97
BP
491}
492
493
ef5571c6 494struct BMPPalette
05813ada 495{
ef5571c6
VZ
496 static void Free(BMPPalette* pal) { delete [] pal; }
497
05813ada 498 unsigned char r, g, b;
ef5571c6 499};
f6bcfd97 500
574c939e 501bool wxBMPHandler::DoLoadDib(wxImage * image, int width, int height,
05813ada 502 int bpp, int ncolors, int comp,
1b941f2d 503 wxFileOffset bmpOffset, wxInputStream& stream,
05813ada
VS
504 bool verbose, bool IsBmp, bool hasPalette)
505{
55a35cb0
VZ
506 wxInt32 aDword, rmask = 0, gmask = 0, bmask = 0, amask = 0;
507 int rshift = 0, gshift = 0, bshift = 0, ashift = 0;
d8defde6 508 int rbits = 0, gbits = 0, bbits = 0;
52b64b0a
RR
509 wxInt32 dbuf[4];
510 wxInt8 bbuf[4];
511 wxUint8 aByte;
512 wxUint16 aWord;
31528cd3 513
05813ada 514 // allocate space for palette if needed:
ef5571c6 515 BMPPalette *cmap;
31528cd3 516
05813ada 517 if ( bpp < 16 )
e65ed37a 518 {
ef5571c6 519 cmap = new BMPPalette[ncolors];
05813ada 520 if ( !cmap )
e65ed37a 521 {
58c837a4 522 if (verbose)
af588446 523 {
05813ada 524 wxLogError(_("BMP: Couldn't allocate memory."));
af588446 525 }
7beb59f3 526 return false;
e65ed37a
RR
527 }
528 }
ef5571c6
VZ
529 else // no palette
530 {
e65ed37a 531 cmap = NULL;
ef5571c6
VZ
532 }
533
534 wxON_BLOCK_EXIT1(&BMPPalette::Free, cmap);
e65ed37a 535
05813ada 536 // destroy existing here instead of:
52b64b0a 537 image->Destroy();
05813ada 538 image->Create(width, height);
574c939e 539
e65ed37a 540 unsigned char *ptr = image->GetData();
05813ada
VS
541
542 if ( !ptr )
e65ed37a 543 {
05813ada 544 if ( verbose )
af588446 545 {
05813ada 546 wxLogError( _("BMP: Couldn't allocate memory.") );
af588446 547 }
7beb59f3 548 return false;
e65ed37a 549 }
05813ada 550
55a35cb0
VZ
551 unsigned char *alpha;
552 if ( bpp == 32 )
553 {
554 // tell the image to allocate an alpha buffer
555 image->SetAlpha();
556 alpha = image->GetAlpha();
557 if ( !alpha )
558 {
559 if ( verbose )
af588446 560 {
55a35cb0 561 wxLogError(_("BMP: Couldn't allocate memory."));
af588446 562 }
55a35cb0
VZ
563 return false;
564 }
565 }
566 else // no alpha
567 {
568 alpha = NULL;
569 }
570
05813ada
VS
571 // Reading the palette, if it exists:
572 if ( bpp < 16 && ncolors != 0 )
e65ed37a 573 {
3f4fc796
JS
574 unsigned char* r = new unsigned char[ncolors];
575 unsigned char* g = new unsigned char[ncolors];
576 unsigned char* b = new unsigned char[ncolors];
e65ed37a
RR
577 for (int j = 0; j < ncolors; j++)
578 {
52b64b0a
RR
579 if (hasPalette)
580 {
05813ada
VS
581 stream.Read(bbuf, 4);
582 cmap[j].b = bbuf[0];
583 cmap[j].g = bbuf[1];
584 cmap[j].r = bbuf[2];
585
586 r[j] = cmap[j].r;
587 g[j] = cmap[j].g;
588 b[j] = cmap[j].b;
589 }
52b64b0a
RR
590 else
591 {
592 //used in reading .ico file mask
9a431f4d
WS
593 r[j] = cmap[j].r =
594 g[j] = cmap[j].g =
595 b[j] = cmap[j].b = ( j ? 255 : 0 );
52b64b0a
RR
596 }
597 }
b11e8fb6
VZ
598
599#if wxUSE_PALETTE
3f4fc796
JS
600 // Set the palette for the wxImage
601 image->SetPalette(wxPalette(ncolors, r, g, b));
b11e8fb6 602#endif // wxUSE_PALETTE
3f4fc796
JS
603
604 delete[] r;
605 delete[] g;
606 delete[] b;
e65ed37a 607 }
05813ada 608 else if ( bpp == 16 || bpp == 32 )
e65ed37a 609 {
05813ada 610 if ( comp == BI_BITFIELDS )
e65ed37a 611 {
38e23f10 612 int bit;
05813ada 613 stream.Read(dbuf, 4 * 3);
9042a017 614 rmask = wxINT32_SWAP_ON_BE(dbuf[0]);
05813ada 615 gmask = wxINT32_SWAP_ON_BE(dbuf[1]);
9042a017
VZ
616 bmask = wxINT32_SWAP_ON_BE(dbuf[2]);
617 // find shift amount (Least significant bit of mask)
618 for (bit = bpp-1; bit>=0; bit--)
e65ed37a
RR
619 {
620 if (bmask & (1 << bit))
621 bshift = bit;
622 if (gmask & (1 << bit))
623 gshift = bit;
624 if (rmask & (1 << bit))
625 rshift = bit;
626 }
9042a017
VZ
627 // Find number of bits in mask (MSB-LSB+1)
628 for (bit = 0; bit < bpp; bit++)
629 {
630 if (bmask & (1 << bit))
631 bbits = bit-bshift+1;
632 if (gmask & (1 << bit))
633 gbits = bit-gshift+1;
634 if (rmask & (1 << bit))
635 rbits = bit-rshift+1;
636 }
e65ed37a 637 }
05813ada 638 else if ( bpp == 16 )
e65ed37a
RR
639 {
640 rmask = 0x7C00;
641 gmask = 0x03E0;
642 bmask = 0x001F;
643 rshift = 10;
644 gshift = 5;
645 bshift = 0;
9042a017
VZ
646 rbits = 5;
647 gbits = 5;
648 bbits = 5;
e65ed37a 649 }
05813ada 650 else if ( bpp == 32 )
e65ed37a
RR
651 {
652 rmask = 0x00FF0000;
653 gmask = 0x0000FF00;
654 bmask = 0x000000FF;
55a35cb0
VZ
655 amask = 0xFF000000;
656
657 ashift = 24;
e65ed37a
RR
658 rshift = 16;
659 gshift = 8;
660 bshift = 0;
9042a017
VZ
661 rbits = 8;
662 gbits = 8;
663 bbits = 8;
e65ed37a
RR
664 }
665 }
666
667 /*
668 * Reading the image data
669 */
05813ada 670 if ( IsBmp )
b81e4506 671 {
8faef7cc
FM
672 // NOTE: seeking a positive amount in wxFromCurrent mode allows us to
673 // load even non-seekable streams (see wxInputStream::SeekI docs)!
38e23f10
PC
674 const wxFileOffset pos = stream.TellI();
675 if (pos != wxInvalidOffset && bmpOffset > pos)
676 if (stream.SeekI(bmpOffset - pos, wxFromCurrent) == wxInvalidOffset)
677 return false;
b81e4506
FM
678 //else: icon, just carry on
679 }
52b64b0a 680
e65ed37a
RR
681 unsigned char *data = ptr;
682
683 /* set the whole image to the background color */
05813ada 684 if ( bpp < 16 && (comp == BI_RLE4 || comp == BI_RLE8) )
e65ed37a
RR
685 {
686 for (int i = 0; i < width * height; i++)
687 {
688 *ptr++ = cmap[0].r;
689 *ptr++ = cmap[0].g;
690 *ptr++ = cmap[0].b;
691 }
692 ptr = data;
693 }
31528cd3 694
e65ed37a
RR
695 int linesize = ((width * bpp + 31) / 32) * 4;
696
b5131230
VZ
697 // flag indicating if we have any not fully transparent alpha values: this
698 // is used to account for the bitmaps which use 32bpp format (normally
699 // meaning that they have alpha channel) but have only zeroes in it so that
700 // without this hack they appear fully transparent -- and as this is
701 // unlikely intentional, we consider that they don't have alpha at all in
702 // this case (see #10915)
703 bool hasValidAlpha = false;
704
e65ed37a 705 /* BMPs are stored upside down */
999836aa 706 for ( int line = (height - 1); line >= 0; line-- )
e65ed37a
RR
707 {
708 int linepos = 0;
999836aa 709 for ( int column = 0; column < width ; )
e65ed37a 710 {
05813ada 711 if ( bpp < 16 )
e65ed37a 712 {
e65ed37a
RR
713 linepos++;
714 aByte = stream.GetC();
05813ada 715 if ( bpp == 1 )
e65ed37a 716 {
999836aa 717 for (int bit = 0; bit < 8 && column < width; bit++)
e65ed37a 718 {
999836aa 719 int index = ((aByte & (0x80 >> bit)) ? 1 : 0);
e65ed37a
RR
720 ptr[poffset] = cmap[index].r;
721 ptr[poffset + 1] = cmap[index].g;
722 ptr[poffset + 2] = cmap[index].b;
723 column++;
724 }
725 }
05813ada 726 else if ( bpp == 4 )
e65ed37a 727 {
05813ada 728 if ( comp == BI_RLE4 )
e65ed37a 729 {
2b5f62a0
VZ
730 wxUint8 first;
731 first = aByte;
732 aByte = stream.GetC();
733 if ( first == 0 )
734 {
735 if ( aByte == 0 )
736 {
737 if ( column > 0 )
738 column = width;
739 }
740 else if ( aByte == 1 )
741 {
742 column = width;
743 line = -1;
744 }
745 else if ( aByte == 2 )
746 {
747 aByte = stream.GetC();
748 column += aByte;
749 linepos = column * bpp / 4;
750 aByte = stream.GetC();
751 line -= aByte; // upside down
752 }
753 else
754 {
755 int absolute = aByte;
756 wxUint8 nibble[2] ;
757 int readBytes = 0 ;
758 for (int k = 0; k < absolute; k++)
759 {
760 if ( !(k % 2 ) )
761 {
762 ++readBytes ;
763 aByte = stream.GetC();
9a431f4d
WS
764 nibble[0] = (wxUint8)( (aByte & 0xF0) >> 4 ) ;
765 nibble[1] = (wxUint8)( aByte & 0x0F ) ;
2b5f62a0
VZ
766 }
767 ptr[poffset ] = cmap[nibble[k%2]].r;
768 ptr[poffset + 1] = cmap[nibble[k%2]].g;
769 ptr[poffset + 2] = cmap[nibble[k%2]].b;
770 column++;
771 if ( k % 2 )
772 linepos++;
773 }
774 if ( readBytes & 0x01 )
775 aByte = stream.GetC();
776 }
777 }
778 else
779 {
780 wxUint8 nibble[2] ;
9a431f4d
WS
781 nibble[0] = (wxUint8)( (aByte & 0xF0) >> 4 ) ;
782 nibble[1] = (wxUint8)( aByte & 0x0F ) ;
2b5f62a0
VZ
783
784 for ( int l = 0; l < first && column < width; l++ )
785 {
786 ptr[poffset ] = cmap[nibble[l%2]].r;
787 ptr[poffset + 1] = cmap[nibble[l%2]].g;
788 ptr[poffset + 2] = cmap[nibble[l%2]].b;
789 column++;
790 if ( l % 2 )
791 linepos++;
792 }
793 }
e65ed37a
RR
794 }
795 else
796 {
999836aa 797 for (int nibble = 0; nibble < 2 && column < width; nibble++)
e65ed37a 798 {
38e23f10 799 int index = ((aByte & (0xF0 >> (nibble * 4))) >> (!nibble * 4));
05813ada 800 if ( index >= 16 )
e65ed37a
RR
801 index = 15;
802 ptr[poffset] = cmap[index].r;
803 ptr[poffset + 1] = cmap[index].g;
804 ptr[poffset + 2] = cmap[index].b;
805 column++;
806 }
807 }
808 }
05813ada 809 else if ( bpp == 8 )
e65ed37a 810 {
05813ada 811 if ( comp == BI_RLE8 )
e65ed37a
RR
812 {
813 unsigned char first;
814 first = aByte;
815 aByte = stream.GetC();
05813ada 816 if ( first == 0 )
e65ed37a 817 {
05813ada 818 if ( aByte == 0 )
e65ed37a
RR
819 {
820 /* column = width; */
821 }
05813ada 822 else if ( aByte == 1 )
e65ed37a
RR
823 {
824 column = width;
825 line = -1;
826 }
05813ada 827 else if ( aByte == 2 )
e65ed37a
RR
828 {
829 aByte = stream.GetC();
830 column += aByte;
831 linepos = column * bpp / 8;
832 aByte = stream.GetC();
833 line += aByte;
834 }
835 else
836 {
837 int absolute = aByte;
838 for (int k = 0; k < absolute; k++)
839 {
840 linepos++;
841 aByte = stream.GetC();
842 ptr[poffset ] = cmap[aByte].r;
843 ptr[poffset + 1] = cmap[aByte].g;
844 ptr[poffset + 2] = cmap[aByte].b;
845 column++;
846 }
05813ada 847 if ( absolute & 0x01 )
e65ed37a
RR
848 aByte = stream.GetC();
849 }
850 }
851 else
852 {
05813ada 853 for ( int l = 0; l < first && column < width; l++ )
e65ed37a
RR
854 {
855 ptr[poffset ] = cmap[aByte].r;
856 ptr[poffset + 1] = cmap[aByte].g;
857 ptr[poffset + 2] = cmap[aByte].b;
858 column++;
859 linepos++;
860 }
861 }
862 }
863 else
864 {
865 ptr[poffset ] = cmap[aByte].r;
866 ptr[poffset + 1] = cmap[aByte].g;
867 ptr[poffset + 2] = cmap[aByte].b;
868 column++;
953704c1 869 // linepos += size; seems to be wrong, RR
e65ed37a
RR
870 }
871 }
2b5f62a0
VZ
872 }
873 else if ( bpp == 24 )
874 {
875 stream.Read(bbuf, 3);
876 linepos += 3;
877 ptr[poffset ] = (unsigned char)bbuf[2];
878 ptr[poffset + 1] = (unsigned char)bbuf[1];
879 ptr[poffset + 2] = (unsigned char)bbuf[0];
880 column++;
881 }
882 else if ( bpp == 16 )
883 {
884 unsigned char temp;
885 stream.Read(&aWord, 2);
886 aWord = wxUINT16_SWAP_ON_BE(aWord);
887 linepos += 2;
38e23f10 888 /* Use the masks and calculated amount of shift
9042a017
VZ
889 to retrieve the color data out of the word. Then
890 shift it left by (8 - number of bits) such that
891 the image has the proper dynamic range */
38e23f10 892 temp = (unsigned char)(((aWord & rmask) >> rshift) << (8-rbits));
2b5f62a0 893 ptr[poffset] = temp;
38e23f10 894 temp = (unsigned char)(((aWord & gmask) >> gshift) << (8-gbits));
2b5f62a0 895 ptr[poffset + 1] = temp;
38e23f10 896 temp = (unsigned char)(((aWord & bmask) >> bshift) << (8-bbits));
2b5f62a0
VZ
897 ptr[poffset + 2] = temp;
898 column++;
899 }
900 else
901 {
902 unsigned char temp;
903 stream.Read(&aDword, 4);
904 aDword = wxINT32_SWAP_ON_BE(aDword);
905 linepos += 4;
9a431f4d 906 temp = (unsigned char)((aDword & rmask) >> rshift);
2b5f62a0 907 ptr[poffset] = temp;
9a431f4d 908 temp = (unsigned char)((aDword & gmask) >> gshift);
2b5f62a0 909 ptr[poffset + 1] = temp;
9a431f4d 910 temp = (unsigned char)((aDword & bmask) >> bshift);
2b5f62a0 911 ptr[poffset + 2] = temp;
55a35cb0
VZ
912 if ( alpha )
913 {
914 temp = (unsigned char)((aDword & amask) >> ashift);
915 alpha[line * width + column] = temp;
b5131230
VZ
916
917 if ( temp != wxALPHA_TRANSPARENT )
918 hasValidAlpha = true;
55a35cb0 919 }
2b5f62a0
VZ
920 column++;
921 }
922 }
923 while ( (linepos < linesize) && (comp != 1) && (comp != 2) )
924 {
925 stream.Read(&aByte, 1);
926 linepos += 1;
927 if ( !stream )
928 break;
929 }
930 }
931
7beb59f3 932 image->SetMask(false);
2b5f62a0 933
b5131230
VZ
934 // check if we had any valid alpha values in this bitmap
935 if ( alpha && !hasValidAlpha )
936 {
937 // we didn't, so finally discard the alpha channel completely
938 image->ClearAlpha();
939 }
940
2b5f62a0
VZ
941 const wxStreamError err = stream.GetLastError();
942 return err == wxSTREAM_NO_ERROR || err == wxSTREAM_EOF;
52b64b0a
RR
943}
944
574c939e 945bool wxBMPHandler::LoadDib(wxImage *image, wxInputStream& stream,
05813ada 946 bool verbose, bool IsBmp)
52b64b0a 947{
52b64b0a
RR
948 wxUint16 aWord;
949 wxInt32 dbuf[4];
950 wxInt8 bbuf[4];
52b64b0a 951
52b64b0a
RR
952 if ( IsBmp )
953 {
954 // read the header off the .BMP format file
05813ada
VS
955 stream.Read(bbuf, 2);
956 stream.Read(dbuf, 16);
52b64b0a
RR
957 }
958 else
959 {
05813ada 960 stream.Read(dbuf, 4);
52b64b0a
RR
961 }
962 #if 0 // unused
05813ada 963 wxInt32 size = wxINT32_SWAP_ON_BE(dbuf[0]);
52b64b0a 964 #endif
8faef7cc 965 wxFileOffset offset = wxINT32_SWAP_ON_BE(dbuf[2]);
52b64b0a
RR
966
967 stream.Read(dbuf, 4 * 2);
ecae80b2
WS
968 int width = wxINT32_SWAP_ON_BE((int)dbuf[0]);
969 int height = wxINT32_SWAP_ON_BE((int)dbuf[1]);
05813ada 970 if ( !IsBmp)height = height / 2; // for icons divide by 2
574c939e 971
05813ada 972 if ( width > 32767 )
52b64b0a
RR
973 {
974 if (verbose)
af588446 975 {
52b64b0a 976 wxLogError( _("DIB Header: Image width > 32767 pixels for file.") );
af588446 977 }
7beb59f3 978 return false;
52b64b0a 979 }
05813ada 980 if ( height > 32767 )
52b64b0a
RR
981 {
982 if (verbose)
af588446 983 {
52b64b0a 984 wxLogError( _("DIB Header: Image height > 32767 pixels for file.") );
af588446 985 }
7beb59f3 986 return false;
52b64b0a
RR
987 }
988
05813ada 989 stream.Read(&aWord, 2);
52b64b0a
RR
990 /*
991 TODO
992 int planes = (int)wxUINT16_SWAP_ON_BE( aWord );
993 */
05813ada 994 stream.Read(&aWord, 2);
ecae80b2 995 int bpp = wxUINT16_SWAP_ON_BE((int)aWord);
05813ada 996 if ( bpp != 1 && bpp != 4 && bpp != 8 && bpp != 16 && bpp != 24 && bpp != 32 )
52b64b0a
RR
997 {
998 if (verbose)
af588446 999 {
52b64b0a 1000 wxLogError( _("DIB Header: Unknown bitdepth in file.") );
af588446 1001 }
7beb59f3 1002 return false;
52b64b0a
RR
1003 }
1004
05813ada 1005 stream.Read(dbuf, 4 * 4);
ecae80b2 1006 int comp = wxINT32_SWAP_ON_BE((int)dbuf[0]);
574c939e 1007 if ( comp != BI_RGB && comp != BI_RLE4 && comp != BI_RLE8 &&
05813ada 1008 comp != BI_BITFIELDS )
52b64b0a
RR
1009 {
1010 if (verbose)
af588446 1011 {
52b64b0a 1012 wxLogError( _("DIB Header: Unknown encoding in file.") );
af588446 1013 }
7beb59f3 1014 return false;
52b64b0a
RR
1015 }
1016
05813ada 1017 stream.Read(dbuf, 4 * 2);
37ba70a5 1018
ecae80b2 1019 int ncolors = wxINT32_SWAP_ON_BE( (int)dbuf[0] );
52b64b0a
RR
1020 if (ncolors == 0)
1021 ncolors = 1 << bpp;
1022 /* some more sanity checks */
1023 if (((comp == BI_RLE4) && (bpp != 4)) ||
1024 ((comp == BI_RLE8) && (bpp != 8)) ||
1025 ((comp == BI_BITFIELDS) && (bpp != 16 && bpp != 32)))
1026 {
1027 if (verbose)
af588446 1028 {
52b64b0a 1029 wxLogError( _("DIB Header: Encoding doesn't match bitdepth.") );
af588446 1030 }
7beb59f3 1031 return false;
52b64b0a
RR
1032 }
1033
1034 //read DIB; this is the BMP image or the XOR part of an icon image
05813ada 1035 if ( !DoLoadDib(image, width, height, bpp, ncolors, comp, offset, stream,
7beb59f3 1036 verbose, IsBmp, true) )
52b64b0a
RR
1037 {
1038 if (verbose)
af588446 1039 {
eab77b59 1040 wxLogError( _("Error in reading image DIB.") );
af588446 1041 }
7beb59f3 1042 return false;
52b64b0a
RR
1043 }
1044
1045 if ( !IsBmp )
1046 {
1047 //read Icon mask which is monochrome
1048 //there is no palette, so we will create one
1f5b2017 1049 wxImage mask;
05813ada 1050 if ( !DoLoadDib(&mask, width, height, 1, 2, BI_RGB, offset, stream,
7beb59f3 1051 verbose, IsBmp, false) )
52b64b0a
RR
1052 {
1053 if (verbose)
af588446 1054 {
52b64b0a 1055 wxLogError( _("ICO: Error in reading mask DIB.") );
af588446 1056 }
7beb59f3 1057 return false;
52b64b0a 1058 }
1f5b2017 1059 image->SetMaskFromImage(mask, 255, 255, 255);
52b64b0a
RR
1060
1061 }
05813ada 1062
37ba70a5
VZ
1063 // the resolution in the bitmap header is in meters, convert to centimeters
1064 image->SetOption(wxIMAGE_OPTION_RESOLUTIONUNIT, wxIMAGE_RESOLUTION_CM);
1065 image->SetOption(wxIMAGE_OPTION_RESOLUTIONX, dbuf[2]/100);
1066 image->SetOption(wxIMAGE_OPTION_RESOLUTIONY, dbuf[3]/100);
1067
7beb59f3 1068 return true;
e65ed37a
RR
1069}
1070
574c939e 1071bool wxBMPHandler::LoadFile(wxImage *image, wxInputStream& stream,
05813ada
VS
1072 bool verbose, int WXUNUSED(index))
1073{
1074 // Read a single DIB fom the file:
7beb59f3 1075 return LoadDib(image, stream, verbose, true/*isBmp*/);
05813ada 1076}
52b64b0a 1077
05813ada 1078bool wxBMPHandler::DoCanRead(wxInputStream& stream)
52b64b0a 1079{
05813ada
VS
1080 unsigned char hdr[2];
1081
8faef7cc 1082 if ( !stream.Read(hdr, WXSIZEOF(hdr)) ) // it's ok to modify the stream position here
7beb59f3 1083 return false;
79fa2374 1084
79fa2374
VZ
1085 // do we have the BMP file signature?
1086 return hdr[0] == 'B' && hdr[1] == 'M';
52b64b0a
RR
1087}
1088
e30285ab
VZ
1089#endif // wxUSE_STREAMS
1090
52b64b0a 1091
658974ae 1092#if wxUSE_ICO_CUR
05813ada
VS
1093//-----------------------------------------------------------------------------
1094// wxICOHandler
1095//-----------------------------------------------------------------------------
1096
1097IMPLEMENT_DYNAMIC_CLASS(wxICOHandler, wxBMPHandler)
1098
e30285ab
VZ
1099#if wxUSE_STREAMS
1100
05813ada
VS
1101struct ICONDIRENTRY
1102{
1103 wxUint8 bWidth; // Width of the image
1104 wxUint8 bHeight; // Height of the image (times 2)
1105 wxUint8 bColorCount; // Number of colors in image (0 if >=8bpp)
1106 wxUint8 bReserved; // Reserved
1107
1108 // these two are different in icons and cursors:
1109 // icon or cursor
1110 wxUint16 wPlanes; // Color Planes or XHotSpot
1111 wxUint16 wBitCount; // Bits per pixel or YHotSpot
1112
1113 wxUint32 dwBytesInRes; // how many bytes in this resource?
1114 wxUint32 dwImageOffset; // where in the file is this image
1115};
1116
1117struct ICONDIR
1118{
1119 wxUint16 idReserved; // Reserved
1120 wxUint16 idType; // resource type (1 for icons, 2 for cursors)
1121 wxUint16 idCount; // how many images?
1122};
1123
1124
1125bool wxICOHandler::SaveFile(wxImage *image,
1126 wxOutputStream& stream,
1127 bool verbose)
1128
52b64b0a 1129{
05813ada
VS
1130 //sanity check; icon must be less than 127 pixels high and 255 wide
1131 if ( image->GetHeight () > 127 )
1132 {
1133 if ( verbose )
af588446 1134 {
05813ada 1135 wxLogError(_("ICO: Image too tall for an icon."));
af588446 1136 }
7beb59f3 1137 return false;
05813ada
VS
1138 }
1139 if ( image->GetWidth () > 255 )
1140 {
1141 if ( verbose )
af588446 1142 {
05813ada 1143 wxLogError(_("ICO: Image too wide for an icon."));
af588446 1144 }
7beb59f3 1145 return false;
05813ada
VS
1146 }
1147
1229a1e7 1148 const int images = 1; // only generate one image
05813ada 1149
574c939e 1150 // VS: This is a hack of sort - since ICO and CUR files are almost
05813ada
VS
1151 // identical, we have all the meat in wxICOHandler and check for
1152 // the actual (handler) type when the code has to distinguish between
1153 // the two formats
1154 int type = (this->GetType() == wxBITMAP_TYPE_CUR) ? 2 : 1;
1155
1156 // write a header, (ICONDIR)
1157 // Calculate the header size
1158 wxUint32 offset = 3 * sizeof(wxUint16);
1159
1160 ICONDIR IconDir;
1161 IconDir.idReserved = 0;
ecae80b2
WS
1162 IconDir.idType = wxUINT16_SWAP_ON_BE((wxUint16)type);
1163 IconDir.idCount = wxUINT16_SWAP_ON_BE((wxUint16)images);
05813ada
VS
1164 stream.Write(&IconDir.idReserved, sizeof(IconDir.idReserved));
1165 stream.Write(&IconDir.idType, sizeof(IconDir.idType));
1166 stream.Write(&IconDir.idCount, sizeof(IconDir.idCount));
1167 if ( !stream.IsOk() )
1168 {
1169 if ( verbose )
af588446 1170 {
05813ada 1171 wxLogError(_("ICO: Error writing the image file!"));
af588446 1172 }
7beb59f3 1173 return false;
05813ada
VS
1174 }
1175
1176 // for each iamage write a description ICONDIRENTRY:
1177 ICONDIRENTRY icondirentry;
1229a1e7 1178 for (int img = 0; img < images; img++)
05813ada
VS
1179 {
1180 wxImage mask;
1181
1182 if ( image->HasMask() )
574c939e 1183 {
05813ada
VS
1184 // make another image with black/white:
1185 mask = image->ConvertToMono (image->GetMaskRed(), image->GetMaskGreen(), image->GetMaskBlue() );
1186
1187 // now we need to change the masked regions to black:
1188 unsigned char r = image->GetMaskRed();
1189 unsigned char g = image->GetMaskGreen();
1190 unsigned char b = image->GetMaskBlue();
1191 if ( (r != 0) || (g != 0) || (b != 0) )
1192 {
1193 // Go round and apply black to the masked bits:
1194 int i, j;
1195 for (i = 0; i < mask.GetWidth(); i++)
1196 {
1197 for (j = 0; j < mask.GetHeight(); j++)
1198 {
574c939e
KB
1199 if ((r == mask.GetRed(i, j)) &&
1200 (g == mask.GetGreen(i, j))&&
05813ada
VS
1201 (b == mask.GetBlue(i, j)) )
1202 image->SetRGB(i, j, 0, 0, 0 );
1203 }
1204 }
1205 }
1206 }
1207 else
1208 {
1209 // just make a black mask all over:
1210 mask = image->Copy();
1229a1e7
WS
1211 int i, j;
1212 for (i = 0; i < mask.GetWidth(); i++)
05813ada 1213 for (j = 0; j < mask.GetHeight(); j++)
1229a1e7 1214 mask.SetRGB(i, j, 0, 0, 0 );
05813ada
VS
1215 }
1216 // Set the formats for image and mask
1217 // (Windows never saves with more than 8 colors):
fd94e8aa 1218 image->SetOption(wxIMAGE_OPTION_BMP_FORMAT, wxBMP_8BPP);
05813ada
VS
1219
1220 // monochome bitmap:
fd94e8aa 1221 mask.SetOption(wxIMAGE_OPTION_BMP_FORMAT, wxBMP_1BPP_BW);
7beb59f3
WS
1222 bool IsBmp = false;
1223 bool IsMask = false;
05813ada
VS
1224
1225 //calculate size and offset of image and mask
1226 wxCountingOutputStream cStream;
5cb598ae 1227 bool bResult = SaveDib(image, cStream, verbose, IsBmp, IsMask);
05813ada
VS
1228 if ( !bResult )
1229 {
1230 if ( verbose )
af588446 1231 {
05813ada 1232 wxLogError(_("ICO: Error writing the image file!"));
af588446 1233 }
7beb59f3 1234 return false;
05813ada 1235 }
7beb59f3 1236 IsMask = true;
05813ada
VS
1237
1238 bResult = SaveDib(&mask, cStream, verbose, IsBmp, IsMask);
1239 if ( !bResult )
1240 {
1241 if ( verbose )
af588446 1242 {
05813ada 1243 wxLogError(_("ICO: Error writing the image file!"));
af588446 1244 }
7beb59f3 1245 return false;
05813ada
VS
1246 }
1247 wxUint32 Size = cStream.GetSize();
1248
b7cacb43 1249 // wxCountingOutputStream::IsOk() always returns true for now and this
05813ada
VS
1250 // "if" provokes VC++ warnings in optimized build
1251#if 0
a1b806b9 1252 if ( !cStream.IsOk() )
05813ada
VS
1253 {
1254 if ( verbose )
43b2d5e7 1255 {
05813ada 1256 wxLogError(_("ICO: Error writing the image file!"));
43b2d5e7 1257 }
7beb59f3 1258 return false;
05813ada
VS
1259 }
1260#endif // 0
1261
1262 offset = offset + sizeof(ICONDIRENTRY);
1263
f12a90c7
DE
1264 icondirentry.bWidth = (wxUint8)image->GetWidth();
1265 icondirentry.bHeight = (wxUint8)(2 * image->GetHeight());
05813ada
VS
1266 icondirentry.bColorCount = 0;
1267 icondirentry.bReserved = 0;
1268 icondirentry.wPlanes = wxUINT16_SWAP_ON_BE(1);
1269 icondirentry.wBitCount = wxUINT16_SWAP_ON_BE(wxBMP_8BPP);
1270 if ( type == 2 /*CUR*/)
1271 {
fd94e8aa
VS
1272 int hx = image->HasOption(wxIMAGE_OPTION_CUR_HOTSPOT_X) ?
1273 image->GetOptionInt(wxIMAGE_OPTION_CUR_HOTSPOT_X) :
05813ada 1274 image->GetWidth() / 2;
fd94e8aa
VS
1275 int hy = image->HasOption(wxIMAGE_OPTION_CUR_HOTSPOT_Y) ?
1276 image->GetOptionInt(wxIMAGE_OPTION_CUR_HOTSPOT_Y) :
05813ada
VS
1277 image->GetHeight() / 2;
1278
1279 // actually write the values of the hot spot here:
1280 icondirentry.wPlanes = wxUINT16_SWAP_ON_BE((wxUint16)hx);
1281 icondirentry.wBitCount = wxUINT16_SWAP_ON_BE((wxUint16)hy);
1282 }
1283 icondirentry.dwBytesInRes = wxUINT32_SWAP_ON_BE(Size);
1284 icondirentry.dwImageOffset = wxUINT32_SWAP_ON_BE(offset);
1285
1286 // increase size to allow for the data written:
1287 offset += Size;
1288
1289 // write to stream:
1290 stream.Write(&icondirentry.bWidth, sizeof(icondirentry.bWidth));
1291 stream.Write(&icondirentry.bHeight, sizeof(icondirentry.bHeight));
1292 stream.Write(&icondirentry.bColorCount, sizeof(icondirentry.bColorCount));
1293 stream.Write(&icondirentry.bReserved, sizeof(icondirentry.bReserved));
1294 stream.Write(&icondirentry.wPlanes, sizeof(icondirentry.wPlanes));
1295 stream.Write(&icondirentry.wBitCount, sizeof(icondirentry.wBitCount));
1296 stream.Write(&icondirentry.dwBytesInRes, sizeof(icondirentry.dwBytesInRes));
1297 stream.Write(&icondirentry.dwImageOffset, sizeof(icondirentry.dwImageOffset));
1298 if ( !stream.IsOk() )
1299 {
1300 if ( verbose )
af588446 1301 {
05813ada 1302 wxLogError(_("ICO: Error writing the image file!"));
af588446 1303 }
7beb59f3 1304 return false;
05813ada
VS
1305 }
1306
1307 // actually save it:
7beb59f3 1308 IsMask = false;
05813ada
VS
1309 bResult = SaveDib(image, stream, verbose, IsBmp, IsMask);
1310 if ( !bResult )
1311 {
1312 if ( verbose )
af588446 1313 {
05813ada 1314 wxLogError(_("ICO: Error writing the image file!"));
af588446 1315 }
7beb59f3 1316 return false;
05813ada 1317 }
7beb59f3 1318 IsMask = true;
05813ada
VS
1319
1320 bResult = SaveDib(&mask, stream, verbose, IsBmp, IsMask);
1321 if ( !bResult )
1322 {
1323 if ( verbose )
af588446 1324 {
05813ada 1325 wxLogError(_("ICO: Error writing the image file!"));
af588446 1326 }
7beb59f3 1327 return false;
05813ada
VS
1328 }
1329
1330 } // end of for loop
1331
7beb59f3 1332 return true;
05813ada
VS
1333}
1334
574c939e 1335bool wxICOHandler::LoadFile(wxImage *image, wxInputStream& stream,
05813ada 1336 bool verbose, int index)
658974ae 1337{
5c98cb9b 1338 if ( stream.IsSeekable() && stream.SeekI(0) == wxInvalidOffset )
bf34105a
DS
1339 {
1340 return false;
1341 }
1342
658974ae
VS
1343 return DoLoadFile(image, stream, verbose, index);
1344}
1345
574c939e 1346bool wxICOHandler::DoLoadFile(wxImage *image, wxInputStream& stream,
5c235ea0 1347 bool WXUNUSED(verbose), int index)
05813ada 1348{
5cb598ae
WS
1349 bool bResult wxDUMMY_INITIALIZE(false);
1350 bool IsBmp = false;
52b64b0a 1351
05813ada 1352 ICONDIR IconDir;
658974ae 1353
05813ada
VS
1354 stream.Read(&IconDir, sizeof(IconDir));
1355 wxUint16 nIcons = wxUINT16_SWAP_ON_BE(IconDir.idCount);
03647350 1356
05813ada
VS
1357 // nType is 1 for Icons, 2 for Cursors:
1358 wxUint16 nType = wxUINT16_SWAP_ON_BE(IconDir.idType);
574c939e 1359
05813ada
VS
1360 // loop round the icons and choose the best one:
1361 ICONDIRENTRY *pIconDirEntry = new ICONDIRENTRY[nIcons];
1362 ICONDIRENTRY *pCurrentEntry = pIconDirEntry;
1363 int wMax = 0;
1364 int colmax = 0;
1365 int iSel = wxNOT_FOUND;
1366
8faef7cc 1367 // remember how many bytes we read from the stream:
a9a2485d 1368 wxFileOffset alreadySeeked = sizeof(IconDir);
03647350 1369
8faef7cc 1370 for (unsigned int i = 0; i < nIcons; i++ )
52b64b0a 1371 {
a9a2485d 1372 alreadySeeked += stream.Read(pCurrentEntry, sizeof(ICONDIRENTRY)).LastRead();
03647350 1373
05813ada
VS
1374 // bHeight and bColorCount are wxUint8
1375 if ( pCurrentEntry->bWidth >= wMax )
52b64b0a 1376 {
05813ada
VS
1377 // see if we have more colors, ==0 indicates > 8bpp:
1378 if ( pCurrentEntry->bColorCount == 0 )
1379 pCurrentEntry->bColorCount = 255;
1380 if ( pCurrentEntry->bColorCount >= colmax )
574c939e 1381 {
05813ada
VS
1382 iSel = i;
1383 wMax = pCurrentEntry->bWidth;
1384 colmax = pCurrentEntry->bColorCount;
52b64b0a
RR
1385 }
1386 }
03647350 1387
05813ada
VS
1388 pCurrentEntry++;
1389 }
574c939e 1390
05813ada
VS
1391 if ( index != -1 )
1392 {
1393 // VS: Note that we *have* to run the loop above even if index != -1, because
1394 // it reads ICONDIRENTRies.
1395 iSel = index;
52b64b0a 1396 }
574c939e 1397
05813ada 1398 if ( iSel == wxNOT_FOUND || iSel < 0 || iSel >= nIcons )
52b64b0a 1399 {
05813ada 1400 wxLogError(_("ICO: Invalid icon index."));
5cb598ae 1401 bResult = false;
52b64b0a
RR
1402 }
1403 else
1404 {
05813ada
VS
1405 // seek to selected icon:
1406 pCurrentEntry = pIconDirEntry + iSel;
03647350 1407
8faef7cc
FM
1408 // NOTE: seeking a positive amount in wxFromCurrent mode allows us to
1409 // load even non-seekable streams (see wxInputStream::SeekI docs)!
a9a2485d
FM
1410 wxFileOffset offset = wxUINT32_SWAP_ON_BE(pCurrentEntry->dwImageOffset) - alreadySeeked;
1411 if (offset != 0 && stream.SeekI(offset, wxFromCurrent) == wxInvalidOffset)
b81e4506 1412 return false;
03647350 1413
7beb59f3 1414 bResult = LoadDib(image, stream, true, IsBmp);
658974ae
VS
1415 bool bIsCursorType = (this->GetType() == wxBITMAP_TYPE_CUR) || (this->GetType() == wxBITMAP_TYPE_ANI);
1416 if ( bResult && bIsCursorType && nType == 2 )
05813ada
VS
1417 {
1418 // it is a cursor, so let's set the hotspot:
fd94e8aa
VS
1419 image->SetOption(wxIMAGE_OPTION_CUR_HOTSPOT_X, wxUINT16_SWAP_ON_BE(pCurrentEntry->wPlanes));
1420 image->SetOption(wxIMAGE_OPTION_CUR_HOTSPOT_Y, wxUINT16_SWAP_ON_BE(pCurrentEntry->wBitCount));
05813ada 1421 }
52b64b0a 1422 }
03647350 1423
8faef7cc 1424 delete [] pIconDirEntry;
03647350 1425
05813ada 1426 return bResult;
52b64b0a
RR
1427}
1428
8faef7cc 1429int wxICOHandler::DoGetImageCount(wxInputStream& stream)
0828c087 1430{
bf34105a
DS
1431 // It's ok to modify the stream position in this function.
1432
5c98cb9b 1433 if ( stream.IsSeekable() && stream.SeekI(0) == wxInvalidOffset )
bf34105a
DS
1434 {
1435 return 0;
1436 }
1437
05813ada 1438 ICONDIR IconDir;
8faef7cc 1439
b81e4506
FM
1440 if (stream.Read(&IconDir, sizeof(IconDir)).LastRead() != sizeof(IconDir))
1441 return 0;
03647350 1442
8faef7cc 1443 return (int)wxUINT16_SWAP_ON_BE(IconDir.idCount);
0828c087
VS
1444}
1445
05813ada 1446bool wxICOHandler::DoCanRead(wxInputStream& stream)
52b64b0a 1447{
b4c47016 1448 return CanReadICOOrCUR(&stream, 1 /*for identifying an icon*/);
39d16996 1449
52b64b0a
RR
1450}
1451
e30285ab 1452#endif // wxUSE_STREAMS
e65ed37a 1453
05813ada
VS
1454
1455//-----------------------------------------------------------------------------
1456// wxCURHandler
1457//-----------------------------------------------------------------------------
1458
1459IMPLEMENT_DYNAMIC_CLASS(wxCURHandler, wxICOHandler)
1460
e30285ab
VZ
1461#if wxUSE_STREAMS
1462
05813ada
VS
1463bool wxCURHandler::DoCanRead(wxInputStream& stream)
1464{
b4c47016 1465 return CanReadICOOrCUR(&stream, 2 /*for identifying a cursor*/);
05813ada
VS
1466}
1467
e30285ab
VZ
1468#endif // wxUSE_STREAMS
1469
658974ae
VS
1470//-----------------------------------------------------------------------------
1471// wxANIHandler
1472//-----------------------------------------------------------------------------
1473
1474IMPLEMENT_DYNAMIC_CLASS(wxANIHandler, wxCURHandler)
1475
e30285ab
VZ
1476#if wxUSE_STREAMS
1477
574c939e 1478bool wxANIHandler::LoadFile(wxImage *image, wxInputStream& stream,
72045d57 1479 bool WXUNUSED(verbose), int index)
658974ae 1480{
72045d57
VZ
1481 wxANIDecoder decoder;
1482 if (!decoder.Load(stream))
7beb59f3 1483 return false;
658974ae 1484
72045d57 1485 return decoder.ConvertToImage(index != -1 ? (size_t)index : 0, image);
658974ae
VS
1486}
1487
1488bool wxANIHandler::DoCanRead(wxInputStream& stream)
1489{
72045d57
VZ
1490 wxANIDecoder decod;
1491 return decod.CanRead(stream);
8faef7cc 1492 // it's ok to modify the stream position here
658974ae
VS
1493}
1494
8faef7cc 1495int wxANIHandler::DoGetImageCount(wxInputStream& stream)
658974ae 1496{
72045d57 1497 wxANIDecoder decoder;
8faef7cc 1498 if (!decoder.Load(stream)) // it's ok to modify the stream position here
658974ae
VS
1499 return wxNOT_FOUND;
1500
72045d57 1501 return decoder.GetFrameCount();
658974ae
VS
1502}
1503
b4c47016
DS
1504static bool CanReadICOOrCUR(wxInputStream *stream, wxUint16 resourceType)
1505{
bf34105a
DS
1506 // It's ok to modify the stream position in this function.
1507
5c98cb9b 1508 if ( stream->IsSeekable() && stream->SeekI(0) == wxInvalidOffset )
bf34105a
DS
1509 {
1510 return false;
1511 }
1512
b4c47016 1513 ICONDIR iconDir;
bf34105a 1514 if ( !stream->Read(&iconDir, sizeof(iconDir)) )
b4c47016
DS
1515 {
1516 return false;
1517 }
1518
1519 return !iconDir.idReserved // reserved, must be 0
1520 && wxUINT16_SWAP_ON_BE(iconDir.idType) == resourceType // either 1 or 2
1521 && iconDir.idCount; // must contain at least one image
1522}
1523
e30285ab
VZ
1524#endif // wxUSE_STREAMS
1525
658974ae
VS
1526#endif // wxUSE_ICO_CUR
1527
e30285ab 1528#endif // wxUSE_IMAGE