better vertical centering for when "middle" placement is enabled for menus
[dana/openbox.git] / openbox / menuframe.c
1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
2
3    menuframe.c for the Openbox window manager
4    Copyright (c) 2006        Mikael Magnusson
5    Copyright (c) 2003        Ben 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 "menuframe.h"
21 #include "client.h"
22 #include "menu.h"
23 #include "screen.h"
24 #include "grab.h"
25 #include "openbox.h"
26 #include "mainloop.h"
27 #include "config.h"
28 #include "render/theme.h"
29
30 #define PADDING 2
31 #define SEPARATOR_HEIGHT 3
32 #define MAX_MENU_WIDTH 400
33
34 #define FRAME_EVENTMASK (ButtonPressMask |ButtonMotionMask | EnterWindowMask |\
35                          LeaveWindowMask)
36 #define TITLE_EVENTMASK (ButtonPressMask | ButtonMotionMask)
37 #define ENTRY_EVENTMASK (EnterWindowMask | LeaveWindowMask | \
38                          ButtonPressMask | ButtonReleaseMask)
39
40 GList *menu_frame_visible;
41
42 static ObMenuEntryFrame* menu_entry_frame_new(ObMenuEntry *entry,
43                                               ObMenuFrame *frame);
44 static void menu_entry_frame_free(ObMenuEntryFrame *self);
45 static void menu_frame_render(ObMenuFrame *self);
46 static void menu_frame_update(ObMenuFrame *self);
47 static gboolean menu_entry_frame_submenu_timeout(gpointer data);
48
49 static Window createWindow(Window parent, gulong mask,
50                            XSetWindowAttributes *attrib)
51 {
52     return XCreateWindow(ob_display, parent, 0, 0, 1, 1, 0,
53                          RrDepth(ob_rr_inst), InputOutput,
54                          RrVisual(ob_rr_inst), mask, attrib);
55 }
56
57 ObMenuFrame* menu_frame_new(ObMenu *menu, ObClient *client)
58 {
59     ObMenuFrame *self;
60     XSetWindowAttributes attr;
61
62     self = g_new0(ObMenuFrame, 1);
63     self->type = Window_Menu;
64     self->menu = menu;
65     self->selected = NULL;
66     self->show_title = TRUE;
67     self->client = client;
68     self->direction_right = TRUE;
69
70     attr.event_mask = FRAME_EVENTMASK;
71     self->window = createWindow(RootWindow(ob_display, ob_screen),
72                                 CWEventMask, &attr);
73     attr.event_mask = TITLE_EVENTMASK;
74     self->title = createWindow(self->window, CWEventMask, &attr);
75     self->items = createWindow(self->window, 0, NULL);
76
77     XMapWindow(ob_display, self->items);
78
79     self->a_title = RrAppearanceCopy(ob_rr_theme->a_menu_title);
80     self->a_items = RrAppearanceCopy(ob_rr_theme->a_menu);
81
82     stacking_add(MENU_AS_WINDOW(self));
83
84     return self;
85 }
86
87 void menu_frame_free(ObMenuFrame *self)
88 {
89     if (self) {
90         while (self->entries) {
91             menu_entry_frame_free(self->entries->data);
92             self->entries = g_list_delete_link(self->entries, self->entries);
93         }
94
95         stacking_remove(MENU_AS_WINDOW(self));
96
97         XDestroyWindow(ob_display, self->items);
98         XDestroyWindow(ob_display, self->title);
99         XDestroyWindow(ob_display, self->window);
100
101         RrAppearanceFree(self->a_items);
102         RrAppearanceFree(self->a_title);
103
104         g_free(self);
105     }
106 }
107
108 static ObMenuEntryFrame* menu_entry_frame_new(ObMenuEntry *entry,
109                                               ObMenuFrame *frame)
110 {
111     ObMenuEntryFrame *self;
112     XSetWindowAttributes attr;
113
114     self = g_new0(ObMenuEntryFrame, 1);
115     self->entry = entry;
116     self->frame = frame;
117
118     attr.event_mask = ENTRY_EVENTMASK;
119     self->window = createWindow(self->frame->items, CWEventMask, &attr);
120     self->text = createWindow(self->window, 0, NULL);
121     if (entry->type != OB_MENU_ENTRY_TYPE_SEPARATOR) {
122         self->icon = createWindow(self->window, 0, NULL);
123         self->bullet = createWindow(self->window, 0, NULL);
124     }
125
126     XMapWindow(ob_display, self->window);
127     XMapWindow(ob_display, self->text);
128
129     self->a_normal = RrAppearanceCopy(ob_rr_theme->a_menu_normal);
130     self->a_disabled = RrAppearanceCopy(ob_rr_theme->a_menu_disabled);
131     self->a_selected = RrAppearanceCopy(ob_rr_theme->a_menu_selected);
132
133     if (entry->type == OB_MENU_ENTRY_TYPE_SEPARATOR) {
134         self->a_separator = RrAppearanceCopy(ob_rr_theme->a_clear_tex);
135         self->a_separator->texture[0].type = RR_TEXTURE_LINE_ART;
136     } else {
137         self->a_icon = RrAppearanceCopy(ob_rr_theme->a_clear_tex);
138         self->a_icon->texture[0].type = RR_TEXTURE_RGBA;
139         self->a_mask = RrAppearanceCopy(ob_rr_theme->a_clear_tex);
140         self->a_mask->texture[0].type = RR_TEXTURE_MASK;
141         self->a_bullet_normal =
142             RrAppearanceCopy(ob_rr_theme->a_menu_bullet_normal);
143         self->a_bullet_selected =
144             RrAppearanceCopy(ob_rr_theme->a_menu_bullet_selected);
145     }
146
147     self->a_text_normal =
148         RrAppearanceCopy(ob_rr_theme->a_menu_text_normal);
149     self->a_text_disabled =
150         RrAppearanceCopy(ob_rr_theme->a_menu_text_disabled);
151     self->a_text_selected =
152         RrAppearanceCopy(ob_rr_theme->a_menu_text_selected);
153
154     return self;
155 }
156
157 static void menu_entry_frame_free(ObMenuEntryFrame *self)
158 {
159     if (self) {
160         XDestroyWindow(ob_display, self->text);
161         XDestroyWindow(ob_display, self->window);
162         if (self->entry->type != OB_MENU_ENTRY_TYPE_SEPARATOR) {
163             XDestroyWindow(ob_display, self->icon);
164             XDestroyWindow(ob_display, self->bullet);
165         }
166
167         RrAppearanceFree(self->a_normal);
168         RrAppearanceFree(self->a_disabled);
169         RrAppearanceFree(self->a_selected);
170
171         RrAppearanceFree(self->a_separator);
172         RrAppearanceFree(self->a_icon);
173         RrAppearanceFree(self->a_mask);
174         RrAppearanceFree(self->a_text_normal);
175         RrAppearanceFree(self->a_text_disabled);
176         RrAppearanceFree(self->a_text_selected);
177         RrAppearanceFree(self->a_bullet_normal);
178         RrAppearanceFree(self->a_bullet_selected);
179
180         g_free(self);
181     }
182 }
183
184 void menu_frame_move(ObMenuFrame *self, gint x, gint y)
185 {
186     RECT_SET_POINT(self->area, x, y);
187     XMoveWindow(ob_display, self->window, self->area.x, self->area.y);
188 }
189
190 void menu_frame_place_topmenu(ObMenuFrame *self, gint x, gint y)
191 {
192     if (self->client && x < 0 && y < 0) {
193         x = self->client->frame->area.x + self->client->frame->size.left;
194         y = self->client->frame->area.y + self->client->frame->size.top;
195     } else {
196         if (config_menu_middle) {
197             x -= self->area.width / 2;
198             y -= self->title_h*3/4;
199         } else {
200             x -= ob_rr_theme->mbwidth;
201             y -= ob_rr_theme->mbwidth;
202         }
203     }
204     menu_frame_move(self, x, y);
205 }
206
207 void menu_frame_place_submenu(ObMenuFrame *self)
208 {
209     gint x, y;
210     gint overlap;
211     gint bwidth;
212
213     overlap = (config_menu_middle ? 0 : ob_rr_theme->menu_overlap);
214     bwidth = ob_rr_theme->mbwidth;
215
216
217     if (self->direction_right)
218         x = self->parent->area.x + self->parent->area.width - overlap - bwidth;
219     else
220         x = self->parent->area.x - self->area.width + overlap + bwidth;
221
222     y = self->parent->area.y + self->parent->title_h +
223         self->parent_entry->area.y + overlap;
224     if (config_menu_middle)
225         y = y - (self->area.height - (bwidth * 2) - self->item_h) / 2;
226
227     menu_frame_move(self, x, y);
228 }
229
230 void menu_frame_move_on_screen(ObMenuFrame *self, gint *dx, gint *dy)
231 {
232     Rect *a = NULL;
233     gint pos, half;
234
235     *dx = *dy = 0;
236
237     a = screen_physical_area_monitor(self->monitor);
238
239     half = g_list_length(self->entries) / 2;
240     pos = g_list_index(self->entries, self->selected);
241
242     /* if in the bottom half then check this stuff first, will keep the bottom
243        edge of the menu visible */
244     if (pos > half) {
245         *dx = MAX(*dx, a->x - self->area.x);
246         *dy = MAX(*dy, a->y - self->area.y);
247     }
248     *dx = MIN(*dx, (a->x + a->width) - (self->area.x + self->area.width));
249     *dy = MIN(*dy, (a->y + a->height) - (self->area.y + self->area.height));
250     /* if in the top half then check this stuff last, will keep the top
251        edge of the menu visible */
252     if (pos <= half) {
253         *dx = MAX(*dx, a->x - self->area.x);
254         *dy = MAX(*dy, a->y - self->area.y);
255     }
256 }
257
258 static void menu_entry_frame_render(ObMenuEntryFrame *self)
259 {
260     RrAppearance *item_a, *text_a;
261     gint th; /* temp */
262     ObMenu *sub;
263     ObMenuFrame *frame = self->frame;
264
265     item_a = ((self->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
266                !self->entry->data.normal.enabled) ?
267               self->a_disabled :
268               (self == self->frame->selected ?
269                self->a_selected :
270                self->a_normal));
271     switch (self->entry->type) {
272     case OB_MENU_ENTRY_TYPE_NORMAL:
273     case OB_MENU_ENTRY_TYPE_SUBMENU:
274         th = self->frame->item_h;
275         break;
276     case OB_MENU_ENTRY_TYPE_SEPARATOR:
277         th = SEPARATOR_HEIGHT + 2*PADDING;
278         break;
279     default:
280         g_assert_not_reached();
281     }
282     RECT_SET_SIZE(self->area, self->frame->inner_w, th);
283     XResizeWindow(ob_display, self->window,
284                   self->area.width, self->area.height);
285     item_a->surface.parent = self->frame->a_items;
286     item_a->surface.parentx = self->area.x;
287     item_a->surface.parenty = self->area.y;
288     RrPaint(item_a, self->window, self->area.width, self->area.height);
289
290     text_a = ((self->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
291                !self->entry->data.normal.enabled) ?
292               self->a_text_disabled :
293               (self == self->frame->selected ?
294                self->a_text_selected :
295                self->a_text_normal));
296     switch (self->entry->type) {
297     case OB_MENU_ENTRY_TYPE_NORMAL:
298         text_a->texture[0].data.text.string = self->entry->data.normal.label;
299         break;
300     case OB_MENU_ENTRY_TYPE_SUBMENU:
301         sub = self->entry->data.submenu.submenu;
302         text_a->texture[0].data.text.string = sub ? sub->title : "";
303         break;
304     case OB_MENU_ENTRY_TYPE_SEPARATOR:
305         break;
306     }
307
308     switch (self->entry->type) {
309     case OB_MENU_ENTRY_TYPE_NORMAL:
310         XMoveResizeWindow(ob_display, self->text,
311                           self->frame->text_x, PADDING,
312                           self->frame->text_w,
313                           self->frame->item_h - 2*PADDING);
314         text_a->surface.parent = item_a;
315         text_a->surface.parentx = self->frame->text_x;
316         text_a->surface.parenty = PADDING;
317         RrPaint(text_a, self->text, self->frame->text_w,
318                 self->frame->item_h - 2*PADDING);
319         break;
320     case OB_MENU_ENTRY_TYPE_SUBMENU:
321         XMoveResizeWindow(ob_display, self->text,
322                           self->frame->text_x, PADDING,
323                           self->frame->text_w - self->frame->item_h,
324                           self->frame->item_h - 2*PADDING);
325         text_a->surface.parent = item_a;
326         text_a->surface.parentx = self->frame->text_x;
327         text_a->surface.parenty = PADDING;
328         RrPaint(text_a, self->text, self->frame->text_w - self->frame->item_h,
329                 self->frame->item_h - 2*PADDING);
330         break;
331     case OB_MENU_ENTRY_TYPE_SEPARATOR:
332         XMoveResizeWindow(ob_display, self->text, PADDING, PADDING,
333                           self->area.width - 2*PADDING, SEPARATOR_HEIGHT);
334         self->a_separator->surface.parent = item_a;
335         self->a_separator->surface.parentx = PADDING;
336         self->a_separator->surface.parenty = PADDING;
337         self->a_separator->texture[0].data.lineart.color =
338             text_a->texture[0].data.text.color;
339         self->a_separator->texture[0].data.lineart.x1 = 2*PADDING;
340         self->a_separator->texture[0].data.lineart.y1 = SEPARATOR_HEIGHT / 2;
341         self->a_separator->texture[0].data.lineart.x2 =
342             self->area.width - 4*PADDING;
343         self->a_separator->texture[0].data.lineart.y2 = SEPARATOR_HEIGHT / 2;
344         RrPaint(self->a_separator, self->text,
345                 self->area.width - 2*PADDING, SEPARATOR_HEIGHT);
346         break;
347     }
348
349     if (self->entry->type != OB_MENU_ENTRY_TYPE_SEPARATOR &&
350         self->entry->data.normal.icon_data)
351     {
352         XMoveResizeWindow(ob_display, self->icon,
353                           PADDING, frame->item_margin.top,
354                           self->frame->item_h - frame->item_margin.top
355                           - frame->item_margin.bottom,
356                           self->frame->item_h - frame->item_margin.top
357                           - frame->item_margin.bottom);
358         self->a_icon->texture[0].data.rgba.width =
359             self->entry->data.normal.icon_width;
360         self->a_icon->texture[0].data.rgba.height =
361             self->entry->data.normal.icon_height;
362         self->a_icon->texture[0].data.rgba.data =
363             self->entry->data.normal.icon_data;
364         self->a_icon->surface.parent = item_a;
365         self->a_icon->surface.parentx = PADDING;
366         self->a_icon->surface.parenty = frame->item_margin.top;
367         RrPaint(self->a_icon, self->icon,
368                 self->frame->item_h - frame->item_margin.top
369                 - frame->item_margin.bottom,
370                 self->frame->item_h - frame->item_margin.top
371                 - frame->item_margin.bottom);
372         XMapWindow(ob_display, self->icon);
373     } else if (self->entry->type != OB_MENU_ENTRY_TYPE_SEPARATOR &&
374                self->entry->data.normal.mask)
375     {
376         RrColor *c;
377
378         XMoveResizeWindow(ob_display, self->icon,
379                           PADDING, frame->item_margin.top,
380                           self->frame->item_h - frame->item_margin.top
381                           - frame->item_margin.bottom,
382                           self->frame->item_h - frame->item_margin.top
383                           - frame->item_margin.bottom);
384         self->a_mask->texture[0].data.mask.mask =
385             self->entry->data.normal.mask;
386
387         c = ((self->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
388               !self->entry->data.normal.enabled) ?
389              self->entry->data.normal.mask_disabled_color :
390              (self == self->frame->selected ?
391               self->entry->data.normal.mask_selected_color :
392               self->entry->data.normal.mask_normal_color));
393         self->a_mask->texture[0].data.mask.color = c;
394
395         self->a_mask->surface.parent = item_a;
396         self->a_mask->surface.parentx = PADDING;
397         self->a_mask->surface.parenty = frame->item_margin.top;
398         RrPaint(self->a_mask, self->icon,
399                 self->frame->item_h - frame->item_margin.top
400                 - frame->item_margin.bottom,
401                 self->frame->item_h - frame->item_margin.top
402                 - frame->item_margin.bottom);
403         XMapWindow(ob_display, self->icon);
404     } else
405         XUnmapWindow(ob_display, self->icon);
406
407     if (self->entry->type == OB_MENU_ENTRY_TYPE_SUBMENU) {
408         RrAppearance *bullet_a;
409         XMoveResizeWindow(ob_display, self->bullet,
410                           self->frame->text_x + self->frame->text_w
411                           - self->frame->item_h + PADDING, PADDING,
412                           self->frame->item_h - 2*PADDING,
413                           self->frame->item_h - 2*PADDING);
414         bullet_a = (self == self->frame->selected ?
415                     self->a_bullet_selected :
416                     self->a_bullet_normal);
417         bullet_a->surface.parent = item_a;
418         bullet_a->surface.parentx =
419             self->frame->text_x + self->frame->text_w - self->frame->item_h
420             + PADDING;
421         bullet_a->surface.parenty = PADDING;
422         RrPaint(bullet_a, self->bullet,
423                 self->frame->item_h - 2*PADDING,
424                 self->frame->item_h - 2*PADDING);
425         XMapWindow(ob_display, self->bullet);
426     } else
427         XUnmapWindow(ob_display, self->bullet);
428
429     XFlush(ob_display);
430 }
431
432 static void menu_frame_render(ObMenuFrame *self)
433 {
434     gint w = 0, h = 0;
435     gint allitems_h = 0;
436     gint tw, th; /* temps */
437     GList *it;
438     gboolean has_icon = FALSE;
439     ObMenu *sub;
440
441     XSetWindowBorderWidth(ob_display, self->window, ob_rr_theme->mbwidth);
442     XSetWindowBorder(ob_display, self->window,
443                      RrColorPixel(ob_rr_theme->menu_b_color));
444
445     if (!self->parent && self->show_title) {
446         XMoveWindow(ob_display, self->title, 
447                     -ob_rr_theme->mbwidth, h - ob_rr_theme->mbwidth);
448
449         self->a_title->texture[0].data.text.string = self->menu->title;
450         RrMinsize(self->a_title, &tw, &th);
451         tw = MIN(tw, MAX_MENU_WIDTH) + ob_rr_theme->paddingx * 2;
452         w = MAX(w, tw);
453
454         th = ob_rr_theme->menu_title_height;
455         h += (self->title_h = th + ob_rr_theme->mbwidth);
456
457         XSetWindowBorderWidth(ob_display, self->title, ob_rr_theme->mbwidth);
458         XSetWindowBorder(ob_display, self->title,
459                          RrColorPixel(ob_rr_theme->menu_b_color));
460     }
461
462     XMoveWindow(ob_display, self->items, 0, h);
463
464     STRUT_SET(self->item_margin, 0, 0, 0, 0);
465
466     if (self->entries) {
467         ObMenuEntryFrame *e = self->entries->data;
468         gint l, t, r, b;
469
470         e->a_text_normal->texture[0].data.text.string = "";
471         RrMinsize(e->a_text_normal, &tw, &th);
472         tw += 2*PADDING;
473         th += 2*PADDING;
474         self->item_h = th;
475
476         RrMargins(e->a_normal, &l, &t, &r, &b);
477         STRUT_SET(self->item_margin,
478                   MAX(self->item_margin.left, l),
479                   MAX(self->item_margin.top, t),
480                   MAX(self->item_margin.right, r),
481                   MAX(self->item_margin.bottom, b));
482         RrMargins(e->a_selected, &l, &t, &r, &b);
483         STRUT_SET(self->item_margin,
484                   MAX(self->item_margin.left, l),
485                   MAX(self->item_margin.top, t),
486                   MAX(self->item_margin.right, r),
487                   MAX(self->item_margin.bottom, b));
488         RrMargins(e->a_disabled, &l, &t, &r, &b);
489         STRUT_SET(self->item_margin,
490                   MAX(self->item_margin.left, l),
491                   MAX(self->item_margin.top, t),
492                   MAX(self->item_margin.right, r),
493                   MAX(self->item_margin.bottom, b));
494     } else
495         self->item_h = 0;
496
497     for (it = self->entries; it; it = g_list_next(it)) {
498         RrAppearance *text_a;
499         ObMenuEntryFrame *e = it->data;
500
501         RECT_SET_POINT(e->area, 0, allitems_h);
502         XMoveWindow(ob_display, e->window, 0, e->area.y);
503
504         text_a = ((e->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
505                    !e->entry->data.normal.enabled) ?
506                   e->a_text_disabled :
507                   (e == self->selected ?
508                    e->a_text_selected :
509                    e->a_text_normal));
510         switch (e->entry->type) {
511         case OB_MENU_ENTRY_TYPE_NORMAL:
512             text_a->texture[0].data.text.string = e->entry->data.normal.label;
513             RrMinsize(text_a, &tw, &th);
514             tw = MIN(tw, MAX_MENU_WIDTH);
515
516             if (e->entry->data.normal.icon_data ||
517                 e->entry->data.normal.mask)
518                 has_icon = TRUE;
519             break;
520         case OB_MENU_ENTRY_TYPE_SUBMENU:
521             sub = e->entry->data.submenu.submenu;
522             text_a->texture[0].data.text.string = sub ? sub->title : "";
523             RrMinsize(text_a, &tw, &th);
524             tw = MIN(tw, MAX_MENU_WIDTH);
525
526             if (e->entry->data.normal.icon_data ||
527                 e->entry->data.normal.mask)
528                 has_icon = TRUE;
529
530             tw += self->item_h - PADDING;
531             break;
532         case OB_MENU_ENTRY_TYPE_SEPARATOR:
533             tw = 0;
534             th = SEPARATOR_HEIGHT;
535             break;
536         }
537         tw += 2*PADDING;
538         th += 2*PADDING;
539         w = MAX(w, tw);
540         h += th;
541         allitems_h += th;
542     }
543
544     self->text_x = PADDING;
545     self->text_w = w;
546
547     if (self->entries) {
548         if (has_icon) {
549             w += self->item_h + PADDING;
550             self->text_x += self->item_h + PADDING;
551         }
552     }
553
554     if (!w) w = 10;
555     if (!allitems_h) {
556         allitems_h = 3;
557         h += 3;
558     }
559
560     XResizeWindow(ob_display, self->window, w, h);
561     XResizeWindow(ob_display, self->items, w, allitems_h);
562
563     self->inner_w = w;
564
565     if (!self->parent && self->show_title) {
566         XResizeWindow(ob_display, self->title,
567                       w, self->title_h - ob_rr_theme->mbwidth);
568         RrPaint(self->a_title, self->title,
569                 w, self->title_h - ob_rr_theme->mbwidth);
570         XMapWindow(ob_display, self->title);
571     } else
572         XUnmapWindow(ob_display, self->title);
573
574     RrPaint(self->a_items, self->items, w, allitems_h);
575
576     for (it = self->entries; it; it = g_list_next(it))
577         menu_entry_frame_render(it->data);
578
579     w += ob_rr_theme->mbwidth * 2;
580     h += ob_rr_theme->mbwidth * 2;
581
582     RECT_SET_SIZE(self->area, w, h);
583
584     XFlush(ob_display);
585 }
586
587 static void menu_frame_update(ObMenuFrame *self)
588 {
589     GList *mit, *fit;
590
591     menu_pipe_execute(self->menu);
592     menu_find_submenus(self->menu);
593
594     self->selected = NULL;
595
596     for (mit = self->menu->entries, fit = self->entries; mit && fit;
597          mit = g_list_next(mit), fit = g_list_next(fit))
598     {
599         ObMenuEntryFrame *f = fit->data;
600         f->entry = mit->data;
601     }
602
603     while (mit) {
604         ObMenuEntryFrame *e = menu_entry_frame_new(mit->data, self);
605         self->entries = g_list_append(self->entries, e);
606         mit = g_list_next(mit);
607     }
608     
609     while (fit) {
610         GList *n = g_list_next(fit);
611         menu_entry_frame_free(fit->data);
612         self->entries = g_list_delete_link(self->entries, fit);
613         fit = n;
614     }
615
616     menu_frame_render(self);
617 }
618
619 static gboolean menu_frame_is_visible(ObMenuFrame *self)
620 {
621     return !!(g_list_find(menu_frame_visible, self));
622 }
623
624 static gboolean menu_frame_show(ObMenuFrame *self)
625 {
626     GList *it;
627
628     if (menu_frame_visible == NULL) {
629         /* no menus shown yet */
630         if (!grab_pointer(TRUE, OB_CURSOR_NONE))
631             return FALSE;
632         if (!grab_keyboard(TRUE)) {
633             grab_pointer(FALSE, OB_CURSOR_NONE);
634             return FALSE;
635         }
636     }
637
638     /* determine if the underlying menu is already visible */
639     for (it = menu_frame_visible; it; it = g_list_next(it)) {
640         ObMenuFrame *f = it->data;
641         if (f->menu == self->menu)
642             break;
643     }
644     if (!it) {
645         if (self->menu->update_func)
646             self->menu->update_func(self, self->menu->data);
647     }
648
649     menu_frame_update(self);
650
651     menu_frame_visible = g_list_prepend(menu_frame_visible, self);
652
653     return TRUE;
654 }
655
656 gboolean menu_frame_show_topmenu(ObMenuFrame *self, gint x, gint y)
657 {
658     gint dx, dy;
659     guint i;
660
661     if (menu_frame_is_visible(self))
662         return TRUE;
663     if (!menu_frame_show(self))
664         return FALSE;
665
666     menu_frame_place_topmenu(self, x, y);
667
668     /* find the monitor the menu is on */
669     for (i = 0; i < screen_num_monitors; ++i) {
670         Rect *a = screen_physical_area_monitor(i);
671         if (RECT_CONTAINS(*a, x, y)) {
672             self->monitor = i;
673             break;
674         }
675     }
676
677     menu_frame_move_on_screen(self, &dx, &dy);
678     menu_frame_move(self, self->area.x + dx, self->area.y + dy);
679
680     XMapWindow(ob_display, self->window);
681
682     return TRUE;
683 }
684
685 gboolean menu_frame_show_submenu(ObMenuFrame *self, ObMenuFrame *parent,
686                                  ObMenuEntryFrame *parent_entry)
687 {
688     gint dx, dy;
689
690     if (menu_frame_is_visible(self))
691         return TRUE;
692
693     self->monitor = parent->monitor;
694     self->parent = parent;
695     self->parent_entry = parent_entry;
696
697     /* set up parent's child to be us */
698     if (parent->child)
699         menu_frame_hide(parent->child);
700     parent->child = self;
701
702     if (!menu_frame_show(self))
703         return FALSE;
704
705     menu_frame_place_submenu(self);
706     menu_frame_move_on_screen(self, &dx, &dy);
707
708     if (dx == 0) {
709         menu_frame_move(self, self->area.x, self->area.y + dy);
710     } else {
711         gboolean dir;
712
713         /* flip the direction in which we're placing submenus */
714         if (dx > 0)
715             dir = TRUE;
716         else
717             dir = FALSE;
718
719         /* if it changed, then replace the menu on the opposite side,
720            and try keep it on the screen too */
721         if (dir != self->direction_right) {
722             self->direction_right = dir;
723             menu_frame_place_submenu(self);
724             menu_frame_move_on_screen(self, &dx, &dy);
725             menu_frame_move(self, self->area.x + dx, self->area.y + dy);
726         }
727     }
728
729     XMapWindow(ob_display, self->window);
730
731     return TRUE;
732 }
733
734 void menu_frame_hide(ObMenuFrame *self)
735 {
736     GList *it = g_list_find(menu_frame_visible, self);
737
738     if (!it)
739         return;
740
741     if (self->child)
742         menu_frame_hide(self->child);
743
744     if (self->parent)
745         self->parent->child = NULL;
746     self->parent = NULL;
747     self->parent_entry = NULL;
748
749     menu_frame_visible = g_list_delete_link(menu_frame_visible, it);
750
751     if (menu_frame_visible == NULL) {
752         /* last menu shown */
753         grab_pointer(FALSE, OB_CURSOR_NONE);
754         grab_keyboard(FALSE);
755     }
756
757     XUnmapWindow(ob_display, self->window);
758
759     menu_frame_free(self);
760 }
761
762 void menu_frame_hide_all()
763 {
764     GList *it;
765
766     if (config_submenu_show_delay) {
767         /* remove any submenu open requests */
768         ob_main_loop_timeout_remove(ob_main_loop,
769                                     menu_entry_frame_submenu_timeout);
770     }
771     if ((it = g_list_last(menu_frame_visible)))
772         menu_frame_hide(it->data);
773 }
774
775 void menu_frame_hide_all_client(ObClient *client)
776 {
777     GList *it = g_list_last(menu_frame_visible);
778     if (it) {
779         ObMenuFrame *f = it->data;
780         if (f->client == client)
781             menu_frame_hide(f);
782     }
783 }
784
785
786 ObMenuFrame* menu_frame_under(gint x, gint y)
787 {
788     ObMenuFrame *ret = NULL;
789     GList *it;
790
791     for (it = menu_frame_visible; it; it = g_list_next(it)) {
792         ObMenuFrame *f = it->data;
793
794         if (RECT_CONTAINS(f->area, x, y)) {
795             ret = f;
796             break;
797         }
798     }
799     return ret;
800 }
801
802 ObMenuEntryFrame* menu_entry_frame_under(gint x, gint y)
803 {
804     ObMenuFrame *frame;
805     ObMenuEntryFrame *ret = NULL;
806     GList *it;
807
808     if ((frame = menu_frame_under(x, y))) {
809         x -= ob_rr_theme->mbwidth + frame->area.x;
810         y -= frame->title_h + ob_rr_theme->mbwidth + frame->area.y;
811
812         for (it = frame->entries; it; it = g_list_next(it)) {
813             ObMenuEntryFrame *e = it->data;
814
815             if (RECT_CONTAINS(e->area, x, y)) {
816                 ret = e;            
817                 break;
818             }
819         }
820     }
821     return ret;
822 }
823
824 static gboolean menu_entry_frame_submenu_timeout(gpointer data)
825 {
826     menu_entry_frame_show_submenu((ObMenuEntryFrame*)data);
827     return FALSE;
828 }
829
830 void menu_frame_select(ObMenuFrame *self, ObMenuEntryFrame *entry)
831 {
832     ObMenuEntryFrame *old = self->selected;
833     ObMenuFrame *oldchild = self->child;
834
835     if (entry && entry->entry->type == OB_MENU_ENTRY_TYPE_SEPARATOR)
836         entry = old;
837
838     if (old == entry) return;
839    
840     if (config_submenu_show_delay) { 
841         /* remove any submenu open requests */
842         ob_main_loop_timeout_remove(ob_main_loop,
843                                     menu_entry_frame_submenu_timeout);
844     }
845
846     self->selected = entry;
847
848     if (old)
849         menu_entry_frame_render(old);
850     if (oldchild)
851         menu_frame_hide(oldchild);
852
853     if (self->selected) {
854         menu_entry_frame_render(self->selected);
855
856         if (self->selected->entry->type == OB_MENU_ENTRY_TYPE_SUBMENU) {
857             if (config_submenu_show_delay) {
858                 /* initiate a new submenu open request */
859                 ob_main_loop_timeout_add(ob_main_loop,
860                                          config_submenu_show_delay * 1000,
861                                          menu_entry_frame_submenu_timeout,
862                                          self->selected,
863                                          NULL);
864             } else {
865                 menu_entry_frame_show_submenu(self->selected);
866             }
867         }
868     }
869 }
870
871 void menu_entry_frame_show_submenu(ObMenuEntryFrame *self)
872 {
873     ObMenuFrame *f;
874
875     if (!self->entry->data.submenu.submenu) return;
876
877     f = menu_frame_new(self->entry->data.submenu.submenu,
878                        self->frame->client);
879     /* pass our direction on to our child */
880     f->direction_right = self->frame->direction_right;
881
882     menu_frame_show_submenu(f, self->frame, self);
883 }
884
885 void menu_entry_frame_execute(ObMenuEntryFrame *self, guint state, Time time)
886 {
887     if (self->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
888         self->entry->data.normal.enabled)
889     {
890         /* grab all this shizzle, cuz when the menu gets hidden, 'self'
891            gets freed */
892         ObMenuEntry *entry = self->entry;
893         ObMenuExecuteFunc func = self->frame->menu->execute_func;
894         gpointer data = self->frame->menu->data;
895         GSList *acts = self->entry->data.normal.actions;
896         ObClient *client = self->frame->client;
897
898         /* release grabs before executing the shit */
899         if (!(state & ControlMask))
900             menu_frame_hide_all();
901
902         if (func)
903             func(entry, state, data, time);
904         else
905             action_run(acts, client, state, time);
906     }
907 }
908
909 void menu_frame_select_previous(ObMenuFrame *self)
910 {
911     GList *it = NULL, *start;
912
913     if (self->entries) {
914         start = it = g_list_find(self->entries, self->selected);
915         while (TRUE) {
916             ObMenuEntryFrame *e;
917
918             it = it ? g_list_previous(it) : g_list_last(self->entries);
919             if (it == start)
920                 break;
921
922             if (it) {
923                 e = it->data;
924                 if (e->entry->type == OB_MENU_ENTRY_TYPE_SUBMENU)
925                     break;
926                 if (e->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
927                     e->entry->data.normal.enabled)
928                     break;
929             }
930         }
931     }
932     menu_frame_select(self, it ? it->data : NULL);
933 }
934
935 void menu_frame_select_next(ObMenuFrame *self)
936 {
937     GList *it = NULL, *start;
938
939     if (self->entries) {
940         start = it = g_list_find(self->entries, self->selected);
941         while (TRUE) {
942             ObMenuEntryFrame *e;
943
944             it = it ? g_list_next(it) : self->entries;
945             if (it == start)
946                 break;
947
948             if (it) {
949                 e = it->data;
950                 if (e->entry->type == OB_MENU_ENTRY_TYPE_SUBMENU)
951                     break;
952                 if (e->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
953                     e->entry->data.normal.enabled)
954                     break;
955             }
956         }
957     }
958     menu_frame_select(self, it ? it->data : NULL);
959 }