io-bmp.c 29.9 KB
Newer Older
1
/* -*- mode: C; c-file-style: "linux" -*- */
2 3 4
/* GdkPixbuf library - Windows Bitmap image loader
 *
 * Copyright (C) 1999 The Free Software Foundation
Mark Crichton's avatar
Mark Crichton committed
5
 *
6 7 8 9
 * Authors: Arjan van de Ven <arjan@fenrus.demon.nl>
 *          Federico Mena-Quintero <federico@gimp.org>
 *
 * Based on io-ras.c
Mark Crichton's avatar
Mark Crichton committed
10 11
 *
 * This library is free software; you can redistribute it and/or
12
 * modify it under the terms of the GNU Lesser General Public
Mark Crichton's avatar
Mark Crichton committed
13 14 15 16 17 18
 * License as published by the Free Software Foundation; either
 * version 2 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
19
 * Lesser General Public License for more details.
Mark Crichton's avatar
Mark Crichton committed
20
 *
21
 * You should have received a copy of the GNU Lesser General Public
22 23 24
 * License along with this library; if not, write to the
 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 * Boston, MA 02111-1307, USA.
Mark Crichton's avatar
Mark Crichton committed
25 26 27 28
 */

#include <config.h>
#include <stdio.h>
Tor Lillqvist's avatar
Tor Lillqvist committed
29
#ifdef HAVE_UNISTD_H
30
#include <unistd.h>
Tor Lillqvist's avatar
Tor Lillqvist committed
31
#endif
32
#include <string.h>
33 34
#include "gdk-pixbuf-private.h"
#include "gdk-pixbuf-io.h"
35

36 37
#define DUMPBIH 1

38

39

40 41 42 43 44 45
#if 0
/* If these structures were unpacked, they would define the two headers of the
 * BMP file.  After them comes the palette, and then the image data.
 *
 * We do not use these structures; we just keep them here for reference.
 */
46
struct BitmapFileHeader {
47 48 49 50
	guint16 magic;
	guint32 file_size;
	guint32 reserved;
	guint32 data_offset;
51 52 53
};

struct BitmapInfoHeader {
54 55 56 57 58 59 60 61 62 63 64
	guint32 header_size;
	guint32 width;
	guint32 height;
	guint16 planes;
	guint16 bpp;
	guint32 compression;
	guint32 data_size;
	guint32 x_ppm;
	guint32 y_ppm;
	guint32 n_colors;
	guint32 n_important_colors;
65
};
66
#endif
67

68
/* Compression values */
69 70 71 72 73 74

#define BI_RGB 0
#define BI_RLE8 1
#define BI_RLE4 2
#define BI_BITFIELDS 3

75 76 77 78 79 80 81 82 83
/* State machine */
typedef enum {
	READ_STATE_HEADERS,	/* Reading the bitmap file header and bitmap info header */
	READ_STATE_PALETTE,	/* Reading the palette */
	READ_STATE_BITMASKS,	/* Reading the bitmasks for BI_BITFIELDS */
	READ_STATE_DATA,	/* Reading the actual image data */
	READ_STATE_ERROR,	/* An error occurred; further data will be ignored */
	READ_STATE_DONE		/* Done reading the image; further data will be ignored */
} ReadState;
84

