io-bmp.c 27.1 KB
Newer Older
1 2 3
/* GdkPixbuf library - Windows Bitmap image loader
 *
 * Copyright (C) 1999 The Free Software Foundation
Mark Crichton's avatar
Mark Crichton committed
4
 *
5 6 7 8
 * 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
9 10
 *
 * This library is free software; you can redistribute it and/or
11
 * modify it under the terms of the GNU Lesser General Public
Mark Crichton's avatar
Mark Crichton committed
12 13 14 15 16 17
 * 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
18
 * Lesser General Public License for more details.
Mark Crichton's avatar
Mark Crichton committed
19
 *
20
 * You should have received a copy of the GNU Lesser General Public
21 22 23
 * 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
24 25 26 27
 */

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

35

36

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

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

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

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

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

82 83 84
/*

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

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

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

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

/* Progressive loading */

struct bmp_progressive_state {
	ModulePreparedNotifyFunc prepared_func;
	ModuleUpdatedNotifyFunc updated_func;
	gpointer user_data;

150 151
	ReadState read_state;

152 153
	guint LineWidth;
	guint Lines;		/* # of finished lines */
154

155 156 157 158 159
	guchar *buff;
	gint BufferSize;
	gint BufferDone;

	guchar (*Colormap)[3];
160

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


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

175 176 177 178
	/* 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;
179 180 181 182

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

183
static gpointer
184 185
gdk_pixbuf__bmp_image_begin_load(ModuleSizeFunc size_func,
                                 ModulePreparedNotifyFunc prepared_func,
Federico Mena Quintero's avatar
Federico Mena Quintero committed
186
				 ModuleUpdatedNotifyFunc updated_func,
Havoc Pennington's avatar
Havoc Pennington committed
187
                                 gpointer user_data,
Havoc Pennington's avatar
Havoc Pennington committed
188
                                 GError **error);
Federico Mena Quintero's avatar
Federico Mena Quintero committed
189

190 191 192 193 194
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);
195

Mark Crichton's avatar
Mark Crichton committed
196

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

214 215 216 217 218 219 220 221 222 223 224 225 226 227 228
static gboolean grow_buffer (struct bmp_progressive_state *State,
                             GError **error)
{
  State->buff = g_try_realloc (State->buff, State->BufferSize);
  if (State->buff == NULL) {
    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;
  }
  return TRUE;
}

229 230 231
static gboolean DecodeHeader(unsigned char *BFH, unsigned char *BIH,
                             struct bmp_progressive_state *State,
                             GError **error)
232
{
233
        /* FIXME this is totally unrobust against bogus image data. */
234

235 236
	if (State->BufferSize < lsb_32 (&BIH[0]) + 14) {
		State->BufferSize = lsb_32 (&BIH[0]) + 14;
237
		if (!grow_buffer (State, error))
Matthias Clasen's avatar
Matthias Clasen committed
238
			return FALSE;
239 240 241
		return TRUE;
	}

242 243 244 245
#if DUMPBIH
	DumpBIH(BIH);
#endif

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

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

268
	/* Negative heights indicates bottom-down pixelorder */
269 270 271 272 273 274 275 276
	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;
	}
277

278 279 280
	if (State->Header.width == 0 || State->Header.height == 0 ||
	    (State->Compressed == BI_RLE4 && State->Type != 4)    ||
	    (State->Compressed == BI_RLE8 && State->Type != 8)	  ||
281 282
	    (State->Compressed == BI_BITFIELDS && !(State->Type == 16 || State->Type == 32)) ||
	    State->Compressed > BI_BITFIELDS) {
283 284 285 286
		g_set_error (error,
			     GDK_PIXBUF_ERROR,
			     GDK_PIXBUF_ERROR_CORRUPT_IMAGE,
			     _("BMP image has bogus header data"));
287
		State->read_state = READ_STATE_ERROR;
288 289 290
		return FALSE;
	}

291 292
	if (State->Type == 32)
		State->LineWidth = State->Header.width * 4;
293
	else if (State->Type == 24)
294
		State->LineWidth = State->Header.width * 3;
295 296 297
	else if (State->Type == 16)
		State->LineWidth = State->Header.width * 2;
	else if (State->Type == 8)
298
		State->LineWidth = State->Header.width * 1;
299
	else if (State->Type == 4)
