Pileus Git - ~andy/gtk/blob - gdk/win32/gdkimage-win32.c

   1 /* GDK - The GIMP Drawing Kit
   2  * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the
  16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17  * Boston, MA 02111-1307, USA.
  18  */
  19
  20 /*
  21  * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
  22  * file for a list of people on the GTK+ Team.  See the ChangeLog
  23  * files for a list of changes.  These files are distributed with
  24  * GTK+ at ftp://ftp.gtk.org/pub/gtk/.
  25  */
  26
  27 #include "config.h"
  28
  29 #include "gdkimage.h"
  30 #include "gdkpixmap.h"
  31 #include "gdkinternals.h"
  32 #include "gdkprivate-win32.h"
  33 #include "gdkdrawable-win32.h"
  34 #include "gdkwindow-win32.h"
  35 #include "gdkpixmap-win32.h"
  36
  37 static GList *image_list = NULL;
  38 static gpointer parent_class = NULL;
  39
  40 static void gdk_win32_image_destroy (GdkImage      *image);
  41 static void gdk_image_init          (GdkImage      *image);
  42 static void gdk_image_class_init    (GdkImageClass *klass);
  43 static void gdk_image_finalize      (GObject       *object);
  44
  45 GType
  46 gdk_image_get_type (void)
  47 {
  48   static GType object_type = 0;
  49
  50   if (!object_type)
  51     {
  52       static const GTypeInfo object_info =
  53       {
  54         sizeof (GdkImageClass),
  55         (GBaseInitFunc) NULL,
  56         (GBaseFinalizeFunc) NULL,
  57         (GClassInitFunc) gdk_image_class_init,
  58         NULL,           /* class_finalize */
  59         NULL,           /* class_data */
  60         sizeof (GdkImage),
  61         0,              /* n_preallocs */
  62         (GInstanceInitFunc) gdk_image_init,
  63       };
  64
  65       object_type = g_type_register_static (G_TYPE_OBJECT,
  66                                             "GdkImage",
  67                                             &object_info, 0);
  68     }
  69
  70   return object_type;
  71 }
  72
  73 static void
  74 gdk_image_init (GdkImage *image)
  75 {
  76   image->windowing_data = g_new0 (GdkImagePrivateWin32, 1);
  77 }
  78
  79 static void
  80 gdk_image_class_init (GdkImageClass *klass)
  81 {
  82   GObjectClass *object_class = G_OBJECT_CLASS (klass);
  83
  84   parent_class = g_type_class_peek_parent (klass);
  85
  86   object_class->finalize = gdk_image_finalize;
  87 }
  88
  89 static void
  90 gdk_image_finalize (GObject *object)
  91 {
  92   GdkImage *image = GDK_IMAGE (object);
  93
  94   gdk_win32_image_destroy (image);
  95
  96   G_OBJECT_CLASS (parent_class)->finalize (object);
  97 }
  98
  99 void
 100 gdk_image_exit (void)
 101 {
 102   GdkImage *image;
 103
 104   while (image_list)
 105     {
 106       image = image_list->data;
 107       gdk_win32_image_destroy (image);
 108     }
 109 }
 110
 111 GdkImage *
 112 gdk_image_new_bitmap (GdkVisual *visual,
 113                       gpointer   data,
 114                       gint       w,
 115                       gint       h)
 116 /*
 117  * Desc: create a new bitmap image
 118  */
 119 {
 120   Visual *xvisual;
 121   GdkImage *image;
 122   GdkImagePrivateWin32 *private;
 123   struct {
 124     BITMAPINFOHEADER bmiHeader;
 125     union {
 126       WORD bmiIndices[2];
 127       RGBQUAD bmiColors[2];
 128     } u;
 129   } bmi;
 130   char *bits;
 131   int bpl = (w-1)/8 + 1;
 132   int bpl32 = ((w-1)/32 + 1)*4;
 133
 134   image = g_object_new (gdk_image_get_type (), NULL);
 135   private = IMAGE_PRIVATE_DATA (image);
 136
 137   image->type = GDK_IMAGE_SHARED;
 138   image->visual = visual;
 139   image->width = w;
 140   image->height = h;
 141   image->depth = 1;
 142   xvisual = ((GdkVisualPrivate*) visual)->xvisual;
 143
 144   GDK_NOTE (MISC, g_print ("gdk_image_new_bitmap: %dx%d\n", w, h));
 145
 146   bmi.bmiHeader.biSize = sizeof (BITMAPINFOHEADER);
 147   bmi.bmiHeader.biWidth = w;
 148   bmi.bmiHeader.biHeight = -h;
 149   bmi.bmiHeader.biPlanes = 1;
 150   bmi.bmiHeader.biBitCount = 1;
 151   bmi.bmiHeader.biCompression = BI_RGB;
 152   bmi.bmiHeader.biSizeImage = 0;
 153   bmi.bmiHeader.biXPelsPerMeter =
 154     bmi.bmiHeader.biYPelsPerMeter = 0;
 155   bmi.bmiHeader.biClrUsed = 0;
 156   bmi.bmiHeader.biClrImportant = 0;
 157
 158   bmi.u.bmiColors[0].rgbBlue =
 159     bmi.u.bmiColors[0].rgbGreen =
 160     bmi.u.bmiColors[0].rgbRed = 0x00;
 161   bmi.u.bmiColors[0].rgbReserved = 0x00;
 162
 163   bmi.u.bmiColors[1].rgbBlue =
 164     bmi.u.bmiColors[1].rgbGreen =
 165     bmi.u.bmiColors[1].rgbRed = 0xFF;
 166   bmi.u.bmiColors[1].rgbReserved = 0x00;
 167
 168   private->hbitmap = CreateDIBSection (gdk_display_hdc, (BITMAPINFO *) &bmi,
 169                                        DIB_RGB_COLORS, &bits, NULL, 0);
 170   if (bpl != bpl32)
 171     {
 172       /* Win32 expects scanlines in DIBs to be 32 bit aligned */
 173       int i;
 174       for (i = 0; i < h; i++)
 175         memmove (bits + i*bpl32, ((char *) data) + i*bpl, bpl);
 176     }
 177   else
 178     memmove (bits, data, bpl*h);
 179   image->mem = bits;
 180   image->bpl = bpl32;
 181   image->byte_order = GDK_MSB_FIRST;
 182
 183   image->bits_per_pixel = 1;
 184   image->bpp = 1;
 185   return(image);
 186 } /* gdk_image_new_bitmap() */
 187
 188 void
 189 _gdk_windowing_image_init (void)
 190 {
 191   /* Nothing needed AFAIK */
 192 }
 193
 194 GdkImage*
 195 gdk_image_new (GdkImageType  type,
 196                GdkVisual    *visual,
 197                gint          width,
 198                gint          height)
 199 {
 200   GdkImage *image;
 201   GdkImagePrivateWin32 *private;
 202   Visual *xvisual;
 203   struct {
 204     BITMAPINFOHEADER bmiHeader;
 205     union {
 206       WORD bmiIndices[256];
 207       DWORD bmiMasks[3];
 208       RGBQUAD bmiColors[256];
 209     } u;
 210   } bmi;
 211   UINT iUsage;
 212   int i;
 213
 214   if (type == GDK_IMAGE_FASTEST || type == GDK_IMAGE_NORMAL)
 215     type = GDK_IMAGE_SHARED;
 216
 217   GDK_NOTE (MISC, g_print ("gdk_image_new: %dx%d %s\n",
 218                            width, height,
 219                            (type == GDK_IMAGE_SHARED ? "shared" :
 220                             "???")));
 221
 222   image = g_object_new (gdk_image_get_type (), NULL);
 223   private = IMAGE_PRIVATE_DATA (image);
 224
 225   image->type = type;
 226   image->visual = visual;
 227   image->width = width;
 228   image->height = height;
 229   image->depth = visual->depth;
 230
 231   xvisual = ((GdkVisualPrivate*) visual)->xvisual;
 232
 233   bmi.bmiHeader.biSize = sizeof (BITMAPINFOHEADER);
 234   bmi.bmiHeader.biWidth = width;
 235   bmi.bmiHeader.biHeight = -height;
 236   bmi.bmiHeader.biPlanes = 1;
 237   if (image->depth == 15)
 238     bmi.bmiHeader.biBitCount = 16;
 239   else
 240     bmi.bmiHeader.biBitCount = image->depth;
 241   if (image->depth == 16)
 242     bmi.bmiHeader.biCompression = BI_BITFIELDS;
 243   else
 244     bmi.bmiHeader.biCompression = BI_RGB;
 245   bmi.bmiHeader.biSizeImage = 0;
 246   bmi.bmiHeader.biXPelsPerMeter =
 247     bmi.bmiHeader.biYPelsPerMeter = 0;
 248   bmi.bmiHeader.biClrUsed = 0;
 249   bmi.bmiHeader.biClrImportant = 0;
 250
 251   if (image->visual->type == GDK_VISUAL_PSEUDO_COLOR)
 252     {
 253       iUsage = DIB_PAL_COLORS;
 254       for (i = 0; i < 256; i++)
 255         bmi.u.bmiIndices[i] = i;
 256     }
 257   else
 258     {
 259       iUsage = DIB_RGB_COLORS;
 260       if (image->depth == 1)
 261         {
 262           bmi.u.bmiColors[0].rgbBlue =
 263             bmi.u.bmiColors[0].rgbGreen =
 264             bmi.u.bmiColors[0].rgbRed = 0x00;
 265           bmi.u.bmiColors[0].rgbReserved = 0x00;
 266
 267           bmi.u.bmiColors[1].rgbBlue =
 268             bmi.u.bmiColors[1].rgbGreen =
 269             bmi.u.bmiColors[1].rgbRed = 0xFF;
 270           bmi.u.bmiColors[1].rgbReserved = 0x00;
 271
 272         }
 273       else if (image->depth == 16)
 274         {
 275           bmi.u.bmiMasks[0] = visual->red_mask;
 276           bmi.u.bmiMasks[1] = visual->green_mask;
 277           bmi.u.bmiMasks[2] = visual->blue_mask;
 278         }
 279     }
 280
 281   private->hbitmap = CreateDIBSection (gdk_display_hdc, (BITMAPINFO *) &bmi,
 282                                        iUsage, &image->mem, NULL, 0);
 283
 284   if (private->hbitmap == NULL)
 285     {
 286       WIN32_GDI_FAILED ("CreateDIBSection");
 287       g_free (image);
 288       return NULL;
 289     }
 290
 291   switch (image->depth)
 292     {
 293     case 1:
 294     case 8:
 295       image->bpp = 1;
 296       break;
 297     case 15:
 298     case 16:
 299       image->bpp = 2;
 300       break;
 301     case 24:
 302       image->bpp = 3;
 303       break;
 304     case 32:
 305       image->bpp = 4;
 306       break;
 307     default:
 308       g_warning ("gdk_image_new: depth = %d", image->depth);
 309       g_assert_not_reached ();
 310     }
 311   image->bits_per_pixel = image->depth;
 312   image->byte_order = GDK_LSB_FIRST;
 313   if (image->depth == 1)
 314     image->bpl = ((width-1)/32 + 1)*4;
 315   else
 316     image->bpl = ((width*image->bpp - 1)/4 + 1)*4;
 317
 318   GDK_NOTE (MISC, g_print ("... = %#x mem = %p, bpl = %d\n",
 319                            (guint) private->hbitmap, image->mem, image->bpl));
 320
 321   return image;
 322 }
 323
 324 GdkImage*
 325 _gdk_win32_get_image (GdkDrawable *drawable,
 326                       gint         x,
 327                       gint         y,
 328                       gint         width,
 329                       gint         height)
 330 {
 331   GdkImage *image;
 332   GdkImagePrivateWin32 *private;
 333   GdkDrawableImplWin32 *impl;
 334   HDC hdc, memdc;
 335   struct {
 336     BITMAPINFOHEADER bmiHeader;
 337     union {
 338       WORD bmiIndices[256];
 339       DWORD bmiMasks[3];
 340       RGBQUAD bmiColors[256];
 341     } u;
 342   } bmi;
 343   HGDIOBJ oldbitmap1, oldbitmap2;
 344   UINT iUsage;
 345   BITMAP bm;
 346   int i;
 347
 348   g_return_val_if_fail (GDK_IS_DRAWABLE_IMPL_WIN32 (drawable), NULL);
 349
 350   GDK_NOTE (MISC, g_print ("_gdk_win32_get_image: %#x %dx%d@+%d+%d\n",
 351                            (guint) GDK_DRAWABLE_HANDLE (drawable),
 352                            width, height, x, y));
 353
 354   impl = GDK_DRAWABLE_IMPL_WIN32 (drawable);
 355
 356   image = g_object_new (gdk_image_get_type (), NULL);
 357   private = IMAGE_PRIVATE_DATA (image);
 358
 359   image->type = GDK_IMAGE_SHARED;
 360   image->visual = gdk_drawable_get_visual (drawable);
 361   image->width = width;
 362   image->height = height;
 363
 364   /* This function is called both to blit from a window and from
 365    * a pixmap.
 366    */
 367   if (GDK_IS_PIXMAP_IMPL_WIN32 (drawable))
 368     {
 369       if ((hdc = CreateCompatibleDC (NULL)) == NULL)
 370         {
 371           WIN32_GDI_FAILED ("CreateCompatibleDC");
 372           g_free (image);
 373           return NULL;
 374         }
 375       if ((oldbitmap1 = SelectObject (hdc, impl->handle)) == NULL)
 376         {
 377           WIN32_GDI_FAILED ("SelectObject");
 378           DeleteDC (hdc);
 379           g_free (image);
 380           return NULL;
 381         }
 382       GetObject (impl->handle, sizeof (BITMAP), &bm);
 383       GDK_NOTE (MISC,
 384                 g_print ("gdk_image_get: bmWidth:%ld bmHeight:%ld bmWidthBytes:%ld bmBitsPixel:%d\n",
 385                          bm.bmWidth, bm.bmHeight, bm.bmWidthBytes, bm.bmBitsPixel));
 386       image->depth = bm.bmBitsPixel;
 387       if (image->depth <= 8)
 388         {
 389           iUsage = DIB_PAL_COLORS;
 390           for (i = 0; i < 256; i++)
 391             bmi.u.bmiIndices[i] = i;
 392         }
 393       else
 394         iUsage = DIB_RGB_COLORS;
 395     }
 396   else
 397     {
 398       if ((hdc = GetDC (impl->handle)) == NULL)
 399         {
 400           WIN32_GDI_FAILED ("GetDC");
 401           g_free (image);
 402           return NULL;
 403         }
 404       image->depth = gdk_visual_get_system ()->depth;
 405       if (image->visual->type == GDK_VISUAL_PSEUDO_COLOR)
 406         {
 407           iUsage = DIB_PAL_COLORS;
 408           for (i = 0; i < 256; i++)
 409             bmi.u.bmiIndices[i] = i;
 410         }
 411       else
 412         iUsage = DIB_RGB_COLORS;
 413     }
 414
 415   if ((memdc = CreateCompatibleDC (hdc)) == NULL)
 416     {
 417       WIN32_GDI_FAILED ("CreateCompatibleDC");
 418       if (GDK_IS_PIXMAP (drawable))
 419         {
 420           SelectObject (hdc, oldbitmap1);
 421           DeleteDC (hdc);
 422         }
 423       else
 424         {
 425           ReleaseDC (impl->handle, hdc);
 426         }
 427       g_free (image);
 428       return NULL;
 429     }
 430
 431   bmi.bmiHeader.biSize = sizeof (BITMAPINFOHEADER);
 432   bmi.bmiHeader.biWidth = width;
 433   bmi.bmiHeader.biHeight = -height;
 434   bmi.bmiHeader.biPlanes = 1;
 435   bmi.bmiHeader.biBitCount = image->depth;
 436   if (image->depth == 16)
 437     {
 438       bmi.bmiHeader.biCompression = BI_BITFIELDS;
 439       if (image->visual == NULL)
 440         {
 441           /* XXX ??? Is it always this if depth==16 and a pixmap? Guess so. */
 442           bmi.u.bmiMasks[0] = 0xf800;
 443           bmi.u.bmiMasks[1] = 0x07e0;
 444           bmi.u.bmiMasks[2] = 0x001f;
 445         }
 446       else
 447         {
 448           bmi.u.bmiMasks[0] = image->visual->red_mask;
 449           bmi.u.bmiMasks[1] = image->visual->green_mask;
 450           bmi.u.bmiMasks[2] = image->visual->blue_mask;
 451         }
 452     }
 453   else
 454     bmi.bmiHeader.biCompression = BI_RGB;
 455   bmi.bmiHeader.biSizeImage = 0;
 456   bmi.bmiHeader.biXPelsPerMeter =
 457     bmi.bmiHeader.biYPelsPerMeter = 0;
 458   bmi.bmiHeader.biClrUsed = 0;
 459   bmi.bmiHeader.biClrImportant = 0;
 460
 461   if ((private->hbitmap = CreateDIBSection (hdc, (BITMAPINFO *) &bmi, iUsage,
 462                                             &image->mem, NULL, 0)) == NULL)
 463     {
 464       WIN32_GDI_FAILED ("CreateDIBSection");
 465       DeleteDC (memdc);
 466       if (GDK_IS_PIXMAP (drawable))
 467         {
 468           SelectObject (hdc, oldbitmap1);
 469           DeleteDC (hdc);
 470         }
 471       else
 472         {
 473           ReleaseDC (impl->handle, hdc);
 474         }
 475       g_free (image);
 476       return NULL;
 477     }
 478
 479   if ((oldbitmap2 = SelectObject (memdc, private->hbitmap)) == NULL)
 480     {
 481       WIN32_GDI_FAILED ("SelectObject");
 482       DeleteObject (private->hbitmap);
 483       DeleteDC (memdc);
 484       if (GDK_IS_PIXMAP (drawable))
 485         {
 486           SelectObject (hdc, oldbitmap1);
 487           DeleteDC (hdc);
 488         }
 489       else
 490         {
 491           ReleaseDC (impl->handle, hdc);
 492         }
 493       g_free (image);
 494       return NULL;
 495     }
 496
 497   if (!BitBlt (memdc, 0, 0, width, height, hdc, x, y, SRCCOPY))
 498     {
 499       WIN32_GDI_FAILED ("BitBlt");
 500       SelectObject (memdc, oldbitmap2);
 501       DeleteObject (private->hbitmap);
 502       DeleteDC (memdc);
 503       if (GDK_IS_PIXMAP (drawable))
 504         {
 505           SelectObject (hdc, oldbitmap1);
 506           DeleteDC (hdc);
 507         }
 508       else
 509         {
 510           ReleaseDC (impl->handle, hdc);
 511         }
 512       g_free (image);
 513       return NULL;
 514     }
 515
 516   if (SelectObject (memdc, oldbitmap2) == NULL)
 517     WIN32_GDI_FAILED ("SelectObject");
 518
 519   if (!DeleteDC (memdc))
 520     WIN32_GDI_FAILED ("DeleteDC");
 521
 522   if (GDK_IS_PIXMAP_IMPL_WIN32 (drawable))
 523     {
 524       SelectObject (hdc, oldbitmap1);
 525       DeleteDC (hdc);
 526     }
 527   else
 528     {
 529       ReleaseDC (impl->handle, hdc);
 530     }
 531
 532   switch (image->depth)
 533     {
 534     case 1:
 535     case 8:
 536       image->bpp = 1;
 537       break;
 538     case 15:
 539     case 16:
 540       image->bpp = 2;
 541       break;
 542     case 24:
 543       image->bpp = 3;
 544       break;
 545     case 32:
 546       image->bpp = 4;
 547       break;
 548     default:
 549       g_warning ("gdk_image_get: image->depth = %d", image->depth);
 550       g_assert_not_reached ();
 551     }
 552   image->bits_per_pixel = image->depth;
 553   image->byte_order = GDK_LSB_FIRST;
 554   if (image->depth == 1)
 555     image->bpl = ((width - 1)/32 + 1)*4;
 556   else
 557     image->bpl = ((width*image->bpp - 1)/4 + 1)*4;
 558
 559   GDK_NOTE (MISC, g_print ("... = %#x mem = %p, bpl = %d\n",
 560                            (guint) private->hbitmap, image->mem, image->bpl));
 561
 562   return image;
 563 }
 564
 565 guint32
 566 gdk_image_get_pixel (GdkImage *image,
 567                      gint      x,
 568                      gint      y)
 569 {
 570   guint32 pixel;
 571
 572   g_return_val_if_fail (GDK_IS_IMAGE (image), 0);
 573
 574   if (!(x >= 0 && x < image->width && y >= 0 && y < image->height))
 575       return 0;
 576
 577   if (image->depth == 1)
 578     pixel = (((char *) image->mem)[y * image->bpl + (x >> 3)] & (1 << (7 - (x & 0x7)))) != 0;
 579   else
 580     {
 581       guchar *pixelp = (guchar *) image->mem + y * image->bpl + x * image->bpp;
 582
 583       switch (image->bpp)
 584         {
 585         case 1:
 586           pixel = *pixelp;
 587           break;
 588
 589         /* Windows is always LSB, no need to check image->byte_order. */
 590         case 2:
 591           pixel = pixelp[0] | (pixelp[1] << 8);
 592           break;
 593
 594         case 3:
 595           pixel = pixelp[0] | (pixelp[1] << 8) | (pixelp[2] << 16);
 596           break;
 597
 598         case 4:
 599           pixel = pixelp[0] | (pixelp[1] << 8) | (pixelp[2] << 16);
 600           break;
 601         }
 602     }
 603
 604   return pixel;
 605 }
 606
 607 void
 608 gdk_image_put_pixel (GdkImage *image,
 609                      gint       x,
 610                      gint       y,
 611                      guint32    pixel)
 612 {
 613   g_return_if_fail (image != NULL);
 614
 615   if  (!(x >= 0 && x < image->width && y >= 0 && y < image->height))
 616     return;
 617
 618   if (image->depth == 1)
 619     if (pixel & 1)
 620       ((guchar *) image->mem)[y * image->bpl + (x >> 3)] |= (1 << (7 - (x & 0x7)));
 621     else
 622       ((guchar *) image->mem)[y * image->bpl + (x >> 3)] &= ~(1 << (7 - (x & 0x7)));
 623   else
 624     {
 625       guchar *pixelp = (guchar *) image->mem + y * image->bpl + x * image->bpp;
 626
 627       /* Windows is always LSB, no need to check image->byte_order. */
 628       switch (image->bpp)
 629         {
 630         case 4:
 631           pixelp[3] = 0;
 632         case 3:
 633           pixelp[2] = ((pixel >> 16) & 0xFF);
 634         case 2:
 635           pixelp[1] = ((pixel >> 8) & 0xFF);
 636         case 1:
 637           pixelp[0] = (pixel & 0xFF);
 638         }
 639     }
 640 }
 641
 642 static void
 643 gdk_win32_image_destroy (GdkImage *image)
 644 {
 645   GdkImagePrivateWin32 *private;
 646
 647   g_return_if_fail (GDK_IS_IMAGE (image));
 648
 649   private = IMAGE_PRIVATE_DATA (image);
 650
 651   if (private == NULL) /* This means that gdk_image_exit() destroyed the
 652                         * image already, and now we're called a second
 653                         * time from _finalize()
 654                         */
 655     return;
 656
 657   GDK_NOTE (MISC, g_print ("gdk_win32_image_destroy: %#x\n",
 658                            (guint) private->hbitmap));
 659
 660   switch (image->type)
 661     {
 662     case GDK_IMAGE_SHARED:
 663       if (!DeleteObject (private->hbitmap))
 664         WIN32_GDI_FAILED ("DeleteObject");
 665       break;
 666
 667     default:
 668       g_assert_not_reached ();
 669     }
 670
 671   g_free (private);
 672   image->windowing_data = NULL;
 673 }
 674