io-bmp.c 29.2 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

38 39 40 41 42 43
#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.
 */
44
struct BitmapFileHeader {
45 46 47 48
	guint16 magic;
	guint32 file_size;
	guint32 reserved;
	guint32 data_offset;
49 50 51
};

struct BitmapInfoHeader {
52 53 54 55 56 57 58 59 60 61 62
	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;
63
};
64
#endif
65

66
/* Compression values */
67 68 69 70 71 72

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

73 74 75 76 77 78 79 80 81
/* 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;
82

83 84 85
/*

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

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

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

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

/* Progressive loading */

struct bmp_progressive_state {
148
	GdkPixbufModuleSizeFunc size_func;
149 150
	GdkPixbufModulePreparedFunc prepared_func;
	GdkPixbufModuleUpdatedFunc updated_func;
151 152
	gpointer user_data;

153 154
	ReadState read_state;

155 156
	guint LineWidth;
	guint Lines;		/* # of finished lines */
157

158
	guchar *buff;
159 160
	guint BufferSize;
	guint BufferDone;
161 162

	guchar (*Colormap)[3];
163

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


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

178 179 180 181
	/* 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;
182 183 184 185

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

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

193 194 195 196 197
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);
198

Mark Crichton's avatar
Mark Crichton committed
199

200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216
/* 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);
}

217 218 219
static gboolean grow_buffer (struct bmp_progressive_state *State,
                             GError **error)
{
220 221
  guchar *tmp = g_try_realloc (State->buff, State->BufferSize);
  if (!tmp) {
222 223 224 225 226 227 228
    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;
  }
229
  State->buff = tmp;
230 231 232
  return TRUE;
}

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

239
        /* FIXME this is totally unrobust against bogus image data. */
240

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

248 249
#if DUMPBIH
	DumpBIH(BIH);
250
#endif    
251

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

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

277 278 279 280 281 282 283 284 285 286 287 288 289 290
	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;
	}

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

293
	/* Negative heights indicates bottom-down pixelorder */
294 295 296 297 298 299 300 301
	if (State->Header.height < 0) {
		State->Header.height = -State->Header.height;
		State->Header.Negative = 1;
	}
	if (State->Header.width < 0) {
		State->Header.width = -State->Header.width;
		State->Header.Negative = 0;
	}
302

303 304 305
	if (State->Header.width == 0 || State->Header.height == 0 ||
	    (State->Compressed == BI_RLE4 && State->Type != 4)    ||
	    (State->Compressed == BI_RLE8 && State->Type != 8)	  ||
306 307
	    (State->Compressed == BI_BITFIELDS && !(State->Type == 16 || State->Type == 32)) ||
	    State->Compressed > BI_BITFIELDS) {
308 309 310 311
		g_set_error (error,
			     GDK_PIXBUF_ERROR,
			     GDK_PIXBUF_ERROR_CORRUPT_IMAGE,
			     _("BMP image has bogus header data"));
312
		State->read_state = READ_STATE_ERROR;
313 314 315
		return FALSE;
	}

316 317
	if (State->Type == 32)
		State->LineWidth = State->Header.width * 4;
318
	else if (State->Type == 24)
319
		State->LineWidth = State->Header.width * 3;
320 321 322
	else if (State->Type == 16)
		State->LineWidth = State->Header.width * 2;
	else if (State->Type == 8)
323
		State->LineWidth = State->Header.width * 1;
324
	else if (State->Type == 4)
325
		State->LineWidth = (State->Header.width + 1) / 2;
326
	else if (State->Type == 1) {
327 328 329
		State->LineWidth = State->Header.width / 8;
		if ((State->Header.width & 7) != 0)
			State->LineWidth++;
330 331 332 333 334
	} else {
		g_set_error (error,
			     GDK_PIXBUF_ERROR,
			     GDK_PIXBUF_ERROR_CORRUPT_IMAGE,
			     _("BMP image has bogus header data"));
335
		State->read_state = READ_STATE_ERROR;
336
		return FALSE;
337
	}
