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

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