openbox/focus.c

   1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
   2
   3    focus.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 "debug.h"
  21 #include "event.h"
  22 #include "openbox.h"
  23 #include "grab.h"
  24 #include "framerender.h"
  25 #include "client.h"
  26 #include "config.h"
  27 #include "frame.h"
  28 #include "screen.h"
  29 #include "group.h"
  30 #include "prop.h"
  31 #include "focus.h"
  32 #include "stacking.h"
  33 #include "popup.h"
  34 #include "render/render.h"
  35
  36 #include <X11/Xlib.h>
  37 #include <glib.h>
  38 #include <assert.h>
  39
  40 ObClient *focus_client = NULL;
  41 GList *focus_order = NULL;
  42 ObClient *focus_cycle_target = NULL;
  43
  44 struct {
  45     InternalWindow top;
  46     InternalWindow left;
  47     InternalWindow right;
  48     InternalWindow bottom;
  49 } focus_indicator;
  50
  51 RrAppearance *a_focus_indicator;
  52 RrColor *color_white;
  53
  54 static ObIconPopup *focus_cycle_popup;
  55
  56 static void focus_cycle_destructor(ObClient *client, gpointer data)
  57 {
  58     /* end cycling if the target disappears. CurrentTime is fine, time won't
  59        be used
  60     */
  61     if (focus_cycle_target == client)
  62         focus_cycle(TRUE, TRUE, TRUE, TRUE, TRUE, TRUE);
  63 }
  64
  65 static Window createWindow(Window parent, gulong mask,
  66                            XSetWindowAttributes *attrib)
  67 {
  68     return XCreateWindow(ob_display, parent, 0, 0, 1, 1, 0,
  69                          RrDepth(ob_rr_inst), InputOutput,
  70                          RrVisual(ob_rr_inst), mask, attrib);
  71
  72 }
  73
  74 void focus_startup(gboolean reconfig)
  75 {
  76     focus_cycle_popup = icon_popup_new(TRUE);
  77
  78     if (!reconfig) {
  79         XSetWindowAttributes attr;
  80
  81         client_add_destructor(focus_cycle_destructor, NULL);
  82
  83         /* start with nothing focused */
  84         focus_nothing();
  85
  86         focus_indicator.top.obwin.type = Window_Internal;
  87         focus_indicator.left.obwin.type = Window_Internal;
  88         focus_indicator.right.obwin.type = Window_Internal;
  89         focus_indicator.bottom.obwin.type = Window_Internal;
  90
  91         attr.override_redirect = True;
  92         attr.background_pixel = BlackPixel(ob_display, ob_screen);
  93         focus_indicator.top.win =
  94             createWindow(RootWindow(ob_display, ob_screen),
  95                          CWOverrideRedirect | CWBackPixel, &attr);
  96         focus_indicator.left.win =
  97             createWindow(RootWindow(ob_display, ob_screen),
  98                          CWOverrideRedirect | CWBackPixel, &attr);
  99         focus_indicator.right.win =
 100             createWindow(RootWindow(ob_display, ob_screen),
 101                          CWOverrideRedirect | CWBackPixel, &attr);
 102         focus_indicator.bottom.win =
 103             createWindow(RootWindow(ob_display, ob_screen),
 104                          CWOverrideRedirect | CWBackPixel, &attr);
 105
 106         stacking_add(INTERNAL_AS_WINDOW(&focus_indicator.top));
 107         stacking_add(INTERNAL_AS_WINDOW(&focus_indicator.left));
 108         stacking_add(INTERNAL_AS_WINDOW(&focus_indicator.right));
 109         stacking_add(INTERNAL_AS_WINDOW(&focus_indicator.bottom));
 110
 111         color_white = RrColorNew(ob_rr_inst, 0xff, 0xff, 0xff);
 112
 113         a_focus_indicator = RrAppearanceNew(ob_rr_inst, 4);
 114         a_focus_indicator->surface.grad = RR_SURFACE_SOLID;
 115         a_focus_indicator->surface.relief = RR_RELIEF_FLAT;
 116         a_focus_indicator->surface.primary = RrColorNew(ob_rr_inst,
 117                                                         0, 0, 0);
 118         a_focus_indicator->texture[0].type = RR_TEXTURE_LINE_ART;
 119         a_focus_indicator->texture[0].data.lineart.color = color_white;
 120         a_focus_indicator->texture[1].type = RR_TEXTURE_LINE_ART;
 121         a_focus_indicator->texture[1].data.lineart.color = color_white;
 122         a_focus_indicator->texture[2].type = RR_TEXTURE_LINE_ART;
 123         a_focus_indicator->texture[2].data.lineart.color = color_white;
 124         a_focus_indicator->texture[3].type = RR_TEXTURE_LINE_ART;
 125         a_focus_indicator->texture[3].data.lineart.color = color_white;
 126     }
 127 }
 128
 129 void focus_shutdown(gboolean reconfig)
 130 {
 131     icon_popup_free(focus_cycle_popup);
 132
 133     if (!reconfig) {
 134         client_remove_destructor(focus_cycle_destructor);
 135
 136         /* reset focus to root */
 137         XSetInputFocus(ob_display, PointerRoot, RevertToNone, CurrentTime);
 138
 139         RrColorFree(color_white);
 140
 141         RrAppearanceFree(a_focus_indicator);
 142
 143         XDestroyWindow(ob_display, focus_indicator.top.win);
 144         XDestroyWindow(ob_display, focus_indicator.left.win);
 145         XDestroyWindow(ob_display, focus_indicator.right.win);
 146         XDestroyWindow(ob_display, focus_indicator.bottom.win);
 147     }
 148 }
 149
 150 static void push_to_top(ObClient *client)
 151 {
 152     focus_order = g_list_remove(focus_order, client);
 153     focus_order = g_list_prepend(focus_order, client);
 154 }
 155
 156 void focus_set_client(ObClient *client)
 157 {
 158     Window active;
 159
 160     ob_debug_type(OB_DEBUG_FOCUS,
 161                   "focus_set_client 0x%lx\n", client ? client->window : 0);
 162
 163     /* uninstall the old colormap, and install the new one */
 164     screen_install_colormap(focus_client, FALSE);
 165     screen_install_colormap(client, TRUE);
 166
 167     /* in the middle of cycling..? kill it. CurrentTime is fine, time won't
 168        be used.
 169     */
 170     if (focus_cycle_target)
 171         focus_cycle(TRUE, TRUE, TRUE, TRUE, TRUE, TRUE);
 172
 173     focus_client = client;
 174
 175     if (client != NULL) {
 176         /* move to the top of the list */
 177         push_to_top(client);
 178         /* remove hiliting from the window when it gets focused */
 179         client_hilite(client, FALSE);
 180     }
 181
 182     /* set the NET_ACTIVE_WINDOW hint, but preserve it on shutdown */
 183     if (ob_state() != OB_STATE_EXITING) {
 184         active = client ? client->window : None;
 185         PROP_SET32(RootWindow(ob_display, ob_screen),
 186                    net_active_window, window, active);
 187     }
 188 }
 189
 190 ObClient* focus_fallback_target(gboolean allow_refocus, ObClient *old)
 191 {
 192     GList *it;
 193     ObClient *target = NULL;
 194     ObClient *desktop = NULL;
 195
 196     ob_debug_type(OB_DEBUG_FOCUS, "trying pointer stuff\n");
 197     if (config_focus_follow && !config_focus_last)
 198     {
 199         if ((target = client_under_pointer()))
 200             if (allow_refocus || target != old)
 201                 if (client_normal(target) && client_can_focus(target)) {
 202                     ob_debug_type(OB_DEBUG_FOCUS, "found in pointer stuff\n");
 203                     return target;
 204                 }
 205     }
 206
 207 #if 0
 208         /* try for group relations */
 209         if (old->group) {
 210             GSList *sit;
 211
 212             for (it = focus_order[screen_desktop]; it; it = g_list_next(it))
 213                 for (sit = old->group->members; sit; sit = g_slist_next(sit))
 214                     if (sit->data == it->data)
 215                         if (sit->data != old && client_normal(sit->data))
 216                             if (client_can_focus(sit->data))
 217                                 return sit->data;
 218         }
 219 #endif
 220
 221     ob_debug_type(OB_DEBUG_FOCUS, "trying omnipresentness\n");
 222     if (allow_refocus && old && old->desktop == DESKTOP_ALL &&
 223         client_normal(old))
 224     {
 225         return old;
 226     }
 227
 228
 229     ob_debug_type(OB_DEBUG_FOCUS, "trying  the focus order\n");
 230     for (it = focus_order; it; it = g_list_next(it))
 231         if (allow_refocus || it->data != old) {
 232             ObClient *c = it->data;
 233             /* fallback focus to a window if:
 234                1. it is actually focusable, cuz if it's not then we're sending
 235                focus off to nothing
 236                2. it is validated. if the window is about to disappear, then
 237                don't try focus it.
 238                3. it is visible on the current desktop. this ignores
 239                omnipresent windows, which are problematic in their own rite.
 240                4. it's not iconic
 241                5. it is a normal type window, don't fall back onto a dock or
 242                a splashscreen or a desktop window (save the desktop as a
 243                backup fallback though)
 244             */
 245             if (client_can_focus(c) && !c->iconic)
 246             {
 247                 if (c->desktop == screen_desktop && client_normal(c)) {
 248                     ob_debug_type(OB_DEBUG_FOCUS, "found in focus order\n");
 249                     return it->data;
 250                 } else if ((c->desktop == screen_desktop ||
 251                             c->desktop == DESKTOP_ALL) &&
 252                            c->type == OB_CLIENT_TYPE_DESKTOP &&
 253                            desktop == NULL)
 254                     desktop = c;
 255             }
 256         }
 257
 258     /* as a last resort fallback to the desktop window if there is one.
 259        (if there's more than one, then the one most recently focused.)
 260     */
 261     ob_debug_type(OB_DEBUG_FOCUS, "found desktop: \n", !!desktop);
 262     return desktop;
 263 }
 264
 265 void focus_fallback(gboolean allow_refocus)
 266 {
 267     ObClient *new;
 268     ObClient *old = focus_client;
 269
 270     /* unfocus any focused clients.. they can be focused by Pointer events
 271        and such, and then when I try focus them, I won't get a FocusIn event
 272        at all for them.
 273     */
 274     focus_nothing();
 275
 276     if ((new = focus_fallback_target(allow_refocus, old)))
 277         client_focus(new);
 278 }
 279
 280 void focus_nothing()
 281 {
 282     /* Install our own colormap */
 283     if (focus_client != NULL) {
 284         screen_install_colormap(focus_client, FALSE);
 285         screen_install_colormap(NULL, TRUE);
 286     }
 287
 288     focus_client = NULL;
 289
 290     /* when nothing will be focused, send focus to the backup target */
 291     XSetInputFocus(ob_display, screen_support_win, RevertToPointerRoot,
 292                    event_curtime);
 293 }
 294
 295 static void popup_cycle(ObClient *c, gboolean show)
 296 {
 297     if (!show) {
 298         icon_popup_hide(focus_cycle_popup);
 299     } else {
 300         Rect *a;
 301         ObClient *p = c;
 302         gchar *title = NULL;
 303
 304         a = screen_physical_area_monitor(0);
 305         icon_popup_position(focus_cycle_popup, CenterGravity,
 306                             a->x + a->width / 2, a->y + a->height / 2);
 307 /*        icon_popup_size(focus_cycle_popup, a->height/2, a->height/16);
 308         icon_popup_show(focus_cycle_popup, c->title,
 309                         client_icon(c, a->height/16, a->height/16));
 310 */
 311         /* XXX the size and the font extents need to be related on some level
 312          */
 313         icon_popup_size(focus_cycle_popup, POPUP_WIDTH, POPUP_HEIGHT);
 314
 315         /* use the transient's parent's title/icon */
 316         while (p->transient_for && p->transient_for != OB_TRAN_GROUP)
 317             p = p->transient_for;
 318
 319         if (p != c && !strcmp("", (c->iconic ? c->icon_title : c->title)))
 320             title = g_strdup(p->iconic ? p->icon_title : p->title);
 321             /*title = g_strconcat((c->iconic ? c->icon_title : c->title),
 322                                 " - ",
 323                                 (p->iconic ? p->icon_title : p->title),
 324                                 NULL);
 325             */
 326         icon_popup_show(focus_cycle_popup,
 327                         (title ? title :
 328                          (c->iconic ? c->icon_title : c->title)),
 329                         client_icon(p, 48, 48));
 330         g_free(title);
 331     }
 332 }
 333
 334 void focus_cycle_draw_indicator()
 335 {
 336     if (!focus_cycle_target) {
 337         XEvent e;
 338
 339         XUnmapWindow(ob_display, focus_indicator.top.win);
 340         XUnmapWindow(ob_display, focus_indicator.left.win);
 341         XUnmapWindow(ob_display, focus_indicator.right.win);
 342         XUnmapWindow(ob_display, focus_indicator.bottom.win);
 343
 344         /* kill enter events cause by this unmapping */
 345         event_ignore_queued_enters();
 346     } else {
 347         /*
 348           if (focus_cycle_target)
 349               frame_adjust_focus(focus_cycle_target->frame, FALSE);
 350           frame_adjust_focus(focus_cycle_target->frame, TRUE);
 351         */
 352         gint x, y, w, h;
 353         gint wt, wl, wr, wb;
 354
 355         wt = wl = wr = wb = MAX(3,
 356                                 MAX(1, MAX(ob_rr_theme->paddingx,
 357                                            ob_rr_theme->paddingy)) * 2 +
 358                                 ob_rr_theme->fbwidth * 2);
 359
 360         x = focus_cycle_target->frame->area.x;
 361         y = focus_cycle_target->frame->area.y;
 362         w = focus_cycle_target->frame->area.width;
 363         h = wt;
 364
 365         XMoveResizeWindow(ob_display, focus_indicator.top.win,
 366                           x, y, w, h);
 367         a_focus_indicator->texture[0].data.lineart.x1 = 0;
 368         a_focus_indicator->texture[0].data.lineart.y1 = h-1;
 369         a_focus_indicator->texture[0].data.lineart.x2 = 0;
 370         a_focus_indicator->texture[0].data.lineart.y2 = 0;
 371         a_focus_indicator->texture[1].data.lineart.x1 = 0;
 372         a_focus_indicator->texture[1].data.lineart.y1 = 0;
 373         a_focus_indicator->texture[1].data.lineart.x2 = w-1;
 374         a_focus_indicator->texture[1].data.lineart.y2 = 0;
 375         a_focus_indicator->texture[2].data.lineart.x1 = w-1;
 376         a_focus_indicator->texture[2].data.lineart.y1 = 0;
 377         a_focus_indicator->texture[2].data.lineart.x2 = w-1;
 378         a_focus_indicator->texture[2].data.lineart.y2 = h-1;
 379         a_focus_indicator->texture[3].data.lineart.x1 = (wl-1);
 380         a_focus_indicator->texture[3].data.lineart.y1 = h-1;
 381         a_focus_indicator->texture[3].data.lineart.x2 = w - wr;
 382         a_focus_indicator->texture[3].data.lineart.y2 = h-1;
 383         RrPaint(a_focus_indicator, focus_indicator.top.win,
 384                 w, h);
 385
 386         x = focus_cycle_target->frame->area.x;
 387         y = focus_cycle_target->frame->area.y;
 388         w = wl;
 389         h = focus_cycle_target->frame->area.height;
 390
 391         XMoveResizeWindow(ob_display, focus_indicator.left.win,
 392                           x, y, w, h);
 393         a_focus_indicator->texture[0].data.lineart.x1 = w-1;
 394         a_focus_indicator->texture[0].data.lineart.y1 = 0;
 395         a_focus_indicator->texture[0].data.lineart.x2 = 0;
 396         a_focus_indicator->texture[0].data.lineart.y2 = 0;
 397         a_focus_indicator->texture[1].data.lineart.x1 = 0;
 398         a_focus_indicator->texture[1].data.lineart.y1 = 0;
 399         a_focus_indicator->texture[1].data.lineart.x2 = 0;
 400         a_focus_indicator->texture[1].data.lineart.y2 = h-1;
 401         a_focus_indicator->texture[2].data.lineart.x1 = 0;
 402         a_focus_indicator->texture[2].data.lineart.y1 = h-1;
 403         a_focus_indicator->texture[2].data.lineart.x2 = w-1;
 404         a_focus_indicator->texture[2].data.lineart.y2 = h-1;
 405         a_focus_indicator->texture[3].data.lineart.x1 = w-1;
 406         a_focus_indicator->texture[3].data.lineart.y1 = wt-1;
 407         a_focus_indicator->texture[3].data.lineart.x2 = w-1;
 408         a_focus_indicator->texture[3].data.lineart.y2 = h - wb;
 409         RrPaint(a_focus_indicator, focus_indicator.left.win,
 410                 w, h);
 411
 412         x = focus_cycle_target->frame->area.x +
 413             focus_cycle_target->frame->area.width - wr;
 414         y = focus_cycle_target->frame->area.y;
 415         w = wr;
 416         h = focus_cycle_target->frame->area.height ;
 417
 418         XMoveResizeWindow(ob_display, focus_indicator.right.win,
 419                           x, y, w, h);
 420         a_focus_indicator->texture[0].data.lineart.x1 = 0;
 421         a_focus_indicator->texture[0].data.lineart.y1 = 0;
 422         a_focus_indicator->texture[0].data.lineart.x2 = w-1;
 423         a_focus_indicator->texture[0].data.lineart.y2 = 0;
 424         a_focus_indicator->texture[1].data.lineart.x1 = w-1;
 425         a_focus_indicator->texture[1].data.lineart.y1 = 0;
 426         a_focus_indicator->texture[1].data.lineart.x2 = w-1;
 427         a_focus_indicator->texture[1].data.lineart.y2 = h-1;
 428         a_focus_indicator->texture[2].data.lineart.x1 = w-1;
 429         a_focus_indicator->texture[2].data.lineart.y1 = h-1;
 430         a_focus_indicator->texture[2].data.lineart.x2 = 0;
 431         a_focus_indicator->texture[2].data.lineart.y2 = h-1;
 432         a_focus_indicator->texture[3].data.lineart.x1 = 0;
 433         a_focus_indicator->texture[3].data.lineart.y1 = wt-1;
 434         a_focus_indicator->texture[3].data.lineart.x2 = 0;
 435         a_focus_indicator->texture[3].data.lineart.y2 = h - wb;
 436         RrPaint(a_focus_indicator, focus_indicator.right.win,
 437                 w, h);
 438
 439         x = focus_cycle_target->frame->area.x;
 440         y = focus_cycle_target->frame->area.y +
 441             focus_cycle_target->frame->area.height - wb;
 442         w = focus_cycle_target->frame->area.width;
 443         h = wb;
 444
 445         XMoveResizeWindow(ob_display, focus_indicator.bottom.win,
 446                           x, y, w, h);
 447         a_focus_indicator->texture[0].data.lineart.x1 = 0;
 448         a_focus_indicator->texture[0].data.lineart.y1 = 0;
 449         a_focus_indicator->texture[0].data.lineart.x2 = 0;
 450         a_focus_indicator->texture[0].data.lineart.y2 = h-1;
 451         a_focus_indicator->texture[1].data.lineart.x1 = 0;
 452         a_focus_indicator->texture[1].data.lineart.y1 = h-1;
 453         a_focus_indicator->texture[1].data.lineart.x2 = w-1;
 454         a_focus_indicator->texture[1].data.lineart.y2 = h-1;
 455         a_focus_indicator->texture[2].data.lineart.x1 = w-1;
 456         a_focus_indicator->texture[2].data.lineart.y1 = h-1;
 457         a_focus_indicator->texture[2].data.lineart.x2 = w-1;
 458         a_focus_indicator->texture[2].data.lineart.y2 = 0;
 459         a_focus_indicator->texture[3].data.lineart.x1 = wl-1;
 460         a_focus_indicator->texture[3].data.lineart.y1 = 0;
 461         a_focus_indicator->texture[3].data.lineart.x2 = w - wr;
 462         a_focus_indicator->texture[3].data.lineart.y2 = 0;
 463         RrPaint(a_focus_indicator, focus_indicator.bottom.win,
 464                 w, h);
 465
 466         XMapWindow(ob_display, focus_indicator.top.win);
 467         XMapWindow(ob_display, focus_indicator.left.win);
 468         XMapWindow(ob_display, focus_indicator.right.win);
 469         XMapWindow(ob_display, focus_indicator.bottom.win);
 470     }
 471 }
 472
 473 static gboolean valid_focus_target(ObClient *ft)
 474 {
 475     /* we don't use client_can_focus here, because that doesn't let you
 476        focus an iconic window, but we want to be able to, so we just check
 477        if the focus flags on the window allow it, and its on the current
 478        desktop */
 479     if ((ft->type == OB_CLIENT_TYPE_NORMAL ||
 480          ft->type == OB_CLIENT_TYPE_DIALOG ||
 481          (!client_has_group_siblings(ft) &&
 482           (ft->type == OB_CLIENT_TYPE_TOOLBAR ||
 483            ft->type == OB_CLIENT_TYPE_MENU ||
 484            ft->type == OB_CLIENT_TYPE_UTILITY))) &&
 485         ((ft->can_focus || ft->focus_notify) &&
 486          !ft->skip_pager &&
 487          (ft->desktop == screen_desktop || ft->desktop == DESKTOP_ALL)) &&
 488         ft == client_focus_target(ft))
 489         return TRUE;
 490 /*
 491     {
 492         GSList *it;
 493
 494         for (it = ft->transients; it; it = g_slist_next(it)) {
 495             ObClient *c = it->data;
 496
 497             if (c->frame->visible)
 498                 return FALSE;
 499         }
 500         return TRUE;
 501     }
 502 */
 503
 504     return FALSE;
 505 }
 506
 507 void focus_cycle(gboolean forward, gboolean linear, gboolean interactive,
 508                  gboolean dialog, gboolean done, gboolean cancel)
 509 {
 510     static ObClient *first = NULL;
 511     static ObClient *t = NULL;
 512     static GList *order = NULL;
 513     GList *it, *start, *list;
 514     ObClient *ft = NULL;
 515
 516     if (interactive) {
 517         if (cancel) {
 518             focus_cycle_target = NULL;
 519             goto done_cycle;
 520         } else if (done)
 521             goto done_cycle;
 522
 523         if (!focus_order)
 524             goto done_cycle;
 525
 526         if (!first) first = focus_client;
 527
 528         if (linear) list = client_list;
 529         else        list = focus_order;
 530     } else {
 531         if (!focus_order)
 532             goto done_cycle;
 533         list = client_list;
 534     }
 535     if (!focus_cycle_target) focus_cycle_target = focus_client;
 536
 537     start = it = g_list_find(list, focus_cycle_target);
 538     if (!start) /* switched desktops or something? */
 539         start = it = forward ? g_list_last(list) : g_list_first(list);
 540     if (!start) goto done_cycle;
 541
 542     do {
 543         if (forward) {
 544             it = it->next;
 545             if (it == NULL) it = g_list_first(list);
 546         } else {
 547             it = it->prev;
 548             if (it == NULL) it = g_list_last(list);
 549         }
 550         ft = it->data;
 551         if (valid_focus_target(ft)) {
 552             if (interactive) {
 553                 if (ft != focus_cycle_target) { /* prevents flicker */
 554                     focus_cycle_target = ft;
 555                     focus_cycle_draw_indicator();
 556                 }
 557                 popup_cycle(ft, dialog);
 558                 return;
 559             } else if (ft != focus_cycle_target) {
 560                 focus_cycle_target = ft;
 561                 done = TRUE;
 562                 break;
 563             }
 564         }
 565     } while (it != start);
 566
 567 done_cycle:
 568     if (done && focus_cycle_target)
 569         client_activate(focus_cycle_target, FALSE, TRUE);
 570
 571     t = NULL;
 572     first = NULL;
 573     focus_cycle_target = NULL;
 574     g_list_free(order);
 575     order = NULL;
 576
 577     if (interactive) {
 578         focus_cycle_draw_indicator();
 579         popup_cycle(ft, FALSE);
 580     }
 581
 582     return;
 583 }
 584
 585 void focus_directional_cycle(ObDirection dir, gboolean interactive,
 586                              gboolean dialog, gboolean done, gboolean cancel)
 587 {
 588     static ObClient *first = NULL;
 589     ObClient *ft = NULL;
 590
 591     if (!interactive)
 592         return;
 593
 594     if (cancel) {
 595         focus_cycle_target = NULL;
 596         goto done_cycle;
 597     } else if (done)
 598         goto done_cycle;
 599
 600     if (!focus_order)
 601         goto done_cycle;
 602
 603     if (!first) first = focus_client;
 604     if (!focus_cycle_target) focus_cycle_target = focus_client;
 605
 606     if (focus_cycle_target)
 607         ft = client_find_directional(focus_cycle_target, dir);
 608     else {
 609         GList *it;
 610
 611         for (it = focus_order; it; it = g_list_next(it))
 612             if (valid_focus_target(it->data))
 613                 ft = it->data;
 614     }
 615
 616     if (ft) {
 617         if (ft != focus_cycle_target) {/* prevents flicker */
 618             focus_cycle_target = ft;
 619             focus_cycle_draw_indicator();
 620         }
 621     }
 622     if (focus_cycle_target) {
 623         popup_cycle(focus_cycle_target, dialog);
 624         if (dialog)
 625             return;
 626     }
 627
 628
 629 done_cycle:
 630     if (done && focus_cycle_target)
 631         client_activate(focus_cycle_target, FALSE, TRUE);
 632
 633     first = NULL;
 634     focus_cycle_target = NULL;
 635
 636     focus_cycle_draw_indicator();
 637     popup_cycle(ft, FALSE);
 638
 639     return;
 640 }
 641
 642 void focus_order_add_new(ObClient *c)
 643 {
 644     if (c->iconic)
 645         focus_order_to_top(c);
 646     else {
 647         g_assert(!g_list_find(focus_order, c));
 648         /* if there are any iconic windows, put this above them in the order,
 649            but if there are not, then put it under the currently focused one */
 650         if (focus_order && ((ObClient*)focus_order->data)->iconic)
 651             focus_order = g_list_insert(focus_order, c, 0);
 652         else
 653             focus_order = g_list_insert(focus_order, c, 1);
 654     }
 655 }
 656
 657 void focus_order_remove(ObClient *c)
 658 {
 659     focus_order = g_list_remove(focus_order, c);
 660 }
 661
 662 void focus_order_to_top(ObClient *c)
 663 {
 664     focus_order = g_list_remove(focus_order, c);
 665     if (!c->iconic) {
 666         focus_order = g_list_prepend(focus_order, c);
 667     } else {
 668         GList *it;
 669
 670         /* insert before first iconic window */
 671         for (it = focus_order;
 672              it && !((ObClient*)it->data)->iconic; it = g_list_next(it));
 673         focus_order = g_list_insert_before(focus_order, it, c);
 674     }
 675 }
 676
 677 void focus_order_to_bottom(ObClient *c)
 678 {
 679     focus_order = g_list_remove(focus_order, c);
 680     if (c->iconic) {
 681         focus_order = g_list_append(focus_order, c);
 682     } else {
 683         GList *it;
 684
 685         /* insert before first iconic window */
 686         for (it = focus_order;
 687              it && !((ObClient*)it->data)->iconic; it = g_list_next(it));
 688         focus_order = g_list_insert_before(focus_order, it, c);
 689     }
 690 }
 691
 692 ObClient *focus_order_find_first(guint desktop)
 693 {
 694     GList *it;
 695     for (it = focus_order; it; it = g_list_next(it)) {
 696         ObClient *c = it->data;
 697         if (c->desktop == desktop || c->desktop == DESKTOP_ALL)
 698             return c;
 699     }
 700     return NULL;
 701 }