300
		State->LineWidth = (State->Header.width + 1) / 2;
301
	else if (State->Type == 1) {
302 303 304
		State->LineWidth = State->Header.width / 8;
		if ((State->Header.width & 7) != 0)
			State->LineWidth++;
305 306 307 308 309
	} else {
		g_set_error (error,
			     GDK_PIXBUF_ERROR,
			     GDK_PIXBUF_ERROR_CORRUPT_IMAGE,
			     _("BMP image has bogus header data"));
310
		State->read_state = READ_STATE_ERROR;
311
		return FALSE;
312
	}
313

314
	/* Pad to a 32 bit boundary */
315 316
	if (((State->LineWidth % 4) > 0)
	    && (State->Compressed == BI_RGB || State->Compressed == BI_BITFIELDS))
317 318
		State->LineWidth = (State->LineWidth / 4) * 4 + 4;

319
	if (State->pixbuf == NULL) {
320 321 322
		if (State->Type == 32 || 
		    State->Compressed == BI_RLE4 || 
		    State->Compressed == BI_RLE8)
323
			State->pixbuf =
324
			    gdk_pixbuf_new(GDK_COLORSPACE_RGB, TRUE, 8,
325 326 327 328
					   (gint) State->Header.width,
					   (gint) State->Header.height);
		else
			State->pixbuf =
329
			    gdk_pixbuf_new(GDK_COLORSPACE_RGB, FALSE, 8,
330 331
					   (gint) State->Header.width,
					   (gint) State->Header.height);
332

333 334 335 336 337
                if (State->pixbuf == NULL) {
                        g_set_error (error,
                                     GDK_PIXBUF_ERROR,
                                     GDK_PIXBUF_ERROR_INSUFFICIENT_MEMORY,
                                     _("Not enough memory to load bitmap image"));
338
			State->read_state = READ_STATE_ERROR;
339
                        return FALSE;
340
                }
341

342 343
		if (State->prepared_func != NULL)
			/* Notify the client that we are ready to go */
Havoc Pennington's avatar
Havoc Pennington committed
344
			(*State->prepared_func) (State->pixbuf, NULL, State->user_data);
345 346

	}
347 348 349 350 351 352
	
	/* 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);
353 354 355
	}

	State->BufferDone = 0;
356 357
	if (State->Type <= 8) {
		State->read_state = READ_STATE_PALETTE;
358
		State->BufferSize = lsb_32 (&BFH[10]) - 14 - State->Header.size; 
359 360
	} else if (State->Compressed == BI_RGB) {
		State->read_state = READ_STATE_DATA;
361
		State->BufferSize = State->LineWidth;
362 363 364
	} else if (State->Compressed == BI_BITFIELDS) {
		State->read_state = READ_STATE_BITMASKS;
		State->BufferSize = 12;
365 366 367 368 369 370 371 372
	} 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;
	}
373

374 375
	if (!grow_buffer (State, error)) 
		return FALSE;
376 377 378 379

        return TRUE;
}

380 381 382
static gboolean DecodeColormap (guchar *buff,
				struct bmp_progressive_state *State,
				GError **error)
383 384 385
{
	gint i;

386 387
	g_assert (State->read_state == READ_STATE_PALETTE);

388 389 390 391 392 393 394
	State->Colormap = g_malloc ((1 << State->Header.depth) * sizeof (*State->Colormap));

	for (i = 0; i < (1 << State->Header.depth); i++)
	{
		State->Colormap[i][0] = buff[i * (State->Header.size == 12 ? 3 : 4)];
		State->Colormap[i][1] = buff[i * (State->Header.size == 12 ? 3 : 4) + 1];
		State->Colormap[i][2] = buff[i * (State->Header.size == 12 ? 3 : 4) + 2];
395 396 397 398 399 400
#ifdef DUMPCMAP
		g_print ("color %d %x %x %x\n", i,
			 State->Colormap[i][0],
			 State->Colormap[i][1],
			 State->Colormap[i][2]);
#endif
401 402
	}

403 404
	State->read_state = READ_STATE_DATA;

405
	State->BufferDone = 0;
406
	if (!(State->Compressed == BI_RGB || State->Compressed == BI_BITFIELDS))
407 408 409
		State->BufferSize = 2;
	else
		State->BufferSize = State->LineWidth;
410 411 412
	
	if (!grow_buffer (State, error))
		return FALSE;
413

414
	return TRUE;
415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432
}

/* 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 */
433 434 435 436
static gboolean
decode_bitmasks (guchar *buf,
		 struct bmp_progressive_state *State, 
		 GError **error)