85 86 87
/*

DumpBIH printf's the values in a BitmapInfoHeader to the screen, for
88 89 90 91
debugging purposes.

*/
#if DUMPBIH
92
static void DumpBIH(unsigned char *BIH)
93
{
94
	printf("biSize      = %i \n",
95 96
	       (int) (BIH[3] << 24) + (BIH[2] << 16) + (BIH[1] << 8) +
	       (BIH[0]));
97
	printf("biWidth     = %i \n",
98 99
	       (int) (BIH[7] << 24) + (BIH[6] << 16) + (BIH[5] << 8) +
	       (BIH[4]));
100
	printf("biHeight    = %i \n",
101
	       (int) (BIH[11] << 24) + (BIH[10] << 16) + (BIH[9] << 8) +
102
	       (BIH[8]));
103 104
	printf("biPlanes    = %i \n", (int) (BIH[13] << 8) + (BIH[12]));
	printf("biBitCount  = %i \n", (int) (BIH[15] << 8) + (BIH[14]));
105
	printf("biCompress  = %i \n",
106
	       (int) (BIH[19] << 24) + (BIH[18] << 16) + (BIH[17] << 8) +
107 108
	       (BIH[16]));
	printf("biSizeImage = %i \n",
109
	       (int) (BIH[23] << 24) + (BIH[22] << 16) + (BIH[21] << 8) +
110 111
	       (BIH[20]));
	printf("biXPels     = %i \n",
112
	       (int) (BIH[27] << 24) + (BIH[26] << 16) + (BIH[25] << 8) +
113 114
	       (BIH[24]));
	printf("biYPels     = %i \n",
115
	       (int) (BIH[31] << 24) + (BIH[30] << 16) + (BIH[29] << 8) +
116 117
	       (BIH[28]));
	printf("biClrUsed   = %i \n",
118
	       (int) (BIH[35] << 24) + (BIH[34] << 16) + (BIH[33] << 8) +
119 120
	       (BIH[32]));
	printf("biClrImprtnt= %i \n",
121
	       (int) (BIH[39] << 24) + (BIH[38] << 16) + (BIH[37] << 8) +
122 123
	       (BIH[36]));
}
124 125 126
#endif
/* struct headerpair contains the decoded width/height/depth info for
   the current bitmap */
127

128
struct headerpair {
129 130 131
	guint32 size;
	gint32 width;
	gint32 height;
132
	guint depth;
133
	guint Negative;		/* Negative = 1 -> top down BMP,
134
				   Negative = 0 -> bottom up BMP */
135
	guint  n_colors;
136
};
137

138 139
/* Data needed for the "state" during decompression */
struct bmp_compression_state {
140
	gint phase;
141 142 143 144
	gint run;
	gint count;
	gint x, y;
	guchar *p;
145
};
146 147 148 149

/* Progressive loading */

struct bmp_progressive_state {
150
	GdkPixbufModuleSizeFunc size_func;
151 152
	GdkPixbufModulePreparedFunc prepared_func;
	GdkPixbufModuleUpdatedFunc updated_func;
153 154
	gpointer user_data;

155 156
	ReadState read_state;

157 158
	guint LineWidth;
	guint Lines;		/* # of finished lines */
159

160
	guchar *buff;
161 162
	guint BufferSize;
	guint BufferDone;
163 164

	guchar (*Colormap)[3];
165

166
	gint Type;		/*
167
				   32 = RGB + alpha
168
				   24 = RGB
169
				   16 = RGB
170 171
				   4  = 4 bpp colormapped
				   8  = 8 bpp colormapped
172
				   1  = 1 bit bitonal
173
				 */
174
	guint Compressed;
175
	struct bmp_compression_state compr;
176 177 178 179


	struct headerpair Header;	/* Decoded (BE->CPU) header */

180 181 182 183
	/* Bit masks, shift amounts, and significant bits for BI_BITFIELDS coding */
	int r_mask, r_shift, r_bits;
	int g_mask, g_shift, g_bits;
	int b_mask, b_shift, b_bits;
184 185 186 187

	GdkPixbuf *pixbuf;	/* Our "target" */
};

188
static gpointer
189 190 191
gdk_pixbuf__bmp_image_begin_load(GdkPixbufModuleSizeFunc size_func,
                                 GdkPixbufModulePreparedFunc prepared_func,
				 GdkPixbufModuleUpdatedFunc updated_func,
Havoc Pennington's avatar
Havoc Pennington committed
192
                                 gpointer user_data,
Havoc Pennington's avatar
Havoc Pennington committed
193
                                 GError **error);
Federico Mena Quintero's avatar
Federico Mena Quintero committed
194

195 196 197 198 199
static gboolean gdk_pixbuf__bmp_image_stop_load(gpointer data, GError **error);
static gboolean gdk_pixbuf__bmp_image_load_increment(gpointer data,
                                                     const guchar * buf,
                                                     guint size,
                                                     GError **error);
200

Mark Crichton's avatar
Mark Crichton committed
201

202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218
/* Picks up a 32-bit little-endian integer starting at the specified location.
 * Does it by hand instead of dereferencing a simple (gint *) cast due to
 * alignment constraints many platforms.
 */
