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-2002 Tor Lillqvist
   4  * Copyright (C) 2001,2009 Hans Breuer
   5  * Copyright (C) 2007-2009 Cody Russell
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the
  19  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  20  * Boston, MA 02111-1307, USA.
  21  */
  22
  23 /*
  24  * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
  25  * file for a list of people on the GTK+ Team.  See the ChangeLog
  26  * files for a list of changes.  These files are distributed with
  27  * GTK+ at ftp://ftp.gtk.org/pub/gtk/.
  28  */
  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  * Update: a combination of TrackMouseEvent, GetCursorPos and
  38  * GetWindowPos can and is actually used to get rid of those
  39  * pesky tooltips. It should be possible to use this for the
  40  * whole ENTER/LEAVE NOTIFY handling but some platforms may
  41  * not have TrackMouseEvent at all (?) --hb
  42  */
  43
  44 #include "config.h"
  45
  46 #include <glib/gprintf.h>
  47
  48 #include "gdk.h"
  49 #include "gdkdisplayprivate.h"
  50 #include "gdkprivate-win32.h"
  51 #include "gdkkeysyms.h"
  52 #include "gdkdevicemanager-win32.h"
  53 #include "gdkdeviceprivate.h"
  54 #include "gdkdevice-wintab.h"
  55 #include "gdkwin32.h"
  56 #include "gdkwin32dnd.h"
  57 #include "gdkdndprivate.h"
  58
  59 #include <windowsx.h>
  60
  61 #ifdef G_WITH_CYGWIN
  62 #include <fcntl.h>
  63 #include <errno.h>
  64 #endif
  65
  66 #include <objbase.h>
  67
  68 #include <imm.h>
  69
  70 #ifndef XBUTTON1
  71 #define XBUTTON1 1
  72 #define XBUTTON2 2
  73 #endif
  74
  75 #ifndef VK_XBUTTON1
  76 #define VK_XBUTTON1 5
  77 #define VK_XBUTTON2 6
  78 #endif
  79
  80 #ifndef MK_XBUTTON1
  81 #define MK_XBUTTON1 32
  82 #define MK_XBUTTON2 64
  83 #endif
  84
  85 /*
  86  * Private function declarations
  87  */
  88
  89 static gboolean gdk_event_translate (MSG        *msg,
  90                                      gint       *ret_valp);
  91 static void     handle_wm_paint     (MSG        *msg,
  92                                      GdkWindow  *window,
  93                                      gboolean    return_exposes,
  94                                      GdkEvent  **event);
  95
  96 static gboolean gdk_event_prepare  (GSource     *source,
  97                                     gint        *timeout);
  98 static gboolean gdk_event_check    (GSource     *source);
  99 static gboolean gdk_event_dispatch (GSource     *source,
 100                                     GSourceFunc  callback,
 101                                     gpointer     user_data);
 102
 103 static void append_event (GdkEvent *event);
 104 static gboolean is_modally_blocked (GdkWindow   *window);
 105
 106 /* Private variable declarations
 107  */
 108
 109 static GList *client_filters;   /* Filters for client messages */
 110 extern gint       _gdk_input_ignore_core;
 111
 112 static HCURSOR p_grab_cursor;
 113
 114 static GSourceFuncs event_funcs = {
 115   gdk_event_prepare,
 116   gdk_event_check,
 117   gdk_event_dispatch,
 118   NULL
 119 };
 120
 121 GPollFD event_poll_fd;
 122
 123 static GdkWindow *current_toplevel = NULL;
 124 static gint current_x, current_y;
 125 static gint current_root_x, current_root_y;
 126 static UINT client_message;
 127
 128 static UINT got_gdk_events_message;
 129 static HWND modal_win32_dialog = NULL;
 130
 131 #if 0
 132 static HKL latin_locale = NULL;
 133 #endif
 134
 135 static gboolean in_ime_composition = FALSE;
 136 static UINT     modal_timer;
 137 static UINT     sync_timer = 0;
 138
 139 static int debug_indent = 0;
 140
 141 static void
 142 assign_object (gpointer lhsp,
 143                gpointer rhs)
 144 {
 145   if (*(gpointer *)lhsp != rhs)
 146     {
 147       if (*(gpointer *)lhsp != NULL)
 148         g_object_unref (*(gpointer *)lhsp);
 149       *(gpointer *)lhsp = rhs;
 150       if (rhs != NULL)
 151         g_object_ref (rhs);
 152     }
 153 }
 154
 155 static void
 156 track_mouse_event (DWORD dwFlags,
 157                    HWND  hwnd)
 158 {
 159   TRACKMOUSEEVENT tme;
 160
 161   tme.cbSize = sizeof(TRACKMOUSEEVENT);
 162   tme.dwFlags = dwFlags;
 163   tme.hwndTrack = hwnd;
 164   tme.dwHoverTime = HOVER_DEFAULT; /* not used */
 165
 166   if (!TrackMouseEvent (&tme))
 167     WIN32_API_FAILED ("TrackMouseEvent");
 168   else if (dwFlags == TME_LEAVE)
 169     GDK_NOTE (EVENTS, g_print(" (TrackMouseEvent %p)", hwnd));
 170   else if (dwFlags == TME_CANCEL)
 171     GDK_NOTE (EVENTS, g_print(" (cancel TrackMouseEvent %p)", hwnd));
 172 }
 173
 174 gulong
 175 _gdk_win32_get_next_tick (gulong suggested_tick)
 176 {
 177   static gulong cur_tick = 0;
 178
 179   if (suggested_tick == 0)
 180     suggested_tick = GetTickCount ();
 181   if (suggested_tick <= cur_tick)
 182     return cur_tick;
 183   else
 184     return cur_tick = suggested_tick;
 185 }
 186
 187 static void
 188 generate_focus_event (GdkDeviceManager *device_manager,
 189                       GdkWindow        *window,
 190                       gboolean          in)
 191 {
 192   GdkDevice *device;
 193   GdkEvent *event;
 194
 195   device = GDK_DEVICE_MANAGER_WIN32 (device_manager)->core_keyboard;
 196
 197   event = gdk_event_new (GDK_FOCUS_CHANGE);
 198   event->focus_change.window = window;
 199   event->focus_change.in = in;
 200   gdk_event_set_device (event, device);
 201
 202   append_event (event);
 203 }
 204
 205 static void
 206 generate_grab_broken_event (GdkDeviceManager *device_manager,
 207                             GdkWindow        *window,
 208                             gboolean          keyboard,
 209                             GdkWindow        *grab_window)
 210 {
 211   GdkEvent *event = gdk_event_new (GDK_GRAB_BROKEN);
 212   GdkDevice *device;
 213
 214   if (keyboard)
 215     device = GDK_DEVICE_MANAGER_WIN32 (device_manager)->core_keyboard;
 216   else
 217     device = GDK_DEVICE_MANAGER_WIN32 (device_manager)->core_pointer;
 218
 219   event->grab_broken.window = window;
 220   event->grab_broken.send_event = 0;
 221   event->grab_broken.keyboard = keyboard;
 222   event->grab_broken.implicit = FALSE;
 223   event->grab_broken.grab_window = grab_window;
 224   gdk_event_set_device (event, device);
 225
 226   append_event (event);
 227 }
 228
 229 static LRESULT
 230 inner_window_procedure (HWND   hwnd,
 231                         UINT   message,
 232                         WPARAM wparam,
 233                         LPARAM lparam)
 234 {
 235   MSG msg;
 236   DWORD pos;
 237   gint ret_val = 0;
 238
 239   msg.hwnd = hwnd;
 240   msg.message = message;
 241   msg.wParam = wparam;
 242   msg.lParam = lparam;
 243   msg.time = _gdk_win32_get_next_tick (0);
 244   pos = GetMessagePos ();
 245   msg.pt.x = GET_X_LPARAM (pos);
 246   msg.pt.y = GET_Y_LPARAM (pos);
 247
 248   if (gdk_event_translate (&msg, &ret_val))
 249     {
 250       /* If gdk_event_translate() returns TRUE, we return ret_val from
 251        * the window procedure.
 252        */
 253       if (modal_win32_dialog)
 254         PostMessageW (modal_win32_dialog, got_gdk_events_message,
 255                       (WPARAM) 1, 0);
 256       return ret_val;
 257     }
 258   else
 259     {
 260       /* Otherwise call DefWindowProcW(). */
 261       GDK_NOTE (EVENTS, g_print (" DefWindowProcW"));
 262       return DefWindowProcW (hwnd, message, wparam, lparam);
 263     }
 264 }
 265
 266 LRESULT CALLBACK
 267 _gdk_win32_window_procedure (HWND   hwnd,
 268                              UINT   message,
 269                              WPARAM wparam,
 270                              LPARAM lparam)
 271 {
 272   LRESULT retval;
 273
 274   GDK_NOTE (EVENTS, g_print ("%s%*s%s %p",
 275                              (debug_indent > 0 ? "\n" : ""),
 276                              debug_indent, "",
 277                              _gdk_win32_message_to_string (message), hwnd));
 278   debug_indent += 2;
 279   retval = inner_window_procedure (hwnd, message, wparam, lparam);
 280   debug_indent -= 2;
 281
 282   GDK_NOTE (EVENTS, g_print (" => %I64d%s", (gint64) retval, (debug_indent == 0 ? "\n" : "")));
 283
 284   return retval;
 285 }
 286
 287 void
 288 _gdk_events_init (void)
 289 {
 290   GSource *source;
 291
 292 #if 0
 293   int i, j, n;
 294
 295   /* List of languages that use a latin keyboard. Somewhat sorted in
 296    * "order of least surprise", in case we have to load one of them if
 297    * the user only has arabic loaded, for instance.
 298    */
 299   static int latin_languages[] = {
 300     LANG_ENGLISH,
 301     LANG_SPANISH,
 302     LANG_PORTUGUESE,
 303     LANG_FRENCH,
 304     LANG_GERMAN,
 305     /* Rest in numeric order */
 306     LANG_CZECH,
 307     LANG_DANISH,
 308     LANG_FINNISH,
 309     LANG_HUNGARIAN,
 310     LANG_ICELANDIC,
 311     LANG_ITALIAN,
 312     LANG_DUTCH,
 313     LANG_NORWEGIAN,
 314     LANG_POLISH,
 315     LANG_ROMANIAN,
 316     LANG_SLOVAK,
 317     LANG_ALBANIAN,
 318     LANG_SWEDISH,
 319     LANG_TURKISH,
 320     LANG_INDONESIAN,
 321     LANG_SLOVENIAN,
 322     LANG_ESTONIAN,
 323     LANG_LATVIAN,
 324     LANG_LITHUANIAN,
 325     LANG_VIETNAMESE,
 326     LANG_AFRIKAANS,
 327     LANG_FAEROESE
 328 #ifdef LANG_SWAHILI
 329    ,LANG_SWAHILI
 330 #endif
 331   };
 332 #endif
 333
 334   client_message = RegisterWindowMessage ("GDK_WIN32_CLIENT_MESSAGE");
 335   got_gdk_events_message = RegisterWindowMessage ("GDK_WIN32_GOT_EVENTS");
 336
 337 #if 0
 338   /* Check if we have some input locale identifier loaded that uses a
 339    * latin keyboard, to be able to get the virtual-key code for the
 340    * latin characters corresponding to ASCII control characters.
 341    */
 342   if ((n = GetKeyboardLayoutList (0, NULL)) == 0)
 343     WIN32_API_FAILED ("GetKeyboardLayoutList");
 344   else
 345     {
 346       HKL *hkl_list = g_new (HKL, n);
 347       if (GetKeyboardLayoutList (n, hkl_list) == 0)
 348         WIN32_API_FAILED ("GetKeyboardLayoutList");
 349       else
 350         {
 351           for (i = 0; latin_locale == NULL && i < n; i++)
 352             for (j = 0; j < G_N_ELEMENTS (latin_languages); j++)
 353               if (PRIMARYLANGID (LOWORD (hkl_list[i])) == latin_languages[j])
 354                 {
 355                   latin_locale = hkl_list [i];
 356                   break;
 357                 }
 358         }
 359       g_free (hkl_list);
 360     }
 361
 362   if (latin_locale == NULL)
 363     {
 364       /* Try to load a keyboard layout with latin characters then.
 365        */
 366       i = 0;
 367       while (latin_locale == NULL && i < G_N_ELEMENTS (latin_languages))
 368         {
 369           char id[9];
 370           g_sprintf (id, "%08x", MAKELANGID (latin_languages[i++], SUBLANG_DEFAULT));
 371           latin_locale = LoadKeyboardLayout (id, KLF_NOTELLSHELL|KLF_SUBSTITUTE_OK);
 372         }
 373     }
 374
 375   GDK_NOTE (EVENTS, g_print ("latin_locale = %08x\n", (guint) latin_locale));
 376 #endif
 377
 378   source = g_source_new (&event_funcs, sizeof (GSource));
 379   g_source_set_name (source, "GDK Win32 event source");
 380   g_source_set_priority (source, GDK_PRIORITY_EVENTS);
 381
 382 #ifdef G_WITH_CYGWIN
 383   event_poll_fd.fd = open ("/dev/windows", O_RDONLY);
 384   if (event_poll_fd.fd == -1)
 385     g_error ("can't open \"/dev/windows\": %s", g_strerror (errno));
 386 #else
 387   event_poll_fd.fd = G_WIN32_MSG_HANDLE;
 388 #endif
 389   event_poll_fd.events = G_IO_IN;
 390
 391   g_source_add_poll (source, &event_poll_fd);
 392   g_source_set_can_recurse (source, TRUE);
 393   g_source_attach (source, NULL);
 394 }
 395
 396 gboolean
 397 _gdk_win32_display_has_pending (GdkDisplay *display)
 398 {
 399   MSG msg;
 400   return (_gdk_event_queue_find_first (display) ||
 401           (modal_win32_dialog == NULL &&
 402            PeekMessageW (&msg, NULL, 0, 0, PM_NOREMOVE)));
 403 }
 404
 405 #if 0 /* Unused, but might be useful to re-introduce in some debugging output? */
 406
 407 static char *
 408 event_mask_string (GdkEventMask mask)
 409 {
 410   static char bfr[500];
 411   char *p = bfr;
 412
 413   *p = '\0';
 414 #define BIT(x) \
 415   if (mask & GDK_##x##_MASK) \
 416     p += g_sprintf (p, "%s" #x, (p > bfr ? " " : ""))
 417   BIT (EXPOSURE);
 418   BIT (POINTER_MOTION);
 419   BIT (POINTER_MOTION_HINT);
 420   BIT (BUTTON_MOTION);
 421   BIT (BUTTON1_MOTION);
 422   BIT (BUTTON2_MOTION);
 423   BIT (BUTTON3_MOTION);
 424   BIT (BUTTON_PRESS);
 425   BIT (BUTTON_RELEASE);
 426   BIT (KEY_PRESS);
 427   BIT (KEY_RELEASE);
 428   BIT (ENTER_NOTIFY);
 429   BIT (LEAVE_NOTIFY);
 430   BIT (FOCUS_CHANGE);
 431   BIT (STRUCTURE);
 432   BIT (PROPERTY_CHANGE);
 433   BIT (VISIBILITY_NOTIFY);
 434   BIT (PROXIMITY_IN);
 435   BIT (PROXIMITY_OUT);
 436   BIT (SUBSTRUCTURE);
 437   BIT (SCROLL);
 438 #undef BIT
 439
 440   return bfr;
 441 }
 442
 443 #endif
 444
 445 GdkGrabStatus
 446 _gdk_windowing_device_grab (GdkDevice    *device,
 447                             GdkWindow    *window,
 448                             GdkWindow    *native_window,
 449                             gboolean      owner_events,
 450                             GdkEventMask        event_mask,
 451                             GdkWindow    *confine_to,
 452                             GdkCursor    *cursor,
 453                             guint32           time)
 454 {
 455   HCURSOR hcursor;
 456   GdkWin32Cursor *cursor_private;
 457   gint return_val;
 458   GdkWindowImplWin32 *impl = GDK_WINDOW_IMPL_WIN32 (native_window->impl);
 459
 460   g_return_val_if_fail (window != NULL, 0);
 461   g_return_val_if_fail (GDK_IS_WINDOW (window), 0);
 462   g_return_val_if_fail (confine_to == NULL || GDK_IS_WINDOW (confine_to), 0);
 463
 464   cursor_private = (GdkWin32Cursor*) cursor;
 465
 466   if (!cursor)
 467     hcursor = NULL;
 468   else if ((hcursor = CopyCursor (cursor_private->hcursor)) == NULL)
 469     WIN32_API_FAILED ("CopyCursor");
 470
 471   return_val = GDK_DEVICE_GET_CLASS (device)->grab (device,
 472                                                     native_window,
 473                                                     owner_events,
 474                                                     event_mask,
 475                                                     confine_to,
 476                                                     cursor,
 477                                                     time);
 478
 479   /* TODO_CSW: grab brokens, confine window, input_grab */
 480   if (p_grab_cursor != NULL)
 481     {
 482       if (GetCursor () == p_grab_cursor)
 483         SetCursor (NULL);
 484       DestroyCursor (p_grab_cursor);
 485     }
 486
 487   p_grab_cursor = hcursor;
 488
 489   if (p_grab_cursor != NULL)
 490     SetCursor (p_grab_cursor);
 491   else if (impl->hcursor != NULL)
 492     SetCursor (impl->hcursor);
 493   else
 494     SetCursor (LoadCursor (NULL, IDC_ARROW));
 495
 496   return return_val;
 497 }
 498
 499 static GdkWindow *
 500 find_window_for_mouse_event (GdkWindow* reported_window,
 501                              MSG*       msg)
 502 {
 503   HWND hwnd;
 504   POINTS points;
 505   POINT pt;
 506   GdkWindow* other_window = NULL;
 507   GdkDeviceManagerWin32 *device_manager;
 508
 509   device_manager = GDK_DEVICE_MANAGER_WIN32 (gdk_display_get_device_manager (_gdk_display));
 510
 511   if (!_gdk_display_get_last_device_grab (_gdk_display, device_manager->core_pointer))
 512     return reported_window;
 513
 514   points = MAKEPOINTS (msg->lParam);
 515   pt.x = points.x;
 516   pt.y = points.y;
 517   ClientToScreen (msg->hwnd, &pt);
 518
 519   hwnd = WindowFromPoint (pt);
 520
 521   if (hwnd != NULL)
 522     {
 523       RECT rect;
 524
 525       GetClientRect (hwnd, &rect);
 526       ScreenToClient (hwnd, &pt);
 527       if (!PtInRect (&rect, pt))
 528         return _gdk_root;
 529
 530       other_window = gdk_win32_handle_table_lookup (hwnd);
 531     }
 532
 533   if (other_window == NULL)
 534     return _gdk_root;
 535
 536   /* need to also adjust the coordinates to the new window */
 537   pt.x = points.x;
 538   pt.y = points.y;
 539   ClientToScreen (msg->hwnd, &pt);
 540   ScreenToClient (GDK_WINDOW_HWND (other_window), &pt);
 541   /* ATTENTION: need to update client coords */
 542   msg->lParam = MAKELPARAM (pt.x, pt.y);
 543
 544   return other_window;
 545 }
 546
 547 static void
 548 build_key_event_state (GdkEvent *event,
 549                        BYTE     *key_state)
 550 {
 551   event->key.state = 0;
 552
 553   if (key_state[VK_SHIFT] & 0x80)
 554     event->key.state |= GDK_SHIFT_MASK;
 555
 556   if (key_state[VK_CAPITAL] & 0x01)
 557     event->key.state |= GDK_LOCK_MASK;
 558
 559   if (key_state[VK_LBUTTON] & 0x80)
 560     event->key.state |= GDK_BUTTON1_MASK;
 561   if (key_state[VK_MBUTTON] & 0x80)
 562     event->key.state |= GDK_BUTTON2_MASK;
 563   if (key_state[VK_RBUTTON] & 0x80)
 564     event->key.state |= GDK_BUTTON3_MASK;
 565   if (key_state[VK_XBUTTON1] & 0x80)
 566     event->key.state |= GDK_BUTTON4_MASK;
 567   if (key_state[VK_XBUTTON2] & 0x80)
 568     event->key.state |= GDK_BUTTON5_MASK;
 569
 570   if (_gdk_keyboard_has_altgr &&
 571       (key_state[VK_LCONTROL] & 0x80) &&
 572       (key_state[VK_RMENU] & 0x80))
 573     {
 574       event->key.group = 1;
 575       event->key.state |= GDK_MOD2_MASK;
 576       if (key_state[VK_RCONTROL] & 0x80)
 577         event->key.state |= GDK_CONTROL_MASK;
 578       if (key_state[VK_LMENU] & 0x80)
 579         event->key.state |= GDK_MOD1_MASK;
 580     }
 581   else
 582     {
 583       event->key.group = 0;
 584       if (key_state[VK_CONTROL] & 0x80)
 585         event->key.state |= GDK_CONTROL_MASK;
 586       if (key_state[VK_MENU] & 0x80)
 587         event->key.state |= GDK_MOD1_MASK;
 588     }
 589 }
 590
 591 static gint
 592 build_pointer_event_state (MSG *msg)
 593 {
 594   gint state;
 595
 596   state = 0;
 597
 598   if (msg->wParam & MK_CONTROL)
 599     state |= GDK_CONTROL_MASK;
 600
 601   if ((msg->message != WM_LBUTTONDOWN &&
 602        (msg->wParam & MK_LBUTTON)) ||
 603       msg->message == WM_LBUTTONUP)
 604     state |= GDK_BUTTON1_MASK;
 605
 606   if ((msg->message != WM_MBUTTONDOWN &&
 607        (msg->wParam & MK_MBUTTON)) ||
 608       msg->message == WM_MBUTTONUP)
 609     state |= GDK_BUTTON2_MASK;
 610
 611   if ((msg->message != WM_RBUTTONDOWN &&
 612        (msg->wParam & MK_RBUTTON)) ||
 613       msg->message == WM_RBUTTONUP)
 614     state |= GDK_BUTTON3_MASK;
 615
 616   if (((msg->message != WM_XBUTTONDOWN || HIWORD (msg->wParam) != XBUTTON1) &&
 617        (msg->wParam & MK_XBUTTON1)) ||
 618       (msg->message == WM_XBUTTONUP && HIWORD (msg->wParam) == XBUTTON1))
 619     state |= GDK_BUTTON4_MASK;
 620
 621   if (((msg->message != WM_XBUTTONDOWN || HIWORD (msg->wParam) != XBUTTON2) &&
 622        (msg->wParam & MK_XBUTTON2)) ||
 623       (msg->message == WM_XBUTTONUP && HIWORD (msg->wParam) == XBUTTON2))
 624     state |= GDK_BUTTON5_MASK;
 625
 626   if (msg->wParam & MK_SHIFT)
 627     state |= GDK_SHIFT_MASK;
 628
 629   if (GetKeyState (VK_MENU) < 0)
 630     state |= GDK_MOD1_MASK;
 631
 632   if (GetKeyState (VK_CAPITAL) & 0x1)
 633     state |= GDK_LOCK_MASK;
 634
 635   return state;
 636 }
 637
 638 static void
 639 build_wm_ime_composition_event (GdkEvent *event,
 640                                 MSG      *msg,
 641                                 wchar_t   wc,
 642                                 BYTE     *key_state)
 643 {
 644   event->key.time = _gdk_win32_get_next_tick (msg->time);
 645
 646   build_key_event_state (event, key_state);
 647
 648   event->key.hardware_keycode = 0; /* FIXME: What should it be? */
 649   event->key.string = NULL;
 650   event->key.length = 0;
 651   event->key.keyval = gdk_unicode_to_keyval (wc);
 652 }
 653
 654 #ifdef G_ENABLE_DEBUG
 655
 656 static void
 657 print_event_state (guint state)
 658 {
 659 #define CASE(bit) if (state & GDK_ ## bit ## _MASK) g_print (#bit " ");
 660   CASE (SHIFT);
 661   CASE (LOCK);
 662   CASE (CONTROL);
 663   CASE (MOD1);
 664   CASE (MOD2);
 665   CASE (MOD3);
 666   CASE (MOD4);
 667   CASE (MOD5);
 668   CASE (BUTTON1);
 669   CASE (BUTTON2);
 670   CASE (BUTTON3);
 671   CASE (BUTTON4);
 672   CASE (BUTTON5);
 673 #undef CASE
 674 }
 675
 676 void
 677 _gdk_win32_print_event (const GdkEvent *event)
 678 {
 679   gchar *escaped, *kvname;
 680   gchar *selection_name, *target_name, *property_name;
 681
 682   g_print ("%s%*s===> ", (debug_indent > 0 ? "\n" : ""), debug_indent, "");
 683   switch (event->any.type)
 684     {
 685 #define CASE(x) case x: g_print (#x); break;
 686     CASE (GDK_NOTHING);
 687     CASE (GDK_DELETE);
 688     CASE (GDK_DESTROY);
 689     CASE (GDK_EXPOSE);
 690     CASE (GDK_MOTION_NOTIFY);
 691     CASE (GDK_BUTTON_PRESS);
 692     CASE (GDK_2BUTTON_PRESS);
 693     CASE (GDK_3BUTTON_PRESS);
 694     CASE (GDK_BUTTON_RELEASE);
 695     CASE (GDK_KEY_PRESS);
 696     CASE (GDK_KEY_RELEASE);
 697     CASE (GDK_ENTER_NOTIFY);
 698     CASE (GDK_LEAVE_NOTIFY);
 699     CASE (GDK_FOCUS_CHANGE);
 700     CASE (GDK_CONFIGURE);
 701     CASE (GDK_MAP);
 702     CASE (GDK_UNMAP);
 703     CASE (GDK_PROPERTY_NOTIFY);
 704     CASE (GDK_SELECTION_CLEAR);
 705     CASE (GDK_SELECTION_REQUEST);
 706     CASE (GDK_SELECTION_NOTIFY);
 707     CASE (GDK_PROXIMITY_IN);
 708     CASE (GDK_PROXIMITY_OUT);
 709     CASE (GDK_DRAG_ENTER);
 710     CASE (GDK_DRAG_LEAVE);
 711     CASE (GDK_DRAG_MOTION);
 712     CASE (GDK_DRAG_STATUS);
 713     CASE (GDK_DROP_START);
 714     CASE (GDK_DROP_FINISHED);
 715     CASE (GDK_CLIENT_EVENT);
 716     CASE (GDK_VISIBILITY_NOTIFY);
 717     CASE (GDK_SCROLL);
 718     CASE (GDK_WINDOW_STATE);
 719     CASE (GDK_SETTING);
 720     CASE (GDK_OWNER_CHANGE);
 721     CASE (GDK_GRAB_BROKEN);
 722 #undef CASE
 723     default: g_assert_not_reached ();
 724     }
 725
 726   g_print (" %p ", event->any.window ? GDK_WINDOW_HWND (event->any.window) : NULL);
 727
 728   switch (event->any.type)
 729     {
 730     case GDK_EXPOSE:
 731       g_print ("%s %d",
 732                _gdk_win32_gdkrectangle_to_string (&event->expose.area),
 733                event->expose.count);
 734       break;
 735     case GDK_MOTION_NOTIFY:
 736       g_print ("(%.4g,%.4g) (%.4g,%.4g) %s",
 737                event->motion.x, event->motion.y,
 738                event->motion.x_root, event->motion.y_root,
 739                event->motion.is_hint ? "HINT " : "");
 740       print_event_state (event->motion.state);
 741       break;
 742     case GDK_BUTTON_PRESS:
 743     case GDK_2BUTTON_PRESS:
 744     case GDK_3BUTTON_PRESS:
 745     case GDK_BUTTON_RELEASE:
 746       g_print ("%d (%.4g,%.4g) (%.4g,%.4g) ",
 747                event->button.button,
 748                event->button.x, event->button.y,
 749                event->button.x_root, event->button.y_root);
 750       print_event_state (event->button.state);
 751       break;
 752     case GDK_KEY_PRESS:
 753     case GDK_KEY_RELEASE:
 754       if (event->key.length == 0)
 755         escaped = g_strdup ("");
 756       else
 757         escaped = g_strescape (event->key.string, NULL);
 758       kvname = gdk_keyval_name (event->key.keyval);
 759       g_print ("%#.02x group:%d %s %d:\"%s\" ",
 760                event->key.hardware_keycode, event->key.group,
 761                (kvname ? kvname : "??"),
 762                event->key.length,
 763                escaped);
 764       g_free (escaped);
 765       print_event_state (event->key.state);
 766       break;
 767     case GDK_ENTER_NOTIFY:
 768     case GDK_LEAVE_NOTIFY:
 769       g_print ("%p (%.4g,%.4g) (%.4g,%.4g) %s %s%s",
 770                event->crossing.subwindow == NULL ? NULL : GDK_WINDOW_HWND (event->crossing.subwindow),
 771                event->crossing.x, event->crossing.y,
 772                event->crossing.x_root, event->crossing.y_root,
 773                (event->crossing.mode == GDK_CROSSING_NORMAL ? "NORMAL" :
 774                 (event->crossing.mode == GDK_CROSSING_GRAB ? "GRAB" :
 775                  (event->crossing.mode == GDK_CROSSING_UNGRAB ? "UNGRAB" :
 776                   "???"))),
 777                (event->crossing.detail == GDK_NOTIFY_ANCESTOR ? "ANCESTOR" :
 778                 (event->crossing.detail == GDK_NOTIFY_VIRTUAL ? "VIRTUAL" :
 779                  (event->crossing.detail == GDK_NOTIFY_INFERIOR ? "INFERIOR" :
 780                   (event->crossing.detail == GDK_NOTIFY_NONLINEAR ? "NONLINEAR" :
 781                    (event->crossing.detail == GDK_NOTIFY_NONLINEAR_VIRTUAL ? "NONLINEAR_VIRTUAL" :
 782                     (event->crossing.detail == GDK_NOTIFY_UNKNOWN ? "UNKNOWN" :
 783                      "???")))))),
 784                event->crossing.focus ? " FOCUS" : "");
 785       print_event_state (event->crossing.state);
 786       break;
 787     case GDK_FOCUS_CHANGE:
 788       g_print ("%s", (event->focus_change.in ? "IN" : "OUT"));
 789       break;
 790     case GDK_CONFIGURE:
 791       g_print ("x:%d y:%d w:%d h:%d",
 792                event->configure.x, event->configure.y,
 793                event->configure.width, event->configure.height);
 794       break;
 795     case GDK_SELECTION_CLEAR:
 796     case GDK_SELECTION_REQUEST:
 797     case GDK_SELECTION_NOTIFY:
 798       selection_name = gdk_atom_name (event->selection.selection);
 799       target_name = gdk_atom_name (event->selection.target);
 800       property_name = gdk_atom_name (event->selection.property);
 801       g_print ("sel:%s tgt:%s prop:%s",
 802                selection_name, target_name, property_name);
 803       g_free (selection_name);
 804       g_free (target_name);
 805       g_free (property_name);
 806       break;
 807     case GDK_DRAG_ENTER:
 808     case GDK_DRAG_LEAVE:
 809     case GDK_DRAG_MOTION:
 810     case GDK_DRAG_STATUS:
 811     case GDK_DROP_START:
 812     case GDK_DROP_FINISHED:
 813       if (event->dnd.context != NULL)
 814         g_print ("ctx:%p: %s %s src:%p dest:%p",
 815                  event->dnd.context,
 816                  _gdk_win32_drag_protocol_to_string (event->dnd.context->protocol),
 817                  event->dnd.context->is_source ? "SOURCE" : "DEST",
 818                  event->dnd.context->source_window == NULL ? NULL : GDK_WINDOW_HWND (event->dnd.context->source_window),
 819                  event->dnd.context->dest_window == NULL ? NULL : GDK_WINDOW_HWND (event->dnd.context->dest_window));
 820       break;
 821     case GDK_CLIENT_EVENT:
 822       /* no more GdkEventClient */
 823       break;
 824     case GDK_SCROLL:
 825       g_print ("(%.4g,%.4g) (%.4g,%.4g) %s ",
 826                event->scroll.x, event->scroll.y,
 827                event->scroll.x_root, event->scroll.y_root,
 828                (event->scroll.direction == GDK_SCROLL_UP ? "UP" :
 829                 (event->scroll.direction == GDK_SCROLL_DOWN ? "DOWN" :
 830                  (event->scroll.direction == GDK_SCROLL_LEFT ? "LEFT" :
 831                   (event->scroll.direction == GDK_SCROLL_RIGHT ? "RIGHT" :
 832                    "???")))));
 833       print_event_state (event->scroll.state);
 834       break;
 835     case GDK_WINDOW_STATE:
 836       g_print ("%s: %s",
 837                _gdk_win32_window_state_to_string (event->window_state.changed_mask),
 838                _gdk_win32_window_state_to_string (event->window_state.new_window_state));
 839     case GDK_SETTING:
 840       g_print ("%s: %s",
 841                (event->setting.action == GDK_SETTING_ACTION_NEW ? "NEW" :
 842                 (event->setting.action == GDK_SETTING_ACTION_CHANGED ? "CHANGED" :
 843                  (event->setting.action == GDK_SETTING_ACTION_DELETED ? "DELETED" :
 844                   "???"))),
 845                (event->setting.name ? event->setting.name : "NULL"));
 846     case GDK_GRAB_BROKEN:
 847       g_print ("%s %s %p",
 848                (event->grab_broken.keyboard ? "KEYBOARD" : "POINTER"),
 849                (event->grab_broken.implicit ? "IMPLICIT" : "EXPLICIT"),
 850                (event->grab_broken.grab_window ? GDK_WINDOW_HWND (event->grab_broken.grab_window) : 0));
 851     default:
 852       /* Nothing */
 853       break;
 854     }
 855   g_print ("%s", (debug_indent == 0 ? "\n" : ""));
 856 }
 857
 858 static char *
 859 decode_key_lparam (LPARAM lParam)
 860 {
 861   static char buf[100];
 862   char *p = buf;
 863
 864   if (HIWORD (lParam) & KF_UP)
 865     p += g_sprintf (p, "KF_UP ");
 866   if (HIWORD (lParam) & KF_REPEAT)
 867     p += g_sprintf (p, "KF_REPEAT ");
 868   if (HIWORD (lParam) & KF_ALTDOWN)
 869     p += g_sprintf (p, "KF_ALTDOWN ");
 870   if (HIWORD (lParam) & KF_EXTENDED)
 871     p += g_sprintf (p, "KF_EXTENDED ");
 872   p += g_sprintf (p, "sc:%d rep:%d", LOBYTE (HIWORD (lParam)), LOWORD (lParam));
 873
 874   return buf;
 875 }
 876
 877 #endif
 878
 879 static void
 880 fixup_event (GdkEvent *event)
 881 {
 882   if (event->any.window)
 883     g_object_ref (event->any.window);
 884   if (((event->any.type == GDK_ENTER_NOTIFY) ||
 885        (event->any.type == GDK_LEAVE_NOTIFY)) &&
 886       (event->crossing.subwindow != NULL))
 887     g_object_ref (event->crossing.subwindow);
 888   event->any.send_event = InSendMessage ();
 889 }
 890
 891 static void
 892 append_event (GdkEvent *event)
 893 {
 894   GList *link;
 895
 896   fixup_event (event);
 897 #if 1
 898   link = _gdk_event_queue_append (_gdk_display, event);
 899   GDK_NOTE (EVENTS, _gdk_win32_print_event (event));
 900   /* event morphing, the passed in may not be valid afterwards */
 901   _gdk_windowing_got_event (_gdk_display, link, event, 0);
 902 #else
 903   _gdk_event_queue_append (_gdk_display, event);
 904   GDK_NOTE (EVENTS, _gdk_win32_print_event (event));
 905 #endif
 906 }
 907
 908 static void
 909 fill_key_event_string (GdkEvent *event)
 910 {
 911   gunichar c;
 912   gchar buf[256];
 913
 914   /* Fill in event->string crudely, since various programs
 915    * depend on it.
 916    */
 917
 918   c = 0;
 919   if (event->key.keyval != GDK_KEY_VoidSymbol)
 920     c = gdk_keyval_to_unicode (event->key.keyval);
 921
 922   if (c)
 923     {
 924       gsize bytes_written;
 925       gint len;
 926
 927       /* Apply the control key - Taken from Xlib
 928        */
 929       if (event->key.state & GDK_CONTROL_MASK)
 930         {
 931           if ((c >= '@' && c < '\177') || c == ' ')
 932             c &= 0x1F;
 933           else if (c == '2')
 934             {
 935               event->key.string = g_memdup ("\0\0", 2);
 936               event->key.length = 1;
 937               return;
 938             }
 939           else if (c >= '3' && c <= '7')
 940             c -= ('3' - '\033');
 941           else if (c == '8')
 942             c = '\177';
 943           else if (c == '/')
 944             c = '_' & 0x1F;
 945         }
 946
 947       len = g_unichar_to_utf8 (c, buf);
 948       buf[len] = '\0';
 949
 950       event->key.string = g_locale_from_utf8 (buf, len,
 951                                               NULL, &bytes_written,
 952                                               NULL);
 953       if (event->key.string)
 954         event->key.length = bytes_written;
 955     }
 956   else if (event->key.keyval == GDK_KEY_Escape)
 957     {
 958       event->key.length = 1;
 959       event->key.string = g_strdup ("\033");
 960     }
 961   else if (event->key.keyval == GDK_KEY_Return ||
 962            event->key.keyval == GDK_KEY_KP_Enter)
 963     {
 964       event->key.length = 1;
 965       event->key.string = g_strdup ("\r");
 966     }
 967
 968   if (!event->key.string)
 969     {
 970       event->key.length = 0;
 971       event->key.string = g_strdup ("");
 972     }
 973 }
 974
 975 static GdkFilterReturn
 976 apply_event_filters (GdkWindow  *window,
 977                      MSG        *msg,
 978                      GList     **filters)
 979 {
 980   GdkFilterReturn result = GDK_FILTER_CONTINUE;
 981   GdkEvent *event;
 982   GList *node;
 983   GList *tmp_list;
 984
 985   event = gdk_event_new (GDK_NOTHING);
 986   if (window != NULL)
 987     event->any.window = g_object_ref (window);
 988   ((GdkEventPrivate *)event)->flags |= GDK_EVENT_PENDING;
 989
 990   /* I think GdkFilterFunc semantics require the passed-in event
 991    * to already be in the queue. The filter func can generate
 992    * more events and append them after it if it likes.
 993    */
 994   node = _gdk_event_queue_append (_gdk_display, event);
 995
 996   tmp_list = *filters;
 997   while (tmp_list)
 998     {
 999       GdkEventFilter *filter = (GdkEventFilter *) tmp_list->data;
1000       GList *node;
1001
1002       if ((filter->flags & GDK_EVENT_FILTER_REMOVED) != 0)
1003         {
1004           tmp_list = tmp_list->next;
1005           continue;
1006         }
1007
1008       filter->ref_count++;
1009       result = filter->function (msg, event, filter->data);
1010
1011       /* get the next node after running the function since the
1012          function may add or remove a next node */
1013       node = tmp_list;
1014       tmp_list = tmp_list->next;
1015
1016       filter->ref_count--;
1017       if (filter->ref_count == 0)
1018         {
1019           *filters = g_list_remove_link (*filters, node);
1020           g_list_free_1 (node);
1021           g_free (filter);
1022         }
1023
1024       if (result !=  GDK_FILTER_CONTINUE)
1025         break;
1026     }
1027
1028   if (result == GDK_FILTER_CONTINUE || result == GDK_FILTER_REMOVE)
1029     {
1030       _gdk_event_queue_remove_link (_gdk_display, node);
1031       g_list_free_1 (node);
1032       gdk_event_free (event);
1033     }
1034   else /* GDK_FILTER_TRANSLATE */
1035     {
1036       ((GdkEventPrivate *)event)->flags &= ~GDK_EVENT_PENDING;
1037       fixup_event (event);
1038       GDK_NOTE (EVENTS, _gdk_win32_print_event (event));
1039     }
1040   return result;
1041 }
1042
1043 /*
1044  * On Windows, transient windows will not have their own taskbar entries.
1045  * Because of this, we must hide and restore groups of transients in both
1046  * directions.  That is, all transient children must be hidden or restored
1047  * with this window, but if this window's transient owner also has a
1048  * transient owner then this window's transient owner must be hidden/restored
1049  * with this one.  And etc, up the chain until we hit an ancestor that has no
1050  * transient owner.
1051  *
1052  * It would be a good idea if applications don't chain transient windows
1053  * together.  There's a limit to how much evil GTK can try to shield you
1054  * from.
1055  */
1056 static void
1057 show_window_recurse (GdkWindow *window, gboolean hide_window)
1058 {
1059   GdkWindowImplWin32 *impl = GDK_WINDOW_IMPL_WIN32 (window->impl);
1060   GSList *children = impl->transient_children;
1061   GdkWindow *child = NULL;
1062
1063   if (!impl->changing_state)
1064     {
1065       impl->changing_state = TRUE;
1066
1067       if (children != NULL)
1068         {
1069           while (children != NULL)
1070             {
1071               child = children->data;
1072               show_window_recurse (child, hide_window);
1073
1074               children = g_slist_next (children);
1075             }
1076         }
1077
1078       if (GDK_WINDOW_IS_MAPPED (window))
1079         {
1080           if (!hide_window)
1081             {
1082               if (gdk_window_get_state (window) & GDK_WINDOW_STATE_ICONIFIED)
1083                 {
1084                   if (gdk_window_get_state (window) & GDK_WINDOW_STATE_MAXIMIZED)
1085                     {
1086                       ShowWindow (GDK_WINDOW_HWND (window), SW_SHOWMAXIMIZED);
1087                     }
1088                   else
1089                     {
1090                       ShowWindow (GDK_WINDOW_HWND (window), SW_RESTORE);
1091                     }
1092                 }
1093             }
1094           else
1095             {
1096               ShowWindow (GDK_WINDOW_HWND (window), SW_MINIMIZE);
1097             }
1098         }
1099
1100       impl->changing_state = FALSE;
1101     }
1102 }
1103
1104 static void
1105 do_show_window (GdkWindow *window, gboolean hide_window)
1106 {
1107   GdkWindow *tmp_window = NULL;
1108   GdkWindowImplWin32 *tmp_impl = GDK_WINDOW_IMPL_WIN32 (window->impl);
1109
1110   if (!tmp_impl->changing_state)
1111     {
1112       /* Find the top-level window in our transient chain. */
1113       while (tmp_impl->transient_owner != NULL)
1114         {
1115           tmp_window = tmp_impl->transient_owner;
1116           tmp_impl = GDK_WINDOW_IMPL_WIN32 (tmp_window->impl);
1117         }
1118
1119       /* If we couldn't find one, use the window provided. */
1120       if (tmp_window == NULL)
1121         {
1122           tmp_window = window;
1123         }
1124
1125       /* Recursively show/hide every window in the chain. */
1126       if (tmp_window != window)
1127         {
1128           show_window_recurse (tmp_window, hide_window);
1129         }
1130     }
1131 }
1132
1133 static void
1134 synthesize_enter_or_leave_event (GdkWindow        *window,
1135                                  MSG              *msg,
1136                                  GdkEventType      type,
1137                                  GdkCrossingMode   mode,
1138                                  GdkNotifyType     detail)
1139 {
1140   GdkEvent *event;
1141   POINT pt;
1142
1143   pt = msg->pt;
1144   ScreenToClient (GDK_WINDOW_HWND (window), &pt);
1145
1146   event = gdk_event_new (type);
1147   event->crossing.window = window;
1148   event->crossing.subwindow = NULL;
1149   event->crossing.time = _gdk_win32_get_next_tick (msg->time);
1150   event->crossing.x = pt.x;
1151   event->crossing.y = pt.y;
1152   event->crossing.x_root = msg->pt.x + _gdk_offset_x;
1153   event->crossing.y_root = msg->pt.y + _gdk_offset_y;
1154   event->crossing.mode = mode;
1155   event->crossing.detail = detail;
1156   event->crossing.focus = TRUE; /* FIXME: Set correctly */
1157   event->crossing.state = 0;    /* FIXME: Set correctly */
1158   gdk_event_set_device (event, _gdk_display->core_pointer);
1159
1160   append_event (event);
1161
1162   if (type == GDK_ENTER_NOTIFY &&
1163       window->extension_events != 0)
1164     _gdk_device_wintab_update_window_coords (window);
1165 }
1166
1167 /* The check_extended flag controls whether to check if the windows want
1168  * events from extended input devices and if the message should be skipped
1169  * because an extended input device is active
1170  */
1171 static gboolean
1172 propagate (GdkWindow  **window,
1173            MSG         *msg,
1174            GdkWindow   *grab_window,
1175            gboolean     grab_owner_events,
1176            gint         grab_mask,
1177            gboolean   (*doesnt_want_it) (gint mask,
1178                                          MSG *msg),
1179            gboolean     check_extended)
1180 {
1181   if (grab_window != NULL && !grab_owner_events)
1182     {
1183       /* Event source is grabbed with owner_events FALSE */
1184
1185       /* See if the event should be ignored because an extended input
1186        * device is used
1187        */
1188       if (check_extended &&
1189           grab_window->extension_events != 0 &&
1190           _gdk_input_ignore_core)
1191         {
1192           GDK_NOTE (EVENTS, g_print (" (ignored for grabber)"));
1193           return FALSE;
1194         }
1195       if ((*doesnt_want_it) (grab_mask, msg))
1196         {
1197           GDK_NOTE (EVENTS, g_print (" (grabber doesn't want it)"));
1198           return FALSE;
1199         }
1200       else
1201         {
1202           GDK_NOTE (EVENTS, g_print (" (to grabber)"));
1203           assign_object (window, grab_window);
1204           return TRUE;
1205         }
1206     }
1207
1208   /* If we come here, we know that if grab_window != NULL then
1209    * grab_owner_events is TRUE
1210    */
1211   while (TRUE)
1212     {
1213       if (check_extended &&
1214           (*window)->extension_events != 0 &&
1215           _gdk_input_ignore_core)
1216         {
1217           GDK_NOTE (EVENTS, g_print (" (ignored)"));
1218           return FALSE;
1219         }
1220       if ((*doesnt_want_it) ((*window)->event_mask, msg))
1221         {
1222           /* Owner doesn't want it, propagate to parent. */
1223           GdkWindow *parent = gdk_window_get_parent (*window);
1224           if (parent == _gdk_root || parent == NULL)
1225             {
1226               /* No parent; check if grabbed */
1227               if (grab_window != NULL)
1228                 {
1229                   /* Event source is grabbed with owner_events TRUE */
1230
1231                   if (check_extended &&
1232                       grab_window->extension_events != 0 &&
1233                       _gdk_input_ignore_core)
1234                     {
1235                       GDK_NOTE (EVENTS, g_print (" (ignored for grabber)"));
1236                       return FALSE;
1237                     }
1238                   if ((*doesnt_want_it) (grab_mask, msg))
1239                     {
1240                       /* Grabber doesn't want it either */
1241                       GDK_NOTE (EVENTS, g_print (" (grabber doesn't want it)"));
1242                       return FALSE;
1243                     }
1244                   else
1245                     {
1246                       /* Grabbed! */
1247                       GDK_NOTE (EVENTS, g_print (" (to grabber)"));
1248                       assign_object (window, grab_window);
1249                       return TRUE;
1250                     }
1251                 }
1252               else
1253                 {
1254                   GDK_NOTE (EVENTS, g_print (" (undelivered)"));
1255                   return FALSE;
1256                 }
1257             }
1258           else
1259             {
1260               assign_object (window, parent);
1261               /* The only branch where we actually continue the loop */
1262             }
1263         }
1264       else
1265         return TRUE;
1266     }
1267 }
1268
1269 static gboolean
1270 doesnt_want_key (gint mask,
1271                  MSG *msg)
1272 {
1273   return (((msg->message == WM_KEYUP || msg->message == WM_SYSKEYUP) &&
1274            !(mask & GDK_KEY_RELEASE_MASK)) ||
1275           ((msg->message == WM_KEYDOWN || msg->message == WM_SYSKEYDOWN) &&
1276            !(mask & GDK_KEY_PRESS_MASK)));
1277 }
1278
1279 static gboolean
1280 doesnt_want_char (gint mask,
1281                   MSG *msg)
1282 {
1283   return !(mask & (GDK_KEY_PRESS_MASK | GDK_KEY_RELEASE_MASK));
1284 }
1285
1286 static void
1287 handle_configure_event (MSG       *msg,
1288                         GdkWindow *window)
1289 {
1290   RECT client_rect;
1291   POINT point;
1292
1293   GetClientRect (msg->hwnd, &client_rect);
1294   point.x = client_rect.left; /* always 0 */
1295   point.y = client_rect.top;
1296
1297   /* top level windows need screen coords */
1298   if (gdk_window_get_parent (window) == _gdk_root)
1299     {
1300       ClientToScreen (msg->hwnd, &point);
1301       point.x += _gdk_offset_x;
1302       point.y += _gdk_offset_y;
1303     }
1304
1305   window->width = client_rect.right - client_rect.left;
1306   window->height = client_rect.bottom - client_rect.top;
1307
1308   window->x = point.x;
1309   window->y = point.y;
1310
1311   _gdk_window_update_size (window);
1312
1313   if (window->event_mask & GDK_STRUCTURE_MASK)
1314     {
1315       GdkEvent *event = gdk_event_new (GDK_CONFIGURE);
1316
1317       event->configure.window = window;
1318
1319       event->configure.width = client_rect.right - client_rect.left;
1320       event->configure.height = client_rect.bottom - client_rect.top;
1321
1322       event->configure.x = point.x;
1323       event->configure.y = point.y;
1324
1325       append_event (event);
1326     }
1327 }
1328
1329 cairo_region_t *
1330 _gdk_win32_hrgn_to_region (HRGN hrgn)
1331 {
1332   RGNDATA *rgndata;
1333   RECT *rects;
1334   cairo_region_t *result;
1335   gint nbytes;
1336   guint i;
1337
1338   if ((nbytes = GetRegionData (hrgn, 0, NULL)) == 0)
1339     {
1340       WIN32_GDI_FAILED ("GetRegionData");
1341       return NULL;
1342     }
1343
1344   rgndata = (RGNDATA *) g_malloc (nbytes);
1345
1346   if (GetRegionData (hrgn, nbytes, rgndata) == 0)
1347     {
1348       WIN32_GDI_FAILED ("GetRegionData");
1349       g_free (rgndata);
1350       return NULL;
1351     }
1352
1353   result = cairo_region_create ();
1354   rects = (RECT *) rgndata->Buffer;
1355   for (i = 0; i < rgndata->rdh.nCount; i++)
1356     {
1357       GdkRectangle r;
1358
1359       r.x = rects[i].left;
1360       r.y = rects[i].top;
1361       r.width = rects[i].right - r.x;
1362       r.height = rects[i].bottom - r.y;
1363
1364       cairo_region_union_rectangle (result, &r);
1365     }
1366
1367   g_free (rgndata);
1368
1369   return result;
1370 }
1371
1372 static void
1373 adjust_drag (LONG *drag,
1374              LONG  curr,
1375              gint  inc)
1376 {
1377   if (*drag > curr)
1378     *drag = curr + ((*drag + inc/2 - curr) / inc) * inc;
1379   else
1380     *drag = curr - ((curr - *drag + inc/2) / inc) * inc;
1381 }
1382
1383 static void
1384 handle_wm_paint (MSG        *msg,
1385                  GdkWindow  *window,
1386                  gboolean    return_exposes,
1387                  GdkEvent  **event)
1388 {
1389   HRGN hrgn = CreateRectRgn (0, 0, 0, 0);
1390   HDC hdc;
1391   PAINTSTRUCT paintstruct;
1392   cairo_region_t *update_region;
1393
1394   if (GetUpdateRgn (msg->hwnd, hrgn, FALSE) == ERROR)
1395     {
1396       WIN32_GDI_FAILED ("GetUpdateRgn");
1397       DeleteObject (hrgn);
1398       return;
1399     }
1400
1401   hdc = BeginPaint (msg->hwnd, &paintstruct);
1402
1403   GDK_NOTE (EVENTS, g_print (" %s %s dc %p%s",
1404                              _gdk_win32_rect_to_string (&paintstruct.rcPaint),
1405                              (paintstruct.fErase ? "erase" : ""),
1406                              hdc,
1407                              (return_exposes ? " return_exposes" : "")));
1408
1409   EndPaint (msg->hwnd, &paintstruct);
1410
1411   if ((paintstruct.rcPaint.right == paintstruct.rcPaint.left) ||
1412       (paintstruct.rcPaint.bottom == paintstruct.rcPaint.top))
1413     {
1414       GDK_NOTE (EVENTS, g_print (" (empty paintstruct, ignored)"));
1415       DeleteObject (hrgn);
1416       return;
1417     }
1418
1419   if (return_exposes)
1420     {
1421       if (!GDK_WINDOW_DESTROYED (window))
1422         {
1423           GList *list = _gdk_display->queued_events;
1424
1425           *event = gdk_event_new (GDK_EXPOSE);
1426           (*event)->expose.window = window;
1427           (*event)->expose.area.x = paintstruct.rcPaint.left;
1428           (*event)->expose.area.y = paintstruct.rcPaint.top;
1429           (*event)->expose.area.width = paintstruct.rcPaint.right - paintstruct.rcPaint.left;
1430           (*event)->expose.area.height = paintstruct.rcPaint.bottom - paintstruct.rcPaint.top;
1431           (*event)->expose.region = _gdk_win32_hrgn_to_region (hrgn);
1432           (*event)->expose.count = 0;
1433
1434           while (list != NULL)
1435             {
1436               GdkEventPrivate *evp = list->data;
1437
1438               if (evp->event.any.type == GDK_EXPOSE &&
1439                   evp->event.any.window == window &&
1440                   !(evp->flags & GDK_EVENT_PENDING))
1441                 evp->event.expose.count++;
1442
1443               list = list->next;
1444             }
1445         }
1446
1447       DeleteObject (hrgn);
1448       return;
1449     }
1450
1451   update_region = _gdk_win32_hrgn_to_region (hrgn);
1452   if (!cairo_region_is_empty (update_region))
1453     _gdk_window_invalidate_for_expose (window, update_region);
1454   cairo_region_destroy (update_region);
1455
1456   DeleteObject (hrgn);
1457 }
1458
1459 static VOID CALLBACK
1460 modal_timer_proc (HWND     hwnd,
1461                   UINT     msg,
1462                   UINT_PTR id,
1463                   DWORD    time)
1464 {
1465   int arbitrary_limit = 1;
1466
1467   while (_modal_operation_in_progress &&
1468          g_main_context_pending (NULL) &&
1469          arbitrary_limit--)
1470     g_main_context_iteration (NULL, FALSE);
1471 }
1472
1473 void
1474 _gdk_win32_begin_modal_call (void)
1475 {
1476   g_assert (!_modal_operation_in_progress);
1477
1478   _modal_operation_in_progress = TRUE;
1479
1480   modal_timer = SetTimer (NULL, 0, 10, modal_timer_proc);
1481   if (modal_timer == 0)
1482     WIN32_API_FAILED ("SetTimer");
1483 }
1484
1485 void
1486 _gdk_win32_end_modal_call (void)
1487 {
1488   g_assert (_modal_operation_in_progress);
1489
1490   _modal_operation_in_progress = FALSE;
1491
1492   if (modal_timer != 0)
1493     {
1494       API_CALL (KillTimer, (NULL, modal_timer));
1495       modal_timer = 0;
1496    }
1497 }
1498
1499 static VOID CALLBACK
1500 sync_timer_proc (HWND     hwnd,
1501                  UINT     msg,
1502                  UINT_PTR id,
1503                  DWORD    time)
1504 {
1505   MSG message;
1506   if (PeekMessageW (&message, hwnd, WM_PAINT, WM_PAINT, PM_REMOVE))
1507     {
1508       return;
1509     }
1510
1511   RedrawWindow (hwnd, NULL, NULL, RDW_INVALIDATE|RDW_UPDATENOW|RDW_ALLCHILDREN);
1512
1513   KillTimer (hwnd, sync_timer);
1514 }
1515
1516 static void
1517 handle_display_change (void)
1518 {
1519   _gdk_monitor_init ();
1520   _gdk_root_window_size_init ();
1521   g_signal_emit_by_name (_gdk_screen, "size_changed");
1522 }
1523
1524 static void
1525 generate_button_event (GdkEventType      type,
1526                        gint              button,
1527                        GdkWindow        *window,
1528                        MSG              *msg)
1529 {
1530   GdkEvent *event = gdk_event_new (type);
1531
1532   event->button.window = window;
1533   event->button.time = _gdk_win32_get_next_tick (msg->time);
1534   event->button.x = current_x = (gint16) GET_X_LPARAM (msg->lParam);
1535   event->button.y = current_y = (gint16) GET_Y_LPARAM (msg->lParam);
1536   event->button.x_root = msg->pt.x + _gdk_offset_x;
1537   event->button.y_root = msg->pt.y + _gdk_offset_y;
1538   event->button.axes = NULL;
1539   event->button.state = build_pointer_event_state (msg);
1540   event->button.button = button;
1541   gdk_event_set_device (event, _gdk_display->core_pointer);
1542
1543   append_event (event);
1544 }
1545
1546 static void
1547 ensure_stacking_on_unminimize (MSG *msg)
1548 {
1549   HWND rover;
1550   HWND lowest_transient = NULL;
1551
1552   rover = msg->hwnd;
1553   while ((rover = GetNextWindow (rover, GW_HWNDNEXT)))
1554     {
1555       GdkWindow *rover_gdkw = gdk_win32_handle_table_lookup (rover);
1556
1557       /* Checking window group not implemented yet */
1558       if (rover_gdkw)
1559         {
1560           GdkWindowImplWin32 *rover_impl =
1561             GDK_WINDOW_IMPL_WIN32 (rover_gdkw->impl);
1562
1563           if (GDK_WINDOW_IS_MAPPED (rover_gdkw) &&
1564               (rover_impl->type_hint == GDK_WINDOW_TYPE_HINT_UTILITY ||
1565                rover_impl->type_hint == GDK_WINDOW_TYPE_HINT_DIALOG ||
1566                rover_impl->transient_owner != NULL))
1567             {
1568               lowest_transient = rover;
1569             }
1570         }
1571     }
1572   if (lowest_transient != NULL)
1573     {
1574       GDK_NOTE (EVENTS, g_print (" restacking: %p", lowest_transient));
1575       SetWindowPos (msg->hwnd, lowest_transient, 0, 0, 0, 0,
1576                     SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOSIZE);
1577     }
1578 }
1579
1580 static gboolean
1581 ensure_stacking_on_window_pos_changing (MSG       *msg,
1582                                         GdkWindow *window)
1583 {
1584   GdkWindowImplWin32 *impl = GDK_WINDOW_IMPL_WIN32 (window->impl);
1585   WINDOWPOS *windowpos = (WINDOWPOS *) msg->lParam;
1586
1587   if (GetActiveWindow () == msg->hwnd &&
1588       impl->type_hint != GDK_WINDOW_TYPE_HINT_UTILITY &&
1589       impl->type_hint != GDK_WINDOW_TYPE_HINT_DIALOG &&
1590       impl->transient_owner == NULL)
1591     {
1592       /* Make sure the window stays behind any transient-type windows
1593        * of the same window group.
1594        *
1595        * If the window is not active and being activated, we let
1596        * Windows bring it to the top and rely on the WM_ACTIVATEAPP
1597        * handling to bring any utility windows on top of it.
1598        */
1599       HWND rover;
1600       gboolean restacking;
1601
1602       rover = windowpos->hwndInsertAfter;
1603       restacking = FALSE;
1604       while (rover)
1605         {
1606           GdkWindow *rover_gdkw = gdk_win32_handle_table_lookup (rover);
1607
1608           /* Checking window group not implemented yet */
1609           if (rover_gdkw)
1610             {
1611               GdkWindowImplWin32 *rover_impl =
1612                 GDK_WINDOW_IMPL_WIN32 (rover_gdkw->impl);
1613
1614               if (GDK_WINDOW_IS_MAPPED (rover_gdkw) &&
1615                   (rover_impl->type_hint == GDK_WINDOW_TYPE_HINT_UTILITY ||
1616                    rover_impl->type_hint == GDK_WINDOW_TYPE_HINT_DIALOG ||
1617                    rover_impl->transient_owner != NULL))
1618                 {
1619                   restacking = TRUE;
1620                   windowpos->hwndInsertAfter = rover;
1621                 }
1622             }
1623           rover = GetNextWindow (rover, GW_HWNDNEXT);
1624         }
1625
1626       if (restacking)
1627         {
1628           GDK_NOTE (EVENTS, g_print (" restacking: %p", windowpos->hwndInsertAfter));
1629           return TRUE;
1630         }
1631     }
1632   return FALSE;
1633 }
1634
1635 static void
1636 ensure_stacking_on_activate_app (MSG       *msg,
1637                                  GdkWindow *window)
1638 {
1639   GdkWindowImplWin32 *impl = GDK_WINDOW_IMPL_WIN32 (window->impl);
1640
1641   if (impl->type_hint == GDK_WINDOW_TYPE_HINT_UTILITY ||
1642       impl->type_hint == GDK_WINDOW_TYPE_HINT_DIALOG ||
1643       impl->transient_owner != NULL)
1644     {
1645       SetWindowPos (msg->hwnd, HWND_TOP, 0, 0, 0, 0,
1646                     SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOSIZE);
1647       return;
1648     }
1649
1650   if (IsWindowVisible (msg->hwnd) &&
1651       msg->hwnd == GetActiveWindow ())
1652     {
1653       /* This window is not a transient-type window and it is the
1654        * activated window. Make sure this window is as visible as
1655        * possible, just below the lowest transient-type window of this
1656        * app.
1657        */
1658       HWND rover;
1659
1660       rover = msg->hwnd;
1661       while ((rover = GetNextWindow (rover, GW_HWNDPREV)))
1662         {
1663           GdkWindow *rover_gdkw = gdk_win32_handle_table_lookup (rover);
1664
1665           /* Checking window group not implemented yet */
1666           if (rover_gdkw)
1667             {
1668               GdkWindowImplWin32 *rover_impl =
1669                 GDK_WINDOW_IMPL_WIN32 (rover_gdkw->impl);
1670
1671               if (GDK_WINDOW_IS_MAPPED (rover_gdkw) &&
1672                   (rover_impl->type_hint == GDK_WINDOW_TYPE_HINT_UTILITY ||
1673                    rover_impl->type_hint == GDK_WINDOW_TYPE_HINT_DIALOG ||
1674                    rover_impl->transient_owner != NULL))
1675                 {
1676                   GDK_NOTE (EVENTS, g_print (" restacking: %p", rover));
1677                   SetWindowPos (msg->hwnd, rover, 0, 0, 0, 0,
1678                                 SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOSIZE);
1679                   break;
1680                 }
1681             }
1682         }
1683     }
1684 }
1685
1686 static gboolean
1687 gdk_event_translate (MSG  *msg,
1688                      gint *ret_valp)
1689 {
1690   RECT rect, *drag, orig_drag;
1691   POINT point;
1692   MINMAXINFO *mmi;
1693   HWND hwnd;
1694   HCURSOR hcursor;
1695   BYTE key_state[256];
1696   HIMC himc;
1697   WINDOWPOS *windowpos;
1698
1699   GdkEvent *event;
1700
1701   wchar_t wbuf[100];
1702   gint ccount;
1703
1704   GdkWindow *window = NULL;
1705   GdkWindowImplWin32 *impl;
1706
1707   GdkWindow *orig_window, *new_window, *toplevel;
1708
1709   GdkDeviceManager *device_manager;
1710
1711   GdkDeviceGrabInfo *keyboard_grab = NULL;
1712   GdkDeviceGrabInfo *pointer_grab = NULL;
1713   GdkWindow *grab_window = NULL;
1714
1715   gint button;
1716   GdkAtom target;
1717
1718   gchar buf[256];
1719   gboolean return_val = FALSE;
1720
1721   int i;
1722
1723   if (_gdk_default_filters)
1724     {
1725       /* Apply global filters */
1726
1727       GdkFilterReturn result = apply_event_filters (NULL, msg, &_gdk_default_filters);
1728
1729       /* If result is GDK_FILTER_CONTINUE, we continue as if nothing
1730        * happened. If it is GDK_FILTER_REMOVE or GDK_FILTER_TRANSLATE,
1731        * we return TRUE, and DefWindowProcW() will not be called.
1732        */
1733       if (result == GDK_FILTER_REMOVE || result == GDK_FILTER_TRANSLATE)
1734         return TRUE;
1735     }
1736
1737   window = gdk_win32_handle_table_lookup (msg->hwnd);
1738   orig_window = window;
1739
1740   if (window == NULL)
1741     {
1742       /* XXX Handle WM_QUIT here ? */
1743       if (msg->message == WM_QUIT)
1744         {
1745           GDK_NOTE (EVENTS, g_print (" %d", (int) msg->wParam));
1746           exit (msg->wParam);
1747         }
1748       else if (msg->message == WM_MOVE ||
1749                msg->message == WM_SIZE)
1750         {
1751           /* It's quite normal to get these messages before we have
1752            * had time to register the window in our lookup table, or
1753            * when the window is being destroyed and we already have
1754            * removed it. Repost the same message to our queue so that
1755            * we will get it later when we are prepared.
1756            */
1757           GDK_NOTE (EVENTS, g_print (" (posted)"));
1758
1759           PostMessageW (msg->hwnd, msg->message, msg->wParam, msg->lParam);
1760         }
1761       else if (msg->message == WM_CREATE)
1762         {
1763           window = (UNALIGNED GdkWindow*) (((LPCREATESTRUCTW) msg->lParam)->lpCreateParams);
1764           GDK_WINDOW_HWND (window) = msg->hwnd;
1765         }
1766       else
1767         {
1768           GDK_NOTE (EVENTS, g_print (" (no GdkWindow)"));
1769         }
1770       return FALSE;
1771     }
1772
1773   device_manager = gdk_display_get_device_manager (_gdk_display);
1774
1775   keyboard_grab = _gdk_display_get_last_device_grab (_gdk_display,
1776                                                      GDK_DEVICE_MANAGER_WIN32 (device_manager)->core_keyboard);
1777   pointer_grab = _gdk_display_get_last_device_grab (_gdk_display,
1778                                                     GDK_DEVICE_MANAGER_WIN32 (device_manager)->core_pointer);
1779
1780   g_object_ref (window);
1781
1782   /* window's refcount has now been increased, so code below should
1783    * not just return from this function, but instead goto done (or
1784    * break out of the big switch). To protect against forgetting this,
1785    * #define return to a syntax error...
1786    */
1787 #define return GOTO_DONE_INSTEAD
1788
1789   if (!GDK_WINDOW_DESTROYED (window) && window->filters)
1790     {
1791       /* Apply per-window filters */
1792
1793       GdkFilterReturn result = apply_event_filters (window, msg, &window->filters);
1794
1795       if (result == GDK_FILTER_REMOVE || result == GDK_FILTER_TRANSLATE)
1796         {
1797           return_val = TRUE;
1798           goto done;
1799         }
1800     }
1801
1802   if (msg->message == client_message)
1803     {
1804       GList *tmp_list;
1805       GdkFilterReturn result = GDK_FILTER_CONTINUE;
1806       GList *node;
1807
1808       GDK_NOTE (EVENTS, g_print (" client_message"));
1809
1810       event = gdk_event_new (GDK_NOTHING);
1811       ((GdkEventPrivate *)event)->flags |= GDK_EVENT_PENDING;
1812
1813       node = _gdk_event_queue_append (_gdk_display, event);
1814
1815       tmp_list = client_filters;
1816       while (tmp_list)
1817         {
1818           GdkClientFilter *filter = tmp_list->data;
1819
1820           tmp_list = tmp_list->next;
1821
1822           if (filter->type == GDK_POINTER_TO_ATOM (msg->wParam))
1823             {
1824               GDK_NOTE (EVENTS, g_print (" (match)"));
1825
1826               result = (*filter->function) (msg, event, filter->data);
1827
1828               if (result != GDK_FILTER_CONTINUE)
1829                 break;
1830             }
1831         }
1832
1833       switch (result)
1834         {
1835         case GDK_FILTER_REMOVE:
1836           _gdk_event_queue_remove_link (_gdk_display, node);
1837           g_list_free_1 (node);
1838           gdk_event_free (event);
1839           return_val = TRUE;
1840           goto done;
1841
1842         case GDK_FILTER_TRANSLATE:
1843           ((GdkEventPrivate *)event)->flags &= ~GDK_EVENT_PENDING;
1844           GDK_NOTE (EVENTS, _gdk_win32_print_event (event));
1845           return_val = TRUE;
1846           goto done;
1847
1848         case GDK_FILTER_CONTINUE:
1849           /* No more: Send unknown client messages on to Gtk for it to use */
1850           GDK_NOTE (EVENTS, _gdk_win32_print_event (event));
1851           return_val = TRUE;
1852           goto done;
1853         }
1854     }
1855
1856   switch (msg->message)
1857     {
1858     case WM_INPUTLANGCHANGE:
1859       _gdk_input_locale = (HKL) msg->lParam;
1860       _gdk_input_locale_is_ime = ImmIsIME (_gdk_input_locale);
1861       GetLocaleInfo (MAKELCID (LOWORD (_gdk_input_locale), SORT_DEFAULT),
1862                      LOCALE_IDEFAULTANSICODEPAGE,
1863                      buf, sizeof (buf));
1864       _gdk_input_codepage = atoi (buf);
1865       _gdk_keymap_serial++;
1866       GDK_NOTE (EVENTS,
1867                 g_print (" cs:%lu hkl:%p%s cp:%d",
1868                          (gulong) msg->wParam,
1869                          (gpointer) msg->lParam, _gdk_input_locale_is_ime ? " (IME)" : "",
1870                          _gdk_input_codepage));
1871       break;
1872
1873     case WM_SYSKEYUP:
1874     case WM_SYSKEYDOWN:
1875       GDK_NOTE (EVENTS,
1876                 g_print (" %s ch:%.02x %s",
1877                          _gdk_win32_key_to_string (msg->lParam),
1878                          (int) msg->wParam,
1879                          decode_key_lparam (msg->lParam)));
1880
1881       /* If posted without us having keyboard focus, ignore */
1882       if ((msg->wParam != VK_F10 && msg->wParam != VK_MENU) &&
1883           !(HIWORD (msg->lParam) & KF_ALTDOWN))
1884         break;
1885
1886       /* Let the system handle Alt-Tab, Alt-Space and Alt-F4 unless
1887        * the keyboard is grabbed.
1888        */
1889       if (!keyboard_grab &&
1890           (msg->wParam == VK_TAB ||
1891            msg->wParam == VK_SPACE ||
1892            msg->wParam == VK_F4))
1893         break;
1894
1895       /* Jump to code in common with WM_KEYUP and WM_KEYDOWN */
1896       goto keyup_or_down;
1897
1898     case WM_KEYUP:
1899     case WM_KEYDOWN:
1900       GDK_NOTE (EVENTS,
1901                 g_print (" %s ch:%.02x %s",
1902                          _gdk_win32_key_to_string (msg->lParam),
1903                          (int) msg->wParam,
1904                          decode_key_lparam (msg->lParam)));
1905
1906     keyup_or_down:
1907
1908       /* Ignore key messages intended for the IME */
1909       if (msg->wParam == VK_PROCESSKEY ||
1910           in_ime_composition)
1911         break;
1912
1913       if (keyboard_grab &&
1914           !propagate (&window, msg,
1915                       keyboard_grab->window,
1916                       keyboard_grab->owner_events,
1917                       GDK_ALL_EVENTS_MASK,
1918                       doesnt_want_key, FALSE))
1919         break;
1920
1921       if (GDK_WINDOW_DESTROYED (window))
1922         break;
1923
1924       event = gdk_event_new ((msg->message == WM_KEYDOWN ||
1925                               msg->message == WM_SYSKEYDOWN) ?
1926                              GDK_KEY_PRESS : GDK_KEY_RELEASE);
1927       event->key.window = window;
1928       event->key.time = _gdk_win32_get_next_tick (msg->time);
1929       event->key.keyval = GDK_KEY_VoidSymbol;
1930       event->key.string = NULL;
1931       event->key.length = 0;
1932       event->key.hardware_keycode = msg->wParam;
1933       gdk_event_set_device (event, GDK_DEVICE_MANAGER_WIN32 (device_manager)->core_keyboard);
1934       if (HIWORD (msg->lParam) & KF_EXTENDED)
1935         {
1936           switch (msg->wParam)
1937             {
1938             case VK_CONTROL:
1939               event->key.hardware_keycode = VK_RCONTROL;
1940               break;
1941             case VK_SHIFT:      /* Actually, KF_EXTENDED is not set
1942                                  * for the right shift key.
1943                                  */
1944               event->key.hardware_keycode = VK_RSHIFT;
1945               break;
1946             case VK_MENU:
1947               event->key.hardware_keycode = VK_RMENU;
1948               break;
1949             }
1950         }
1951       else if (msg->wParam == VK_SHIFT &&
1952                LOBYTE (HIWORD (msg->lParam)) == _scancode_rshift)
1953         event->key.hardware_keycode = VK_RSHIFT;
1954
1955       API_CALL (GetKeyboardState, (key_state));
1956
1957       /* g_print ("ctrl:%02x lctrl:%02x rctrl:%02x alt:%02x lalt:%02x ralt:%02x\n", key_state[VK_CONTROL], key_state[VK_LCONTROL], key_state[VK_RCONTROL], key_state[VK_MENU], key_state[VK_LMENU], key_state[VK_RMENU]); */
1958
1959       build_key_event_state (event, key_state);
1960
1961       gdk_keymap_translate_keyboard_state (_gdk_win32_display_get_keymap (_gdk_display),
1962                                            event->key.hardware_keycode,
1963                                            event->key.state,
1964                                            event->key.group,
1965                                            &event->key.keyval,
1966                                            NULL, NULL, NULL);
1967
1968       fill_key_event_string (event);
1969
1970       /* Reset MOD1_MASK if it is the Alt key itself */
1971       if (msg->wParam == VK_MENU)
1972         event->key.state &= ~GDK_MOD1_MASK;
1973
1974       append_event (event);
1975
1976       return_val = TRUE;
1977       break;
1978
1979     case WM_SYSCHAR:
1980       if (msg->wParam != VK_SPACE)
1981         {
1982           /* To prevent beeps, don't let DefWindowProcW() be called */
1983           return_val = TRUE;
1984           goto done;
1985         }
1986       break;
1987
1988     case WM_IME_STARTCOMPOSITION:
1989       in_ime_composition = TRUE;
1990       break;
1991
1992     case WM_IME_ENDCOMPOSITION:
1993       in_ime_composition = FALSE;
1994       break;
1995
1996     case WM_IME_COMPOSITION:
1997       /* On Win2k WM_IME_CHAR doesn't work correctly for non-Unicode
1998        * applications. Thus, handle WM_IME_COMPOSITION with
1999        * GCS_RESULTSTR instead, fetch the Unicode chars from the IME
2000        * with ImmGetCompositionStringW().
2001        *
2002        * See for instance
2003        * http://groups.google.com/groups?selm=natX5.57%24g77.19788%40nntp2.onemain.com
2004        * and
2005        * http://groups.google.com/groups?selm=u2XfrXw5BHA.1628%40tkmsftngp02
2006        * for comments by other people that seems to have the same
2007        * experience. WM_IME_CHAR just gives question marks, apparently
2008        * because of going through some conversion to the current code
2009        * page.
2010        *
2011        * WM_IME_CHAR might work on NT4 or Win9x with ActiveIMM, but
2012        * use WM_IME_COMPOSITION there, too, to simplify the code.
2013        */
2014       GDK_NOTE (EVENTS, g_print (" %#lx", (long) msg->lParam));
2015
2016       if (!(msg->lParam & GCS_RESULTSTR))
2017         break;
2018
2019       if (keyboard_grab &&
2020           !propagate (&window, msg,
2021                       keyboard_grab->window,
2022                       keyboard_grab->owner_events,
2023                       GDK_ALL_EVENTS_MASK,
2024                       doesnt_want_char, FALSE))
2025         break;
2026
2027       if (GDK_WINDOW_DESTROYED (window))
2028         break;
2029
2030       himc = ImmGetContext (msg->hwnd);
2031       ccount = ImmGetCompositionStringW (himc, GCS_RESULTSTR,
2032                                          wbuf, sizeof (wbuf));
2033       ImmReleaseContext (msg->hwnd, himc);
2034
2035       ccount /= 2;
2036
2037       API_CALL (GetKeyboardState, (key_state));
2038
2039       for (i = 0; i < ccount; i++)
2040         {
2041           if (window->event_mask & GDK_KEY_PRESS_MASK)
2042             {
2043               /* Build a key press event */
2044               event = gdk_event_new (GDK_KEY_PRESS);
2045               event->key.window = window;
2046         gdk_event_set_device (event, GDK_DEVICE_MANAGER_WIN32 (device_manager)->core_keyboard);
2047               build_wm_ime_composition_event (event, msg, wbuf[i], key_state);
2048
2049               append_event (event);
2050             }
2051
2052           if (window->event_mask & GDK_KEY_RELEASE_MASK)
2053             {
2054               /* Build a key release event.  */
2055               event = gdk_event_new (GDK_KEY_RELEASE);
2056               event->key.window = window;
2057         gdk_event_set_device (event, GDK_DEVICE_MANAGER_WIN32 (device_manager)->core_keyboard);
2058               build_wm_ime_composition_event (event, msg, wbuf[i], key_state);
2059
2060               append_event (event);
2061             }
2062         }
2063       return_val = TRUE;
2064       break;
2065
2066     case WM_LBUTTONDOWN:
2067       button = 1;
2068       goto buttondown0;
2069
2070     case WM_MBUTTONDOWN:
2071       button = 2;
2072       goto buttondown0;
2073
2074     case WM_RBUTTONDOWN:
2075       button = 3;
2076       goto buttondown0;
2077
2078     case WM_XBUTTONDOWN:
2079       if (HIWORD (msg->wParam) == XBUTTON1)
2080         button = 4;
2081       else
2082         button = 5;
2083
2084     buttondown0:
2085       GDK_NOTE (EVENTS,
2086                 g_print (" (%d,%d)",
2087                          GET_X_LPARAM (msg->lParam), GET_Y_LPARAM (msg->lParam)));
2088
2089       assign_object (&window, find_window_for_mouse_event (window, msg));
2090       /* TODO_CSW?: there used to some synthesize and propagate */
2091       if (GDK_WINDOW_DESTROYED (window))
2092         break;
2093
2094       /* TODO_CSW? Emulate X11's automatic active grab */
2095       generate_button_event (GDK_BUTTON_PRESS, button,
2096                              window, msg);
2097
2098       return_val = TRUE;
2099       break;
2100
2101     case WM_LBUTTONUP:
2102       button = 1;
2103       goto buttonup0;
2104
2105     case WM_MBUTTONUP:
2106       button = 2;
2107       goto buttonup0;
2108
2109     case WM_RBUTTONUP:
2110       button = 3;
2111       goto buttonup0;
2112
2113     case WM_XBUTTONUP:
2114       if (HIWORD (msg->wParam) == XBUTTON1)
2115         button = 4;
2116       else
2117         button = 5;
2118
2119     buttonup0:
2120       GDK_NOTE (EVENTS,
2121                 g_print (" (%d,%d)",
2122                          GET_X_LPARAM (msg->lParam), GET_Y_LPARAM (msg->lParam)));
2123
2124       assign_object (&window, find_window_for_mouse_event (window, msg));
2125 #if 0
2126       if (window->extension_events != 0 &&
2127           _gdk_input_ignore_core)
2128         {
2129           GDK_NOTE (EVENTS, g_print (" (ignored)"));
2130           break;
2131         }
2132 #endif
2133
2134       generate_button_event (GDK_BUTTON_RELEASE, button,
2135                              window, msg);
2136
2137       return_val = TRUE;
2138       break;
2139
2140     case WM_MOUSEMOVE:
2141       GDK_NOTE (EVENTS,
2142                 g_print (" %p (%d,%d)",
2143                          (gpointer) msg->wParam,
2144                          GET_X_LPARAM (msg->lParam), GET_Y_LPARAM (msg->lParam)));
2145
2146       assign_object (&window, find_window_for_mouse_event (window, msg));
2147       toplevel = gdk_window_get_toplevel (window);
2148       if (current_toplevel != toplevel)
2149         {
2150           GDK_NOTE (EVENTS, g_print (" toplevel %p -> %p",
2151               current_toplevel ? GDK_WINDOW_HWND (current_toplevel) : NULL,
2152               toplevel ? GDK_WINDOW_HWND (toplevel) : NULL));
2153           if (current_toplevel)
2154             synthesize_enter_or_leave_event (current_toplevel, msg,
2155                                        GDK_LEAVE_NOTIFY, GDK_CROSSING_NORMAL, GDK_NOTIFY_ANCESTOR);
2156           synthesize_enter_or_leave_event (toplevel, msg,
2157                                      GDK_ENTER_NOTIFY, GDK_CROSSING_NORMAL, GDK_NOTIFY_ANCESTOR);
2158           assign_object (&current_toplevel, toplevel);
2159           track_mouse_event (TME_LEAVE, GDK_WINDOW_HWND (toplevel));
2160         }
2161
2162       /* If we haven't moved, don't create any GDK event. Windows
2163        * sends WM_MOUSEMOVE messages after a new window is shows under
2164        * the mouse, even if the mouse hasn't moved. This disturbs gtk.
2165        */
2166       if (msg->pt.x + _gdk_offset_x == current_root_x &&
2167           msg->pt.y + _gdk_offset_y == current_root_y)
2168         break;
2169
2170       current_root_x = msg->pt.x + _gdk_offset_x;
2171       current_root_y = msg->pt.y + _gdk_offset_y;
2172
2173       event = gdk_event_new (GDK_MOTION_NOTIFY);
2174       event->motion.window = window;
2175       event->motion.time = _gdk_win32_get_next_tick (msg->time);
2176       event->motion.x = current_x = (gint16) GET_X_LPARAM (msg->lParam);
2177       event->motion.y = current_y = (gint16) GET_Y_LPARAM (msg->lParam);
2178       event->motion.x_root = current_root_x;
2179       event->motion.y_root = current_root_y;
2180       event->motion.axes = NULL;
2181       event->motion.state = build_pointer_event_state (msg);
2182       event->motion.is_hint = FALSE;
2183       gdk_event_set_device (event, _gdk_display->core_pointer);
2184
2185       append_event (event);
2186
2187       return_val = TRUE;
2188       break;
2189
2190     case WM_NCMOUSEMOVE:
2191       GDK_NOTE (EVENTS,
2192                 g_print (" (%d,%d)",
2193                          GET_X_LPARAM (msg->lParam), GET_Y_LPARAM (msg->lParam)));
2194 #if 0 /* TODO_CSW? */
2195       if (current_toplevel != NULL &&
2196           (current_toplevel->event_mask & GDK_LEAVE_NOTIFY_MASK))
2197         {
2198           synthesize_enter_or_leave_event (current_toplevel, msg,
2199                                            GDK_LEAVE_NOTIFY, GDK_CROSSING_NORMAL, GDK_NOTIFY_ANCESTOR);
2200         }
2201 #endif
2202       break;
2203
2204     case WM_MOUSELEAVE:
2205       GDK_NOTE (EVENTS, g_print (" %d (%ld,%ld)",
2206                                  HIWORD (msg->wParam), msg->pt.x, msg->pt.y));
2207
2208       if (!gdk_win32_handle_table_lookup (WindowFromPoint (msg->pt)))
2209         {
2210           /* we are only interested if we don't know the new window */
2211           if (current_toplevel)
2212             synthesize_enter_or_leave_event (current_toplevel, msg,
2213                                        GDK_LEAVE_NOTIFY, GDK_CROSSING_NORMAL, GDK_NOTIFY_ANCESTOR);
2214           assign_object (&current_toplevel, NULL);
2215         }
2216       else
2217         {
2218           GDK_NOTE (EVENTS, g_print (" (ignored)"));
2219         }
2220
2221       return_val = TRUE;
2222       break;
2223
2224     case WM_MOUSEWHEEL:
2225       GDK_NOTE (EVENTS, g_print (" %d", (short) HIWORD (msg->wParam)));
2226
2227       /* WM_MOUSEWHEEL is delivered to the focus window. Work around
2228        * that. Also, the position is in screen coordinates, not client
2229        * coordinates as with the button messages. I love the
2230        * consistency of Windows.
2231        */
2232       point.x = GET_X_LPARAM (msg->lParam);
2233       point.y = GET_Y_LPARAM (msg->lParam);
2234
2235       if ((hwnd = WindowFromPoint (point)) == NULL)
2236         break;
2237
2238       msg->hwnd = hwnd;
2239       if ((new_window = gdk_win32_handle_table_lookup (msg->hwnd)) == NULL)
2240         break;
2241
2242       if (new_window != window)
2243         {
2244           assign_object (&window, new_window);
2245         }
2246
2247       ScreenToClient (msg->hwnd, &point);
2248
2249       event = gdk_event_new (GDK_SCROLL);
2250       event->scroll.window = window;
2251       event->scroll.direction = (((short) HIWORD (msg->wParam)) > 0) ?
2252         GDK_SCROLL_UP : GDK_SCROLL_DOWN;
2253       event->scroll.time = _gdk_win32_get_next_tick (msg->time);
2254       event->scroll.x = (gint16) point.x;
2255       event->scroll.y = (gint16) point.y;
2256       event->scroll.x_root = (gint16) GET_X_LPARAM (msg->lParam) + _gdk_offset_x;
2257       event->scroll.y_root = (gint16) GET_Y_LPARAM (msg->lParam) + _gdk_offset_y;
2258       event->scroll.state = build_pointer_event_state (msg);
2259       gdk_event_set_device (event, _gdk_display->core_pointer);
2260
2261       append_event (event);
2262
2263       return_val = TRUE;
2264       break;
2265
2266     case WM_HSCROLL:
2267       /* Just print more debugging information, don't actually handle it. */
2268       GDK_NOTE (EVENTS,
2269                 (g_print (" %s",
2270                           (LOWORD (msg->wParam) == SB_ENDSCROLL ? "ENDSCROLL" :
2271                            (LOWORD (msg->wParam) == SB_LEFT ? "LEFT" :
2272                             (LOWORD (msg->wParam) == SB_RIGHT ? "RIGHT" :
2273                              (LOWORD (msg->wParam) == SB_LINELEFT ? "LINELEFT" :
2274                               (LOWORD (msg->wParam) == SB_LINERIGHT ? "LINERIGHT" :
2275                                (LOWORD (msg->wParam) == SB_PAGELEFT ? "PAGELEFT" :
2276                                 (LOWORD (msg->wParam) == SB_PAGERIGHT ? "PAGERIGHT" :
2277                                  (LOWORD (msg->wParam) == SB_THUMBPOSITION ? "THUMBPOSITION" :
2278                                   (LOWORD (msg->wParam) == SB_THUMBTRACK ? "THUMBTRACK" :
2279                                    "???")))))))))),
2280                  (LOWORD (msg->wParam) == SB_THUMBPOSITION ||
2281                   LOWORD (msg->wParam) == SB_THUMBTRACK) ?
2282                  (g_print (" %d", HIWORD (msg->wParam)), 0) : 0));
2283       break;
2284
2285     case WM_VSCROLL:
2286       /* Just print more debugging information, don't actually handle it. */
2287       GDK_NOTE (EVENTS,
2288                 (g_print (" %s",
2289                           (LOWORD (msg->wParam) == SB_ENDSCROLL ? "ENDSCROLL" :
2290                            (LOWORD (msg->wParam) == SB_BOTTOM ? "BOTTOM" :
2291                             (LOWORD (msg->wParam) == SB_TOP ? "TOP" :
2292                              (LOWORD (msg->wParam) == SB_LINEDOWN ? "LINDOWN" :
2293                               (LOWORD (msg->wParam) == SB_LINEUP ? "LINEUP" :
2294                                (LOWORD (msg->wParam) == SB_PAGEDOWN ? "PAGEDOWN" :
2295                                 (LOWORD (msg->wParam) == SB_PAGEUP ? "PAGEUP" :
2296                                  (LOWORD (msg->wParam) == SB_THUMBPOSITION ? "THUMBPOSITION" :
2297                                   (LOWORD (msg->wParam) == SB_THUMBTRACK ? "THUMBTRACK" :
2298                                    "???")))))))))),
2299                  (LOWORD (msg->wParam) == SB_THUMBPOSITION ||
2300                   LOWORD (msg->wParam) == SB_THUMBTRACK) ?
2301                  (g_print (" %d", HIWORD (msg->wParam)), 0) : 0));
2302       break;
2303
2304      case WM_MOUSEACTIVATE:
2305        {
2306          GdkWindow *tmp;
2307
2308          if (gdk_window_get_window_type (window) == GDK_WINDOW_TEMP
2309              || !window->accept_focus)
2310            {
2311              *ret_valp = MA_NOACTIVATE;
2312              return_val = TRUE;
2313            }
2314
2315          tmp = _gdk_modal_current ();
2316
2317          if (tmp != NULL)
2318            {
2319              if (gdk_window_get_toplevel (window) != tmp)
2320                {
2321                  *ret_valp = MA_NOACTIVATEANDEAT;
2322                  return_val = TRUE;
2323                }
2324            }
2325        }
2326
2327        break;
2328
2329     case WM_KILLFOCUS:
2330       if (keyboard_grab != NULL &&
2331           !GDK_WINDOW_DESTROYED (keyboard_grab->window))
2332         {
2333           generate_grab_broken_event (device_manager, keyboard_grab->window, TRUE, NULL);
2334         }
2335
2336       /* fallthrough */
2337     case WM_SETFOCUS:
2338       if (keyboard_grab != NULL &&
2339           !keyboard_grab->owner_events)
2340         break;
2341
2342       if (!(window->event_mask & GDK_FOCUS_CHANGE_MASK))
2343         break;
2344
2345       if (GDK_WINDOW_DESTROYED (window))
2346         break;
2347
2348       generate_focus_event (device_manager, window, (msg->message == WM_SETFOCUS));
2349       return_val = TRUE;
2350       break;
2351
2352     case WM_ERASEBKGND:
2353       GDK_NOTE (EVENTS, g_print (" %p", (HANDLE) msg->wParam));
2354
2355       if (GDK_WINDOW_DESTROYED (window))
2356         break;
2357
2358       return_val = TRUE;
2359       *ret_valp = 1;
2360       break;
2361
2362     case WM_SYNCPAINT:
2363       sync_timer = SetTimer (GDK_WINDOW_HWND (window),
2364                              1,
2365                              200, sync_timer_proc);
2366       break;
2367
2368     case WM_PAINT:
2369       handle_wm_paint (msg, window, FALSE, NULL);
2370       break;
2371
2372     case WM_SETCURSOR:
2373       GDK_NOTE (EVENTS, g_print (" %#x %#x",
2374                                  LOWORD (msg->lParam), HIWORD (msg->lParam)));
2375
2376       if (pointer_grab != NULL)
2377         grab_window = pointer_grab->window;
2378
2379       if (grab_window == NULL && LOWORD (msg->lParam) != HTCLIENT)
2380         break;
2381
2382       if (grab_window != NULL && p_grab_cursor != NULL)
2383         hcursor = p_grab_cursor;
2384       else if (!GDK_WINDOW_DESTROYED (window))
2385         hcursor = GDK_WINDOW_IMPL_WIN32 (window->impl)->hcursor;
2386       else
2387         hcursor = NULL;
2388
2389       if (hcursor != NULL)
2390         {
2391           GDK_NOTE (EVENTS, g_print (" (SetCursor(%p)", hcursor));
2392           SetCursor (hcursor);
2393           return_val = TRUE;
2394           *ret_valp = TRUE;
2395         }
2396       break;
2397
2398     case WM_SHOWWINDOW:
2399       GDK_NOTE (EVENTS, g_print (" %s %s",
2400                                  (msg->wParam ? "YES" : "NO"),
2401                                  (msg->lParam == 0 ? "ShowWindow" :
2402                                   (msg->lParam == SW_OTHERUNZOOM ? "OTHERUNZOOM" :
2403                                    (msg->lParam == SW_OTHERZOOM ? "OTHERZOOM" :
2404                                     (msg->lParam == SW_PARENTCLOSING ? "PARENTCLOSING" :
2405                                      (msg->lParam == SW_PARENTOPENING ? "PARENTOPENING" :
2406                                       "???")))))));
2407
2408       if (!(window->event_mask & GDK_STRUCTURE_MASK))
2409         break;
2410
2411       if (msg->lParam == SW_OTHERUNZOOM ||
2412           msg->lParam == SW_OTHERZOOM)
2413         break;
2414
2415       if (GDK_WINDOW_DESTROYED (window))
2416         break;
2417
2418       event = gdk_event_new (msg->wParam ? GDK_MAP : GDK_UNMAP);
2419       event->any.window = window;
2420
2421       append_event (event);
2422
2423       if (event->any.type == GDK_UNMAP)
2424         {
2425           impl = GDK_WINDOW_IMPL_WIN32 (window->impl);
2426
2427           if (impl->transient_owner && GetForegroundWindow () == GDK_WINDOW_HWND (window))
2428             {
2429               SetForegroundWindow (GDK_WINDOW_HWND (impl->transient_owner));
2430             }
2431
2432           if (pointer_grab != NULL)
2433             {
2434               if (pointer_grab->window == window)
2435                 gdk_pointer_ungrab (msg->time);
2436             }
2437
2438           if (keyboard_grab &&
2439         keyboard_grab->window == window)
2440             gdk_keyboard_ungrab (msg->time);
2441         }
2442
2443       return_val = TRUE;
2444       break;
2445
2446     case WM_SYSCOMMAND:
2447       switch (msg->wParam)
2448         {
2449         case SC_MINIMIZE:
2450         case SC_RESTORE:
2451           do_show_window (window, msg->wParam == SC_MINIMIZE ? TRUE : FALSE);
2452           break;
2453         }
2454
2455       break;
2456
2457     case WM_SIZE:
2458       GDK_NOTE (EVENTS,
2459                 g_print (" %s %dx%d",
2460                          (msg->wParam == SIZE_MAXHIDE ? "MAXHIDE" :
2461                           (msg->wParam == SIZE_MAXIMIZED ? "MAXIMIZED" :
2462                            (msg->wParam == SIZE_MAXSHOW ? "MAXSHOW" :
2463                             (msg->wParam == SIZE_MINIMIZED ? "MINIMIZED" :
2464                              (msg->wParam == SIZE_RESTORED ? "RESTORED" : "?"))))),
2465                          LOWORD (msg->lParam), HIWORD (msg->lParam)));
2466
2467       if (msg->wParam == SIZE_MINIMIZED)
2468         {
2469           /* Don't generate any GDK event. This is *not* an UNMAP. */
2470           if (pointer_grab != NULL)
2471             {
2472               if (pointer_grab->window == window)
2473                 gdk_pointer_ungrab (msg->time);
2474             }
2475           if (keyboard_grab &&
2476         keyboard_grab->window == window)
2477             gdk_keyboard_ungrab (msg->time);
2478
2479           gdk_synthesize_window_state (window,
2480                                        GDK_WINDOW_STATE_WITHDRAWN,
2481                                        GDK_WINDOW_STATE_ICONIFIED);
2482           do_show_window (window, TRUE);
2483         }
2484       else if ((msg->wParam == SIZE_RESTORED ||
2485                 msg->wParam == SIZE_MAXIMIZED) &&
2486                GDK_WINDOW_TYPE (window) != GDK_WINDOW_CHILD)
2487         {
2488           GdkWindowState withdrawn_bit =
2489             IsWindowVisible (msg->hwnd) ? GDK_WINDOW_STATE_WITHDRAWN : 0;
2490
2491           if (window->state & GDK_WINDOW_STATE_ICONIFIED)
2492             ensure_stacking_on_unminimize (msg);
2493
2494           if (!GDK_WINDOW_DESTROYED (window))
2495             handle_configure_event (msg, window);
2496
2497           if (msg->wParam == SIZE_RESTORED)
2498             {
2499               gdk_synthesize_window_state (window,
2500                                            GDK_WINDOW_STATE_ICONIFIED |
2501                                            GDK_WINDOW_STATE_MAXIMIZED |
2502                                            withdrawn_bit,
2503                                            0);
2504
2505               if (GDK_WINDOW_TYPE (window) != GDK_WINDOW_TEMP && !GDK_WINDOW_IS_MAPPED (window))
2506                 {
2507                   do_show_window (window, FALSE);
2508                 }
2509             }
2510           else if (msg->wParam == SIZE_MAXIMIZED)
2511             {
2512               gdk_synthesize_window_state (window,
2513                                            GDK_WINDOW_STATE_ICONIFIED |
2514                                            withdrawn_bit,
2515                                            GDK_WINDOW_STATE_MAXIMIZED);
2516             }
2517
2518           if (window->resize_count > 1)
2519             window->resize_count -= 1;
2520
2521           if (window->extension_events != 0)
2522       _gdk_device_wintab_update_window_coords (window);
2523
2524           return_val = TRUE;
2525         }
2526       break;
2527
2528     case WM_ENTERSIZEMOVE:
2529     case WM_ENTERMENULOOP:
2530       _gdk_win32_begin_modal_call ();
2531       break;
2532
2533     case WM_EXITSIZEMOVE:
2534     case WM_EXITMENULOOP:
2535       _gdk_win32_end_modal_call ();
2536       break;
2537
2538     case WM_WINDOWPOSCHANGING:
2539       GDK_NOTE (EVENTS, (windowpos = (WINDOWPOS *) msg->lParam,
2540                          g_print (" %s %s %dx%d@%+d%+d now below %p",
2541                                   _gdk_win32_window_pos_bits_to_string (windowpos->flags),
2542                                   (windowpos->hwndInsertAfter == HWND_BOTTOM ? "BOTTOM" :
2543                                    (windowpos->hwndInsertAfter == HWND_NOTOPMOST ? "NOTOPMOST" :
2544                                     (windowpos->hwndInsertAfter == HWND_TOP ? "TOP" :
2545                                      (windowpos->hwndInsertAfter == HWND_TOPMOST ? "TOPMOST" :
2546                                       (sprintf (buf, "%p", windowpos->hwndInsertAfter),
2547                                        buf))))),
2548                                   windowpos->cx, windowpos->cy, windowpos->x, windowpos->y,
2549                                   GetNextWindow (msg->hwnd, GW_HWNDPREV))));
2550
2551       if (GDK_WINDOW_IS_MAPPED (window))
2552         return_val = ensure_stacking_on_window_pos_changing (msg, window);
2553       break;
2554
2555     case WM_WINDOWPOSCHANGED:
2556       windowpos = (WINDOWPOS *) msg->lParam;
2557       GDK_NOTE (EVENTS, g_print (" %s %s %dx%d@%+d%+d",
2558                                  _gdk_win32_window_pos_bits_to_string (windowpos->flags),
2559                                  (windowpos->hwndInsertAfter == HWND_BOTTOM ? "BOTTOM" :
2560                                   (windowpos->hwndInsertAfter == HWND_NOTOPMOST ? "NOTOPMOST" :
2561                                    (windowpos->hwndInsertAfter == HWND_TOP ? "TOP" :
2562                                     (windowpos->hwndInsertAfter == HWND_TOPMOST ? "TOPMOST" :
2563                                      (sprintf (buf, "%p", windowpos->hwndInsertAfter),
2564                                       buf))))),
2565                                  windowpos->cx, windowpos->cy, windowpos->x, windowpos->y));
2566
2567       /* If position and size haven't changed, don't do anything */
2568       if (_modal_operation_in_progress &&
2569           (windowpos->flags & SWP_NOMOVE) &&
2570           (windowpos->flags & SWP_NOSIZE))
2571         break;
2572
2573       /* Once we've entered the moving or sizing modal loop, we won't
2574        * return to the main loop until we're done sizing or moving.
2575        */
2576       if (_modal_operation_in_progress &&
2577          GDK_WINDOW_TYPE (window) != GDK_WINDOW_CHILD &&
2578          !GDK_WINDOW_DESTROYED (window))
2579         {
2580           if (window->event_mask & GDK_STRUCTURE_MASK)
2581             {
2582               GDK_NOTE (EVENTS, g_print (" do magic"));
2583               if (window->resize_count > 1)
2584                 window->resize_count -= 1;
2585
2586               handle_configure_event (msg, window);
2587               g_main_context_iteration (NULL, FALSE);
2588 #if 0
2589               /* Dispatch main loop - to realize resizes... */
2590               modal_timer_proc (msg->hwnd, msg->message, 0, msg->time);
2591 #endif
2592               /* Claim as handled, so that WM_SIZE and WM_MOVE are avoided */
2593               return_val = TRUE;
2594               *ret_valp = 1;
2595             }
2596         }
2597       break;
2598
2599     case WM_SIZING:
2600       GetWindowRect (GDK_WINDOW_HWND (window), &rect);
2601       drag = (RECT *) msg->lParam;
2602       GDK_NOTE (EVENTS, g_print (" %s curr:%s drag:%s",
2603                                  (msg->wParam == WMSZ_BOTTOM ? "BOTTOM" :
2604                                   (msg->wParam == WMSZ_BOTTOMLEFT ? "BOTTOMLEFT" :
2605                                    (msg->wParam == WMSZ_LEFT ? "LEFT" :
2606                                     (msg->wParam == WMSZ_TOPLEFT ? "TOPLEFT" :
2607                                      (msg->wParam == WMSZ_TOP ? "TOP" :
2608                                       (msg->wParam == WMSZ_TOPRIGHT ? "TOPRIGHT" :
2609                                        (msg->wParam == WMSZ_RIGHT ? "RIGHT" :
2610
2611                                         (msg->wParam == WMSZ_BOTTOMRIGHT ? "BOTTOMRIGHT" :
2612                                          "???")))))))),
2613                                  _gdk_win32_rect_to_string (&rect),
2614                                  _gdk_win32_rect_to_string (drag)));
2615
2616       impl = GDK_WINDOW_IMPL_WIN32 (window->impl);
2617       orig_drag = *drag;
2618       if (impl->hint_flags & GDK_HINT_RESIZE_INC)
2619         {
2620           GDK_NOTE (EVENTS, g_print (" (RESIZE_INC)"));
2621           if (impl->hint_flags & GDK_HINT_BASE_SIZE)
2622             {
2623               /* Resize in increments relative to the base size */
2624               rect.left = rect.top = 0;
2625               rect.right = impl->hints.base_width;
2626               rect.bottom = impl->hints.base_height;
2627               _gdk_win32_adjust_client_rect (window, &rect);
2628               point.x = rect.left;
2629               point.y = rect.top;
2630               ClientToScreen (GDK_WINDOW_HWND (window), &point);
2631               rect.left = point.x;
2632               rect.top = point.y;
2633               point.x = rect.right;
2634               point.y = rect.bottom;
2635               ClientToScreen (GDK_WINDOW_HWND (window), &point);
2636               rect.right = point.x;
2637               rect.bottom = point.y;
2638
2639               GDK_NOTE (EVENTS, g_print (" (also BASE_SIZE, using %s)",
2640                                          _gdk_win32_rect_to_string (&rect)));
2641             }
2642
2643           switch (msg->wParam)
2644             {
2645             case WMSZ_BOTTOM:
2646               if (drag->bottom == rect.bottom)
2647                 break;
2648               adjust_drag (&drag->bottom, rect.bottom, impl->hints.height_inc);
2649               break;
2650
2651             case WMSZ_BOTTOMLEFT:
2652               if (drag->bottom == rect.bottom && drag->left == rect.left)
2653                 break;
2654               adjust_drag (&drag->bottom, rect.bottom, impl->hints.height_inc);
2655               adjust_drag (&drag->left, rect.left, impl->hints.width_inc);
2656               break;
2657
2658             case WMSZ_LEFT:
2659               if (drag->left == rect.left)
2660                 break;
2661               adjust_drag (&drag->left, rect.left, impl->hints.width_inc);
2662               break;
2663
2664             case WMSZ_TOPLEFT:
2665               if (drag->top == rect.top && drag->left == rect.left)
2666                 break;
2667               adjust_drag (&drag->top, rect.top, impl->hints.height_inc);
2668               adjust_drag (&drag->left, rect.left, impl->hints.width_inc);
2669               break;
2670
2671             case WMSZ_TOP:
2672               if (drag->top == rect.top)
2673                 break;
2674               adjust_drag (&drag->top, rect.top, impl->hints.height_inc);
2675               break;
2676
2677             case WMSZ_TOPRIGHT:
2678               if (drag->top == rect.top && drag->right == rect.right)
2679                 break;
2680               adjust_drag (&drag->top, rect.top, impl->hints.height_inc);
2681               adjust_drag (&drag->right, rect.right, impl->hints.width_inc);
2682               break;
2683
2684             case WMSZ_RIGHT:
2685               if (drag->right == rect.right)
2686                 break;
2687               adjust_drag (&drag->right, rect.right, impl->hints.width_inc);
2688               break;
2689
2690             case WMSZ_BOTTOMRIGHT:
2691               if (drag->bottom == rect.bottom && drag->right == rect.right)
2692                 break;
2693               adjust_drag (&drag->bottom, rect.bottom, impl->hints.height_inc);
2694               adjust_drag (&drag->right, rect.right, impl->hints.width_inc);
2695               break;
2696             }
2697
2698           if (drag->bottom != orig_drag.bottom || drag->left != orig_drag.left ||
2699               drag->top != orig_drag.top || drag->right != orig_drag.right)
2700             {
2701               *ret_valp = TRUE;
2702               return_val = TRUE;
2703               GDK_NOTE (EVENTS, g_print (" (handled RESIZE_INC: %s)",
2704                                          _gdk_win32_rect_to_string (drag)));
2705             }
2706         }
2707
2708       /* WM_GETMINMAXINFO handles min_size and max_size hints? */
2709
2710       if (impl->hint_flags & GDK_HINT_ASPECT)
2711         {
2712           RECT decorated_rect;
2713           RECT undecorated_drag;
2714           int decoration_width, decoration_height;
2715           gdouble drag_aspect;
2716           int drag_width, drag_height, new_width, new_height;
2717
2718           GetClientRect (GDK_WINDOW_HWND (window), &rect);
2719           decorated_rect = rect;
2720           _gdk_win32_adjust_client_rect (window, &decorated_rect);
2721
2722           /* Set undecorated_drag to the client area being dragged
2723            * out, in screen coordinates.
2724            */
2725           undecorated_drag = *drag;
2726           undecorated_drag.left -= decorated_rect.left - rect.left;
2727           undecorated_drag.right -= decorated_rect.right - rect.right;
2728           undecorated_drag.top -= decorated_rect.top - rect.top;
2729           undecorated_drag.bottom -= decorated_rect.bottom - rect.bottom;
2730
2731           decoration_width = (decorated_rect.right - decorated_rect.left) - (rect.right - rect.left);
2732           decoration_height = (decorated_rect.bottom - decorated_rect.top) - (rect.bottom - rect.top);
2733
2734           drag_width = undecorated_drag.right - undecorated_drag.left;
2735           drag_height = undecorated_drag.bottom - undecorated_drag.top;
2736
2737           drag_aspect = (gdouble) drag_width / drag_height;
2738
2739           GDK_NOTE (EVENTS, g_print (" (ASPECT:%g--%g curr: %g)",
2740                                      impl->hints.min_aspect, impl->hints.max_aspect, drag_aspect));
2741
2742           if (drag_aspect < impl->hints.min_aspect)
2743             {
2744               /* Aspect is getting too narrow */
2745               switch (msg->wParam)
2746                 {
2747                 case WMSZ_BOTTOM:
2748                 case WMSZ_TOP:
2749                   /* User drags top or bottom edge outward. Keep height, increase width. */
2750                   new_width = impl->hints.min_aspect * drag_height;
2751                   drag->left -= (new_width - drag_width) / 2;
2752                   drag->right = drag->left + new_width + decoration_width;
2753                   break;
2754                 case WMSZ_BOTTOMLEFT:
2755                 case WMSZ_BOTTOMRIGHT:
2756                   /* User drags bottom-left or bottom-right corner down. Adjust height. */
2757                   new_height = drag_width / impl->hints.min_aspect;
2758                   drag->bottom = drag->top + new_height + decoration_height;
2759                   break;
2760                 case WMSZ_LEFT:
2761                 case WMSZ_RIGHT:
2762                   /* User drags left or right edge inward. Decrease height */
2763                   new_height = drag_width / impl->hints.min_aspect;
2764                   drag->top += (drag_height - new_height) / 2;
2765                   drag->bottom = drag->top + new_height + decoration_height;
2766                   break;
2767                 case WMSZ_TOPLEFT:
2768                 case WMSZ_TOPRIGHT:
2769                   /* User drags top-left or top-right corner up. Adjust height. */
2770                   new_height = drag_width / impl->hints.min_aspect;
2771                   drag->top = drag->bottom - new_height - decoration_height;
2772                 }
2773             }
2774           else if (drag_aspect > impl->hints.max_aspect)
2775             {
2776               /* Aspect is getting too wide */
2777               switch (msg->wParam)
2778                 {
2779                 case WMSZ_BOTTOM:
2780                 case WMSZ_TOP:
2781                   /* User drags top or bottom edge inward. Decrease width. */
2782                   new_width = impl->hints.max_aspect * drag_height;
2783                   drag->left += (drag_width - new_width) / 2;
2784                   drag->right = drag->left + new_width + decoration_width;
2785                   break;
2786                 case WMSZ_BOTTOMLEFT:
2787                 case WMSZ_TOPLEFT:
2788                   /* User drags bottom-left or top-left corner left. Adjust width. */
2789                   new_width = impl->hints.max_aspect * drag_height;
2790                   drag->left = drag->right - new_width - decoration_width;
2791                   break;
2792                 case WMSZ_BOTTOMRIGHT:
2793                 case WMSZ_TOPRIGHT:
2794                   /* User drags bottom-right or top-right corner right. Adjust width. */
2795                   new_width = impl->hints.max_aspect * drag_height;
2796                   drag->right = drag->left + new_width + decoration_width;
2797                   break;
2798                 case WMSZ_LEFT:
2799                 case WMSZ_RIGHT:
2800                   /* User drags left or right edge outward. Increase height. */
2801                   new_height = drag_width / impl->hints.max_aspect;
2802                   drag->top -= (new_height - drag_height) / 2;
2803                   drag->bottom = drag->top + new_height + decoration_height;
2804                   break;
2805                 }
2806             }
2807
2808           *ret_valp = TRUE;
2809           return_val = TRUE;
2810           GDK_NOTE (EVENTS, g_print (" (handled ASPECT: %s)",
2811                                      _gdk_win32_rect_to_string (drag)));
2812         }
2813       break;
2814
2815     case WM_GETMINMAXINFO:
2816       if (GDK_WINDOW_DESTROYED (window))
2817         break;
2818
2819       impl = GDK_WINDOW_IMPL_WIN32 (window->impl);
2820       mmi = (MINMAXINFO*) msg->lParam;
2821       GDK_NOTE (EVENTS, g_print (" (mintrack:%ldx%ld maxtrack:%ldx%ld "
2822                                  "maxpos:%+ld%+ld maxsize:%ldx%ld)",
2823                                  mmi->ptMinTrackSize.x, mmi->ptMinTrackSize.y,
2824                                  mmi->ptMaxTrackSize.x, mmi->ptMaxTrackSize.y,
2825                                  mmi->ptMaxPosition.x, mmi->ptMaxPosition.y,
2826                                  mmi->ptMaxSize.x, mmi->ptMaxSize.y));
2827
2828       if (impl->hint_flags & GDK_HINT_MIN_SIZE)
2829         {
2830           rect.left = rect.top = 0;
2831           rect.right = impl->hints.min_width;
2832           rect.bottom = impl->hints.min_height;
2833
2834           _gdk_win32_adjust_client_rect (window, &rect);
2835
2836           mmi->ptMinTrackSize.x = rect.right - rect.left;
2837           mmi->ptMinTrackSize.y = rect.bottom - rect.top;
2838         }
2839
2840       if (impl->hint_flags & GDK_HINT_MAX_SIZE)
2841         {
2842           int maxw, maxh;
2843
2844           rect.left = rect.top = 0;
2845           rect.right = impl->hints.max_width;
2846           rect.bottom = impl->hints.max_height;
2847
2848           _gdk_win32_adjust_client_rect (window, &rect);
2849
2850           /* at least on win9x we have the 16 bit trouble */
2851           maxw = rect.right - rect.left;
2852           maxh = rect.bottom - rect.top;
2853           mmi->ptMaxTrackSize.x = maxw > 0 && maxw < G_MAXSHORT ? maxw : G_MAXSHORT;
2854           mmi->ptMaxTrackSize.y = maxh > 0 && maxh < G_MAXSHORT ? maxh : G_MAXSHORT;
2855         }
2856
2857       if (impl->hint_flags & (GDK_HINT_MIN_SIZE | GDK_HINT_MAX_SIZE))
2858         {
2859           /* Don't call DefWindowProcW() */
2860           GDK_NOTE (EVENTS, g_print (" (handled, mintrack:%ldx%ld maxtrack:%ldx%ld "
2861                                      "maxpos:%+ld%+ld maxsize:%ldx%ld)",
2862                                      mmi->ptMinTrackSize.x, mmi->ptMinTrackSize.y,
2863                                      mmi->ptMaxTrackSize.x, mmi->ptMaxTrackSize.y,
2864                                      mmi->ptMaxPosition.x, mmi->ptMaxPosition.y,
2865                                      mmi->ptMaxSize.x, mmi->ptMaxSize.y));
2866           return_val = TRUE;
2867         }
2868       break;
2869
2870     case WM_MOVE:
2871       GDK_NOTE (EVENTS, g_print (" (%d,%d)",
2872                                  GET_X_LPARAM (msg->lParam), GET_Y_LPARAM (msg->lParam)));
2873
2874       if (GDK_WINDOW_TYPE (window) != GDK_WINDOW_CHILD &&
2875           !IsIconic (msg->hwnd))
2876         {
2877           if (!GDK_WINDOW_DESTROYED (window))
2878             handle_configure_event (msg, window);
2879
2880           return_val = TRUE;
2881         }
2882       break;
2883
2884     case WM_CLOSE:
2885       if (GDK_WINDOW_DESTROYED (window))
2886         break;
2887
2888       event = gdk_event_new (GDK_DELETE);
2889       event->any.window = window;
2890
2891       append_event (event);
2892
2893       impl = GDK_WINDOW_IMPL_WIN32 (window->impl);
2894
2895       if (impl->transient_owner && GetForegroundWindow() == GDK_WINDOW_HWND (window))
2896         {
2897           SetForegroundWindow (GDK_WINDOW_HWND (impl->transient_owner));
2898         }
2899
2900       return_val = TRUE;
2901       break;
2902
2903     case WM_DESTROY:
2904       if (pointer_grab != NULL)
2905         {
2906           if (pointer_grab->window == window)
2907             gdk_pointer_ungrab (msg->time);
2908         }
2909
2910       if (keyboard_grab &&
2911           keyboard_grab->window == window)
2912         gdk_keyboard_ungrab (msg->time);
2913
2914       if ((window != NULL) && (msg->hwnd != GetDesktopWindow ()))
2915         gdk_window_destroy_notify (window);
2916
2917       if (window == NULL || GDK_WINDOW_DESTROYED (window))
2918         break;
2919
2920       event = gdk_event_new (GDK_DESTROY);
2921       event->any.window = window;
2922
2923       append_event (event);
2924
2925       return_val = TRUE;
2926       break;
2927
2928     case WM_DISPLAYCHANGE:
2929       handle_display_change ();
2930       break;
2931
2932     case WM_DESTROYCLIPBOARD:
2933       if (!_ignore_destroy_clipboard)
2934         {
2935           event = gdk_event_new (GDK_SELECTION_CLEAR);
2936           event->selection.window = window;
2937           event->selection.selection = GDK_SELECTION_CLIPBOARD;
2938           event->selection.time = _gdk_win32_get_next_tick (msg->time);
2939           append_event (event);
2940         }
2941       else
2942         {
2943           return_val = TRUE;
2944         }
2945
2946       break;
2947
2948     case WM_RENDERFORMAT:
2949       GDK_NOTE (EVENTS, g_print (" %s", _gdk_win32_cf_to_string (msg->wParam)));
2950
2951       if (!(target = g_hash_table_lookup (_format_atom_table, GINT_TO_POINTER (msg->wParam))))
2952         {
2953           GDK_NOTE (EVENTS, g_print (" (target not found)"));
2954           return_val = TRUE;
2955           break;
2956         }
2957
2958       /* We need to render to clipboard immediately, don't call
2959        * append_event()
2960        */
2961       event = gdk_event_new (GDK_SELECTION_REQUEST);
2962       event->selection.window = window;
2963       event->selection.send_event = FALSE;
2964       event->selection.selection = GDK_SELECTION_CLIPBOARD;
2965       event->selection.target = target;
2966       event->selection.property = _gdk_selection;
2967       event->selection.requestor = gdk_win32_handle_table_lookup (msg->hwnd);
2968       event->selection.time = msg->time;
2969
2970       fixup_event (event);
2971       GDK_NOTE (EVENTS, g_print (" (calling _gdk_event_emit)"));
2972       GDK_NOTE (EVENTS, _gdk_win32_print_event (event));
2973       _gdk_event_emit (event);
2974       gdk_event_free (event);
2975
2976       /* Now the clipboard owner should have rendered */
2977       if (!_delayed_rendering_data)
2978         {
2979           GDK_NOTE (EVENTS, g_print (" (no _delayed_rendering_data?)"));
2980         }
2981       else
2982         {
2983           if (msg->wParam == CF_DIB)
2984             {
2985               _delayed_rendering_data =
2986                 _gdk_win32_selection_convert_to_dib (_delayed_rendering_data,
2987                                                      target);
2988               if (!_delayed_rendering_data)
2989                 {
2990                   g_warning ("Cannot convert to DIB from delayed rendered image");
2991                   break;
2992                 }
2993             }
2994
2995           /* The requestor is holding the clipboard, no
2996            * OpenClipboard() is required/possible
2997            */
2998           GDK_NOTE (DND,
2999                     g_print (" SetClipboardData(%s,%p)",
3000                              _gdk_win32_cf_to_string (msg->wParam),
3001                              _delayed_rendering_data));
3002
3003           API_CALL (SetClipboardData, (msg->wParam, _delayed_rendering_data));
3004           _delayed_rendering_data = NULL;
3005         }
3006       break;
3007
3008     case WM_ACTIVATE:
3009       GDK_NOTE (EVENTS, g_print (" %s%s %p",
3010                                  (LOWORD (msg->wParam) == WA_ACTIVE ? "ACTIVE" :
3011                                   (LOWORD (msg->wParam) == WA_CLICKACTIVE ? "CLICKACTIVE" :
3012                                    (LOWORD (msg->wParam) == WA_INACTIVE ? "INACTIVE" : "???"))),
3013                                  HIWORD (msg->wParam) ? " minimized" : "",
3014                                  (HWND) msg->lParam));
3015       /* We handle mouse clicks for modally-blocked windows under WM_MOUSEACTIVATE,
3016        * but we still need to deal with alt-tab, or with SetActiveWindow() type
3017        * situations.
3018        */
3019       if (is_modally_blocked (window) && LOWORD (msg->wParam) == WA_ACTIVE)
3020         {
3021           GdkWindow *modal_current = _gdk_modal_current ();
3022           SetActiveWindow (GDK_WINDOW_HWND (modal_current));
3023           *ret_valp = 0;
3024           return_val = TRUE;
3025           break;
3026         }
3027
3028       /* Bring any tablet contexts to the top of the overlap order when
3029        * one of our windows is activated.
3030        * NOTE: It doesn't seem to work well if it is done in WM_ACTIVATEAPP
3031        * instead
3032        */
3033       if (LOWORD(msg->wParam) != WA_INACTIVE)
3034         _gdk_input_set_tablet_active ();
3035       break;
3036
3037     case WM_ACTIVATEAPP:
3038       GDK_NOTE (EVENTS, g_print (" %s thread: %I64d",
3039                                  msg->wParam ? "YES" : "NO",
3040                                  (gint64) msg->lParam));
3041       if (msg->wParam && GDK_WINDOW_IS_MAPPED (window))
3042         ensure_stacking_on_activate_app (msg, window);
3043       break;
3044
3045       /* Handle WINTAB events here, as we know that gdkinput.c will
3046        * use the fixed WT_DEFBASE as lcMsgBase, and we thus can use the
3047        * constants as case labels.
3048        */
3049     case WT_PACKET:
3050       GDK_NOTE (EVENTS, g_print (" %d %p",
3051                                  (int) msg->wParam, (gpointer) msg->lParam));
3052       goto wintab;
3053
3054     case WT_CSRCHANGE:
3055       GDK_NOTE (EVENTS, g_print (" %d %p",
3056                                  (int) msg->wParam, (gpointer) msg->lParam));
3057       goto wintab;
3058
3059     case WT_PROXIMITY:
3060       GDK_NOTE (EVENTS, g_print (" %p %d %d",
3061                                  (gpointer) msg->wParam,
3062                                  LOWORD (msg->lParam),
3063                                  HIWORD (msg->lParam)));
3064       /* Fall through */
3065     wintab:
3066
3067       event = gdk_event_new (GDK_NOTHING);
3068       event->any.window = window;
3069       g_object_ref (window);
3070
3071       if (_gdk_input_other_event (event, msg, window))
3072         append_event (event);
3073       else
3074         gdk_event_free (event);
3075
3076       break;
3077     }
3078
3079 done:
3080
3081   if (window)
3082     g_object_unref (window);
3083
3084 #undef return
3085   return return_val;
3086 }
3087
3088 void
3089 _gdk_win32_display_queue_events (GdkDisplay *display)
3090 {
3091   MSG msg;
3092
3093   if (modal_win32_dialog != NULL)
3094     return;
3095
3096   while (!_gdk_event_queue_find_first (display) &&
3097          PeekMessageW (&msg, NULL, 0, 0, PM_REMOVE))
3098     {
3099       TranslateMessage (&msg);
3100       DispatchMessageW (&msg);
3101     }
3102 }
3103
3104 static gboolean
3105 gdk_event_prepare (GSource *source,
3106                    gint    *timeout)
3107 {
3108   MSG msg;
3109   gboolean retval;
3110
3111   GDK_THREADS_ENTER ();
3112
3113   *timeout = -1;
3114
3115   retval = (_gdk_event_queue_find_first (_gdk_display) != NULL ||
3116             (modal_win32_dialog == NULL &&
3117              PeekMessageW (&msg, NULL, 0, 0, PM_NOREMOVE)));
3118
3119   GDK_THREADS_LEAVE ();
3120
3121   return retval;
3122 }
3123
3124 static gboolean
3125 gdk_event_check (GSource *source)
3126 {
3127   MSG msg;
3128   gboolean retval;
3129
3130   GDK_THREADS_ENTER ();
3131
3132   if (event_poll_fd.revents & G_IO_IN)
3133     {
3134       retval = (_gdk_event_queue_find_first (_gdk_display) != NULL ||
3135                 (modal_win32_dialog == NULL &&
3136                  PeekMessageW (&msg, NULL, 0, 0, PM_NOREMOVE)));
3137     }
3138   else
3139     {
3140       retval = FALSE;
3141     }
3142
3143   GDK_THREADS_LEAVE ();
3144
3145   return retval;
3146 }
3147
3148 static gboolean
3149 gdk_event_dispatch (GSource     *source,
3150                     GSourceFunc  callback,
3151                     gpointer     user_data)
3152 {
3153   GdkEvent *event;
3154
3155   GDK_THREADS_ENTER ();
3156
3157   _gdk_win32_display_queue_events (_gdk_display);
3158   event = _gdk_event_unqueue (_gdk_display);
3159
3160   if (event)
3161     {
3162       _gdk_event_emit (event);
3163
3164       gdk_event_free (event);
3165
3166       /* Do drag & drop if it is still pending */
3167       if (_dnd_source_state == GDK_WIN32_DND_PENDING)
3168         {
3169           _dnd_source_state = GDK_WIN32_DND_DRAGGING;
3170           _gdk_win32_dnd_do_dragdrop ();
3171           _dnd_source_state = GDK_WIN32_DND_NONE;
3172         }
3173     }
3174
3175   GDK_THREADS_LEAVE ();
3176
3177   return TRUE;
3178 }
3179
3180 void
3181 gdk_win32_set_modal_dialog_libgtk_only (HWND window)
3182 {
3183   modal_win32_dialog = window;
3184 }
3185
3186 static gboolean
3187 is_modally_blocked (GdkWindow *window)
3188 {
3189   GdkWindow *modal_current = _gdk_modal_current ();
3190   return modal_current != NULL ? gdk_window_get_toplevel (window) != modal_current : FALSE;
3191 }
3192
3193 void
3194 _gdk_win32_display_sync (GdkDisplay * display)
3195 {
3196   MSG msg;
3197
3198   g_return_if_fail (display == _gdk_display);
3199
3200   /* Process all messages currently available */
3201   while (PeekMessageW (&msg, NULL, 0, 0, PM_REMOVE))
3202     DispatchMessageW (&msg);
3203 }
3204