gdkimage-win32.c 15.8 KB
Newer Older
Tor Lillqvist's avatar
Tor Lillqvist committed
1 2 3 4
/* GDK - The GIMP Drawing Kit
 * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
 *
 * This library is free software; you can redistribute it and/or
5
 * modify it under the terms of the GNU Lesser General Public
Tor Lillqvist's avatar
Tor Lillqvist committed
6 7 8 9 10 11
 * 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
12
 * Lesser General Public License for more details.
Tor Lillqvist's avatar
Tor Lillqvist committed
13
 *
14
 * You should have received a copy of the GNU Lesser General Public
Tor Lillqvist's avatar
Tor Lillqvist committed
15 16 17 18 19 20
 * License along with this library; if not, write to the
 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 * Boston, MA 02111-1307, USA.
 */

/*
21
 * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
Tor Lillqvist's avatar
Tor Lillqvist committed
22 23 24 25 26 27 28 29
 * file for a list of people on the GTK+ Team.  See the ChangeLog
 * files for a list of changes.  These files are distributed with
 * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
 */

#include "config.h"

#include "gdkimage.h"
Tor Lillqvist's avatar
Tor Lillqvist committed
30
#include "gdkpixmap.h"
31 32
#include "gdkinternals.h"
#include "gdkprivate-win32.h"
Tor Lillqvist's avatar
Tor Lillqvist committed
33 34 35
#include "gdkdrawable-win32.h"
#include "gdkwindow-win32.h"
#include "gdkpixmap-win32.h"
36

Tor Lillqvist's avatar
Tor Lillqvist committed
37
static GList *image_list = NULL;
38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99
static gpointer parent_class = NULL;

static void gdk_win32_image_destroy (GdkImage      *image);
static void gdk_image_init          (GdkImage      *image);
static void gdk_image_class_init    (GdkImageClass *klass);
static void gdk_image_finalize      (GObject       *object);

#define PRIVATE_DATA(image) ((GdkImagePrivateWin32 *) GDK_IMAGE (image)->windowing_data)

GType
gdk_image_get_type (void)
{
  static GType object_type = 0;

  if (!object_type)
    {
      static const GTypeInfo object_info =
      {
        sizeof (GdkImageClass),
        (GBaseInitFunc) NULL,
        (GBaseFinalizeFunc) NULL,
        (GClassInitFunc) gdk_image_class_init,
        NULL,           /* class_finalize */
        NULL,           /* class_data */
        sizeof (GdkImage),
        0,              /* n_preallocs */
        (GInstanceInitFunc) gdk_image_init,
      };
      
      object_type = g_type_register_static (G_TYPE_OBJECT,
                                            "GdkImage",
                                            &object_info);
    }
  
  return object_type;
}

static void
gdk_image_init (GdkImage *image)
{
  image->windowing_data = g_new0 (GdkImagePrivateWin32, 1);
}

static void
gdk_image_class_init (GdkImageClass *klass)
{
  GObjectClass *object_class = G_OBJECT_CLASS (klass);

  parent_class = g_type_class_peek_parent (klass);

  object_class->finalize = gdk_image_finalize;
}

static void
gdk_image_finalize (GObject *object)
{
  GdkImage *image = GDK_IMAGE (object);

  gdk_win32_image_destroy (image);
  
  G_OBJECT_CLASS (parent_class)->finalize (object);
}
Tor Lillqvist's avatar
Tor Lillqvist committed
100 101 102 103 104 105 106 107 108

void
gdk_image_exit (void)
{
  GdkImage *image;

  while (image_list)
    {
      image = image_list->data;
109
      gdk_win32_image_destroy (image);
Tor Lillqvist's avatar
Tor Lillqvist committed
110 111 112 113
    }
}

GdkImage *
114 115 116 117
gdk_image_new_bitmap (GdkVisual *visual,
		      gpointer   data,
		      gint       w,
		      gint       h)