static int
lsb_32 (guchar *src)
{
	return src[0] | (src[1] << 8) | (src[2] << 16) | (src[3] << 24);
}

/* Same as above, but for 16-bit little-endian integers. */
static short
lsb_16 (guchar *src)
{
	return src[0] | (src[1] << 8);
}

219 220 221
static gboolean grow_buffer (struct bmp_progressive_state *State,
                             GError **error)
{
222 223
  guchar *tmp = g_try_realloc (State->buff, State->BufferSize);
  if (!tmp) {
224 225 226 227 228 229 230
    g_set_error (error,
		 GDK_PIXBUF_ERROR,
		 GDK_PIXBUF_ERROR_INSUFFICIENT_MEMORY,
		 _("Not enough memory to load bitmap image"));
    State->read_state = READ_STATE_ERROR;
    return FALSE;
  }
231
  State->buff = tmp;
232 233 234
  return TRUE;
}

235 236 237
static gboolean DecodeHeader(unsigned char *BFH, unsigned char *BIH,
                             struct bmp_progressive_state *State,
                             GError **error)
238
{
239 240
	gint clrUsed;

241
        /* FIXME this is totally unrobust against bogus image data. */
242

243 244
	if (State->BufferSize < lsb_32 (&BIH[0]) + 14) {
		State->BufferSize = lsb_32 (&BIH[0]) + 14;
245
		if (!grow_buffer (State, error))
Matthias Clasen's avatar
Matthias Clasen committed
246
			return FALSE;
247 248 249
		return TRUE;
	}

250 251
#if DUMPBIH
	DumpBIH(BIH);
252
#endif    
253

254
	State->Header.size = lsb_32 (&BIH[0]);
255
	if (State->Header.size == 40) {
256 257 258 259
		State->Header.width = lsb_32 (&BIH[4]);
		State->Header.height = lsb_32 (&BIH[8]);
		State->Header.depth = lsb_16 (&BIH[14]);
		State->Compressed = lsb_32 (&BIH[16]);
260
	} else if (State->Header.size == 12) {
261 262 263
		State->Header.width = lsb_16 (&BIH[4]);
		State->Header.height = lsb_16 (&BIH[6]);
		State->Header.depth = lsb_16 (&BIH[10]);
264
		State->Compressed = BI_RGB;
265 266 267 268 269
	} else {
		g_set_error (error,
			     GDK_PIXBUF_ERROR,
			     GDK_PIXBUF_ERROR_CORRUPT_IMAGE,
			     _("BMP image has unsupported header size"));
270
		State->read_state = READ_STATE_ERROR;
271 272
		return FALSE;
	}
273

274 275 276 277 278
	if (State->Header.size == 12)
		clrUsed = 1 << State->Header.depth;
	else
		clrUsed = (int) (BIH[35] << 24) + (BIH[34] << 16) + (BIH[33] << 8) + (BIH[32]);

279 280 281 282 283 284 285 286 287 288 289 290 291 292
	if (clrUsed != 0)
		State->Header.n_colors = clrUsed;
	else
            State->Header.n_colors = 1 << State->Header.depth;
	
	if (State->Header.n_colors > 1 << State->Header.depth) {
		g_set_error (error,
			     GDK_PIXBUF_ERROR,
			     GDK_PIXBUF_ERROR_CORRUPT_IMAGE,
			     _("BMP image has bogus header data"));
		State->read_state = READ_STATE_ERROR;
		return FALSE;
	}

293
	State->Type = State->Header.depth;	/* This may be less trivial someday */
294

295
	/* Negative heights indicates bottom-down pixelorder */
296 297 298 299
	if (State->Header.height < 0) {
		State->Header.height = -State->Header.height;
		State->Header.Negative = 1;
	}
300 301 302 303 304 305 306 307 308 309

	if (State->Header.Negative && 
	    (State->Compressed != BI_RGB && State->Compressed != BI_BITFIELDS))
	{
		g_set_error (error,
			     GDK_PIXBUF_ERROR,
			     GDK_PIXBUF_ERROR_CORRUPT_IMAGE,
			     _("Topdown BMP images cannot be compressed"));
		State->read_state = READ_STATE_ERROR;
		return FALSE;
310
	}
311

312
	if (State->Header.width <= 0 || State->Header.height == 0 ||
313 314
	    (State->Compressed == BI_RLE4 && State->Type != 4)    ||
	    (State->Compressed == BI_RLE8 && State->Type != 8)	  ||
315
	    (State->Compressed == BI_BITFIELDS && !(State->Type == 16 || State->Type == 32)) ||
316
	    (State->Compressed > BI_BITFIELDS)) {
317 318 319 320
		g_set_error (error,
			     GDK_PIXBUF_ERROR,
			     GDK_PIXBUF_ERROR_CORRUPT_IMAGE,
			     _("BMP image has bogus header data"));
321
		State->read_state = READ_STATE_ERROR;
322 323 324
		return FALSE;
	}

325 326
	if (State->Type == 32)
		State->LineWidth = State->Header.width * 4;
327
	else if (State->Type == 24)
328
		State->LineWidth = State->Header.width * 3;
329 330 331
	else if (State->Type == 16)
		State->LineWidth = State->Header.width * 2;
	else if (State->Type == 8)
332
		State->LineWidth = State->Header.width * 1;
333
	else if (State->Type == 4)
334
		State->LineWidth = (State->Header.width + 1) / 2;
335
	else if (State->Type == 1) {
336 337 338
		State->LineWidth = State->Header.width / 8;
		if ((State->Header.width & 7) != 0)
			State->LineWidth++;
339 340 341 342 343
	} else {
		g_set_error (error,
			     GDK_PIXBUF_ERROR,
			     GDK_PIXBUF_ERROR_CORRUPT_IMAGE,
			     _("BMP image has bogus header data"));
344
		State->read_state = READ_STATE_ERROR;
345
		return FALSE;
346
	}
347

348
	/* Pad to a 32 bit boundary */
349 350
	if (((State->LineWidth % 4) > 0)
	    && (State->Compressed == BI_RGB || State->Compressed == BI_BITFIELDS))
351 352
		State->LineWidth = (State->LineWidth / 4) * 4 + 4;

353
	if (State->pixbuf == NULL) {
354 355 356 357 358 359 360 361 362 363 364 365
		if (State->size_func) {
			gint width = State->Header.width;
			gint height = State->Header.height;

			(*State->size_func) (&width, &height, State->user_data);
			if (width == 0 || height == 0) {
				State->read_state = READ_STATE_DONE;
				State->BufferSize = 0;
				return TRUE;
			}
		}

366 367 368
		if (State->Type == 32 || 
		    State->Compressed == BI_RLE4 || 
		    State->Compressed == BI_RLE8)
369
			State->pixbuf =
370 371 372
				gdk_pixbuf_new(GDK_COLORSPACE_RGB, TRUE, 8,
					       (gint) State->Header.width,
					       (gint) State->Header.height);
373 374
		else
			State->pixbuf =
375 376 377 378 379 380 381 382 383
				gdk_pixbuf_new(GDK_COLORSPACE_RGB, FALSE, 8,
					       (gint) State->Header.width,
					       (gint) State->Header.height);
		
		if (State->pixbuf == NULL) {
			g_set_error (error,
				     GDK_PIXBUF_ERROR,
				     GDK_PIXBUF_ERROR_INSUFFICIENT_MEMORY,
				     _("Not enough memory to load bitmap image"));
384
			State->read_state = READ_STATE_ERROR;
385 386 387
			return FALSE;
			}
		
388 389
		if (State->prepared_func != NULL)
			/* Notify the client that we are ready to go */
Havoc Pennington's avatar
Havoc Pennington committed
390
			(*State->prepared_func) (State->pixbuf, NULL, State->user_data);
391 392 393 394 395 396 397
		
		/* make all pixels initially transparent */
		if (State->Compressed == BI_RLE4 || State->Compressed == BI_RLE8) {
			memset (State->pixbuf->pixels, 0, State->pixbuf->rowstride * State->Header.height);
			State->compr.p = State->pixbuf->pixels 
				+ State->pixbuf->rowstride * (State->Header.height- 1);
		}
398
	}
399
	
400
	State->BufferDone = 0;
401 402
	if (State->Type <= 8) {
		State->read_state = READ_STATE_PALETTE;
403
		State->BufferSize = lsb_32 (&BFH[10]) - 14 - State->Header.size; 
404
	} else if (State->Compressed == BI_RGB) {
405 406 407 408 409 410 411 412 413 414 415 416
		if (State->BufferSize < lsb_32 (&BFH[10]))
		{
			/* skip over padding between headers and image data */
			State->read_state = READ_STATE_HEADERS;
			State->BufferDone = State->BufferSize;
			State->BufferSize = lsb_32 (&BFH[10]);
		}
		else
		{
			State->read_state = READ_STATE_DATA;
			State->BufferSize = State->LineWidth;
		}
417 418 419
	} else if (State->Compressed == BI_BITFIELDS) {
		State->read_state = READ_STATE_BITMASKS;
		State->BufferSize = 12;
420 421 422 423 424 425 426 427
	} else {
		g_set_error (error,
			     GDK_PIXBUF_ERROR,
			     GDK_PIXBUF_ERROR_CORRUPT_IMAGE,
			     _("BMP image has bogus header data"));
		State->read_state = READ_STATE_ERROR;
		return FALSE;
	}
428

429 430
	if (!grow_buffer (State, error)) 
		return FALSE;
431 432 433 434

        return TRUE;
}

