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