Tor Lillqvist's avatar
Tor Lillqvist committed
118 119 120 121 122 123
/*
 * Desc: create a new bitmap image
 */
{
  Visual *xvisual;
  GdkImage *image;
124
  GdkImagePrivateWin32 *private;
Tor Lillqvist's avatar
Tor Lillqvist committed
125 126 127 128 129 130 131 132 133 134 135
  struct {
    BITMAPINFOHEADER bmiHeader;
    union {
      WORD bmiIndices[2];
      RGBQUAD bmiColors[2];
    } u;
  } bmi;
  char *bits;
  int bpl = (w-1)/8 + 1;
  int bpl32 = ((w-1)/32 + 1)*4;

Tor Lillqvist's avatar
Tor Lillqvist committed
136 137
  image = g_object_new (gdk_image_get_type (), NULL);
  private = PRIVATE_DATA (image);
138

Tor Lillqvist's avatar
Tor Lillqvist committed
139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169
  image->type = GDK_IMAGE_SHARED;
  image->visual = visual;
  image->width = w;
  image->height = h;
  image->depth = 1;
  xvisual = ((GdkVisualPrivate*) visual)->xvisual;

  GDK_NOTE (MISC, g_print ("gdk_image_new_bitmap: %dx%d\n", w, h));
  
  bmi.bmiHeader.biSize = sizeof (BITMAPINFOHEADER);
  bmi.bmiHeader.biWidth = w;
  bmi.bmiHeader.biHeight = -h;
  bmi.bmiHeader.biPlanes = 1;
  bmi.bmiHeader.biBitCount = 1;
  bmi.bmiHeader.biCompression = BI_RGB;
  bmi.bmiHeader.biSizeImage = 0;
  bmi.bmiHeader.biXPelsPerMeter =
    bmi.bmiHeader.biYPelsPerMeter = 0;
  bmi.bmiHeader.biClrUsed = 0;
  bmi.bmiHeader.biClrImportant = 0;
  
  bmi.u.bmiColors[0].rgbBlue = 
    bmi.u.bmiColors[0].rgbGreen = 
    bmi.u.bmiColors[0].rgbRed = 0x00;
  bmi.u.bmiColors[0].rgbReserved = 0x00;

  bmi.u.bmiColors[1].rgbBlue = 
    bmi.u.bmiColors[1].rgbGreen = 
    bmi.u.bmiColors[1].rgbRed = 0xFF;
  bmi.u.bmiColors[1].rgbReserved = 0x00;
  
Tor Lillqvist's avatar
Tor Lillqvist committed
170 171
  private->hbitmap = CreateDIBSection (gdk_display_hdc, (BITMAPINFO *) &bmi,
				       DIB_RGB_COLORS, &bits, NULL, 0);
Tor Lillqvist's avatar
Tor Lillqvist committed
172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189
  if (bpl != bpl32)
    {
      /* Win32 expects scanlines in DIBs to be 32 bit aligned */
      int i;
      for (i = 0; i < h; i++)
	memmove (bits + i*bpl32, ((char *) data) + i*bpl, bpl);
    }
  else
    memmove (bits, data, bpl*h);
  image->mem = bits;
  image->bpl = bpl32;
  image->byte_order = GDK_MSB_FIRST;

  image->bpp = 1;
  return(image);
} /* gdk_image_new_bitmap() */

void
190
_gdk_windowing_image_init (void)
Tor Lillqvist's avatar
Tor Lillqvist committed
191
{
192
  /* Nothing needed AFAIK */
Tor Lillqvist's avatar
Tor Lillqvist committed
193 194
}

Tor Lillqvist's avatar
Tor Lillqvist committed
195 196 197 198 199
GdkImage*
gdk_image_new (GdkImageType  type,
	       GdkVisual    *visual,
	       gint          width,
	       gint          height)
