when unfocusing a window (e.g. unmanaging) try fallback to transient relations, if...
[mikachu/openbox.git] / openbox / focus.c
1 #include "event.h"
2 #include "openbox.h"
3 #include "client.h"
4 #include "config.h"
5 #include "frame.h"
6 #include "screen.h"
7 #include "group.h"
8 #include "prop.h"
9 #include "dispatch.h"
10 #include "focus.h"
11 #include "parse.h"
12 #include "stacking.h"
13
14 #include <X11/Xlib.h>
15 #include <glib.h>
16
17 Client *focus_client = NULL;
18 GList **focus_order = NULL; /* these lists are created when screen_startup
19                                sets the number of desktops */
20
21 Window focus_backup = None;
22
23 static gboolean noreorder = 0;
24
25 void focus_startup()
26 {
27     /* create the window which gets focus when no clients get it. Have to
28        make it override-redirect so we don't try manage it, since it is
29        mapped. */
30     XSetWindowAttributes attrib;
31
32     focus_client = NULL;
33
34     attrib.override_redirect = TRUE;
35     focus_backup = XCreateWindow(ob_display, ob_root,
36                                  -100, -100, 1, 1, 0,
37                                  CopyFromParent, InputOutput, CopyFromParent,
38                                  CWOverrideRedirect, &attrib);
39     XMapWindow(ob_display, focus_backup);
40     stacking_raise_internal(focus_backup);
41
42     /* start with nothing focused */
43     focus_set_client(NULL);
44 }
45
46 void focus_shutdown()
47 {
48     guint i;
49
50     for (i = 0; i < screen_num_desktops; ++i)
51         g_list_free(focus_order[i]);
52     g_free(focus_order);
53     focus_order = NULL;
54
55     XDestroyWindow(ob_display, focus_backup);
56
57     /* reset focus to root */
58     XSetInputFocus(ob_display, PointerRoot, RevertToPointerRoot,
59                    event_lasttime);
60 }
61
62 static void push_to_top(Client *client)
63 {
64     guint desktop;
65
66     desktop = client->desktop;
67     if (desktop == DESKTOP_ALL) desktop = screen_desktop;
68     focus_order[desktop] = g_list_remove(focus_order[desktop], client);
69     focus_order[desktop] = g_list_prepend(focus_order[desktop], client);
70 }
71
72 void focus_set_client(Client *client)
73 {
74     Window active;
75     Client *old;
76
77     /* uninstall the old colormap, and install the new one */
78     screen_install_colormap(focus_client, FALSE);
79     screen_install_colormap(client, TRUE);
80
81     if (client == NULL) {
82         /* when nothing will be focused, send focus to the backup target */
83         XSetInputFocus(ob_display, focus_backup, RevertToPointerRoot,
84                        event_lasttime);
85         XSync(ob_display, FALSE);
86     }
87
88     old = focus_client;
89     focus_client = client;
90
91     /* move to the top of the list */
92     if (noreorder)
93         --noreorder;
94     else if (client != NULL)
95         push_to_top(client);
96
97     /* set the NET_ACTIVE_WINDOW hint */
98     active = client ? client->window : None;
99     PROP_SET32(ob_root, net_active_window, window, active);
100
101     if (focus_client != NULL)
102         dispatch_client(Event_Client_Focus, focus_client, 0, 0);
103     if (old != NULL)
104         dispatch_client(Event_Client_Unfocus, old, 0, 0);
105 }
106
107 static gboolean focus_under_pointer()
108 {
109     int x, y;
110     GList *it;
111
112     if (ob_pointer_pos(&x, &y)) {
113         for (it = stacking_list; it != NULL; it = it->next) {
114             Client *c = it->data;
115             if (c->desktop == screen_desktop &&
116                 RECT_CONTAINS(c->frame->area, x, y))
117                 break;
118         }
119         if (it != NULL)
120             return client_normal(it->data) && client_focus(it->data);
121     }
122     return FALSE;
123 }
124
125 /* finds the first transient that isn't 'skip' and ensure's that client_normal
126  is true for it */
127 static Client *find_transient_recursive(Client *c, Client *top, Client *skip)
128 {
129     GSList *it;
130     Client *ret;
131
132     for (it = c->transients; it; it = it->next) {
133         g_message("looking");
134         if (it->data == top) return NULL;
135         ret = find_transient_recursive(it->data, top, skip);
136         if (ret && ret != skip && client_normal(ret)) return ret;
137         if (it->data != skip && client_normal(it->data)) return it->data;
138         g_message("not found");
139     }
140     return NULL;
141 }
142
143 static gboolean focus_fallback_transient(Client *top, Client *old)
144 {
145     Client *target = find_transient_recursive(top, top, old);
146     if (!target) {
147         /* make sure client_normal is true always */
148         if (!client_normal(top))
149             return FALSE;
150         target = top; /* no transient, keep the top */
151     }
152     return client_focus(target);
153 }
154
155 void focus_fallback(FallbackType type)
156 {
157     GList *it;
158     Client *old = NULL;
159
160     old = focus_client;
161
162     /* unfocus any focused clients.. they can be focused by Pointer events
163        and such, and then when I try focus them, I won't get a FocusIn event
164        at all for them.
165     */
166     focus_set_client(NULL);
167
168     if (!(type == Fallback_Desktop ?
169           config_focus_last_on_desktop : config_focus_last)) {
170         if (config_focus_follow) focus_under_pointer();
171         return;
172     }
173
174     if (type == Fallback_Unfocusing && old) {
175         /* try for transient relations */
176         if (old->transient_for) {
177             if (old->transient_for == TRAN_GROUP) {
178                 for (it = focus_order[screen_desktop]; it; it = it->next) {
179                     GSList *sit;
180
181                     for (sit = old->group->members; sit; sit = sit->next)
182                         if (sit->data == it->data)
183                             if (focus_fallback_transient(sit->data, old))
184                                 return;
185                 }
186             } else {
187                 if (focus_fallback_transient(old->transient_for, old))
188                     return;
189             }
190         }
191
192         /* try for group relations */
193         if (old->group) {
194             GSList *sit;
195
196             for (it = focus_order[screen_desktop]; it != NULL; it = it->next)
197                 for (sit = old->group->members; sit; sit = sit->next)
198                     if (sit->data == it->data)
199                         if (sit->data != old && client_focus(sit->data))
200                             return;
201         }
202     }
203
204     for (it = focus_order[screen_desktop]; it != NULL; it = it->next)
205         if (type != Fallback_Unfocusing || it->data != old)
206             if (client_normal(it->data) && client_focus(it->data))
207                 return;
208
209     /* nothing to focus */
210     focus_set_client(NULL);
211 }
212
213 Client *focus_cycle(gboolean forward, gboolean linear, gboolean done,
214                  gboolean cancel)
215 {
216     static Client *first = NULL;
217     static Client *t = NULL;
218     static GList *order = NULL;
219     GList *it, *start, *list;
220     Client *ft;
221
222     if (cancel) {
223         if (first) client_focus(first);
224         goto done_cycle;
225     } else if (done) {
226         if (focus_client) {
227             push_to_top(focus_client); /* move to top of focus_order */
228             stacking_raise(focus_client);
229         }
230         goto done_cycle;
231     }
232     if (!first) first = focus_client;
233
234     if (linear) list = client_list;
235     else        list = focus_order[screen_desktop];
236
237     start = it = g_list_find(list, focus_client);
238     if (!start) /* switched desktops or something? */
239         start = it = forward ? g_list_last(list) : g_list_first(list);
240     if (!start) goto done_cycle;
241
242     do {
243         if (forward) {
244             it = it->next;
245             if (it == NULL) it = list;
246         } else {
247             it = it->prev;
248             if (it == NULL) it = g_list_last(list);
249         }
250         ft = client_focus_target(it->data);
251         if (ft == it->data && focus_client != ft && client_normal(ft) &&
252             client_focus(ft)) {
253             noreorder++; /* avoid reordering the focus_order */
254             return ft;
255         }
256     } while (it != start);
257     return NULL;
258
259 done_cycle:
260     t = NULL;
261     first = NULL;
262     g_list_free(order);
263     order = NULL;
264     return NULL;
265 }