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
 186   /* free data right now, in contrast to the X11 version we have made
 187    * our own copy. Use free, it was malloc()ed.
 188    */
 189   free (data);
 190   return(image);
 191 } /* gdk_image_new_bitmap() */
 192
 193 void
 194 _gdk_windowing_image_init (void)
 195 {
 196   /* Nothing needed AFAIK */
 197 }
 198
 199 GdkImage*
 200 gdk_image_new (GdkImageType  type,
 201                GdkVisual    *visual,
 202                gint          width,
 203                gint          height)
 204 {
 205   GdkImage *image;
 206   GdkImagePrivateWin32 *private;
 207   Visual *xvisual;
 208   struct {
 209     BITMAPINFOHEADER bmiHeader;
 210     union {
 211       WORD bmiIndices[256];
 212       DWORD bmiMasks[3];
 213       RGBQUAD bmiColors[256];
 214     } u;
 215   } bmi;
 216   UINT iUsage;
 217   int i;
 218
 219   if (type == GDK_IMAGE_FASTEST || type == GDK_IMAGE_NORMAL)
 220     type = GDK_IMAGE_SHARED;
 221
 222   GDK_NOTE (MISC, g_print ("gdk_image_new: %dx%d %s\n",
 223                            width, height,
 224                            (type == GDK_IMAGE_SHARED ? "shared" :
 225                             "???")));
 226
 227   image = g_object_new (gdk_image_get_type (), NULL);
 228   private = IMAGE_PRIVATE_DATA (image);
 229
 230   image->type = type;
 231   image->visual = visual;
 232   image->width = width;
 233   image->height = height;
 234   image->depth = visual->depth;
 235
 236   xvisual = ((GdkVisualPrivate*) visual)->xvisual;
 237
 238   bmi.bmiHeader.biSize = sizeof (BITMAPINFOHEADER);
 239   bmi.bmiHeader.biWidth = width;
 240   bmi.bmiHeader.biHeight = -height;
 241   bmi.bmiHeader.biPlanes = 1;
 242   if (image->depth == 15)
 243     bmi.bmiHeader.biBitCount = 16;
 244   else
 245     bmi.bmiHeader.biBitCount = image->depth;
 246   if (image->depth == 16)
 247     bmi.bmiHeader.biCompression = BI_BITFIELDS;
 248   else
 249     bmi.bmiHeader.biCompression = BI_RGB;
 250   bmi.bmiHeader.biSizeImage = 0;
 251   bmi.bmiHeader.biXPelsPerMeter =
 252     bmi.bmiHeader.biYPelsPerMeter = 0;
 253   bmi.bmiHeader.biClrUsed = 0;
 254   bmi.bmiHeader.biClrImportant = 0;
 255
 256   if (image->visual->type == GDK_VISUAL_PSEUDO_COLOR)
 257     {
 258       iUsage = DIB_PAL_COLORS;
 259       for (i = 0; i < 256; i++)
 260         bmi.u.bmiIndices[i] = i;
 261     }
 262   else
 263     {
 264       iUsage = DIB_RGB_COLORS;
 265       if (image->depth == 1)
 266         {
 267           bmi.u.bmiColors[0].rgbBlue =
 268             bmi.u.bmiColors[0].rgbGreen =
 269             bmi.u.bmiColors[0].rgbRed = 0x00;
 270           bmi.u.bmiColors[0].rgbReserved = 0x00;
 271
 272           bmi.u.bmiColors[1].rgbBlue =
 273             bmi.u.bmiColors[1].rgbGreen =
 274             bmi.u.bmiColors[1].rgbRed = 0xFF;
 275           bmi.u.bmiColors[1].rgbReserved = 0x00;
 276
 277         }
 278       else if (image->depth == 16)
 279         {
 280           bmi.u.bmiMasks[0] = visual->red_mask;
 281           bmi.u.bmiMasks[1] = visual->green_mask;
 282           bmi.u.bmiMasks[2] = visual->blue_mask;
 283         }
 284     }
 285
 286   private->hbitmap = CreateDIBSection (gdk_display_hdc, (BITMAPINFO *) &bmi,
 287                                        iUsage, &image->mem, NULL, 0);
 288
 289   if (private->hbitmap == NULL)
 290     {
 291       WIN32_GDI_FAILED ("CreateDIBSection");
 292       g_free (image);
 293       return NULL;
 294     }
 295
 296   switch (image->depth)
 297     {
 298     case 1:
 299     case 8:
 300       image->bpp = 1;
 301       break;
 302     case 15:
 303     case 16:
 304       image->bpp = 2;
 305       break;
 306     case 24:
 307       image->bpp = 3;
 308       break;
 309     case 32:
 310       image->bpp = 4;
 311       break;
 312     default:
 313       g_warning ("gdk_image_new: depth = %d", image->depth);
 314       g_assert_not_reached ();
 315     }
 316   image->bits_per_pixel = image->depth;
 317   image->byte_order = GDK_LSB_FIRST;
 318   if (image->depth == 1)
 319     image->bpl = ((width-1)/32 + 1)*4;
 320   else
 321     image->bpl = ((width*image->bpp - 1)/4 + 1)*4;
 322
 323   GDK_NOTE (MISC, g_print ("... = %#x mem = %p, bpl = %d\n",
 324                            (guint) private->hbitmap, image->mem, image->bpl));
 325
 326   return image;
 327 }
 328
 329 GdkImage*
 330 _gdk_win32_get_image (GdkDrawable *drawable,
 331                       gint         x,
 332                       gint         y,
 333                       gint         width,
 334                       gint         height)
 335 {
 336   GdkImage *image;
 337   GdkImagePrivateWin32 *private;
 338   GdkDrawableImplWin32 *impl;
 339   HDC hdc, memdc;
 340   struct {
 341     BITMAPINFOHEADER bmiHeader;
 342     union {
 343       WORD bmiIndices[256];
 344       DWORD bmiMasks[3];
 345       RGBQUAD bmiColors[256];
 346     } u;
 347   } bmi;
 348   HGDIOBJ oldbitmap1, oldbitmap2;
 349   UINT iUsage;
 350   BITMAP bm;
 351   int i;
 352
 353   g_return_val_if_fail (GDK_IS_DRAWABLE_IMPL_WIN32 (drawable), NULL);
 354
 355   GDK_NOTE (MISC, g_print ("_gdk_win32_get_image: %#x %dx%d@+%d+%d\n",
 356                            (guint) GDK_DRAWABLE_IMPL_WIN32 (drawable)->handle,
 357                            width, height, x, y));
 358
 359   impl = GDK_DRAWABLE_IMPL_WIN32 (drawable);
 360
 361   image = g_object_new (gdk_image_get_type (), NULL);
 362   private = IMAGE_PRIVATE_DATA (image);
 363
 364   image->type = GDK_IMAGE_SHARED;
 365   image->visual = gdk_drawable_get_visual (drawable);
 366   image->width = width;
 367   image->height = height;
 368
 369   /* This function is called both to blit from a window and from
 370    * a pixmap.
 371    */
 372   if (GDK_IS_PIXMAP_IMPL_WIN32 (drawable))
 373     {
 374       if ((hdc = CreateCompatibleDC (NULL)) == NULL)
 375         {
 376           WIN32_GDI_FAILED ("CreateCompatibleDC");
 377           g_free (image);
 378           return NULL;
 379         }
 380       if ((oldbitmap1 = SelectObject (hdc, impl->handle)) == NULL)
 381         {
 382           WIN32_GDI_FAILED ("SelectObject");
 383           DeleteDC (hdc);
 384           g_free (image);
 385           return NULL;
 386         }
 387       GetObject (impl->handle, sizeof (BITMAP), &bm);
 388       GDK_NOTE (MISC,
 389                 g_print ("gdk_image_get: bmWidth:%ld bmHeight:%ld bmWidthBytes:%ld bmBitsPixel:%d\n",
 390                          bm.bmWidth, bm.bmHeight, bm.bmWidthBytes, bm.bmBitsPixel));
 391       image->depth = bm.bmBitsPixel;
 392       if (image->depth <= 8)
 393         {
 394           iUsage = DIB_PAL_COLORS;
 395           for (i = 0; i < 256; i++)
 396             bmi.u.bmiIndices[i] = i;
 397         }
 398       else
 399         iUsage = DIB_RGB_COLORS;
 400     }
 401   else
 402     {
 403       if ((hdc = GetDC (impl->handle)) == NULL)
 404         {
 405           WIN32_GDI_FAILED ("GetDC");
 406           g_free (image);
 407           return NULL;
 408         }
 409       image->depth = gdk_visual_get_system ()->depth;
 410       if (image->visual->type == GDK_VISUAL_PSEUDO_COLOR)
 411         {
 412           iUsage = DIB_PAL_COLORS;
 413           for (i = 0; i < 256; i++)
 414             bmi.u.bmiIndices[i] = i;
 415         }
 416       else
 417         iUsage = DIB_RGB_COLORS;
 418     }
 419
 420   if ((memdc = CreateCompatibleDC (hdc)) == NULL)
 421     {
 422       WIN32_GDI_FAILED ("CreateCompatibleDC");
 423       if (GDK_IS_PIXMAP (drawable))
 424         {
 425           SelectObject (hdc, oldbitmap1);
 426           DeleteDC (hdc);
 427         }
 428       else
 429         {
 430           ReleaseDC (impl->handle, hdc);
 431         }
 432       g_free (image);
 433       return NULL;
 434     }
 435
 436   bmi.bmiHeader.biSize = sizeof (BITMAPINFOHEADER);
 437   bmi.bmiHeader.biWidth = width;
 438   bmi.bmiHeader.biHeight = -height;
 439   bmi.bmiHeader.biPlanes = 1;
 440   bmi.bmiHeader.biBitCount = image->depth;
 441   if (image->depth == 16)
 442     {
 443       bmi.bmiHeader.biCompression = BI_BITFIELDS;
 444       if (image->visual == NULL)
 445         {
 446           /* XXX ??? Is it always this if depth==16 and a pixmap? Guess so. */
 447           bmi.u.bmiMasks[0] = 0xf800;
 448           bmi.u.bmiMasks[1] = 0x07e0;
 449           bmi.u.bmiMasks[2] = 0x001f;
 450         }
 451       else
 452         {
 453           bmi.u.bmiMasks[0] = image->visual->red_mask;
 454           bmi.u.bmiMasks[1] = image->visual->green_mask;
 455           bmi.u.bmiMasks[2] = image->visual->blue_mask;
 456         }
 457     }
 458   else
 459     bmi.bmiHeader.biCompression = BI_RGB;
 460   bmi.bmiHeader.biSizeImage = 0;
 461   bmi.bmiHeader.biXPelsPerMeter =
 462     bmi.bmiHeader.biYPelsPerMeter = 0;
 463   bmi.bmiHeader.biClrUsed = 0;
 464   bmi.bmiHeader.biClrImportant = 0;
 465
 466   if ((private->hbitmap = CreateDIBSection (hdc, (BITMAPINFO *) &bmi, iUsage,
 467                                             &image->mem, NULL, 0)) == NULL)
 468     {
 469       WIN32_GDI_FAILED ("CreateDIBSection");
 470       DeleteDC (memdc);
 471       if (GDK_IS_PIXMAP (drawable))
 472         {
 473           SelectObject (hdc, oldbitmap1);
 474           DeleteDC (hdc);
 475         }
 476       else
 477         {
 478           ReleaseDC (impl->handle, hdc);
 479         }
 480       g_free (image);
 481       return NULL;
 482     }
 483
 484   if ((oldbitmap2 = SelectObject (memdc, private->hbitmap)) == NULL)
 485     {
 486       WIN32_GDI_FAILED ("SelectObject");
 487       DeleteObject (private->hbitmap);
 488       DeleteDC (memdc);
 489       if (GDK_IS_PIXMAP (drawable))
 490         {
 491           SelectObject (hdc, oldbitmap1);
 492           DeleteDC (hdc);
 493         }
 494       else
 495         {
 496           ReleaseDC (impl->handle, hdc);
 497         }
 498       g_free (image);
 499       return NULL;
 500     }
 501
 502   if (!BitBlt (memdc, 0, 0, width, height, hdc, x, y, SRCCOPY))
 503     {
 504       WIN32_GDI_FAILED ("BitBlt");
 505       SelectObject (memdc, oldbitmap2);
 506       DeleteObject (private->hbitmap);
 507       DeleteDC (memdc);
 508       if (GDK_IS_PIXMAP (drawable))
 509         {
 510           SelectObject (hdc, oldbitmap1);
 511           DeleteDC (hdc);
 512         }
 513       else
 514         {
 515           ReleaseDC (impl->handle, hdc);
 516         }
 517       g_free (image);
 518       return NULL;
 519     }
 520
 521   if (SelectObject (memdc, oldbitmap2) == NULL)
 522     WIN32_GDI_FAILED ("SelectObject");
 523
 524   if (!DeleteDC (memdc))
 525     WIN32_GDI_FAILED ("DeleteDC");
 526
 527   if (GDK_IS_PIXMAP_IMPL_WIN32 (drawable))
 528     {
 529       SelectObject (hdc, oldbitmap1);
 530       DeleteDC (hdc);
 531     }
 532   else
 533     {
 534       ReleaseDC (impl->handle, hdc);
 535     }
 536
 537   switch (image->depth)
 538     {
 539     case 1:
 540     case 8:
 541       image->bpp = 1;
 542       break;
 543     case 15:
 544     case 16:
 545       image->bpp = 2;
 546       break;
 547     case 24:
 548       image->bpp = 3;
 549       break;
 550     case 32:
 551       image->bpp = 4;
 552       break;
 553     default:
 554       g_warning ("gdk_image_get: image->depth = %d", image->depth);
 555       g_assert_not_reached ();
 556     }
 557   image->bits_per_pixel = image->depth;
 558   image->byte_order = GDK_LSB_FIRST;
 559   if (image->depth == 1)
 560     image->bpl = ((width - 1)/32 + 1)*4;
 561   else
 562     image->bpl = ((width*image->bpp - 1)/4 + 1)*4;
 563
 564   GDK_NOTE (MISC, g_print ("... = %#x mem = %p, bpl = %d\n",
 565                            (guint) private->hbitmap, image->mem, image->bpl));
 566
 567   return image;
 568 }
 569
 570 guint32
 571 gdk_image_get_pixel (GdkImage *image,
 572                      gint      x,
 573                      gint      y)
 574 {
 575   guint32 pixel;
 576
 577   g_return_val_if_fail (GDK_IS_IMAGE (image), 0);
 578
 579   if (!(x >= 0 && x < image->width && y >= 0 && y < image->height))
 580       return 0;
 581
 582   if (image->depth == 1)
 583     pixel = (((char *) image->mem)[y * image->bpl + (x >> 3)] & (1 << (7 - (x & 0x7)))) != 0;
 584   else
 585     {
 586       guchar *pixelp = (guchar *) image->mem + y * image->bpl + x * image->bpp;
 587
 588       switch (image->bpp)
 589         {
 590         case 1:
 591           pixel = *pixelp;
 592           break;
 593
 594         /* Windows is always LSB, no need to check image->byte_order. */
 595         case 2:
 596           pixel = pixelp[0] | (pixelp[1] << 8);
 597           break;
 598
 599         case 3:
 600           pixel = pixelp[0] | (pixelp[1] << 8) | (pixelp[2] << 16);
 601           break;
 602
 603         case 4:
 604           pixel = pixelp[0] | (pixelp[1] << 8) | (pixelp[2] << 16);
 605           break;
 606         }
 607     }
 608
 609   return pixel;
 610 }
 611
 612 void
 613 gdk_image_put_pixel (GdkImage *image,
 614                      gint       x,
 615                      gint       y,
 616                      guint32    pixel)
 617 {
 618   g_return_if_fail (image != NULL);
 619
 620   if  (!(x >= 0 && x < image->width && y >= 0 && y < image->height))
 621     return;
 622
 623   if (image->depth == 1)
 624     if (pixel & 1)
 625       ((guchar *) image->mem)[y * image->bpl + (x >> 3)] |= (1 << (7 - (x & 0x7)));
 626     else
 627       ((guchar *) image->mem)[y * image->bpl + (x >> 3)] &= ~(1 << (7 - (x & 0x7)));
 628   else
 629     {
 630       guchar *pixelp = (guchar *) image->mem + y * image->bpl + x * image->bpp;
 631
 632       /* Windows is always LSB, no need to check image->byte_order. */
 633       switch (image->bpp)
 634         {
 635         case 4:
 636           pixelp[3] = 0;
 637         case 3:
 638           pixelp[2] = ((pixel >> 16) & 0xFF);
 639         case 2:
 640           pixelp[1] = ((pixel >> 8) & 0xFF);
 641         case 1:
 642           pixelp[0] = (pixel & 0xFF);
 643         }
 644     }
 645 }
 646
 647 static void
 648 gdk_win32_image_destroy (GdkImage *image)
 649 {
 650   GdkImagePrivateWin32 *private;
 651
 652   g_return_if_fail (GDK_IS_IMAGE (image));
 653
 654   private = IMAGE_PRIVATE_DATA (image);
 655
 656   if (private == NULL) /* This means that gdk_image_exit() destroyed the
 657                         * image already, and now we're called a second
 658                         * time from _finalize()
 659                         */
 660     return;
 661
 662   GDK_NOTE (MISC, g_print ("gdk_win32_image_destroy: %#x\n",
 663                            (guint) private->hbitmap));
 664
 665   switch (image->type)
 666     {
 667     case GDK_IMAGE_SHARED:
 668       if (!DeleteObject (private->hbitmap))
 669         WIN32_GDI_FAILED ("DeleteObject");
 670       break;
 671
 672     default:
 673       g_assert_not_reached ();
 674     }
 675
 676   g_free (private);
 677   image->windowing_data = NULL;
 678 }
 679