Tor Lillqvist's avatar
Tor Lillqvist committed
200 201
{
  GdkImage *image;
202
  GdkImagePrivateWin32 *private;
Tor Lillqvist's avatar
Tor Lillqvist committed
203 204 205 206 207 208 209 210 211 212 213 214 215 216 217
  Visual *xvisual;
  struct {
    BITMAPINFOHEADER bmiHeader;
    union {
      WORD bmiIndices[256];
      DWORD bmiMasks[3];
      RGBQUAD bmiColors[256];
    } u;
  } bmi;
  UINT iUsage;
  int i;

  if (type == GDK_IMAGE_FASTEST || type == GDK_IMAGE_NORMAL)
    type = GDK_IMAGE_SHARED;

Tor Lillqvist's avatar
Tor Lillqvist committed
218 219
  GDK_NOTE (MISC, g_print ("gdk_image_new: %dx%d %s\n",
			   width, height,
Tor Lillqvist's avatar
Tor Lillqvist committed
220
			   (type == GDK_IMAGE_SHARED ? "shared" :
221 222
			    "???")));
  
Tor Lillqvist's avatar
Tor Lillqvist committed
223 224
  image = g_object_new (gdk_image_get_type (), NULL);
  private = PRIVATE_DATA (image);
Tor Lillqvist's avatar
Tor Lillqvist committed
225 226 227 228 229

  image->type = type;
  image->visual = visual;
  image->width = width;
  image->height = height;
Tor Lillqvist's avatar
Tor Lillqvist committed
230
  image->depth = visual->depth;
Tor Lillqvist's avatar
Tor Lillqvist committed
231 232 233 234 235 236 237
  
  xvisual = ((GdkVisualPrivate*) visual)->xvisual;
  
  bmi.bmiHeader.biSize = sizeof (BITMAPINFOHEADER);
  bmi.bmiHeader.biWidth = width;
  bmi.bmiHeader.biHeight = -height;
  bmi.bmiHeader.biPlanes = 1;
Tor Lillqvist's avatar
Tor Lillqvist committed
238
  if (image->depth == 15)
Tor Lillqvist's avatar
Tor Lillqvist committed
239 240
    bmi.bmiHeader.biBitCount = 16;
  else
Tor Lillqvist's avatar
Tor Lillqvist committed
241 242
    bmi.bmiHeader.biBitCount = image->depth;
  if (image->depth == 16)
Tor Lillqvist's avatar
Tor Lillqvist committed
243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259
    bmi.bmiHeader.biCompression = BI_BITFIELDS;
  else
    bmi.bmiHeader.biCompression = BI_RGB;
  bmi.bmiHeader.biSizeImage = 0;
  bmi.bmiHeader.biXPelsPerMeter =
    bmi.bmiHeader.biYPelsPerMeter = 0;
  bmi.bmiHeader.biClrUsed = 0;
  bmi.bmiHeader.biClrImportant = 0;

  if (image->visual->type == GDK_VISUAL_PSEUDO_COLOR)
    {
      iUsage = DIB_PAL_COLORS;
      for (i = 0; i < 256; i++)
	bmi.u.bmiIndices[i] = i;
    }
  else
    {
Tor Lillqvist's avatar
Tor Lillqvist committed
260 261
      iUsage = DIB_RGB_COLORS;
      if (image->depth == 1)
Tor Lillqvist's avatar
Tor Lillqvist committed
262 263 264 265 266 267 268 269 270 271 272 273
	{
	  bmi.u.bmiColors[0].rgbBlue = 
	    bmi.u.bmiColors[0].rgbGreen =
	    bmi.u.bmiColors[0].rgbRed = 0x00;
	  bmi.u.bmiColors[0].rgbReserved = 0x00;

	  bmi.u.bmiColors[1].rgbBlue = 
	    bmi.u.bmiColors[1].rgbGreen =
	    bmi.u.bmiColors[1].rgbRed = 0xFF;
	  bmi.u.bmiColors[1].rgbReserved = 0x00;

	}
Tor Lillqvist's avatar
Tor Lillqvist committed
274
      else if (image->depth == 16)
Tor Lillqvist's avatar
Tor Lillqvist committed
275 276 277 278 279 280 281
	{
	  bmi.u.bmiMasks[0] = visual->red_mask;
	  bmi.u.bmiMasks[1] = visual->green_mask;
	  bmi.u.bmiMasks[2] = visual->blue_mask;
	}
    }

Tor Lillqvist's avatar
Tor Lillqvist committed
282 283
  private->hbitmap = CreateDIBSection (gdk_display_hdc, (BITMAPINFO *) &bmi,
				       iUsage, &image->mem, NULL, 0);
Tor Lillqvist's avatar
Tor Lillqvist committed
284

Tor Lillqvist's avatar
Tor Lillqvist committed
285
  if (private->hbitmap == NULL)
Tor Lillqvist's avatar
Tor Lillqvist committed
286
    {
287
      WIN32_GDI_FAILED ("CreateDIBSection");
Tor Lillqvist's avatar
Tor Lillqvist committed
288 289 290 291
      g_free (image);
      return NULL;
    }

Tor Lillqvist's avatar
Tor Lillqvist committed
292
  switch (image->depth)
Tor Lillqvist's avatar
Tor Lillqvist committed
293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308
    {
    case 1:
    case 8:
      image->bpp = 1;
      break;
    case 15:
    case 16:
      image->bpp = 2;
      break;
    case 24:
      image->bpp = 3;
      break;
    case 32:
      image->bpp = 4;
      break;
    default:
Tor Lillqvist's avatar
Tor Lillqvist committed
309
      g_warning ("gdk_image_new: depth = %d", image->depth);
Tor Lillqvist's avatar
Tor Lillqvist committed
310 311 312
      g_assert_not_reached ();
    }
  image->byte_order = GDK_LSB_FIRST;
Tor Lillqvist's avatar
Tor Lillqvist committed
313
  if (image->depth == 1)
Tor Lillqvist's avatar
Tor Lillqvist committed
314 315 316 317 318
    image->bpl = ((width-1)/32 + 1)*4;
  else
    image->bpl = ((width*image->bpp - 1)/4 + 1)*4;

  GDK_NOTE (MISC, g_print ("... = %#x mem = %#x, bpl = %d\n",
Tor Lillqvist's avatar
Tor Lillqvist committed
319
			   private->hbitmap, image->mem, image->bpl));
Tor Lillqvist's avatar
Tor Lillqvist committed
320 321 322 323 324 325 326 327 328 329 330 331

  return image;
}

