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