437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463
{
	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;
464 465 466 467
	if (!grow_buffer (State, error)) 
		return FALSE;

	return TRUE;
468 469
}

470
/*
471 472 473 474 475
 * func - called when we have pixmap created (but no image data)
 * user_data - passed as arg 1 to func
 * return context (opaque to user)
 */

476
static gpointer
477 478
gdk_pixbuf__bmp_image_begin_load(ModuleSizeFunc size_func,
                                 ModulePreparedNotifyFunc prepared_func,
Federico Mena Quintero's avatar
Federico Mena Quintero committed
479
				 ModuleUpdatedNotifyFunc updated_func,
Havoc Pennington's avatar
Havoc Pennington committed
480
                                 gpointer user_data,
Havoc Pennington's avatar
Havoc Pennington committed
481
                                 GError **error)
482 483 484 485 486 487 488 489
{
	struct bmp_progressive_state *context;

	context = g_new0(struct bmp_progressive_state, 1);
	context->prepared_func = prepared_func;
	context->updated_func = updated_func;
	context->user_data = user_data;

490 491
	context->read_state = READ_STATE_HEADERS;

492 493 494
	context->BufferSize = 26;
	context->buff = g_malloc(26);
	context->BufferDone = 0;
495
	/* 14 for the BitmapFileHeader, 12 for the BitmapImageHeader */
496

497
	context->Colormap = NULL;
498 499 500 501 502 503

	context->Lines = 0;

	context->Type = 0;

	memset(&context->Header, 0, sizeof(struct headerpair));
504
	memset(&context->compr, 0, sizeof(struct bmp_compression_state));
505 506 507 508 509 510 511 512 513 514 515 516 517


	context->pixbuf = NULL;


	return (gpointer) context;
}

/*
 * context - returned from image_begin_load
 *
 * free context, unref gdk_pixbuf
 */
518
static gboolean gdk_pixbuf__bmp_image_stop_load(gpointer data, GError **error)
519 520 521 522
{
	struct bmp_progressive_state *context =
	    (struct bmp_progressive_state *) data;

523 524
        /* FIXME this thing needs to report errors if
         * we have unused image data
525
         */
526

527
	g_return_val_if_fail(context != NULL, TRUE);
528

529 530
	if (context->Colormap != NULL)
		g_free(context->Colormap);
531 532

	if (context->pixbuf)
533
		g_object_unref(context->pixbuf);
534

535
	g_free(context->buff);
536
	g_free(context);
537 538

        return TRUE;
539 540 541
}


542 543 544 545 546 547
/*
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)
{
548
	int i;
549 550
	guchar *pixels;
	guchar *src;
551

552 553 554
	if (!context->Header.Negative)
		pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride * (context->Header.height - context->Lines - 1));
555
	else
556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572
		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;
573

574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598
		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);
			*pixels++ = src[3]; /* alpha */

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

			src += 4;
		}
599 600
}

601 602 603 604 605 606
static void OneLine24(struct bmp_progressive_state *context)
{
	gint X;
	guchar *Pixels;

	X = 0;
607
	if (context->Header.Negative == 0)
608 609 610
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  (context->Header.height - context->Lines - 1));
611
	else
612 613 614
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  context->Lines);
615
	while (X < context->Header.width) {
616 617 618
		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];
619 620 621 622 623
		X++;
	}

}

624 625
static void OneLine16(struct bmp_progressive_state *context)
{
626 627 628
	int i;
	guchar *pixels;
	guchar *src;
629

630 631 632
	if (!context->Header.Negative)
		pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride * (context->Header.height - context->Lines - 1));
633
	else
634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679
		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);
680 681

			src += 2;
682
		}
683 684
}

685 686 687 688 689 690
static void OneLine8(struct bmp_progressive_state *context)
{
	gint X;
	guchar *Pixels;

	X = 0;
691
	if (context->Header.Negative == 0)
692 693 694
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  (context->Header.height - context->Lines - 1));
695
	else