GdkImage*
gdk_image_get (GdkWindow *window,
	       gint       x,
	       gint       y,
	       gint       width,
	       gint       height)
{
  GdkImage *image;
332
  GdkImagePrivateWin32 *private;
Tor Lillqvist's avatar
Tor Lillqvist committed
333 334 335 336 337 338 339 340 341 342 343 344 345 346
  HDC hdc, memdc;
  struct {
    BITMAPINFOHEADER bmiHeader;
    union {
      WORD bmiIndices[256];
      DWORD bmiMasks[3];
      RGBQUAD bmiColors[256];
    } u;
  } bmi;
  HGDIOBJ oldbitmap1, oldbitmap2;
  UINT iUsage;
  BITMAP bm;
  int i;

347
  g_return_val_if_fail (GDK_IS_WINDOW (window), NULL);
Tor Lillqvist's avatar
Tor Lillqvist committed
348

Tor Lillqvist's avatar
Tor Lillqvist committed
349
  if (GDK_WINDOW_DESTROYED (window))
Tor Lillqvist's avatar
Tor Lillqvist committed
350 351 352
    return NULL;

  GDK_NOTE (MISC, g_print ("gdk_image_get: %#x %dx%d@+%d+%d\n",
Tor Lillqvist's avatar
Tor Lillqvist committed
353
			   GDK_DRAWABLE_HANDLE (window), width, height, x, y));
Tor Lillqvist's avatar
Tor Lillqvist committed
354

355 356
  image = g_object_new (gdk_image_get_type (), NULL);
  private = PRIVATE_DATA (image);
Tor Lillqvist's avatar
Tor Lillqvist committed
357 358

  image->type = GDK_IMAGE_SHARED;
359
  image->visual = gdk_drawable_get_visual (window);
Tor Lillqvist's avatar
Tor Lillqvist committed
360 361 362 363 364 365
  image->width = width;
  image->height = height;

  /* This function is called both to blit from a window and from
   * a pixmap.
   */
Tor Lillqvist's avatar
Tor Lillqvist committed
366
  if (GDK_IS_PIXMAP (window))
Tor Lillqvist's avatar
Tor Lillqvist committed
367 368 369
    {
      if ((hdc = CreateCompatibleDC (NULL)) == NULL)
	{
370
	  WIN32_GDI_FAILED ("CreateCompatibleDC");
Tor Lillqvist's avatar
Tor Lillqvist committed
371 372 373
	  g_free (image);
	  return NULL;
	}
Tor Lillqvist's avatar
Tor Lillqvist committed
374
      if ((oldbitmap1 = SelectObject (hdc, GDK_PIXMAP_HBITMAP (window))) == NULL)
Tor Lillqvist's avatar
Tor Lillqvist committed
375
	{
376
	  WIN32_GDI_FAILED ("SelectObject");
Tor Lillqvist's avatar
Tor Lillqvist committed
377 378 379 380
	  DeleteDC (hdc);
	  g_free (image);
	  return NULL;
	}
Tor Lillqvist's avatar
Tor Lillqvist committed
381
      GetObject (GDK_PIXMAP_HBITMAP (window), sizeof (BITMAP), &bm);
Tor Lillqvist's avatar
Tor Lillqvist committed
382 383 384 385 386 387 388 389 390 391 392 393 394 395 396
      GDK_NOTE (MISC,
		g_print ("gdk_image_get: bmWidth = %d, bmHeight = %d, bmWidthBytes = %d, bmBitsPixel = %d\n",
			 bm.bmWidth, bm.bmHeight, bm.bmWidthBytes, bm.bmBitsPixel));
      image->depth = bm.bmBitsPixel;
      if (image->depth <= 8)
	{
	  iUsage = DIB_PAL_COLORS;
	  for (i = 0; i < 256; i++)
	    bmi.u.bmiIndices[i] = i;
	}
      else
	iUsage = DIB_RGB_COLORS;
    }
  else
    {
Tor Lillqvist's avatar
Tor Lillqvist committed
397
      if ((hdc = GetDC (GDK_WINDOW_HWND (window))) == NULL)
Tor Lillqvist's avatar
Tor Lillqvist committed
398
	{
399
	  WIN32_GDI_FAILED ("GetDC");
Tor Lillqvist's avatar
Tor Lillqvist committed
400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415
	  g_free (image);
	  return NULL;
	}
      image->depth = gdk_visual_get_system ()->depth;
      if (image->visual->type == GDK_VISUAL_PSEUDO_COLOR)
	{
	  iUsage = DIB_PAL_COLORS;
	  for (i = 0; i < 256; i++)
	    bmi.u.bmiIndices[i] = i;
	}
      else
	iUsage = DIB_RGB_COLORS;
    }

  if ((memdc = CreateCompatibleDC (hdc)) == NULL)
    {
416
      WIN32_GDI_FAILED ("CreateCompatibleDC");
Tor Lillqvist's avatar
Tor Lillqvist committed
417
      if (GDK_IS_PIXMAP (window))
Tor Lillqvist's avatar
Tor Lillqvist committed
418 419 420 421 422 423
	{
	  SelectObject (hdc, oldbitmap1);
	  DeleteDC (hdc);
	}
      else
	{
Tor Lillqvist's avatar
Tor Lillqvist committed
424
	  ReleaseDC (GDK_WINDOW_HWND (window), hdc);
Tor Lillqvist's avatar
Tor Lillqvist committed
425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459
	}
      g_free (image);
      return NULL;
    }

  bmi.bmiHeader.biSize = sizeof (BITMAPINFOHEADER);
  bmi.bmiHeader.biWidth = width;
  bmi.bmiHeader.biHeight = -height;
  bmi.bmiHeader.biPlanes = 1;
  bmi.bmiHeader.biBitCount = image->depth;
  if (image->depth == 16)
    {
      bmi.bmiHeader.biCompression = BI_BITFIELDS;
      if (image->visual == NULL)
	{
	  /* XXX ??? Is it always this if depth==16 and a pixmap? Guess so. */
	  bmi.u.bmiMasks[0] = 0xf800;
	  bmi.u.bmiMasks[1] = 0x07e0;
	  bmi.u.bmiMasks[2] = 0x001f;
	}
      else
	{
	  bmi.u.bmiMasks[0] = image->visual->red_mask;
	  bmi.u.bmiMasks[1] = image->visual->green_mask;
	  bmi.u.bmiMasks[2] = image->visual->blue_mask;
	}
    }
  else
    bmi.bmiHeader.biCompression = BI_RGB;
  bmi.bmiHeader.biSizeImage = 0;
  bmi.bmiHeader.biXPelsPerMeter =
    bmi.bmiHeader.biYPelsPerMeter = 0;
  bmi.bmiHeader.biClrUsed = 0;
  bmi.bmiHeader.biClrImportant = 0;

Tor Lillqvist's avatar
Tor Lillqvist committed
460 461
  if ((private->hbitmap = CreateDIBSection (hdc, (BITMAPINFO *) &bmi, iUsage,
					    &image->mem, NULL, 0)) == NULL)
Tor Lillqvist's avatar
Tor Lillqvist committed
462
    {
463
      WIN32_GDI_FAILED ("CreateDIBSection");
Tor Lillqvist's avatar
Tor Lillqvist committed
464
      DeleteDC (memdc);
Tor Lillqvist's avatar
Tor Lillqvist committed
465
      if (GDK_IS_PIXMAP (window))
Tor Lillqvist's avatar
Tor Lillqvist committed
466 467 468 469 470 471
	{
	  SelectObject (hdc, oldbitmap1);
	  DeleteDC (hdc);
	}
      else
	{
Tor Lillqvist's avatar
Tor Lillqvist committed
472
	  ReleaseDC (GDK_WINDOW_HWND (window), hdc);
Tor Lillqvist's avatar
Tor Lillqvist committed
473 474 475 476 477
	}
      g_free (image);
      return NULL;
    }

Tor Lillqvist's avatar
Tor Lillqvist committed
478
  if ((oldbitmap2 = SelectObject (memdc, private->hbitmap)) == NULL)
Tor Lillqvist's avatar
Tor Lillqvist committed
479
    {
480
      WIN32_GDI_FAILED ("SelectObject");
Tor Lillqvist's avatar
Tor Lillqvist committed
481
      DeleteObject (private->hbitmap);
Tor Lillqvist's avatar
Tor Lillqvist committed
482
      DeleteDC (memdc);
Tor Lillqvist's avatar
Tor Lillqvist committed
483
      if (GDK_IS_PIXMAP (window))
Tor Lillqvist's avatar
Tor Lillqvist committed
484 485 486 487 488 489
	{
	  SelectObject (hdc, oldbitmap1);
	  DeleteDC (hdc);
	}
      else
	{
Tor Lillqvist's avatar
Tor Lillqvist committed
490
	  ReleaseDC (GDK_WINDOW_HWND (window), hdc);
Tor Lillqvist's avatar
Tor Lillqvist committed
491 492 493 494 495 496 497
	}
      g_free (image);
      return NULL;
    }

  if (!BitBlt (memdc, 0, 0, width, height, hdc, x, y, SRCCOPY))
    {
498
      WIN32_GDI_FAILED ("BitBlt");
Tor Lillqvist's avatar
Tor Lillqvist committed
499
      SelectObject (memdc, oldbitmap2);
Tor Lillqvist's avatar
Tor Lillqvist committed
500
      DeleteObject (private->hbitmap);
Tor Lillqvist's avatar
Tor Lillqvist committed
501
      DeleteDC (memdc);
Tor Lillqvist's avatar
Tor Lillqvist committed
502
      if (GDK_IS_PIXMAP (window))
Tor Lillqvist's avatar
Tor Lillqvist committed
503 504 505 506 507 508
	{
	  SelectObject (hdc, oldbitmap1);
	  DeleteDC (hdc);
	}
      else
	{
Tor Lillqvist's avatar
Tor Lillqvist committed
509
	  ReleaseDC (GDK_WINDOW_HWND (window), hdc);
Tor Lillqvist's avatar
Tor Lillqvist committed
510 511 512 513 514 515
	}
      g_free (image);
      return NULL;
    }

  if (SelectObject (memdc, oldbitmap2) == NULL)
516
    WIN32_GDI_FAILED ("SelectObject");
Tor Lillqvist's avatar
Tor Lillqvist committed
517 518

  if (!DeleteDC (memdc))
519
    WIN32_GDI_FAILED ("DeleteDC");
Tor Lillqvist's avatar
Tor Lillqvist committed
520

Tor Lillqvist's avatar
Tor Lillqvist committed
521
  if (GDK_IS_PIXMAP (window))
Tor Lillqvist's avatar
Tor Lillqvist committed
522 523 524 525 526 527
    {
      SelectObject (hdc, oldbitmap1);
      DeleteDC (hdc);
    }
  else
    {
Tor Lillqvist's avatar
Tor Lillqvist committed
528
      ReleaseDC (GDK_WINDOW_HWND (window), hdc);
Tor Lillqvist's avatar
Tor Lillqvist committed
529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557
    }

  switch (image->depth)
    {
    case 1:
    case 8:
      image->bpp = 1;
      break;
    case 15:
    case 16:
      image->bpp = 2;
      break;
    case 24:
      image->bpp = 3;
      break;
    case 32:
      image->bpp = 4;
      break;
    default:
      g_warning ("gdk_image_get: image->depth = %d", image->depth);
      g_assert_not_reached ();
    }
  image->byte_order = GDK_LSB_FIRST;
  if (image->depth == 1)
    image->bpl = ((width - 1)/32 + 1)*4;
  else
    image->bpl = ((width*image->bpp - 1)/4 + 1)*4;

  GDK_NOTE (MISC, g_print ("... = %#x mem = %#x, bpl = %d\n",
Tor Lillqvist's avatar
Tor Lillqvist committed
558
			   private->hbitmap, image->mem, image->bpl));
Tor Lillqvist's avatar
Tor Lillqvist committed
559 560 561 562 563 564

  return image;
}

