Pileus Git - ~andy/gtk/blob - gdk/win32/gdkdrawable-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 <math.h>
  28 #include <glib.h>
  29
  30 #include <pango/pangowin32.h>
  31
  32 #include "gdkinternals.h"
  33 #include "gdkprivate-win32.h"
  34
  35 static void gdk_win32_draw_rectangle (GdkDrawable    *drawable,
  36                                       GdkGC          *gc,
  37                                       gint            filled,
  38                                       gint            x,
  39                                       gint            y,
  40                                       gint            width,
  41                                       gint            height);
  42 static void gdk_win32_draw_arc       (GdkDrawable    *drawable,
  43                                       GdkGC          *gc,
  44                                       gint            filled,
  45                                       gint            x,
  46                                       gint            y,
  47                                       gint            width,
  48                                       gint            height,
  49                                       gint            angle1,
  50                                       gint            angle2);
  51 static void gdk_win32_draw_polygon   (GdkDrawable    *drawable,
  52                                       GdkGC          *gc,
  53                                       gint            filled,
  54                                       GdkPoint       *points,
  55                                       gint            npoints);
  56 static void gdk_win32_draw_text      (GdkDrawable    *drawable,
  57                                       GdkFont        *font,
  58                                       GdkGC          *gc,
  59                                       gint            x,
  60                                       gint            y,
  61                                       const gchar    *text,
  62                                       gint            text_length);
  63 static void gdk_win32_draw_text_wc   (GdkDrawable    *drawable,
  64                                       GdkFont        *font,
  65                                       GdkGC          *gc,
  66                                       gint            x,
  67                                       gint            y,
  68                                       const GdkWChar *text,
  69                                       gint            text_length);
  70 static void gdk_win32_draw_drawable  (GdkDrawable    *drawable,
  71                                       GdkGC          *gc,
  72                                       GdkPixmap      *src,
  73                                       gint            xsrc,
  74                                       gint            ysrc,
  75                                       gint            xdest,
  76                                       gint            ydest,
  77                                       gint            width,
  78                                       gint            height);
  79 static void gdk_win32_draw_points    (GdkDrawable    *drawable,
  80                                       GdkGC          *gc,
  81                                       GdkPoint       *points,
  82                                       gint            npoints);
  83 static void gdk_win32_draw_segments  (GdkDrawable    *drawable,
  84                                       GdkGC          *gc,
  85                                       GdkSegment     *segs,
  86                                       gint            nsegs);
  87 static void gdk_win32_draw_lines     (GdkDrawable    *drawable,
  88                                       GdkGC          *gc,
  89                                       GdkPoint       *points,
  90                                       gint            npoints);
  91 static void gdk_win32_draw_glyphs    (GdkDrawable      *drawable,
  92                                       GdkGC            *gc,
  93                                       PangoFont        *font,
  94                                       gint              x,
  95                                       gint              y,
  96                                       PangoGlyphString *glyphs);
  97 static void gdk_win32_draw_image     (GdkDrawable     *drawable,
  98                                       GdkGC           *gc,
  99                                       GdkImage        *image,
 100                                       gint             xsrc,
 101                                       gint             ysrc,
 102                                       gint             xdest,
 103                                       gint             ydest,
 104                                       gint             width,
 105                                       gint             height);
 106
 107 static void gdk_win32_set_colormap   (GdkDrawable    *drawable,
 108                                       GdkColormap    *colormap);
 109
 110 static GdkColormap* gdk_win32_get_colormap   (GdkDrawable    *drawable);
 111
 112 static gint         gdk_win32_get_depth      (GdkDrawable    *drawable);
 113
 114 static void gdk_drawable_impl_win32_class_init (GdkDrawableImplWin32Class *klass);
 115
 116 static gpointer parent_class = NULL;
 117
 118 GType
 119 gdk_drawable_impl_win32_get_type (void)
 120 {
 121   static GType object_type = 0;
 122
 123   if (!object_type)
 124     {
 125       static const GTypeInfo object_info =
 126       {
 127         sizeof (GdkDrawableImplWin32Class),
 128         (GBaseInitFunc) NULL,
 129         (GBaseFinalizeFunc) NULL,
 130         (GClassInitFunc) gdk_drawable_impl_win32_class_init,
 131         NULL,           /* class_finalize */
 132         NULL,           /* class_data */
 133         sizeof (GdkDrawableImplWin32),
 134         0,              /* n_preallocs */
 135         (GInstanceInitFunc) NULL,
 136       };
 137
 138       object_type = g_type_register_static (GDK_TYPE_DRAWABLE,
 139                                             "GdkDrawableImplWin32",
 140                                             &object_info);
 141     }
 142
 143   return object_type;
 144 }
 145
 146 static void
 147 gdk_drawable_impl_win32_class_init (GdkDrawableImplWin32Class *klass)
 148 {
 149   GdkDrawableClass *drawable_class = GDK_DRAWABLE_CLASS (klass);
 150
 151   parent_class = g_type_class_peek_parent (klass);
 152
 153   drawable_class->create_gc = _gdk_win32_gc_new;
 154   drawable_class->draw_rectangle = gdk_win32_draw_rectangle;
 155   drawable_class->draw_arc = gdk_win32_draw_arc;
 156   drawable_class->draw_polygon = gdk_win32_draw_polygon;
 157   drawable_class->draw_text = gdk_win32_draw_text;
 158   drawable_class->draw_text_wc = gdk_win32_draw_text_wc;
 159   drawable_class->draw_drawable = gdk_win32_draw_drawable;
 160   drawable_class->draw_points = gdk_win32_draw_points;
 161   drawable_class->draw_segments = gdk_win32_draw_segments;
 162   drawable_class->draw_lines = gdk_win32_draw_lines;
 163   drawable_class->draw_glyphs = gdk_win32_draw_glyphs;
 164   drawable_class->draw_image = gdk_win32_draw_image;
 165
 166   drawable_class->set_colormap = gdk_win32_set_colormap;
 167   drawable_class->get_colormap = gdk_win32_get_colormap;
 168
 169   drawable_class->get_depth = gdk_win32_get_depth;
 170 }
 171
 172 /*****************************************************
 173  * Win32 specific implementations of generic functions *
 174  *****************************************************/
 175
 176 static GdkColormap*
 177 gdk_win32_get_colormap (GdkDrawable *drawable)
 178 {
 179   GdkDrawableImplWin32 *impl;
 180
 181   impl = GDK_DRAWABLE_IMPL_WIN32 (drawable);
 182
 183   return impl->colormap;
 184 }
 185
 186 static void
 187 gdk_win32_set_colormap (GdkDrawable *drawable,
 188                         GdkColormap *colormap)
 189 {
 190   GdkDrawableImplWin32 *impl;
 191
 192   g_return_if_fail (colormap != NULL);
 193
 194   impl = GDK_DRAWABLE_IMPL_WIN32 (drawable);
 195
 196   if (impl->colormap == colormap)
 197     return;
 198
 199   if (impl->colormap)
 200     gdk_colormap_unref (impl->colormap);
 201   impl->colormap = colormap;
 202   if (impl->colormap)
 203     gdk_colormap_ref (impl->colormap);
 204 }
 205
 206 /* Drawing
 207  */
 208
 209 static void
 210 gdk_win32_draw_rectangle (GdkDrawable *drawable,
 211                           GdkGC       *gc,
 212                           gint         filled,
 213                           gint         x,
 214                           gint         y,
 215                           gint         width,
 216                           gint         height)
 217 {
 218   GdkGCWin32 *gc_private = GDK_GC_WIN32 (gc);
 219   const GdkGCValuesMask mask = GDK_GC_FOREGROUND|GDK_GC_BACKGROUND;
 220   HDC hdc;
 221   HGDIOBJ oldpen, oldbrush;
 222   HBRUSH hbr = NULL;
 223   POINT pts[4];
 224   gboolean ok = TRUE;
 225
 226   GDK_NOTE (MISC, g_print ("gdk_win32_draw_rectangle: %#x (%p) %s%dx%d@+%d+%d\n",
 227                            (guint) GDK_DRAWABLE_HANDLE (drawable),
 228                            gc_private,
 229                            (filled ? "fill " : ""),
 230                            width, height, x, y));
 231
 232   hdc = gdk_win32_hdc_get (drawable, gc, mask);
 233
 234 #if 0
 235   {
 236     HBRUSH hbr = GetCurrentObject (hdc, OBJ_BRUSH);
 237     HPEN hpen = GetCurrentObject (hdc, OBJ_PEN);
 238     LOGBRUSH lbr;
 239     LOGPEN lpen;
 240     GetObject (hbr, sizeof (lbr), &lbr);
 241     GetObject (hpen, sizeof (lpen), &lpen);
 242
 243     g_print ("current brush: style = %s, color = 0x%.08x\n",
 244              (lbr.lbStyle == BS_SOLID ? "SOLID" : "???"),
 245              lbr.lbColor);
 246     g_print ("current pen: style = %s, width = %d, color = 0x%.08x\n",
 247              (lpen.lopnStyle == PS_SOLID ? "SOLID" : "???"),
 248              lpen.lopnWidth,
 249              lpen.lopnColor);
 250   }
 251 #endif
 252
 253   if (gc_private->fill_style == GDK_OPAQUE_STIPPLED)
 254     {
 255       if (!BeginPath (hdc))
 256         WIN32_GDI_FAILED ("BeginPath"), ok = FALSE;
 257
 258       /* Win9x doesn't support Rectangle calls in a path,
 259        * thus use Polyline.
 260        */
 261
 262       pts[0].x = x;
 263       pts[0].y = y;
 264       pts[1].x = x + width + 1;
 265       pts[1].y = y;
 266       pts[2].x = x + width + 1;
 267       pts[2].y = y + height + 1;
 268       pts[3].x = x;
 269       pts[3].y = y + height + 1;
 270
 271       if (ok)
 272         MoveToEx (hdc, x, y, NULL);
 273
 274       if (ok && !Polyline (hdc, pts, 4))
 275         WIN32_GDI_FAILED ("Polyline"), ok = FALSE;
 276
 277       if (ok && !CloseFigure (hdc))
 278         WIN32_GDI_FAILED ("CloseFigure"), ok = FALSE;
 279
 280       if (ok && !EndPath (hdc))
 281         WIN32_GDI_FAILED ("EndPath"), ok = FALSE;
 282
 283       if (ok && !filled)
 284         if (!WidenPath (hdc))
 285           WIN32_GDI_FAILED ("WidenPath"), ok = FALSE;
 286
 287       if (ok && !FillPath (hdc))
 288         WIN32_GDI_FAILED ("FillPath"), ok = FALSE;
 289
 290       if (hbr != NULL)
 291         if (!DeleteObject (hbr))
 292           WIN32_GDI_FAILED ("DeleteObject");
 293     }
 294   else
 295     {
 296       if (filled)
 297         oldpen = SelectObject (hdc, GetStockObject (NULL_PEN));
 298       else
 299         oldbrush = SelectObject (hdc, GetStockObject (HOLLOW_BRUSH));
 300
 301       if (!Rectangle (hdc, x, y, x+width+1, y+height+1))
 302         WIN32_GDI_FAILED ("Rectangle");
 303
 304       if (filled)
 305         SelectObject (hdc, oldpen);
 306       else
 307         SelectObject (hdc, oldbrush);
 308     }
 309
 310   gdk_win32_hdc_release (drawable, gc, mask);
 311 }
 312
 313 static void
 314 gdk_win32_draw_arc (GdkDrawable *drawable,
 315                     GdkGC       *gc,
 316                     gint         filled,
 317                     gint         x,
 318                     gint         y,
 319                     gint         width,
 320                     gint         height,
 321                     gint         angle1,
 322                     gint         angle2)
 323 {
 324   const GdkGCValuesMask mask = GDK_GC_FOREGROUND|GDK_GC_BACKGROUND;
 325   HDC hdc;
 326   int nXStartArc, nYStartArc, nXEndArc, nYEndArc;
 327
 328   GDK_NOTE (MISC, g_print ("gdk_draw_arc: %#x  %d,%d,%d,%d  %d %d\n",
 329                            (guint) GDK_DRAWABLE_HANDLE (drawable),
 330                            x, y, width, height, angle1, angle2));
 331
 332   /* Seems that drawing arcs with width or height <= 2 fails, at least
 333    * with my TNT card.
 334    */
 335   if (width <= 2 || height <= 2 || angle2 == 0)
 336     return;
 337
 338   hdc = gdk_win32_hdc_get (drawable, gc, mask);
 339
 340   if (angle2 >= 360*64)
 341     {
 342       nXStartArc = nYStartArc = nXEndArc = nYEndArc = 0;
 343     }
 344   else if (angle2 > 0)
 345     {
 346       /* The 100. is just an arbitrary value */
 347       nXStartArc = x + width/2 + 100. * cos(angle1/64.*2.*G_PI/360.);
 348       nYStartArc = y + height/2 + -100. * sin(angle1/64.*2.*G_PI/360.);
 349       nXEndArc = x + width/2 + 100. * cos((angle1+angle2)/64.*2.*G_PI/360.);
 350       nYEndArc = y + height/2 + -100. * sin((angle1+angle2)/64.*2.*G_PI/360.);
 351     }
 352   else
 353     {
 354       nXEndArc = x + width/2 + 100. * cos(angle1/64.*2.*G_PI/360.);
 355       nYEndArc = y + height/2 + -100. * sin(angle1/64.*2.*G_PI/360.);
 356       nXStartArc = x + width/2 + 100. * cos((angle1+angle2)/64.*2.*G_PI/360.);
 357       nYStartArc = y + height/2 + -100. * sin((angle1+angle2)/64.*2.*G_PI/360.);
 358     }
 359
 360   /* GDK_OPAQUE_STIPPLED arcs not implemented. */
 361
 362   if (filled)
 363     {
 364       GDK_NOTE (MISC, g_print ("...Pie(hdc,%d,%d,%d,%d,%d,%d,%d,%d)\n",
 365                                x, y, x+width, y+height,
 366                                nXStartArc, nYStartArc,
 367                                nXEndArc, nYEndArc));
 368       if (!Pie (hdc, x, y, x+width, y+height,
 369                 nXStartArc, nYStartArc, nXEndArc, nYEndArc))
 370         WIN32_GDI_FAILED ("Pie");
 371     }
 372   else
 373     {
 374       GDK_NOTE (MISC, g_print ("...Arc(hdc,%d,%d,%d,%d,%d,%d,%d,%d)\n",
 375                                x, y, x+width, y+height,
 376                                nXStartArc, nYStartArc,
 377                                nXEndArc, nYEndArc));
 378       if (!Arc (hdc, x, y, x+width, y+height,
 379                 nXStartArc, nYStartArc, nXEndArc, nYEndArc))
 380         WIN32_GDI_FAILED ("Arc");
 381     }
 382   gdk_win32_hdc_release (drawable, gc, mask);
 383 }
 384
 385 static void
 386 gdk_win32_draw_polygon (GdkDrawable *drawable,
 387                         GdkGC       *gc,
 388                         gint         filled,
 389                         GdkPoint    *points,
 390                         gint         npoints)
 391 {
 392   GdkGCWin32 *gc_private = GDK_GC_WIN32 (gc);
 393   const GdkGCValuesMask mask = GDK_GC_FOREGROUND|GDK_GC_BACKGROUND;
 394   HDC hdc;
 395   HBRUSH hbr = NULL;
 396   POINT *pts;
 397   gboolean ok = TRUE;
 398   int i;
 399
 400   GDK_NOTE (MISC, g_print ("gdk_win32_draw_polygon: %#x (%p) %d\n",
 401                            (guint) GDK_DRAWABLE_HANDLE (drawable),
 402                            gc_private,
 403                            npoints));
 404
 405   if (npoints < 2)
 406     return;
 407
 408   hdc = gdk_win32_hdc_get (drawable, gc, mask);
 409   pts = g_new (POINT, npoints+1);
 410
 411   for (i = 0; i < npoints; i++)
 412     {
 413       pts[i].x = points[i].x;
 414       pts[i].y = points[i].y;
 415     }
 416
 417   if (gc_private->fill_style == GDK_OPAQUE_STIPPLED)
 418     {
 419       if (!BeginPath (hdc))
 420         WIN32_GDI_FAILED ("BeginPath"), ok = FALSE;
 421
 422       if (ok)
 423         MoveToEx (hdc, points[0].x, points[0].y, NULL);
 424
 425       if (pts[0].x == pts[npoints-1].x && pts[0].y == pts[npoints-1].y)
 426         npoints--;
 427
 428       if (ok && !Polyline (hdc, pts, 4))
 429         WIN32_GDI_FAILED ("Polyline"), ok = FALSE;
 430
 431       if (ok && !CloseFigure (hdc))
 432         WIN32_GDI_FAILED ("CloseFigure"), ok = FALSE;
 433
 434       if (ok && !EndPath (hdc))
 435         WIN32_GDI_FAILED ("EndPath"), ok = FALSE;
 436
 437       if (ok && !filled)
 438         if (!WidenPath (hdc))
 439           WIN32_GDI_FAILED ("WidenPath"), ok = FALSE;
 440
 441       if (ok && !FillPath (hdc))
 442         WIN32_GDI_FAILED ("FillPath"), ok = FALSE;
 443
 444       if (hbr != NULL)
 445         if (!DeleteObject (hbr))
 446           WIN32_GDI_FAILED ("DeleteObject");
 447     }
 448   else
 449     {
 450       if (points[0].x != points[npoints-1].x
 451           || points[0].y != points[npoints-1].y)
 452         {
 453           pts[npoints].x = points[0].x;
 454           pts[npoints].y = points[0].y;
 455           npoints++;
 456         }
 457
 458       if (filled)
 459         {
 460           if (!Polygon (hdc, pts, npoints))
 461             WIN32_GDI_FAILED ("Polygon");
 462         }
 463       else
 464         {
 465           if (!Polyline (hdc, pts, npoints))
 466             WIN32_GDI_FAILED ("Polyline");
 467         }
 468     }
 469   g_free (pts);
 470   gdk_win32_hdc_release (drawable, gc, mask);
 471 }
 472
 473 typedef struct
 474 {
 475   gint x, y;
 476   HDC hdc;
 477 } gdk_draw_text_arg;
 478
 479 static void
 480 gdk_draw_text_handler (GdkWin32SingleFont *singlefont,
 481                        const wchar_t      *wcstr,
 482                        int                 wclen,
 483                        void               *arg)
 484 {
 485   HGDIOBJ oldfont;
 486   SIZE size;
 487   gdk_draw_text_arg *argp = (gdk_draw_text_arg *) arg;
 488
 489   if (!singlefont)
 490     return;
 491
 492   if ((oldfont = SelectObject (argp->hdc, singlefont->hfont)) == NULL)
 493     {
 494       WIN32_GDI_FAILED ("SelectObject");
 495       return;
 496     }
 497
 498   if (!TextOutW (argp->hdc, argp->x, argp->y, wcstr, wclen))
 499     WIN32_GDI_FAILED ("TextOutW");
 500   GetTextExtentPoint32W (argp->hdc, wcstr, wclen, &size);
 501   argp->x += size.cx;
 502
 503   SelectObject (argp->hdc, oldfont);
 504 }
 505
 506 static void
 507 gdk_win32_draw_text (GdkDrawable *drawable,
 508                      GdkFont     *font,
 509                      GdkGC       *gc,
 510                      gint         x,
 511                      gint         y,
 512                      const gchar *text,
 513                      gint         text_length)
 514 {
 515   const GdkGCValuesMask mask = GDK_GC_FOREGROUND|GDK_GC_FONT;
 516   wchar_t *wcstr, wc;
 517   gint wlen;
 518   gdk_draw_text_arg arg;
 519
 520   if (text_length == 0)
 521     return;
 522
 523   g_assert (font->type == GDK_FONT_FONT || font->type == GDK_FONT_FONTSET);
 524
 525   arg.x = x;
 526   arg.y = y;
 527   arg.hdc = gdk_win32_hdc_get (drawable, gc, mask);
 528
 529   GDK_NOTE (MISC, g_print ("gdk_draw_text: %#x (%d,%d) \"%.*s\" (len %d)\n",
 530                            (guint) GDK_DRAWABLE_HANDLE (drawable),
 531                            x, y,
 532                            (text_length > 10 ? 10 : text_length),
 533                            text, text_length));
 534
 535   if (text_length == 1)
 536     {
 537       /* For single characters, don't try to interpret as UTF-8. */
 538       wc = (guchar) text[0];
 539       gdk_wchar_text_handle (font, &wc, 1, gdk_draw_text_handler, &arg);
 540     }
 541   else
 542     {
 543       wcstr = g_new (wchar_t, text_length);
 544       if ((wlen = gdk_nmbstowchar_ts (wcstr, text, text_length, text_length)) == -1)
 545         g_warning ("gdk_win32_draw_text: gdk_nmbstowchar_ts failed");
 546       else
 547         gdk_wchar_text_handle (font, wcstr, wlen, gdk_draw_text_handler, &arg);
 548       g_free (wcstr);
 549     }
 550
 551
 552   gdk_win32_hdc_release (drawable, gc, mask);
 553 }
 554
 555 static void
 556 gdk_win32_draw_text_wc (GdkDrawable      *drawable,
 557                         GdkFont          *font,
 558                         GdkGC            *gc,
 559                         gint              x,
 560                         gint              y,
 561                         const GdkWChar *text,
 562                         gint              text_length)
 563 {
 564   const GdkGCValuesMask mask = GDK_GC_FOREGROUND|GDK_GC_FONT;
 565   gint i;
 566   wchar_t *wcstr;
 567   gdk_draw_text_arg arg;
 568
 569   if (text_length == 0)
 570     return;
 571
 572   g_assert (font->type == GDK_FONT_FONT || font->type == GDK_FONT_FONTSET);
 573
 574   arg.x = x;
 575   arg.y = y;
 576   arg.hdc = gdk_win32_hdc_get (drawable, gc, mask);
 577
 578   GDK_NOTE (MISC, g_print ("gdk_draw_text_wc: %#x (%d,%d) len: %d\n",
 579                            (guint) GDK_DRAWABLE_HANDLE (drawable),
 580                            x, y, text_length));
 581
 582   if (sizeof (wchar_t) != sizeof (GdkWChar))
 583     {
 584       wcstr = g_new (wchar_t, text_length);
 585       for (i = 0; i < text_length; i++)
 586         wcstr[i] = text[i];
 587     }
 588   else
 589     wcstr = (wchar_t *) text;
 590
 591   gdk_wchar_text_handle (font, wcstr, text_length,
 592                          gdk_draw_text_handler, &arg);
 593
 594   if (sizeof (wchar_t) != sizeof (GdkWChar))
 595     g_free (wcstr);
 596
 597   gdk_win32_hdc_release (drawable, gc, mask);
 598 }
 599
 600 static void
 601 gdk_win32_draw_drawable (GdkDrawable *drawable,
 602                          GdkGC       *gc,
 603                          GdkPixmap   *src,
 604                          gint         xsrc,
 605                          gint         ysrc,
 606                          gint         xdest,
 607                          gint         ydest,
 608                          gint         width,
 609                          gint         height)
 610 {
 611   HDC hdc;
 612   HDC srcdc;
 613   HGDIOBJ hgdiobj;
 614   HRGN src_rgn, draw_rgn, outside_rgn;
 615   RECT r;
 616   gint src_width, src_height;
 617   gboolean ok = TRUE;
 618
 619   GDK_NOTE (MISC, g_print ("gdk_draw_pixmap: dest: %#x @+%d+%d"
 620                            "src: %#x %dx%d@+%d+%d\n",
 621                            (guint) GDK_DRAWABLE_HANDLE (drawable),
 622                            xdest, ydest,
 623                            (guint) GDK_PIXMAP_HBITMAP (src),
 624                            width, height, xsrc, ysrc));
 625
 626   hdc = gdk_win32_hdc_get (drawable, gc, 0);
 627
 628   gdk_drawable_get_size (src, &src_width, &src_height);
 629   src_rgn = CreateRectRgn (0, 0, src_width + 1, src_height + 1);
 630   draw_rgn = CreateRectRgn (xsrc, ysrc, xsrc + width + 1, ysrc + height + 1);
 631
 632   if (GDK_IS_WINDOW (drawable))
 633     {
 634       /* If we are drawing on a window, calculate the region that is
 635        * outside the source pixmap, and invalidate that, causing it to
 636        * be cleared. XXX
 637        */
 638       SetRectEmpty (&r);
 639       outside_rgn = CreateRectRgnIndirect (&r);
 640       if (CombineRgn (outside_rgn, draw_rgn, src_rgn, RGN_DIFF) != NULLREGION)
 641         {
 642           OffsetRgn (outside_rgn, xdest, ydest);
 643           GDK_NOTE (MISC, (GetRgnBox (outside_rgn, &r),
 644                            g_print ("...calling InvalidateRgn, "
 645                                     "bbox: %ldx%ld@+%ld+%ld\n",
 646                                     r.right - r.left - 1, r.bottom - r.top - 1,
 647                                     r.left, r.top)));
 648           InvalidateRgn (GDK_DRAWABLE_HANDLE (drawable), outside_rgn, TRUE);
 649         }
 650       DeleteObject (outside_rgn);
 651     }
 652
 653 #if 1 /* Don't know if this is necessary  */
 654   if (CombineRgn (draw_rgn, draw_rgn, src_rgn, RGN_AND) == COMPLEXREGION)
 655     g_warning ("gdk_win32_draw_drawable: CombineRgn returned a COMPLEXREGION");
 656
 657   GetRgnBox (draw_rgn, &r);
 658   if (r.left != xsrc
 659       || r.top != ysrc
 660       || r.right != xsrc + width + 1
 661       || r.bottom != ysrc + height + 1)
 662     {
 663       xdest += r.left - xsrc;
 664       xsrc = r.left;
 665       ydest += r.top - ysrc;
 666       ysrc = r.top;
 667       width = r.right - xsrc - 1;
 668       height = r.bottom - ysrc - 1;
 669
 670       GDK_NOTE (MISC, g_print ("... restricted to src: %dx%d@+%d+%d, "
 671                                "dest: @+%d+%d\n",
 672                                width, height, xsrc, ysrc,
 673                                xdest, ydest));
 674     }
 675 #endif
 676
 677   DeleteObject (src_rgn);
 678   DeleteObject (draw_rgn);
 679
 680   /* This function is called also to bitblt from a window.
 681    */
 682   if (GDK_IS_PIXMAP (src))
 683     {
 684       if ((srcdc = CreateCompatibleDC (hdc)) == NULL)
 685         WIN32_GDI_FAILED ("CreateCompatibleDC"), ok = FALSE;
 686
 687       if (ok && (hgdiobj = SelectObject (srcdc, GDK_PIXMAP_HBITMAP (src))) == NULL)
 688         WIN32_GDI_FAILED ("SelectObject"), ok = FALSE;
 689
 690       if (ok && !BitBlt (hdc, xdest, ydest, width, height,
 691                          srcdc, xsrc, ysrc, SRCCOPY))
 692         WIN32_GDI_FAILED ("BitBlt");
 693
 694       if (ok && (SelectObject (srcdc, hgdiobj) == NULL))
 695         WIN32_GDI_FAILED ("SelectObject");
 696
 697       if (srcdc != NULL && !DeleteDC (srcdc))
 698         WIN32_GDI_FAILED ("DeleteDC");
 699     }
 700   else if (GDK_DRAWABLE_HANDLE (drawable) == GDK_DRAWABLE_HANDLE (src))
 701     {
 702       /* Blitting inside a window, use ScrollDC */
 703       RECT scrollRect, clipRect, emptyRect;
 704       HRGN updateRgn;
 705
 706       scrollRect.left = MIN (xsrc, xdest);
 707       scrollRect.top = MIN (ysrc, ydest);
 708       scrollRect.right = MAX (xsrc + width + 1, xdest + width + 1);
 709       scrollRect.bottom = MAX (ysrc + height + 1, ydest + height + 1);
 710
 711       clipRect.left = xdest;
 712       clipRect.top = ydest;
 713       clipRect.right = xdest + width + 1;
 714       clipRect.bottom = ydest + height + 1;
 715
 716       SetRectEmpty (&emptyRect);
 717       updateRgn = CreateRectRgnIndirect (&emptyRect);
 718       if (!ScrollDC (hdc, xdest - xsrc, ydest - ysrc,
 719                      &scrollRect, &clipRect,
 720                      updateRgn, NULL))
 721         WIN32_GDI_FAILED ("ScrollDC"), ok = FALSE;
 722       if (ok && !InvalidateRgn (GDK_WINDOW_HWND (drawable), updateRgn, FALSE))
 723         WIN32_GDI_FAILED ("InvalidateRgn"), ok = FALSE;
 724       if (ok && !UpdateWindow (GDK_WINDOW_HWND (drawable)))
 725         WIN32_GDI_FAILED ("UpdateWindow");
 726       DeleteObject (updateRgn);
 727     }
 728   else
 729     {
 730       if ((srcdc = GetDC (GDK_WINDOW_HWND (src))) == NULL)
 731         WIN32_GDI_FAILED ("GetDC"), ok = FALSE;
 732
 733       if (ok && !BitBlt (hdc, xdest, ydest, width, height,
 734                          srcdc, xsrc, ysrc, SRCCOPY))
 735         WIN32_GDI_FAILED ("BitBlt");
 736       ReleaseDC (GDK_WINDOW_HWND (src), srcdc);
 737     }
 738   gdk_win32_hdc_release (drawable, gc, 0);
 739 }
 740
 741 static void
 742 gdk_win32_draw_points (GdkDrawable *drawable,
 743                        GdkGC       *gc,
 744                        GdkPoint    *points,
 745                        gint         npoints)
 746 {
 747   HDC hdc;
 748   COLORREF fg;
 749   GdkGCWin32 *gc_private = GDK_GC_WIN32 (gc);
 750   GdkDrawableImplWin32 *impl = GDK_DRAWABLE_IMPL_WIN32 (drawable);
 751   int i;
 752
 753   hdc = gdk_win32_hdc_get (drawable, gc, 0);
 754
 755   fg = gdk_colormap_color (impl->colormap, gc_private->foreground);
 756
 757   GDK_NOTE (MISC, g_print ("gdk_draw_points: %#x %dx%.06x\n",
 758                            (guint) GDK_DRAWABLE_HANDLE (drawable),
 759                            npoints, (guint) fg));
 760
 761   for (i = 0; i < npoints; i++)
 762     SetPixel (hdc, points[i].x, points[i].y, fg);
 763
 764   gdk_win32_hdc_release (drawable, gc, 0);
 765 }
 766
 767 static void
 768 gdk_win32_draw_segments (GdkDrawable *drawable,
 769                          GdkGC       *gc,
 770                          GdkSegment  *segs,
 771                          gint         nsegs)
 772 {
 773   GdkGCWin32 *gc_private = GDK_GC_WIN32 (gc);
 774   const GdkGCValuesMask mask = GDK_GC_FOREGROUND|GDK_GC_BACKGROUND;
 775   HDC hdc;
 776   HBRUSH hbr = NULL;
 777   gboolean ok = TRUE;
 778   int i;
 779
 780   GDK_NOTE (MISC, g_print ("gdk_win32_draw_segments: %#x nsegs: %d\n",
 781                            (guint) GDK_DRAWABLE_HANDLE (drawable), nsegs));
 782
 783   hdc = gdk_win32_hdc_get (drawable, gc, mask);
 784
 785   if (gc_private->fill_style == GDK_OPAQUE_STIPPLED)
 786     {
 787       if (!BeginPath (hdc))
 788         WIN32_GDI_FAILED ("BeginPath"), ok = FALSE;
 789
 790       for (i = 0; ok && i < nsegs; i++)
 791         {
 792           if (ok && !MoveToEx (hdc, segs[i].x1, segs[i].y1, NULL))
 793             WIN32_GDI_FAILED ("MoveToEx"), ok = FALSE;
 794           if (ok && !LineTo (hdc, segs[i].x2, segs[i].y2))
 795             WIN32_GDI_FAILED ("LineTo"), ok = FALSE;
 796
 797           /* Draw end pixel */
 798           if (ok && gc_private->pen_width <= 1)
 799             if (!LineTo (hdc, segs[i].x2 + 1, segs[i].y2))
 800               WIN32_GDI_FAILED ("LineTo"), ok = FALSE;
 801         }
 802
 803       if (ok && !EndPath (hdc))
 804         WIN32_GDI_FAILED ("EndPath"), ok = FALSE;
 805
 806       if (ok && !WidenPath (hdc))
 807         WIN32_GDI_FAILED ("WidenPath"), ok = FALSE;
 808
 809       if (ok && !FillPath (hdc))
 810         WIN32_GDI_FAILED ("FillPath"), ok = FALSE;
 811
 812       if (hbr != NULL)
 813         if (!DeleteObject (hbr))
 814           WIN32_GDI_FAILED ("DeleteObject");
 815     }
 816   else
 817     {
 818       for (i = 0; ok && i < nsegs; i++)
 819         {
 820           if (!MoveToEx (hdc, segs[i].x1, segs[i].y1, NULL))
 821             WIN32_GDI_FAILED ("MoveToEx"), ok = FALSE;
 822           if (ok && !LineTo (hdc, segs[i].x2, segs[i].y2))
 823             WIN32_GDI_FAILED ("LineTo"), ok = FALSE;
 824
 825           /* Draw end pixel */
 826           if (ok && gc_private->pen_width <= 1)
 827             if (!LineTo (hdc, segs[i].x2 + 1, segs[i].y2))
 828               WIN32_GDI_FAILED ("LineTo"), ok = FALSE;
 829         }
 830     }
 831   gdk_win32_hdc_release (drawable, gc, mask);
 832 }
 833
 834 static void
 835 gdk_win32_draw_lines (GdkDrawable *drawable,
 836                       GdkGC       *gc,
 837                       GdkPoint    *points,
 838                       gint         npoints)
 839 {
 840   GdkGCWin32 *gc_private = GDK_GC_WIN32 (gc);
 841   const GdkGCValuesMask mask = GDK_GC_FOREGROUND|GDK_GC_BACKGROUND;
 842   HDC hdc;
 843   POINT *pts;
 844   int i;
 845   gboolean ok = TRUE;
 846
 847   if (npoints < 2)
 848     return;
 849
 850   hdc = gdk_win32_hdc_get (drawable, gc, mask);
 851
 852   pts = g_new (POINT, npoints);
 853
 854   for (i = 0; i < npoints; i++)
 855     {
 856       pts[i].x = points[i].x;
 857       pts[i].y = points[i].y;
 858     }
 859
 860   if (!Polyline (hdc, pts, npoints))
 861     WIN32_GDI_FAILED ("Polyline"), ok = FALSE;
 862
 863   g_free (pts);
 864
 865   /* Draw end pixel */
 866   if (ok && gc_private->pen_width <= 1)
 867     {
 868       MoveToEx (hdc, points[npoints-1].x, points[npoints-1].y, NULL);
 869       if (!LineTo (hdc, points[npoints-1].x + 1, points[npoints-1].y))
 870         WIN32_GDI_FAILED ("LineTo");
 871     }
 872   gdk_win32_hdc_release (drawable, gc, mask);
 873 }
 874
 875 static void
 876 gdk_win32_draw_glyphs (GdkDrawable      *drawable,
 877                        GdkGC            *gc,
 878                        PangoFont        *font,
 879                        gint              x,
 880                        gint              y,
 881                        PangoGlyphString *glyphs)
 882 {
 883   const GdkGCValuesMask mask = GDK_GC_FOREGROUND;
 884   HDC hdc;
 885
 886   hdc = gdk_win32_hdc_get (drawable, gc, mask);
 887
 888   /* HB: Maybe there should be a GDK_GC_PANGO flag for hdc_get */
 889   /* default write mode is transparent (leave background) */
 890   if (SetBkMode (hdc, TRANSPARENT) == 0)
 891     WIN32_GDI_FAILED ("SetBkMode");
 892
 893   if (GDI_ERROR == SetTextAlign (hdc, TA_LEFT|TA_BOTTOM|TA_NOUPDATECP))
 894     WIN32_GDI_FAILED ("SetTextAlign");
 895
 896   pango_win32_render (hdc, font, glyphs, x, y);
 897
 898   gdk_win32_hdc_release (drawable, gc, mask);
 899 }
 900
 901 static void
 902 gdk_win32_draw_image (GdkDrawable     *drawable,
 903                       GdkGC           *gc,
 904                       GdkImage        *image,
 905                       gint             xsrc,
 906                       gint             ysrc,
 907                       gint             xdest,
 908                       gint             ydest,
 909                       gint             width,
 910                       gint             height)
 911 {
 912   GdkDrawableImplWin32 *impl = GDK_DRAWABLE_IMPL_WIN32 (drawable);
 913   GdkImagePrivateWin32 *image_private = (GdkImagePrivateWin32 *) image;
 914   GdkColormapPrivateWin32 *colormap_private = (GdkColormapPrivateWin32 *) impl->colormap;
 915   HDC hdc, memdc;
 916   HGDIOBJ oldbitmap;
 917   DIBSECTION ds;
 918   static struct {
 919     BITMAPINFOHEADER bmiHeader;
 920     WORD bmiIndices[256];
 921   } bmi;
 922   static gboolean bmi_inited = FALSE;
 923   gboolean ok = TRUE;
 924   int i;
 925
 926   hdc = gdk_win32_hdc_get (drawable, gc, 0);
 927
 928   if (colormap_private && colormap_private->xcolormap->rc_palette)
 929     {
 930       if (!bmi_inited)
 931         {
 932           for (i = 0; i < 256; i++)
 933             bmi.bmiIndices[i] = i;
 934           bmi_inited = TRUE;
 935         }
 936
 937       if (GetObject (image_private->hbitmap, sizeof (DIBSECTION),
 938                      &ds) != sizeof (DIBSECTION))
 939         WIN32_GDI_FAILED ("GetObject"), ok = FALSE;
 940 #if 0
 941       g_print("xdest = %d, ydest = %d, xsrc = %d, ysrc = %d, width = %d, height = %d\n",
 942               xdest, ydest, xsrc, ysrc, width, height);
 943       g_print("bmWidth = %d, bmHeight = %d, bmBitsPixel = %d, bmBits = %p\n",
 944               ds.dsBm.bmWidth, ds.dsBm.bmHeight, ds.dsBm.bmBitsPixel, ds.dsBm.bmBits);
 945       g_print("biWidth = %d, biHeight = %d, biBitCount = %d, biClrUsed = %d\n",
 946               ds.dsBmih.biWidth, ds.dsBmih.biHeight, ds.dsBmih.biBitCount, ds.dsBmih.biClrUsed);
 947 #endif
 948       bmi.bmiHeader = ds.dsBmih;
 949       /* I have spent hours on getting the parameters to
 950        * SetDIBitsToDevice right. I wonder what drugs the guys in
 951        * Redmond were on when they designed this API.
 952        */
 953       if (ok && SetDIBitsToDevice (hdc,
 954                                    xdest, ydest,
 955                                    width, height,
 956                                    xsrc, (-ds.dsBmih.biHeight)-height-ysrc,
 957                                    0, -ds.dsBmih.biHeight,
 958                                    ds.dsBm.bmBits,
 959                                    (CONST BITMAPINFO *) &bmi,
 960                                    DIB_PAL_COLORS) == 0)
 961         WIN32_GDI_FAILED ("SetDIBitsToDevice");
 962     }
 963   else
 964     {
 965
 966       if ((memdc = CreateCompatibleDC (hdc)) == NULL)
 967         WIN32_GDI_FAILED ("CreateCompatibleDC"), ok = FALSE;
 968
 969       if (ok && (oldbitmap = SelectObject (memdc, image_private->hbitmap)) == NULL)
 970         WIN32_GDI_FAILED ("SelectObject"), ok = FALSE;
 971
 972       if (ok && !BitBlt (hdc, xdest, ydest, width, height,
 973                          memdc, xsrc, ysrc, SRCCOPY))
 974         WIN32_GDI_FAILED ("BitBlt");
 975
 976       if (oldbitmap != NULL && SelectObject (memdc, oldbitmap) == NULL)
 977         WIN32_GDI_FAILED ("SelectObject");
 978
 979       if (memdc != NULL && !DeleteDC (memdc))
 980         WIN32_GDI_FAILED ("DeleteDC");
 981     }
 982   gdk_win32_hdc_release (drawable, gc, 0);
 983 }
 984
 985 static gint
 986 gdk_win32_get_depth (GdkDrawable *drawable)
 987 {
 988   /* This is a bit bogus but I'm not sure the other way is better */
 989
 990   return gdk_drawable_get_depth (GDK_DRAWABLE_IMPL_WIN32 (drawable)->wrapper);
 991 }