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

   1 /* GDK - The GIMP Drawing Kit
   2  * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
   3  * Copyright (C) 1998-1999 Tor Lillqvist
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the
  17  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18  * Boston, MA 02111-1307, USA.
  19  */
  20
  21 /*
  22  * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
  23  * file for a list of people on the GTK+ Team.  See the ChangeLog
  24  * files for a list of changes.  These files are distributed with
  25  * GTK+ at ftp://ftp.gtk.org/pub/gtk/.
  26  */
  27
  28 #include "config.h"
  29
  30 /* Cannot use TrackMouseEvent, as the stupid WM_MOUSELEAVE message
  31  * doesn't tell us where the mouse has gone. Thus we cannot use it to
  32  * generate a correct GdkNotifyType. Pity, as using TrackMouseEvent
  33  * otherwise would make it possible to reliably generate
  34  * GDK_LEAVE_NOTIFY events, which would help get rid of those pesky
  35  * tooltips sometimes popping up in the wrong place.
  36  */
  37 /* define USE_TRACKMOUSEEVENT */
  38
  39 /* Do use SetCapture, it works now. Thanks to jpe@archaeopteryx.com */
  40 #define USE_SETCAPTURE 1
  41
  42 #include <stdio.h>
  43
  44 #include "gdkprivate-win32.h"
  45
  46 #include <objbase.h>
  47 #include <imm.h>
  48
  49 #ifdef HAVE_DIMM_H
  50 #include <dimm.h>
  51 #else
  52 #include "surrogate-dimm.h"
  53 #endif
  54
  55 #include "gdk.h"
  56 #include "gdkinternals.h"
  57 #include "gdkinput-win32.h"
  58
  59 #include "gdkkeysyms.h"
  60
  61 #define PING() printf("%s: %d\n",__FILE__,__LINE__),fflush(stdout)
  62
  63 typedef struct _GdkIOClosure GdkIOClosure;
  64 typedef struct _GdkEventPrivate GdkEventPrivate;
  65
  66 typedef enum
  67 {
  68   /* Following flag is set for events on the event queue during
  69    * translation and cleared afterwards.
  70    */
  71   GDK_EVENT_PENDING = 1 << 0
  72 } GdkEventFlags;
  73
  74 struct _GdkIOClosure
  75 {
  76   GdkInputFunction function;
  77   GdkInputCondition condition;
  78   GdkDestroyNotify notify;
  79   gpointer data;
  80 };
  81
  82 struct _GdkEventPrivate
  83 {
  84   GdkEvent event;
  85   guint    flags;
  86 };
  87
  88 /*
  89  * Private function declarations
  90  */
  91
  92 static GdkFilterReturn
  93                  gdk_event_apply_filters(MSG      *msg,
  94                                          GdkEvent *event,
  95                                          GList    *filters);
  96 static gboolean  gdk_event_translate    (GdkEvent *event,
  97                                          MSG      *msg,
  98                                          gboolean *ret_val_flagp,
  99                                          gint     *ret_valp,
 100                                          gboolean  return_exposes);
 101
 102 static gboolean gdk_event_prepare  (GSource     *source,
 103                                     gint        *timeout);
 104 static gboolean gdk_event_check    (GSource     *source);
 105 static gboolean gdk_event_dispatch (GSource     *source,
 106                                     GSourceFunc  callback,
 107                                     gpointer     user_data);
 108
 109 /* Private variable declarations
 110  */
 111
 112 static GdkWindow *p_grab_window = NULL; /* Window that currently
 113                                          * holds the pointer grab
 114                                          */
 115
 116 static GdkWindow *k_grab_window = NULL; /* Window the holds the
 117                                          * keyboard grab
 118                                          */
 119
 120 static GList *client_filters;   /* Filters for client messages */
 121
 122 static gboolean p_grab_automatic;
 123 static GdkEventMask p_grab_mask;
 124 static gboolean p_grab_owner_events, k_grab_owner_events;
 125 static HCURSOR p_grab_cursor;
 126
 127 static GSourceFuncs event_funcs = {
 128   gdk_event_prepare,
 129   gdk_event_check,
 130   gdk_event_dispatch,
 131   NULL
 132 };
 133
 134 GPollFD event_poll_fd;
 135
 136 static GdkWindow *current_window = NULL;
 137 static gint current_x, current_y;
 138 static gdouble current_x_root, current_y_root;
 139 static UINT gdk_ping_msg;
 140 static UINT msh_mousewheel_msg;
 141 static gboolean ignore_wm_char = FALSE;
 142 static gboolean is_altgr_key = FALSE;
 143
 144 static IActiveIMMApp *active_imm_app = NULL;
 145 static IActiveIMMMessagePumpOwner *active_imm_msgpump_owner = NULL;
 146
 147 typedef BOOL (WINAPI *PFN_TrackMouseEvent) (LPTRACKMOUSEEVENT);
 148 static PFN_TrackMouseEvent track_mouse_event = NULL;
 149
 150 static gboolean use_ime_composition = FALSE;
 151
 152 static LRESULT
 153 real_window_procedure (HWND   hwnd,
 154                        UINT   message,
 155                        WPARAM wparam,
 156                        LPARAM lparam)
 157 {
 158   GdkEventPrivate event;
 159   GdkEvent *eventp;
 160   MSG msg;
 161   DWORD pos;
 162   LRESULT lres;
 163   gint ret_val;
 164   gboolean ret_val_flag;
 165
 166   msg.hwnd = hwnd;
 167   msg.message = message;
 168   msg.wParam = wparam;
 169   msg.lParam = lparam;
 170   msg.time = GetTickCount ();
 171   pos = GetMessagePos ();
 172   msg.pt.x = LOWORD (pos);
 173   msg.pt.y = HIWORD (pos);
 174
 175   event.flags = GDK_EVENT_PENDING;
 176   if (gdk_event_translate (&event.event, &msg, &ret_val_flag, &ret_val, FALSE))
 177     {
 178       event.flags &= ~GDK_EVENT_PENDING;
 179 #if 1
 180       if (event.event.any.type == GDK_CONFIGURE)
 181         {
 182           /* Compress configure events */
 183           GList *list = gdk_queued_events;
 184
 185           while (list != NULL
 186                  && (((GdkEvent *)list->data)->any.type != GDK_CONFIGURE
 187                      || ((GdkEvent *)list->data)->any.window != event.event.any.window))
 188             list = list->next;
 189           if (list != NULL)
 190             {
 191               GDK_NOTE (EVENTS, g_print ("... compressing an CONFIGURE event\n"));
 192
 193               *((GdkEvent *)list->data) = event.event;
 194               gdk_drawable_unref (event.event.any.window);
 195               /* Wake up WaitMessage */
 196               PostMessage (NULL, gdk_ping_msg, 0, 0);
 197               return FALSE;
 198             }
 199         }
 200       else if (event.event.any.type == GDK_EXPOSE)
 201         {
 202           /* Compress expose events */
 203           GList *list = gdk_queued_events;
 204
 205           while (list != NULL
 206                  && (((GdkEvent *)list->data)->any.type != GDK_EXPOSE
 207                      || ((GdkEvent *)list->data)->any.window != event.event.any.window))
 208             list = list->next;
 209           if (list != NULL)
 210             {
 211               GdkRectangle u;
 212
 213               GDK_NOTE (EVENTS, g_print ("... compressing an EXPOSE event\n"));
 214               gdk_rectangle_union (&event.event.expose.area,
 215                                    &((GdkEvent *)list->data)->expose.area,
 216                                    &u);
 217               ((GdkEvent *)list->data)->expose.area = u;
 218               gdk_drawable_unref (event.event.any.window);
 219 #if 0
 220               /* Wake up WaitMessage */
 221               PostMessage (NULL, gdk_ping_msg, 0, 0);
 222 #endif
 223               return FALSE;
 224             }
 225         }
 226 #endif
 227       eventp = gdk_event_new ();
 228       *((GdkEventPrivate *) eventp) = event;
 229
 230       /* Philippe Colantoni <colanton@aris.ss.uci.edu> suggests this
 231        * in order to handle events while opaque resizing neatly.  I
 232        * don't want it as default. Set the
 233        * GDK_EVENT_FUNC_FROM_WINDOW_PROC env var to get this
 234        * behaviour.
 235        */
 236       if (gdk_event_func_from_window_proc && gdk_event_func)
 237         {
 238           GDK_THREADS_ENTER ();
 239
 240           (*gdk_event_func) (eventp, gdk_event_data);
 241           gdk_event_free (eventp);
 242
 243           GDK_THREADS_LEAVE ();
 244         }
 245       else
 246         {
 247           gdk_event_queue_append (eventp);
 248 #if 1
 249           /* Wake up WaitMessage */
 250           PostMessage (NULL, gdk_ping_msg, 0, 0);
 251 #endif
 252         }
 253
 254       if (ret_val_flag)
 255         return ret_val;
 256       else
 257         return FALSE;
 258     }
 259
 260   if (ret_val_flag)
 261     return ret_val;
 262   else
 263     {
 264       if (active_imm_app == NULL
 265           || (*active_imm_app->lpVtbl->OnDefWindowProc) (active_imm_app, hwnd, message, wparam, lparam, &lres) == S_FALSE)
 266         return DefWindowProc (hwnd, message, wparam, lparam);
 267       else
 268         return lres;
 269     }
 270 }
 271
 272 LRESULT CALLBACK
 273 gdk_window_procedure (HWND   hwnd,
 274                       UINT   message,
 275                       WPARAM wparam,
 276                       LPARAM lparam)
 277 {
 278   LRESULT retval;
 279
 280   GDK_NOTE (MISC, g_print ("gdk_window_procedure: %#lx %s\n",
 281                              (gulong) hwnd, gdk_win32_message_name (message)));
 282
 283   retval = real_window_procedure (hwnd, message, wparam, lparam);
 284
 285   GDK_NOTE (MISC, g_print ("gdk_window_procedure: %#lx returns %ld\n",
 286                              (gulong) hwnd, retval));
 287
 288   return retval;
 289 }
 290
 291 void
 292 gdk_events_init (void)
 293 {
 294   GSource *source;
 295   HRESULT hres;
 296 #ifdef USE_TRACKMOUSEEVENT
 297   HMODULE user32, imm32;
 298   HINSTANCE commctrl32;
 299 #endif
 300
 301   gdk_ping_msg = RegisterWindowMessage ("gdk-ping");
 302   GDK_NOTE (EVENTS, g_print ("gdk-ping = %#x\n", gdk_ping_msg));
 303
 304   /* This is the string MSH_MOUSEWHEEL from zmouse.h,
 305    * http://www.microsoft.com/mouse/intellimouse/sdk/zmouse.h
 306    * This message is used by mouse drivers than cannot generate WM_MOUSEWHEEL
 307    * or on Win95.
 308    */
 309   msh_mousewheel_msg = RegisterWindowMessage ("MSWHEEL_ROLLMSG");
 310   GDK_NOTE (EVENTS, g_print ("MSH_MOUSEWHEEL = %#x\n", msh_mousewheel_msg));
 311
 312   source = g_source_new (&event_funcs, sizeof (GSource));
 313   g_source_set_priority (source, GDK_PRIORITY_EVENTS);
 314
 315   event_poll_fd.fd = G_WIN32_MSG_HANDLE;
 316   event_poll_fd.events = G_IO_IN;
 317
 318   g_source_add_poll (source, &event_poll_fd);
 319   g_source_set_can_recurse (source, TRUE);
 320   g_source_attach (source, NULL);
 321
 322   hres = CoCreateInstance (&CLSID_CActiveIMM,
 323                            NULL,
 324                            CLSCTX_ALL,
 325                            &IID_IActiveIMMApp,
 326                            (LPVOID *) &active_imm_app);
 327
 328   if (hres == S_OK)
 329     {
 330       GDK_NOTE (EVENTS, g_print ("IActiveIMMApp created %p\n",
 331                                  active_imm_app));
 332       (*active_imm_app->lpVtbl->Activate) (active_imm_app, TRUE);
 333
 334       hres = (*active_imm_app->lpVtbl->QueryInterface) (active_imm_app, &IID_IActiveIMMMessagePumpOwner, &active_imm_msgpump_owner);
 335       GDK_NOTE (EVENTS, g_print ("IActiveIMMMessagePumpOwner created %p\n",
 336                                  active_imm_msgpump_owner));
 337       (active_imm_msgpump_owner->lpVtbl->Start) (active_imm_msgpump_owner);
 338     }
 339
 340 #ifdef USE_TRACKMOUSEEVENT
 341   user32 = GetModuleHandle ("user32.dll");
 342   if ((track_mouse_event = GetProcAddress (user32, "TrackMouseEvent")) == NULL)
 343     {
 344       if ((commctrl32 = LoadLibrary ("commctrl32.dll")) != NULL)
 345         track_mouse_event = (PFN_TrackMouseEvent)
 346           GetProcAddress (commctrl32, "_TrackMouseEvent");
 347     }
 348   if (track_mouse_event != NULL)
 349     GDK_NOTE (EVENTS, g_print ("Using TrackMouseEvent to detect leave events\n"));
 350 #endif
 351   if (IS_WIN_NT () && (windows_version & 0xFF) == 5)
 352     {
 353       /* On Win2k (Beta 3, at least) WM_IME_CHAR doesn't seem to work
 354        * correctly for non-Unicode applications. Handle
 355        * WM_IME_COMPOSITION with GCS_RESULTSTR instead, fetch the
 356        * Unicode char from the IME with ImmGetCompositionStringW().
 357        */
 358       use_ime_composition = TRUE;
 359     }
 360 }
 361
 362 /*
 363  *--------------------------------------------------------------
 364  * gdk_events_pending
 365  *
 366  *   Returns if events are pending on the queue.
 367  *
 368  * Arguments:
 369  *
 370  * Results:
 371  *   Returns TRUE if events are pending
 372  *
 373  * Side effects:
 374  *
 375  *--------------------------------------------------------------
 376  */
 377
 378 gboolean
 379 gdk_events_pending (void)
 380 {
 381   MSG msg;
 382
 383   return (gdk_event_queue_find_first() ||
 384           PeekMessage (&msg, NULL, 0, 0, PM_NOREMOVE));
 385 }
 386
 387 /*
 388  *--------------------------------------------------------------
 389  * gdk_event_get_graphics_expose
 390  *
 391  *   Waits for a GraphicsExpose or NoExpose event
 392  *
 393  * Arguments:
 394  *
 395  * Results:
 396  *   For GraphicsExpose events, returns a pointer to the event
 397  *   converted into a GdkEvent Otherwise, returns NULL.
 398  *
 399  * Side effects:
 400  *
 401  *-------------------------------------------------------------- */
 402
 403 GdkEvent*
 404 gdk_event_get_graphics_expose (GdkWindow *window)
 405 {
 406   MSG msg;
 407   GdkEvent *event;
 408
 409   g_return_val_if_fail (window != NULL, NULL);
 410
 411   GDK_NOTE (EVENTS, g_print ("gdk_event_get_graphics_expose\n"));
 412
 413 #if 0 /* ??? */
 414   /* Some nasty bugs here, just return NULL for now. */
 415   return NULL;
 416 #else
 417   if (PeekMessage (&msg, GDK_WINDOW_HWND (window), WM_PAINT, WM_PAINT, PM_REMOVE))
 418     {
 419       event = gdk_event_new ();
 420
 421       if (gdk_event_translate (event, &msg, NULL, NULL, TRUE))
 422         return event;
 423       else
 424         gdk_event_free (event);
 425     }
 426
 427   return NULL;
 428 #endif
 429 }
 430
 431 static char *
 432 event_mask_string (GdkEventMask mask)
 433 {
 434   static char bfr[500];
 435   char *p = bfr;
 436
 437   *p = '\0';
 438 #define BIT(x) \
 439   if (mask & GDK_##x##_MASK) \
 440     p += sprintf (p, "%s" #x, (p > bfr ? " " : ""))
 441   BIT(EXPOSURE);
 442   BIT(POINTER_MOTION);
 443   BIT(POINTER_MOTION_HINT);
 444   BIT(BUTTON_MOTION);
 445   BIT(BUTTON1_MOTION);
 446   BIT(BUTTON2_MOTION);
 447   BIT(BUTTON3_MOTION);
 448   BIT(BUTTON_PRESS);
 449   BIT(BUTTON_RELEASE);
 450   BIT(KEY_PRESS);
 451   BIT(KEY_RELEASE);
 452   BIT(ENTER_NOTIFY);
 453   BIT(LEAVE_NOTIFY);
 454   BIT(FOCUS_CHANGE);
 455   BIT(STRUCTURE);
 456   BIT(PROPERTY_CHANGE);
 457   BIT(VISIBILITY_NOTIFY);
 458   BIT(PROXIMITY_IN);
 459   BIT(PROXIMITY_OUT);
 460   BIT(SUBSTRUCTURE);
 461   BIT(SCROLL);
 462 #undef BIT
 463
 464   return bfr;
 465 }
 466
 467 /*
 468  *--------------------------------------------------------------
 469  * gdk_pointer_grab
 470  *
 471  *   Grabs the pointer to a specific window
 472  *
 473  * Arguments:
 474  *   "window" is the window which will receive the grab
 475  *   "owner_events" specifies whether events will be reported as is,
 476  *     or relative to "window"
 477  *   "event_mask" masks only interesting events
 478  *   "confine_to" limits the cursor movement to the specified window
 479  *   "cursor" changes the cursor for the duration of the grab
 480  *   "time" specifies the time
 481  *
 482  * Results:
 483  *
 484  * Side effects:
 485  *   requires a corresponding call to gdk_pointer_ungrab
 486  *
 487  *--------------------------------------------------------------
 488  */
 489
 490 GdkGrabStatus
 491 gdk_pointer_grab (GdkWindow    *window,
 492                   gboolean      owner_events,
 493                   GdkEventMask  event_mask,
 494                   GdkWindow    *confine_to,
 495                   GdkCursor    *cursor,
 496                   guint32       time)
 497 {
 498   HWND hwnd_confined_to;
 499   HCURSOR hcursor;
 500   GdkCursorPrivate *cursor_private;
 501   gint return_val;
 502
 503   g_return_val_if_fail (window != NULL, 0);
 504   g_return_val_if_fail (GDK_IS_WINDOW (window), 0);
 505   g_return_val_if_fail (confine_to == NULL || GDK_IS_WINDOW (confine_to), 0);
 506
 507   cursor_private = (GdkCursorPrivate*) cursor;
 508
 509   if (!confine_to || GDK_WINDOW_DESTROYED (confine_to))
 510     hwnd_confined_to = NULL;
 511   else
 512     hwnd_confined_to = GDK_WINDOW_HWND (confine_to);
 513
 514   if (!cursor)
 515     hcursor = NULL;
 516   else
 517     hcursor = cursor_private->hcursor;
 518
 519   return_val = _gdk_input_grab_pointer (window,
 520                                         owner_events,
 521                                         event_mask,
 522                                         confine_to,
 523                                         time);
 524
 525   if (return_val == GDK_GRAB_SUCCESS)
 526     {
 527       if (!GDK_WINDOW_DESTROYED (window))
 528         {
 529           GDK_NOTE (EVENTS, g_print ("gdk_pointer_grab: %#lx %s %#lx %s\n",
 530                                      (gulong) GDK_WINDOW_HWND (window),
 531                                      (owner_events ? "TRUE" : "FALSE"),
 532                                      (gulong) hcursor,
 533                                      event_mask_string (event_mask)));
 534           p_grab_mask = event_mask;
 535           p_grab_owner_events = (owner_events != 0);
 536           p_grab_automatic = FALSE;
 537
 538 #if USE_SETCAPTURE
 539           SetCapture (GDK_WINDOW_HWND (window));
 540 #endif
 541           return_val = GDK_GRAB_SUCCESS;
 542         }
 543       else
 544         return_val = GDK_GRAB_ALREADY_GRABBED;
 545     }
 546
 547   if (return_val == GDK_GRAB_SUCCESS)
 548     {
 549       p_grab_window = window;
 550       p_grab_cursor = hcursor;
 551     }
 552
 553   return return_val;
 554 }
 555
 556 /*
 557  *--------------------------------------------------------------
 558  * gdk_pointer_ungrab
 559  *
 560  *   Releases any pointer grab
 561  *
 562  * Arguments:
 563  *
 564  * Results:
 565  *
 566  * Side effects:
 567  *
 568  *--------------------------------------------------------------
 569  */
 570
 571 void
 572 gdk_pointer_ungrab (guint32 time)
 573 {
 574   GDK_NOTE (EVENTS, g_print ("gdk_pointer_ungrab\n"));
 575
 576   _gdk_input_ungrab_pointer (time);
 577
 578 #if USE_SETCAPTURE
 579   if (GetCapture () != NULL)
 580     ReleaseCapture ();
 581 #endif
 582
 583   p_grab_window = NULL;
 584 }
 585
 586 /*
 587  *--------------------------------------------------------------
 588  * find_window_for_pointer_event
 589  *
 590  *   Find the window a pointer event (mouse up, down, move) should
 591  *   be reported to.  If the return value != reported_window then
 592  *   the ref count of reported_window will be decremented and the
 593  *   ref count of the return value will be incremented.
 594  *
 595  * Arguments:
 596  *
 597  *  "reported_window" is the gdk window the xevent was reported relative to
 598  *  "xevent" is the win32 message
 599  *
 600  * Results:
 601  *
 602  * Side effects:
 603  *
 604  *--------------------------------------------------------------
 605  */
 606
 607 static GdkWindow*
 608 find_window_for_pointer_event (GdkWindow*  reported_window,
 609                                MSG*        msg)
 610 {
 611   HWND hwnd;
 612   POINTS points;
 613   POINT pt;
 614   GdkWindow* other_window;
 615
 616   if (p_grab_window == NULL || !p_grab_owner_events)
 617     return reported_window;
 618
 619   points = MAKEPOINTS (msg->lParam);
 620   pt.x = points.x;
 621   pt.y = points.y;
 622   ClientToScreen (msg->hwnd, &pt);
 623
 624   GDK_NOTE (EVENTS, g_print ("Finding window for grabbed pointer event at (%ld, %ld)\n",
 625                              pt.x, pt.y));
 626
 627   hwnd = WindowFromPoint (pt);
 628   if (hwnd == NULL)
 629     return reported_window;
 630   other_window = gdk_win32_handle_table_lookup ((GdkNativeWindow) hwnd);
 631   if (other_window == NULL)
 632     return reported_window;
 633
 634   GDK_NOTE (EVENTS, g_print ("Found window %#x for point (%ld, %ld)\n",
 635                              (guint) hwnd, pt.x, pt.y));
 636
 637   gdk_window_unref (reported_window);
 638   gdk_window_ref (other_window);
 639
 640   return other_window;
 641 }
 642
 643 /*
 644  *--------------------------------------------------------------
 645  * gdk_pointer_is_grabbed
 646  *
 647  *   Tell wether there is an active x pointer grab in effect
 648  *
 649  * Arguments:
 650  *
 651  * Results:
 652  *
 653  * Side effects:
 654  *
 655  *--------------------------------------------------------------
 656  */
 657
 658 gboolean
 659 gdk_pointer_is_grabbed (void)
 660 {
 661   return p_grab_window != NULL;
 662 }
 663
 664 /*
 665  *--------------------------------------------------------------
 666  * gdk_keyboard_grab
 667  *
 668  *   Grabs the keyboard to a specific window
 669  *
 670  * Arguments:
 671  *   "window" is the window which will receive the grab
 672  *   "owner_events" specifies whether events will be reported as is,
 673  *     or relative to "window"
 674  *   "time" specifies the time
 675  *
 676  * Results:
 677  *
 678  * Side effects:
 679  *   requires a corresponding call to gdk_keyboard_ungrab
 680  *
 681  *--------------------------------------------------------------
 682  */
 683
 684 GdkGrabStatus
 685 gdk_keyboard_grab (GdkWindow *window,
 686                    gboolean   owner_events,
 687                    guint32    time)
 688 {
 689   gint return_val;
 690
 691   g_return_val_if_fail (window != NULL, 0);
 692   g_return_val_if_fail (GDK_IS_WINDOW (window), 0);
 693
 694   GDK_NOTE (EVENTS, g_print ("gdk_keyboard_grab %#lx\n",
 695                              (gulong) GDK_WINDOW_HWND (window)));
 696
 697   if (!GDK_WINDOW_DESTROYED (window))
 698     {
 699       k_grab_owner_events = owner_events != 0;
 700       return_val = GDK_GRAB_SUCCESS;
 701     }
 702   else
 703     return_val = GDK_GRAB_ALREADY_GRABBED;
 704
 705   if (return_val == GDK_GRAB_SUCCESS)
 706     k_grab_window = window;
 707
 708   return return_val;
 709 }
 710
 711 /*
 712  *--------------------------------------------------------------
 713  * gdk_keyboard_ungrab
 714  *
 715  *   Releases any keyboard grab
 716  *
 717  * Arguments:
 718  *
 719  * Results:
 720  *
 721  * Side effects:
 722  *
 723  *--------------------------------------------------------------
 724  */
 725
 726 void
 727 gdk_keyboard_ungrab (guint32 time)
 728 {
 729   GDK_NOTE (EVENTS, g_print ("gdk_keyboard_ungrab\n"));
 730
 731   k_grab_window = NULL;
 732 }
 733
 734 static GdkFilterReturn
 735 gdk_event_apply_filters (MSG      *msg,
 736                          GdkEvent *event,
 737                          GList    *filters)
 738 {
 739   GdkEventFilter *filter;
 740   GList *tmp_list;
 741   GdkFilterReturn result;
 742
 743   tmp_list = filters;
 744
 745   while (tmp_list)
 746     {
 747       filter = (GdkEventFilter *) tmp_list->data;
 748
 749       result = (*filter->function) (msg, event, filter->data);
 750       if (result !=  GDK_FILTER_CONTINUE)
 751         return result;
 752
 753       tmp_list = tmp_list->next;
 754     }
 755
 756   return GDK_FILTER_CONTINUE;
 757 }
 758
 759 void
 760 gdk_add_client_message_filter (GdkAtom       message_type,
 761                                GdkFilterFunc func,
 762                                gpointer      data)
 763 {
 764   GdkClientFilter *filter = g_new (GdkClientFilter, 1);
 765
 766   filter->type = message_type;
 767   filter->function = func;
 768   filter->data = data;
 769
 770   client_filters = g_list_prepend (client_filters, filter);
 771 }
 772
 773 /* Thanks to Markus G. Kuhn <mkuhn@acm.org> for the ksysym<->Unicode
 774  * mapping functions, from the xterm sources.
 775  */
 776
 777 static void
 778 build_key_event_state (GdkEvent *event)
 779 {
 780   if (GetKeyState (VK_SHIFT) < 0)
 781     event->key.state |= GDK_SHIFT_MASK;
 782   if (GetKeyState (VK_CAPITAL) & 0x1)
 783     event->key.state |= GDK_LOCK_MASK;
 784   if (!is_altgr_key)
 785     {
 786       if (GetKeyState (VK_CONTROL) < 0)
 787         {
 788           event->key.state |= GDK_CONTROL_MASK;
 789 #if 0
 790           if (event->key.keyval < ' ')
 791             event->key.keyval += '@';
 792 #endif
 793         }
 794 #if 0
 795       else if (event->key.keyval < ' ')
 796         {
 797           event->key.state |= GDK_CONTROL_MASK;
 798           event->key.keyval += '@';
 799         }
 800 #endif
 801       if (GetKeyState (VK_MENU) < 0)
 802         event->key.state |= GDK_MOD1_MASK;
 803     }
 804 }
 805
 806 static gint
 807 build_pointer_event_state (MSG *msg)
 808 {
 809   gint state;
 810
 811   state = 0;
 812   if (msg->wParam & MK_CONTROL)
 813     state |= GDK_CONTROL_MASK;
 814   if (msg->wParam & MK_LBUTTON)
 815     state |= GDK_BUTTON1_MASK;
 816   if (msg->wParam & MK_MBUTTON)
 817     state |= GDK_BUTTON2_MASK;
 818   if (msg->wParam & MK_RBUTTON)
 819     state |= GDK_BUTTON3_MASK;
 820   if (msg->wParam & MK_SHIFT)
 821     state |= GDK_SHIFT_MASK;
 822   if (GetKeyState (VK_MENU) < 0)
 823     state |= GDK_MOD1_MASK;
 824   if (GetKeyState (VK_CAPITAL) & 0x1)
 825     state |= GDK_LOCK_MASK;
 826
 827   return state;
 828 }
 829
 830 static void
 831 build_keypress_event (GdkWindowImplWin32 *impl,
 832                       GdkEvent           *event,
 833                       MSG                *msg)
 834 {
 835   HIMC himc;
 836   gint i, bytecount, ucount, ucleft, len;
 837   guchar buf[100], *bp;
 838   wchar_t wbuf[100], *wcp;
 839
 840   event->key.type = GDK_KEY_PRESS;
 841   event->key.time = msg->time;
 842   event->key.state = 0;
 843
 844   if (msg->message == WM_IME_COMPOSITION)
 845     {
 846       himc = ImmGetContext (msg->hwnd);
 847
 848       bytecount = ImmGetCompositionStringW (himc, GCS_RESULTSTR,
 849                                             wbuf, sizeof (wbuf));
 850       ucount = bytecount / 2;
 851     }
 852   else
 853     {
 854       if (msg->message == WM_CHAR || msg->message == WM_SYSCHAR)
 855         {
 856           bytecount = MIN ((msg->lParam & 0xFFFF), sizeof (buf));
 857           for (i = 0; i < bytecount; i++)
 858             buf[i] = msg->wParam;
 859         }
 860       else /* WM_IME_CHAR */
 861         {
 862           event->key.keyval = GDK_VoidSymbol;
 863           if (msg->wParam & 0xFF00)
 864             {
 865               /* Contrary to some versions of the documentation,
 866                * the lead byte is the most significant byte.
 867                */
 868               buf[0] = ((msg->wParam >> 8) & 0xFF);
 869               buf[1] = (msg->wParam & 0xFF);
 870               bytecount = 2;
 871             }
 872           else
 873             {
 874               buf[0] = (msg->wParam & 0xFF);
 875               bytecount = 1;
 876             }
 877         }
 878
 879       /* Convert from the window's current code page
 880        * to Unicode. Then convert to UTF-8.
 881        * We don't handle the surrogate stuff. Should we?
 882        */
 883       ucount = MultiByteToWideChar (impl->charset_info.ciACP,
 884                                     0, buf, bytecount,
 885                                     wbuf, sizeof (wbuf) / sizeof (wbuf[0]));
 886
 887     }
 888   if (ucount == 0)
 889     event->key.keyval = GDK_VoidSymbol;
 890   else if (msg->message == WM_CHAR || msg->message == WM_SYSCHAR)
 891     {
 892       if (msg->wParam < ' ')
 893         {
 894           event->key.keyval = msg->wParam + '@';
 895           /* This is needed in case of Alt+nnn or Alt+0nnn (on the numpad)
 896            * where nnn<32
 897            */
 898           event->key.state |= GDK_CONTROL_MASK;
 899         }
 900       else
 901         event->key.keyval = gdk_unicode_to_keyval (wbuf[0]);
 902     }
 903
 904   build_key_event_state (event);
 905
 906   /* Build UTF-8 string */
 907   ucleft = ucount;
 908   len = 0;
 909   wcp = wbuf;
 910   while (ucleft-- > 0)
 911     {
 912       wchar_t c = *wcp++;
 913
 914       if (c < 0x80)
 915         len += 1;
 916       else if (c < 0x800)
 917         len += 2;
 918       else
 919         len += 3;
 920     }
 921
 922   event->key.string = g_malloc (len + 1);
 923   event->key.length = len;
 924
 925   ucleft = ucount;
 926   wcp = wbuf;
 927   bp = event->key.string;
 928   while (ucleft-- > 0)
 929     {
 930       int first;
 931       wchar_t c = *wcp++;
 932
 933       if (c < 0x80)
 934         {
 935           first = 0;
 936           len = 1;
 937         }
 938       else if (c < 0x800)
 939         {
 940           first = 0xc0;
 941           len = 2;
 942         }
 943       else
 944         {
 945           first = 0xe0;
 946           len = 3;
 947         }
 948
 949 #if 1
 950       /* Woo-hoo! */
 951       switch (len)
 952         {
 953         case 3: bp[2] = (c & 0x3f) | 0x80; c >>= 6; /* Fall through */
 954         case 2: bp[1] = (c & 0x3f) | 0x80; c >>= 6; /* Fall through */
 955         case 1: bp[0] = c | first;
 956         }
 957 #else
 958       for (i = len - 1; i > 0; --i)
 959         {
 960           bp[i] = (c & 0x3f) | 0x80;
 961           c >>= 6;
 962         }
 963       bp[0] = c | first;
 964 #endif
 965
 966       bp += len;
 967     }
 968   *bp = 0;
 969 }
 970
 971 static void
 972 build_keyrelease_event (GdkWindowImplWin32 *impl,
 973                         GdkEvent           *event,
 974                         MSG                *msg)
 975 {
 976   guchar buf;
 977   wchar_t wbuf;
 978
 979   event->key.type = GDK_KEY_RELEASE;
 980   event->key.time = msg->time;
 981   event->key.state = 0;
 982
 983   if (msg->message == WM_CHAR || msg->message == WM_SYSCHAR)
 984     if (msg->wParam < ' ')
 985       event->key.keyval = msg->wParam + '@';
 986     else
 987       {
 988         buf = msg->wParam;
 989         MultiByteToWideChar (impl->charset_info.ciACP,
 990                              0, &buf, 1, &wbuf, 1);
 991
 992         event->key.keyval = gdk_unicode_to_keyval (wbuf);
 993       }
 994   else
 995     event->key.keyval = GDK_VoidSymbol;
 996   build_key_event_state (event);
 997   event->key.string = NULL;
 998   event->key.length = 0;
 999 }
1000
1001 static void
1002 print_event_state (gint state)
1003 {
1004 #define CASE(bit) if (state & GDK_ ## bit ## _MASK) g_print (#bit " ");
1005   CASE (SHIFT);
1006   CASE (LOCK);
1007   CASE (CONTROL);
1008   CASE (MOD1);
1009   CASE (BUTTON1);
1010   CASE (BUTTON2);
1011   CASE (BUTTON3);
1012 #undef CASE
1013 }
1014
1015 static void
1016 print_window_state (GdkWindowState state)
1017 {
1018 #define CASE(bit) if (state & GDK_WINDOW_STATE_ ## bit ) g_print (#bit " ");
1019   CASE (WITHDRAWN);
1020   CASE (ICONIFIED);
1021   CASE (MAXIMIZED);
1022   CASE (STICKY);
1023 #undef CASE
1024 }
1025
1026 static void
1027 print_event (GdkEvent *event)
1028 {
1029   gchar *escaped, *kvname;
1030
1031   switch (event->any.type)
1032     {
1033 #define CASE(x) case x: g_print ( #x " "); break;
1034     CASE (GDK_NOTHING);
1035     CASE (GDK_DELETE);
1036     CASE (GDK_DESTROY);
1037     CASE (GDK_EXPOSE);
1038     CASE (GDK_MOTION_NOTIFY);
1039     CASE (GDK_BUTTON_PRESS);
1040     CASE (GDK_2BUTTON_PRESS);
1041     CASE (GDK_3BUTTON_PRESS);
1042     CASE (GDK_BUTTON_RELEASE);
1043     CASE (GDK_KEY_PRESS);
1044     CASE (GDK_KEY_RELEASE);
1045     CASE (GDK_ENTER_NOTIFY);
1046     CASE (GDK_LEAVE_NOTIFY);
1047     CASE (GDK_FOCUS_CHANGE);
1048     CASE (GDK_CONFIGURE);
1049     CASE (GDK_MAP);
1050     CASE (GDK_UNMAP);
1051     CASE (GDK_PROPERTY_NOTIFY);
1052     CASE (GDK_SELECTION_CLEAR);
1053     CASE (GDK_SELECTION_REQUEST);
1054     CASE (GDK_SELECTION_NOTIFY);
1055     CASE (GDK_PROXIMITY_IN);
1056     CASE (GDK_PROXIMITY_OUT);
1057     CASE (GDK_DRAG_ENTER);
1058     CASE (GDK_DRAG_LEAVE);
1059     CASE (GDK_DRAG_MOTION);
1060     CASE (GDK_DRAG_STATUS);
1061     CASE (GDK_DROP_START);
1062     CASE (GDK_DROP_FINISHED);
1063     CASE (GDK_CLIENT_EVENT);
1064     CASE (GDK_VISIBILITY_NOTIFY);
1065     CASE (GDK_NO_EXPOSE);
1066     CASE (GDK_SCROLL);
1067     CASE (GDK_WINDOW_STATE);
1068 #undef CASE
1069     }
1070   g_print ("%#lx ", (gulong) GDK_WINDOW_HWND (event->any.window));
1071
1072   switch (event->any.type)
1073     {
1074     case GDK_EXPOSE:
1075       g_print ("%dx%d@+%d+%d %d",
1076                event->expose.area.width,
1077                event->expose.area.height,
1078                event->expose.area.x,
1079                event->expose.area.y,
1080                event->expose.count);
1081       break;
1082     case GDK_MOTION_NOTIFY:
1083       g_print ("(%.4g,%.4g) %s",
1084                event->motion.x, event->motion.y,
1085                event->motion.is_hint ? "HINT " : "");
1086       print_event_state (event->motion.state);
1087       break;
1088     case GDK_BUTTON_PRESS:
1089     case GDK_2BUTTON_PRESS:
1090     case GDK_3BUTTON_PRESS:
1091     case GDK_BUTTON_RELEASE:
1092       g_print ("%d (%.4g,%.4g) ",
1093                event->button.button,
1094                event->button.x, event->button.y);
1095       print_event_state (event->button.state);
1096       break;
1097     case GDK_KEY_PRESS:
1098     case GDK_KEY_RELEASE:
1099       if (event->key.length == 0)
1100         escaped = g_strdup ("");
1101       else
1102         escaped = g_strescape (event->key.string, NULL);
1103       kvname = gdk_keyval_name (event->key.keyval);
1104       g_print ("%s %d:\"%s\" ",
1105                (kvname ? kvname : "??"),
1106                event->key.length,
1107                escaped);
1108       g_free (escaped);
1109       print_event_state (event->key.state);
1110       break;
1111     case GDK_ENTER_NOTIFY:
1112     case GDK_LEAVE_NOTIFY:
1113       g_print ("%s ",
1114                (event->crossing.detail == GDK_NOTIFY_INFERIOR ? "INFERIOR" :
1115                 (event->crossing.detail == GDK_NOTIFY_ANCESTOR ? "ANCESTOR" :
1116                  (event->crossing.detail == GDK_NOTIFY_NONLINEAR ? "NONLINEAR" :
1117                   "???"))));
1118       break;
1119     case GDK_SCROLL:
1120       g_print ("%s ",
1121                (event->scroll.direction == GDK_SCROLL_UP ? "UP" :
1122                 (event->scroll.direction == GDK_SCROLL_DOWN ? "DOWN" :
1123                  (event->scroll.direction == GDK_SCROLL_LEFT ? "LEFT" :
1124                   (event->scroll.direction == GDK_SCROLL_RIGHT ? "RIGHT" :
1125                    "???")))));
1126       print_event_state (event->scroll.state);
1127       break;
1128     case GDK_WINDOW_STATE:
1129       print_window_state (event->window_state.changed_mask);
1130       print_window_state (event->window_state.new_window_state);
1131     default:
1132       /* Nothing */
1133       break;
1134     }
1135   g_print ("\n");
1136 }
1137
1138 static gboolean
1139 gdk_window_is_child (GdkWindow *parent,
1140                      GdkWindow *window)
1141 {
1142   if (parent == NULL || window == NULL)
1143     return FALSE;
1144
1145   return (gdk_window_get_parent (window) == parent ||
1146           gdk_window_is_child (parent, gdk_window_get_parent (window)));
1147 }
1148
1149 static void
1150 synthesize_enter_or_leave_event (GdkWindow    *window,
1151                                  MSG          *msg,
1152                                  GdkEventType  type,
1153                                  GdkNotifyType detail,
1154                                  gint          x,
1155                                  gint          y)
1156 {
1157   GdkEvent *event;
1158
1159   event = gdk_event_new ();
1160   event->crossing.type = type;
1161   event->crossing.window = window;
1162   event->crossing.send_event = FALSE;
1163   gdk_window_ref (event->crossing.window);
1164   event->crossing.subwindow = NULL;
1165   event->crossing.time = msg->time;
1166   event->crossing.x = x;
1167   event->crossing.y = y;
1168   event->crossing.x_root = msg->pt.x;
1169   event->crossing.y_root = msg->pt.y;
1170   event->crossing.mode = GDK_CROSSING_NORMAL;
1171   event->crossing.detail = detail;
1172   event->crossing.focus = TRUE; /* ??? */
1173   event->crossing.state = 0; /* ??? */
1174
1175   gdk_event_queue_append (event);
1176
1177   if (type == GDK_ENTER_NOTIFY
1178       && GDK_WINDOW_OBJECT (window)->extension_events != 0)
1179     _gdk_input_enter_event (&event->crossing, window);
1180
1181   GDK_NOTE (EVENTS, print_event (event));
1182 }
1183
1184 static void
1185 synthesize_leave_event (GdkWindow    *window,
1186                         MSG          *msg,
1187                         GdkNotifyType detail)
1188 {
1189   POINT pt;
1190
1191   if (!(GDK_WINDOW_IMPL_WIN32 (GDK_WINDOW_OBJECT (window)->impl)->event_mask & GDK_LEAVE_NOTIFY_MASK))
1192     return;
1193
1194   /* Leave events are at (current_x,current_y) in current_window */
1195
1196   if (current_window != window)
1197     {
1198       pt.x = current_x;
1199       pt.y = current_y;
1200       ClientToScreen (GDK_WINDOW_HWND (current_window), &pt);
1201       ScreenToClient (GDK_WINDOW_HWND (window), &pt);
1202       synthesize_enter_or_leave_event (window, msg, GDK_LEAVE_NOTIFY, detail, pt.x, pt.y);
1203     }
1204   else
1205     synthesize_enter_or_leave_event (window, msg, GDK_LEAVE_NOTIFY, detail, current_x, current_y);
1206
1207 }
1208
1209 static void
1210 synthesize_enter_event (GdkWindow    *window,
1211                         MSG          *msg,
1212                         GdkNotifyType detail)
1213 {
1214   POINT pt;
1215
1216   if (!(GDK_WINDOW_IMPL_WIN32 (GDK_WINDOW_OBJECT (window)->impl)->event_mask & GDK_ENTER_NOTIFY_MASK))
1217     return;
1218
1219   /* Enter events are at LOWORD (msg->lParam), HIWORD
1220    * (msg->lParam) in msg->hwnd */
1221
1222   pt.x = LOWORD (msg->lParam);
1223   pt.y = HIWORD (msg->lParam);
1224   if (msg->hwnd != GDK_WINDOW_HWND (window))
1225     {
1226       ClientToScreen (msg->hwnd, &pt);
1227       ScreenToClient (GDK_WINDOW_HWND (window), &pt);
1228     }
1229   synthesize_enter_or_leave_event (window, msg, GDK_ENTER_NOTIFY, detail, pt.x, pt.y);
1230 }
1231
1232 static void
1233 synthesize_enter_events (GdkWindow    *from,
1234                          GdkWindow    *to,
1235                          MSG          *msg,
1236                          GdkNotifyType detail)
1237 {
1238   GdkWindow *prev = gdk_window_get_parent (to);
1239
1240   if (prev != from)
1241     synthesize_enter_events (from, prev, msg, detail);
1242   synthesize_enter_event (to, msg, detail);
1243 }
1244
1245 static void
1246 synthesize_leave_events (GdkWindow    *from,
1247                          GdkWindow    *to,
1248                          MSG          *msg,
1249                          GdkNotifyType detail)
1250 {
1251   GdkWindow *next = gdk_window_get_parent (from);
1252
1253   synthesize_leave_event (from, msg, detail);
1254   if (next != to)
1255     synthesize_leave_events (next, to, msg, detail);
1256 }
1257
1258 static void
1259 synthesize_crossing_events (GdkWindow *window,
1260                             MSG       *msg)
1261 {
1262   GdkWindow *intermediate, *tem, *common_ancestor;
1263
1264   if (gdk_window_is_child (current_window, window))
1265     {
1266       /* Pointer has moved to an inferior window. */
1267       synthesize_leave_event (current_window, msg, GDK_NOTIFY_INFERIOR);
1268
1269       /* If there are intermediate windows, generate ENTER_NOTIFY
1270        * events for them
1271        */
1272       intermediate = gdk_window_get_parent (window);
1273       if (intermediate != current_window)
1274         {
1275           synthesize_enter_events (current_window, intermediate, msg, GDK_NOTIFY_VIRTUAL);
1276         }
1277
1278       synthesize_enter_event (window, msg, GDK_NOTIFY_ANCESTOR);
1279     }
1280   else if (gdk_window_is_child (window, current_window))
1281     {
1282       /* Pointer has moved to an ancestor window. */
1283       synthesize_leave_event (current_window, msg, GDK_NOTIFY_ANCESTOR);
1284
1285       /* If there are intermediate windows, generate LEAVE_NOTIFY
1286        * events for them
1287        */
1288       intermediate = gdk_window_get_parent (current_window);
1289       if (intermediate != window)
1290         {
1291           synthesize_leave_events (intermediate, window, msg, GDK_NOTIFY_VIRTUAL);
1292         }
1293     }
1294   else if (current_window)
1295     {
1296       /* Find least common ancestor of current_window and window */
1297       tem = current_window;
1298       do {
1299         common_ancestor = gdk_window_get_parent (tem);
1300         tem = common_ancestor;
1301       } while (common_ancestor &&
1302                !gdk_window_is_child (common_ancestor, window));
1303       if (common_ancestor)
1304         {
1305           synthesize_leave_event (current_window, msg, GDK_NOTIFY_NONLINEAR);
1306           intermediate = gdk_window_get_parent (current_window);
1307           if (intermediate != common_ancestor)
1308             {
1309               synthesize_leave_events (intermediate, common_ancestor,
1310                                        msg, GDK_NOTIFY_NONLINEAR_VIRTUAL);
1311             }
1312           intermediate = gdk_window_get_parent (window);
1313           if (intermediate != common_ancestor)
1314             {
1315               synthesize_enter_events (common_ancestor, intermediate,
1316                                        msg, GDK_NOTIFY_NONLINEAR_VIRTUAL);
1317             }
1318           synthesize_enter_event (window, msg, GDK_NOTIFY_NONLINEAR);
1319         }
1320     }
1321   else
1322     {
1323       /* Dunno where we are coming from */
1324       synthesize_enter_event (window, msg, GDK_NOTIFY_UNKNOWN);
1325     }
1326
1327   if (current_window)
1328     gdk_window_unref (current_window);
1329   current_window = window;
1330   gdk_window_ref (current_window);
1331 }
1332
1333 static void
1334 translate_mouse_coords (GdkWindow *window1,
1335                         GdkWindow *window2,
1336                         MSG       *msg)
1337 {
1338   POINT pt;
1339
1340   pt.x = LOWORD (msg->lParam);
1341   pt.y = HIWORD (msg->lParam);
1342   ClientToScreen (GDK_WINDOW_HWND (window1), &pt);
1343   ScreenToClient (GDK_WINDOW_HWND (window2), &pt);
1344   msg->lParam = MAKELPARAM (pt.x, pt.y);
1345   GDK_NOTE (EVENTS, g_print ("...new coords are (%ld,%ld)\n", pt.x, pt.y));
1346 }
1347
1348 static gboolean
1349 propagate (GdkWindow  **window,
1350            MSG         *msg,
1351            GdkWindow   *grab_window,
1352            gboolean     grab_owner_events,
1353            gint         grab_mask,
1354            gboolean   (*doesnt_want_it) (gint mask,
1355                                          MSG *msg))
1356 {
1357   gboolean in_propagation = FALSE;
1358
1359   if (grab_window != NULL && !grab_owner_events)
1360     {
1361       /* Event source is grabbed with owner_events FALSE */
1362       GDK_NOTE (EVENTS, g_print ("...grabbed, owner_events FALSE, "));
1363       if ((*doesnt_want_it) (grab_mask, msg))
1364         {
1365           GDK_NOTE (EVENTS, g_print ("...grabber doesn't want it\n"));
1366           return FALSE;
1367         }
1368       else
1369         {
1370           GDK_NOTE (EVENTS, g_print ("...sending to grabber %#lx\n",
1371                                      (gulong) GDK_WINDOW_HWND (grab_window)));
1372           gdk_drawable_unref (*window);
1373           *window = grab_window;
1374           gdk_drawable_ref (*window);
1375           return TRUE;
1376         }
1377     }
1378   while (TRUE)
1379     {
1380      if ((*doesnt_want_it) (GDK_WINDOW_IMPL_WIN32 (GDK_WINDOW_OBJECT (*window)->impl)->event_mask, msg))
1381         {
1382           /* Owner doesn't want it, propagate to parent. */
1383           if (GDK_WINDOW (GDK_WINDOW_OBJECT (*window)->parent) == gdk_parent_root)
1384             {
1385               /* No parent; check if grabbed */
1386               if (grab_window != NULL)
1387                 {
1388                   /* Event source is grabbed with owner_events TRUE */
1389                   GDK_NOTE (EVENTS, g_print ("...undelivered, but grabbed\n"));
1390                   if ((*doesnt_want_it) (grab_mask, msg))
1391                     {
1392                       /* Grabber doesn't want it either */
1393                       GDK_NOTE (EVENTS, g_print ("...grabber doesn't want it\n"));
1394                       return FALSE;
1395                     }
1396                   else
1397                     {
1398                       /* Grabbed! */
1399                       GDK_NOTE (EVENTS,
1400                                 g_print ("...sending to grabber %#lx\n",
1401                                          (gulong) GDK_WINDOW_HWND (grab_window)));
1402                       gdk_drawable_unref (*window);
1403                       *window = grab_window;
1404                       gdk_drawable_ref (*window);
1405                       return TRUE;
1406                     }
1407                 }
1408               else
1409                 {
1410                   GDK_NOTE (EVENTS, g_print ("...undelivered\n"));
1411                   return FALSE;
1412                 }
1413             }
1414           else
1415             {
1416               gdk_drawable_unref (*window);
1417               *window = GDK_WINDOW (GDK_WINDOW_OBJECT (*window)->parent);
1418               gdk_drawable_ref (*window);
1419               GDK_NOTE (EVENTS, g_print ("%s %#lx",
1420                                          (in_propagation ? "," : " ...propagating to"),
1421                                          (gulong) GDK_WINDOW_HWND (*window)));
1422               /* The only branch where we actually continue the loop */
1423               in_propagation = TRUE;
1424             }
1425         }
1426       else
1427         return TRUE;
1428     }
1429 }
1430
1431 static gboolean
1432 doesnt_want_key (gint mask,
1433                  MSG *msg)
1434 {
1435   return (((msg->message == WM_KEYUP || msg->message == WM_SYSKEYUP)
1436            && !(mask & GDK_KEY_RELEASE_MASK))
1437           ||
1438           ((msg->message == WM_KEYDOWN || msg->message == WM_SYSKEYDOWN)
1439            && !(mask & GDK_KEY_PRESS_MASK)));
1440 }
1441
1442 static gboolean
1443 doesnt_want_char (gint mask,
1444                   MSG *msg)
1445 {
1446   return !(mask & (GDK_KEY_PRESS_MASK | GDK_KEY_RELEASE_MASK));
1447 }
1448
1449 static gboolean
1450 doesnt_want_button_press (gint mask,
1451                           MSG *msg)
1452 {
1453   return !(mask & GDK_BUTTON_PRESS_MASK);
1454 }
1455
1456 static gboolean
1457 doesnt_want_button_release (gint mask,
1458                             MSG *msg)
1459 {
1460   return !(mask & GDK_BUTTON_RELEASE_MASK);
1461 }
1462
1463 static gboolean
1464 doesnt_want_button_motion (gint mask,
1465                            MSG *msg)
1466 {
1467   return !((mask & GDK_POINTER_MOTION_MASK)
1468            || ((msg->wParam & (MK_LBUTTON|MK_MBUTTON|MK_RBUTTON))
1469                && (mask & GDK_BUTTON_MOTION_MASK))
1470            || ((msg->wParam & MK_LBUTTON)
1471                && (mask & GDK_BUTTON1_MOTION_MASK))
1472            || ((msg->wParam & MK_MBUTTON)
1473                && (mask & GDK_BUTTON2_MOTION_MASK))
1474            || ((msg->wParam & MK_RBUTTON)
1475                && (mask & GDK_BUTTON3_MOTION_MASK)));
1476 }
1477
1478 static gboolean
1479 doesnt_want_scroll (gint mask,
1480                     MSG *msg)
1481 {
1482 #if 0
1483   return !(mask & GDK_SCROLL_MASK);
1484 #else
1485   return !(mask & GDK_BUTTON_PRESS_MASK);
1486 #endif
1487 }
1488
1489 static char *
1490 decode_key_lparam (LPARAM lParam)
1491 {
1492   static char buf[100];
1493   char *p = buf;
1494
1495   if (HIWORD (lParam) & KF_UP)
1496     p += sprintf (p, "KF_UP ");
1497   if (HIWORD (lParam) & KF_REPEAT)
1498     p += sprintf (p, "KF_REPEAT ");
1499   if (HIWORD (lParam) & KF_ALTDOWN)
1500     p += sprintf (p, "KF_ALTDOWN ");
1501   if (HIWORD (lParam) & KF_EXTENDED)
1502     p += sprintf (p, "KF_EXTENDED ");
1503   p += sprintf (p, "sc%d rep%d", LOBYTE (HIWORD (lParam)), LOWORD (lParam));
1504
1505   return buf;
1506 }
1507
1508 static gboolean
1509 gdk_event_translate (GdkEvent *event,
1510                      MSG      *msg,
1511                      gboolean *ret_val_flagp,
1512                      gint     *ret_valp,
1513                      gboolean  return_exposes)
1514 {
1515   DWORD pidActWin;
1516   DWORD pidThis;
1517   PAINTSTRUCT paintstruct;
1518   HDC hdc;
1519   HDC bgdc;
1520   HGDIOBJ oldbitmap;
1521   HBRUSH hbr;
1522   COLORREF bg;
1523   RECT rect;
1524   POINT pt;
1525   MINMAXINFO *mmi;
1526   HWND hwnd;
1527   HCURSOR hcursor;
1528
1529   /* Invariant:
1530    * window_impl == GDK_WINDOW_IMPL_WIN32 (GDK_WINDOW_OBJECT (window)->impl)
1531    */
1532   GdkWindow *window;
1533   GdkWindowImplWin32 *window_impl;
1534 #define ASSIGN_WINDOW(rhs)                                                 \
1535   (window = rhs,                                                           \
1536    window_impl = (window ? GDK_WINDOW_IMPL_WIN32 (GDK_WINDOW_OBJECT (window)->impl) : NULL))
1537
1538   GdkWindow *orig_window, *new_window;
1539   GdkColormap *colormap;
1540   GdkColormapPrivateWin32 *colormap_private;
1541   GdkPixmap *pixmap;
1542   GdkPixmapImplWin32 *pixmap_impl;
1543   gint xoffset, yoffset;
1544
1545   int button;
1546   int i, j;
1547
1548   gchar buf[256];
1549   gboolean return_val;
1550
1551   return_val = FALSE;
1552
1553   if (ret_val_flagp)
1554     *ret_val_flagp = FALSE;
1555
1556   ASSIGN_WINDOW (gdk_win32_handle_table_lookup ((GdkNativeWindow) msg->hwnd));
1557   orig_window = window;
1558
1559   event->any.window = window;
1560
1561   /* InSendMessage() does not really mean the same as X11's send_event flag,
1562    * but it is close enough, says jpe@archaeopteryx.com.
1563    */
1564   event->any.send_event = InSendMessage ();
1565
1566   if (window == NULL)
1567     {
1568       /* Handle WM_QUIT here ? */
1569       if (msg->message == WM_QUIT)
1570         {
1571           GDK_NOTE (EVENTS, g_print ("WM_QUIT: %d\n", msg->wParam));
1572           exit (msg->wParam);
1573         }
1574       else if (msg->message == WM_MOVE
1575                || msg->message == WM_SIZE)
1576         {
1577           /* It's quite normal to get these messages before we have
1578            * had time to register the window in our lookup table, or
1579            * when the window is being destroyed and we already have
1580            * removed it. Repost the same message to our queue so that
1581            * we will get it later when we are prepared.
1582            */
1583           GDK_NOTE(MISC, g_print("gdk_event_translate: %#lx %s posted.\n",
1584                                  (gulong) msg->hwnd,
1585                                  msg->message == WM_MOVE ?
1586                                  "WM_MOVE" : "WM_SIZE"));
1587
1588           PostMessage (msg->hwnd, msg->message,
1589                        msg->wParam, msg->lParam);
1590         }
1591 #ifndef WITHOUT_WM_CREATE
1592       else if (WM_CREATE == msg->message)
1593         {
1594           window = (UNALIGNED GdkWindow*) (((LPCREATESTRUCT) msg->lParam)->lpCreateParams);
1595           GDK_WINDOW_HWND (window) = msg->hwnd;
1596           GDK_NOTE (EVENTS, g_print ("gdk_event_translate: created %#x\n",
1597                                      (guint) msg->hwnd));
1598 # if 0
1599           /* This should handle allmost all the other window==NULL cases.
1600            * This code is executed while gdk_window_new is in it's
1601            * CreateWindowEx call.
1602            * Don't insert xid there a second time, if it's done here.
1603            */
1604           gdk_drawable_ref (window);
1605           gdk_win32_handle_table_insert (&GDK_WINDOW_HWND(window), window);
1606 # endif
1607         }
1608       else
1609       {
1610         GDK_NOTE (EVENTS, g_print ("gdk_event_translate: %s for %#x (NULL)\n",
1611                                    gdk_win32_message_name(msg->message),
1612                                    (guint) msg->hwnd));
1613       }
1614 #endif
1615       return FALSE;
1616     }
1617
1618   gdk_drawable_ref (window);
1619
1620   if (!GDK_WINDOW_DESTROYED (window))
1621     {
1622       /* Check for filters for this window */
1623       GdkFilterReturn result;
1624
1625       result = gdk_event_apply_filters
1626         (msg, event, GDK_WINDOW_OBJECT (window)->filters);
1627
1628       if (result != GDK_FILTER_CONTINUE)
1629         {
1630           return_val =  (result == GDK_FILTER_TRANSLATE) ? TRUE : FALSE;
1631           if (ret_val_flagp)
1632             *ret_val_flagp = TRUE;
1633           if (ret_valp)
1634             *ret_valp = return_val;
1635           goto done;
1636         }
1637     }
1638
1639   /* to translate coordinates to the internal > 16 bit system */
1640   _gdk_windowing_window_get_offsets (window, &xoffset, &yoffset);
1641
1642   if (msg->message == gdk_selection_notify_msg)
1643     {
1644       GDK_NOTE (EVENTS, g_print ("gdk_selection_notify_msg: %#lx\n",
1645                                  (gulong) msg->hwnd));
1646
1647       event->selection.type = GDK_SELECTION_NOTIFY;
1648       event->selection.window = window;
1649       event->selection.selection = msg->wParam;
1650       event->selection.target = msg->lParam;
1651       event->selection.property = gdk_selection_property;
1652       event->selection.time = msg->time;
1653
1654       return_val = !GDK_WINDOW_DESTROYED (window);
1655
1656       goto done;
1657     }
1658   else if (msg->message == gdk_selection_request_msg)
1659     {
1660       GDK_NOTE (EVENTS, g_print ("gdk_selection_request_msg: %#lx\n",
1661                                  (gulong) msg->hwnd));
1662
1663       event->selection.type = GDK_SELECTION_REQUEST;
1664       event->selection.window = window;
1665       event->selection.selection = gdk_clipboard_atom;
1666       event->selection.target = GDK_TARGET_STRING;
1667       event->selection.property = gdk_selection_property;
1668       event->selection.requestor = (guint32) msg->hwnd;
1669       event->selection.time = msg->time;
1670
1671       return_val = !GDK_WINDOW_DESTROYED (window);
1672
1673       goto done;
1674     }
1675   else if (msg->message == gdk_selection_clear_msg)
1676     {
1677       GDK_NOTE (EVENTS, g_print ("gdk_selection_clear_msg: %#lx\n",
1678                                  (gulong) msg->hwnd));
1679
1680       event->selection.type = GDK_SELECTION_CLEAR;
1681       event->selection.window = window;
1682       event->selection.selection = msg->wParam;
1683       event->selection.time = msg->time;
1684
1685       return_val = !GDK_WINDOW_DESTROYED (window);
1686
1687       goto done;
1688     }
1689   else if (msg->message == msh_mousewheel_msg)
1690     {
1691       GDK_NOTE (EVENTS, g_print ("MSH_MOUSEWHEEL: %#lx %d\n",
1692                                  (gulong) msg->hwnd, msg->wParam));
1693
1694       event->scroll.type = GDK_SCROLL;
1695
1696       /* MSG_MOUSEWHEEL is delivered to the foreground window.  Work
1697        * around that. Also, the position is in screen coordinates, not
1698        * client coordinates as with the button messages.
1699        */
1700       pt.x = LOWORD (msg->lParam);
1701       pt.y = HIWORD (msg->lParam);
1702       if ((hwnd = WindowFromPoint (pt)) == NULL)
1703         goto done;
1704
1705       msg->hwnd = hwnd;
1706       if ((new_window = gdk_win32_handle_table_lookup ((GdkNativeWindow) msg->hwnd)) == NULL)
1707         goto done;
1708
1709       if (new_window != window)
1710         {
1711           gdk_drawable_unref (window);
1712           ASSIGN_WINDOW (new_window);
1713           gdk_drawable_ref (window);
1714         }
1715
1716       if (GDK_WINDOW_OBJECT (window)->extension_events != 0
1717           && gdk_input_ignore_core)
1718         {
1719           GDK_NOTE (EVENTS, g_print ("...ignored\n"));
1720           goto done;
1721         }
1722
1723       if (!propagate (&window, msg,
1724                       p_grab_window, p_grab_owner_events, p_grab_mask,
1725                       doesnt_want_scroll))
1726         goto done;
1727
1728       ASSIGN_WINDOW (window);
1729
1730       ScreenToClient (msg->hwnd, &pt);
1731       event->button.window = window;
1732       event->scroll.direction = ((int) msg->wParam > 0) ?
1733         GDK_SCROLL_UP : GDK_SCROLL_DOWN;
1734       event->scroll.window = window;
1735       event->scroll.time = msg->time;
1736       event->scroll.x = (gint16) pt.x + xoffset;
1737       event->scroll.y = (gint16) pt.y + yoffset;
1738       event->scroll.x_root = (gint16) LOWORD (msg->lParam);
1739       event->scroll.y_root = (gint16) HIWORD (msg->lParam);
1740       event->scroll.state = 0;  /* No state information with MSH_MOUSEWHEEL */
1741       event->scroll.device = gdk_core_pointer;
1742       return_val = !GDK_WINDOW_DESTROYED (window);
1743
1744       goto done;
1745     }
1746   else
1747     {
1748       GList *tmp_list;
1749       GdkFilterReturn result = GDK_FILTER_CONTINUE;
1750
1751       tmp_list = client_filters;
1752       while (tmp_list)
1753         {
1754           GdkClientFilter *filter = tmp_list->data;
1755           if (filter->type == msg->message)
1756             {
1757               GDK_NOTE (EVENTS, g_print ("client filter matched\n"));
1758               event->any.window = window;
1759               result = (*filter->function) (msg, event, filter->data);
1760               switch (result)
1761                 {
1762                 case GDK_FILTER_REMOVE:
1763                   *ret_val_flagp = TRUE;
1764                   *ret_valp = 0;
1765                   return_val = FALSE;
1766                   break;
1767
1768                 case GDK_FILTER_TRANSLATE:
1769                   return_val = TRUE;
1770                   break;
1771
1772                 case GDK_FILTER_CONTINUE:
1773                   *ret_val_flagp = TRUE;
1774                   *ret_valp = 1;
1775                   return_val = TRUE;
1776                   event->client.type = GDK_CLIENT_EVENT;
1777                   event->client.window = window;
1778                   event->client.message_type = msg->message;
1779                   event->client.data_format = 0;
1780                   event->client.data.l[0] = msg->wParam;
1781                   event->client.data.l[1] = msg->lParam;
1782                   break;
1783                 }
1784               goto done;
1785             }
1786           tmp_list = tmp_list->next;
1787         }
1788     }
1789
1790   switch (msg->message)
1791     {
1792     case WM_INPUTLANGCHANGE:
1793       GDK_NOTE (EVENTS,
1794                 g_print ("WM_INPUTLANGCHANGE: %#lx  charset %lu locale %lx\n",
1795                          (gulong) msg->hwnd, (gulong) msg->wParam, msg->lParam));
1796       window_impl->input_locale = (HKL) msg->lParam;
1797       TranslateCharsetInfo ((DWORD FAR *) msg->wParam,
1798                             &window_impl->charset_info,
1799                             TCI_SRCCHARSET);
1800       break;
1801
1802     case WM_SYSKEYUP:
1803     case WM_SYSKEYDOWN:
1804       GDK_NOTE (EVENTS,
1805                 g_print ("WM_SYSKEY%s: %#lx  %s %#x %s\n",
1806                          (msg->message == WM_SYSKEYUP ? "UP" : "DOWN"),
1807                          (gulong) msg->hwnd,
1808                          (GetKeyNameText (msg->lParam, buf,
1809                                           sizeof (buf)) > 0 ?
1810                           buf : ""),
1811                          msg->wParam,
1812                          decode_key_lparam (msg->lParam)));
1813
1814       /* Let the system handle Alt-Tab and Alt-Enter */
1815       if (msg->wParam == VK_TAB
1816           || msg->wParam == VK_RETURN
1817           || msg->wParam == VK_F4)
1818         break;
1819       /* If posted without us having keyboard focus, ignore */
1820       if (!(msg->lParam & 0x20000000))
1821         break;
1822 #if 0
1823       /* don't generate events for just the Alt key */
1824       if (msg->wParam == VK_MENU)
1825         break;
1826 #endif
1827       /* Jump to code in common with WM_KEYUP and WM_KEYDOWN */
1828       goto keyup_or_down;
1829
1830     case WM_KEYUP:
1831     case WM_KEYDOWN:
1832       GDK_NOTE (EVENTS,
1833                 g_print ("WM_KEY%s: %#lx  %s %#x %s\n",
1834                          (msg->message == WM_KEYUP ? "UP" : "DOWN"),
1835                          (gulong) msg->hwnd,
1836                          (GetKeyNameText (msg->lParam, buf,
1837                                           sizeof (buf)) > 0 ?
1838                           buf : ""),
1839                          msg->wParam,
1840                          decode_key_lparam (msg->lParam)));
1841
1842       ignore_wm_char = TRUE;
1843
1844     keyup_or_down:
1845
1846       event->key.window = window;
1847       event->key.hardware_keycode = msg->wParam;
1848
1849       switch (msg->wParam)
1850         {
1851         case VK_LBUTTON:
1852           event->key.keyval = GDK_Pointer_Button1; break;
1853         case VK_RBUTTON:
1854           event->key.keyval = GDK_Pointer_Button3; break;
1855         case VK_MBUTTON:
1856           event->key.keyval = GDK_Pointer_Button2; break;
1857         case VK_CANCEL:
1858           event->key.keyval = GDK_Cancel; break;
1859         case VK_BACK:
1860           event->key.keyval = GDK_BackSpace; break;
1861         case VK_TAB:
1862           event->key.keyval = (GetKeyState(VK_SHIFT) < 0 ?
1863             GDK_ISO_Left_Tab : GDK_Tab);
1864           break;
1865         case VK_CLEAR:
1866           event->key.keyval = GDK_Clear; break;
1867         case VK_RETURN:
1868           event->key.keyval = GDK_Return; break;
1869         case VK_SHIFT:
1870           /* Don't let Shift auto-repeat */
1871           if (msg->message == WM_KEYDOWN
1872               && (HIWORD (msg->lParam) & KF_REPEAT))
1873             ignore_wm_char = FALSE;
1874           else
1875             event->key.keyval = GDK_Shift_L;
1876           break;
1877         case VK_CONTROL:
1878           /* And not Control either */
1879           if (msg->message == WM_KEYDOWN
1880               && (HIWORD (msg->lParam) & KF_REPEAT))
1881             ignore_wm_char = FALSE;
1882           else if (HIWORD (msg->lParam) & KF_EXTENDED)
1883             event->key.keyval = GDK_Control_R;
1884           else
1885             event->key.keyval = GDK_Control_L;
1886           break;
1887         case VK_MENU:
1888           /* And not Alt */
1889           if (msg->message == WM_KEYDOWN
1890               && (HIWORD (msg->lParam) & KF_REPEAT))
1891             ignore_wm_char = FALSE;
1892           else if (HIWORD (msg->lParam) & KF_EXTENDED)
1893             {
1894               /* AltGr key comes in as Control+Right Alt */
1895               if (GetKeyState (VK_CONTROL) < 0)
1896                 {
1897                   ignore_wm_char = FALSE;
1898                   is_altgr_key = TRUE;
1899                 }
1900               event->key.keyval = GDK_Alt_R;
1901             }
1902           else
1903             {
1904               event->key.keyval = GDK_Alt_L;
1905               /* This needed in case she types Alt+nnn (on the numpad) */
1906               ignore_wm_char = FALSE;
1907             }
1908           break;
1909         case VK_PAUSE:
1910           event->key.keyval = GDK_Pause; break;
1911         case VK_CAPITAL:
1912           event->key.keyval = GDK_Caps_Lock; break;
1913         case VK_ESCAPE:
1914           event->key.keyval = GDK_Escape; break;
1915         case VK_PRIOR:
1916           event->key.keyval = GDK_Prior; break;
1917         case VK_NEXT:
1918           event->key.keyval = GDK_Next; break;
1919         case VK_END:
1920           event->key.keyval = GDK_End; break;
1921         case VK_HOME:
1922           event->key.keyval = GDK_Home; break;
1923         case VK_LEFT:
1924           event->key.keyval = GDK_Left; break;
1925         case VK_UP:
1926           event->key.keyval = GDK_Up; break;
1927         case VK_RIGHT:
1928           event->key.keyval = GDK_Right; break;
1929         case VK_DOWN:
1930           event->key.keyval = GDK_Down; break;
1931         case VK_SELECT:
1932           event->key.keyval = GDK_Select; break;
1933         case VK_PRINT:
1934           event->key.keyval = GDK_Print; break;
1935         case VK_EXECUTE:
1936           event->key.keyval = GDK_Execute; break;
1937         case VK_INSERT:
1938           event->key.keyval = GDK_Insert; break;
1939         case VK_DELETE:
1940           event->key.keyval = GDK_Delete; break;
1941         case VK_HELP:
1942           event->key.keyval = GDK_Help; break;
1943         case VK_NUMPAD0:
1944         case VK_NUMPAD1:
1945         case VK_NUMPAD2:
1946         case VK_NUMPAD3:
1947         case VK_NUMPAD4:
1948         case VK_NUMPAD5:
1949         case VK_NUMPAD6:
1950         case VK_NUMPAD7:
1951         case VK_NUMPAD8:
1952         case VK_NUMPAD9:
1953           /* Apparently applications work better if we just pass numpad digits
1954            * on as real digits? So wait for the WM_CHAR instead.
1955            */
1956           ignore_wm_char = FALSE;
1957           break;
1958         case VK_MULTIPLY:
1959           event->key.keyval = GDK_KP_Multiply; break;
1960         case VK_ADD:
1961           /* Pass it on as an ASCII plus in WM_CHAR. */
1962           ignore_wm_char = FALSE;
1963           break;
1964         case VK_SEPARATOR:
1965           event->key.keyval = GDK_KP_Separator; break;
1966         case VK_SUBTRACT:
1967           /* Pass it on as an ASCII minus in WM_CHAR. */
1968           ignore_wm_char = FALSE;
1969           break;
1970         case VK_DECIMAL:
1971           /* The keypad decimal key should also be passed on as the decimal
1972            * sign ('.' or ',' depending on the Windows locale settings,
1973            * apparently). So wait for the WM_CHAR here, also.
1974            */
1975           ignore_wm_char = FALSE;
1976           break;
1977         case VK_DIVIDE:
1978           event->key.keyval = GDK_KP_Divide; break;
1979         case VK_F1:
1980           event->key.keyval = GDK_F1; break;
1981         case VK_F2:
1982           event->key.keyval = GDK_F2; break;
1983         case VK_F3:
1984           event->key.keyval = GDK_F3; break;
1985         case VK_F4:
1986           event->key.keyval = GDK_F4; break;
1987         case VK_F5:
1988           event->key.keyval = GDK_F5; break;
1989         case VK_F6:
1990           event->key.keyval = GDK_F6; break;
1991         case VK_F7:
1992           event->key.keyval = GDK_F7; break;
1993         case VK_F8:
1994           event->key.keyval = GDK_F8; break;
1995         case VK_F9:
1996           event->key.keyval = GDK_F9; break;
1997         case VK_F10:
1998           event->key.keyval = GDK_F10; break;
1999         case VK_F11:
2000           event->key.keyval = GDK_F11; break;
2001         case VK_F12:
2002           event->key.keyval = GDK_F12; break;
2003         case VK_F13:
2004           event->key.keyval = GDK_F13; break;
2005         case VK_F14:
2006           event->key.keyval = GDK_F14; break;
2007         case VK_F15:
2008           event->key.keyval = GDK_F15; break;
2009         case VK_F16:
2010           event->key.keyval = GDK_F16; break;
2011         case '0':
2012         case '1':
2013         case '2':
2014         case '3':
2015         case '4':
2016         case '5':
2017         case '6':
2018         case '7':
2019         case '8':
2020         case '9':
2021           if (!is_altgr_key && (GetKeyState (VK_CONTROL) < 0
2022                                 || GetKeyState (VK_MENU) < 0))
2023             /* Control- or Alt-digits won't come in as a WM_CHAR,
2024              * but beware of AltGr-digits, which are used for instance
2025              * on Finnish keyboards.
2026              */
2027             event->key.keyval = GDK_0 + (msg->wParam - '0');
2028           else
2029             ignore_wm_char = FALSE;
2030           break;
2031         case VK_OEM_PLUS:       /* On my Win98, the '+' key comes in
2032                                  * as VK_OEM_PLUS, etc.
2033                                  */
2034         case VK_OEM_COMMA:
2035         case VK_OEM_MINUS:
2036         case VK_OEM_PERIOD:
2037         case VK_OEM_2:
2038         case VK_OEM_4:
2039         case VK_OEM_5:
2040         case VK_OEM_6:
2041           if (!is_altgr_key && (GetKeyState (VK_CONTROL) < 0
2042                                 || GetKeyState (VK_MENU) < 0))
2043             /* Control- or Alt-plus won't come in as WM_CHAR,
2044              * but beware of AltGr-plus which is backslash on
2045              * Finnish keyboards
2046              */
2047             /* All these VK_OEM keycodes happen to be the corresponding ASCII
2048              * char + 0x90
2049              */
2050             event->key.keyval = msg->wParam - 0x90;
2051           else
2052             ignore_wm_char = FALSE;
2053           break;
2054         case VK_OEM_1:
2055           if (!is_altgr_key && (GetKeyState (VK_CONTROL) < 0
2056                                 || GetKeyState (VK_MENU) < 0))
2057             /* ;: on US keyboard */
2058             event->key.keyval = ';';
2059           else
2060             ignore_wm_char = FALSE;
2061           break;
2062         case VK_OEM_3:
2063           if (!is_altgr_key && (GetKeyState (VK_CONTROL) < 0
2064                                 || GetKeyState (VK_MENU) < 0))
2065             /* `~ on US keyboard */
2066             event->key.keyval = '`';
2067           else
2068             ignore_wm_char = FALSE;
2069           break;
2070         case VK_OEM_7:
2071           if (!is_altgr_key && (GetKeyState (VK_CONTROL) < 0
2072                                 || GetKeyState (VK_MENU) < 0))
2073             /* '" on US keyboard */
2074             event->key.keyval = '\'';
2075           else
2076             ignore_wm_char = FALSE;
2077           break;
2078         default:
2079           if (msg->message == WM_SYSKEYDOWN || msg->message == WM_SYSKEYUP)
2080             event->key.keyval = msg->wParam;
2081           else
2082             ignore_wm_char = FALSE;
2083           break;
2084         }
2085
2086       if (!ignore_wm_char)
2087         break;
2088
2089       if (!propagate (&window, msg,
2090                       k_grab_window, k_grab_owner_events, GDK_ALL_EVENTS_MASK,
2091                       doesnt_want_key))
2092           break;
2093       ASSIGN_WINDOW (window);
2094
2095       is_altgr_key = FALSE;
2096       event->key.type = ((msg->message == WM_KEYDOWN
2097                           || msg->message == WM_SYSKEYDOWN) ?
2098                          GDK_KEY_PRESS : GDK_KEY_RELEASE);
2099       event->key.time = msg->time;
2100       event->key.state = 0;
2101       if (GetKeyState (VK_SHIFT) < 0)
2102         event->key.state |= GDK_SHIFT_MASK;
2103       if (GetKeyState (VK_CAPITAL) & 0x1)
2104         event->key.state |= GDK_LOCK_MASK;
2105       if (GetKeyState (VK_CONTROL) < 0)
2106         event->key.state |= GDK_CONTROL_MASK;
2107       if (msg->wParam != VK_MENU && GetKeyState (VK_MENU) < 0)
2108         event->key.state |= GDK_MOD1_MASK;
2109       event->key.string = NULL;
2110       event->key.length = 0;
2111       return_val = !GDK_WINDOW_DESTROYED (window);
2112       break;
2113
2114     case WM_IME_COMPOSITION:
2115       if (!use_ime_composition)
2116         break;
2117
2118       GDK_NOTE (EVENTS, g_print ("WM_IME_COMPOSITION: %#lx  %#lx\n",
2119                                  (gulong) msg->hwnd, msg->lParam));
2120       if (msg->lParam & GCS_RESULTSTR)
2121         goto wm_char;
2122       break;
2123
2124     case WM_IME_CHAR:
2125       GDK_NOTE (EVENTS,
2126                 g_print ("WM_IME_CHAR: %#lx  bytes: %#.04x\n",
2127                          (gulong) msg->hwnd, msg->wParam));
2128       goto wm_char;
2129
2130     case WM_CHAR:
2131     case WM_SYSCHAR:
2132       GDK_NOTE (EVENTS,
2133                 g_print ("WM_%sCHAR: %#lx  %#x %s %s\n",
2134                          (msg->message == WM_CHAR ? "" : "SYS"),
2135                          (gulong) msg->hwnd, msg->wParam,
2136                          decode_key_lparam (msg->lParam),
2137                          (ignore_wm_char ? "ignored" : "")));
2138
2139       if (ignore_wm_char)
2140         {
2141           ignore_wm_char = FALSE;
2142           break;
2143         }
2144
2145     wm_char:
2146       if (!propagate (&window, msg,
2147                       k_grab_window, k_grab_owner_events, GDK_ALL_EVENTS_MASK,
2148                       doesnt_want_char))
2149           break;
2150       ASSIGN_WINDOW (window);
2151
2152       event->key.window = window;
2153       return_val = !GDK_WINDOW_DESTROYED (window);
2154
2155       if (return_val && (event->key.window == k_grab_window
2156                          || (window_impl->event_mask & GDK_KEY_RELEASE_MASK)))
2157         {
2158           if (window == k_grab_window
2159               || (window_impl->event_mask & GDK_KEY_PRESS_MASK))
2160             {
2161               /* Append a GDK_KEY_PRESS event to the pushback list
2162                * (from which it will be fetched before the release
2163                * event).
2164                */
2165               GdkEvent *event2 = gdk_event_new ();
2166               build_keypress_event (window_impl, event2, msg);
2167               event2->key.window = window;
2168               gdk_drawable_ref (window);
2169               gdk_event_queue_append (event2);
2170               GDK_NOTE (EVENTS, print_event (event2));
2171             }
2172           /* Return the key release event.  */
2173           build_keyrelease_event (window_impl, event, msg);
2174         }
2175       else if (return_val
2176                && (window_impl->event_mask & GDK_KEY_PRESS_MASK))
2177         {
2178           /* Return just the key press event. */
2179           build_keypress_event (window_impl, event, msg);
2180         }
2181       else
2182         return_val = FALSE;
2183
2184 #if 0 /* Don't reset is_AltGr_key here. Othewise we can't type several
2185        * AltGr-accessed chars while keeping the AltGr pressed down
2186        * all the time.
2187        */
2188       is_AltGr_key = FALSE;
2189 #endif
2190       break;
2191
2192     case WM_LBUTTONDOWN:
2193       button = 1;
2194       goto buttondown0;
2195     case WM_MBUTTONDOWN:
2196       button = 2;
2197       goto buttondown0;
2198     case WM_RBUTTONDOWN:
2199       button = 3;
2200
2201     buttondown0:
2202       GDK_NOTE (EVENTS,
2203                 g_print ("WM_%cBUTTONDOWN: %#lx  (%d,%d)\n",
2204                          " LMR"[button],
2205                          (gulong) msg->hwnd,
2206                          LOWORD (msg->lParam), HIWORD (msg->lParam)));
2207
2208       if (GDK_WINDOW_OBJECT (window)->extension_events != 0
2209           && gdk_input_ignore_core)
2210         {
2211           GDK_NOTE (EVENTS, g_print ("...ignored\n"));
2212           break;
2213         }
2214
2215       ASSIGN_WINDOW (find_window_for_pointer_event (window, msg));
2216
2217       if (window != current_window)
2218         synthesize_crossing_events (window, msg);
2219
2220       event->button.type = GDK_BUTTON_PRESS;
2221       if (!propagate (&window, msg,
2222                       p_grab_window, p_grab_owner_events, p_grab_mask,
2223                       doesnt_want_button_press))
2224           break;
2225       ASSIGN_WINDOW (window);
2226
2227       event->button.window = window;
2228
2229       /* Emulate X11's automatic active grab */
2230       if (!p_grab_window)
2231         {
2232           /* No explicit active grab, let's start one automatically */
2233           gint owner_events = window_impl->event_mask
2234             & (GDK_BUTTON_PRESS_MASK|GDK_BUTTON_RELEASE_MASK);
2235
2236           GDK_NOTE (EVENTS, g_print ("...automatic grab started\n"));
2237           gdk_pointer_grab (window,
2238                             owner_events,
2239                             window_impl->event_mask,
2240                             NULL, NULL, 0);
2241           p_grab_automatic = TRUE;
2242         }
2243
2244       event->button.time = msg->time;
2245       if (window != orig_window)
2246         translate_mouse_coords (orig_window, window, msg);
2247       event->button.x = current_x = (gint16) LOWORD (msg->lParam);
2248       event->button.y = current_y = (gint16) HIWORD (msg->lParam);
2249       event->button.x += xoffset;  /* XXX translate current_x, y too? */
2250       event->button.y += yoffset;
2251       event->button.x_root = msg->pt.x;
2252       event->button.y_root = msg->pt.y;
2253       event->button.axes = NULL;
2254       event->button.state = build_pointer_event_state (msg);
2255       event->button.button = button;
2256       event->button.device = gdk_core_pointer;
2257
2258       gdk_event_button_generate (event);
2259
2260       return_val = !GDK_WINDOW_DESTROYED (window);
2261       break;
2262
2263     case WM_LBUTTONUP:
2264       button = 1;
2265       goto buttonup0;
2266     case WM_MBUTTONUP:
2267       button = 2;
2268       goto buttonup0;
2269     case WM_RBUTTONUP:
2270       button = 3;
2271
2272     buttonup0:
2273       GDK_NOTE (EVENTS,
2274                 g_print ("WM_%cBUTTONUP: %#lx  (%d,%d)\n",
2275                          " LMR"[button],
2276                          (gulong) msg->hwnd,
2277                          LOWORD (msg->lParam), HIWORD (msg->lParam)));
2278
2279       ASSIGN_WINDOW (find_window_for_pointer_event (window, msg));
2280
2281       if (GDK_WINDOW_OBJECT (window)->extension_events != 0
2282           && gdk_input_ignore_core)
2283         {
2284           GDK_NOTE (EVENTS, g_print ("...ignored\n"));
2285           break;
2286         }
2287
2288       if (window != current_window)
2289         synthesize_crossing_events (window, msg);
2290
2291       event->button.type = GDK_BUTTON_RELEASE;
2292       if (!propagate (&window, msg,
2293                       p_grab_window, p_grab_owner_events, p_grab_mask,
2294                       doesnt_want_button_release))
2295         {
2296         }
2297       else
2298         {
2299           ASSIGN_WINDOW (window);
2300
2301           event->button.window = window;
2302           event->button.time = msg->time;
2303           if (window != orig_window)
2304             translate_mouse_coords (orig_window, window, msg);
2305           event->button.x = (gint16) LOWORD (msg->lParam) + xoffset;
2306           event->button.y = (gint16) HIWORD (msg->lParam) + yoffset;
2307           event->button.x_root = msg->pt.x;
2308           event->button.y_root = msg->pt.y;
2309           event->button.axes = NULL;
2310           event->button.state = build_pointer_event_state (msg);
2311           event->button.button = button;
2312           event->button.device = gdk_core_pointer;
2313
2314           return_val = !GDK_WINDOW_DESTROYED (window);
2315         }
2316
2317       if (p_grab_window != NULL
2318           && p_grab_automatic
2319           && (msg->wParam & (MK_LBUTTON | MK_MBUTTON | MK_RBUTTON)) == 0)
2320         gdk_pointer_ungrab (0);
2321       break;
2322
2323     case WM_MOUSEMOVE:
2324       GDK_NOTE (EVENTS,
2325                 g_print ("WM_MOUSEMOVE: %#lx  %#x (%d,%d)\n",
2326                          (gulong) msg->hwnd, msg->wParam,
2327                          LOWORD (msg->lParam), HIWORD (msg->lParam)));
2328
2329       ASSIGN_WINDOW (find_window_for_pointer_event (window, msg));
2330
2331       /* If we haven't moved, don't create any event.
2332        * Windows sends WM_MOUSEMOVE messages after button presses
2333        * even if the mouse doesn't move. This disturbs gtk.
2334        */
2335       if (window == current_window
2336           && LOWORD (msg->lParam) == current_x
2337           && HIWORD (msg->lParam) == current_y)
2338         break;
2339
2340       /* HB: only process mouse move messages if we own the active window. */
2341       GetWindowThreadProcessId(GetActiveWindow(), &pidActWin);
2342       GetWindowThreadProcessId(msg->hwnd, &pidThis);
2343       if (pidActWin != pidThis)
2344         break;
2345
2346       if (window != current_window)
2347         synthesize_crossing_events (window, msg);
2348
2349       if (GDK_WINDOW_OBJECT (window)->extension_events != 0
2350           && gdk_input_ignore_core)
2351         {
2352           GDK_NOTE (EVENTS, g_print ("...ignored\n"));
2353           break;
2354         }
2355
2356       event->motion.type = GDK_MOTION_NOTIFY;
2357       if (!propagate (&window, msg,
2358                       p_grab_window, p_grab_owner_events, p_grab_mask,
2359                       doesnt_want_button_motion))
2360           break;
2361       ASSIGN_WINDOW (window);
2362
2363       event->motion.window = window;
2364       event->motion.time = msg->time;
2365       if (window != orig_window)
2366         translate_mouse_coords (orig_window, window, msg);
2367       event->motion.x = current_x = (gint16) LOWORD (msg->lParam);
2368       event->motion.y = current_y = (gint16) HIWORD (msg->lParam);
2369       event->motion.x += xoffset;
2370       event->motion.y += yoffset;
2371       event->motion.x_root = current_x_root = msg->pt.x;
2372       event->motion.y_root = current_y_root = msg->pt.y;
2373       event->motion.axes = NULL;
2374       event->motion.state = build_pointer_event_state (msg);
2375       event->motion.is_hint = FALSE;
2376       event->motion.device = gdk_core_pointer;
2377
2378       return_val = !GDK_WINDOW_DESTROYED (window);
2379       break;
2380
2381     case WM_NCMOUSEMOVE:
2382       GDK_NOTE (EVENTS,
2383                 g_print ("WM_NCMOUSEMOVE: %#lx  x,y: %d %d\n",
2384                          (gulong) msg->hwnd,
2385                          LOWORD (msg->lParam), HIWORD (msg->lParam)));
2386       if (track_mouse_event == NULL
2387           && current_window != NULL
2388           && (GDK_WINDOW_IMPL_WIN32 (GDK_WINDOW_OBJECT (current_window)->impl)->event_mask & GDK_LEAVE_NOTIFY_MASK))
2389         {
2390           GDK_NOTE (EVENTS, g_print ("...synthesizing LEAVE_NOTIFY event\n"));
2391
2392           event->crossing.type = GDK_LEAVE_NOTIFY;
2393           event->crossing.window = current_window;
2394           event->crossing.subwindow = NULL;
2395           event->crossing.time = msg->time;
2396           event->crossing.x = current_x + xoffset; /* XXX translated current_x */
2397           event->crossing.y = current_y + yoffset;
2398           event->crossing.x_root = current_x_root;
2399           event->crossing.y_root = current_y_root;
2400           event->crossing.mode = GDK_CROSSING_NORMAL;
2401           event->crossing.detail = GDK_NOTIFY_NONLINEAR;
2402
2403           event->crossing.focus = TRUE; /* ??? */
2404           event->crossing.state = 0; /* ??? */
2405           return_val = TRUE;
2406         }
2407
2408       if (current_window)
2409         {
2410           gdk_drawable_unref (current_window);
2411           current_window = NULL;
2412         }
2413
2414       break;
2415
2416     case WM_MOUSEWHEEL:
2417       GDK_NOTE (EVENTS, g_print ("WM_MOUSEWHEEL: %#lx %d\n",
2418                                  (gulong) msg->hwnd, HIWORD (msg->wParam)));
2419
2420       event->scroll.type = GDK_SCROLL;
2421
2422       /* WM_MOUSEWHEEL is delivered to the focus window Work around
2423        * that. Also, the position is in screen coordinates, not client
2424        * coordinates as with the button messages. I love the
2425        * consistency of Windows.
2426        */
2427       pt.x = LOWORD (msg->lParam);
2428       pt.y = HIWORD (msg->lParam);
2429       if ((hwnd = WindowFromPoint (pt)) == NULL)
2430         break;
2431
2432       msg->hwnd = hwnd;
2433       if ((new_window = gdk_win32_handle_table_lookup ((GdkNativeWindow) msg->hwnd)) == NULL)
2434         break;
2435
2436       if (new_window != window)
2437         {
2438           gdk_drawable_unref (window);
2439           ASSIGN_WINDOW (new_window);
2440           gdk_drawable_ref (window);
2441         }
2442
2443       if (GDK_WINDOW_OBJECT (window)->extension_events != 0
2444           && gdk_input_ignore_core)
2445         {
2446           GDK_NOTE (EVENTS, g_print ("...ignored\n"));
2447           break;
2448         }
2449
2450       if (!propagate (&window, msg,
2451                       p_grab_window, p_grab_owner_events, p_grab_mask,
2452                       doesnt_want_scroll))
2453         break;
2454
2455       ASSIGN_WINDOW (window);
2456
2457       ScreenToClient (msg->hwnd, &pt);
2458       event->button.window = window;
2459       event->scroll.direction = (((short) HIWORD (msg->wParam)) > 0) ?
2460         GDK_SCROLL_UP : GDK_SCROLL_DOWN;
2461       event->scroll.window = window;
2462       event->scroll.time = msg->time;
2463       event->scroll.x = (gint16) pt.x + xoffset;
2464       event->scroll.y = (gint16) pt.y + yoffset;
2465       event->scroll.x_root = (gint16) LOWORD (msg->lParam);
2466       event->scroll.y_root = (gint16) HIWORD (msg->lParam);
2467       event->scroll.state = build_pointer_event_state (msg);
2468       event->scroll.device = gdk_core_pointer;
2469       return_val = !GDK_WINDOW_DESTROYED (window);
2470
2471       break;
2472
2473 #ifdef USE_TRACKMOUSEEVENT
2474     case WM_MOUSELEAVE:
2475       GDK_NOTE (EVENTS, g_print ("WM_MOUSELEAVE: %#lx\n", (gulong) msg->hwnd));
2476
2477       if (!(window_impl->event_mask & GDK_LEAVE_NOTIFY_MASK))
2478         break;
2479
2480       event->crossing.type = GDK_LEAVE_NOTIFY;
2481       event->crossing.window = window;
2482       event->crossing.subwindow = NULL;
2483       event->crossing.time = msg->time;
2484       event->crossing.x = current_x + xoffset; /* XXX translated current_x */
2485       event->crossing.y = current_y + yoffset;
2486       event->crossing.x_root = current_xroot;
2487       event->crossing.y_root = current_yroot;
2488       event->crossing.mode = GDK_CROSSING_NORMAL;
2489       if (current_window
2490           && IsChild (GDK_WINDOW_HWND (current_window), GDK_WINDOW_HWND (window)))
2491         event->crossing.detail = GDK_NOTIFY_INFERIOR;
2492       else if (current_window
2493                && IsChild (GDK_WINDOW_HWND (window), GDK_WINDOW_HWND (current_window)))
2494         event->crossing.detail = GDK_NOTIFY_ANCESTOR;
2495       else
2496         event->crossing.detail = GDK_NOTIFY_NONLINEAR;
2497
2498       event->crossing.focus = TRUE; /* ??? */
2499       event->crossing.state = 0; /* ??? */
2500
2501       if (current_window)
2502         {
2503           gdk_drawable_unref (current_window);
2504           current_window = NULL;
2505         }
2506
2507       return_val = !GDK_WINDOW_DESTROYED (window);
2508       break;
2509 #endif
2510
2511     case WM_SETFOCUS:
2512     case WM_KILLFOCUS:
2513       GDK_NOTE (EVENTS, g_print ("WM_%sFOCUS: %#lx\n",
2514                                  (msg->message == WM_SETFOCUS ?
2515                                   "SET" : "KILL"),
2516                                  (gulong) msg->hwnd));
2517
2518       if (!(window_impl->event_mask & GDK_FOCUS_CHANGE_MASK))
2519         break;
2520
2521       event->focus_change.type = GDK_FOCUS_CHANGE;
2522       event->focus_change.window = window;
2523       event->focus_change.in = (msg->message == WM_SETFOCUS);
2524       return_val = !GDK_WINDOW_DESTROYED (window);
2525       break;
2526
2527     case WM_ERASEBKGND:
2528       GDK_NOTE (EVENTS, g_print ("WM_ERASEBKGND: %#lx  dc %#x\n",
2529                                  (gulong) msg->hwnd, msg->wParam));
2530
2531       if (GDK_WINDOW_DESTROYED (window))
2532         break;
2533
2534       if (GDK_WINDOW_OBJECT (window)->input_only)
2535         break;
2536
2537       if (GDK_WINDOW_IMPL_WIN32 (GDK_WINDOW_OBJECT (window)->impl)->position_info.no_bg)
2538         {
2539           /* improves scolling effect, e.g. main buttons of testgtk */
2540           *ret_val_flagp = TRUE;
2541           *ret_valp = 1;
2542           break;
2543         }
2544
2545       colormap = GDK_DRAWABLE_IMPL_WIN32 (GDK_WINDOW_OBJECT (window)->impl)->colormap;
2546       if (colormap)
2547         colormap_private = GDK_COLORMAP_PRIVATE_DATA (colormap);
2548       hdc = (HDC) msg->wParam;
2549       if (colormap && colormap_private->xcolormap->rc_palette)
2550         {
2551           int k;
2552
2553           if (SelectPalette (hdc,  colormap_private->xcolormap->palette,
2554                              FALSE) == NULL)
2555             WIN32_GDI_FAILED ("SelectPalette");
2556           if ((k = RealizePalette (hdc)) == GDI_ERROR)
2557             WIN32_GDI_FAILED ("RealizePalette");
2558 #if 0
2559           g_print ("WM_ERASEBKGND: selected %#x, realized %d colors\n",
2560                    colormap_private->xcolormap->palette, k);
2561 #endif
2562         }
2563       *ret_val_flagp = TRUE;
2564       *ret_valp = 1;
2565
2566       if (GDK_WINDOW_OBJECT (window)->bg_pixmap == GDK_PARENT_RELATIVE_BG)
2567         {
2568           /* If this window should have the same background as the
2569            * parent, fetch the parent. (And if the same goes for
2570            * the parent, fetch the grandparent, etc.)
2571            */
2572           while (window && GDK_WINDOW_OBJECT (window)->bg_pixmap == GDK_PARENT_RELATIVE_BG)
2573             {
2574               gdk_drawable_unref (window);
2575               ASSIGN_WINDOW (GDK_WINDOW (GDK_WINDOW_OBJECT (window)->parent));
2576               gdk_drawable_ref (window);
2577             }
2578         }
2579
2580       if (GDK_WINDOW_OBJECT (window)->bg_pixmap == NULL)
2581         {
2582           bg = gdk_colormap_color (GDK_DRAWABLE_IMPL_WIN32 (GDK_WINDOW_OBJECT (window)->impl)->colormap,
2583                                    GDK_WINDOW_OBJECT (window)->bg_color.pixel);
2584
2585           GetClipBox (hdc, &rect);
2586           GDK_NOTE (EVENTS,
2587                     g_print ("...%ldx%ld@+%ld+%ld BG_PIXEL %.06lx\n",
2588                              rect.right - rect.left,
2589                              rect.bottom - rect.top,
2590                              rect.left, rect.top,
2591                              (gulong) bg));
2592           hbr = CreateSolidBrush (bg);
2593 #if 0
2594           g_print ("...CreateSolidBrush (%.08x) = %.08x\n", bg, hbr);
2595 #endif
2596           if (!FillRect (hdc, &rect, hbr))
2597             WIN32_GDI_FAILED ("FillRect");
2598           DeleteObject (hbr);
2599         }
2600       else if (GDK_WINDOW_OBJECT (window)->bg_pixmap != NULL &&
2601                GDK_WINDOW_OBJECT (window)->bg_pixmap != GDK_NO_BG)
2602         {
2603           pixmap = GDK_WINDOW_OBJECT (window)->bg_pixmap;
2604           pixmap_impl = GDK_PIXMAP_IMPL_WIN32 (GDK_PIXMAP_OBJECT (pixmap)->impl);
2605           GetClipBox (hdc, &rect);
2606
2607           if (pixmap_impl->width <= 8 && pixmap_impl->height <= 8)
2608             {
2609               GDK_NOTE (EVENTS, g_print ("...small pixmap, using brush\n"));
2610               hbr = CreatePatternBrush (GDK_PIXMAP_HBITMAP (pixmap));
2611               if (!FillRect (hdc, &rect, hbr))
2612                 WIN32_GDI_FAILED ("FillRect");
2613               DeleteObject (hbr);
2614             }
2615           else
2616             {
2617               GDK_NOTE (EVENTS,
2618                         g_print ("...blitting pixmap %#lx (%dx%d) "
2619                                  "all over the place,\n"
2620                                  "...clip box = %ldx%ld@+%ld+%ld\n",
2621                                  (gulong) GDK_PIXMAP_HBITMAP (pixmap),
2622                                  pixmap_impl->width, pixmap_impl->height,
2623                                  rect.right - rect.left, rect.bottom - rect.top,
2624                                  rect.left, rect.top));
2625
2626               if (!(bgdc = CreateCompatibleDC (hdc)))
2627                 {
2628                   WIN32_GDI_FAILED ("CreateCompatibleDC");
2629                   break;
2630                 }
2631               if (!(oldbitmap = SelectObject (bgdc, GDK_PIXMAP_HBITMAP (pixmap))))
2632                 {
2633                   WIN32_GDI_FAILED ("SelectObject");
2634                   DeleteDC (bgdc);
2635                   break;
2636                 }
2637               i = 0;
2638               while (i < rect.right)
2639                 {
2640                   j = 0;
2641                   while (j < rect.bottom)
2642                     {
2643                       if (i + pixmap_impl->width >= rect.left
2644                           && j + pixmap_impl->height >= rect.top)
2645                         {
2646                           if (!BitBlt (hdc, i, j,
2647                                        pixmap_impl->width, pixmap_impl->height,
2648                                        bgdc, 0, 0, SRCCOPY))
2649                             {
2650                               WIN32_GDI_FAILED ("BitBlt");
2651                               goto loopexit;
2652                             }
2653                         }
2654                       j += pixmap_impl->height;
2655                     }
2656                   i += pixmap_impl->width;
2657                 }
2658             loopexit:
2659               SelectObject (bgdc, oldbitmap);
2660               DeleteDC (bgdc);
2661             }
2662         }
2663       else
2664         {
2665           GDK_NOTE (EVENTS, g_print ("...BLACK_BRUSH (?)\n"));
2666           hbr = GetStockObject (BLACK_BRUSH);
2667           GetClipBox (hdc, &rect);
2668           if (!FillRect (hdc, &rect, hbr))
2669             WIN32_GDI_FAILED ("FillRect");
2670         }
2671       break;
2672
2673     case WM_PAINT:
2674       if (!GetUpdateRect(msg->hwnd, NULL, FALSE))
2675         {
2676           GDK_NOTE (EVENTS, g_print ("WM_PAINT: %#lx no update rect\n",
2677                                      (gulong) msg->hwnd));
2678           break;
2679         }
2680
2681       /* HB: don't generate GDK_EXPOSE events for InputOnly
2682        * windows -> backing store now works!
2683        */
2684       if (GDK_WINDOW_OBJECT (window)->input_only)
2685         break;
2686
2687       if (!(window_impl->event_mask & GDK_EXPOSURE_MASK))
2688         break;
2689
2690       if (GDK_WINDOW_OBJECT (window)->bg_pixmap == GDK_NO_BG)
2691         break;
2692
2693       hdc = BeginPaint (msg->hwnd, &paintstruct);
2694
2695       GDK_NOTE (EVENTS,
2696                 g_print ("WM_PAINT: %#lx  %ldx%ld@+%ld+%ld %s dc %#lx\n",
2697                          (gulong) msg->hwnd,
2698                          paintstruct.rcPaint.right - paintstruct.rcPaint.left,
2699                          paintstruct.rcPaint.bottom - paintstruct.rcPaint.top,
2700                          paintstruct.rcPaint.left, paintstruct.rcPaint.top,
2701                          (paintstruct.fErase ? "erase" : ""),
2702                          (gulong) hdc));
2703
2704       EndPaint (msg->hwnd, &paintstruct);
2705
2706       if ((paintstruct.rcPaint.right == paintstruct.rcPaint.left)
2707           || (paintstruct.rcPaint.bottom == paintstruct.rcPaint.top))
2708         break;
2709
2710       if (return_exposes)
2711         {
2712           event->expose.type = GDK_EXPOSE;
2713           event->expose.window = window;
2714           event->expose.area.x = paintstruct.rcPaint.left;
2715           event->expose.area.y = paintstruct.rcPaint.top;
2716           event->expose.area.width = paintstruct.rcPaint.right - paintstruct.rcPaint.left;
2717           event->expose.area.height = paintstruct.rcPaint.bottom - paintstruct.rcPaint.top;
2718           event->expose.region = gdk_region_rectangle (&(event->expose.area));
2719           event->expose.count = 0;
2720
2721           return_val = !GDK_WINDOW_DESTROYED (window);
2722           if (return_val)
2723             {
2724               GList *list = gdk_queued_events;
2725               while (list != NULL )
2726                 {
2727                   if ((((GdkEvent *)list->data)->any.type == GDK_EXPOSE) &&
2728                         (((GdkEvent *)list->data)->any.window == window) &&
2729                         !(((GdkEventPrivate *)list->data)->flags & GDK_EVENT_PENDING))
2730                         ((GdkEvent *)list->data)->expose.count++;
2731
2732                     list = list->next;
2733                 }
2734             }
2735         }
2736       else
2737         {
2738           GdkRectangle expose_rect;
2739
2740           expose_rect.x = paintstruct.rcPaint.left + xoffset;
2741           expose_rect.y = paintstruct.rcPaint.top + yoffset;
2742           expose_rect.width = paintstruct.rcPaint.right - paintstruct.rcPaint.left;
2743           expose_rect.height = paintstruct.rcPaint.bottom - paintstruct.rcPaint.top;
2744
2745             _gdk_window_process_expose (window, GetMessageTime (), &expose_rect);
2746
2747             return_val = FALSE;
2748         }
2749       break;
2750
2751     case WM_SETCURSOR:
2752       GDK_NOTE (EVENTS, g_print ("WM_SETCURSOR: %#lx %#x %#x\n",
2753                                  (gulong) msg->hwnd,
2754                                  LOWORD (msg->lParam), HIWORD (msg->lParam)));
2755
2756       if (LOWORD (msg->lParam) != HTCLIENT)
2757         break;
2758
2759       if (p_grab_window != NULL && p_grab_cursor != NULL)
2760         hcursor = p_grab_cursor;
2761       else if (!GDK_WINDOW_DESTROYED (window))
2762         hcursor = window_impl->hcursor;
2763       else
2764         hcursor = NULL;
2765
2766       if (hcursor != NULL)
2767         {
2768           GDK_NOTE (EVENTS, g_print ("...SetCursor(%#lx)\n", (gulong) hcursor));
2769           SetCursor (hcursor);
2770           *ret_val_flagp = TRUE;
2771           *ret_valp = TRUE;
2772         }
2773       break;
2774
2775     case WM_SHOWWINDOW:
2776       GDK_NOTE (EVENTS, g_print ("WM_SHOWWINDOW: %#lx  %d\n",
2777                                  (gulong) msg->hwnd,
2778                                  msg->wParam));
2779
2780       if (!(window_impl->event_mask & GDK_STRUCTURE_MASK))
2781         break;
2782
2783       event->any.type = (msg->wParam ? GDK_MAP : GDK_UNMAP);
2784       event->any.window = window;
2785
2786       if (event->any.type == GDK_UNMAP
2787           && p_grab_window == window)
2788         gdk_pointer_ungrab (msg->time);
2789
2790       if (event->any.type == GDK_UNMAP
2791           && k_grab_window == window)
2792         gdk_keyboard_ungrab (msg->time);
2793
2794       return_val = !GDK_WINDOW_DESTROYED (window);
2795       break;
2796
2797     case WM_SIZE:
2798       GDK_NOTE (EVENTS,
2799                 g_print ("WM_SIZE: %#lx  %s %dx%d\n",
2800                          (gulong) msg->hwnd,
2801                          (msg->wParam == SIZE_MAXHIDE ? "MAXHIDE" :
2802                           (msg->wParam == SIZE_MAXIMIZED ? "MAXIMIZED" :
2803                            (msg->wParam == SIZE_MAXSHOW ? "MAXSHOW" :
2804                             (msg->wParam == SIZE_MINIMIZED ? "MINIMIZED" :
2805                              (msg->wParam == SIZE_RESTORED ? "RESTORED" : "?"))))),
2806                          LOWORD (msg->lParam), HIWORD (msg->lParam)));
2807
2808       if (!(window_impl->event_mask & GDK_STRUCTURE_MASK))
2809         break;
2810
2811       if (msg->wParam == SIZE_MINIMIZED)
2812         {
2813           event->any.type = GDK_UNMAP;
2814           event->any.window = window;
2815
2816           if (p_grab_window == window)
2817             gdk_pointer_ungrab (msg->time);
2818
2819           if (k_grab_window == window)
2820             gdk_keyboard_ungrab (msg->time);
2821
2822           return_val = !GDK_WINDOW_DESTROYED (window);
2823         }
2824       else if ((msg->wParam == SIZE_RESTORED
2825                 || msg->wParam == SIZE_MAXIMIZED)
2826 #if 1
2827                && GDK_WINDOW_TYPE (window) != GDK_WINDOW_CHILD
2828 #endif
2829                                                                  )
2830         {
2831           if (LOWORD (msg->lParam) == 0)
2832             break;
2833
2834           event->configure.type = GDK_CONFIGURE;
2835           event->configure.window = window;
2836           pt.x = 0;
2837           pt.y = 0;
2838           ClientToScreen (msg->hwnd, &pt);
2839           event->configure.x = pt.x;
2840           event->configure.y = pt.y;
2841           event->configure.width = LOWORD (msg->lParam);
2842           event->configure.height = HIWORD (msg->lParam);
2843           GDK_WINDOW_OBJECT (window)->x = event->configure.x;
2844           GDK_WINDOW_OBJECT (window)->y = event->configure.y;
2845           window_impl->width = event->configure.width;
2846           window_impl->height = event->configure.height;
2847
2848           if (GDK_WINDOW_OBJECT (window)->resize_count > 1)
2849             GDK_WINDOW_OBJECT (window)->resize_count -= 1;
2850
2851           return_val = !GDK_WINDOW_DESTROYED (window);
2852           if (return_val
2853               && GDK_WINDOW_OBJECT (window)->extension_events != 0)
2854             _gdk_input_configure_event (&event->configure, window);
2855         }
2856       break;
2857
2858     case WM_GETMINMAXINFO:
2859       GDK_NOTE (EVENTS, g_print ("WM_GETMINMAXINFO: %#lx\n", (gulong) msg->hwnd));
2860
2861       mmi = (MINMAXINFO*) msg->lParam;
2862       if (window_impl->hint_flags & GDK_HINT_MIN_SIZE)
2863         {
2864           mmi->ptMinTrackSize.x = window_impl->hint_min_width;
2865           mmi->ptMinTrackSize.y = window_impl->hint_min_height;
2866         }
2867       if (window_impl->hint_flags & GDK_HINT_MAX_SIZE)
2868         {
2869           mmi->ptMaxTrackSize.x = window_impl->hint_max_width;
2870           mmi->ptMaxTrackSize.y = window_impl->hint_max_height;
2871
2872           mmi->ptMaxSize.x = window_impl->hint_max_width;
2873           mmi->ptMaxSize.y = window_impl->hint_max_height;
2874         }
2875       break;
2876
2877     case WM_MOVE:
2878       GDK_NOTE (EVENTS, g_print ("WM_MOVE: %#lx  (%d,%d)\n",
2879                                  (gulong) msg->hwnd,
2880                                  LOWORD (msg->lParam), HIWORD (msg->lParam)));
2881
2882       if (!(window_impl->event_mask & GDK_STRUCTURE_MASK))
2883         break;
2884
2885       if (GDK_WINDOW_TYPE (window) != GDK_WINDOW_CHILD
2886           && !IsIconic(msg->hwnd)
2887           && IsWindowVisible(msg->hwnd))
2888         {
2889           event->configure.type = GDK_CONFIGURE;
2890           event->configure.window = window;
2891           event->configure.x = LOWORD (msg->lParam);
2892           event->configure.y = HIWORD (msg->lParam);
2893           GetClientRect (msg->hwnd, &rect);
2894           event->configure.width = rect.right;
2895           event->configure.height = rect.bottom;
2896           GDK_WINDOW_OBJECT (window)->x = event->configure.x;
2897           GDK_WINDOW_OBJECT (window)->y = event->configure.y;
2898           window_impl->width = event->configure.width;
2899           window_impl->height = event->configure.height;
2900
2901           return_val = !GDK_WINDOW_DESTROYED (window);
2902         }
2903       break;
2904 #if 0 /* not quite right, otherwise it may be faster/better than WM_(MOVE|SIZE)
2905        * remove decoration (frame) sizes ?
2906        */
2907     case WM_WINDOWPOSCHANGED :
2908
2909       if (!(window_impl->event_mask & GDK_STRUCTURE_MASK))
2910         break;
2911
2912       if (GDK_WINDOW_TYPE (window) != GDK_WINDOW_CHILD
2913           && !IsIconic(msg->hwnd)
2914           && IsWindowVisible(msg->hwnd))
2915         {
2916           LPWINDOWPOS lpwp = (LPWINDOWPOS) (msg->lParam);
2917
2918           event->configure.type = GDK_CONFIGURE;
2919           event->configure.window = window;
2920           event->configure.x = lpwp->x;
2921           event->configure.y = lpwp->y;
2922           event->configure.width = lpwp->cx;
2923           event->configure.height = lpwp->cy;
2924           GDK_WINDOW_OBJECT (window)->x = event->configure.x;
2925           GDK_WINDOW_OBJECT (window)->y = event->configure.y;
2926           window_impl->width = event->configure.width;
2927           window_impl->height = event->configure.height;
2928
2929           return_val = !GDK_WINDOW_DESTROYED (window);
2930
2931           GDK_NOTE (EVENTS, g_print ("WM_WINDOWPOSCHANGED: %#lx  %ldx%ld@+%ld+%ld\n",
2932                                      (gulong) msg->hwnd,
2933                                      lpwp->cx, lpwp->cy, lpwp->x, lpwp->y));
2934
2935           if (ret_val_flagp)
2936             *ret_val_flagp = TRUE;
2937           if (ret_valp)
2938             *ret_valp = 0;
2939         }
2940       break;
2941 #endif
2942     case WM_CLOSE:
2943       GDK_NOTE (EVENTS, g_print ("WM_CLOSE: %#lx\n", (gulong) msg->hwnd));
2944
2945       event->any.type = GDK_DELETE;
2946       event->any.window = window;
2947
2948       return_val = !GDK_WINDOW_DESTROYED (window);
2949       break;
2950
2951 #if 0
2952     /* No, don't use delayed rendering after all. It works only if the
2953      * delayed SetClipboardData is called from the WindowProc, it
2954      * seems. (The #else part below is test code for that. It succeeds
2955      * in setting the clipboard data. But if I call SetClipboardData
2956      * in gdk_property_change (as a consequence of the
2957      * GDK_SELECTION_REQUEST event), it fails.  I deduce that this is
2958      * because delayed rendering requires that SetClipboardData is
2959      * called in the window procedure.)
2960      */
2961     case WM_RENDERFORMAT:
2962     case WM_RENDERALLFORMATS:
2963       flag = FALSE;
2964       GDK_NOTE (EVENTS, flag = TRUE);
2965       if (flag)
2966         g_print ("WM_%s: %#lx %#x (%s)\n",
2967                  (msg->message == WM_RENDERFORMAT ? "RENDERFORMAT" :
2968                   "RENDERALLFORMATS"),
2969                  (gulong) msg->hwnd,
2970                  msg->wParam,
2971                  (msg->wParam == CF_TEXT ? "CF_TEXT" :
2972                   (msg->wParam == CF_DIB ? "CF_DIB" :
2973                    (msg->wParam == CF_UNICODETEXT ? "CF_UNICODETEXT" :
2974                     (GetClipboardFormatName (msg->wParam, buf, sizeof (buf)), buf)))));
2975
2976 #if 0
2977       event->selection.type = GDK_SELECTION_REQUEST;
2978       event->selection.window = window;
2979       event->selection.selection = gdk_clipboard_atom;
2980       if (msg->wParam == CF_TEXT)
2981         event->selection.target = GDK_TARGET_STRING;
2982       else
2983         {
2984           GetClipboardFormatName (msg->wParam, buf, sizeof (buf));
2985           event->selection.target = gdk_atom_intern (buf, FALSE);
2986         }
2987       event->selection.property = gdk_selection_property;
2988       event->selection.requestor = (guint32) msg->hwnd;
2989       event->selection.time = msg->time;
2990       return_val = !GDK_WINDOW_DESTROYED (window);
2991 #else
2992       /* Test code, to see if SetClipboardData works when called from
2993        * the window procedure.
2994        */
2995       {
2996         HGLOBAL hdata = GlobalAlloc (GMEM_MOVEABLE|GMEM_DDESHARE, 10);
2997         char *ptr = GlobalLock (hdata);
2998         strcpy (ptr, "Huhhaa");
2999         GlobalUnlock (hdata);
3000         if (!SetClipboardData (CF_TEXT, hdata))
3001           WIN32_API_FAILED ("SetClipboardData");
3002       }
3003       *ret_valp = 0;
3004       *ret_val_flagp = TRUE;
3005       return_val = FALSE;
3006 #endif
3007       break;
3008 #endif /* No delayed rendering */
3009
3010     case WM_DESTROY:
3011       GDK_NOTE (EVENTS, g_print ("WM_DESTROY: %#lx\n", (gulong) msg->hwnd));
3012
3013       event->any.type = GDK_DESTROY;
3014       event->any.window = window;
3015       if (window != NULL && window == current_window)
3016         {
3017           gdk_drawable_unref (current_window);
3018           current_window = NULL;
3019         }
3020
3021       if (p_grab_window == window)
3022         gdk_pointer_ungrab (msg->time);
3023
3024       if (k_grab_window == window)
3025         gdk_keyboard_ungrab (msg->time);
3026
3027       return_val = window != NULL && !GDK_WINDOW_DESTROYED (window);
3028
3029       if ((window != NULL) && (gdk_root_window != msg->hwnd))
3030         gdk_window_destroy_notify (window);
3031
3032       break;
3033
3034 #ifdef HAVE_WINTAB
3035       /* Handle WINTAB events here, as we know that gdkinput.c will
3036        * use the fixed WT_DEFBASE as lcMsgBase, and we thus can use the
3037        * constants as case labels.
3038        */
3039     case WT_PACKET:
3040       GDK_NOTE (EVENTS, g_print ("WT_PACKET: %#lx %d %#lx\n",
3041                                  (gulong) msg->hwnd,
3042                                  msg->wParam, msg->lParam));
3043       goto wintab;
3044
3045     case WT_CSRCHANGE:
3046       GDK_NOTE (EVENTS, g_print ("WT_CSRCHANGE: %#lx %d %#lx\n",
3047                                  (gulong) msg->hwnd,
3048                                  msg->wParam, msg->lParam));
3049       goto wintab;
3050
3051     case WT_PROXIMITY:
3052       GDK_NOTE (EVENTS, g_print ("WT_PROXIMITY: %#lx %#x %d %d\n",
3053                                  (gulong) msg->hwnd, msg->wParam,
3054                                  LOWORD (msg->lParam),
3055                                  HIWORD (msg->lParam)));
3056       /* Fall through */
3057     wintab:
3058       event->any.window = window;
3059       return_val = _gdk_input_other_event(event, msg, window);
3060       break;
3061 #endif
3062
3063     default:
3064       GDK_NOTE (EVENTS, g_print ("%s: %#lx %#x %#lx\n",
3065                                  gdk_win32_message_name (msg->message),
3066                                  (gulong) msg->hwnd,
3067                                  msg->wParam, msg->lParam));
3068     }
3069
3070 done:
3071
3072   if (return_val)
3073     {
3074       if (event->any.window)
3075         gdk_drawable_ref (event->any.window);
3076       if (((event->any.type == GDK_ENTER_NOTIFY) ||
3077            (event->any.type == GDK_LEAVE_NOTIFY)) &&
3078           (event->crossing.subwindow != NULL))
3079         gdk_drawable_ref (event->crossing.subwindow);
3080
3081       GDK_NOTE (EVENTS, print_event (event));
3082     }
3083   else
3084     {
3085       /* Mark this event as having no resources to be freed */
3086       event->any.window = NULL;
3087       event->any.type = GDK_NOTHING;
3088     }
3089
3090   if (window)
3091     gdk_drawable_unref (window);
3092
3093   return return_val;
3094 }
3095
3096 void
3097 gdk_events_queue (void)
3098 {
3099   MSG msg;
3100
3101   while (!gdk_event_queue_find_first ()
3102          && PeekMessage (&msg, NULL, 0, 0, PM_REMOVE))
3103     {
3104       GDK_NOTE (EVENTS, g_print ("PeekMessage: %#lx %s\n",
3105                                  (gulong) msg.hwnd, gdk_win32_message_name (msg.message)));
3106
3107       if (active_imm_msgpump_owner == NULL
3108           || (active_imm_msgpump_owner->lpVtbl->OnTranslateMessage) (active_imm_msgpump_owner, &msg) != S_OK)
3109         TranslateMessage (&msg);
3110
3111       DispatchMessage (&msg);
3112     }
3113 }
3114
3115 static gboolean
3116 gdk_event_prepare (GSource *source,
3117                    gint    *timeout)
3118 {
3119   MSG msg;
3120   gboolean retval;
3121
3122   GDK_THREADS_ENTER ();
3123
3124   *timeout = -1;
3125
3126   retval = (gdk_event_queue_find_first () != NULL)
3127               || PeekMessage (&msg, NULL, 0, 0, PM_NOREMOVE);
3128
3129   GDK_THREADS_LEAVE ();
3130
3131   return retval;
3132 }
3133
3134 static gboolean
3135 gdk_event_check (GSource *source)
3136 {
3137   MSG msg;
3138   gboolean retval;
3139
3140   GDK_THREADS_ENTER ();
3141
3142   if (event_poll_fd.revents & G_IO_IN)
3143     retval = (gdk_event_queue_find_first () != NULL)
3144               || PeekMessage (&msg, NULL, 0, 0, PM_NOREMOVE);
3145   else
3146     retval = FALSE;
3147
3148   GDK_THREADS_LEAVE ();
3149
3150   return retval;
3151 }
3152
3153 static gboolean
3154 gdk_event_dispatch (GSource     *source,
3155                     GSourceFunc  callback,
3156                     gpointer     user_data)
3157 {
3158   GdkEvent *event;
3159
3160   GDK_THREADS_ENTER ();
3161
3162   gdk_events_queue();
3163   event = gdk_event_unqueue();
3164
3165   if (event)
3166     {
3167       if (gdk_event_func)
3168         (*gdk_event_func) (event, gdk_event_data);
3169
3170       gdk_event_free (event);
3171     }
3172
3173   GDK_THREADS_LEAVE ();
3174
3175   return TRUE;
3176 }
3177
3178 /* Sends a ClientMessage to all toplevel client windows */
3179 gboolean
3180 gdk_event_send_client_message (GdkEvent *event, guint32 xid)
3181 {
3182   /* XXX */
3183   return FALSE;
3184 }
3185
3186 void
3187 gdk_event_send_clientmessage_toall (GdkEvent *event)
3188 {
3189   /* XXX */
3190 }
3191
3192 void
3193 gdk_flush (void)
3194 {
3195   MSG msg;
3196
3197   /* Process all messages currently available */
3198   while (PeekMessage (&msg, NULL, 0, 0, PM_REMOVE))
3199     {
3200       TranslateMessage (&msg); /* Translate virt. key codes */
3201       DispatchMessage (&msg);  /* Dispatch msg. to window */
3202     }
3203
3204   GdiFlush ();
3205 }
3206
3207 #ifdef G_ENABLE_DEBUG
3208
3209 gchar *
3210 gdk_win32_message_name (UINT msg)
3211 {
3212   static gchar bfr[100];
3213
3214   switch (msg)
3215     {
3216 #define CASE(x) case x: return #x
3217       CASE (WM_NULL);
3218       CASE (WM_CREATE);
3219       CASE (WM_DESTROY);
3220       CASE (WM_MOVE);
3221       CASE (WM_SIZE);
3222       CASE (WM_ACTIVATE);
3223       CASE (WM_SETFOCUS);
3224       CASE (WM_KILLFOCUS);
3225       CASE (WM_ENABLE);
3226       CASE (WM_SETREDRAW);
3227       CASE (WM_SETTEXT);
3228       CASE (WM_GETTEXT);
3229       CASE (WM_GETTEXTLENGTH);
3230       CASE (WM_PAINT);
3231       CASE (WM_CLOSE);
3232       CASE (WM_QUERYENDSESSION);
3233       CASE (WM_QUERYOPEN);
3234       CASE (WM_ENDSESSION);
3235       CASE (WM_QUIT);
3236       CASE (WM_ERASEBKGND);
3237       CASE (WM_SYSCOLORCHANGE);
3238       CASE (WM_SHOWWINDOW);
3239       CASE (WM_WININICHANGE);
3240       CASE (WM_DEVMODECHANGE);
3241       CASE (WM_ACTIVATEAPP);
3242       CASE (WM_FONTCHANGE);
3243       CASE (WM_TIMECHANGE);
3244       CASE (WM_CANCELMODE);
3245       CASE (WM_SETCURSOR);
3246       CASE (WM_MOUSEACTIVATE);
3247       CASE (WM_CHILDACTIVATE);
3248       CASE (WM_QUEUESYNC);
3249       CASE (WM_GETMINMAXINFO);
3250       CASE (WM_PAINTICON);
3251       CASE (WM_ICONERASEBKGND);
3252       CASE (WM_NEXTDLGCTL);
3253       CASE (WM_SPOOLERSTATUS);
3254       CASE (WM_DRAWITEM);
3255       CASE (WM_MEASUREITEM);
3256       CASE (WM_DELETEITEM);
3257       CASE (WM_VKEYTOITEM);
3258       CASE (WM_CHARTOITEM);
3259       CASE (WM_SETFONT);
3260       CASE (WM_GETFONT);
3261       CASE (WM_SETHOTKEY);
3262       CASE (WM_GETHOTKEY);
3263       CASE (WM_QUERYDRAGICON);
3264       CASE (WM_COMPAREITEM);
3265       CASE (WM_GETOBJECT);
3266       CASE (WM_COMPACTING);
3267       CASE (WM_WINDOWPOSCHANGING);
3268       CASE (WM_WINDOWPOSCHANGED);
3269       CASE (WM_POWER);
3270       CASE (WM_COPYDATA);
3271       CASE (WM_CANCELJOURNAL);
3272       CASE (WM_NOTIFY);
3273       CASE (WM_INPUTLANGCHANGEREQUEST);
3274       CASE (WM_INPUTLANGCHANGE);
3275       CASE (WM_TCARD);
3276       CASE (WM_HELP);
3277       CASE (WM_USERCHANGED);
3278       CASE (WM_NOTIFYFORMAT);
3279       CASE (WM_CONTEXTMENU);
3280       CASE (WM_STYLECHANGING);
3281       CASE (WM_STYLECHANGED);
3282       CASE (WM_DISPLAYCHANGE);
3283       CASE (WM_GETICON);
3284       CASE (WM_SETICON);
3285       CASE (WM_NCCREATE);
3286       CASE (WM_NCDESTROY);
3287       CASE (WM_NCCALCSIZE);
3288       CASE (WM_NCHITTEST);
3289       CASE (WM_NCPAINT);
3290       CASE (WM_NCACTIVATE);
3291       CASE (WM_GETDLGCODE);
3292       CASE (WM_SYNCPAINT);
3293       CASE (WM_NCMOUSEMOVE);
3294       CASE (WM_NCLBUTTONDOWN);
3295       CASE (WM_NCLBUTTONUP);
3296       CASE (WM_NCLBUTTONDBLCLK);
3297       CASE (WM_NCRBUTTONDOWN);
3298       CASE (WM_NCRBUTTONUP);
3299       CASE (WM_NCRBUTTONDBLCLK);
3300       CASE (WM_NCMBUTTONDOWN);
3301       CASE (WM_NCMBUTTONUP);
3302       CASE (WM_NCMBUTTONDBLCLK);
3303       CASE (WM_NCXBUTTONDOWN);
3304       CASE (WM_NCXBUTTONUP);
3305       CASE (WM_NCXBUTTONDBLCLK);
3306       CASE (WM_KEYDOWN);
3307       CASE (WM_KEYUP);
3308       CASE (WM_CHAR);
3309       CASE (WM_DEADCHAR);
3310       CASE (WM_SYSKEYDOWN);
3311       CASE (WM_SYSKEYUP);
3312       CASE (WM_SYSCHAR);
3313       CASE (WM_SYSDEADCHAR);
3314       CASE (WM_KEYLAST);
3315       CASE (WM_IME_STARTCOMPOSITION);
3316       CASE (WM_IME_ENDCOMPOSITION);
3317       CASE (WM_IME_COMPOSITION);
3318       CASE (WM_INITDIALOG);
3319       CASE (WM_COMMAND);
3320       CASE (WM_SYSCOMMAND);
3321       CASE (WM_TIMER);
3322       CASE (WM_HSCROLL);
3323       CASE (WM_VSCROLL);
3324       CASE (WM_INITMENU);
3325       CASE (WM_INITMENUPOPUP);
3326       CASE (WM_MENUSELECT);
3327       CASE (WM_MENUCHAR);
3328       CASE (WM_ENTERIDLE);
3329       CASE (WM_MENURBUTTONUP);
3330       CASE (WM_MENUDRAG);
3331       CASE (WM_MENUGETOBJECT);
3332       CASE (WM_UNINITMENUPOPUP);
3333       CASE (WM_MENUCOMMAND);
3334       CASE (WM_CHANGEUISTATE);
3335       CASE (WM_UPDATEUISTATE);
3336       CASE (WM_QUERYUISTATE);
3337       CASE (WM_CTLCOLORMSGBOX);
3338       CASE (WM_CTLCOLOREDIT);
3339       CASE (WM_CTLCOLORLISTBOX);
3340       CASE (WM_CTLCOLORBTN);
3341       CASE (WM_CTLCOLORDLG);
3342       CASE (WM_CTLCOLORSCROLLBAR);
3343       CASE (WM_CTLCOLORSTATIC);
3344       CASE (WM_MOUSEMOVE);
3345       CASE (WM_LBUTTONDOWN);
3346       CASE (WM_LBUTTONUP);
3347       CASE (WM_LBUTTONDBLCLK);
3348       CASE (WM_RBUTTONDOWN);
3349       CASE (WM_RBUTTONUP);
3350       CASE (WM_RBUTTONDBLCLK);
3351       CASE (WM_MBUTTONDOWN);
3352       CASE (WM_MBUTTONUP);
3353       CASE (WM_MBUTTONDBLCLK);
3354       CASE (WM_MOUSEWHEEL);
3355       CASE (WM_XBUTTONDOWN);
3356       CASE (WM_XBUTTONUP);
3357       CASE (WM_XBUTTONDBLCLK);
3358       CASE (WM_PARENTNOTIFY);
3359       CASE (WM_ENTERMENULOOP);
3360       CASE (WM_EXITMENULOOP);
3361       CASE (WM_NEXTMENU);
3362       CASE (WM_SIZING);
3363       CASE (WM_CAPTURECHANGED);
3364       CASE (WM_MOVING);
3365       CASE (WM_POWERBROADCAST);
3366       CASE (WM_DEVICECHANGE);
3367       CASE (WM_MDICREATE);
3368       CASE (WM_MDIDESTROY);
3369       CASE (WM_MDIACTIVATE);
3370       CASE (WM_MDIRESTORE);
3371       CASE (WM_MDINEXT);
3372       CASE (WM_MDIMAXIMIZE);
3373       CASE (WM_MDITILE);
3374       CASE (WM_MDICASCADE);
3375       CASE (WM_MDIICONARRANGE);
3376       CASE (WM_MDIGETACTIVE);
3377       CASE (WM_MDISETMENU);
3378       CASE (WM_ENTERSIZEMOVE);
3379       CASE (WM_EXITSIZEMOVE);
3380       CASE (WM_DROPFILES);
3381       CASE (WM_MDIREFRESHMENU);
3382       CASE (WM_IME_SETCONTEXT);
3383       CASE (WM_IME_NOTIFY);
3384       CASE (WM_IME_CONTROL);
3385       CASE (WM_IME_COMPOSITIONFULL);
3386       CASE (WM_IME_SELECT);
3387       CASE (WM_IME_CHAR);
3388       CASE (WM_IME_REQUEST);
3389       CASE (WM_IME_KEYDOWN);
3390       CASE (WM_IME_KEYUP);
3391       CASE (WM_MOUSEHOVER);
3392       CASE (WM_MOUSELEAVE);
3393       CASE (WM_NCMOUSEHOVER);
3394       CASE (WM_NCMOUSELEAVE);
3395       CASE (WM_CUT);
3396       CASE (WM_COPY);
3397       CASE (WM_PASTE);
3398       CASE (WM_CLEAR);
3399       CASE (WM_UNDO);
3400       CASE (WM_RENDERFORMAT);
3401       CASE (WM_RENDERALLFORMATS);
3402       CASE (WM_DESTROYCLIPBOARD);
3403       CASE (WM_DRAWCLIPBOARD);
3404       CASE (WM_PAINTCLIPBOARD);
3405       CASE (WM_VSCROLLCLIPBOARD);
3406       CASE (WM_SIZECLIPBOARD);
3407       CASE (WM_ASKCBFORMATNAME);
3408       CASE (WM_CHANGECBCHAIN);
3409       CASE (WM_HSCROLLCLIPBOARD);
3410       CASE (WM_QUERYNEWPALETTE);
3411       CASE (WM_PALETTEISCHANGING);
3412       CASE (WM_PALETTECHANGED);
3413       CASE (WM_HOTKEY);
3414       CASE (WM_PRINT);
3415       CASE (WM_PRINTCLIENT);
3416       CASE (WM_APPCOMMAND);
3417       CASE (WM_HANDHELDFIRST);
3418       CASE (WM_HANDHELDLAST);
3419       CASE (WM_AFXFIRST);
3420       CASE (WM_AFXLAST);
3421       CASE (WM_PENWINFIRST);
3422       CASE (WM_PENWINLAST);
3423       CASE (WM_APP);
3424 #undef CASE
3425     default:
3426       if (msg >= WM_HANDHELDFIRST && msg <= WM_HANDHELDLAST)
3427         sprintf (bfr, "WM_HANDHELDFIRST+%d", msg - WM_HANDHELDFIRST);
3428       else if (msg >= WM_AFXFIRST && msg <= WM_AFXLAST)
3429         sprintf (bfr, "WM_AFXFIRST+%d", msg - WM_AFXFIRST);
3430       else if (msg >= WM_PENWINFIRST && msg <= WM_PENWINLAST)
3431         sprintf (bfr, "WM_PENWINFIRST+%d", msg - WM_PENWINFIRST);
3432       else if (msg >= WM_USER && msg <= 0x7FFF)
3433         sprintf (bfr, "WM_USER+%d", msg - WM_USER);
3434       else if (msg >= 0xC000 && msg <= 0xFFFF)
3435         sprintf (bfr, "reg-%#x", msg);
3436       else
3437         sprintf (bfr, "unk-%#x", msg);
3438       return bfr;
3439     }
3440   g_assert_not_reached ();
3441 }
3442
3443 #endif /* G_ENABLE_DEBUG */