696 697 698
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  context->Lines);
699 700
	while (X < context->Header.width) {
		Pixels[X * 3 + 0] =
701
		    context->Colormap[context->buff[X]][2];
702
		Pixels[X * 3 + 1] =
703
		    context->Colormap[context->buff[X]][1];
704
		Pixels[X * 3 + 2] =
705
		    context->Colormap[context->buff[X]][0];
706 707 708 709
		X++;
	}
}

710 711 712 713 714 715 716
static void OneLine4(struct bmp_progressive_state *context)
{
	gint X;
	guchar *Pixels;

	X = 0;
	if (context->Header.Negative == 0)
717 718 719
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  (context->Header.height - context->Lines - 1));
720
	else
721 722 723
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  context->Lines);
724 725 726 727

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

728
		Pix = context->buff[X / 2];
729 730

		Pixels[X * 3 + 0] =
731
		    context->Colormap[Pix >> 4][2];
732
		Pixels[X * 3 + 1] =
733
		    context->Colormap[Pix >> 4][1];
734
		Pixels[X * 3 + 2] =
735
		    context->Colormap[Pix >> 4][0];
736 737 738 739
		X++;
		if (X < context->Header.width) {
			/* Handle the other 4 bit pixel only when there is one */
			Pixels[X * 3 + 0] =
740
			    context->Colormap[Pix & 15][2];
741
			Pixels[X * 3 + 1] =
742
			    context->Colormap[Pix & 15][1];
743
			Pixels[X * 3 + 2] =
744
			    context->Colormap[Pix & 15][0];
745 746 747 748 749 750
			X++;
		}
	}

}

751 752 753 754 755 756
static void OneLine1(struct bmp_progressive_state *context)
{
	gint X;
	guchar *Pixels;

	X = 0;
757
	if (context->Header.Negative == 0)
758 759 760
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  (context->Header.height - context->Lines - 1));
761
	else
762 763 764
		Pixels = (context->pixbuf->pixels +
			  context->pixbuf->rowstride *
			  context->Lines);
765
	while (X < context->Header.width) {
766
		gint Bit;
767

768
		Bit = (context->buff[X / 8]) >> (7 - (X & 7));
769
		Bit = Bit & 1;
770 771 772
		Pixels[X * 3 + 0] = context->Colormap[Bit][2];
		Pixels[X * 3 + 1] = context->Colormap[Bit][1];
		Pixels[X * 3 + 2] = context->Colormap[Bit][0];
773 774 775 776 777 778 779
		X++;
	}
}


static void OneLine(struct bmp_progressive_state *context)
{
780
	context->BufferDone = 0;
781 782 783
	if (context->Lines >= context->Header.height)
		return;

784 785
	if (context->Type == 32)
		OneLine32(context);
786
	else if (context->Type == 24)
787
		OneLine24(context);
788
	else if (context->Type == 16)
789
		OneLine16(context);
790
	else if (context->Type == 8)
791
		OneLine8(context);
792
	else if (context->Type == 4)
793
		OneLine4(context);
794
	else if (context->Type == 1)
795
		OneLine1(context);
796 797
	else
		g_assert_not_reached ();
798 799 800 801 802 803 804 805

	context->Lines++;

	if (context->updated_func != NULL) {
		(*context->updated_func) (context->pixbuf,
					  0,
					  context->Lines,
					  context->Header.width,
806
					  2,
807
					  context->user_data);
808 809 810 811

	}
}