435 436 437
static gboolean DecodeColormap (guchar *buff,
				struct bmp_progressive_state *State,
				GError **error)
438 439
{
	gint i;
440
	gint samples;
441

442 443
	g_assert (State->read_state == READ_STATE_PALETTE);

444 445 446 447 448 449 450 451
	samples = (State->Header.size == 12 ? 3 : 4);
	if (State->BufferSize < State->Header.n_colors * samples) {
		State->BufferSize = State->Header.n_colors * samples;
		if (!grow_buffer (State, error))
			return FALSE;
		return TRUE;
	}

452
	State->Colormap = g_malloc ((1 << State->Header.depth) * sizeof (*State->Colormap));
453
	for (i = 0; i < State->Header.n_colors; i++)
454 455

	{
456 457 458
		State->Colormap[i][0] = buff[i * samples];
		State->Colormap[i][1] = buff[i * samples + 1];
		State->Colormap[i][2] = buff[i * samples + 2];
459 460 461 462 463 464
#ifdef DUMPCMAP
		g_print ("color %d %x %x %x\n", i,
			 State->Colormap[i][0],
			 State->Colormap[i][1],
			 State->Colormap[i][2]);
#endif
465 466
	}

467 468
	State->read_state = READ_STATE_DATA;

469
	State->BufferDone = 0;
470
	if (!(State->Compressed == BI_RGB || State->Compressed == BI_BITFIELDS))
471 472 473
		State->BufferSize = 2;
	else
		State->BufferSize = State->LineWidth;
474 475 476
	
	if (!grow_buffer (State, error))
		return FALSE;
477

478
	return TRUE;
479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496
}

