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