guint32
gdk_image_get_pixel (GdkImage *image,
565 566
		     gint      x,
		     gint      y)
Tor Lillqvist's avatar
Tor Lillqvist committed
567 568 569
{
  guint32 pixel;

Tor Lillqvist's avatar
Tor Lillqvist committed
570
  g_return_val_if_fail (GDK_IS_IMAGE (image), 0);
Tor Lillqvist's avatar
Tor Lillqvist committed
571

Tor Lillqvist's avatar
Tor Lillqvist committed
572 573
  if (!(x >= 0 && x < image->width && y >= 0 && y < image->height))
      return 0;
Tor Lillqvist's avatar
Tor Lillqvist committed
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 599 600 601 602 603 604 605 606

  if (image->depth == 1)
    pixel = (((char *) image->mem)[y * image->bpl + (x >> 3)] & (1 << (7 - (x & 0x7)))) != 0;
  else
    {
      guchar *pixelp = (guchar *) image->mem + y * image->bpl + x * image->bpp;
      
      switch (image->bpp)
	{
	case 1:
	  pixel = *pixelp;
	  break;

	/* Windows is always LSB, no need to check image->byte_order. */
	case 2:
	  pixel = pixelp[0] | (pixelp[1] << 8);
	  break;

	case 3:
	  pixel = pixelp[0] | (pixelp[1] << 8) | (pixelp[2] << 16);
	  break;

	case 4:
	  pixel = pixelp[0] | (pixelp[1] << 8) | (pixelp[2] << 16);
	  break;
	}
    }

  return pixel;
}