/* Finds the lowest set bit and the number of set bits */
static void
find_bits (int n, int *lowest, int *n_set)
{
	int i;

	*n_set = 0;

	for (i = 31; i >= 0; i--)
		if (n & (1 << i)) {
			*lowest = i;
			(*n_set)++;
		}
}

/* Decodes the 3 shorts that follow for the bitmasks for BI_BITFIELDS coding */
497 498 499 500
static gboolean
decode_bitmasks (guchar *buf,
		 struct bmp_progressive_state *State, 
		 GError **error)
501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527
{
	State->r_mask = buf[0] | (buf[1] << 8) | (buf[2] << 16) | (buf[3] << 24);
	buf += 4;

	State->g_mask = buf[0] | (buf[1] << 8) | (buf[2] << 16) | (buf[3] << 24);
	buf += 4;

	State->b_mask = buf[0] | (buf[1] << 8) | (buf[2] << 16) | (buf[3] << 24);

	find_bits (State->r_mask, &State->r_shift, &State->r_bits);
	find_bits (State->g_mask, &State->g_shift, &State->g_bits);
	find_bits (State->b_mask, &State->b_shift, &State->b_bits);

	if (State->r_bits == 0 || State->g_bits == 0 || State->b_bits == 0) {
		State->r_mask = 0x7c00;
		State->r_shift = 10;
		State->g_mask = 0x03e0;
		State->g_shift = 5;
		State->b_mask = 0x001f;
		State->b_shift = 0;

		State->r_bits = State->g_bits = State->b_bits = 5;
	}

	State->read_state = READ_STATE_DATA;
	State->BufferDone = 0;
	State->BufferSize = State->LineWidth;
528 529 530 531
	if (!grow_buffer (State, error)) 
		return FALSE;

	return TRUE;
532 533
}