338

339
	/* Pad to a 32 bit boundary */
340 341
	if (((State->LineWidth % 4) > 0)
	    && (State->Compressed == BI_RGB || State->Compressed == BI_BITFIELDS))
342 343
		State->LineWidth = (State->LineWidth / 4) * 4 + 4;

344
	if (State->pixbuf == NULL) {
345 346 347 348 349 350 351 352 353 354 355 356
		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;
			}
		}

357 358 359
		if (State->Type == 32 || 
		    State->Compressed == BI_RLE4 || 
		    State->Compressed == BI_RLE8)
360
			State->pixbuf =
361 362 363
				gdk_pixbuf_new(GDK_COLORSPACE_RGB, TRUE, 8,
					       (gint) State->Header.width,
					       (gint) State->Header.height);
364 365
		else
			State->pixbuf =
366 367 368 369 370 371 372 373 374
				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"));
375
			State->read_state = READ_STATE_ERROR;
376 377 378
			return FALSE;
			}
		
379 380
		if (State->prepared_func != NULL)
			/* Notify the client that we are ready to go */
Havoc Pennington's avatar
Havoc Pennington committed
381
			(*State->prepared_func) (State->pixbuf, NULL, State->user_data);
382 383 384 385 386 387 388
		
		/* 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);
		}
389
	}
390
	
391
	State->BufferDone = 0;
392 393
	if (State->Type <= 8) {
		State->read_state = READ_STATE_PALETTE;
394
		State->BufferSize = lsb_32 (&BFH[10]) - 14 - State->Header.size; 
395 396
	} else if (State->Compressed == BI_RGB) {
		State->read_state = READ_STATE_DATA;
397
		State->BufferSize = State->LineWidth;
398 399 400
	} else if (State->Compressed == BI_BITFIELDS) {
		State->read_state = READ_STATE_BITMASKS;
		State->BufferSize = 12;
401 402 403 404 405 406 407 408
	} 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;
	}
409

410 411
	if (!grow_buffer (State, error)) 
		return FALSE;
412 413 414 415

        return TRUE;
}

416 417 418
static gboolean DecodeColormap (guchar *buff,
				struct bmp_progressive_state *State,
				GError **error)
419 420
{
	gint i;
421
	gint samples;
422

423 424
	g_assert (State->read_state == READ_STATE_PALETTE);

425 426 427 428 429 430 431 432
	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;
	}

433
	State->Colormap = g_malloc ((1 << State->Header.depth) * sizeof (*State->Colormap));
434
	for (i = 0; i < State->Header.n_colors; i++)
435 436

	{
437 438 439
		State->Colormap[i][0] = buff[i * samples];
		State->Colormap[i][1] = buff[i * samples + 1];
		State->Colormap[i][2] = buff[i * samples + 2];
440 441 442 443 444 445
#ifdef DUMPCMAP
		g_print ("color %d %x %x %x\n", i,
			 State->Colormap[i][0],
			 State->Colormap[i][1],
			 State->Colormap[i][2]);
#endif
446 447
	}

448 449
	State->read_state = READ_STATE_DATA;

450
	State->BufferDone = 0;
451
	if (!(State->Compressed == BI_RGB || State->Compressed == BI_BITFIELDS))
452 453 454
		State->BufferSize = 2;
	else
		State->BufferSize = State->LineWidth;
455 456 457
	
	if (!grow_buffer (State, error))
		return FALSE;
458

459
	return TRUE;
460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477
}

/* 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 */
478 479 480 481
static gboolean
decode_bitmasks (guchar *buf,
		 struct bmp_progressive_state *State, 
		 GError **error)
482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508
{
	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;
509 510 511 512
	if (!grow_buffer (State, error)) 
		return FALSE;

	return TRUE;
513 514
}

