Merge branch 'backport' into work
[dana/openbox.git] / openbox / event.c
1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
2
3    event.c for the Openbox window manager
4    Copyright (c) 2006        Mikael Magnusson
5    Copyright (c) 2003-2007   Dana Jansens
6
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    See the COPYING file for a copy of the GNU General Public License.
18 */
19
20 #include "event.h"
21 #include "debug.h"
22 #include "window.h"
23 #include "openbox.h"
24 #include "dock.h"
25 #include "actions.h"
26 #include "client.h"
27 #include "config.h"
28 #include "screen.h"
29 #include "frame.h"
30 #include "grab.h"
31 #include "menu.h"
32 #include "prompt.h"
33 #include "menuframe.h"
34 #include "keyboard.h"
35 #include "mouse.h"
36 #include "focus.h"
37 #include "focus_cycle.h"
38 #include "moveresize.h"
39 #include "group.h"
40 #include "stacking.h"
41 #include "ping.h"
42 #include "obt/display.h"
43 #include "obt/prop.h"
44 #include "obt/keyboard.h"
45
46 #include <X11/Xlib.h>
47 #include <X11/Xatom.h>
48 #include <glib.h>
49
50 #ifdef HAVE_SYS_SELECT_H
51 #  include <sys/select.h>
52 #endif
53 #ifdef HAVE_SIGNAL_H
54 #  include <signal.h>
55 #endif
56 #ifdef HAVE_UNISTD_H
57 #  include <unistd.h> /* for usleep() */
58 #endif
59 #ifdef XKB
60 #  include <X11/XKBlib.h>
61 #endif
62
63 #ifdef USE_SM
64 #include <X11/ICE/ICElib.h>
65 #endif
66
67 typedef struct
68 {
69     gboolean ignored;
70 } ObEventData;
71
72 typedef struct
73 {
74     ObClient *client;
75     Time time;
76     gulong serial;
77 } ObFocusDelayData;
78
79 typedef struct
80 {
81     gulong start; /* inclusive */
82     gulong end;   /* inclusive */
83 } ObSerialRange;
84
85 static void event_process(const XEvent *e, gpointer data);
86 static void event_handle_root(XEvent *e);
87 static gboolean event_handle_menu_input(XEvent *e);
88 static void event_handle_menu(ObMenuFrame *frame, XEvent *e);
89 static gboolean event_handle_prompt(ObPrompt *p, XEvent *e);
90 static void event_handle_dock(ObDock *s, XEvent *e);
91 static void event_handle_dockapp(ObDockApp *app, XEvent *e);
92 static void event_handle_client(ObClient *c, XEvent *e);
93 static gboolean event_handle_user_input(ObClient *client, XEvent *e);
94 static gboolean is_enter_focus_event_ignored(gulong serial);
95 static void event_ignore_enter_range(gulong start, gulong end);
96
97 static void focus_delay_dest(gpointer data);
98 static gboolean focus_delay_cmp(gconstpointer d1, gconstpointer d2);
99 static gboolean focus_delay_func(gpointer data);
100 static gboolean unfocus_delay_func(gpointer data);
101 static void focus_delay_client_dest(ObClient *client, gpointer data);
102
103 Time event_curtime = CurrentTime;
104 Time event_last_user_time = CurrentTime;
105 /*! The serial of the current X event */
106
107 static gulong event_curserial;
108 static gboolean focus_left_screen = FALSE;
109 /*! A list of ObSerialRanges which are to be ignored for mouse enter events */
110 static GSList *ignore_serials = NULL;
111
112 #ifdef USE_SM
113 static void ice_handler(gint fd, gpointer conn)
114 {
115     Bool b;
116     IceProcessMessages(conn, NULL, &b);
117 }
118
119 static void ice_watch(IceConn conn, IcePointer data, Bool opening,
120                       IcePointer *watch_data)
121 {
122     static gint fd = -1;
123
124     if (opening) {
125         fd = IceConnectionNumber(conn);
126         obt_main_loop_fd_add(ob_main_loop, fd, ice_handler, conn, NULL);
127     } else {
128         obt_main_loop_fd_remove(ob_main_loop, fd);
129         fd = -1;
130     }
131 }
132 #endif
133
134 void event_startup(gboolean reconfig)
135 {
136     if (reconfig) return;
137
138     obt_main_loop_x_add(ob_main_loop, event_process, NULL, NULL);
139
140 #ifdef USE_SM
141     IceAddConnectionWatch(ice_watch, NULL);
142 #endif
143
144     client_add_destroy_notify(focus_delay_client_dest, NULL);
145 }
146
147 void event_shutdown(gboolean reconfig)
148 {
149     if (reconfig) return;
150
151 #ifdef USE_SM
152     IceRemoveConnectionWatch(ice_watch, NULL);
153 #endif
154
155     client_remove_destroy_notify(focus_delay_client_dest);
156 }
157
158 static Window event_get_window(XEvent *e)
159 {
160     Window window;
161
162     /* pick a window */
163     switch (e->type) {
164     case SelectionClear:
165         window = obt_root(ob_screen);
166         break;
167     case CreateNotify:
168         window = e->xcreatewindow.window;
169         break;
170     case MapRequest:
171         window = e->xmaprequest.window;
172         break;
173     case MapNotify:
174         window = e->xmap.window;
175         break;
176     case UnmapNotify:
177         window = e->xunmap.window;
178         break;
179     case DestroyNotify:
180         window = e->xdestroywindow.window;
181         break;
182     case ConfigureRequest:
183         window = e->xconfigurerequest.window;
184         break;
185     case ConfigureNotify:
186         window = e->xconfigure.window;
187         break;
188     default:
189 #ifdef XKB
190         if (obt_display_extension_xkb &&
191             e->type == obt_display_extension_xkb_basep)
192         {
193             switch (((XkbAnyEvent*)e)->xkb_type) {
194             case XkbBellNotify:
195                 window = ((XkbBellNotifyEvent*)e)->window;
196             default:
197                 window = None;
198             }
199         } else
200 #endif
201 #ifdef SYNC
202         if (obt_display_extension_sync &&
203             e->type == obt_display_extension_sync_basep + XSyncAlarmNotify)
204         {
205             window = None;
206         } else
207 #endif
208             window = e->xany.window;
209     }
210     return window;
211 }
212
213 static void event_set_curtime(XEvent *e)
214 {
215     Time t = CurrentTime;
216
217     /* grab the lasttime and hack up the state */
218     switch (e->type) {
219     case ButtonPress:
220     case ButtonRelease:
221         t = e->xbutton.time;
222         break;
223     case KeyPress:
224         t = e->xkey.time;
225         break;
226     case KeyRelease:
227         t = e->xkey.time;
228         break;
229     case MotionNotify:
230         t = e->xmotion.time;
231         break;
232     case PropertyNotify:
233         t = e->xproperty.time;
234         break;
235     case EnterNotify:
236     case LeaveNotify:
237         t = e->xcrossing.time;
238         break;
239     default:
240 #ifdef SYNC
241         if (obt_display_extension_sync &&
242             e->type == obt_display_extension_sync_basep + XSyncAlarmNotify)
243         {
244             t = ((XSyncAlarmNotifyEvent*)e)->time;
245         }
246 #endif
247         /* if more event types are anticipated, get their timestamp
248            explicitly */
249         break;
250     }
251
252     /* watch that if we get an event earlier than the last specified user_time,
253        which can happen if the clock goes backwards, we erase the last
254        specified user_time */
255     if (t && event_last_user_time && event_time_after(event_last_user_time, t))
256         event_last_user_time = CurrentTime;
257
258     event_curtime = t;
259 }
260
261 static void event_hack_mods(XEvent *e)
262 {
263 #ifdef XKB
264     XkbStateRec xkb_state;
265 #endif
266
267     switch (e->type) {
268     case ButtonPress:
269     case ButtonRelease:
270         e->xbutton.state = obt_keyboard_only_modmasks(e->xbutton.state);
271         break;
272     case KeyPress:
273         e->xkey.state = obt_keyboard_only_modmasks(e->xkey.state);
274         break;
275     case KeyRelease:
276 #ifdef XKB
277         /* If XKB is present, then the modifiers are all strange from its
278            magic.  Our X core protocol stuff won't work, so we use this to
279            find what the modifier state is instead. */
280         if (XkbGetState(obt_display, XkbUseCoreKbd, &xkb_state) == Success)
281             e->xkey.state =
282                 obt_keyboard_only_modmasks(xkb_state.compat_state);
283         else
284 #endif
285         {
286             e->xkey.state = obt_keyboard_only_modmasks(e->xkey.state);
287             /* remove from the state the mask of the modifier key being
288                released, if it is a modifier key being released that is */
289             e->xkey.state &= ~obt_keyboard_keycode_to_modmask(e->xkey.keycode);
290         }
291         break;
292     case MotionNotify:
293         e->xmotion.state = obt_keyboard_only_modmasks(e->xmotion.state);
294         /* compress events */
295         {
296             XEvent ce;
297             while (XCheckTypedWindowEvent(obt_display, e->xmotion.window,
298                                           e->type, &ce)) {
299                 e->xmotion.x = ce.xmotion.x;
300                 e->xmotion.y = ce.xmotion.y;
301                 e->xmotion.x_root = ce.xmotion.x_root;
302                 e->xmotion.y_root = ce.xmotion.y_root;
303             }
304         }
305         break;
306     }
307 }
308
309 static gboolean wanted_focusevent(XEvent *e, gboolean in_client_only)
310 {
311     gint mode = e->xfocus.mode;
312     gint detail = e->xfocus.detail;
313     Window win = e->xany.window;
314
315     if (e->type == FocusIn) {
316         /* These are ones we never want.. */
317
318         /* This means focus was given by a keyboard/mouse grab. */
319         if (mode == NotifyGrab)
320             return FALSE;
321         /* This means focus was given back from a keyboard/mouse grab. */
322         if (mode == NotifyUngrab)
323             return FALSE;
324
325         /* These are the ones we want.. */
326
327         if (win == obt_root(ob_screen)) {
328             /* If looking for a focus in on a client, then always return
329                FALSE for focus in's to the root window */
330             if (in_client_only)
331                 return FALSE;
332             /* This means focus reverted off of a client */
333             else if (detail == NotifyPointerRoot ||
334                      detail == NotifyDetailNone ||
335                      detail == NotifyInferior ||
336                      /* This means focus got here from another screen */
337                      detail == NotifyNonlinear)
338                 return TRUE;
339             else
340                 return FALSE;
341         }
342
343         /* It was on a client, was it a valid one?
344            It's possible to get a FocusIn event for a client that was managed
345            but has disappeared.
346         */
347         if (in_client_only) {
348             ObWindow *w = window_find(e->xfocus.window);
349             if (!w || !WINDOW_IS_CLIENT(w))
350                 return FALSE;
351         }
352         else {
353             /* This means focus reverted to parent from the client (this
354                happens often during iconify animation) */
355             if (detail == NotifyInferior)
356                 return TRUE;
357         }
358
359         /* This means focus moved from the root window to a client */
360         if (detail == NotifyVirtual)
361             return TRUE;
362         /* This means focus moved from one client to another */
363         if (detail == NotifyNonlinearVirtual)
364             return TRUE;
365
366         /* Otherwise.. */
367         return FALSE;
368     } else {
369         g_assert(e->type == FocusOut);
370
371         /* These are ones we never want.. */
372
373         /* This means focus was taken by a keyboard/mouse grab. */
374         if (mode == NotifyGrab)
375             return FALSE;
376         /* This means focus was grabbed on a window and it was released. */
377         if (mode == NotifyUngrab)
378             return FALSE;
379
380         /* Focus left the root window revertedto state */
381         if (win == obt_root(ob_screen))
382             return FALSE;
383
384         /* These are the ones we want.. */
385
386         /* This means focus moved from a client to the root window */
387         if (detail == NotifyVirtual)
388             return TRUE;
389         /* This means focus moved from one client to another */
390         if (detail == NotifyNonlinearVirtual)
391             return TRUE;
392
393         /* Otherwise.. */
394         return FALSE;
395     }
396 }
397
398 static Bool event_look_for_focusin(Display *d, XEvent *e, XPointer arg)
399 {
400     return e->type == FocusIn && wanted_focusevent(e, FALSE);
401 }
402
403 static Bool event_look_for_focusin_client(Display *d, XEvent *e, XPointer arg)
404 {
405     return e->type == FocusIn && wanted_focusevent(e, TRUE);
406 }
407
408 static void print_focusevent(XEvent *e)
409 {
410     gint mode = e->xfocus.mode;
411     gint detail = e->xfocus.detail;
412     Window win = e->xany.window;
413     const gchar *modestr, *detailstr;
414
415     switch (mode) {
416     case NotifyNormal:       modestr="NotifyNormal";       break;
417     case NotifyGrab:         modestr="NotifyGrab";         break;
418     case NotifyUngrab:       modestr="NotifyUngrab";       break;
419     case NotifyWhileGrabbed: modestr="NotifyWhileGrabbed"; break;
420     default:                 g_assert_not_reached();
421     }
422     switch (detail) {
423     case NotifyAncestor:    detailstr="NotifyAncestor";    break;
424     case NotifyVirtual:     detailstr="NotifyVirtual";     break;
425     case NotifyInferior:    detailstr="NotifyInferior";    break;
426     case NotifyNonlinear:   detailstr="NotifyNonlinear";   break;
427     case NotifyNonlinearVirtual: detailstr="NotifyNonlinearVirtual"; break;
428     case NotifyPointer:     detailstr="NotifyPointer";     break;
429     case NotifyPointerRoot: detailstr="NotifyPointerRoot"; break;
430     case NotifyDetailNone:  detailstr="NotifyDetailNone";  break;
431     default:                g_assert_not_reached();
432     }
433
434     if (mode == NotifyGrab || mode == NotifyUngrab)
435         return;
436
437     g_assert(modestr);
438     g_assert(detailstr);
439     ob_debug_type(OB_DEBUG_FOCUS, "Focus%s 0x%x mode=%s detail=%s",
440                   (e->xfocus.type == FocusIn ? "In" : "Out"),
441                   win,
442                   modestr, detailstr);
443
444 }
445
446 static gboolean event_ignore(XEvent *e, ObClient *client)
447 {
448     switch(e->type) {
449     case FocusIn:
450         print_focusevent(e);
451         if (!wanted_focusevent(e, FALSE))
452             return TRUE;
453         break;
454     case FocusOut:
455         print_focusevent(e);
456         if (!wanted_focusevent(e, FALSE))
457             return TRUE;
458         break;
459     }
460     return FALSE;
461 }
462
463 static void event_process(const XEvent *ec, gpointer data)
464 {
465     XEvent ee, *e;
466     ObEventData *ed = data;
467
468     Window window;
469     ObClient *client = NULL;
470     ObDock *dock = NULL;
471     ObDockApp *dockapp = NULL;
472     ObWindow *obwin = NULL;
473     ObMenuFrame *menu = NULL;
474     ObPrompt *prompt = NULL;
475     gboolean used;
476
477     /* make a copy we can mangle */
478     ee = *ec;
479     e = &ee;
480
481     window = event_get_window(e);
482     if (window == obt_root(ob_screen))
483         /* don't do any lookups, waste of cpu */;
484     else if ((obwin = window_find(window))) {
485         switch (obwin->type) {
486         case OB_WINDOW_CLASS_DOCK:
487             dock = WINDOW_AS_DOCK(obwin);
488             break;
489         case OB_WINDOW_CLASS_CLIENT:
490             client = WINDOW_AS_CLIENT(obwin);
491             /* events on clients can be events on prompt windows too */
492             prompt = client->prompt;
493             break;
494         case OB_WINDOW_CLASS_MENUFRAME:
495             menu = WINDOW_AS_MENUFRAME(obwin);
496             break;
497         case OB_WINDOW_CLASS_INTERNAL:
498             /* we don't do anything with events directly on these windows */
499             break;
500         case OB_WINDOW_CLASS_PROMPT:
501             prompt = WINDOW_AS_PROMPT(obwin);
502             break;
503         }
504     }
505     else
506         dockapp = dock_find_dockapp(window);
507
508     event_set_curtime(e);
509     event_curserial = e->xany.serial;
510     event_hack_mods(e);
511     if (event_ignore(e, client)) {
512         if (ed)
513             ed->ignored = TRUE;
514         return;
515     } else if (ed)
516             ed->ignored = FALSE;
517
518     /* deal with it in the kernel */
519
520     if (e->type == FocusIn) {
521         if (client &&
522             e->xfocus.detail == NotifyInferior)
523         {
524             ob_debug_type(OB_DEBUG_FOCUS,
525                           "Focus went to the frame window");
526
527             focus_left_screen = FALSE;
528
529             focus_fallback(FALSE, config_focus_under_mouse, TRUE, TRUE);
530
531             /* We don't get a FocusOut for this case, because it's just moving
532                from our Inferior up to us. This happens when iconifying a
533                window with RevertToParent focus */
534             frame_adjust_focus(client->frame, FALSE);
535             /* focus_set_client(NULL) has already been called */
536         }
537         else if (e->xfocus.detail == NotifyPointerRoot ||
538                  e->xfocus.detail == NotifyDetailNone ||
539                  e->xfocus.detail == NotifyInferior ||
540                  e->xfocus.detail == NotifyNonlinear)
541         {
542             XEvent ce;
543
544             ob_debug_type(OB_DEBUG_FOCUS,
545                           "Focus went to root or pointer root/none");
546
547             if (e->xfocus.detail == NotifyInferior ||
548                 e->xfocus.detail == NotifyNonlinear)
549             {
550                 focus_left_screen = FALSE;
551             }
552
553             /* If another FocusIn is in the queue then don't fallback yet. This
554                fixes the fun case of:
555                window map -> send focusin
556                window unmap -> get focusout
557                window map -> send focusin
558                get first focus out -> fall back to something (new window
559                  hasn't received focus yet, so something else) -> send focusin
560                which means the "something else" is the last thing to get a
561                focusin sent to it, so the new window doesn't end up with focus.
562
563                But if the other focus in is something like PointerRoot then we
564                still want to fall back.
565             */
566             if (XCheckIfEvent(obt_display, &ce, event_look_for_focusin_client,
567                               NULL))
568             {
569                 XPutBackEvent(obt_display, &ce);
570                 ob_debug_type(OB_DEBUG_FOCUS,
571                               "  but another FocusIn is coming");
572             } else {
573                 /* Focus has been reverted.
574
575                    FocusOut events come after UnmapNotify, so we don't need to
576                    worry about focusing an invalid window
577                 */
578
579                 if (!focus_left_screen)
580                     focus_fallback(FALSE, config_focus_under_mouse,
581                                    TRUE, TRUE);
582             }
583         }
584         else if (!client)
585         {
586             ob_debug_type(OB_DEBUG_FOCUS,
587                           "Focus went to a window that is already gone");
588
589             /* If you send focus to a window and then it disappears, you can
590                get the FocusIn for it, after it is unmanaged.
591                Just wait for the next FocusOut/FocusIn pair, but make note that
592                the window that was focused no longer is. */
593             focus_set_client(NULL);
594         }
595         else if (client != focus_client) {
596             focus_left_screen = FALSE;
597             frame_adjust_focus(client->frame, TRUE);
598             focus_set_client(client);
599             client_calc_layer(client);
600             client_bring_helper_windows(client);
601         }
602     } else if (e->type == FocusOut) {
603         XEvent ce;
604
605         /* Look for the followup FocusIn */
606         if (!XCheckIfEvent(obt_display, &ce, event_look_for_focusin, NULL)) {
607             /* There is no FocusIn, this means focus went to a window that
608                is not being managed, or a window on another screen. */
609             Window win, root;
610             gint i;
611             guint u;
612             obt_display_ignore_errors(TRUE);
613             if (XGetInputFocus(obt_display, &win, &i) &&
614                 XGetGeometry(obt_display, win, &root, &i,&i,&u,&u,&u,&u) &&
615                 root != obt_root(ob_screen))
616             {
617                 ob_debug_type(OB_DEBUG_FOCUS,
618                               "Focus went to another screen !");
619                 focus_left_screen = TRUE;
620             }
621             else
622                 ob_debug_type(OB_DEBUG_FOCUS,
623                               "Focus went to a black hole !");
624             obt_display_ignore_errors(FALSE);
625             /* nothing is focused */
626             focus_set_client(NULL);
627         } else {
628             /* Focus moved, so process the FocusIn event */
629             ObEventData ed = { .ignored = FALSE };
630             event_process(&ce, &ed);
631             if (ed.ignored) {
632                 /* The FocusIn was ignored, this means it was on a window
633                    that isn't a client. */
634                 ob_debug_type(OB_DEBUG_FOCUS,
635                               "Focus went to an unmanaged window 0x%x !",
636                               ce.xfocus.window);
637                 focus_fallback(TRUE, config_focus_under_mouse, TRUE, TRUE);
638             }
639         }
640
641         if (client && client != focus_client) {
642             frame_adjust_focus(client->frame, FALSE);
643             /* focus_set_client(NULL) has already been called in this
644                section or by focus_fallback */
645         }
646     }
647     else if (client)
648         event_handle_client(client, e);
649     else if (dockapp)
650         event_handle_dockapp(dockapp, e);
651     else if (dock)
652         event_handle_dock(dock, e);
653     else if (menu)
654         event_handle_menu(menu, e);
655     else if (window == obt_root(ob_screen))
656         event_handle_root(e);
657     else if (e->type == MapRequest)
658         window_manage(window);
659     else if (e->type == MappingNotify) {
660         /* keyboard layout changes for modifier mapping changes. reload the
661            modifier map, and rebind all the key bindings as appropriate */
662         ob_debug("Keyboard map changed. Reloading keyboard bindings.");
663         ob_set_state(OB_STATE_RECONFIGURING);
664         obt_keyboard_reload();
665         keyboard_rebind();
666         ob_set_state(OB_STATE_RUNNING);
667     }
668     else if (e->type == ClientMessage) {
669         /* This is for _NET_WM_REQUEST_FRAME_EXTENTS messages. They come for
670            windows that are not managed yet. */
671         if (e->xclient.message_type ==
672             OBT_PROP_ATOM(NET_REQUEST_FRAME_EXTENTS))
673         {
674             /* Pretend to manage the client, getting information used to
675                determine its decorations */
676             ObClient *c = client_fake_manage(e->xclient.window);
677             gulong vals[4];
678
679             /* set the frame extents on the window */
680             vals[0] = c->frame->size.left;
681             vals[1] = c->frame->size.right;
682             vals[2] = c->frame->size.top;
683             vals[3] = c->frame->size.bottom;
684             OBT_PROP_SETA32(e->xclient.window, NET_FRAME_EXTENTS,
685                             CARDINAL, vals, 4);
686
687             /* Free the pretend client */
688             client_fake_unmanage(c);
689         }
690     }
691     else if (e->type == ConfigureRequest) {
692         /* unhandled configure requests must be used to configure the
693            window directly */
694         XWindowChanges xwc;
695
696         xwc.x = e->xconfigurerequest.x;
697         xwc.y = e->xconfigurerequest.y;
698         xwc.width = e->xconfigurerequest.width;
699         xwc.height = e->xconfigurerequest.height;
700         xwc.border_width = e->xconfigurerequest.border_width;
701         xwc.sibling = e->xconfigurerequest.above;
702         xwc.stack_mode = e->xconfigurerequest.detail;
703
704         /* we are not to be held responsible if someone sends us an
705            invalid request! */
706         obt_display_ignore_errors(TRUE);
707         XConfigureWindow(obt_display, window,
708                          e->xconfigurerequest.value_mask, &xwc);
709         obt_display_ignore_errors(FALSE);
710     }
711 #ifdef SYNC
712     else if (obt_display_extension_sync &&
713              e->type == obt_display_extension_sync_basep + XSyncAlarmNotify)
714     {
715         XSyncAlarmNotifyEvent *se = (XSyncAlarmNotifyEvent*)e;
716         if (se->alarm == moveresize_alarm && moveresize_in_progress)
717             moveresize_event(e);
718     }
719 #endif
720
721     if (e->type == ButtonPress || e->type == ButtonRelease) {
722         /* If the button press was on some non-root window, or was physically
723            on the root window, then process it */
724         if (window != obt_root(ob_screen) ||
725             e->xbutton.subwindow == None)
726         {
727             used = event_handle_user_input(client, e);
728         }
729         /* Otherwise only process it if it was physically on an openbox
730            internal window */
731         else {
732             ObWindow *w;
733
734             if ((w = window_find(e->xbutton.subwindow)) &&
735                 WINDOW_IS_INTERNAL(w))
736             {
737                 used = event_handle_user_input(client, e);
738             }
739         }
740     }
741     else if (e->type == KeyPress || e->type == KeyRelease ||
742              e->type == MotionNotify)
743         used = event_handle_user_input(client, e);
744
745     if (prompt && !used)
746         used = event_handle_prompt(prompt, e);
747
748     /* if something happens and it's not from an XEvent, then we don't know
749        the time */
750     event_curtime = CurrentTime;
751     event_curserial = 0;
752 }
753
754 static void event_handle_root(XEvent *e)
755 {
756     Atom msgtype;
757
758     switch(e->type) {
759     case SelectionClear:
760         ob_debug("Another WM has requested to replace us. Exiting.");
761         ob_exit_replace();
762         break;
763
764     case ClientMessage:
765         if (e->xclient.format != 32) break;
766
767         msgtype = e->xclient.message_type;
768         if (msgtype == OBT_PROP_ATOM(NET_CURRENT_DESKTOP)) {
769             guint d = e->xclient.data.l[0];
770             if (d < screen_num_desktops) {
771                 event_curtime = e->xclient.data.l[1];
772                 if (event_curtime == 0)
773                     ob_debug_type(OB_DEBUG_APP_BUGS,
774                                   "_NET_CURRENT_DESKTOP message is missing "
775                                   "a timestamp");
776                 screen_set_desktop(d, TRUE);
777             }
778         } else if (msgtype == OBT_PROP_ATOM(NET_NUMBER_OF_DESKTOPS)) {
779             guint d = e->xclient.data.l[0];
780             if (d > 0 && d <= 1000)
781                 screen_set_num_desktops(d);
782         } else if (msgtype == OBT_PROP_ATOM(NET_SHOWING_DESKTOP)) {
783             screen_show_desktop(e->xclient.data.l[0] != 0, NULL);
784         } else if (msgtype == OBT_PROP_ATOM(OB_CONTROL)) {
785             ob_debug("OB_CONTROL: %d", e->xclient.data.l[0]);
786             if (e->xclient.data.l[0] == 1)
787                 ob_reconfigure();
788             else if (e->xclient.data.l[0] == 2)
789                 ob_restart();
790             else if (e->xclient.data.l[0] == 3)
791                 ob_exit(0);
792         } else if (msgtype == OBT_PROP_ATOM(WM_PROTOCOLS)) {
793             if ((Atom)e->xclient.data.l[0] == OBT_PROP_ATOM(NET_WM_PING))
794                 ping_got_pong(e->xclient.data.l[1]);
795         }
796         break;
797     case PropertyNotify:
798         if (e->xproperty.atom == OBT_PROP_ATOM(NET_DESKTOP_NAMES)) {
799             ob_debug("UPDATE DESKTOP NAMES");
800             screen_update_desktop_names();
801         }
802         else if (e->xproperty.atom == OBT_PROP_ATOM(NET_DESKTOP_LAYOUT))
803             screen_update_layout();
804         break;
805     case ConfigureNotify:
806 #ifdef XRANDR
807         XRRUpdateConfiguration(e);
808 #endif
809         screen_resize();
810         break;
811     default:
812         ;
813     }
814 }
815
816 void event_enter_client(ObClient *client)
817 {
818     g_assert(config_focus_follow);
819
820     if (is_enter_focus_event_ignored(event_curserial)) {
821         ob_debug_type(OB_DEBUG_FOCUS, "Ignoring enter event with serial %lu\n"
822                       "on client 0x%x", event_curserial, client->window);
823         return;
824     }
825
826     if (client_enter_focusable(client) && client_can_focus(client)) {
827         if (config_focus_delay) {
828             ObFocusDelayData *data;
829
830             obt_main_loop_timeout_remove(ob_main_loop, focus_delay_func);
831
832             data = g_new(ObFocusDelayData, 1);
833             data->client = client;
834             data->time = event_curtime;
835             data->serial = event_curserial;
836
837             obt_main_loop_timeout_add(ob_main_loop,
838                                       config_focus_delay * 1000,
839                                       focus_delay_func,
840                                       data, focus_delay_cmp, focus_delay_dest);
841         } else {
842             ObFocusDelayData data;
843             data.client = client;
844             data.time = event_curtime;
845             data.serial = event_curserial;
846             focus_delay_func(&data);
847         }
848     }
849 }
850
851 void event_leave_client(ObClient *client)
852 {
853     g_assert(config_focus_follow);
854
855     if (is_enter_focus_event_ignored(event_curserial)) {
856         ob_debug_type(OB_DEBUG_FOCUS, "Ignoring leave event with serial %lu\n"
857                       "on client 0x%x", event_curserial, client->window);
858         return;
859     }
860
861     if (client == focus_client) {
862         if (config_focus_delay) {
863             ObFocusDelayData *data;
864
865             obt_main_loop_timeout_remove(ob_main_loop, unfocus_delay_func);
866
867             data = g_new(ObFocusDelayData, 1);
868             data->client = client;
869             data->time = event_curtime;
870             data->serial = event_curserial;
871
872             obt_main_loop_timeout_add(ob_main_loop,
873                                       config_focus_delay * 1000,
874                                       unfocus_delay_func,
875                                       data, focus_delay_cmp, focus_delay_dest);
876         } else {
877             ObFocusDelayData data;
878             data.client = client;
879             data.time = event_curtime;
880             data.serial = event_curserial;
881             unfocus_delay_func(&data);
882         }
883     }
884 }
885
886 static gboolean *context_to_button(ObFrame *f, ObFrameContext con, gboolean press)
887 {
888     if (press) {
889         switch (con) {
890         case OB_FRAME_CONTEXT_MAXIMIZE:
891             return &f->max_press;
892         case OB_FRAME_CONTEXT_CLOSE:
893             return &f->close_press;
894         case OB_FRAME_CONTEXT_ICONIFY:
895             return &f->iconify_press;
896         case OB_FRAME_CONTEXT_ALLDESKTOPS:
897             return &f->desk_press;
898         case OB_FRAME_CONTEXT_SHADE:
899             return &f->shade_press;
900         default:
901             return NULL;
902         }
903     } else {
904         switch (con) {
905         case OB_FRAME_CONTEXT_MAXIMIZE:
906             return &f->max_hover;
907         case OB_FRAME_CONTEXT_CLOSE:
908             return &f->close_hover;
909         case OB_FRAME_CONTEXT_ICONIFY:
910             return &f->iconify_hover;
911         case OB_FRAME_CONTEXT_ALLDESKTOPS:
912             return &f->desk_hover;
913         case OB_FRAME_CONTEXT_SHADE:
914             return &f->shade_hover;
915         default:
916             return NULL;
917         }
918     }
919 }
920
921 static void compress_client_message_event(XEvent *e, XEvent *ce, Window window,
922                                           Atom msgtype)
923 {
924     /* compress changes into a single change */
925     while (XCheckTypedWindowEvent(obt_display, window, e->type, ce)) {
926         /* XXX: it would be nice to compress ALL messages of a
927            type, not just messages in a row without other
928            message types between. */
929         if (ce->xclient.message_type != msgtype) {
930             XPutBackEvent(obt_display, ce);
931             break;
932         }
933         e->xclient = ce->xclient;
934     }
935 }
936
937 static void event_handle_client(ObClient *client, XEvent *e)
938 {
939     XEvent ce;
940     Atom msgtype;
941     ObFrameContext con;
942     gboolean *but;
943     static gint px = -1, py = -1;
944     static guint pb = 0;
945     static ObFrameContext pcon = OB_FRAME_CONTEXT_NONE;
946
947     switch (e->type) {
948     case ButtonPress:
949         /* save where the press occured for the first button pressed */
950         if (!pb) {
951             pb = e->xbutton.button;
952             px = e->xbutton.x;
953             py = e->xbutton.y;
954
955             pcon = frame_context(client, e->xbutton.window, px, py);
956             pcon = mouse_button_frame_context(pcon, e->xbutton.button,
957                                               e->xbutton.state);
958         }
959     case ButtonRelease:
960         /* Wheel buttons don't draw because they are an instant click, so it
961            is a waste of resources to go drawing it.
962            if the user is doing an interactive thing, or has a menu open then
963            the mouse is grabbed (possibly) and if we get these events we don't
964            want to deal with them
965         */
966         if (!(e->xbutton.button == 4 || e->xbutton.button == 5) &&
967             !grab_on_keyboard())
968         {
969             /* use where the press occured */
970             con = frame_context(client, e->xbutton.window, px, py);
971             con = mouse_button_frame_context(con, e->xbutton.button,
972                                              e->xbutton.state);
973
974             /* button presses on CLIENT_CONTEXTs are not accompanied by a
975                release because they are Replayed to the client */
976             if ((e->type == ButtonRelease || CLIENT_CONTEXT(con, client)) &&
977                 e->xbutton.button == pb)
978                 pb = 0, px = py = -1, pcon = OB_FRAME_CONTEXT_NONE;
979
980             but = context_to_button(client->frame, con, TRUE);
981             if (but) {
982                 *but = (e->type == ButtonPress);
983                 frame_adjust_state(client->frame);
984             }
985         }
986         break;
987     case MotionNotify:
988         /* when there is a grab on the pointer, we won't get enter/leave
989            notifies, but we still get motion events */
990         if (grab_on_pointer()) break;
991
992         con = frame_context(client, e->xmotion.window,
993                             e->xmotion.x, e->xmotion.y);
994         switch (con) {
995         case OB_FRAME_CONTEXT_TITLEBAR:
996         case OB_FRAME_CONTEXT_TLCORNER:
997         case OB_FRAME_CONTEXT_TRCORNER:
998             /* we've left the button area inside the titlebar */
999             if (client->frame->max_hover || client->frame->desk_hover ||
1000                 client->frame->shade_hover || client->frame->iconify_hover ||
1001                 client->frame->close_hover)
1002             {
1003                 client->frame->max_hover =
1004                     client->frame->desk_hover =
1005                     client->frame->shade_hover =
1006                     client->frame->iconify_hover =
1007                     client->frame->close_hover = FALSE;
1008                 frame_adjust_state(client->frame);
1009             }
1010             break;
1011         default:
1012             but = context_to_button(client->frame, con, FALSE);
1013             if (but && !*but && !pb) {
1014                 *but = TRUE;
1015                 frame_adjust_state(client->frame);
1016             }
1017             break;
1018         }
1019         break;
1020     case LeaveNotify:
1021         con = frame_context(client, e->xcrossing.window,
1022                             e->xcrossing.x, e->xcrossing.y);
1023         switch (con) {
1024         case OB_FRAME_CONTEXT_TITLEBAR:
1025         case OB_FRAME_CONTEXT_TLCORNER:
1026         case OB_FRAME_CONTEXT_TRCORNER:
1027             /* we've left the button area inside the titlebar */
1028             client->frame->max_hover =
1029                 client->frame->desk_hover =
1030                 client->frame->shade_hover =
1031                 client->frame->iconify_hover =
1032                 client->frame->close_hover = FALSE;
1033             if (e->xcrossing.mode == NotifyGrab) {
1034                 client->frame->max_press =
1035                     client->frame->desk_press =
1036                     client->frame->shade_press =
1037                     client->frame->iconify_press =
1038                     client->frame->close_press = FALSE;
1039             }
1040             break;
1041         case OB_FRAME_CONTEXT_FRAME:
1042             /* When the mouse leaves an animating window, don't use the
1043                corresponding enter events. Pretend like the animating window
1044                doesn't even exist..! */
1045             if (frame_iconify_animating(client->frame))
1046                 event_end_ignore_all_enters(event_start_ignore_all_enters());
1047
1048             ob_debug_type(OB_DEBUG_FOCUS,
1049                           "%sNotify mode %d detail %d on %lx",
1050                           (e->type == EnterNotify ? "Enter" : "Leave"),
1051                           e->xcrossing.mode,
1052                           e->xcrossing.detail, (client?client->window:0));
1053             if (grab_on_keyboard())
1054                 break;
1055             if (config_focus_follow &&
1056                 /* leave inferior events can happen when the mouse goes onto
1057                    the window's border and then into the window before the
1058                    delay is up */
1059                 e->xcrossing.detail != NotifyInferior)
1060             {
1061                 if (config_focus_delay)
1062                     obt_main_loop_timeout_remove_data(ob_main_loop,
1063                                                       focus_delay_func,
1064                                                       client, FALSE);
1065                 if (config_unfocus_leave)
1066                     event_leave_client(client);
1067             }
1068             break;
1069         default:
1070             but = context_to_button(client->frame, con, FALSE);
1071             if (but) {
1072                 *but = FALSE;
1073                 if (e->xcrossing.mode == NotifyGrab) {
1074                     but = context_to_button(client->frame, con, TRUE);
1075                     *but = FALSE;
1076                 }
1077                 frame_adjust_state(client->frame);
1078             }
1079             break;
1080         }
1081         break;
1082     case EnterNotify:
1083     {
1084         con = frame_context(client, e->xcrossing.window,
1085                             e->xcrossing.x, e->xcrossing.y);
1086         switch (con) {
1087         case OB_FRAME_CONTEXT_FRAME:
1088             if (grab_on_keyboard())
1089                 break;
1090             if (e->xcrossing.mode == NotifyGrab ||
1091                 e->xcrossing.mode == NotifyUngrab ||
1092                 /*ignore enters when we're already in the window */
1093                 e->xcrossing.detail == NotifyInferior)
1094             {
1095                 ob_debug_type(OB_DEBUG_FOCUS,
1096                               "%sNotify mode %d detail %d serial %lu on %lx "
1097                               "IGNORED",
1098                               (e->type == EnterNotify ? "Enter" : "Leave"),
1099                               e->xcrossing.mode,
1100                               e->xcrossing.detail,
1101                               e->xcrossing.serial,
1102                               client?client->window:0);
1103             }
1104             else {
1105                 ob_debug_type(OB_DEBUG_FOCUS,
1106                               "%sNotify mode %d detail %d serial %lu on %lx, "
1107                               "focusing window",
1108                               (e->type == EnterNotify ? "Enter" : "Leave"),
1109                               e->xcrossing.mode,
1110                               e->xcrossing.detail,
1111                               e->xcrossing.serial,
1112                               (client?client->window:0));
1113                 if (config_focus_follow) {
1114                     if (config_focus_delay)
1115                         obt_main_loop_timeout_remove_data(ob_main_loop,
1116                                                           unfocus_delay_func,
1117                                                           client, FALSE);
1118                     event_enter_client(client);
1119                 }
1120             }
1121             break;
1122         default:
1123             but = context_to_button(client->frame, con, FALSE);
1124             if (but) {
1125                 *but = TRUE;
1126                 if (e->xcrossing.mode == NotifyUngrab) {
1127                     but = context_to_button(client->frame, con, TRUE);
1128                     *but = (con == pcon);
1129                 }
1130                 frame_adjust_state(client->frame);
1131             }
1132             break;
1133         }
1134         break;
1135     }
1136     case ConfigureRequest:
1137     {
1138         /* dont compress these unless you're going to watch for property
1139            notifies in between (these can change what the configure would
1140            do to the window).
1141            also you can't compress stacking events
1142         */
1143
1144         gint x, y, w, h;
1145         gboolean move = FALSE;
1146         gboolean resize = FALSE;
1147
1148         /* get the current area */
1149         RECT_TO_DIMS(client->area, x, y, w, h);
1150
1151         ob_debug("ConfigureRequest for \"%s\" desktop %d wmstate %d "
1152                  "visible %d",
1153                  client->title,
1154                  screen_desktop, client->wmstate, client->frame->visible);
1155         ob_debug("                     x %d y %d w %d h %d b %d",
1156                  x, y, w, h, client->border_width);
1157
1158         if (e->xconfigurerequest.value_mask & CWBorderWidth)
1159             if (client->border_width != e->xconfigurerequest.border_width) {
1160                 client->border_width = e->xconfigurerequest.border_width;
1161
1162                 /* if the border width is changing then that is the same
1163                    as requesting a resize, but we don't actually change
1164                    the client's border, so it will change their root
1165                    coordinates (since they include the border width) and
1166                    we need to a notify then */
1167                 move = TRUE;
1168             }
1169
1170         if (e->xconfigurerequest.value_mask & CWStackMode) {
1171             ObClient *sibling = NULL;
1172             gulong ignore_start;
1173             gboolean ok = TRUE;
1174
1175             /* get the sibling */
1176             if (e->xconfigurerequest.value_mask & CWSibling) {
1177                 ObWindow *win;
1178                 win = window_find(e->xconfigurerequest.above);
1179                 if (win && WINDOW_IS_CLIENT(win) &&
1180                     WINDOW_AS_CLIENT(win) != client)
1181                 {
1182                     sibling = WINDOW_AS_CLIENT(win);
1183                 }
1184                 else
1185                     /* an invalid sibling was specified so don't restack at
1186                        all, it won't make sense no matter what we do */
1187                     ok = FALSE;
1188             }
1189
1190             if (ok) {
1191                 if (!config_focus_under_mouse)
1192                     ignore_start = event_start_ignore_all_enters();
1193                 stacking_restack_request(client, sibling,
1194                                          e->xconfigurerequest.detail);
1195                 if (!config_focus_under_mouse)
1196                     event_end_ignore_all_enters(ignore_start);
1197             }
1198
1199             /* a stacking change moves the window without resizing */
1200             move = TRUE;
1201         }
1202
1203         if ((e->xconfigurerequest.value_mask & CWX) ||
1204             (e->xconfigurerequest.value_mask & CWY) ||
1205             (e->xconfigurerequest.value_mask & CWWidth) ||
1206             (e->xconfigurerequest.value_mask & CWHeight))
1207         {
1208             /* don't allow clients to move shaded windows (fvwm does this)
1209             */
1210             if (e->xconfigurerequest.value_mask & CWX) {
1211                 if (!client->shaded)
1212                     x = e->xconfigurerequest.x;
1213                 move = TRUE;
1214             }
1215             if (e->xconfigurerequest.value_mask & CWY) {
1216                 if (!client->shaded)
1217                     y = e->xconfigurerequest.y;
1218                 move = TRUE;
1219             }
1220
1221             if (e->xconfigurerequest.value_mask & CWWidth) {
1222                 w = e->xconfigurerequest.width;
1223                 resize = TRUE;
1224             }
1225             if (e->xconfigurerequest.value_mask & CWHeight) {
1226                 h = e->xconfigurerequest.height;
1227                 resize = TRUE;
1228             }
1229         }
1230
1231         ob_debug("ConfigureRequest x(%d) %d y(%d) %d w(%d) %d h(%d) %d "
1232                  "move %d resize %d",
1233                  e->xconfigurerequest.value_mask & CWX, x,
1234                  e->xconfigurerequest.value_mask & CWY, y,
1235                  e->xconfigurerequest.value_mask & CWWidth, w,
1236                  e->xconfigurerequest.value_mask & CWHeight, h,
1237                  move, resize);
1238
1239         /* check for broken apps moving to their root position
1240
1241            XXX remove this some day...that would be nice. right now all
1242            kde apps do this when they try activate themselves on another
1243            desktop. eg. open amarok window on desktop 1, switch to desktop
1244            2, click amarok tray icon. it will move by its decoration size.
1245         */
1246         if (x != client->area.x &&
1247             x == (client->frame->area.x + client->frame->size.left -
1248                   (gint)client->border_width) &&
1249             y != client->area.y &&
1250             y == (client->frame->area.y + client->frame->size.top -
1251                   (gint)client->border_width) &&
1252             w == client->area.width &&
1253             h == client->area.height)
1254         {
1255             ob_debug_type(OB_DEBUG_APP_BUGS,
1256                           "Application %s is trying to move via "
1257                           "ConfigureRequest to it's root window position "
1258                           "but it is not using StaticGravity",
1259                           client->title);
1260             /* don't move it */
1261             x = client->area.x;
1262             y = client->area.y;
1263
1264             /* they still requested a move, so don't change whether a
1265                notify is sent or not */
1266         }
1267
1268         {
1269             gint lw, lh;
1270
1271             client_try_configure(client, &x, &y, &w, &h, &lw, &lh, FALSE);
1272
1273             /* if x was not given, then use gravity to figure out the new
1274                x.  the reference point should not be moved */
1275             if ((e->xconfigurerequest.value_mask & CWWidth &&
1276                  !(e->xconfigurerequest.value_mask & CWX)))
1277                 client_gravity_resize_w(client, &x, client->area.width, w);
1278             /* same for y */
1279             if ((e->xconfigurerequest.value_mask & CWHeight &&
1280                  !(e->xconfigurerequest.value_mask & CWY)))
1281                 client_gravity_resize_h(client, &y, client->area.height,h);
1282
1283             client_find_onscreen(client, &x, &y, w, h, FALSE);
1284
1285             ob_debug("Granting ConfigureRequest x %d y %d w %d h %d",
1286                      x, y, w, h);
1287             client_configure(client, x, y, w, h, FALSE, TRUE, TRUE);
1288         }
1289         break;
1290     }
1291     case UnmapNotify:
1292         ob_debug("UnmapNotify for window 0x%x eventwin 0x%x sendevent %d "
1293                  "ignores left %d",
1294                  client->window, e->xunmap.event, e->xunmap.from_configure,
1295                  client->ignore_unmaps);
1296         if (client->ignore_unmaps) {
1297             client->ignore_unmaps--;
1298             break;
1299         }
1300         client_unmanage(client);
1301         break;
1302     case DestroyNotify:
1303         ob_debug("DestroyNotify for window 0x%x", client->window);
1304         client_unmanage(client);
1305         break;
1306     case ReparentNotify:
1307         /* this is when the client is first taken captive in the frame */
1308         if (e->xreparent.parent == client->frame->window) break;
1309
1310         /*
1311           This event is quite rare and is usually handled in unmapHandler.
1312           However, if the window is unmapped when the reparent event occurs,
1313           the window manager never sees it because an unmap event is not sent
1314           to an already unmapped window.
1315         */
1316
1317         /* we don't want the reparent event, put it back on the stack for the
1318            X server to deal with after we unmanage the window */
1319         XPutBackEvent(obt_display, e);
1320
1321         ob_debug("ReparentNotify for window 0x%x", client->window);
1322         client_unmanage(client);
1323         break;
1324     case MapRequest:
1325         ob_debug("MapRequest for 0x%lx", client->window);
1326         if (!client->iconic) break; /* this normally doesn't happen, but if it
1327                                        does, we don't want it!
1328                                        it can happen now when the window is on
1329                                        another desktop, but we still don't
1330                                        want it! */
1331         client_activate(client, FALSE, FALSE, TRUE, TRUE, TRUE);
1332         break;
1333     case ClientMessage:
1334         /* validate cuz we query stuff off the client here */
1335         if (!client_validate(client)) break;
1336
1337         if (e->xclient.format != 32) return;
1338
1339         msgtype = e->xclient.message_type;
1340         if (msgtype == OBT_PROP_ATOM(WM_CHANGE_STATE)) {
1341             compress_client_message_event(e, &ce, client->window, msgtype);
1342             client_set_wm_state(client, e->xclient.data.l[0]);
1343         } else if (msgtype == OBT_PROP_ATOM(NET_WM_DESKTOP)) {
1344             compress_client_message_event(e, &ce, client->window, msgtype);
1345             if ((unsigned)e->xclient.data.l[0] < screen_num_desktops ||
1346                 (unsigned)e->xclient.data.l[0] == DESKTOP_ALL)
1347                 client_set_desktop(client, (unsigned)e->xclient.data.l[0],
1348                                    FALSE, FALSE);
1349         } else if (msgtype == OBT_PROP_ATOM(NET_WM_STATE)) {
1350             gulong ignore_start;
1351
1352             /* can't compress these */
1353             ob_debug("net_wm_state %s %ld %ld for 0x%lx",
1354                      (e->xclient.data.l[0] == 0 ? "Remove" :
1355                       e->xclient.data.l[0] == 1 ? "Add" :
1356                       e->xclient.data.l[0] == 2 ? "Toggle" : "INVALID"),
1357                      e->xclient.data.l[1], e->xclient.data.l[2],
1358                      client->window);
1359
1360             /* ignore enter events caused by these like ob actions do */
1361             if (!config_focus_under_mouse)
1362                 ignore_start = event_start_ignore_all_enters();
1363             client_set_state(client, e->xclient.data.l[0],
1364                              e->xclient.data.l[1], e->xclient.data.l[2]);
1365             if (!config_focus_under_mouse)
1366                 event_end_ignore_all_enters(ignore_start);
1367         } else if (msgtype == OBT_PROP_ATOM(NET_CLOSE_WINDOW)) {
1368             ob_debug("net_close_window for 0x%lx", client->window);
1369             client_close(client);
1370         } else if (msgtype == OBT_PROP_ATOM(NET_ACTIVE_WINDOW)) {
1371             ob_debug("net_active_window for 0x%lx source=%s",
1372                      client->window,
1373                      (e->xclient.data.l[0] == 0 ? "unknown" :
1374                       (e->xclient.data.l[0] == 1 ? "application" :
1375                        (e->xclient.data.l[0] == 2 ? "user" : "INVALID"))));
1376             /* XXX make use of data.l[2] !? */
1377             if (e->xclient.data.l[0] == 1 || e->xclient.data.l[0] == 2) {
1378                 event_curtime = e->xclient.data.l[1];
1379                 if (e->xclient.data.l[1] == 0)
1380                     ob_debug_type(OB_DEBUG_APP_BUGS,
1381                                   "_NET_ACTIVE_WINDOW message for window %s is"
1382                                   " missing a timestamp", client->title);
1383             } else
1384                 ob_debug_type(OB_DEBUG_APP_BUGS,
1385                               "_NET_ACTIVE_WINDOW message for window %s is "
1386                               "missing source indication", client->title);
1387             client_activate(client, FALSE, FALSE, TRUE, TRUE,
1388                             (e->xclient.data.l[0] == 0 ||
1389                              e->xclient.data.l[0] == 2));
1390         } else if (msgtype == OBT_PROP_ATOM(NET_WM_MOVERESIZE)) {
1391             ob_debug("net_wm_moveresize for 0x%lx direction %d",
1392                      client->window, e->xclient.data.l[2]);
1393             if ((Atom)e->xclient.data.l[2] ==
1394                 OBT_PROP_ATOM(NET_WM_MOVERESIZE_SIZE_TOPLEFT) ||
1395                 (Atom)e->xclient.data.l[2] ==
1396                 OBT_PROP_ATOM(NET_WM_MOVERESIZE_SIZE_TOP) ||
1397                 (Atom)e->xclient.data.l[2] ==
1398                 OBT_PROP_ATOM(NET_WM_MOVERESIZE_SIZE_TOPRIGHT) ||
1399                 (Atom)e->xclient.data.l[2] ==
1400                 OBT_PROP_ATOM(NET_WM_MOVERESIZE_SIZE_RIGHT) ||
1401                 (Atom)e->xclient.data.l[2] ==
1402                 OBT_PROP_ATOM(NET_WM_MOVERESIZE_SIZE_RIGHT) ||
1403                 (Atom)e->xclient.data.l[2] ==
1404                 OBT_PROP_ATOM(NET_WM_MOVERESIZE_SIZE_BOTTOMRIGHT) ||
1405                 (Atom)e->xclient.data.l[2] ==
1406                 OBT_PROP_ATOM(NET_WM_MOVERESIZE_SIZE_BOTTOM) ||
1407                 (Atom)e->xclient.data.l[2] ==
1408                 OBT_PROP_ATOM(NET_WM_MOVERESIZE_SIZE_BOTTOMLEFT) ||
1409                 (Atom)e->xclient.data.l[2] ==
1410                 OBT_PROP_ATOM(NET_WM_MOVERESIZE_SIZE_LEFT) ||
1411                 (Atom)e->xclient.data.l[2] ==
1412                 OBT_PROP_ATOM(NET_WM_MOVERESIZE_MOVE) ||
1413                 (Atom)e->xclient.data.l[2] ==
1414                 OBT_PROP_ATOM(NET_WM_MOVERESIZE_SIZE_KEYBOARD) ||
1415                 (Atom)e->xclient.data.l[2] ==
1416                 OBT_PROP_ATOM(NET_WM_MOVERESIZE_MOVE_KEYBOARD))
1417             {
1418                 moveresize_start(client, e->xclient.data.l[0],
1419                                  e->xclient.data.l[1], e->xclient.data.l[3],
1420                                  e->xclient.data.l[2]);
1421             }
1422             else if ((Atom)e->xclient.data.l[2] ==
1423                      OBT_PROP_ATOM(NET_WM_MOVERESIZE_CANCEL))
1424                 moveresize_end(TRUE);
1425         } else if (msgtype == OBT_PROP_ATOM(NET_MOVERESIZE_WINDOW)) {
1426             gint ograv, x, y, w, h;
1427
1428             ograv = client->gravity;
1429
1430             if (e->xclient.data.l[0] & 0xff)
1431                 client->gravity = e->xclient.data.l[0] & 0xff;
1432
1433             if (e->xclient.data.l[0] & 1 << 8)
1434                 x = e->xclient.data.l[1];
1435             else
1436                 x = client->area.x;
1437             if (e->xclient.data.l[0] & 1 << 9)
1438                 y = e->xclient.data.l[2];
1439             else
1440                 y = client->area.y;
1441
1442             if (e->xclient.data.l[0] & 1 << 10) {
1443                 w = e->xclient.data.l[3];
1444
1445                 /* if x was not given, then use gravity to figure out the new
1446                    x.  the reference point should not be moved */
1447                 if (!(e->xclient.data.l[0] & 1 << 8))
1448                     client_gravity_resize_w(client, &x, client->area.width, w);
1449             }
1450             else
1451                 w = client->area.width;
1452
1453             if (e->xclient.data.l[0] & 1 << 11) {
1454                 h = e->xclient.data.l[4];
1455
1456                 /* same for y */
1457                 if (!(e->xclient.data.l[0] & 1 << 9))
1458                     client_gravity_resize_h(client, &y, client->area.height,h);
1459             }
1460             else
1461                 h = client->area.height;
1462
1463             ob_debug("MOVERESIZE x %d %d y %d %d (gravity %d)",
1464                      e->xclient.data.l[0] & 1 << 8, x,
1465                      e->xclient.data.l[0] & 1 << 9, y,
1466                      client->gravity);
1467
1468             client_find_onscreen(client, &x, &y, w, h, FALSE);
1469
1470             client_configure(client, x, y, w, h, FALSE, TRUE, FALSE);
1471
1472             client->gravity = ograv;
1473         } else if (msgtype == OBT_PROP_ATOM(NET_RESTACK_WINDOW)) {
1474             if (e->xclient.data.l[0] != 2) {
1475                 ob_debug_type(OB_DEBUG_APP_BUGS,
1476                               "_NET_RESTACK_WINDOW sent for window %s with "
1477                               "invalid source indication %ld",
1478                               client->title, e->xclient.data.l[0]);
1479             } else {
1480                 ObClient *sibling = NULL;
1481                 if (e->xclient.data.l[1]) {
1482                     ObWindow *win = window_find(e->xclient.data.l[1]);
1483                     if (WINDOW_IS_CLIENT(win) &&
1484                         WINDOW_AS_CLIENT(win) != client)
1485                     {
1486                         sibling = WINDOW_AS_CLIENT(win);
1487                     }
1488                     if (sibling == NULL)
1489                         ob_debug_type(OB_DEBUG_APP_BUGS,
1490                                       "_NET_RESTACK_WINDOW sent for window %s "
1491                                       "with invalid sibling 0x%x",
1492                                  client->title, e->xclient.data.l[1]);
1493                 }
1494                 if (e->xclient.data.l[2] == Below ||
1495                     e->xclient.data.l[2] == BottomIf ||
1496                     e->xclient.data.l[2] == Above ||
1497                     e->xclient.data.l[2] == TopIf ||
1498                     e->xclient.data.l[2] == Opposite)
1499                 {
1500                     gulong ignore_start;
1501
1502                     if (!config_focus_under_mouse)
1503                         ignore_start = event_start_ignore_all_enters();
1504                     /* just raise, don't activate */
1505                     stacking_restack_request(client, sibling,
1506                                              e->xclient.data.l[2]);
1507                     if (!config_focus_under_mouse)
1508                         event_end_ignore_all_enters(ignore_start);
1509
1510                     /* send a synthetic ConfigureNotify, cuz this is supposed
1511                        to be like a ConfigureRequest. */
1512                     client_reconfigure(client, TRUE);
1513                 } else
1514                     ob_debug_type(OB_DEBUG_APP_BUGS,
1515                                   "_NET_RESTACK_WINDOW sent for window %s "
1516                                   "with invalid detail %d",
1517                                   client->title, e->xclient.data.l[2]);
1518             }
1519         }
1520         break;
1521     case PropertyNotify:
1522         /* validate cuz we query stuff off the client here */
1523         if (!client_validate(client)) break;
1524
1525         /* compress changes to a single property into a single change */
1526         while (XCheckTypedWindowEvent(obt_display, client->window,
1527                                       e->type, &ce)) {
1528             Atom a, b;
1529
1530             /* XXX: it would be nice to compress ALL changes to a property,
1531                not just changes in a row without other props between. */
1532
1533             a = ce.xproperty.atom;
1534             b = e->xproperty.atom;
1535
1536             if (a == b)
1537                 continue;
1538             if ((a == OBT_PROP_ATOM(NET_WM_NAME) ||
1539                  a == OBT_PROP_ATOM(WM_NAME) ||
1540                  a == OBT_PROP_ATOM(NET_WM_ICON_NAME) ||
1541                  a == OBT_PROP_ATOM(WM_ICON_NAME))
1542                 &&
1543                 (b == OBT_PROP_ATOM(NET_WM_NAME) ||
1544                  b == OBT_PROP_ATOM(WM_NAME) ||
1545                  b == OBT_PROP_ATOM(NET_WM_ICON_NAME) ||
1546                  b == OBT_PROP_ATOM(WM_ICON_NAME))) {
1547                 continue;
1548             }
1549             if (a == OBT_PROP_ATOM(NET_WM_ICON) &&
1550                 b == OBT_PROP_ATOM(NET_WM_ICON))
1551                 continue;
1552
1553             XPutBackEvent(obt_display, &ce);
1554             break;
1555         }
1556
1557         msgtype = e->xproperty.atom;
1558         if (msgtype == XA_WM_NORMAL_HINTS) {
1559             int x, y, w, h, lw, lh;
1560
1561             ob_debug("Update NORMAL hints");
1562             client_update_normal_hints(client);
1563             /* normal hints can make a window non-resizable */
1564             client_setup_decor_and_functions(client, FALSE);
1565
1566             x = client->area.x;
1567             y = client->area.y;
1568             w = client->area.width;
1569             h = client->area.height;
1570
1571             /* apply the new normal hints */
1572             client_try_configure(client, &x, &y, &w, &h, &lw, &lh, FALSE);
1573             /* make sure the window is visible, and if the window is resized
1574                off-screen due to the normal hints changing then this will push
1575                it back onto the screen. */
1576             client_find_onscreen(client, &x, &y, w, h, FALSE);
1577
1578             /* make sure the client's sizes are within its bounds, but don't
1579                make it reply with a configurenotify unless something changed.
1580                emacs will update its normal hints every time it receives a
1581                configurenotify */
1582             client_configure(client, x, y, w, h, FALSE, TRUE, FALSE);
1583         } else if (msgtype == OBT_PROP_ATOM(MOTIF_WM_HINTS)) {
1584             client_get_mwm_hints(client);
1585             /* This can override some mwm hints */
1586             client_get_type_and_transientness(client);
1587
1588             /* Apply the changes to the window */
1589             client_setup_decor_and_functions(client, TRUE);
1590         } else if (msgtype == XA_WM_HINTS) {
1591             client_update_wmhints(client);
1592         } else if (msgtype == XA_WM_TRANSIENT_FOR) {
1593             client_update_transient_for(client);
1594             client_get_type_and_transientness(client);
1595             /* type may have changed, so update the layer */
1596             client_calc_layer(client);
1597             client_setup_decor_and_functions(client, TRUE);
1598         } else if (msgtype == OBT_PROP_ATOM(NET_WM_NAME) ||
1599                    msgtype == OBT_PROP_ATOM(WM_NAME) ||
1600                    msgtype == OBT_PROP_ATOM(NET_WM_ICON_NAME) ||
1601                    msgtype == OBT_PROP_ATOM(WM_ICON_NAME)) {
1602             client_update_title(client);
1603         } else if (msgtype == OBT_PROP_ATOM(WM_PROTOCOLS)) {
1604             client_update_protocols(client);
1605             client_setup_decor_and_functions(client, TRUE);
1606         }
1607         else if (msgtype == OBT_PROP_ATOM(NET_WM_STRUT) ||
1608                  msgtype == OBT_PROP_ATOM(NET_WM_STRUT_PARTIAL)) {
1609             client_update_strut(client);
1610         }
1611         else if (msgtype == OBT_PROP_ATOM(NET_WM_ICON)) {
1612             client_update_icons(client);
1613         }
1614         else if (msgtype == OBT_PROP_ATOM(NET_WM_ICON_GEOMETRY)) {
1615             client_update_icon_geometry(client);
1616         }
1617         else if (msgtype == OBT_PROP_ATOM(NET_WM_USER_TIME)) {
1618             guint32 t;
1619             if (client == focus_client &&
1620                 OBT_PROP_GET32(client->window, NET_WM_USER_TIME, CARDINAL, &t)
1621                 && t && !event_time_after(t, e->xproperty.time) &&
1622                 (!event_last_user_time ||
1623                  event_time_after(t, event_last_user_time)))
1624             {
1625                 event_last_user_time = t;
1626             }
1627         }
1628 #ifdef SYNC
1629         else if (msgtype == OBT_PROP_ATOM(NET_WM_SYNC_REQUEST_COUNTER)) {
1630             client_update_sync_request_counter(client);
1631         }
1632 #endif
1633         break;
1634     case ColormapNotify:
1635         client_update_colormap(client, e->xcolormap.colormap);
1636         break;
1637     default:
1638         ;
1639 #ifdef SHAPE
1640         {
1641             int kind;
1642             if (obt_display_extension_shape &&
1643                 e->type == obt_display_extension_shape_basep)
1644             {
1645                 switch (((XShapeEvent*)e)->kind) {
1646                     case ShapeBounding:
1647                     case ShapeClip:
1648                         client->shaped = ((XShapeEvent*)e)->shaped;
1649                         kind = ShapeBounding;
1650                         break;
1651                     case ShapeInput:
1652                         client->shaped_input = ((XShapeEvent*)e)->shaped;
1653                         kind = ShapeInput;
1654                         break;
1655                     default:
1656                         g_assert_not_reached();
1657                 }
1658                 frame_adjust_shape_kind(client->frame, kind);
1659             }
1660         }
1661 #endif
1662     }
1663 }
1664
1665 static void event_handle_dock(ObDock *s, XEvent *e)
1666 {
1667     switch (e->type) {
1668     case ButtonPress:
1669         if (e->xbutton.button == 1)
1670             stacking_raise(DOCK_AS_WINDOW(s));
1671         else if (e->xbutton.button == 2)
1672             stacking_lower(DOCK_AS_WINDOW(s));
1673         break;
1674     case EnterNotify:
1675         dock_hide(FALSE);
1676         break;
1677     case LeaveNotify:
1678         /* don't hide when moving into a dock app */
1679         if (e->xcrossing.detail != NotifyInferior)
1680             dock_hide(TRUE);
1681         break;
1682     }
1683 }
1684
1685 static void event_handle_dockapp(ObDockApp *app, XEvent *e)
1686 {
1687     switch (e->type) {
1688     case MotionNotify:
1689         dock_app_drag(app, &e->xmotion);
1690         break;
1691     case UnmapNotify:
1692         if (app->ignore_unmaps) {
1693             app->ignore_unmaps--;
1694             break;
1695         }
1696         dock_unmanage(app, TRUE);
1697         break;
1698     case DestroyNotify:
1699     case ReparentNotify:
1700         dock_unmanage(app, FALSE);
1701         break;
1702     case ConfigureNotify:
1703         dock_app_configure(app, e->xconfigure.width, e->xconfigure.height);
1704         break;
1705     }
1706 }
1707
1708 static ObMenuFrame* find_active_menu(void)
1709 {
1710     GList *it;
1711     ObMenuFrame *ret = NULL;
1712
1713     for (it = menu_frame_visible; it; it = g_list_next(it)) {
1714         ret = it->data;
1715         if (ret->selected)
1716             break;
1717         ret = NULL;
1718     }
1719     return ret;
1720 }
1721
1722 static ObMenuFrame* find_active_or_last_menu(void)
1723 {
1724     ObMenuFrame *ret = NULL;
1725
1726     ret = find_active_menu();
1727     if (!ret && menu_frame_visible)
1728         ret = menu_frame_visible->data;
1729     return ret;
1730 }
1731
1732 static gboolean event_handle_prompt(ObPrompt *p, XEvent *e)
1733 {
1734     switch (e->type) {
1735     case ButtonPress:
1736     case ButtonRelease:
1737     case MotionNotify:
1738         return prompt_mouse_event(p, e);
1739         break;
1740     case KeyPress:
1741         return prompt_key_event(p, e);
1742         break;
1743     }
1744     return FALSE;
1745 }
1746
1747 static gboolean event_handle_menu_input(XEvent *ev)
1748 {
1749     gboolean ret = FALSE;
1750
1751     if (ev->type == ButtonRelease || ev->type == ButtonPress) {
1752         ObMenuEntryFrame *e;
1753
1754         if (menu_hide_delay_reached() &&
1755             (ev->xbutton.button < 4 || ev->xbutton.button > 5))
1756         {
1757             if ((e = menu_entry_frame_under(ev->xbutton.x_root,
1758                                             ev->xbutton.y_root)))
1759             {
1760                 if (ev->type == ButtonPress && e->frame->child)
1761                     menu_frame_select(e->frame->child, NULL, TRUE);
1762                 menu_frame_select(e->frame, e, TRUE);
1763                 if (ev->type == ButtonRelease)
1764                     menu_entry_frame_execute(e, ev->xbutton.state);
1765             }
1766             else if (ev->type == ButtonRelease)
1767                 menu_frame_hide_all();
1768         }
1769         ret = TRUE;
1770     }
1771     else if (ev->type == MotionNotify) {
1772         ObMenuFrame *f;
1773         ObMenuEntryFrame *e;
1774
1775         if ((e = menu_entry_frame_under(ev->xmotion.x_root,
1776                                         ev->xmotion.y_root)))
1777             if (!(f = find_active_menu()) ||
1778                 f == e->frame ||
1779                 f->parent == e->frame ||
1780                 f->child == e->frame)
1781                 menu_frame_select(e->frame, e, FALSE);
1782     }
1783     else if (ev->type == KeyPress || ev->type == KeyRelease) {
1784         guint keycode, state;
1785         gunichar unikey;
1786         ObMenuFrame *frame;
1787
1788         keycode = ev->xkey.keycode;
1789         state = ev->xkey.state;
1790         unikey = obt_keyboard_keycode_to_unichar(keycode);
1791
1792         frame = find_active_or_last_menu();
1793         if (frame == NULL)
1794             g_assert_not_reached(); /* there is no active menu */
1795
1796         /* Allow control while going thru the menu */
1797         else if (ev->type == KeyPress && (state & ~ControlMask) == 0) {
1798             frame->got_press = TRUE;
1799
1800             if (ob_keycode_match(keycode, OB_KEY_ESCAPE)) {
1801                 menu_frame_hide_all();
1802                 ret = TRUE;
1803             }
1804
1805             else if (ob_keycode_match(keycode, OB_KEY_LEFT)) {
1806                 /* Left goes to the parent menu */
1807                 if (frame->parent) {
1808                     /* remove focus from the child */
1809                     menu_frame_select(frame, NULL, TRUE);
1810                     /* and put it in the parent */
1811                     menu_frame_select(frame->parent, frame->parent->selected,
1812                                       TRUE);
1813                 }
1814                 ret = TRUE;
1815             }
1816
1817             else if (ob_keycode_match(keycode, OB_KEY_RIGHT)) {
1818                 /* Right goes to the selected submenu */
1819                 if (frame->selected->entry->type == OB_MENU_ENTRY_TYPE_SUBMENU)
1820                 {
1821                     /* make sure it is visible */
1822                     menu_frame_select(frame, frame->selected, TRUE);
1823                     menu_frame_select_next(frame->child);
1824                 }
1825                 ret = TRUE;
1826             }
1827
1828             else if (ob_keycode_match(keycode, OB_KEY_UP)) {
1829                 menu_frame_select_previous(frame);
1830                 ret = TRUE;
1831             }
1832
1833             else if (ob_keycode_match(keycode, OB_KEY_DOWN)) {
1834                 menu_frame_select_next(frame);
1835                 ret = TRUE;
1836             }
1837
1838             else if (ob_keycode_match(keycode, OB_KEY_HOME)) {
1839                 menu_frame_select_first(frame);
1840                 ret = TRUE;
1841             }
1842
1843             else if (ob_keycode_match(keycode, OB_KEY_END)) {
1844                 menu_frame_select_last(frame);
1845                 ret = TRUE;
1846             }
1847         }
1848
1849         /* Use KeyRelease events for running things so that the key release
1850            doesn't get sent to the focused application.
1851
1852            Allow ControlMask only, and don't bother if the menu is empty */
1853         else if (ev->type == KeyRelease && (state & ~ControlMask) == 0 &&
1854                  frame->entries && frame->got_press)
1855         {
1856             if (ob_keycode_match(keycode, OB_KEY_RETURN)) {
1857                 /* Enter runs the active item or goes into the submenu.
1858                    Control-Enter runs it without closing the menu. */
1859                 if (frame->child)
1860                     menu_frame_select_next(frame->child);
1861                 else if (frame->selected)
1862                     menu_entry_frame_execute(frame->selected, state);
1863
1864                 ret = TRUE;
1865             }
1866
1867             /* keyboard accelerator shortcuts. (if it was a valid key) */
1868             else if (unikey != 0) {
1869                 GList *start;
1870                 GList *it;
1871                 ObMenuEntryFrame *found = NULL;
1872                 guint num_found = 0;
1873
1874                 /* start after the selected one */
1875                 start = frame->entries;
1876                 if (frame->selected) {
1877                     for (it = start; frame->selected != it->data;
1878                          it = g_list_next(it))
1879                         g_assert(it != NULL); /* nothing was selected? */
1880                     /* next with wraparound */
1881                     start = g_list_next(it);
1882                     if (start == NULL) start = frame->entries;
1883                 }
1884
1885                 it = start;
1886                 do {
1887                     ObMenuEntryFrame *e = it->data;
1888                     gunichar entrykey = 0;
1889
1890                     if (e->entry->type == OB_MENU_ENTRY_TYPE_NORMAL)
1891                         entrykey = e->entry->data.normal.shortcut;
1892                     else if (e->entry->type == OB_MENU_ENTRY_TYPE_SUBMENU)
1893                         entrykey = e->entry->data.submenu.submenu->shortcut;
1894
1895                     if (unikey == entrykey) {
1896                         if (found == NULL) found = e;
1897                         ++num_found;
1898                     }
1899
1900                     /* next with wraparound */
1901                     it = g_list_next(it);
1902                     if (it == NULL) it = frame->entries;
1903                 } while (it != start);
1904
1905                 if (found) {
1906                     if (found->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
1907                         num_found == 1)
1908                     {
1909                         menu_frame_select(frame, found, TRUE);
1910                         usleep(50000); /* highlight the item for a short bit so
1911                                           the user can see what happened */
1912                         menu_entry_frame_execute(found, state);
1913                     } else {
1914                         menu_frame_select(frame, found, TRUE);
1915                         if (num_found == 1)
1916                             menu_frame_select_next(frame->child);
1917                     }
1918
1919                     ret = TRUE;
1920                 }
1921             }
1922         }
1923     }
1924
1925     return ret;
1926 }
1927
1928 static Bool event_look_for_menu_enter(Display *d, XEvent *ev, XPointer arg)
1929 {
1930     ObMenuFrame *f = (ObMenuFrame*)arg;
1931     ObMenuEntryFrame *e;
1932     return ev->type == EnterNotify &&
1933         (e = g_hash_table_lookup(menu_frame_map, &ev->xcrossing.window)) &&
1934         !e->ignore_enters && e->frame == f;
1935 }
1936
1937 static void event_handle_menu(ObMenuFrame *frame, XEvent *ev)
1938 {
1939     ObMenuFrame *f;
1940     ObMenuEntryFrame *e;
1941
1942     switch (ev->type) {
1943     case EnterNotify:
1944         if ((e = g_hash_table_lookup(menu_frame_map, &ev->xcrossing.window))) {
1945             if (e->ignore_enters)
1946                 --e->ignore_enters;
1947             else if (!(f = find_active_menu()) ||
1948                      f == e->frame ||
1949                      f->parent == e->frame ||
1950                      f->child == e->frame)
1951                 menu_frame_select(e->frame, e, FALSE);
1952         }
1953         break;
1954     case LeaveNotify:
1955         /*ignore leaves when we're already in the window */
1956         if (ev->xcrossing.detail == NotifyInferior)
1957             break;
1958
1959         if ((e = g_hash_table_lookup(menu_frame_map, &ev->xcrossing.window)))
1960         {
1961             XEvent ce;
1962
1963             /* check if an EnterNotify event is coming, and if not, then select
1964                nothing in the menu */
1965             if (XCheckIfEvent(obt_display, &ce, event_look_for_menu_enter,
1966                               (XPointer)e->frame))
1967                 XPutBackEvent(obt_display, &ce);
1968             else
1969                 menu_frame_select(e->frame, NULL, FALSE);
1970         }
1971         break;
1972     }
1973 }
1974
1975 static gboolean event_handle_user_input(ObClient *client, XEvent *e)
1976 {
1977     g_assert(e->type == ButtonPress || e->type == ButtonRelease ||
1978              e->type == MotionNotify || e->type == KeyPress ||
1979              e->type == KeyRelease);
1980
1981     if (menu_frame_visible) {
1982         if (event_handle_menu_input(e))
1983             /* don't use the event if the menu used it, but if the menu
1984                didn't use it and it's a keypress that is bound, it will
1985                close the menu and be used */
1986             return TRUE;
1987     }
1988
1989     /* if the keyboard interactive action uses the event then dont
1990        use it for bindings. likewise is moveresize uses the event. */
1991     if (actions_interactive_input_event(e) || moveresize_event(e))
1992         return TRUE;
1993
1994     if (moveresize_in_progress)
1995         /* make further actions work on the client being
1996            moved/resized */
1997         client = moveresize_client;
1998
1999     if (e->type == ButtonPress ||
2000         e->type == ButtonRelease ||
2001         e->type == MotionNotify)
2002     {
2003         /* the frame may not be "visible" but they can still click on it
2004            in the case where it is animating before disappearing */
2005         if (!client || !frame_iconify_animating(client->frame))
2006             return mouse_event(client, e);
2007     } else
2008         return keyboard_event((focus_cycle_target ? focus_cycle_target :
2009                                (client ? client : focus_client)), e);
2010
2011     return FALSE;
2012 }
2013
2014 static void focus_delay_dest(gpointer data)
2015 {
2016     g_free(data);
2017 }
2018
2019 static gboolean focus_delay_cmp(gconstpointer d1, gconstpointer d2)
2020 {
2021     const ObFocusDelayData *f1 = d1;
2022     return f1->client == d2;
2023 }
2024
2025 static gboolean focus_delay_func(gpointer data)
2026 {
2027     ObFocusDelayData *d = data;
2028     Time old = event_curtime;
2029
2030     event_curtime = d->time;
2031     event_curserial = d->serial;
2032     if (client_focus(d->client) && config_focus_raise)
2033         stacking_raise(CLIENT_AS_WINDOW(d->client));
2034     event_curtime = old;
2035     return FALSE; /* no repeat */
2036 }
2037
2038 static gboolean unfocus_delay_func(gpointer data)
2039 {
2040     ObFocusDelayData *d = data;
2041     Time old = event_curtime;
2042
2043     event_curtime = d->time;
2044     event_curserial = d->serial;
2045     focus_nothing();
2046     event_curtime = old;
2047     return FALSE; /* no repeat */
2048 }
2049
2050 static void focus_delay_client_dest(ObClient *client, gpointer data)
2051 {
2052     obt_main_loop_timeout_remove_data(ob_main_loop, focus_delay_func,
2053                                       client, FALSE);
2054     obt_main_loop_timeout_remove_data(ob_main_loop, unfocus_delay_func,
2055                                       client, FALSE);
2056 }
2057
2058 void event_halt_focus_delay(void)
2059 {
2060     /* ignore all enter events up till the event which caused this to occur */
2061     if (event_curserial) event_ignore_enter_range(1, event_curserial);
2062     obt_main_loop_timeout_remove(ob_main_loop, focus_delay_func);
2063     obt_main_loop_timeout_remove(ob_main_loop, unfocus_delay_func);
2064 }
2065
2066 gulong event_start_ignore_all_enters(void)
2067 {
2068     return NextRequest(obt_display);
2069 }
2070
2071 static void event_ignore_enter_range(gulong start, gulong end)
2072 {
2073     ObSerialRange *r;
2074
2075     g_assert(start != 0);
2076     g_assert(end != 0);
2077
2078     r = g_new(ObSerialRange, 1);
2079     r->start = start;
2080     r->end = end;
2081     ignore_serials = g_slist_prepend(ignore_serials, r);
2082
2083     ob_debug_type(OB_DEBUG_FOCUS, "ignoring enters from %lu until %lu",
2084                   r->start, r->end);
2085
2086     /* increment the serial so we don't ignore events we weren't meant to */
2087     OBT_PROP_ERASE(screen_support_win, MOTIF_WM_HINTS);
2088 }
2089
2090 void event_end_ignore_all_enters(gulong start)
2091 {
2092     /* Use (NextRequest-1) so that we ignore up to the current serial only.
2093        Inside event_ignore_enter_range, we increment the serial by one, but if
2094        we ignore that serial too, then any enter events generated by mouse
2095        movement will be ignored until we create some further network traffic.
2096        Instead ignore up to NextRequest-1, then when we increment the serial,
2097        we will be *past* the range of ignored serials */
2098     event_ignore_enter_range(start, NextRequest(obt_display)-1);
2099 }
2100
2101 static gboolean is_enter_focus_event_ignored(gulong serial)
2102 {
2103     GSList *it, *next;
2104
2105     for (it = ignore_serials; it; it = next) {
2106         ObSerialRange *r = it->data;
2107
2108         next = g_slist_next(it);
2109
2110         if ((glong)(serial - r->end) > 0) {
2111             /* past the end */
2112             ignore_serials = g_slist_delete_link(ignore_serials, it);
2113             g_free(r);
2114         }
2115         else if ((glong)(serial - r->start) >= 0)
2116             return TRUE;
2117     }
2118     return FALSE;
2119 }
2120
2121 void event_cancel_all_key_grabs(void)
2122 {
2123     if (actions_interactive_act_running()) {
2124         actions_interactive_cancel_act();
2125         ob_debug("KILLED interactive action");
2126     }
2127     else if (menu_frame_visible) {
2128         menu_frame_hide_all();
2129         ob_debug("KILLED open menus");
2130     }
2131     else if (moveresize_in_progress) {
2132         moveresize_end(TRUE);
2133         ob_debug("KILLED interactive moveresize");
2134     }
2135     else if (grab_on_keyboard()) {
2136         ungrab_keyboard();
2137         ob_debug("KILLED active grab on keyboard");
2138     }
2139     else
2140         ungrab_passive_key();
2141
2142     XSync(obt_display, FALSE);
2143 }
2144
2145 gboolean event_time_after(guint32 t1, guint32 t2)
2146 {
2147     g_assert(t1 != CurrentTime);
2148     g_assert(t2 != CurrentTime);
2149
2150     /*
2151       Timestamp values wrap around (after about 49.7 days). The server, given
2152       its current time is represented by timestamp T, always interprets
2153       timestamps from clients by treating half of the timestamp space as being
2154       later in time than T.
2155       - http://tronche.com/gui/x/xlib/input/pointer-grabbing.html
2156     */
2157
2158     /* TIME_HALF is not half of the number space of a Time type variable.
2159      * Rather, it is half the number space of a timestamp value, which is
2160      * always 32 bits. */
2161 #define TIME_HALF (guint32)(1 << 31)
2162
2163     if (t2 >= TIME_HALF)
2164         /* t2 is in the second half so t1 might wrap around and be smaller than
2165            t2 */
2166         return t1 >= t2 || t1 < (t2 + TIME_HALF);
2167     else
2168         /* t2 is in the first half so t1 has to come after it */
2169         return t1 >= t2 && t1 < (t2 + TIME_HALF);
2170 }
2171
2172 Time event_get_server_time(void)
2173 {
2174     /* Generate a timestamp */
2175     XEvent event;
2176
2177     XChangeProperty(obt_display, screen_support_win,
2178                     OBT_PROP_ATOM(WM_CLASS), OBT_PROP_ATOM(STRING),
2179                     8, PropModeAppend, NULL, 0);
2180     XWindowEvent(obt_display, screen_support_win, PropertyChangeMask, &event);
2181     return event.xproperty.time;
2182 }