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