812 813 814 815 816 817 818 819 820 821 822 823 824 825
#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)
826
{
827 828 829 830 831 832 833
	gint i, j;
	gint y;
	guchar c;
	gint idx;

	if (context->compr.y >= context->Header.height)
		return TRUE;
834

835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 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
	y = context->compr.y;

 	for (i = 0; i < context->BufferSize; i++) {
		c = context->buff[i];
		switch (context->compr.phase) {
		    case NEUTRAL:
			    if (c) {
				    context->compr.run = c;
				    context->compr.phase = ENCODED;
			    }
			    else
				    context->compr.phase = ESCAPE;
			    break;
		    case ENCODED:
			    for (j = 0; j < context->compr.run; j++) {
				    if (context->Compressed == BI_RLE8)
					    idx = c;
				    else if (j & 1) 
					    idx = c & 0x0f;
				    else 
					    idx = (c >> 4) & 0x0f;
				    if (context->compr.x < context->Header.width) {
					    *context->compr.p++ = context->Colormap[idx][2];
					    *context->compr.p++ = context->Colormap[idx][1];
					    *context->compr.p++ = context->Colormap[idx][0];
					    *context->compr.p++ = 0xff;
					    context->compr.x++;    
				    }
			    }
			    context->compr.phase = NEUTRAL;
			    break;
		    case ESCAPE:
			    switch (c) {
				case END_OF_LINE:
					context->compr.x = 0;
					context->compr.y++;
					context->compr.p = context->pixbuf->pixels 
						+ (context->pixbuf->rowstride * (context->Header.height - context->compr.y - 1))
						+ (4 * context->compr.x);
					context->compr.phase = NEUTRAL;
					break;
				case END_OF_BITMAP:
					context->compr.x = 0;
					context->compr.y = context->Header.height;
					context->compr.phase = NEUTRAL;
					break;
				case DELTA:
					context->compr.phase = DELTA_X;
					break;
				default:
					context->compr.run = c;
					context->compr.count = 0;
					context->compr.phase = ABSOLUTE;
					break;
			    }
			    break;
		    case DELTA_X:
			    context->compr.x += c;
			    context->compr.phase = DELTA_Y;
			    break;
		    case DELTA_Y:
			    context->compr.y += c;
			    context->compr.p = context->pixbuf->pixels 
				    + (context->pixbuf->rowstride * (context->Header.height - context->compr.y - 1))
				    + (4 * context->compr.x);
			    context->compr.phase = NEUTRAL;
			    break;
		    case ABSOLUTE:
			    if (context->Compressed == BI_RLE8) {
				    idx = c;
				    if (context->compr.x < context->Header.width) {
					    *context->compr.p++ = context->Colormap[idx][2];
					    *context->compr.p++ = context->Colormap[idx][1];
					    *context->compr.p++ = context->Colormap[idx][0];
					    *context->compr.p++ = 0xff;
					    context->compr.x++;    
				    }
				    context->compr.count++;

				    if (context->compr.count == context->compr.run) {
					    if (context->compr.run & 1)
						    context->compr.phase = SKIP;
					    else
						    context->compr.phase = NEUTRAL;
				    }
			    }
			    else {
				    for (j = 0; j < 2; j++) {
					    if (context->compr.count & 1)
						    idx = c & 0x0f;
					    else 
						    idx = (c >> 4) & 0x0f;
					    if (context->compr.x < context->Header.width) {
						    *context->compr.p++ = context->Colormap[idx][2];
						    *context->compr.p++ = context->Colormap[idx][1];
						    *context->compr.p++ = context->Colormap[idx][0];
						    *context->compr.p++ = 0xff;
						    context->compr.x++;    
					    }
					    context->compr.count++;

					    if (context->compr.count == context->compr.run) {
						    if ((context->compr.run & 3) == 1
							|| (context->compr.run & 3) == 2) 
							    context->compr.phase = SKIP;
						    else
							    context->compr.phase = NEUTRAL;
						    break;
					    }
				    }
			    }
			    break;
		    case SKIP:
			    context->compr.phase = NEUTRAL;
			    break;
950
		}
951
	}
952 953 954 955 956 957 958 959 960 961 962 963 964
	if (context->updated_func != NULL) {
		if (context->compr.y > y)
			(*context->updated_func) (context->pixbuf,
						  0,
						  y,
						  context->Header.width,
						  context->compr.y - y,
						  context->user_data);

	}

	context->BufferDone = 0;
	return TRUE;
965 966
}

967 968 969 970 971 972 973
/*
 * context - from image_begin_load
 * buf - new image data
 * size - length of new image data
 *
 * append image data onto inrecrementally built output image
 */
974 975 976 977 978
static gboolean
gdk_pixbuf__bmp_image_load_increment(gpointer data,
                                     const guchar * buf,
                                     guint size,
                                     GError **error)
979 980 981 982 983 984
{
	struct bmp_progressive_state *context =
	    (struct bmp_progressive_state *) data;

	gint BytesToCopy;

985 986 987 988 989
	if (context->read_state == READ_STATE_DONE)
		return TRUE;
	else if (context->read_state == READ_STATE_ERROR)
		return FALSE;

990
	while (size > 0) {
991
		if (context->BufferDone < context->BufferSize) {	/* We still
992 993
									   have headerbytes to do */
			BytesToCopy =