515
/*
516 517 518 519 520
 * func - called when we have pixmap created (but no image data)
 * user_data - passed as arg 1 to func
 * return context (opaque to user)
 */

521
static gpointer
522 523 524
gdk_pixbuf__bmp_image_begin_load(GdkPixbufModuleSizeFunc size_func,
                                 GdkPixbufModulePreparedFunc prepared_func,
				 GdkPixbufModuleUpdatedFunc updated_func,
Havoc Pennington's avatar
Havoc Pennington committed
525
                                 gpointer user_data,
Havoc Pennington's avatar
Havoc Pennington committed
526
                                 GError **error)
527 528
{
	struct bmp_progressive_state *context;
529
	
530
	context = g_new0(struct bmp_progressive_state, 1);
531
	context->size_func = size_func;
532 533 534 535
	context->prepared_func = prepared_func;
	context->updated_func = updated_func;
	context->user_data = user_data;

536 537
	context->read_state = READ_STATE_HEADERS;

538 539 540
	context->BufferSize = 26;
	context->buff = g_malloc(26);
	context->BufferDone = 0;
541
	/* 14 for the BitmapFileHeader, 12 for the BitmapImageHeader */
542

543
	context->Colormap = NULL;
544 545 546 547 548 549

	context->Lines = 0;

	context->Type = 0;

	memset(&context->Header, 0, sizeof(struct headerpair));
550
	memset(&context->compr, 0, sizeof(struct bmp_compression_state));
551 552 553


	context->pixbuf = NULL;
554
	
555 556 557 558 559 560 561 562
	return (gpointer) context;
}

/*
 * context - returned from image_begin_load
 *
 * free context, unref gdk_pixbuf
 */
563
static gboolean gdk_pixbuf__bmp_image_stop_load(gpointer data, GError **error)
564 565 566 567
{
	struct bmp_progressive_state *context =
	    (struct bmp_progressive_state *) data;

568 569
        /* FIXME this thing needs to report errors if
         * we have unused image data
570
         */
571
	
572
	g_return_val_if_fail(context != NULL, TRUE);
573

574 575
	if (context->Colormap != NULL)
		g_free(context->Colormap);
576 577

	if (context->pixbuf)
578
		g_object_unref(context->pixbuf);
579

580
	g_free(context->buff);
581
	g_free(context);
582 583

        return TRUE;
584 585 586
}


587 588 589 590 591 592
/*
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)
{
593
	int i;
594 595
	guchar *pixels;
	guchar *src;
596

597 598 599
	if (!context->Header.Negative)
		pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride * (context->Header.height - context->Lines - 1));
600
	else
601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617
		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;
618

619 620 621 622 623 624 625 626 627 628 629 630
		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);
631
			*pixels++ = 0xff;
632 633 634 635 636 637 638 639

			src += 4;
		}
	} else
		for (i = 0; i < context->Header.width; i++) {
			*pixels++ = src[2];
			*pixels++ = src[1];
			*pixels++ = src[0];
640
			*pixels++ = 0xff;
641 642 643

			src += 4;
		}
644 645
}

646 647 648 649 650 651
static void OneLine24(struct bmp_progressive_state *context)
{
	gint X;
	guchar *Pixels;

	X = 0;
652
	if (context->Header.Negative == 0)
653 654 655
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  (context->Header.height - context->Lines - 1));
656
	else
657 658 659
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  context->Lines);
660
	while (X < context->Header.width) {
661 662 663
		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];
664 665 666 667 668
		X++;
	}

}

669 670
static void OneLine16(struct bmp_progressive_state *context)
{
671 672 673
	int i;
	guchar *pixels;
	guchar *src;
674

675 676 677
	if (!context->Header.Negative)
		pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride * (context->Header.height - context->Lines - 1));
678
	else
679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 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
		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);
725 726

			src += 2;
727
		}
728 729
}

730 731 732 733 734 735
static void OneLine8(struct bmp_progressive_state *context)
{
	gint X;
	guchar *Pixels;

	X = 0;
736
	if (context->Header.Negative == 0)
737 738 739
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  (context->Header.height - context->Lines - 1));
740
	else
741 742 743
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  context->Lines);
744 745
	while (X < context->Header.width) {
		Pixels[X * 3 + 0] =
746
		    context->Colormap[context->buff[X]][2];
747
		Pixels[X * 3 + 1] =
748
		    context->Colormap[context->buff[X]][1];
749
		Pixels[X * 3 + 2] =
750
		    context->Colormap[context->buff[X]][0];
751 752 753 754
		X++;
	}
}

755 756 757 758 759 760 761
static void OneLine4(struct bmp_progressive_state *context)
{
	gint X;
	guchar *Pixels;

	X = 0;
	if (context->Header.Negative == 0)
762 763 764
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  (context->Header.height - context->Lines - 1));
765
	else
766 767 768
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  context->Lines);
769 770 771 772

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

773
		Pix = context->buff[X / 2];
774 775

		Pixels[X * 3 + 0] =
776
		    context->Colormap[Pix >> 4][2];
777
		Pixels[X * 3 + 1] =
778
		    context->Colormap[Pix >> 4][1];
779
		Pixels[X * 3 + 2] =
780
		    context->Colormap[Pix >> 4][0];
781 782 783 784
		X++;
		if (X < context->Header.width) {
			/* Handle the other 4 bit pixel only when there is one */
			Pixels[X * 3 + 0] =