void
gdk_image_put_pixel (GdkImage *image,
607 608 609
		     gint       x,
		     gint       y,
		     guint32    pixel)
Tor Lillqvist's avatar
Tor Lillqvist committed
610 611 612
{
  g_return_if_fail (image != NULL);

Tor Lillqvist's avatar
Tor Lillqvist committed
613 614
  if  (!(x >= 0 && x < image->width && y >= 0 && y < image->height))
    return;
Tor Lillqvist's avatar
Tor Lillqvist committed
615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639

  if (image->depth == 1)
    if (pixel & 1)
      ((guchar *) image->mem)[y * image->bpl + (x >> 3)] |= (1 << (7 - (x & 0x7)));
    else
      ((guchar *) image->mem)[y * image->bpl + (x >> 3)] &= ~(1 << (7 - (x & 0x7)));
  else
    {
      guchar *pixelp = (guchar *) image->mem + y * image->bpl + x * image->bpp;
      
      /* Windows is always LSB, no need to check image->byte_order. */
      switch (image->bpp)
	{
	case 4:
	  pixelp[3] = 0;
	case 3:
	  pixelp[2] = ((pixel >> 16) & 0xFF);
	case 2:
	  pixelp[1] = ((pixel >> 8) & 0xFF);
	case 1:
	  pixelp[0] = (pixel & 0xFF);
	}
    }
}