534
/*
535 536 537 538 539
 * func - called when we have pixmap created (but no image data)
 * user_data - passed as arg 1 to func
 * return context (opaque to user)
 */

540
static gpointer
541 542 543
gdk_pixbuf__bmp_image_begin_load(GdkPixbufModuleSizeFunc size_func,
                                 GdkPixbufModulePreparedFunc prepared_func,
				 GdkPixbufModuleUpdatedFunc updated_func,
Havoc Pennington's avatar
Havoc Pennington committed
544
                                 gpointer user_data,
Havoc Pennington's avatar
Havoc Pennington committed
545
                                 GError **error)
546 547
{
	struct bmp_progressive_state *context;
548
	
549
	context = g_new0(struct bmp_progressive_state, 1);
550
	context->size_func = size_func;
551 552 553 554
	context->prepared_func = prepared_func;
	context->updated_func = updated_func;
	context->user_data = user_data;

555 556
	context->read_state = READ_STATE_HEADERS;

557 558 559
	context->BufferSize = 26;
	context->buff = g_malloc(26);
	context->BufferDone = 0;
560
	/* 14 for the BitmapFileHeader, 12 for the BitmapImageHeader */
561

562
	context->Colormap = NULL;
563 564 565 566 567 568

	context->Lines = 0;

	context->Type = 0;

	memset(&context->Header, 0, sizeof(struct headerpair));
569
	memset(&context->compr, 0, sizeof(struct bmp_compression_state));
570 571 572


	context->pixbuf = NULL;
573
	
574 575 576 577 578 579 580 581
	return (gpointer) context;
}

/*
 * context - returned from image_begin_load
 *
 * free context, unref gdk_pixbuf
 */
582
static gboolean gdk_pixbuf__bmp_image_stop_load(gpointer data, GError **error)
583 584 585 586
{
	struct bmp_progressive_state *context =
	    (struct bmp_progressive_state *) data;

587 588
        /* FIXME this thing needs to report errors if
         * we have unused image data
589
         */
590
	
591
	g_return_val_if_fail(context != NULL, TRUE);
592

593 594
	if (context->Colormap != NULL)
		g_free(context->Colormap);
595 596

	if (context->pixbuf)
597
		g_object_unref(context->pixbuf);
598

599
	g_free(context->buff);
600
	g_free(context);
601 602

        return TRUE;
603 604 605
}


606 607 608 609 610 611
/*
The OneLineXX functions are called when 1 line worth of data is present.
OneLine24 is the 24 bpp-version.
*/
static void OneLine32(struct bmp_progressive_state *context)
{
612
	int i;
613 614
	guchar *pixels;
	guchar *src;
615

616 617 618
	if (!context->Header.Negative)
		pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride * (context->Header.height - context->Lines - 1));
619
	else