785
			    context->Colormap[Pix & 15][2];
786
			Pixels[X * 3 + 1] =
787
			    context->Colormap[Pix & 15][1];
788
			Pixels[X * 3 + 2] =
789
			    context->Colormap[Pix & 15][0];
790 791 792 793 794 795
			X++;
		}
	}

}

796 797 798 799 800 801
static void OneLine1(struct bmp_progressive_state *context)
{
	gint X;
	guchar *Pixels;

	X = 0;
802
	if (context->Header.Negative == 0)
803 804 805
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  (context->Header.height - context->Lines - 1));
806
	else
807 808 809
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  context->Lines);
810
	while (X < context->Header.width) {
811
		gint Bit;
812

813
		Bit = (context->buff[X / 8]) >> (7 - (X & 7));
814
		Bit = Bit & 1;
815 816 817
		Pixels[X * 3 + 0] = context->Colormap[Bit][2];
		Pixels[X * 3 + 1] = context->Colormap[Bit][1];
		Pixels[X * 3 + 2] = context->Colormap[Bit][0];
818 819 820 821 822 823 824
		X++;
	}
}


static void OneLine(struct bmp_progressive_state *context)
{
825
	context->BufferDone = 0;
826 827 828
	if (context->Lines >= context->Header.height)
		return;

829 830
	if (context->Type == 32)
		OneLine32(context);
831
	else if (context->Type == 24)
832
		OneLine24(context);
833
	else if (context->Type == 16)
834
		OneLine16(context);
835
	else if (context->Type == 8)
836
		OneLine8(context);
837
	else if (context->Type == 4)
838
		OneLine4(context);
839
	else if (context->Type == 1)
840
		OneLine1(context);
841 842
	else
		g_assert_not_reached ();
843 844 845 846 847 848

	context->Lines++;

	if (context->updated_func != NULL) {
		(*context->updated_func) (context->pixbuf,
					  0,
849 850 851
					  (context->Header.Negative ?
					   (context->Lines - 1) :
					   (context->Header.height - context->Lines)),
852
					  context->Header.width,
853
					  1,
854
					  context->user_data);
855 856 857 858

	}
}

859 860 861 862 863 864 865 866 867 868 869 870 871 872
#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)
873
{
874 875 876 877 878
	gint i, j;
	gint y;
	guchar c;
	gint idx;

879 880 881 882 883 884 885 886 887 888
	/* 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;
889
		return TRUE;
890
	}
891

892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958