640 641
static void
gdk_win32_image_destroy (GdkImage *image)
Tor Lillqvist's avatar
Tor Lillqvist committed
642
{
643
  GdkImagePrivateWin32 *private;
Tor Lillqvist's avatar
Tor Lillqvist committed
644

Tor Lillqvist's avatar
Tor Lillqvist committed
645
  g_return_if_fail (GDK_IS_IMAGE (image));
Tor Lillqvist's avatar
Tor Lillqvist committed
646

647
  private = PRIVATE_DATA (image);
Tor Lillqvist's avatar
Tor Lillqvist committed
648

649 650 651 652 653 654
  if (private == NULL) /* This means that gdk_image_exit() destroyed the
                        * image already, and now we're called a second
                        * time from _finalize()
                        */
    return;
  
655
  GDK_NOTE (MISC, g_print ("gdk_win32_image_destroy: %#x%s\n",
656
			   private->hbitmap));
Tor Lillqvist's avatar
Tor Lillqvist committed
657 658 659 660
  
  switch (image->type)
    {
    case GDK_IMAGE_SHARED:
Tor Lillqvist's avatar
Tor Lillqvist committed
661
      if (!DeleteObject (private->hbitmap))
662
	WIN32_GDI_FAILED ("DeleteObject");
Tor Lillqvist's avatar
Tor Lillqvist committed
663 664 665 666 667 668
      break;

    default:
      g_assert_not_reached ();
    }

669
  g_free (private);
Tor Lillqvist's avatar
Tor Lillqvist committed
670
  image->windowing_data = NULL;
Tor Lillqvist's avatar
Tor Lillqvist committed
671 672
}