620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636
		pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride * context->Lines);

	src = context->buff;

	if (context->Compressed == BI_BITFIELDS) {
		int r_lshift, r_rshift;
		int g_lshift, g_rshift;
		int b_lshift, b_rshift;

		r_lshift = 8 - context->r_bits;
		g_lshift = 8 - context->g_bits;
		b_lshift = 8 - context->b_bits;

		r_rshift = context->r_bits - r_lshift;
		g_rshift = context->g_bits - g_lshift;
		b_rshift = context->b_bits - b_lshift;
637

638 639 640 641 642 643 644 645 646 647 648 649
		for (i = 0; i < context->Header.width; i++) {
			int v, r, g, b;

			v = src[0] | (src[1] << 8) | (src[2] << 16);

			r = (v & context->r_mask) >> context->r_shift;
			g = (v & context->g_mask) >> context->g_shift;
			b = (v & context->b_mask) >> context->b_shift;

			*pixels++ = (r << r_lshift) | (r >> r_rshift);
			*pixels++ = (g << g_lshift) | (g >> g_rshift);
			*pixels++ = (b << b_lshift) | (b >> b_rshift);
650
			*pixels++ = 0xff;
651 652 653 654 655 656 657 658

			src += 4;
		}
	} else
		for (i = 0; i < context->Header.width; i++) {
			*pixels++ = src[2];
			*pixels++ = src[1];
			*pixels++ = src[0];
659
			*pixels++ = 0xff;
660 661 662

			src += 4;
		}
663 664
}

665 666 667 668 669 670
static void OneLine24(struct bmp_progressive_state *context)
{
	gint X;
	guchar *Pixels;

	X = 0;
671
	if (context->Header.Negative == 0)
672 673 674
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  (context->Header.height - context->Lines - 1));
675
	else
676 677 678
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  context->Lines);
679
	while (X < context->Header.width) {
680 681 682
		Pixels[X * 3 + 0] = context->buff[X * 3 + 2];
		Pixels[X * 3 + 1] = context->buff[X * 3 + 1];
		Pixels[X * 3 + 2] = context->buff[X * 3 + 0];
683 684 685 686 687
		X++;
	}

}

688 689
static void OneLine16(struct bmp_progressive_state *context)
{
690 691 692
	int i;
	guchar *pixels;
	guchar *src;
693

694 695 696
	if (!context->Header.Negative)
		pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride * (context->Header.height - context->Lines - 1));
697
	else
698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743
		pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride * context->Lines);

	src = context->buff;

	if (context->Compressed == BI_BITFIELDS) {
		int r_lshift, r_rshift;
		int g_lshift, g_rshift;
		int b_lshift, b_rshift;

		r_lshift = 8 - context->r_bits;
		g_lshift = 8 - context->g_bits;
		b_lshift = 8 - context->b_bits;

		r_rshift = context->r_bits - r_lshift;
		g_rshift = context->g_bits - g_lshift;
		b_rshift = context->b_bits - b_lshift;

		for (i = 0; i < context->Header.width; i++) {
			int v, r, g, b;

			v = (int) src[0] | ((int) src[1] << 8);

			r = (v & context->r_mask) >> context->r_shift;
			g = (v & context->g_mask) >> context->g_shift;
			b = (v & context->b_mask) >> context->b_shift;

			*pixels++ = (r << r_lshift) | (r >> r_rshift);
			*pixels++ = (g << g_lshift) | (g >> g_rshift);
			*pixels++ = (b << b_lshift) | (b >> b_rshift);

			src += 2;
		}
	} else
		for (i = 0; i < context->Header.width; i++) {
			int v, r, g, b;

			v = src[0] | (src[1] << 8);

			r = (v >> 10) & 0x1f;
			g = (v >> 5) & 0x1f;
			b = v & 0x1f;

			*pixels++ = (r << 3) | (r >> 2);
			*pixels++ = (g << 3) | (g >> 2);
			*pixels++ = (b << 3) | (b >> 2);
744 745

			src += 2;
746
		}
747 748
}

749 750 751 752 753 754
static void OneLine8(struct bmp_progressive_state *context)
{
	gint X;
	guchar *Pixels;

	X = 0;
755
	if (context->Header.Negative == 0)
756 757 758
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  (context->Header.height - context->Lines - 1));
759
	else
760 761 762
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  context->Lines);
763 764
	while (X < context->Header.width) {
		Pixels[X * 3 + 0] =
765
		    context->Colormap[context->buff[X]][2];
766
		Pixels[X * 3 + 1] =
767
		    context->Colormap[context->buff[X]][1];
768
		Pixels[X * 3 + 2] =
769
		    context->Colormap[context->buff[X]][0];
770 771 772 773
		X++;
	}
}

