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