use g_[s]list_next/previous consistantly, and check for "it" instead of "it != NULL...
[mikachu/openbox.git] / openbox / stacking.c
1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
2
3    stacking.c for the Openbox window manager
4    Copyright (c) 2003        Ben Jansens
5
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 2 of the License, or
9    (at your option) any later version.
10
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15
16    See the COPYING file for a copy of the GNU General Public License.
17 */
18
19 #include "openbox.h"
20 #include "prop.h"
21 #include "screen.h"
22 #include "focus.h"
23 #include "client.h"
24 #include "group.h"
25 #include "frame.h"
26 #include "window.h"
27
28 GList  *stacking_list = NULL;
29
30 void stacking_set_list()
31 {
32     Window *windows = NULL;
33     GList *it;
34     guint i = 0;
35
36     /* on shutdown, don't update the properties, so that we can read it back
37        in on startup and re-stack the windows as they were before we shut down
38     */
39     if (ob_state() == OB_STATE_EXITING) return;
40
41     /* create an array of the window ids (from bottom to top,
42        reverse order!) */
43     if (stacking_list) {
44         windows = g_new(Window, g_list_length(stacking_list));
45         for (it = g_list_last(stacking_list); it; it = g_list_previous(it)) {
46             if (WINDOW_IS_CLIENT(it->data))
47                 windows[i++] = WINDOW_AS_CLIENT(it->data)->window;
48         }
49     }
50
51     PROP_SETA32(RootWindow(ob_display, ob_screen),
52                 net_client_list_stacking, window, (guint32*)windows, i);
53
54     g_free(windows);
55 }
56
57 static void do_restack(GList *wins, GList *before)
58 {
59     GList *it, *next;
60     Window *win;
61     gint i;
62
63 #ifdef DEBUG
64     /* pls only restack stuff in the same layer at a time */
65     for (it = wins; it; it = next) {
66         next = g_list_next(it);
67         if (!next) break;
68         g_assert (window_layer(it->data) == window_layer(next->data));
69     }
70     if (before)
71         g_assert(window_layer(it->data) >= window_layer(before->data));
72 #endif
73
74     win = g_new(Window, g_list_length(wins) + 1);
75
76     if (before == stacking_list)
77         win[0] = screen_support_win;
78     else if (!before)
79         win[0] = window_top(g_list_last(stacking_list)->data);
80     else
81         win[0] = window_top(g_list_previous(before)->data);
82
83     for (i = 1, it = wins; it; ++i, it = g_list_next(it)) {
84         win[i] = window_top(it->data);
85         g_assert(win[i] != None); /* better not call stacking shit before
86                                      setting your top level window value */
87         stacking_list = g_list_insert_before(stacking_list, before, it->data);
88     }
89
90 #ifdef DEBUG
91     /* some debug checking of the stacking list's order */
92     for (it = stacking_list; ; it = next) {
93         next = g_list_next(it);
94         if (!next) break;
95         g_assert(window_layer(it->data) >= window_layer(next->data));
96     }
97 #endif
98
99     XRestackWindows(ob_display, win, i);
100     g_free(win);
101
102     stacking_set_list();
103 }
104
105 static void do_raise(GList *wins)
106 {
107     GList *it;
108     GList *layer[OB_NUM_STACKING_LAYERS] = {NULL};
109     gint i;
110
111     for (it = wins; it; it = g_list_next(it)) {
112         ObStackingLayer l;
113
114         l = window_layer(it->data);
115         layer[l] = g_list_append(layer[l], it->data);
116     }
117
118     it = stacking_list;
119     for (i = OB_NUM_STACKING_LAYERS - 1; i >= 0; --i) {
120         if (layer[i]) {
121             for (; it; it = g_list_next(it)) {
122                 /* look for the top of the layer */
123                 if (window_layer(it->data) <= (ObStackingLayer) i)
124                     break;
125             }
126             do_restack(layer[i], it);
127             g_list_free(layer[i]);
128         }
129     }
130 }
131
132 static void do_lower(GList *wins)
133 {
134     GList *it;
135     GList *layer[OB_NUM_STACKING_LAYERS] = {NULL};
136     gint i;
137
138     for (it = wins; it; it = g_list_next(it)) {
139         ObStackingLayer l;
140
141         l = window_layer(it->data);
142         layer[l] = g_list_append(layer[l], it->data);
143     }
144
145     it = stacking_list;
146     for (i = OB_NUM_STACKING_LAYERS - 1; i >= 0; --i) {
147         if (layer[i]) {
148             for (; it; it = g_list_next(it)) {
149                 /* look for the top of the next layer down */
150                 if (window_layer(it->data) < (ObStackingLayer) i)
151                     break;
152             }
153             do_restack(layer[i], it);
154             g_list_free(layer[i]);
155         }
156     }
157 }
158
159 static GList *pick_windows(ObClient *top, ObClient *selected, gboolean raise)
160 {
161     GList *ret = NULL;
162     GList *it, *next, *prev;
163     GSList *sit;
164     gint i, n;
165     GList *modals = NULL;
166     GList *trans = NULL;
167     GList *modal_sel = NULL; /* the selected guys if modal */
168     GList *trans_sel = NULL; /* the selected guys if not */
169
170     /* remove first so we can't run into ourself */
171     if ((it = g_list_find(stacking_list, top)))
172         stacking_list = g_list_delete_link(stacking_list, it);
173     else
174         return NULL;
175
176     i = 0;
177     n = g_slist_length(top->transients);
178     for (it = stacking_list; i < n && it; it = next) {
179         prev = g_list_previous(it);
180         next = g_list_next(it);
181
182         if ((sit = g_slist_find(top->transients, it->data))) {
183             ObClient *c = sit->data;
184             gboolean sel_child;
185
186             ++i;
187
188             if (c == selected)
189                 sel_child = TRUE;
190             else
191                 sel_child = client_search_transient(c, selected) != NULL;
192
193             if (!c->modal) {
194                 if (!sel_child) {
195                     trans = g_list_concat(trans,
196                                           pick_windows(c, selected, raise));
197                 } else {
198                     trans_sel = g_list_concat(trans_sel,
199                                                  pick_windows(c, selected,
200                                                               raise));
201                 }
202             } else {
203                 if (!sel_child) {
204                     modals = g_list_concat(modals,
205                                            pick_windows(c, selected, raise));
206                 } else {
207                     modal_sel = g_list_concat(modal_sel,
208                                                  pick_windows(c, selected,
209                                                               raise));
210                 }
211             }
212             /* if we dont have a prev then start back at the beginning,
213                otherwise skip back to the prev's next */
214             next = prev ? g_list_next(prev) : stacking_list;
215         }
216     }
217
218     ret = g_list_concat((raise ? modal_sel : modals),
219                         (raise ? modals : modal_sel));
220
221     ret = g_list_concat(ret, (raise ? trans_sel : trans));
222     ret = g_list_concat(ret, (raise ? trans : trans_sel));
223
224
225     /* add itself */
226     ret = g_list_append(ret, top);
227
228     return ret;
229 }
230
231 static GList *pick_group_windows(ObClient *top, ObClient *selected,
232                                  gboolean raise)
233 {
234     GList *ret = NULL;
235     GList *it, *next, *prev;
236     GSList *sit;
237     gint i, n;
238
239     /* add group members in their stacking order */
240     if (top->group) {
241         i = 0;
242         n = g_slist_length(top->group->members) - 1;
243         for (it = stacking_list; i < n && it; it = next) {
244             prev = g_list_previous(it);
245             next = g_list_next(it);
246
247             if ((sit = g_slist_find(top->group->members, it->data))) {
248                 ObClient *c;
249                 ObClientType t;
250
251                 ++i;
252                 c = it->data;
253                 t = c->type;
254
255                 if ((c->desktop == selected->desktop ||
256                      c->desktop == DESKTOP_ALL) &&
257                     (t == OB_CLIENT_TYPE_TOOLBAR ||
258                      t == OB_CLIENT_TYPE_MENU ||
259                      t == OB_CLIENT_TYPE_UTILITY))
260                 {
261                     ret = g_list_concat(ret,
262                                         pick_windows(sit->data,
263                                                      selected, raise)); 
264                     /* if we dont have a prev then start back at the beginning,
265                        otherwise skip back to the prev's next */
266                     next = prev ? g_list_next(prev) : stacking_list;
267                 }
268             }
269         }
270     }
271     return ret;
272 }
273
274 void stacking_raise(ObWindow *window)
275 {
276     GList *wins;
277
278     if (WINDOW_IS_CLIENT(window)) {
279         ObClient *c;
280         ObClient *selected;
281         selected = WINDOW_AS_CLIENT(window);
282         c = client_search_top_transient(selected);
283         wins = pick_windows(c, selected, TRUE);
284         wins = g_list_concat(wins, pick_group_windows(c, selected, TRUE));
285     } else {
286         wins = g_list_append(NULL, window);
287         stacking_list = g_list_remove(stacking_list, window);
288     }
289     do_raise(wins);
290     g_list_free(wins);
291 }
292
293 void stacking_lower(ObWindow *window)
294 {
295     GList *wins;
296
297     if (WINDOW_IS_CLIENT(window)) {
298         ObClient *c;
299         ObClient *selected;
300         selected = WINDOW_AS_CLIENT(window);
301         c = client_search_top_transient(selected);
302         wins = pick_windows(c, selected, FALSE);
303         wins = g_list_concat(pick_group_windows(c, selected, FALSE), wins);
304     } else {
305         wins = g_list_append(NULL, window);
306         stacking_list = g_list_remove(stacking_list, window);
307     }
308     do_lower(wins);
309     g_list_free(wins);
310 }
311
312 void stacking_below(ObWindow *window, ObWindow *below)
313 {
314     GList *wins, *before;
315
316     if (window_layer(window) != window_layer(below))
317         return;
318
319     wins = g_list_append(NULL, window);
320     stacking_list = g_list_remove(stacking_list, window);
321     before = g_list_next(g_list_find(stacking_list, below));
322     do_restack(wins, before);
323     g_list_free(wins);
324 }
325
326 void stacking_add(ObWindow *win)
327 {
328     ObStackingLayer l;
329     GList *wins;
330
331     g_assert(screen_support_win != None); /* make sure I dont break this in the
332                                        future */
333
334     l = window_layer(win);
335     wins = g_list_append(NULL, win); /* list of 1 element */
336
337     stacking_list = g_list_append(stacking_list, win);
338     stacking_raise(win);
339 }
340
341 void stacking_add_nonintrusive(ObWindow *win)
342 {
343     ObClient *client;
344     ObClient *parent = NULL;
345     GList *it_before = NULL;
346
347     if (!WINDOW_IS_CLIENT(win)) {
348         stacking_add(win); /* no special rules for others */
349         return;
350     }
351
352     client = WINDOW_AS_CLIENT(win);
353
354     /* insert above its highest parent */
355     if (client->transient_for) {
356         if (client->transient_for != OB_TRAN_GROUP) {
357             parent = client->transient_for;
358         } else {
359             GSList *sit;
360             GList *it;
361
362             if (client->group)
363                 for (it = stacking_list; !parent && it; it = g_list_next(it)) {
364                     if ((sit = g_slist_find(client->group->members, it->data)))
365                 for (sit = client->group->members; !parent && sit;
366                      sit = g_slist_next(sit))
367                 {
368                     ObClient *c = sit->data;
369                     /* checking transient_for prevents infinate loops! */
370                     if (sit->data == it->data && !c->transient_for)
371                         parent = it->data;
372                 }
373             }
374         }
375     }
376
377     if (!(it_before = g_list_find(stacking_list, parent))) {
378         /* no parent to put above, try find the focused client to go
379            under */
380         if (focus_client && focus_client->layer == client->layer) {
381             if ((it_before = g_list_find(stacking_list, focus_client)))
382                 it_before = it_before->next;
383         }
384     }
385     if (!it_before) {
386         /* out of ideas, just add it normally... */
387         stacking_add(win);
388     } else {
389         GList *wins = g_list_append(NULL, win);
390         do_restack(wins, it_before);
391         g_list_free(wins);
392     }
393 }