774 775 776 777 778 779 780
static void OneLine4(struct bmp_progressive_state *context)
{
	gint X;
	guchar *Pixels;

	X = 0;
	if (context->Header.Negative == 0)
781 782 783
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  (context->Header.height - context->Lines - 1));
784
	else
785 786 787
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  context->Lines);
788 789 790 791

	while (X < context->Header.width) {
		guchar Pix;

792
		Pix = context->buff[X / 2];
793 794

		Pixels[X * 3 + 0] =
795
		    context->Colormap[Pix >> 4][2];
796
		Pixels[X * 3 + 1] =
797
		    context->Colormap[Pix >> 4][1];
798
		Pixels[X * 3 + 2] =
799
		    context->Colormap[Pix >> 4][0];
800 801 802 803
		X++;
		if (X < context->Header.width) {
			/* Handle the other 4 bit pixel only when there is one */
			Pixels[X * 3 + 0] =
804
			    context->Colormap[Pix & 15][2];
805
			Pixels[X * 3 + 1] =
806
			    context->Colormap[Pix & 15][1];
807
			Pixels[X * 3 + 2] =
808
			    context->Colormap[Pix & 15][0];
809 810 811 812 813 814
			X++;
		}
	}

}

815 816 817 818 819 820
static void OneLine1(struct bmp_progressive_state *context)
{
	gint X;
	guchar *Pixels;

	X = 0;
821
	if (context->Header.Negative == 0)
822 823 824
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  (context->Header.height - context->Lines - 1));
825
	else
826 827 828
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  context->Lines);
829
	while (X < context->Header.width) {
830
		gint Bit;
831

832
		Bit = (context->buff[X / 8]) >> (7 - (X & 7));
833
		Bit = Bit & 1;
834 835 836
		Pixels[X * 3 + 0] = context->Colormap[Bit][2];
		Pixels[X * 3 + 1] = context->Colormap[Bit][1];
		Pixels[X * 3 + 2] = context->Colormap[Bit][0];
837 838 839 840 841 842 843
		X++;
	}
}


static void OneLine(struct bmp_progressive_state *context)
{
844
	context->BufferDone = 0;
845 846 847
	if (context->Lines >= context->Header.height)
		return;

848 849
	if (context->Type == 32)
		OneLine32(context);
850
	else if (context->Type == 24)
851
		OneLine24(context);
852
	else if (context->Type == 16)
853
		OneLine16(context);
854
	else if (context->Type == 8)
855
		OneLine8(context);
856
	else if (context->Type == 4)
857
		OneLine4(context);
858
	else if (context->Type == 1)
859
		OneLine1(context);
860 861
	else
		g_assert_not_reached ();
862 863 864 865

	context->Lines++;

	if (context->updated_func != NULL) {
866 867
		g_print ("OneLine negative %d lines %d\n", 
			 context->Header.Negative, context->Lines);
868 869
		(*context->updated_func) (context->pixbuf,
					  0,
870 871 872
					  (context->Header.Negative ?
					   (context->Lines - 1) :
					   (context->Header.height - context->Lines)),
873
					  context->Header.width,
874
					  1,
875
					  context->user_data);
876 877 878 879

	}
}

880 881 882 883 884 885 886 887 888 889 890 891 892 893
#define NEUTRAL       0
#define ENCODED       1
#define ESCAPE        2   
#define DELTA_X       3
#define DELTA_Y       4
#define ABSOLUTE      5
#define SKIP          6

#define END_OF_LINE   0
#define END_OF_BITMAP 1
#define DELTA         2

static gboolean 
DoCompressed(struct bmp_progressive_state *context, GError **error)
894
{
895 896 897 898 899
	gint i, j;
	gint y;
	guchar c;
	gint idx;

900 901 902 903 904 905 906 907 908 909
	/* context->compr.y might be past the last line because we are
	 * on padding past the end of a valid data, or we might have hit
	 * out-of-bounds data. Either way we just eat-and-ignore the
	 * rest of the file. Doing the check only here and not when
	 * we change y below is fine since BufferSize is always 2 here
	 * and the BMP file format always starts new data on 16-bit
	 * boundaries.
	 */
	if (context->compr.y >= context->Header.height) {
		context->BufferDone = 0;
910
		return TRUE;
911
	}
912

Matthias Clasen's avatar