]> git.saurik.com Git - wxWidgets.git/blob - src/common/imagbmp.cpp
projects / wxWidgets.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
MSLU fixes
[wxWidgets.git] / src / common / imagbmp.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: imagbmp.cpp
3 // Purpose: wxImage BMP,ICO and CUR handlers
4 // Author: Robert Roebling, Chris Elliott
5 // RCS-ID: $Id$
6 // Copyright: (c) Robert Roebling, Chris Elliott
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
9
10 #ifdef __GNUG__
11 #pragma implementation "imagbmp.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 && wxUSE_STREAMS
24
25 #include "wx/imagbmp.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/quantize.h"
35
36 // For memcpy
37 #include <string.h>
38
39 #ifdef __SALFORDC__
40 #ifdef FAR
41 #undef FAR
42 #endif
43 #endif
44
45 #ifdef __WXMSW__
46 #include <windows.h>
47 #endif
48
49 //-----------------------------------------------------------------------------
50 // wxBMPHandler
51 //-----------------------------------------------------------------------------
52
53 IMPLEMENT_DYNAMIC_CLASS(wxBMPHandler,wxImageHandler)
54
55 #ifndef BI_RGB
56 #define BI_RGB 0
57 #define BI_RLE8 1
58 #define BI_RLE4 2
59 #endif
60
61 #ifndef BI_BITFIELDS
62 #define BI_BITFIELDS 3
63 #endif
64
65 #define poffset (line * width * 3 + column * 3)
66
67 bool wxBMPHandler::SaveFile(wxImage *image,
68 wxOutputStream& stream,
69 bool verbose)
70 {
71 return SaveDib(image, stream, verbose, TRUE/*IsBmp*/, FALSE/*IsMask*/);
72 }
73
74 bool wxBMPHandler::SaveDib(wxImage *image,
75 wxOutputStream& stream,
76 bool verbose,
77 bool IsBmp,
78 bool IsMask)
79
80 {
81 wxCHECK_MSG( image, FALSE, _T("invalid pointer in wxBMPHandler::SaveFile") );
82
83 if ( !image->Ok() )
84 {
85 if ( verbose )
86 wxLogError(_("BMP: Couldn't save invalid image."));
87 return FALSE;
88 }
89
90 // get the format of the BMP file to save, else use 24bpp
91 unsigned format = wxBMP_24BPP;
92 if ( image->HasOption(wxBMP_FORMAT) )
93 format = image->GetOptionInt(wxBMP_FORMAT);
94
95 unsigned bpp; // # of bits per pixel
96 int palette_size; // # of color map entries, ie. 2^bpp colors
97
98 // set the bpp and appropriate palette_size, and do additional checks
99 if ( (format == wxBMP_1BPP) || (format == wxBMP_1BPP_BW) )
100 {
101 bpp = 1;
102 palette_size = 2;
103 }
104 else if ( format == wxBMP_4BPP )
105 {
106 bpp = 4;
107 palette_size = 16;
108 }
109 else if ( (format == wxBMP_8BPP) || (format == wxBMP_8BPP_GREY) ||
110 (format == wxBMP_8BPP_RED) || (format == wxBMP_8BPP_PALETTE) )
111 {
112 // need to set a wxPalette to use this, HOW TO CHECK IF VALID, SIZE?
113 if ((format == wxBMP_8BPP_PALETTE)
114 #if wxUSE_PALETTE
115 && !image->HasPalette()
116 #endif // wxUSE_PALETTE
117 )
118 {
119 if ( verbose )
120 wxLogError(_("BMP: wImage doesn't have own wxPalette."));
121 return FALSE;
122 }
123 bpp = 8;
124 palette_size = 256;
125 }
126 else // you get 24bpp
127 {
128 format = wxBMP_24BPP;
129 bpp = 24;
130 palette_size = 0;
131 }
132
133 unsigned width = image->GetWidth();
134 unsigned row_padding = (4 - int(width*bpp/8.0) % 4) % 4; // # bytes to pad to dword
135 unsigned row_width = int(width * bpp/8.0) + row_padding; // # of bytes per row
136
137 struct
138 {
139 // BitmapHeader:
140 wxUint16 magic; // format magic, always 'BM'
141 wxUint32 filesize; // total file size, inc. headers
142 wxUint32 reserved; // for future use
143 wxUint32 data_offset; // image data offset in the file
144
145 // BitmapInfoHeader:
146 wxUint32 bih_size; // 2nd part's size
147 wxUint32 width, height; // bitmap's dimensions
148 wxUint16 planes; // num of planes
149 wxUint16 bpp; // bits per pixel
150 wxUint32 compression; // compression method
151 wxUint32 size_of_bmp; // size of the bitmap
152 wxUint32 h_res, v_res; // image resolution in dpi
153 wxUint32 num_clrs; // number of colors used
154 wxUint32 num_signif_clrs;// number of significant colors
155 } hdr;
156
157 wxUint32 hdr_size = 14/*BitmapHeader*/ + 40/*BitmapInfoHeader*/;
158
159 hdr.magic = wxUINT16_SWAP_ON_BE(0x4D42/*'BM'*/);
160 hdr.filesize = wxUINT32_SWAP_ON_BE( hdr_size + palette_size*4 +
161 row_width * image->GetHeight() );
162 hdr.reserved = 0;
163 hdr.data_offset = wxUINT32_SWAP_ON_BE(hdr_size + palette_size*4);
164
165 hdr.bih_size = wxUINT32_SWAP_ON_BE(hdr_size - 14);
166 hdr.width = wxUINT32_SWAP_ON_BE(image->GetWidth());
167 if ( IsBmp )
168 {
169 hdr.height = wxUINT32_SWAP_ON_BE(image->GetHeight());
170 }
171 else
172 {
173 hdr.height = wxUINT32_SWAP_ON_BE(2 * image->GetHeight());
174 }
175 hdr.planes = wxUINT16_SWAP_ON_BE(1); // always 1 plane
176 hdr.bpp = wxUINT16_SWAP_ON_BE(bpp);
177 hdr.compression = 0; // RGB uncompressed
178 hdr.size_of_bmp = wxUINT32_SWAP_ON_BE(row_width * image->GetHeight());
179 hdr.h_res = hdr.v_res = wxUINT32_SWAP_ON_BE(72); // 72dpi is standard
180 hdr.num_clrs = wxUINT32_SWAP_ON_BE(palette_size); // # colors in colormap
181 hdr.num_signif_clrs = 0; // all colors are significant
182
183 if ( IsBmp )
184 {
185 if (// VS: looks ugly but compilers tend to do ugly things with structs,
186 // like aligning hdr.filesize's ofset to dword :(
187 // VZ: we should add padding then...
188 !stream.Write(&hdr.magic, 2) ||
189 !stream.Write(&hdr.filesize, 4) ||
190 !stream.Write(&hdr.reserved, 4) ||
191 !stream.Write(&hdr.data_offset, 4)
192 )
193 {
194 if (verbose)
195 wxLogError(_("BMP: Couldn't write the file (Bitmap) header."));
196 return FALSE;
197 }
198 }
199 if ( !IsMask )
200 {
201 if (
202 !stream.Write(&hdr.bih_size, 4) ||
203 !stream.Write(&hdr.width, 4) ||
204 !stream.Write(&hdr.height, 4) ||
205 !stream.Write(&hdr.planes, 2) ||
206 !stream.Write(&hdr.bpp, 2) ||
207 !stream.Write(&hdr.compression, 4) ||
208 !stream.Write(&hdr.size_of_bmp, 4) ||
209 !stream.Write(&hdr.h_res, 4) ||
210 !stream.Write(&hdr.v_res, 4) ||
211 !stream.Write(&hdr.num_clrs, 4) ||
212 !stream.Write(&hdr.num_signif_clrs, 4)
213 )
214 {
215 if (verbose)
216 wxLogError(_("BMP: Couldn't write the file (BitmapInfo) header."));
217 return FALSE;
218 }
219 }
220
221 wxPalette *palette = NULL; // entries for quantized images
222 wxUint8 *rgbquad = NULL; // for the RGBQUAD bytes for the colormap
223 wxImage *q_image = NULL; // destination for quantized image
224
225 // if <24bpp use quantization to reduce colors for *some* of the formats
226 if ( (format == wxBMP_1BPP) || (format == wxBMP_4BPP) ||
227 (format == wxBMP_8BPP) || (format == wxBMP_8BPP_PALETTE) )
228 {
229 // make a new palette and quantize the image
230 if (format != wxBMP_8BPP_PALETTE)
231 {
232 q_image = new wxImage();
233
234 // I get a delete error using Quantize when desired colors > 236
235 int quantize = ((palette_size > 236) ? 236 : palette_size);
236 // fill the destination too, it gives much nicer 4bpp images
237 wxQuantize::Quantize( *image, *q_image, &palette, quantize, 0,
238 wxQUANTIZE_FILL_DESTINATION_IMAGE );
239 }
240 else
241 {
242 #if wxUSE_PALETTE
243 palette = new wxPalette(image->GetPalette());
244 #endif // wxUSE_PALETTE
245 }
246
247 int i;
248 unsigned char r, g, b;
249 rgbquad = new wxUint8 [palette_size*4];
250
251 for (i = 0; i < palette_size; i++)
252 {
253 #if wxUSE_PALETTE
254 if ( !palette->GetRGB(i, &r, &g, &b) )
255 #endif // wxUSE_PALETTE
256 r = g = b = 0;
257
258 rgbquad[i*4] = b;
259 rgbquad[i*4+1] = g;
260 rgbquad[i*4+2] = r;
261 rgbquad[i*4+3] = 0;
262 }
263 }
264 // make a 256 entry greyscale colormap or 2 entry black & white
265 else if ( (format == wxBMP_8BPP_GREY) || (format == wxBMP_8BPP_RED) ||
266 (format == wxBMP_1BPP_BW) )
267 {
268 int i;
269 rgbquad = new wxUint8 [palette_size*4];
270
271 for (i = 0; i < palette_size; i++)
272 {
273 // if 1BPP_BW then just 0 and 255 then exit
274 if (( i > 0) && (format == wxBMP_1BPP_BW)) i = 255;
275 rgbquad[i*4] = i;
276 rgbquad[i*4+1] = i;
277 rgbquad[i*4+2] = i;
278 rgbquad[i*4+3] = 0;
279 }
280 }
281
282 // if the colormap was made, then it needs to be written
283 if (rgbquad)
284 {
285 if ( !IsMask )
286 {
287 if ( !stream.Write(rgbquad, palette_size*4) )
288 {
289 if (verbose)
290 wxLogError(_("BMP: Couldn't write RGB color map."));
291 delete[] rgbquad;
292 #if wxUSE_PALETTE
293 delete palette;
294 #endif // wxUSE_PALETTE
295 delete q_image;
296 return FALSE;
297 }
298 }
299 delete []rgbquad;
300 }
301
302 // pointer to the image data, use quantized if available
303 wxUint8 *data = (wxUint8*) image->GetData();
304 if (q_image) if (q_image->Ok()) data = (wxUint8*) q_image->GetData();
305
306 wxUint8 *buffer = new wxUint8[row_width];
307 memset(buffer, 0, row_width);
308 int y; unsigned x;
309 long int pixel;
310
311 for (y = image->GetHeight() -1; y >= 0; y--)
312 {
313 if ( format == wxBMP_24BPP ) // 3 bytes per pixel red,green,blue
314 {
315 for ( x = 0; x < width; x++ )
316 {
317 pixel = 3*(y*width + x);
318
319 buffer[3*x ] = data[pixel+2];
320 buffer[3*x + 1] = data[pixel+1];
321 buffer[3*x + 2] = data[pixel];
322 }
323 }
324 else if ((format == wxBMP_8BPP) || // 1 byte per pixel in color
325 (format == wxBMP_8BPP_PALETTE))
326 {
327 for (x = 0; x < width; x++)
328 {
329 pixel = 3*(y*width + x);
330 #if wxUSE_PALETTE
331 buffer[x] = palette->GetPixel( data[pixel],
332 data[pixel+1],
333 data[pixel+2] );
334 #else
335 // FIXME: what should this be? use some std palette maybe?
336 buffer[x] = 0;
337 #endif // wxUSE_PALETTE
338 }
339 }
340 else if ( format == wxBMP_8BPP_GREY ) // 1 byte per pix, rgb ave to grey
341 {
342 for (x = 0; x < width; x++)
343 {
344 pixel = 3*(y*width + x);
345 buffer[x] = (wxUint8)(.299*data[pixel] +
346 .587*data[pixel+1] +
347 .114*data[pixel+2]);
348 }
349 }
350 else if ( format == wxBMP_8BPP_RED ) // 1 byte per pixel, red as greys
351 {
352 for (x = 0; x < width; x++)
353 {
354 buffer[x] = (wxUint8)data[3*(y*width + x)];
355 }
356 }
357 else if ( format == wxBMP_4BPP ) // 4 bpp in color
358 {
359 for (x = 0; x < width; x+=2)
360 {
361 pixel = 3*(y*width + x);
362
363 // fill buffer, ignore if > width
364 #if wxUSE_PALETTE
365 buffer[x/2] =
366 ((wxUint8)palette->GetPixel(data[pixel],
367 data[pixel+1],
368 data[pixel+2]) << 4) |
369 (((x+1) > width)
370 ? 0
371 : ((wxUint8)palette->GetPixel(data[pixel+3],
372 data[pixel+4],
373 data[pixel+5]) ));
374 #else
375 // FIXME: what should this be? use some std palette maybe?
376 buffer[x/2] = 0;
377 #endif // wxUSE_PALETTE
378 }
379 }
380 else if ( format == wxBMP_1BPP ) // 1 bpp in "color"
381 {
382 for (x = 0; x < width; x+=8)
383 {
384 pixel = 3*(y*width + x);
385
386 #if wxUSE_PALETTE
387 buffer[x/8] = ((wxUint8)palette->GetPixel(data[pixel], data[pixel+1], data[pixel+2]) << 7) |
388 (((x+1) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+3], data[pixel+4], data[pixel+5]) << 6)) |
389 (((x+2) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+6], data[pixel+7], data[pixel+8]) << 5)) |
390 (((x+3) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+9], data[pixel+10], data[pixel+11]) << 4)) |
391 (((x+4) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+12], data[pixel+13], data[pixel+14]) << 3)) |
392 (((x+5) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+15], data[pixel+16], data[pixel+17]) << 2)) |
393 (((x+6) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+18], data[pixel+19], data[pixel+20]) << 1)) |
394 (((x+7) > width) ? 0 : ((wxUint8)palette->GetPixel(data[pixel+21], data[pixel+22], data[pixel+23]) ));
395 #else
396 // FIXME: what should this be? use some std palette maybe?
397 buffer[x/8] = 0;
398 #endif // wxUSE_PALETTE
399 }
400 }
401 else if ( format == wxBMP_1BPP_BW ) // 1 bpp B&W colormap from red color ONLY
402 {
403 for (x = 0; x < width; x+=8)
404 {
405 pixel = 3*(y*width + x);
406
407 buffer[x/8] =
408 (((wxUint8)(data[pixel] /128.)) << 7) |
409 (((x+1) > width) ? 0 : (((wxUint8)(data[pixel+3] /128.)) << 6)) |
410 (((x+2) > width) ? 0 : (((wxUint8)(data[pixel+6] /128.)) << 5)) |
411 (((x+3) > width) ? 0 : (((wxUint8)(data[pixel+9] /128.)) << 4)) |
412 (((x+4) > width) ? 0 : (((wxUint8)(data[pixel+12]/128.)) << 3)) |
413 (((x+5) > width) ? 0 : (((wxUint8)(data[pixel+15]/128.)) << 2)) |
414 (((x+6) > width) ? 0 : (((wxUint8)(data[pixel+18]/128.)) << 1)) |
415 (((x+7) > width) ? 0 : (((wxUint8)(data[pixel+21]/128.)) ));
416 }
417 }
418
419 if ( !stream.Write(buffer, row_width) )
420 {
421 if (verbose)
422 wxLogError(_("BMP: Couldn't write data."));
423 delete[] buffer;
424 #if wxUSE_PALETTE
425 delete palette;
426 #endif // wxUSE_PALETTE
427 delete q_image;
428 return FALSE;
429 }
430 }
431 delete[] buffer;
432 #if wxUSE_PALETTE
433 delete palette;
434 #endif // wxUSE_PALETTE
435 delete q_image;
436
437 return TRUE;
438 }
439
440
441 typedef struct
442 {
443 unsigned char r, g, b;
444 } _cmap;
445
446 bool wxBMPHandler::DoLoadDib(wxImage * image, int width, int height,
447 int bpp, int ncolors, int comp,
448 off_t bmpOffset, wxInputStream& stream,
449 bool verbose, bool IsBmp, bool hasPalette)
450 {
451 wxInt32 aDword, rmask = 0, gmask = 0, bmask = 0;
452 int rshift = 0, gshift = 0, bshift = 0;
453 wxInt32 dbuf[4];
454 wxInt8 bbuf[4];
455 wxUint8 aByte;
456 wxUint16 aWord;
457
458 // allocate space for palette if needed:
459 _cmap *cmap = NULL;
460
461 if ( bpp < 16 )
462 {
463 cmap = new _cmap[ncolors];
464 if ( !cmap )
465 {
466 if (verbose)
467 wxLogError(_("BMP: Couldn't allocate memory."));
468 return FALSE;
469 }
470 }
471 else
472 cmap = NULL;
473
474 // destroy existing here instead of:
475 image->Destroy();
476 image->Create(width, height);
477
478 unsigned char *ptr = image->GetData();
479
480 if ( !ptr )
481 {
482 if ( verbose )
483 wxLogError( _("BMP: Couldn't allocate memory.") );
484 if ( cmap )
485 delete[] cmap;
486 return FALSE;
487 }
488
489 // Reading the palette, if it exists:
490 if ( bpp < 16 && ncolors != 0 )
491 {
492 unsigned char* r = new unsigned char[ncolors];
493 unsigned char* g = new unsigned char[ncolors];
494 unsigned char* b = new unsigned char[ncolors];
495 for (int j = 0; j < ncolors; j++)
496 {
497 if (hasPalette)
498 {
499 stream.Read(bbuf, 4);
500 cmap[j].b = bbuf[0];
501 cmap[j].g = bbuf[1];
502 cmap[j].r = bbuf[2];
503
504 r[j] = cmap[j].r;
505 g[j] = cmap[j].g;
506 b[j] = cmap[j].b;
507 }
508 else
509 {
510 //used in reading .ico file mask
511 r[j] = cmap[j].r = j * 255;
512 g[j] = cmap[j].g = j * 255;
513 b[j] = cmap[j].b = j * 255;
514 }
515 }
516
517 #if wxUSE_PALETTE
518 // Set the palette for the wxImage
519 image->SetPalette(wxPalette(ncolors, r, g, b));
520 #endif // wxUSE_PALETTE
521
522 delete[] r;
523 delete[] g;
524 delete[] b;
525 }
526 else if ( bpp == 16 || bpp == 32 )
527 {
528 if ( comp == BI_BITFIELDS )
529 {
530 int bit = 0;
531 stream.Read(dbuf, 4 * 3);
532 bmask = wxINT32_SWAP_ON_BE(dbuf[0]);
533 gmask = wxINT32_SWAP_ON_BE(dbuf[1]);
534 rmask = wxINT32_SWAP_ON_BE(dbuf[2]);
535 // find shift amount.. ugly, but i can't think of a better way:
536 for (bit = 0; bit < bpp; bit++)
537 {
538 if (bmask & (1 << bit))
539 bshift = bit;
540 if (gmask & (1 << bit))
541 gshift = bit;
542 if (rmask & (1 << bit))
543 rshift = bit;
544 }
545 }
546 else if ( bpp == 16 )
547 {
548 rmask = 0x7C00;
549 gmask = 0x03E0;
550 bmask = 0x001F;
551 rshift = 10;
552 gshift = 5;
553 bshift = 0;
554 }
555 else if ( bpp == 32 )
556 {
557 rmask = 0x00FF0000;
558 gmask = 0x0000FF00;
559 bmask = 0x000000FF;
560 rshift = 16;
561 gshift = 8;
562 bshift = 0;
563 }
564 }
565
566 /*
567 * Reading the image data
568 */
569 if ( IsBmp )
570 stream.SeekI(bmpOffset); // else icon, just carry on
571
572 unsigned char *data = ptr;
573
574 /* set the whole image to the background color */
575 if ( bpp < 16 && (comp == BI_RLE4 || comp == BI_RLE8) )
576 {
577 for (int i = 0; i < width * height; i++)
578 {
579 *ptr++ = cmap[0].r;
580 *ptr++ = cmap[0].g;
581 *ptr++ = cmap[0].b;
582 }
583 ptr = data;
584 }
585
586 int line = 0;
587 int column = 0;
588 int linesize = ((width * bpp + 31) / 32) * 4;
589
590 /* BMPs are stored upside down */
591 for ( line = (height - 1); line >= 0; line-- )
592 {
593 int linepos = 0;
594 for ( column = 0; column < width; )
595 {
596 if ( bpp < 16 )
597 {
598 int index = 0;
599 linepos++;
600 aByte = stream.GetC();
601 if ( bpp == 1 )
602 {
603 int bit = 0;
604 for (bit = 0; bit < 8 && column < width; bit++)
605 {
606 index = ((aByte & (0x80 >> bit)) ? 1 : 0);
607 ptr[poffset] = cmap[index].r;
608 ptr[poffset + 1] = cmap[index].g;
609 ptr[poffset + 2] = cmap[index].b;
610 column++;
611 }
612 }
613 else if ( bpp == 4 )
614 {
615 if ( comp == BI_RLE4 )
616 {
617 if ( verbose )
618 wxLogError(_("DIB Header: Cannot deal with 4bit encoded yet."));
619 image->Destroy();
620 delete[] cmap;
621 return FALSE;
622 }
623 else
624 {
625 int nibble = 0;
626 for (nibble = 0; nibble < 2 && column < width; nibble++)
627 {
628 index = ((aByte & (0xF0 >> nibble * 4)) >> (!nibble * 4));
629 if ( index >= 16 )
630 index = 15;
631 ptr[poffset] = cmap[index].r;
632 ptr[poffset + 1] = cmap[index].g;
633 ptr[poffset + 2] = cmap[index].b;
634 column++;
635 }
636 }
637 }
638 else if ( bpp == 8 )
639 {
640 if ( comp == BI_RLE8 )
641 {
642 unsigned char first;
643 first = aByte;
644 aByte = stream.GetC();
645 if ( first == 0 )
646 {
647 if ( aByte == 0 )
648 {
649 /* column = width; */
650 }
651 else if ( aByte == 1 )
652 {
653 column = width;
654 line = -1;
655 }
656 else if ( aByte == 2 )
657 {
658 aByte = stream.GetC();
659 column += aByte;
660 linepos = column * bpp / 8;
661 aByte = stream.GetC();
662 line += aByte;
663 }
664 else
665 {
666 int absolute = aByte;
667 for (int k = 0; k < absolute; k++)
668 {
669 linepos++;
670 aByte = stream.GetC();
671 ptr[poffset ] = cmap[aByte].r;
672 ptr[poffset + 1] = cmap[aByte].g;
673 ptr[poffset + 2] = cmap[aByte].b;
674 column++;
675 }
676 if ( absolute & 0x01 )
677 aByte = stream.GetC();
678 }
679 }
680 else
681 {
682 for ( int l = 0; l < first && column < width; l++ )
683 {
684 ptr[poffset ] = cmap[aByte].r;
685 ptr[poffset + 1] = cmap[aByte].g;
686 ptr[poffset + 2] = cmap[aByte].b;
687 column++;
688 linepos++;
689 }
690 }
691 }
692 else
693 {
694 ptr[poffset ] = cmap[aByte].r;
695 ptr[poffset + 1] = cmap[aByte].g;
696 ptr[poffset + 2] = cmap[aByte].b;
697 column++;
698 // linepos += size; seems to be wrong, RR
699 }
700 }
701 }
702 else if ( bpp == 24 )
703 {
704 stream.Read(bbuf, 3);
705 linepos += 3;
706 ptr[poffset ] = (unsigned char)bbuf[2];
707 ptr[poffset + 1] = (unsigned char)bbuf[1];
708 ptr[poffset + 2] = (unsigned char)bbuf[0];
709 column++;
710 }
711 else if ( bpp == 16 )
712 {
713 unsigned char temp;
714 stream.Read(&aWord, 2);
715 aWord = wxUINT16_SWAP_ON_BE(aWord);
716 linepos += 2;
717 temp = (aWord & rmask) >> rshift;
718 ptr[poffset] = temp;
719 temp = (aWord & gmask) >> gshift;
720 ptr[poffset + 1] = temp;
721 temp = (aWord & bmask) >> bshift;
722 ptr[poffset + 2] = temp;
723 column++;
724 }
725 else
726 {
727 unsigned char temp;
728 stream.Read(&aDword, 4);
729 aDword = wxINT32_SWAP_ON_BE(aDword);
730 linepos += 4;
731 temp = (aDword & rmask) >> rshift;
732 ptr[poffset] = temp;
733 temp = (aDword & gmask) >> gshift;
734 ptr[poffset + 1] = temp;
735 temp = (aDword & bmask) >> bshift;
736 ptr[poffset + 2] = temp;
737 column++;
738 }
739 }
740 while ( (linepos < linesize) && (comp != 1) && (comp != 2) )
741 {
742 stream.Read(&aByte, 1);
743 linepos += 1;
744 if ( stream.LastError() != wxStream_NOERROR )
745 break;
746 }
747 }
748 if (cmap)
749 delete[] cmap;
750
751 image->SetMask(FALSE);
752
753 return stream.IsOk();
754 }
755
756 bool wxBMPHandler::LoadDib(wxImage *image, wxInputStream& stream,
757 bool verbose, bool IsBmp)
758 {
759 wxUint16 aWord;
760 wxInt32 dbuf[4];
761 wxInt8 bbuf[4];
762 off_t offset;
763
764 offset = 0; // keep gcc quiet
765 if ( IsBmp )
766 {
767 // read the header off the .BMP format file
768
769 offset = stream.TellI();
770 if (offset == wxInvalidOffset) offset = 0;
771
772 stream.Read(bbuf, 2);
773 stream.Read(dbuf, 16);
774 }
775 else
776 {
777 stream.Read(dbuf, 4);
778 }
779 #if 0 // unused
780 wxInt32 size = wxINT32_SWAP_ON_BE(dbuf[0]);
781 #endif
782 offset = offset + wxINT32_SWAP_ON_BE(dbuf[2]);
783
784 stream.Read(dbuf, 4 * 2);
785 int width = (int)wxINT32_SWAP_ON_BE(dbuf[0]);
786 int height = (int)wxINT32_SWAP_ON_BE(dbuf[1]);
787 if ( !IsBmp)height = height / 2; // for icons divide by 2
788
789 if ( width > 32767 )
790 {
791 if (verbose)
792 wxLogError( _("DIB Header: Image width > 32767 pixels for file.") );
793 return FALSE;
794 }
795 if ( height > 32767 )
796 {
797 if (verbose)
798 wxLogError( _("DIB Header: Image height > 32767 pixels for file.") );
799 return FALSE;
800 }
801
802 stream.Read(&aWord, 2);
803 /*
804 TODO
805 int planes = (int)wxUINT16_SWAP_ON_BE( aWord );
806 */
807 stream.Read(&aWord, 2);
808 int bpp = (int)wxUINT16_SWAP_ON_BE(aWord);
809 if ( bpp != 1 && bpp != 4 && bpp != 8 && bpp != 16 && bpp != 24 && bpp != 32 )
810 {
811 if (verbose)
812 wxLogError( _("DIB Header: Unknown bitdepth in file.") );
813 return FALSE;
814 }
815
816 stream.Read(dbuf, 4 * 4);
817 int comp = (int)wxINT32_SWAP_ON_BE(dbuf[0]);
818 if ( comp != BI_RGB && comp != BI_RLE4 && comp != BI_RLE8 &&
819 comp != BI_BITFIELDS )
820 {
821 if (verbose)
822 wxLogError( _("DIB Header: Unknown encoding in file.") );
823 return FALSE;
824 }
825
826 stream.Read(dbuf, 4 * 2);
827 int ncolors = (int)wxINT32_SWAP_ON_BE( dbuf[0] );
828 if (ncolors == 0)
829 ncolors = 1 << bpp;
830 /* some more sanity checks */
831 if (((comp == BI_RLE4) && (bpp != 4)) ||
832 ((comp == BI_RLE8) && (bpp != 8)) ||
833 ((comp == BI_BITFIELDS) && (bpp != 16 && bpp != 32)))
834 {
835 if (verbose)
836 wxLogError( _("DIB Header: Encoding doesn't match bitdepth.") );
837 return FALSE;
838 }
839
840 //read DIB; this is the BMP image or the XOR part of an icon image
841 if ( !DoLoadDib(image, width, height, bpp, ncolors, comp, offset, stream,
842 verbose, IsBmp, TRUE) )
843 {
844 if (verbose)
845 wxLogError( _("Error in reading image DIB .") );
846 return FALSE;
847 }
848
849 if ( !IsBmp )
850 {
851 //read Icon mask which is monochrome
852 //there is no palette, so we will create one
853 wxImage mask;
854 if ( !DoLoadDib(&mask, width, height, 1, 2, BI_RGB, offset, stream,
855 verbose, IsBmp, FALSE) )
856 {
857 if (verbose)
858 wxLogError( _("ICO: Error in reading mask DIB.") );
859 return FALSE;
860 }
861 image->SetMaskFromImage(mask, 255, 255, 255);
862
863 }
864
865 return TRUE;
866 }
867
868 bool wxBMPHandler::LoadFile(wxImage *image, wxInputStream& stream,
869 bool verbose, int WXUNUSED(index))
870 {
871 // Read a single DIB fom the file:
872 return LoadDib(image, stream, verbose, TRUE/*isBmp*/);
873 }
874
875 bool wxBMPHandler::DoCanRead(wxInputStream& stream)
876 {
877 unsigned char hdr[2];
878
879 stream.Read(hdr, 2);
880 stream.SeekI(-2, wxFromCurrent);
881 return (hdr[0] == 'B' && hdr[1] == 'M');
882 }
883
884
885
886 //-----------------------------------------------------------------------------
887 // wxICOHandler
888 //-----------------------------------------------------------------------------
889
890 IMPLEMENT_DYNAMIC_CLASS(wxICOHandler, wxBMPHandler)
891
892 struct ICONDIRENTRY
893 {
894 wxUint8 bWidth; // Width of the image
895 wxUint8 bHeight; // Height of the image (times 2)
896 wxUint8 bColorCount; // Number of colors in image (0 if >=8bpp)
897 wxUint8 bReserved; // Reserved
898
899 // these two are different in icons and cursors:
900 // icon or cursor
901 wxUint16 wPlanes; // Color Planes or XHotSpot
902 wxUint16 wBitCount; // Bits per pixel or YHotSpot
903
904 wxUint32 dwBytesInRes; // how many bytes in this resource?
905 wxUint32 dwImageOffset; // where in the file is this image
906 };
907
908 struct ICONDIR
909 {
910 wxUint16 idReserved; // Reserved
911 wxUint16 idType; // resource type (1 for icons, 2 for cursors)
912 wxUint16 idCount; // how many images?
913 };
914
915
916 bool wxICOHandler::SaveFile(wxImage *image,
917 wxOutputStream& stream,
918 bool verbose)
919
920 {
921 bool bResult = FALSE;
922 //sanity check; icon must be less than 127 pixels high and 255 wide
923 if ( image->GetHeight () > 127 )
924 {
925 if ( verbose )
926 wxLogError(_("ICO: Image too tall for an icon."));
927 return FALSE;
928 }
929 if ( image->GetWidth () > 255 )
930 {
931 if ( verbose )
932 wxLogError(_("ICO: Image too wide for an icon."));
933 return FALSE;
934 }
935
936 int images = 1; // only generate one image
937
938 // VS: This is a hack of sort - since ICO and CUR files are almost
939 // identical, we have all the meat in wxICOHandler and check for
940 // the actual (handler) type when the code has to distinguish between
941 // the two formats
942 int type = (this->GetType() == wxBITMAP_TYPE_CUR) ? 2 : 1;
943
944 // write a header, (ICONDIR)
945 // Calculate the header size
946 wxUint32 offset = 3 * sizeof(wxUint16);
947
948 ICONDIR IconDir;
949 IconDir.idReserved = 0;
950 IconDir.idType = wxUINT16_SWAP_ON_BE(type);
951 IconDir.idCount = wxUINT16_SWAP_ON_BE(images);
952 stream.Write(&IconDir.idReserved, sizeof(IconDir.idReserved));
953 stream.Write(&IconDir.idType, sizeof(IconDir.idType));
954 stream.Write(&IconDir.idCount, sizeof(IconDir.idCount));
955 if ( !stream.IsOk() )
956 {
957 if ( verbose )
958 wxLogError(_("ICO: Error writing the image file!"));
959 return FALSE;
960 }
961
962 // for each iamage write a description ICONDIRENTRY:
963 ICONDIRENTRY icondirentry;
964 for (int i = 0; i < images; i++)
965 {
966 wxImage mask;
967
968 if ( image->HasMask() )
969 {
970 // make another image with black/white:
971 mask = image->ConvertToMono (image->GetMaskRed(), image->GetMaskGreen(), image->GetMaskBlue() );
972
973 // now we need to change the masked regions to black:
974 unsigned char r = image->GetMaskRed();
975 unsigned char g = image->GetMaskGreen();
976 unsigned char b = image->GetMaskBlue();
977 if ( (r != 0) || (g != 0) || (b != 0) )
978 {
979 // Go round and apply black to the masked bits:
980 int i, j;
981 for (i = 0; i < mask.GetWidth(); i++)
982 {
983 for (j = 0; j < mask.GetHeight(); j++)
984 {
985 if ((r == mask.GetRed(i, j)) &&
986 (g == mask.GetGreen(i, j))&&
987 (b == mask.GetBlue(i, j)) )
988 image->SetRGB(i, j, 0, 0, 0 );
989 }
990 }
991 }
992 }
993 else
994 {
995 // just make a black mask all over:
996 mask = image->Copy();
997 int i, j;
998 for (i = 0; i < mask.GetWidth(); i++)
999 for (j = 0; j < mask.GetHeight(); j++)
1000 mask.SetRGB(i, j, 0, 0, 0 );
1001 }
1002 // Set the formats for image and mask
1003 // (Windows never saves with more than 8 colors):
1004 image->SetOption(wxBMP_FORMAT, wxBMP_8BPP);
1005
1006 // monochome bitmap:
1007 mask.SetOption(wxBMP_FORMAT, wxBMP_1BPP_BW);
1008 bool IsBmp = FALSE;
1009 bool IsMask = FALSE;
1010
1011 //calculate size and offset of image and mask
1012 wxCountingOutputStream cStream;
1013 bResult = SaveDib(image, cStream, verbose, IsBmp, IsMask);
1014 if ( !bResult )
1015 {
1016 if ( verbose )
1017 wxLogError(_("ICO: Error writing the image file!"));
1018 return FALSE;
1019 }
1020 IsMask = TRUE;
1021
1022 bResult = SaveDib(&mask, cStream, verbose, IsBmp, IsMask);
1023 if ( !bResult )
1024 {
1025 if ( verbose )
1026 wxLogError(_("ICO: Error writing the image file!"));
1027 return FALSE;
1028 }
1029 wxUint32 Size = cStream.GetSize();
1030
1031 // wxCountingOutputStream::Ok() always returns TRUE for now and this
1032 // "if" provokes VC++ warnings in optimized build
1033 #if 0
1034 if ( !cStream.Ok() )
1035 {
1036 if ( verbose )
1037 wxLogError(_("ICO: Error writing the image file!"));
1038 return FALSE;
1039 }
1040 #endif // 0
1041
1042 offset = offset + sizeof(ICONDIRENTRY);
1043
1044 icondirentry.bWidth = image->GetWidth();
1045 icondirentry.bHeight = 2 * image->GetHeight();
1046 icondirentry.bColorCount = 0;
1047 icondirentry.bReserved = 0;
1048 icondirentry.wPlanes = wxUINT16_SWAP_ON_BE(1);
1049 icondirentry.wBitCount = wxUINT16_SWAP_ON_BE(wxBMP_8BPP);
1050 if ( type == 2 /*CUR*/)
1051 {
1052 int hx = image->HasOption(wxCUR_HOTSPOT_X) ?
1053 image->GetOptionInt(wxCUR_HOTSPOT_X) :
1054 image->GetWidth() / 2;
1055 int hy = image->HasOption(wxCUR_HOTSPOT_Y) ?
1056 image->GetOptionInt(wxCUR_HOTSPOT_Y) :
1057 image->GetHeight() / 2;
1058
1059 // actually write the values of the hot spot here:
1060 icondirentry.wPlanes = wxUINT16_SWAP_ON_BE((wxUint16)hx);
1061 icondirentry.wBitCount = wxUINT16_SWAP_ON_BE((wxUint16)hy);
1062 }
1063 icondirentry.dwBytesInRes = wxUINT32_SWAP_ON_BE(Size);
1064 icondirentry.dwImageOffset = wxUINT32_SWAP_ON_BE(offset);
1065
1066 // increase size to allow for the data written:
1067 offset += Size;
1068
1069 // write to stream:
1070 stream.Write(&icondirentry.bWidth, sizeof(icondirentry.bWidth));
1071 stream.Write(&icondirentry.bHeight, sizeof(icondirentry.bHeight));
1072 stream.Write(&icondirentry.bColorCount, sizeof(icondirentry.bColorCount));
1073 stream.Write(&icondirentry.bReserved, sizeof(icondirentry.bReserved));
1074 stream.Write(&icondirentry.wPlanes, sizeof(icondirentry.wPlanes));
1075 stream.Write(&icondirentry.wBitCount, sizeof(icondirentry.wBitCount));
1076 stream.Write(&icondirentry.dwBytesInRes, sizeof(icondirentry.dwBytesInRes));
1077 stream.Write(&icondirentry.dwImageOffset, sizeof(icondirentry.dwImageOffset));
1078 if ( !stream.IsOk() )
1079 {
1080 if ( verbose )
1081 wxLogError(_("ICO: Error writing the image file!"));
1082 return FALSE;
1083 }
1084
1085 // actually save it:
1086 IsMask = FALSE;
1087 bResult = SaveDib(image, stream, verbose, IsBmp, IsMask);
1088 if ( !bResult )
1089 {
1090 if ( verbose )
1091 wxLogError(_("ICO: Error writing the image file!"));
1092 return FALSE;
1093 }
1094 IsMask = TRUE;
1095
1096 bResult = SaveDib(&mask, stream, verbose, IsBmp, IsMask);
1097 if ( !bResult )
1098 {
1099 if ( verbose )
1100 wxLogError(_("ICO: Error writing the image file!"));
1101 return FALSE;
1102 }
1103
1104 } // end of for loop
1105
1106 return TRUE;
1107 }
1108
1109 bool wxICOHandler::LoadFile(wxImage *image, wxInputStream& stream,
1110 bool verbose, int index)
1111 {
1112 bool bResult = FALSE;
1113 bool IsBmp = FALSE;
1114
1115 ICONDIR IconDir;
1116 stream.SeekI(0);
1117 stream.Read(&IconDir, sizeof(IconDir));
1118 wxUint16 nIcons = wxUINT16_SWAP_ON_BE(IconDir.idCount);
1119 // nType is 1 for Icons, 2 for Cursors:
1120 wxUint16 nType = wxUINT16_SWAP_ON_BE(IconDir.idType);
1121
1122 // loop round the icons and choose the best one:
1123 ICONDIRENTRY *pIconDirEntry = new ICONDIRENTRY[nIcons];
1124 ICONDIRENTRY *pCurrentEntry = pIconDirEntry;
1125 int wMax = 0;
1126 int colmax = 0;
1127 int iSel = wxNOT_FOUND;
1128
1129 for (int i = 0; i < nIcons; i++ )
1130 {
1131 stream.Read(pCurrentEntry, sizeof(ICONDIRENTRY));
1132 // bHeight and bColorCount are wxUint8
1133 if ( pCurrentEntry->bWidth >= wMax )
1134 {
1135 // see if we have more colors, ==0 indicates > 8bpp:
1136 if ( pCurrentEntry->bColorCount == 0 )
1137 pCurrentEntry->bColorCount = 255;
1138 if ( pCurrentEntry->bColorCount >= colmax )
1139 {
1140 iSel = i;
1141 wMax = pCurrentEntry->bWidth;
1142 colmax = pCurrentEntry->bColorCount;
1143 }
1144 }
1145 pCurrentEntry++;
1146 }
1147
1148 if ( index != -1 )
1149 {
1150 // VS: Note that we *have* to run the loop above even if index != -1, because
1151 // it reads ICONDIRENTRies.
1152 iSel = index;
1153 }
1154
1155 if ( iSel == wxNOT_FOUND || iSel < 0 || iSel >= nIcons )
1156 {
1157 wxLogError(_("ICO: Invalid icon index."));
1158 bResult = FALSE;
1159 }
1160 else
1161 {
1162 // seek to selected icon:
1163 pCurrentEntry = pIconDirEntry + iSel;
1164 stream.SeekI(wxUINT32_SWAP_ON_BE(pCurrentEntry->dwImageOffset), wxFromStart);
1165 bResult = LoadDib(image, stream, TRUE, IsBmp);
1166 if ( bResult && this->GetType() == wxBITMAP_TYPE_CUR && nType == 2 )
1167 {
1168 // it is a cursor, so let's set the hotspot:
1169 image->SetOption(wxCUR_HOTSPOT_X, wxUINT16_SWAP_ON_BE(pCurrentEntry->wPlanes));
1170 image->SetOption(wxCUR_HOTSPOT_Y, wxUINT16_SWAP_ON_BE(pCurrentEntry->wBitCount));
1171 }
1172 }
1173 delete[] pIconDirEntry;
1174 return bResult;
1175 }
1176
1177 int wxICOHandler::GetImageCount(wxInputStream& stream)
1178 {
1179 ICONDIR IconDir;
1180 stream.SeekI(0);
1181 stream.Read(&IconDir, sizeof(IconDir));
1182 wxUint16 nIcons = wxUINT16_SWAP_ON_BE(IconDir.idCount);
1183 return (int)nIcons;
1184 }
1185
1186 bool wxICOHandler::DoCanRead(wxInputStream& stream)
1187 {
1188 unsigned char hdr[4];
1189
1190 stream.SeekI (0);
1191 stream.Read(hdr, 4);
1192 stream.SeekI(-4, wxFromCurrent);
1193 //hdr[2] is one for an icon and two for a cursor
1194 return (hdr[0] == '\0' && hdr[1] == '\0' && hdr[2] == '\1' && hdr[3] == '\0');
1195 }
1196
1197
1198
1199 //-----------------------------------------------------------------------------
1200 // wxCURHandler
1201 //-----------------------------------------------------------------------------
1202
1203 IMPLEMENT_DYNAMIC_CLASS(wxCURHandler, wxICOHandler)
1204
1205 bool wxCURHandler::DoCanRead(wxInputStream& stream)
1206 {
1207 unsigned char hdr[4];
1208
1209 stream.SeekI (0);
1210 stream.Read(hdr, 4);
1211 stream.SeekI(-4, wxFromCurrent);
1212 //hdr[2] is one for an icon and two for a cursor
1213 return (hdr[0] == '\0' && hdr[1] == '\0' && hdr[2] == '\2' && hdr[3] == '\0');
1214 }
1215
1216 #endif // wxUSE_IMAGE && wxUSE_STREAMS
wxWidgets (Impactor)