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 "gdkwin32.h"
  52 #include "gdkkeysyms.h"
  53 #include "gdkdevicemanager-win32.h"
  54 #include "gdkdeviceprivate.h"
  55 #include "gdkdevice-wintab.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       if (msg->wParam == VK_PACKET &&
1962           ToUnicode (VK_PACKET, HIWORD (msg->lParam), key_state, wbuf, 1, 0) == 1)
1963         event->key.keyval = gdk_unicode_to_keyval (wbuf[0]);
1964       else
1965         gdk_keymap_translate_keyboard_state (_gdk_win32_display_get_keymap (_gdk_display),
1966                                              event->key.hardware_keycode,
1967                                              event->key.state,
1968                                              event->key.group,
1969                                              &event->key.keyval,
1970                                              NULL, NULL, NULL);
1971
1972       fill_key_event_string (event);
1973
1974       /* Reset MOD1_MASK if it is the Alt key itself */
1975       if (msg->wParam == VK_MENU)
1976         event->key.state &= ~GDK_MOD1_MASK;
1977
1978       append_event (event);
1979
1980       return_val = TRUE;
1981       break;
1982
1983     case WM_SYSCHAR:
1984       if (msg->wParam != VK_SPACE)
1985         {
1986           /* To prevent beeps, don't let DefWindowProcW() be called */
1987           return_val = TRUE;
1988           goto done;
1989         }
1990       break;
1991
1992     case WM_IME_STARTCOMPOSITION:
1993       in_ime_composition = TRUE;
1994       break;
1995
1996     case WM_IME_ENDCOMPOSITION:
1997       in_ime_composition = FALSE;
1998       break;
1999
2000     case WM_IME_COMPOSITION:
2001       /* On Win2k WM_IME_CHAR doesn't work correctly for non-Unicode
2002        * applications. Thus, handle WM_IME_COMPOSITION with
2003        * GCS_RESULTSTR instead, fetch the Unicode chars from the IME
2004        * with ImmGetCompositionStringW().
2005        *
2006        * See for instance
2007        * http://groups.google.com/groups?selm=natX5.57%24g77.19788%40nntp2.onemain.com
2008        * and
2009        * http://groups.google.com/groups?selm=u2XfrXw5BHA.1628%40tkmsftngp02
2010        * for comments by other people that seems to have the same
2011        * experience. WM_IME_CHAR just gives question marks, apparently
2012        * because of going through some conversion to the current code
2013        * page.
2014        *
2015        * WM_IME_CHAR might work on NT4 or Win9x with ActiveIMM, but
2016        * use WM_IME_COMPOSITION there, too, to simplify the code.
2017        */
2018       GDK_NOTE (EVENTS, g_print (" %#lx", (long) msg->lParam));
2019
2020       if (!(msg->lParam & GCS_RESULTSTR))
2021         break;
2022
2023       if (keyboard_grab &&
2024           !propagate (&window, msg,
2025                       keyboard_grab->window,
2026                       keyboard_grab->owner_events,
2027                       GDK_ALL_EVENTS_MASK,
2028                       doesnt_want_char, FALSE))
2029         break;
2030
2031       if (GDK_WINDOW_DESTROYED (window))
2032         break;
2033
2034       himc = ImmGetContext (msg->hwnd);
2035       ccount = ImmGetCompositionStringW (himc, GCS_RESULTSTR,
2036                                          wbuf, sizeof (wbuf));
2037       ImmReleaseContext (msg->hwnd, himc);
2038
2039       ccount /= 2;
2040
2041       API_CALL (GetKeyboardState, (key_state));
2042
2043       for (i = 0; i < ccount; i++)
2044         {
2045           if (window->event_mask & GDK_KEY_PRESS_MASK)
2046             {
2047               /* Build a key press event */
2048               event = gdk_event_new (GDK_KEY_PRESS);
2049               event->key.window = window;
2050         gdk_event_set_device (event, GDK_DEVICE_MANAGER_WIN32 (device_manager)->core_keyboard);
2051               build_wm_ime_composition_event (event, msg, wbuf[i], key_state);
2052
2053               append_event (event);
2054             }
2055
2056           if (window->event_mask & GDK_KEY_RELEASE_MASK)
2057             {
2058               /* Build a key release event.  */
2059               event = gdk_event_new (GDK_KEY_RELEASE);
2060               event->key.window = window;
2061         gdk_event_set_device (event, GDK_DEVICE_MANAGER_WIN32 (device_manager)->core_keyboard);
2062               build_wm_ime_composition_event (event, msg, wbuf[i], key_state);
2063
2064               append_event (event);
2065             }
2066         }
2067       return_val = TRUE;
2068       break;
2069
2070     case WM_LBUTTONDOWN:
2071       button = 1;
2072       goto buttondown0;
2073
2074     case WM_MBUTTONDOWN:
2075       button = 2;
2076       goto buttondown0;
2077
2078     case WM_RBUTTONDOWN:
2079       button = 3;
2080       goto buttondown0;
2081
2082     case WM_XBUTTONDOWN:
2083       if (HIWORD (msg->wParam) == XBUTTON1)
2084         button = 4;
2085       else
2086         button = 5;
2087
2088     buttondown0:
2089       GDK_NOTE (EVENTS,
2090                 g_print (" (%d,%d)",
2091                          GET_X_LPARAM (msg->lParam), GET_Y_LPARAM (msg->lParam)));
2092
2093       assign_object (&window, find_window_for_mouse_event (window, msg));
2094       /* TODO_CSW?: there used to some synthesize and propagate */
2095       if (GDK_WINDOW_DESTROYED (window))
2096         break;
2097
2098       /* TODO_CSW? Emulate X11's automatic active grab */
2099       generate_button_event (GDK_BUTTON_PRESS, button,
2100                              window, msg);
2101
2102       return_val = TRUE;
2103       break;
2104
2105     case WM_LBUTTONUP:
2106       button = 1;
2107       goto buttonup0;
2108
2109     case WM_MBUTTONUP:
2110       button = 2;
2111       goto buttonup0;
2112
2113     case WM_RBUTTONUP:
2114       button = 3;
2115       goto buttonup0;
2116
2117     case WM_XBUTTONUP:
2118       if (HIWORD (msg->wParam) == XBUTTON1)
2119         button = 4;
2120       else
2121         button = 5;
2122
2123     buttonup0:
2124       GDK_NOTE (EVENTS,
2125                 g_print (" (%d,%d)",
2126                          GET_X_LPARAM (msg->lParam), GET_Y_LPARAM (msg->lParam)));
2127
2128       assign_object (&window, find_window_for_mouse_event (window, msg));
2129 #if 0
2130       if (window->extension_events != 0 &&
2131           _gdk_input_ignore_core)
2132         {
2133           GDK_NOTE (EVENTS, g_print (" (ignored)"));
2134           break;
2135         }
2136 #endif
2137
2138       generate_button_event (GDK_BUTTON_RELEASE, button,
2139                              window, msg);
2140
2141       return_val = TRUE;
2142       break;
2143
2144     case WM_MOUSEMOVE:
2145       GDK_NOTE (EVENTS,
2146                 g_print (" %p (%d,%d)",
2147                          (gpointer) msg->wParam,
2148                          GET_X_LPARAM (msg->lParam), GET_Y_LPARAM (msg->lParam)));
2149
2150       assign_object (&window, find_window_for_mouse_event (window, msg));
2151       toplevel = gdk_window_get_toplevel (window);
2152       if (current_toplevel != toplevel)
2153         {
2154           GDK_NOTE (EVENTS, g_print (" toplevel %p -> %p",
2155               current_toplevel ? GDK_WINDOW_HWND (current_toplevel) : NULL,
2156               toplevel ? GDK_WINDOW_HWND (toplevel) : NULL));
2157           if (current_toplevel)
2158             synthesize_enter_or_leave_event (current_toplevel, msg,
2159                                        GDK_LEAVE_NOTIFY, GDK_CROSSING_NORMAL, GDK_NOTIFY_ANCESTOR);
2160           synthesize_enter_or_leave_event (toplevel, msg,
2161                                      GDK_ENTER_NOTIFY, GDK_CROSSING_NORMAL, GDK_NOTIFY_ANCESTOR);
2162           assign_object (&current_toplevel, toplevel);
2163           track_mouse_event (TME_LEAVE, GDK_WINDOW_HWND (toplevel));
2164         }
2165
2166       /* If we haven't moved, don't create any GDK event. Windows
2167        * sends WM_MOUSEMOVE messages after a new window is shows under
2168        * the mouse, even if the mouse hasn't moved. This disturbs gtk.
2169        */
2170       if (msg->pt.x + _gdk_offset_x == current_root_x &&
2171           msg->pt.y + _gdk_offset_y == current_root_y)
2172         break;
2173
2174       current_root_x = msg->pt.x + _gdk_offset_x;
2175       current_root_y = msg->pt.y + _gdk_offset_y;
2176
2177       event = gdk_event_new (GDK_MOTION_NOTIFY);
2178       event->motion.window = window;
2179       event->motion.time = _gdk_win32_get_next_tick (msg->time);
2180       event->motion.x = current_x = (gint16) GET_X_LPARAM (msg->lParam);
2181       event->motion.y = current_y = (gint16) GET_Y_LPARAM (msg->lParam);
2182       event->motion.x_root = current_root_x;
2183       event->motion.y_root = current_root_y;
2184       event->motion.axes = NULL;
2185       event->motion.state = build_pointer_event_state (msg);
2186       event->motion.is_hint = FALSE;
2187       gdk_event_set_device (event, _gdk_display->core_pointer);
2188
2189       append_event (event);
2190
2191       return_val = TRUE;
2192       break;
2193
2194     case WM_NCMOUSEMOVE:
2195       GDK_NOTE (EVENTS,
2196                 g_print (" (%d,%d)",
2197                          GET_X_LPARAM (msg->lParam), GET_Y_LPARAM (msg->lParam)));
2198 #if 0 /* TODO_CSW? */
2199       if (current_toplevel != NULL &&
2200           (current_toplevel->event_mask & GDK_LEAVE_NOTIFY_MASK))
2201         {
2202           synthesize_enter_or_leave_event (current_toplevel, msg,
2203                                            GDK_LEAVE_NOTIFY, GDK_CROSSING_NORMAL, GDK_NOTIFY_ANCESTOR);
2204         }
2205 #endif
2206       break;
2207
2208     case WM_MOUSELEAVE:
2209       GDK_NOTE (EVENTS, g_print (" %d (%ld,%ld)",
2210                                  HIWORD (msg->wParam), msg->pt.x, msg->pt.y));
2211
2212       if (!gdk_win32_handle_table_lookup (WindowFromPoint (msg->pt)))
2213         {
2214           /* we are only interested if we don't know the new window */
2215           if (current_toplevel)
2216             synthesize_enter_or_leave_event (current_toplevel, msg,
2217                                        GDK_LEAVE_NOTIFY, GDK_CROSSING_NORMAL, GDK_NOTIFY_ANCESTOR);
2218           assign_object (&current_toplevel, NULL);
2219         }
2220       else
2221         {
2222           GDK_NOTE (EVENTS, g_print (" (ignored)"));
2223         }
2224
2225       return_val = TRUE;
2226       break;
2227
2228     case WM_MOUSEWHEEL:
2229       GDK_NOTE (EVENTS, g_print (" %d", (short) HIWORD (msg->wParam)));
2230
2231       /* WM_MOUSEWHEEL is delivered to the focus window. Work around
2232        * that. Also, the position is in screen coordinates, not client
2233        * coordinates as with the button messages. I love the
2234        * consistency of Windows.
2235        */
2236       point.x = GET_X_LPARAM (msg->lParam);
2237       point.y = GET_Y_LPARAM (msg->lParam);
2238
2239       if ((hwnd = WindowFromPoint (point)) == NULL)
2240         break;
2241
2242       msg->hwnd = hwnd;
2243       if ((new_window = gdk_win32_handle_table_lookup (msg->hwnd)) == NULL)
2244         break;
2245
2246       if (new_window != window)
2247         {
2248           assign_object (&window, new_window);
2249         }
2250
2251       ScreenToClient (msg->hwnd, &point);
2252
2253       event = gdk_event_new (GDK_SCROLL);
2254       event->scroll.window = window;
2255       event->scroll.direction = (((short) HIWORD (msg->wParam)) > 0) ?
2256         GDK_SCROLL_UP : GDK_SCROLL_DOWN;
2257       event->scroll.time = _gdk_win32_get_next_tick (msg->time);
2258       event->scroll.x = (gint16) point.x;
2259       event->scroll.y = (gint16) point.y;
2260       event->scroll.x_root = (gint16) GET_X_LPARAM (msg->lParam) + _gdk_offset_x;
2261       event->scroll.y_root = (gint16) GET_Y_LPARAM (msg->lParam) + _gdk_offset_y;
2262       event->scroll.state = build_pointer_event_state (msg);
2263       gdk_event_set_device (event, _gdk_display->core_pointer);
2264
2265       append_event (event);
2266
2267       return_val = TRUE;
2268       break;
2269
2270     case WM_HSCROLL:
2271       /* Just print more debugging information, don't actually handle it. */
2272       GDK_NOTE (EVENTS,
2273                 (g_print (" %s",
2274                           (LOWORD (msg->wParam) == SB_ENDSCROLL ? "ENDSCROLL" :
2275                            (LOWORD (msg->wParam) == SB_LEFT ? "LEFT" :
2276                             (LOWORD (msg->wParam) == SB_RIGHT ? "RIGHT" :
2277                              (LOWORD (msg->wParam) == SB_LINELEFT ? "LINELEFT" :
2278                               (LOWORD (msg->wParam) == SB_LINERIGHT ? "LINERIGHT" :
2279                                (LOWORD (msg->wParam) == SB_PAGELEFT ? "PAGELEFT" :
2280                                 (LOWORD (msg->wParam) == SB_PAGERIGHT ? "PAGERIGHT" :
2281                                  (LOWORD (msg->wParam) == SB_THUMBPOSITION ? "THUMBPOSITION" :
2282                                   (LOWORD (msg->wParam) == SB_THUMBTRACK ? "THUMBTRACK" :
2283                                    "???")))))))))),
2284                  (LOWORD (msg->wParam) == SB_THUMBPOSITION ||
2285                   LOWORD (msg->wParam) == SB_THUMBTRACK) ?
2286                  (g_print (" %d", HIWORD (msg->wParam)), 0) : 0));
2287       break;
2288
2289     case WM_VSCROLL:
2290       /* Just print more debugging information, don't actually handle it. */
2291       GDK_NOTE (EVENTS,
2292                 (g_print (" %s",
2293                           (LOWORD (msg->wParam) == SB_ENDSCROLL ? "ENDSCROLL" :
2294                            (LOWORD (msg->wParam) == SB_BOTTOM ? "BOTTOM" :
2295                             (LOWORD (msg->wParam) == SB_TOP ? "TOP" :
2296                              (LOWORD (msg->wParam) == SB_LINEDOWN ? "LINDOWN" :
2297                               (LOWORD (msg->wParam) == SB_LINEUP ? "LINEUP" :
2298                                (LOWORD (msg->wParam) == SB_PAGEDOWN ? "PAGEDOWN" :
2299                                 (LOWORD (msg->wParam) == SB_PAGEUP ? "PAGEUP" :
2300                                  (LOWORD (msg->wParam) == SB_THUMBPOSITION ? "THUMBPOSITION" :
2301                                   (LOWORD (msg->wParam) == SB_THUMBTRACK ? "THUMBTRACK" :
2302                                    "???")))))))))),
2303                  (LOWORD (msg->wParam) == SB_THUMBPOSITION ||
2304                   LOWORD (msg->wParam) == SB_THUMBTRACK) ?
2305                  (g_print (" %d", HIWORD (msg->wParam)), 0) : 0));
2306       break;
2307
2308      case WM_MOUSEACTIVATE:
2309        {
2310          GdkWindow *tmp;
2311
2312          if (gdk_window_get_window_type (window) == GDK_WINDOW_TEMP
2313              || !window->accept_focus)
2314            {
2315              *ret_valp = MA_NOACTIVATE;
2316              return_val = TRUE;
2317            }
2318
2319          tmp = _gdk_modal_current ();
2320
2321          if (tmp != NULL)
2322            {
2323              if (gdk_window_get_toplevel (window) != tmp)
2324                {
2325                  *ret_valp = MA_NOACTIVATEANDEAT;
2326                  return_val = TRUE;
2327                }
2328            }
2329        }
2330
2331        break;
2332
2333     case WM_KILLFOCUS:
2334       if (keyboard_grab != NULL &&
2335           !GDK_WINDOW_DESTROYED (keyboard_grab->window))
2336         {
2337           generate_grab_broken_event (device_manager, keyboard_grab->window, TRUE, NULL);
2338         }
2339
2340       /* fallthrough */
2341     case WM_SETFOCUS:
2342       if (keyboard_grab != NULL &&
2343           !keyboard_grab->owner_events)
2344         break;
2345
2346       if (!(window->event_mask & GDK_FOCUS_CHANGE_MASK))
2347         break;
2348
2349       if (GDK_WINDOW_DESTROYED (window))
2350         break;
2351
2352       generate_focus_event (device_manager, window, (msg->message == WM_SETFOCUS));
2353       return_val = TRUE;
2354       break;
2355
2356     case WM_ERASEBKGND:
2357       GDK_NOTE (EVENTS, g_print (" %p", (HANDLE) msg->wParam));
2358
2359       if (GDK_WINDOW_DESTROYED (window))
2360         break;
2361
2362       return_val = TRUE;
2363       *ret_valp = 1;
2364       break;
2365
2366     case WM_SYNCPAINT:
2367       sync_timer = SetTimer (GDK_WINDOW_HWND (window),
2368                              1,
2369                              200, sync_timer_proc);
2370       break;
2371
2372     case WM_PAINT:
2373       handle_wm_paint (msg, window, FALSE, NULL);
2374       break;
2375
2376     case WM_SETCURSOR:
2377       GDK_NOTE (EVENTS, g_print (" %#x %#x",
2378                                  LOWORD (msg->lParam), HIWORD (msg->lParam)));
2379
2380       if (pointer_grab != NULL)
2381         grab_window = pointer_grab->window;
2382
2383       if (grab_window == NULL && LOWORD (msg->lParam) != HTCLIENT)
2384         break;
2385
2386       if (grab_window != NULL && p_grab_cursor != NULL)
2387         hcursor = p_grab_cursor;
2388       else if (!GDK_WINDOW_DESTROYED (window))
2389         hcursor = GDK_WINDOW_IMPL_WIN32 (window->impl)->hcursor;
2390       else
2391         hcursor = NULL;
2392
2393       if (hcursor != NULL)
2394         {
2395           GDK_NOTE (EVENTS, g_print (" (SetCursor(%p)", hcursor));
2396           SetCursor (hcursor);
2397           return_val = TRUE;
2398           *ret_valp = TRUE;
2399         }
2400       break;
2401
2402     case WM_SHOWWINDOW:
2403       GDK_NOTE (EVENTS, g_print (" %s %s",
2404                                  (msg->wParam ? "YES" : "NO"),
2405                                  (msg->lParam == 0 ? "ShowWindow" :
2406                                   (msg->lParam == SW_OTHERUNZOOM ? "OTHERUNZOOM" :
2407                                    (msg->lParam == SW_OTHERZOOM ? "OTHERZOOM" :
2408                                     (msg->lParam == SW_PARENTCLOSING ? "PARENTCLOSING" :
2409                                      (msg->lParam == SW_PARENTOPENING ? "PARENTOPENING" :
2410                                       "???")))))));
2411
2412       if (!(window->event_mask & GDK_STRUCTURE_MASK))
2413         break;
2414
2415       if (msg->lParam == SW_OTHERUNZOOM ||
2416           msg->lParam == SW_OTHERZOOM)
2417         break;
2418
2419       if (GDK_WINDOW_DESTROYED (window))
2420         break;
2421
2422       event = gdk_event_new (msg->wParam ? GDK_MAP : GDK_UNMAP);
2423       event->any.window = window;
2424
2425       append_event (event);
2426
2427       if (event->any.type == GDK_UNMAP)
2428         {
2429           impl = GDK_WINDOW_IMPL_WIN32 (window->impl);
2430
2431           if (impl->transient_owner && GetForegroundWindow () == GDK_WINDOW_HWND (window))
2432             {
2433               SetForegroundWindow (GDK_WINDOW_HWND (impl->transient_owner));
2434             }
2435
2436           if (pointer_grab != NULL)
2437             {
2438               if (pointer_grab->window == window)
2439                 gdk_pointer_ungrab (msg->time);
2440             }
2441
2442           if (keyboard_grab &&
2443         keyboard_grab->window == window)
2444             gdk_keyboard_ungrab (msg->time);
2445         }
2446
2447       return_val = TRUE;
2448       break;
2449
2450     case WM_SYSCOMMAND:
2451       switch (msg->wParam)
2452         {
2453         case SC_MINIMIZE:
2454         case SC_RESTORE:
2455           do_show_window (window, msg->wParam == SC_MINIMIZE ? TRUE : FALSE);
2456           break;
2457         }
2458
2459       break;
2460
2461     case WM_SIZE:
2462       GDK_NOTE (EVENTS,
2463                 g_print (" %s %dx%d",
2464                          (msg->wParam == SIZE_MAXHIDE ? "MAXHIDE" :
2465                           (msg->wParam == SIZE_MAXIMIZED ? "MAXIMIZED" :
2466                            (msg->wParam == SIZE_MAXSHOW ? "MAXSHOW" :
2467                             (msg->wParam == SIZE_MINIMIZED ? "MINIMIZED" :
2468                              (msg->wParam == SIZE_RESTORED ? "RESTORED" : "?"))))),
2469                          LOWORD (msg->lParam), HIWORD (msg->lParam)));
2470
2471       if (msg->wParam == SIZE_MINIMIZED)
2472         {
2473           /* Don't generate any GDK event. This is *not* an UNMAP. */
2474           if (pointer_grab != NULL)
2475             {
2476               if (pointer_grab->window == window)
2477                 gdk_pointer_ungrab (msg->time);
2478             }
2479           if (keyboard_grab &&
2480         keyboard_grab->window == window)
2481             gdk_keyboard_ungrab (msg->time);
2482
2483           gdk_synthesize_window_state (window,
2484                                        GDK_WINDOW_STATE_WITHDRAWN,
2485                                        GDK_WINDOW_STATE_ICONIFIED);
2486           do_show_window (window, TRUE);
2487         }
2488       else if ((msg->wParam == SIZE_RESTORED ||
2489                 msg->wParam == SIZE_MAXIMIZED) &&
2490                GDK_WINDOW_TYPE (window) != GDK_WINDOW_CHILD)
2491         {
2492           GdkWindowState withdrawn_bit =
2493             IsWindowVisible (msg->hwnd) ? GDK_WINDOW_STATE_WITHDRAWN : 0;
2494
2495           if (window->state & GDK_WINDOW_STATE_ICONIFIED)
2496             ensure_stacking_on_unminimize (msg);
2497
2498           if (!GDK_WINDOW_DESTROYED (window))
2499             handle_configure_event (msg, window);
2500
2501           if (msg->wParam == SIZE_RESTORED)
2502             {
2503               gdk_synthesize_window_state (window,
2504                                            GDK_WINDOW_STATE_ICONIFIED |
2505                                            GDK_WINDOW_STATE_MAXIMIZED |
2506                                            withdrawn_bit,
2507                                            0);
2508
2509               if (GDK_WINDOW_TYPE (window) != GDK_WINDOW_TEMP && !GDK_WINDOW_IS_MAPPED (window))
2510                 {
2511                   do_show_window (window, FALSE);
2512                 }
2513             }
2514           else if (msg->wParam == SIZE_MAXIMIZED)
2515             {
2516               gdk_synthesize_window_state (window,
2517                                            GDK_WINDOW_STATE_ICONIFIED |
2518                                            withdrawn_bit,
2519                                            GDK_WINDOW_STATE_MAXIMIZED);
2520             }
2521
2522           if (window->resize_count > 1)
2523             window->resize_count -= 1;
2524
2525           if (window->extension_events != 0)
2526       _gdk_device_wintab_update_window_coords (window);
2527
2528           return_val = TRUE;
2529         }
2530       break;
2531
2532     case WM_ENTERSIZEMOVE:
2533     case WM_ENTERMENULOOP:
2534       _gdk_win32_begin_modal_call ();
2535       break;
2536
2537     case WM_EXITSIZEMOVE:
2538     case WM_EXITMENULOOP:
2539       _gdk_win32_end_modal_call ();
2540       break;
2541
2542     case WM_WINDOWPOSCHANGING:
2543       GDK_NOTE (EVENTS, (windowpos = (WINDOWPOS *) msg->lParam,
2544                          g_print (" %s %s %dx%d@%+d%+d now below %p",
2545                                   _gdk_win32_window_pos_bits_to_string (windowpos->flags),
2546                                   (windowpos->hwndInsertAfter == HWND_BOTTOM ? "BOTTOM" :
2547                                    (windowpos->hwndInsertAfter == HWND_NOTOPMOST ? "NOTOPMOST" :
2548                                     (windowpos->hwndInsertAfter == HWND_TOP ? "TOP" :
2549                                      (windowpos->hwndInsertAfter == HWND_TOPMOST ? "TOPMOST" :
2550                                       (sprintf (buf, "%p", windowpos->hwndInsertAfter),
2551                                        buf))))),
2552                                   windowpos->cx, windowpos->cy, windowpos->x, windowpos->y,
2553                                   GetNextWindow (msg->hwnd, GW_HWNDPREV))));
2554
2555       if (GDK_WINDOW_IS_MAPPED (window))
2556         return_val = ensure_stacking_on_window_pos_changing (msg, window);
2557       break;
2558
2559     case WM_WINDOWPOSCHANGED:
2560       windowpos = (WINDOWPOS *) msg->lParam;
2561       GDK_NOTE (EVENTS, g_print (" %s %s %dx%d@%+d%+d",
2562                                  _gdk_win32_window_pos_bits_to_string (windowpos->flags),
2563                                  (windowpos->hwndInsertAfter == HWND_BOTTOM ? "BOTTOM" :
2564                                   (windowpos->hwndInsertAfter == HWND_NOTOPMOST ? "NOTOPMOST" :
2565                                    (windowpos->hwndInsertAfter == HWND_TOP ? "TOP" :
2566                                     (windowpos->hwndInsertAfter == HWND_TOPMOST ? "TOPMOST" :
2567                                      (sprintf (buf, "%p", windowpos->hwndInsertAfter),
2568                                       buf))))),
2569                                  windowpos->cx, windowpos->cy, windowpos->x, windowpos->y));
2570
2571       /* If position and size haven't changed, don't do anything */
2572       if (_modal_operation_in_progress &&
2573           (windowpos->flags & SWP_NOMOVE) &&
2574           (windowpos->flags & SWP_NOSIZE))
2575         break;
2576
2577       /* Once we've entered the moving or sizing modal loop, we won't
2578        * return to the main loop until we're done sizing or moving.
2579        */
2580       if (_modal_operation_in_progress &&
2581          GDK_WINDOW_TYPE (window) != GDK_WINDOW_CHILD &&
2582          !GDK_WINDOW_DESTROYED (window))
2583         {
2584           if (window->event_mask & GDK_STRUCTURE_MASK)
2585             {
2586               GDK_NOTE (EVENTS, g_print (" do magic"));
2587               if (window->resize_count > 1)
2588                 window->resize_count -= 1;
2589
2590               handle_configure_event (msg, window);
2591               g_main_context_iteration (NULL, FALSE);
2592 #if 0
2593               /* Dispatch main loop - to realize resizes... */
2594               modal_timer_proc (msg->hwnd, msg->message, 0, msg->time);
2595 #endif
2596               /* Claim as handled, so that WM_SIZE and WM_MOVE are avoided */
2597               return_val = TRUE;
2598               *ret_valp = 1;
2599             }
2600         }
2601       break;
2602
2603     case WM_SIZING:
2604       GetWindowRect (GDK_WINDOW_HWND (window), &rect);
2605       drag = (RECT *) msg->lParam;
2606       GDK_NOTE (EVENTS, g_print (" %s curr:%s drag:%s",
2607                                  (msg->wParam == WMSZ_BOTTOM ? "BOTTOM" :
2608                                   (msg->wParam == WMSZ_BOTTOMLEFT ? "BOTTOMLEFT" :
2609                                    (msg->wParam == WMSZ_LEFT ? "LEFT" :
2610                                     (msg->wParam == WMSZ_TOPLEFT ? "TOPLEFT" :
2611                                      (msg->wParam == WMSZ_TOP ? "TOP" :
2612                                       (msg->wParam == WMSZ_TOPRIGHT ? "TOPRIGHT" :
2613                                        (msg->wParam == WMSZ_RIGHT ? "RIGHT" :
2614
2615                                         (msg->wParam == WMSZ_BOTTOMRIGHT ? "BOTTOMRIGHT" :
2616                                          "???")))))))),
2617                                  _gdk_win32_rect_to_string (&rect),
2618                                  _gdk_win32_rect_to_string (drag)));
2619
2620       impl = GDK_WINDOW_IMPL_WIN32 (window->impl);
2621       orig_drag = *drag;
2622       if (impl->hint_flags & GDK_HINT_RESIZE_INC)
2623         {
2624           GDK_NOTE (EVENTS, g_print (" (RESIZE_INC)"));
2625           if (impl->hint_flags & GDK_HINT_BASE_SIZE)
2626             {
2627               /* Resize in increments relative to the base size */
2628               rect.left = rect.top = 0;
2629               rect.right = impl->hints.base_width;
2630               rect.bottom = impl->hints.base_height;
2631               _gdk_win32_adjust_client_rect (window, &rect);
2632               point.x = rect.left;
2633               point.y = rect.top;
2634               ClientToScreen (GDK_WINDOW_HWND (window), &point);
2635               rect.left = point.x;
2636               rect.top = point.y;
2637               point.x = rect.right;
2638               point.y = rect.bottom;
2639               ClientToScreen (GDK_WINDOW_HWND (window), &point);
2640               rect.right = point.x;
2641               rect.bottom = point.y;
2642
2643               GDK_NOTE (EVENTS, g_print (" (also BASE_SIZE, using %s)",
2644                                          _gdk_win32_rect_to_string (&rect)));
2645             }
2646
2647           switch (msg->wParam)
2648             {
2649             case WMSZ_BOTTOM:
2650               if (drag->bottom == rect.bottom)
2651                 break;
2652               adjust_drag (&drag->bottom, rect.bottom, impl->hints.height_inc);
2653               break;
2654
2655             case WMSZ_BOTTOMLEFT:
2656               if (drag->bottom == rect.bottom && drag->left == rect.left)
2657                 break;
2658               adjust_drag (&drag->bottom, rect.bottom, impl->hints.height_inc);
2659               adjust_drag (&drag->left, rect.left, impl->hints.width_inc);
2660               break;
2661
2662             case WMSZ_LEFT:
2663               if (drag->left == rect.left)
2664                 break;
2665               adjust_drag (&drag->left, rect.left, impl->hints.width_inc);
2666               break;
2667
2668             case WMSZ_TOPLEFT:
2669               if (drag->top == rect.top && drag->left == rect.left)
2670                 break;
2671               adjust_drag (&drag->top, rect.top, impl->hints.height_inc);
2672               adjust_drag (&drag->left, rect.left, impl->hints.width_inc);
2673               break;
2674
2675             case WMSZ_TOP:
2676               if (drag->top == rect.top)
2677                 break;
2678               adjust_drag (&drag->top, rect.top, impl->hints.height_inc);
2679               break;
2680
2681             case WMSZ_TOPRIGHT:
2682               if (drag->top == rect.top && drag->right == rect.right)
2683                 break;
2684               adjust_drag (&drag->top, rect.top, impl->hints.height_inc);
2685               adjust_drag (&drag->right, rect.right, impl->hints.width_inc);
2686               break;
2687
2688             case WMSZ_RIGHT:
2689               if (drag->right == rect.right)
2690                 break;
2691               adjust_drag (&drag->right, rect.right, impl->hints.width_inc);
2692               break;
2693
2694             case WMSZ_BOTTOMRIGHT:
2695               if (drag->bottom == rect.bottom && drag->right == rect.right)
2696                 break;
2697               adjust_drag (&drag->bottom, rect.bottom, impl->hints.height_inc);
2698               adjust_drag (&drag->right, rect.right, impl->hints.width_inc);
2699               break;
2700             }
2701
2702           if (drag->bottom != orig_drag.bottom || drag->left != orig_drag.left ||
2703               drag->top != orig_drag.top || drag->right != orig_drag.right)
2704             {
2705               *ret_valp = TRUE;
2706               return_val = TRUE;
2707               GDK_NOTE (EVENTS, g_print (" (handled RESIZE_INC: %s)",
2708                                          _gdk_win32_rect_to_string (drag)));
2709             }
2710         }
2711
2712       /* WM_GETMINMAXINFO handles min_size and max_size hints? */
2713
2714       if (impl->hint_flags & GDK_HINT_ASPECT)
2715         {
2716           RECT decorated_rect;
2717           RECT undecorated_drag;
2718           int decoration_width, decoration_height;
2719           gdouble drag_aspect;
2720           int drag_width, drag_height, new_width, new_height;
2721
2722           GetClientRect (GDK_WINDOW_HWND (window), &rect);
2723           decorated_rect = rect;
2724           _gdk_win32_adjust_client_rect (window, &decorated_rect);
2725
2726           /* Set undecorated_drag to the client area being dragged
2727            * out, in screen coordinates.
2728            */
2729           undecorated_drag = *drag;
2730           undecorated_drag.left -= decorated_rect.left - rect.left;
2731           undecorated_drag.right -= decorated_rect.right - rect.right;
2732           undecorated_drag.top -= decorated_rect.top - rect.top;
2733           undecorated_drag.bottom -= decorated_rect.bottom - rect.bottom;
2734
2735           decoration_width = (decorated_rect.right - decorated_rect.left) - (rect.right - rect.left);
2736           decoration_height = (decorated_rect.bottom - decorated_rect.top) - (rect.bottom - rect.top);
2737
2738           drag_width = undecorated_drag.right - undecorated_drag.left;
2739           drag_height = undecorated_drag.bottom - undecorated_drag.top;
2740
2741           drag_aspect = (gdouble) drag_width / drag_height;
2742
2743           GDK_NOTE (EVENTS, g_print (" (ASPECT:%g--%g curr: %g)",
2744                                      impl->hints.min_aspect, impl->hints.max_aspect, drag_aspect));
2745
2746           if (drag_aspect < impl->hints.min_aspect)
2747             {
2748               /* Aspect is getting too narrow */
2749               switch (msg->wParam)
2750                 {
2751                 case WMSZ_BOTTOM:
2752                 case WMSZ_TOP:
2753                   /* User drags top or bottom edge outward. Keep height, increase width. */
2754                   new_width = impl->hints.min_aspect * drag_height;
2755                   drag->left -= (new_width - drag_width) / 2;
2756                   drag->right = drag->left + new_width + decoration_width;
2757                   break;
2758                 case WMSZ_BOTTOMLEFT:
2759                 case WMSZ_BOTTOMRIGHT:
2760                   /* User drags bottom-left or bottom-right corner down. Adjust height. */
2761                   new_height = drag_width / impl->hints.min_aspect;
2762                   drag->bottom = drag->top + new_height + decoration_height;
2763                   break;
2764                 case WMSZ_LEFT:
2765                 case WMSZ_RIGHT:
2766                   /* User drags left or right edge inward. Decrease height */
2767                   new_height = drag_width / impl->hints.min_aspect;
2768                   drag->top += (drag_height - new_height) / 2;
2769                   drag->bottom = drag->top + new_height + decoration_height;
2770                   break;
2771                 case WMSZ_TOPLEFT:
2772                 case WMSZ_TOPRIGHT:
2773                   /* User drags top-left or top-right corner up. Adjust height. */
2774                   new_height = drag_width / impl->hints.min_aspect;
2775                   drag->top = drag->bottom - new_height - decoration_height;
2776                 }
2777             }
2778           else if (drag_aspect > impl->hints.max_aspect)
2779             {
2780               /* Aspect is getting too wide */
2781               switch (msg->wParam)
2782                 {
2783                 case WMSZ_BOTTOM:
2784                 case WMSZ_TOP:
2785                   /* User drags top or bottom edge inward. Decrease width. */
2786                   new_width = impl->hints.max_aspect * drag_height;
2787                   drag->left += (drag_width - new_width) / 2;
2788                   drag->right = drag->left + new_width + decoration_width;
2789                   break;
2790                 case WMSZ_BOTTOMLEFT:
2791                 case WMSZ_TOPLEFT:
2792                   /* User drags bottom-left or top-left corner left. Adjust width. */
2793                   new_width = impl->hints.max_aspect * drag_height;
2794                   drag->left = drag->right - new_width - decoration_width;
2795                   break;
2796                 case WMSZ_BOTTOMRIGHT:
2797                 case WMSZ_TOPRIGHT:
2798                   /* User drags bottom-right or top-right corner right. Adjust width. */
2799                   new_width = impl->hints.max_aspect * drag_height;
2800                   drag->right = drag->left + new_width + decoration_width;
2801                   break;
2802                 case WMSZ_LEFT:
2803                 case WMSZ_RIGHT:
2804                   /* User drags left or right edge outward. Increase height. */
2805                   new_height = drag_width / impl->hints.max_aspect;
2806                   drag->top -= (new_height - drag_height) / 2;
2807                   drag->bottom = drag->top + new_height + decoration_height;
2808                   break;
2809                 }
2810             }
2811
2812           *ret_valp = TRUE;
2813           return_val = TRUE;
2814           GDK_NOTE (EVENTS, g_print (" (handled ASPECT: %s)",
2815                                      _gdk_win32_rect_to_string (drag)));
2816         }
2817       break;
2818
2819     case WM_GETMINMAXINFO:
2820       if (GDK_WINDOW_DESTROYED (window))
2821         break;
2822
2823       impl = GDK_WINDOW_IMPL_WIN32 (window->impl);
2824       mmi = (MINMAXINFO*) msg->lParam;
2825       GDK_NOTE (EVENTS, g_print (" (mintrack:%ldx%ld maxtrack:%ldx%ld "
2826                                  "maxpos:%+ld%+ld maxsize:%ldx%ld)",
2827                                  mmi->ptMinTrackSize.x, mmi->ptMinTrackSize.y,
2828                                  mmi->ptMaxTrackSize.x, mmi->ptMaxTrackSize.y,
2829                                  mmi->ptMaxPosition.x, mmi->ptMaxPosition.y,
2830                                  mmi->ptMaxSize.x, mmi->ptMaxSize.y));
2831
2832       if (impl->hint_flags & GDK_HINT_MIN_SIZE)
2833         {
2834           rect.left = rect.top = 0;
2835           rect.right = impl->hints.min_width;
2836           rect.bottom = impl->hints.min_height;
2837
2838           _gdk_win32_adjust_client_rect (window, &rect);
2839
2840           mmi->ptMinTrackSize.x = rect.right - rect.left;
2841           mmi->ptMinTrackSize.y = rect.bottom - rect.top;
2842         }
2843
2844       if (impl->hint_flags & GDK_HINT_MAX_SIZE)
2845         {
2846           int maxw, maxh;
2847
2848           rect.left = rect.top = 0;
2849           rect.right = impl->hints.max_width;
2850           rect.bottom = impl->hints.max_height;
2851
2852           _gdk_win32_adjust_client_rect (window, &rect);
2853
2854           /* at least on win9x we have the 16 bit trouble */
2855           maxw = rect.right - rect.left;
2856           maxh = rect.bottom - rect.top;
2857           mmi->ptMaxTrackSize.x = maxw > 0 && maxw < G_MAXSHORT ? maxw : G_MAXSHORT;
2858           mmi->ptMaxTrackSize.y = maxh > 0 && maxh < G_MAXSHORT ? maxh : G_MAXSHORT;
2859         }
2860
2861       if (impl->hint_flags & (GDK_HINT_MIN_SIZE | GDK_HINT_MAX_SIZE))
2862         {
2863           /* Don't call DefWindowProcW() */
2864           GDK_NOTE (EVENTS, g_print (" (handled, mintrack:%ldx%ld maxtrack:%ldx%ld "
2865                                      "maxpos:%+ld%+ld maxsize:%ldx%ld)",
2866                                      mmi->ptMinTrackSize.x, mmi->ptMinTrackSize.y,
2867                                      mmi->ptMaxTrackSize.x, mmi->ptMaxTrackSize.y,
2868                                      mmi->ptMaxPosition.x, mmi->ptMaxPosition.y,
2869                                      mmi->ptMaxSize.x, mmi->ptMaxSize.y));
2870           return_val = TRUE;
2871         }
2872       break;
2873
2874     case WM_MOVE:
2875       GDK_NOTE (EVENTS, g_print (" (%d,%d)",
2876                                  GET_X_LPARAM (msg->lParam), GET_Y_LPARAM (msg->lParam)));
2877
2878       if (GDK_WINDOW_TYPE (window) != GDK_WINDOW_CHILD &&
2879           !IsIconic (msg->hwnd))
2880         {
2881           if (!GDK_WINDOW_DESTROYED (window))
2882             handle_configure_event (msg, window);
2883
2884           return_val = TRUE;
2885         }
2886       break;
2887
2888     case WM_CLOSE:
2889       if (GDK_WINDOW_DESTROYED (window))
2890         break;
2891
2892       event = gdk_event_new (GDK_DELETE);
2893       event->any.window = window;
2894
2895       append_event (event);
2896
2897       impl = GDK_WINDOW_IMPL_WIN32 (window->impl);
2898
2899       if (impl->transient_owner && GetForegroundWindow() == GDK_WINDOW_HWND (window))
2900         {
2901           SetForegroundWindow (GDK_WINDOW_HWND (impl->transient_owner));
2902         }
2903
2904       return_val = TRUE;
2905       break;
2906
2907     case WM_DESTROY:
2908       if (pointer_grab != NULL)
2909         {
2910           if (pointer_grab->window == window)
2911             gdk_pointer_ungrab (msg->time);
2912         }
2913
2914       if (keyboard_grab &&
2915           keyboard_grab->window == window)
2916         gdk_keyboard_ungrab (msg->time);
2917
2918       if ((window != NULL) && (msg->hwnd != GetDesktopWindow ()))
2919         gdk_window_destroy_notify (window);
2920
2921       if (window == NULL || GDK_WINDOW_DESTROYED (window))
2922         break;
2923
2924       event = gdk_event_new (GDK_DESTROY);
2925       event->any.window = window;
2926
2927       append_event (event);
2928
2929       return_val = TRUE;
2930       break;
2931
2932     case WM_DISPLAYCHANGE:
2933       handle_display_change ();
2934       break;
2935
2936     case WM_DESTROYCLIPBOARD:
2937       if (!_ignore_destroy_clipboard)
2938         {
2939           event = gdk_event_new (GDK_SELECTION_CLEAR);
2940           event->selection.window = window;
2941           event->selection.selection = GDK_SELECTION_CLIPBOARD;
2942           event->selection.time = _gdk_win32_get_next_tick (msg->time);
2943           append_event (event);
2944         }
2945       else
2946         {
2947           return_val = TRUE;
2948         }
2949
2950       break;
2951
2952     case WM_RENDERFORMAT:
2953       GDK_NOTE (EVENTS, g_print (" %s", _gdk_win32_cf_to_string (msg->wParam)));
2954
2955       if (!(target = g_hash_table_lookup (_format_atom_table, GINT_TO_POINTER (msg->wParam))))
2956         {
2957           GDK_NOTE (EVENTS, g_print (" (target not found)"));
2958           return_val = TRUE;
2959           break;
2960         }
2961
2962       /* We need to render to clipboard immediately, don't call
2963        * append_event()
2964        */
2965       event = gdk_event_new (GDK_SELECTION_REQUEST);
2966       event->selection.window = window;
2967       event->selection.send_event = FALSE;
2968       event->selection.selection = GDK_SELECTION_CLIPBOARD;
2969       event->selection.target = target;
2970       event->selection.property = _gdk_selection;
2971       event->selection.requestor = gdk_win32_handle_table_lookup (msg->hwnd);
2972       event->selection.time = msg->time;
2973
2974       fixup_event (event);
2975       GDK_NOTE (EVENTS, g_print (" (calling _gdk_event_emit)"));
2976       GDK_NOTE (EVENTS, _gdk_win32_print_event (event));
2977       _gdk_event_emit (event);
2978       gdk_event_free (event);
2979
2980       /* Now the clipboard owner should have rendered */
2981       if (!_delayed_rendering_data)
2982         {
2983           GDK_NOTE (EVENTS, g_print (" (no _delayed_rendering_data?)"));
2984         }
2985       else
2986         {
2987           if (msg->wParam == CF_DIB)
2988             {
2989               _delayed_rendering_data =
2990                 _gdk_win32_selection_convert_to_dib (_delayed_rendering_data,
2991                                                      target);
2992               if (!_delayed_rendering_data)
2993                 {
2994                   g_warning ("Cannot convert to DIB from delayed rendered image");
2995                   break;
2996                 }
2997             }
2998
2999           /* The requestor is holding the clipboard, no
3000            * OpenClipboard() is required/possible
3001            */
3002           GDK_NOTE (DND,
3003                     g_print (" SetClipboardData(%s,%p)",
3004                              _gdk_win32_cf_to_string (msg->wParam),
3005                              _delayed_rendering_data));
3006
3007           API_CALL (SetClipboardData, (msg->wParam, _delayed_rendering_data));
3008           _delayed_rendering_data = NULL;
3009         }
3010       break;
3011
3012     case WM_ACTIVATE:
3013       GDK_NOTE (EVENTS, g_print (" %s%s %p",
3014                                  (LOWORD (msg->wParam) == WA_ACTIVE ? "ACTIVE" :
3015                                   (LOWORD (msg->wParam) == WA_CLICKACTIVE ? "CLICKACTIVE" :
3016                                    (LOWORD (msg->wParam) == WA_INACTIVE ? "INACTIVE" : "???"))),
3017                                  HIWORD (msg->wParam) ? " minimized" : "",
3018                                  (HWND) msg->lParam));
3019       /* We handle mouse clicks for modally-blocked windows under WM_MOUSEACTIVATE,
3020        * but we still need to deal with alt-tab, or with SetActiveWindow() type
3021        * situations.
3022        */
3023       if (is_modally_blocked (window) && LOWORD (msg->wParam) == WA_ACTIVE)
3024         {
3025           GdkWindow *modal_current = _gdk_modal_current ();
3026           SetActiveWindow (GDK_WINDOW_HWND (modal_current));
3027           *ret_valp = 0;
3028           return_val = TRUE;
3029           break;
3030         }
3031
3032       /* Bring any tablet contexts to the top of the overlap order when
3033        * one of our windows is activated.
3034        * NOTE: It doesn't seem to work well if it is done in WM_ACTIVATEAPP
3035        * instead
3036        */
3037       if (LOWORD(msg->wParam) != WA_INACTIVE)
3038         _gdk_input_set_tablet_active ();
3039       break;
3040
3041     case WM_ACTIVATEAPP:
3042       GDK_NOTE (EVENTS, g_print (" %s thread: %I64d",
3043                                  msg->wParam ? "YES" : "NO",
3044                                  (gint64) msg->lParam));
3045       if (msg->wParam && GDK_WINDOW_IS_MAPPED (window))
3046         ensure_stacking_on_activate_app (msg, window);
3047       break;
3048
3049       /* Handle WINTAB events here, as we know that gdkinput.c will
3050        * use the fixed WT_DEFBASE as lcMsgBase, and we thus can use the
3051        * constants as case labels.
3052        */
3053     case WT_PACKET:
3054       GDK_NOTE (EVENTS, g_print (" %d %p",
3055                                  (int) msg->wParam, (gpointer) msg->lParam));
3056       goto wintab;
3057
3058     case WT_CSRCHANGE:
3059       GDK_NOTE (EVENTS, g_print (" %d %p",
3060                                  (int) msg->wParam, (gpointer) msg->lParam));
3061       goto wintab;
3062
3063     case WT_PROXIMITY:
3064       GDK_NOTE (EVENTS, g_print (" %p %d %d",
3065                                  (gpointer) msg->wParam,
3066                                  LOWORD (msg->lParam),
3067                                  HIWORD (msg->lParam)));
3068       /* Fall through */
3069     wintab:
3070
3071       event = gdk_event_new (GDK_NOTHING);
3072       event->any.window = window;
3073       g_object_ref (window);
3074
3075       if (_gdk_input_other_event (event, msg, window))
3076         append_event (event);
3077       else
3078         gdk_event_free (event);
3079
3080       break;
3081     }
3082
3083 done:
3084
3085   if (window)
3086     g_object_unref (window);
3087
3088 #undef return
3089   return return_val;
3090 }
3091
3092 void
3093 _gdk_win32_display_queue_events (GdkDisplay *display)
3094 {
3095   MSG msg;
3096
3097   if (modal_win32_dialog != NULL)
3098     return;
3099
3100   while (!_gdk_event_queue_find_first (display) &&
3101          PeekMessageW (&msg, NULL, 0, 0, PM_REMOVE))
3102     {
3103       TranslateMessage (&msg);
3104       DispatchMessageW (&msg);
3105     }
3106 }
3107
3108 static gboolean
3109 gdk_event_prepare (GSource *source,
3110                    gint    *timeout)
3111 {
3112   MSG msg;
3113   gboolean retval;
3114
3115   GDK_THREADS_ENTER ();
3116
3117   *timeout = -1;
3118
3119   retval = (_gdk_event_queue_find_first (_gdk_display) != NULL ||
3120             (modal_win32_dialog == NULL &&
3121              PeekMessageW (&msg, NULL, 0, 0, PM_NOREMOVE)));
3122
3123   GDK_THREADS_LEAVE ();
3124
3125   return retval;
3126 }
3127
3128 static gboolean
3129 gdk_event_check (GSource *source)
3130 {
3131   MSG msg;
3132   gboolean retval;
3133
3134   GDK_THREADS_ENTER ();
3135
3136   if (event_poll_fd.revents & G_IO_IN)
3137     {
3138       retval = (_gdk_event_queue_find_first (_gdk_display) != NULL ||
3139                 (modal_win32_dialog == NULL &&
3140                  PeekMessageW (&msg, NULL, 0, 0, PM_NOREMOVE)));
3141     }
3142   else
3143     {
3144       retval = FALSE;
3145     }
3146
3147   GDK_THREADS_LEAVE ();
3148
3149   return retval;
3150 }
3151
3152 static gboolean
3153 gdk_event_dispatch (GSource     *source,
3154                     GSourceFunc  callback,
3155                     gpointer     user_data)
3156 {
3157   GdkEvent *event;
3158
3159   GDK_THREADS_ENTER ();
3160
3161   _gdk_win32_display_queue_events (_gdk_display);
3162   event = _gdk_event_unqueue (_gdk_display);
3163
3164   if (event)
3165     {
3166       _gdk_event_emit (event);
3167
3168       gdk_event_free (event);
3169
3170       /* Do drag & drop if it is still pending */
3171       if (_dnd_source_state == GDK_WIN32_DND_PENDING)
3172         {
3173           _dnd_source_state = GDK_WIN32_DND_DRAGGING;
3174           _gdk_win32_dnd_do_dragdrop ();
3175           _dnd_source_state = GDK_WIN32_DND_NONE;
3176         }
3177     }
3178
3179   GDK_THREADS_LEAVE ();
3180
3181   return TRUE;
3182 }
3183
3184 void
3185 gdk_win32_set_modal_dialog_libgtk_only (HWND window)
3186 {
3187   modal_win32_dialog = window;
3188 }
3189
3190 static gboolean
3191 is_modally_blocked (GdkWindow *window)
3192 {
3193   GdkWindow *modal_current = _gdk_modal_current ();
3194   return modal_current != NULL ? gdk_window_get_toplevel (window) != modal_current : FALSE;
3195 }
3196
3197 void
3198 _gdk_win32_display_sync (GdkDisplay * display)
3199 {
3200   MSG msg;
3201
3202   g_return_if_fail (display == _gdk_display);
3203
3204   /* Process all messages currently available */
3205   while (PeekMessageW (&msg, NULL, 0, 0, PM_REMOVE))
3206     DispatchMessageW (&msg);
3207 }
3208