don't focus helper windows that map unless there are no other valid targets in the...
[dana/openbox-history.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-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 "menuframe.h"
21 #include "client.h"
22 #include "menu.h"
23 #include "screen.h"
24 #include "actions.h"
25 #include "grab.h"
26 #include "openbox.h"
27 #include "mainloop.h"
28 #include "config.h"
29 #include "render/theme.h"
30
31 #define PADDING 2
32 #define SEPARATOR_HEIGHT 3
33 #define MAX_MENU_WIDTH 400
34
35 #define ITEM_HEIGHT (ob_rr_theme->menu_font_height + 2*PADDING)
36
37 #define FRAME_EVENTMASK (ButtonPressMask |ButtonMotionMask | EnterWindowMask |\
38                          LeaveWindowMask)
39 #define ENTRY_EVENTMASK (EnterWindowMask | LeaveWindowMask | \
40                          ButtonPressMask | ButtonReleaseMask)
41
42 GList *menu_frame_visible;
43
44 static ObMenuEntryFrame* menu_entry_frame_new(ObMenuEntry *entry,
45                                               ObMenuFrame *frame);
46 static void menu_entry_frame_free(ObMenuEntryFrame *self);
47 static void menu_frame_update(ObMenuFrame *self);
48 static gboolean menu_entry_frame_submenu_timeout(gpointer data);
49 static void menu_frame_hide(ObMenuFrame *self);
50
51 static Window createWindow(Window parent, gulong mask,
52                            XSetWindowAttributes *attrib)
53 {
54     return XCreateWindow(ob_display, parent, 0, 0, 1, 1, 0,
55                          RrDepth(ob_rr_inst), InputOutput,
56                          RrVisual(ob_rr_inst), mask, attrib);
57 }
58
59 GHashTable *menu_frame_map;
60
61 void menu_frame_startup(gboolean reconfig)
62 {
63     if (reconfig) return;
64
65     menu_frame_map = g_hash_table_new(g_int_hash, g_int_equal);
66 }
67
68 void menu_frame_shutdown(gboolean reconfig)
69 {
70     if (reconfig) return;
71
72     g_hash_table_destroy(menu_frame_map);
73 }
74
75 ObMenuFrame* menu_frame_new(ObMenu *menu, guint show_from, ObClient *client)
76 {
77     ObMenuFrame *self;
78     XSetWindowAttributes attr;
79
80     self = g_new0(ObMenuFrame, 1);
81     self->type = Window_Menu;
82     self->menu = menu;
83     self->selected = NULL;
84     self->client = client;
85     self->direction_right = TRUE;
86     self->show_from = show_from;
87
88     attr.event_mask = FRAME_EVENTMASK;
89     self->window = createWindow(RootWindow(ob_display, ob_screen),
90                                 CWEventMask, &attr);
91
92     XSetWindowBorderWidth(ob_display, self->window, ob_rr_theme->mbwidth);
93     XSetWindowBorder(ob_display, self->window,
94                      RrColorPixel(ob_rr_theme->menu_border_color));
95
96     self->a_title = RrAppearanceCopy(ob_rr_theme->a_menu_title);
97     self->a_items = RrAppearanceCopy(ob_rr_theme->a_menu);
98
99     stacking_add(MENU_AS_WINDOW(self));
100
101     return self;
102 }
103
104 void menu_frame_free(ObMenuFrame *self)
105 {
106     if (self) {
107         while (self->entries) {
108             menu_entry_frame_free(self->entries->data);
109             self->entries = g_list_delete_link(self->entries, self->entries);
110         }
111
112         stacking_remove(MENU_AS_WINDOW(self));
113
114         XDestroyWindow(ob_display, self->window);
115
116         RrAppearanceFree(self->a_items);
117         RrAppearanceFree(self->a_title);
118
119         g_free(self);
120     }
121 }
122
123 static ObMenuEntryFrame* menu_entry_frame_new(ObMenuEntry *entry,
124                                               ObMenuFrame *frame)
125 {
126     ObMenuEntryFrame *self;
127     XSetWindowAttributes attr;
128
129     self = g_new0(ObMenuEntryFrame, 1);
130     self->entry = entry;
131     self->frame = frame;
132
133     menu_entry_ref(entry);
134
135     attr.event_mask = ENTRY_EVENTMASK;
136     self->window = createWindow(self->frame->window, CWEventMask, &attr);
137     self->text = createWindow(self->window, 0, NULL);
138     g_hash_table_insert(menu_frame_map, &self->window, self);
139     g_hash_table_insert(menu_frame_map, &self->text, self);
140     if (entry->type == OB_MENU_ENTRY_TYPE_NORMAL) {
141         self->icon = createWindow(self->window, 0, NULL);
142         g_hash_table_insert(menu_frame_map, &self->icon, self);
143     }
144     if (entry->type == OB_MENU_ENTRY_TYPE_SUBMENU) {
145         self->bullet = createWindow(self->window, 0, NULL);
146         g_hash_table_insert(menu_frame_map, &self->bullet, self);
147     }
148
149     XMapWindow(ob_display, self->window);
150     XMapWindow(ob_display, self->text);
151
152     self->a_normal = RrAppearanceCopy(ob_rr_theme->a_menu_normal);
153     self->a_selected = RrAppearanceCopy(ob_rr_theme->a_menu_selected);
154     self->a_disabled = RrAppearanceCopy(ob_rr_theme->a_menu_disabled);
155     self->a_disabled_selected =
156         RrAppearanceCopy(ob_rr_theme->a_menu_disabled_selected);
157
158     if (entry->type == OB_MENU_ENTRY_TYPE_SEPARATOR) {
159         self->a_separator = RrAppearanceCopy(ob_rr_theme->a_clear_tex);
160         self->a_separator->texture[0].type = RR_TEXTURE_LINE_ART;
161     } else {
162         self->a_icon = RrAppearanceCopy(ob_rr_theme->a_clear_tex);
163         self->a_icon->texture[0].type = RR_TEXTURE_RGBA;
164         self->a_mask = RrAppearanceCopy(ob_rr_theme->a_clear_tex);
165         self->a_mask->texture[0].type = RR_TEXTURE_MASK;
166         self->a_bullet_normal =
167             RrAppearanceCopy(ob_rr_theme->a_menu_bullet_normal);
168         self->a_bullet_selected =
169             RrAppearanceCopy(ob_rr_theme->a_menu_bullet_selected);
170     }
171
172     self->a_text_normal =
173         RrAppearanceCopy(ob_rr_theme->a_menu_text_normal);
174     self->a_text_selected =
175         RrAppearanceCopy(ob_rr_theme->a_menu_text_selected);
176     self->a_text_disabled =
177         RrAppearanceCopy(ob_rr_theme->a_menu_text_disabled);
178     self->a_text_disabled_selected =
179         RrAppearanceCopy(ob_rr_theme->a_menu_text_disabled_selected);
180     self->a_text_title =
181         RrAppearanceCopy(ob_rr_theme->a_menu_text_title);
182
183     return self;
184 }
185
186 static void menu_entry_frame_free(ObMenuEntryFrame *self)
187 {
188     if (self) {
189         menu_entry_unref(self->entry);
190
191         XDestroyWindow(ob_display, self->text);
192         XDestroyWindow(ob_display, self->window);
193         g_hash_table_remove(menu_frame_map, &self->text);
194         g_hash_table_remove(menu_frame_map, &self->window);
195         if (self->entry->type == OB_MENU_ENTRY_TYPE_NORMAL) {
196             XDestroyWindow(ob_display, self->icon);
197             g_hash_table_remove(menu_frame_map, &self->icon);
198         }
199         if (self->entry->type == OB_MENU_ENTRY_TYPE_SUBMENU) {
200             XDestroyWindow(ob_display, self->bullet);
201             g_hash_table_remove(menu_frame_map, &self->bullet);
202         }
203
204         RrAppearanceFree(self->a_normal);
205         RrAppearanceFree(self->a_selected);
206         RrAppearanceFree(self->a_disabled);
207         RrAppearanceFree(self->a_disabled_selected);
208
209         RrAppearanceFree(self->a_separator);
210         RrAppearanceFree(self->a_icon);
211         RrAppearanceFree(self->a_mask);
212         RrAppearanceFree(self->a_text_normal);
213         RrAppearanceFree(self->a_text_selected);
214         RrAppearanceFree(self->a_text_disabled);
215         RrAppearanceFree(self->a_text_disabled_selected);
216         RrAppearanceFree(self->a_text_title);
217         RrAppearanceFree(self->a_bullet_normal);
218         RrAppearanceFree(self->a_bullet_selected);
219
220         g_free(self);
221     }
222 }
223
224 void menu_frame_move(ObMenuFrame *self, gint x, gint y)
225 {
226     RECT_SET_POINT(self->area, x, y);
227     XMoveWindow(ob_display, self->window, self->area.x, self->area.y);
228 }
229
230 static void menu_frame_place_topmenu(ObMenuFrame *self, gint *x, gint *y)
231 {
232     gint dx, dy;
233
234     if (config_menu_middle) {
235         gint myx;
236
237         myx = *x;
238         *y -= self->area.height / 2;
239
240         /* try to the right of the cursor */
241         menu_frame_move_on_screen(self, myx, *y, &dx, &dy);
242         self->direction_right = TRUE;
243         if (dx != 0) {
244             /* try to the left of the cursor */
245             myx = *x - self->area.width;
246             menu_frame_move_on_screen(self, myx, *y, &dx, &dy);
247             self->direction_right = FALSE;
248         }
249         if (dx != 0) {
250             /* if didnt fit on either side so just use what it says */
251             myx = *x;
252             menu_frame_move_on_screen(self, myx, *y, &dx, &dy);
253             self->direction_right = TRUE;
254         }
255         *x = myx + dx;
256         *y += dy;
257     } else {
258         gint myx, myy;
259
260         myx = *x;
261         myy = *y;
262
263         /* try to the bottom right of the cursor */
264         menu_frame_move_on_screen(self, myx, myy, &dx, &dy);
265         self->direction_right = TRUE;
266         if (dx != 0 || dy != 0) {
267             /* try to the bottom left of the cursor */
268             myx = *x - self->area.width;
269             myy = *y;
270             menu_frame_move_on_screen(self, myx, myy, &dx, &dy);
271             self->direction_right = FALSE;
272         }
273         if (dx != 0 || dy != 0) {
274             /* try to the top right of the cursor */
275             myx = *x;
276             myy = *y - self->area.height;
277             menu_frame_move_on_screen(self, myx, myy, &dx, &dy);
278             self->direction_right = TRUE;
279         }
280         if (dx != 0 || dy != 0) {
281             /* try to the top left of the cursor */
282             myx = *x - self->area.width;
283             myy = *y - self->area.height;
284             menu_frame_move_on_screen(self, myx, myy, &dx, &dy);
285             self->direction_right = FALSE;
286         }
287         if (dx != 0 || dy != 0) {
288             /* if didnt fit on either side so just use what it says */
289             myx = *x;
290             myy = *y;
291             menu_frame_move_on_screen(self, myx, myy, &dx, &dy);
292             self->direction_right = TRUE;
293         }
294         *x = myx + dx;
295         *y = myy + dy;
296     }
297 }
298
299 static void menu_frame_place_submenu(ObMenuFrame *self, gint *x, gint *y)
300 {
301     gint overlap;
302     gint bwidth;
303
304     overlap = ob_rr_theme->menu_overlap;
305     bwidth = ob_rr_theme->mbwidth;
306
307     if (self->direction_right)
308         *x = self->parent->area.x + self->parent->area.width -
309             overlap - bwidth;
310     else
311         *x = self->parent->area.x - self->area.width + overlap + bwidth;
312
313     *y = self->parent->area.y + self->parent_entry->area.y;
314     if (config_menu_middle)
315         *y -= (self->area.height - (bwidth * 2) - ITEM_HEIGHT) / 2;
316     else
317         *y += overlap;
318 }
319
320 void menu_frame_move_on_screen(ObMenuFrame *self, gint x, gint y,
321                                gint *dx, gint *dy)
322 {
323     Rect *a = NULL;
324     gint pos, half;
325
326     *dx = *dy = 0;
327
328     a = screen_physical_area_monitor(self->monitor);
329
330     half = g_list_length(self->entries) / 2;
331     pos = g_list_index(self->entries, self->selected);
332
333     /* if in the bottom half then check this stuff first, will keep the bottom
334        edge of the menu visible */
335     if (pos > half) {
336         *dx = MAX(*dx, a->x - x);
337         *dy = MAX(*dy, a->y - y);
338     }
339     *dx = MIN(*dx, (a->x + a->width) - (x + self->area.width));
340     *dy = MIN(*dy, (a->y + a->height) - (y + self->area.height));
341     /* if in the top half then check this stuff last, will keep the top
342        edge of the menu visible */
343     if (pos <= half) {
344         *dx = MAX(*dx, a->x - x);
345         *dy = MAX(*dy, a->y - y);
346     }
347
348     g_free(a);
349 }
350
351 static void menu_entry_frame_render(ObMenuEntryFrame *self)
352 {
353     RrAppearance *item_a, *text_a;
354     gint th; /* temp */
355     ObMenu *sub;
356     ObMenuFrame *frame = self->frame;
357
358     switch (self->entry->type) {
359     case OB_MENU_ENTRY_TYPE_NORMAL:
360     case OB_MENU_ENTRY_TYPE_SUBMENU:
361         item_a = (self->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
362                   !self->entry->data.normal.enabled ?
363                   /* disabled */
364                   (self == self->frame->selected ?
365                    self->a_disabled_selected : self->a_disabled) :
366                   /* enabled */
367                   (self == self->frame->selected ?
368                    self->a_selected : self->a_normal));
369         th = ITEM_HEIGHT;
370         break;
371     case OB_MENU_ENTRY_TYPE_SEPARATOR:
372         if (self->entry->data.separator.label) {
373             item_a = self->frame->a_title;
374             th = ob_rr_theme->menu_title_height;
375         } else {
376             item_a = self->a_normal;
377             th = SEPARATOR_HEIGHT + 2*PADDING;
378         }
379         break;
380     default:
381         g_assert_not_reached();
382     }
383     RECT_SET_SIZE(self->area, self->frame->inner_w, th);
384     XResizeWindow(ob_display, self->window,
385                   self->area.width, self->area.height);
386     item_a->surface.parent = self->frame->a_items;
387     item_a->surface.parentx = self->area.x;
388     item_a->surface.parenty = self->area.y;
389     RrPaint(item_a, self->window, self->area.width, self->area.height);
390
391     switch (self->entry->type) {
392     case OB_MENU_ENTRY_TYPE_NORMAL:
393         text_a = (self->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
394                   !self->entry->data.normal.enabled ?
395                   /* disabled */
396                   (self == self->frame->selected ?
397                    self->a_text_disabled_selected : self->a_text_disabled) :
398                   /* enabled */
399                   (self == self->frame->selected ?
400                    self->a_text_selected : self->a_text_normal));
401         text_a->texture[0].data.text.string = self->entry->data.normal.label;
402         if (self->entry->data.normal.shortcut &&
403             (self->frame->menu->show_all_shortcuts ||
404              self->entry->data.normal.shortcut_always_show ||
405              self->entry->data.normal.shortcut_position > 0))
406         {
407             text_a->texture[0].data.text.shortcut = TRUE;
408             text_a->texture[0].data.text.shortcut_pos =
409                 self->entry->data.normal.shortcut_position;
410         } else
411             text_a->texture[0].data.text.shortcut = FALSE;
412         break;
413     case OB_MENU_ENTRY_TYPE_SUBMENU:
414         text_a = (self == self->frame->selected ?
415                   self->a_text_selected :
416                   self->a_text_normal);
417         sub = self->entry->data.submenu.submenu;
418         text_a->texture[0].data.text.string = sub ? sub->title : "";
419         if (sub->shortcut && (self->frame->menu->show_all_shortcuts ||
420                               sub->shortcut_always_show ||
421                               sub->shortcut_position > 0))
422         {
423             text_a->texture[0].data.text.shortcut = TRUE;
424             text_a->texture[0].data.text.shortcut_pos = sub->shortcut_position;
425         } else
426             text_a->texture[0].data.text.shortcut = FALSE;
427         break;
428     case OB_MENU_ENTRY_TYPE_SEPARATOR:
429         if (self->entry->data.separator.label != NULL)
430             text_a = self->a_text_title;
431         else
432             text_a = self->a_text_normal;
433         break;
434     }
435
436     switch (self->entry->type) {
437     case OB_MENU_ENTRY_TYPE_NORMAL:
438         XMoveResizeWindow(ob_display, self->text,
439                           self->frame->text_x, PADDING,
440                           self->frame->text_w,
441                           ITEM_HEIGHT - 2*PADDING);
442         text_a->surface.parent = item_a;
443         text_a->surface.parentx = self->frame->text_x;
444         text_a->surface.parenty = PADDING;
445         RrPaint(text_a, self->text, self->frame->text_w,
446                 ITEM_HEIGHT - 2*PADDING);
447         break;
448     case OB_MENU_ENTRY_TYPE_SUBMENU:
449         XMoveResizeWindow(ob_display, self->text,
450                           self->frame->text_x, PADDING,
451                           self->frame->text_w - ITEM_HEIGHT,
452                           ITEM_HEIGHT - 2*PADDING);
453         text_a->surface.parent = item_a;
454         text_a->surface.parentx = self->frame->text_x;
455         text_a->surface.parenty = PADDING;
456         RrPaint(text_a, self->text, self->frame->text_w - ITEM_HEIGHT,
457                 ITEM_HEIGHT - 2*PADDING);
458         break;
459     case OB_MENU_ENTRY_TYPE_SEPARATOR:
460         if (self->entry->data.separator.label != NULL) {
461             /* labeled separator */
462             XMoveResizeWindow(ob_display, self->text,
463                               ob_rr_theme->paddingx, ob_rr_theme->paddingy,
464                               self->area.width - 2*ob_rr_theme->paddingx,
465                               ob_rr_theme->menu_title_height -
466                               2*ob_rr_theme->paddingy);
467             text_a->surface.parent = item_a;
468             text_a->surface.parentx = ob_rr_theme->paddingx;
469             text_a->surface.parenty = ob_rr_theme->paddingy;
470             RrPaint(text_a, self->text,
471                     self->area.width - 2*ob_rr_theme->paddingx,
472                     ob_rr_theme->menu_title_height -
473                     2*ob_rr_theme->paddingy);
474         } else {
475             /* unlabeled separaator */
476             XMoveResizeWindow(ob_display, self->text, PADDING, PADDING,
477                               self->area.width - 2*PADDING, SEPARATOR_HEIGHT);
478             self->a_separator->surface.parent = item_a;
479             self->a_separator->surface.parentx = PADDING;
480             self->a_separator->surface.parenty = PADDING;
481             self->a_separator->texture[0].data.lineart.color =
482                 text_a->texture[0].data.text.color;
483             self->a_separator->texture[0].data.lineart.x1 = 2*PADDING;
484             self->a_separator->texture[0].data.lineart.y1 = SEPARATOR_HEIGHT/2;
485             self->a_separator->texture[0].data.lineart.x2 =
486                 self->area.width - 4*PADDING;
487             self->a_separator->texture[0].data.lineart.y2 = SEPARATOR_HEIGHT/2;
488             RrPaint(self->a_separator, self->text,
489                     self->area.width - 2*PADDING, SEPARATOR_HEIGHT);
490         }
491         break;
492     }
493
494     if (self->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
495         self->entry->data.normal.icon_data)
496     {
497         XMoveResizeWindow(ob_display, self->icon,
498                           PADDING, frame->item_margin.top,
499                           ITEM_HEIGHT - frame->item_margin.top
500                           - frame->item_margin.bottom,
501                           ITEM_HEIGHT - frame->item_margin.top
502                           - frame->item_margin.bottom);
503         self->a_icon->texture[0].data.rgba.width =
504             self->entry->data.normal.icon_width;
505         self->a_icon->texture[0].data.rgba.height =
506             self->entry->data.normal.icon_height;
507         self->a_icon->texture[0].data.rgba.alpha =
508             self->entry->data.normal.icon_alpha;
509         self->a_icon->texture[0].data.rgba.data =
510             self->entry->data.normal.icon_data;
511         self->a_icon->surface.parent = item_a;
512         self->a_icon->surface.parentx = PADDING;
513         self->a_icon->surface.parenty = frame->item_margin.top;
514         RrPaint(self->a_icon, self->icon,
515                 ITEM_HEIGHT - frame->item_margin.top
516                 - frame->item_margin.bottom,
517                 ITEM_HEIGHT - frame->item_margin.top
518                 - frame->item_margin.bottom);
519         XMapWindow(ob_display, self->icon);
520     } else if (self->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
521                self->entry->data.normal.mask)
522     {
523         RrColor *c;
524
525         XMoveResizeWindow(ob_display, self->icon,
526                           PADDING, frame->item_margin.top,
527                           ITEM_HEIGHT - frame->item_margin.top
528                           - frame->item_margin.bottom,
529                           ITEM_HEIGHT - frame->item_margin.top
530                           - frame->item_margin.bottom);
531         self->a_mask->texture[0].data.mask.mask =
532             self->entry->data.normal.mask;
533
534         c = (self->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
535              !self->entry->data.normal.enabled ?
536              /* disabled */
537              (self == self->frame->selected ?
538               self->entry->data.normal.mask_disabled_selected_color :
539               self->entry->data.normal.mask_disabled_color) :
540              /* enabled */
541              (self == self->frame->selected ?
542               self->entry->data.normal.mask_selected_color :
543               self->entry->data.normal.mask_normal_color));
544         self->a_mask->texture[0].data.mask.color = c;
545
546         self->a_mask->surface.parent = item_a;
547         self->a_mask->surface.parentx = PADDING;
548         self->a_mask->surface.parenty = frame->item_margin.top;
549         RrPaint(self->a_mask, self->icon,
550                 ITEM_HEIGHT - frame->item_margin.top
551                 - frame->item_margin.bottom,
552                 ITEM_HEIGHT - frame->item_margin.top
553                 - frame->item_margin.bottom);
554         XMapWindow(ob_display, self->icon);
555     } else
556         XUnmapWindow(ob_display, self->icon);
557
558     if (self->entry->type == OB_MENU_ENTRY_TYPE_SUBMENU) {
559         RrAppearance *bullet_a;
560         XMoveResizeWindow(ob_display, self->bullet,
561                           self->frame->text_x + self->frame->text_w -
562                           ITEM_HEIGHT + PADDING, PADDING,
563                           ITEM_HEIGHT - 2*PADDING,
564                           ITEM_HEIGHT - 2*PADDING);
565         bullet_a = (self == self->frame->selected ?
566                     self->a_bullet_selected :
567                     self->a_bullet_normal);
568         bullet_a->surface.parent = item_a;
569         bullet_a->surface.parentx =
570             self->frame->text_x + self->frame->text_w - ITEM_HEIGHT + PADDING;
571         bullet_a->surface.parenty = PADDING;
572         RrPaint(bullet_a, self->bullet,
573                 ITEM_HEIGHT - 2*PADDING,
574                 ITEM_HEIGHT - 2*PADDING);
575         XMapWindow(ob_display, self->bullet);
576     } else
577         XUnmapWindow(ob_display, self->bullet);
578
579     XFlush(ob_display);
580 }
581
582 /*! this code is taken from the menu_frame_render. if that changes, this won't
583   work.. */
584 static gint menu_entry_frame_get_height(ObMenuEntryFrame *self,
585                                         gboolean first_entry,
586                                         gboolean last_entry)
587 {
588     ObMenuEntryType t;
589     gint h = 0;
590
591     h += 2*PADDING;
592
593     if (self)
594         t = self->entry->type;
595     else
596         /* this is the More... entry, it's NORMAL type */
597         t = OB_MENU_ENTRY_TYPE_NORMAL;
598
599     switch (t) {
600     case OB_MENU_ENTRY_TYPE_NORMAL:
601     case OB_MENU_ENTRY_TYPE_SUBMENU:
602         h += ob_rr_theme->menu_font_height;
603         break;
604     case OB_MENU_ENTRY_TYPE_SEPARATOR:
605         if (self->entry->data.separator.label != NULL) {
606             h += ob_rr_theme->menu_title_height +
607                 (ob_rr_theme->mbwidth - PADDING) * 2;
608  
609             /* if the first entry is a labeled separator, then make its border
610                overlap with the menu's outside border */
611             if (first_entry)
612                 h -= ob_rr_theme->mbwidth;
613             /* if the last entry is a labeled separator, then make its border
614                overlap with the menu's outside border */
615             if (last_entry)
616                 h -= ob_rr_theme->mbwidth;
617         } else {
618             h += SEPARATOR_HEIGHT;
619         }
620         break;
621     }
622
623     return h;
624 }
625
626 void menu_frame_render(ObMenuFrame *self)
627 {
628     gint w = 0, h = 0;
629     gint tw, th; /* temps */
630     GList *it;
631     gboolean has_icon = FALSE;
632     ObMenu *sub;
633     ObMenuEntryFrame *e;
634
635     /* find text dimensions */
636
637     STRUT_SET(self->item_margin, 0, 0, 0, 0);
638
639     if (self->entries) {
640         ObMenuEntryFrame *e = self->entries->data;
641         gint l, t, r, b;
642
643         e->a_text_normal->texture[0].data.text.string = "";
644         tw = RrMinWidth(e->a_text_normal);
645         tw += 2*PADDING;
646
647         th = ITEM_HEIGHT;
648
649         RrMargins(e->a_normal, &l, &t, &r, &b);
650         STRUT_SET(self->item_margin,
651                   MAX(self->item_margin.left, l),
652                   MAX(self->item_margin.top, t),
653                   MAX(self->item_margin.right, r),
654                   MAX(self->item_margin.bottom, b));
655         RrMargins(e->a_selected, &l, &t, &r, &b);
656         STRUT_SET(self->item_margin,
657                   MAX(self->item_margin.left, l),
658                   MAX(self->item_margin.top, t),
659                   MAX(self->item_margin.right, r),
660                   MAX(self->item_margin.bottom, b));
661         RrMargins(e->a_disabled, &l, &t, &r, &b);
662         STRUT_SET(self->item_margin,
663                   MAX(self->item_margin.left, l),
664                   MAX(self->item_margin.top, t),
665                   MAX(self->item_margin.right, r),
666                   MAX(self->item_margin.bottom, b));
667         RrMargins(e->a_disabled_selected, &l, &t, &r, &b);
668         STRUT_SET(self->item_margin,
669                   MAX(self->item_margin.left, l),
670                   MAX(self->item_margin.top, t),
671                   MAX(self->item_margin.right, r),
672                   MAX(self->item_margin.bottom, b));
673     }
674
675     /* render the entries */
676
677     for (it = self->entries; it; it = g_list_next(it)) {
678         RrAppearance *text_a;
679         e = it->data;
680
681         /* if the first entry is a labeled separator, then make its border
682            overlap with the menu's outside border */
683         if (it == self->entries &&
684             e->entry->type == OB_MENU_ENTRY_TYPE_SEPARATOR &&
685             e->entry->data.separator.label)
686         {
687             h -= ob_rr_theme->mbwidth;
688         }
689
690         if (e->entry->type == OB_MENU_ENTRY_TYPE_SEPARATOR &&
691             e->entry->data.separator.label)
692         {
693             e->border = ob_rr_theme->mbwidth;
694         }
695
696         RECT_SET_POINT(e->area, 0, h+e->border);
697         XMoveWindow(ob_display, e->window, e->area.x-e->border, e->area.y-e->border);
698         XSetWindowBorderWidth(ob_display, e->window, e->border);
699         XSetWindowBorder(ob_display, e->window,
700                          RrColorPixel(ob_rr_theme->menu_border_color));
701
702
703         text_a = (e->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
704                   !e->entry->data.normal.enabled ?
705                   /* disabled */
706                   (e == self->selected ?
707                    e->a_text_disabled_selected : e->a_text_disabled) :
708                   /* enabled */
709                   (e == self->selected ?
710                    e->a_text_selected : e->a_text_normal));
711         switch (e->entry->type) {
712         case OB_MENU_ENTRY_TYPE_NORMAL:
713             text_a->texture[0].data.text.string = e->entry->data.normal.label;
714             tw = RrMinWidth(text_a);
715             tw = MIN(tw, MAX_MENU_WIDTH);
716             th = ob_rr_theme->menu_font_height;
717
718             if (e->entry->data.normal.icon_data ||
719                 e->entry->data.normal.mask)
720                 has_icon = TRUE;
721             break;
722         case OB_MENU_ENTRY_TYPE_SUBMENU:
723             sub = e->entry->data.submenu.submenu;
724             text_a->texture[0].data.text.string = sub ? sub->title : "";
725             tw = RrMinWidth(text_a);
726             tw = MIN(tw, MAX_MENU_WIDTH);
727             th = ob_rr_theme->menu_font_height;
728
729             if (e->entry->data.normal.icon_data ||
730                 e->entry->data.normal.mask)
731                 has_icon = TRUE;
732
733             tw += ITEM_HEIGHT - PADDING;
734             break;
735         case OB_MENU_ENTRY_TYPE_SEPARATOR:
736             if (e->entry->data.separator.label != NULL) {
737                 e->a_text_title->texture[0].data.text.string =
738                     e->entry->data.separator.label;
739                 tw = RrMinWidth(e->a_text_title) + 2*ob_rr_theme->paddingx;
740                 tw = MIN(tw, MAX_MENU_WIDTH);
741                 th = ob_rr_theme->menu_title_height +
742                     (ob_rr_theme->mbwidth - PADDING) *2;
743             } else {
744                 tw = 0;
745                 th = SEPARATOR_HEIGHT;
746             }
747             break;
748         }
749         tw += 2*PADDING;
750         th += 2*PADDING;
751         w = MAX(w, tw);
752         h += th;
753     }
754
755     /* if the last entry is a labeled separator, then make its border
756        overlap with the menu's outside border */
757     it = g_list_last(self->entries);
758     e = it ? it->data : NULL;
759     if (e && e->entry->type == OB_MENU_ENTRY_TYPE_SEPARATOR &&
760         e->entry->data.separator.label)
761     {
762         h -= ob_rr_theme->mbwidth;
763     }
764
765     self->text_x = PADDING;
766     self->text_w = w;
767
768     if (self->entries) {
769         if (has_icon) {
770             w += ITEM_HEIGHT + PADDING;
771             self->text_x += ITEM_HEIGHT + PADDING;
772         }
773     }
774
775     if (!w) w = 10;
776     if (!h) h = 3;
777
778     XResizeWindow(ob_display, self->window, w, h);
779
780     self->inner_w = w;
781
782     RrPaint(self->a_items, self->window, w, h);
783
784     for (it = self->entries; it; it = g_list_next(it))
785         menu_entry_frame_render(it->data);
786
787     w += ob_rr_theme->mbwidth * 2;
788     h += ob_rr_theme->mbwidth * 2;
789
790     RECT_SET_SIZE(self->area, w, h);
791
792     XFlush(ob_display);
793 }
794
795 static void menu_frame_update(ObMenuFrame *self)
796 {
797     GList *mit, *fit;
798     Rect *a;
799     gint h;
800
801     menu_pipe_execute(self->menu);
802     menu_find_submenus(self->menu);
803
804     self->selected = NULL;
805
806     /* start at show_from */
807     mit = g_list_nth(self->menu->entries, self->show_from);
808
809     /* go through the menu's and frame's entries and connect the frame entries
810        to the menu entries */
811     for (fit = self->entries; mit && fit;
812          mit = g_list_next(mit), fit = g_list_next(fit))
813     {
814         ObMenuEntryFrame *f = fit->data;
815         f->entry = mit->data;
816     }
817
818     /* if there are more menu entries than in the frame, add them */
819     while (mit) {
820         ObMenuEntryFrame *e = menu_entry_frame_new(mit->data, self);
821         self->entries = g_list_append(self->entries, e);
822         mit = g_list_next(mit);
823     }
824
825     /* if there are more frame entries than menu entries then get rid of
826        them */
827     while (fit) {
828         GList *n = g_list_next(fit);
829         menu_entry_frame_free(fit->data);
830         self->entries = g_list_delete_link(self->entries, fit);
831         fit = n;
832     }
833
834     /* * make the menu fit on the screen */
835
836     /* calculate the height of the menu */
837     h = 0;
838     for (fit = self->entries; fit; fit = g_list_next(fit))
839         h += menu_entry_frame_get_height(fit->data,
840                                          fit == self->entries,
841                                          g_list_next(fit) == NULL);
842     /* add the border at the top and bottom */
843     h += ob_rr_theme->mbwidth * 2;
844
845     a = screen_physical_area_monitor(self->monitor);
846
847     if (h > a->height) {
848         GList *flast, *tmp;
849         gboolean last_entry = TRUE;
850
851         /* take the height of our More... entry into account */
852         h += menu_entry_frame_get_height(NULL, FALSE, TRUE);
853
854         /* start at the end of the entries */
855         flast = g_list_last(self->entries);
856
857         /* pull out all the entries from the frame that don't
858            fit on the screen, leaving at least 1 though */
859         while (h > a->height && g_list_previous(flast) != NULL) {
860             /* update the height, without this entry */
861             h -= menu_entry_frame_get_height(flast->data, FALSE, last_entry);
862
863             /* destroy the entry we're not displaying */
864             tmp = flast;
865             flast = g_list_previous(flast);
866             menu_entry_frame_free(tmp->data);
867             self->entries = g_list_delete_link(self->entries, tmp);
868
869             /* only the first one that we see is the last entry in the menu */
870             last_entry = FALSE;
871         };
872
873         {
874             ObMenuEntry *more_entry;
875             ObMenuEntryFrame *more_frame;
876             /* make the More... menu entry frame which will display in this
877                frame.
878                if self->menu->more_menu is NULL that means that this is already
879                More... menu, so just use ourself.
880             */
881             more_entry = menu_get_more((self->menu->more_menu ?
882                                         self->menu->more_menu :
883                                         self->menu),
884                                        /* continue where we left off */
885                                        self->show_from +
886                                        g_list_length(self->entries));
887             more_frame = menu_entry_frame_new(more_entry, self);
888             /* make it get deleted when the menu frame goes away */
889             menu_entry_unref(more_entry);
890                                        
891             /* add our More... entry to the frame */
892             self->entries = g_list_append(self->entries, more_frame);
893         }
894     }
895
896     g_free(a);
897
898     menu_frame_render(self);
899 }
900
901 static gboolean menu_frame_is_visible(ObMenuFrame *self)
902 {
903     return !!(g_list_find(menu_frame_visible, self));
904 }
905
906 static gboolean menu_frame_show(ObMenuFrame *self)
907 {
908     GList *it;
909
910     /* determine if the underlying menu is already visible */
911     for (it = menu_frame_visible; it; it = g_list_next(it)) {
912         ObMenuFrame *f = it->data;
913         if (f->menu == self->menu)
914             break;
915     }
916     if (!it) {
917         if (self->menu->update_func)
918             if (!self->menu->update_func(self, self->menu->data))
919                 return FALSE;
920     }
921
922     if (menu_frame_visible == NULL) {
923         /* no menus shown yet */
924
925         /* grab the pointer in such a way as to pass through "owner events"
926            so that we can get enter/leave notifies in the menu. */
927         if (!grab_pointer(TRUE, FALSE, OB_CURSOR_POINTER))
928             return FALSE;
929         if (!grab_keyboard()) {
930             ungrab_pointer();
931             return FALSE;
932         }
933     }
934
935     menu_frame_update(self);
936
937     menu_frame_visible = g_list_prepend(menu_frame_visible, self);
938
939     if (self->menu->show_func)
940         self->menu->show_func(self, self->menu->data);
941
942     return TRUE;
943 }
944
945 gboolean menu_frame_show_topmenu(ObMenuFrame *self, gint x, gint y,
946                                  gboolean mouse)
947 {
948     gint px, py;
949     guint i;
950
951     if (menu_frame_is_visible(self))
952         return TRUE;
953     if (!menu_frame_show(self))
954         return FALSE;
955
956     /* find the monitor the menu is on */
957     for (i = 0; i < screen_num_monitors; ++i) {
958         Rect *a = screen_physical_area_monitor(i);
959         gboolean contains = RECT_CONTAINS(*a, x, y);
960         g_free(a);
961         if (contains) {
962             self->monitor = i;
963             break;
964         }
965     }
966
967     if (self->menu->place_func)
968         self->menu->place_func(self, &x, &y, mouse, self->menu->data);
969     else
970         menu_frame_place_topmenu(self, &x, &y);
971
972     menu_frame_move(self, x, y);
973
974     XMapWindow(ob_display, self->window);
975
976     if (screen_pointer_pos(&px, &py)) {
977         ObMenuEntryFrame *e = menu_entry_frame_under(px, py);
978         if (e && e->frame == self)
979             e->ignore_enters++;
980     }
981
982     return TRUE;
983 }
984
985 gboolean menu_frame_show_submenu(ObMenuFrame *self, ObMenuFrame *parent,
986                                  ObMenuEntryFrame *parent_entry)
987 {
988     gint x, y, dx, dy;
989     gint px, py;
990
991     if (menu_frame_is_visible(self))
992         return TRUE;
993
994     self->monitor = parent->monitor;
995     self->parent = parent;
996     self->parent_entry = parent_entry;
997
998     /* set up parent's child to be us */
999     if (parent->child)
1000         menu_frame_hide(parent->child);
1001     parent->child = self;
1002
1003     if (!menu_frame_show(self))
1004         return FALSE;
1005
1006     menu_frame_place_submenu(self, &x, &y);
1007     menu_frame_move_on_screen(self, x, y, &dx, &dy);
1008
1009     if (dx != 0) {
1010         /*try the other side */
1011         self->direction_right = !self->direction_right;
1012         menu_frame_place_submenu(self, &x, &y);
1013         menu_frame_move_on_screen(self, x, y, &dx, &dy);
1014     }
1015     menu_frame_move(self, x + dx, y + dy);
1016
1017     XMapWindow(ob_display, self->window);
1018
1019     if (screen_pointer_pos(&px, &py)) {
1020         ObMenuEntryFrame *e = menu_entry_frame_under(px, py);
1021         if (e && e->frame == self)
1022             e->ignore_enters++;
1023     }
1024
1025     return TRUE;
1026 }
1027
1028 static void menu_frame_hide(ObMenuFrame *self)
1029 {
1030     GList *it = g_list_find(menu_frame_visible, self);
1031
1032     if (!it)
1033         return;
1034
1035     if (self->menu->hide_func)
1036         self->menu->hide_func(self, self->menu->data);
1037
1038     if (self->child)
1039         menu_frame_hide(self->child);
1040
1041     if (self->parent)
1042         self->parent->child = NULL;
1043     self->parent = NULL;
1044     self->parent_entry = NULL;
1045
1046     menu_frame_visible = g_list_delete_link(menu_frame_visible, it);
1047
1048     if (menu_frame_visible == NULL) {
1049         /* last menu shown */
1050         ungrab_pointer();
1051         ungrab_keyboard();
1052     }
1053
1054     XUnmapWindow(ob_display, self->window);
1055
1056     menu_frame_free(self);
1057 }
1058
1059 void menu_frame_hide_all()
1060 {
1061     GList *it;
1062
1063     if (config_submenu_show_delay) {
1064         /* remove any submenu open requests */
1065         ob_main_loop_timeout_remove(ob_main_loop,
1066                                     menu_entry_frame_submenu_timeout);
1067     }
1068     if ((it = g_list_last(menu_frame_visible)))
1069         menu_frame_hide(it->data);
1070 }
1071
1072 void menu_frame_hide_all_client(ObClient *client)
1073 {
1074     GList *it = g_list_last(menu_frame_visible);
1075     if (it) {
1076         ObMenuFrame *f = it->data;
1077         if (f->client == client)
1078             menu_frame_hide(f);
1079     }
1080 }
1081
1082
1083 ObMenuFrame* menu_frame_under(gint x, gint y)
1084 {
1085     ObMenuFrame *ret = NULL;
1086     GList *it;
1087
1088     for (it = menu_frame_visible; it; it = g_list_next(it)) {
1089         ObMenuFrame *f = it->data;
1090
1091         if (RECT_CONTAINS(f->area, x, y)) {
1092             ret = f;
1093             break;
1094         }
1095     }
1096     return ret;
1097 }
1098
1099 ObMenuEntryFrame* menu_entry_frame_under(gint x, gint y)
1100 {
1101     ObMenuFrame *frame;
1102     ObMenuEntryFrame *ret = NULL;
1103     GList *it;
1104
1105     if ((frame = menu_frame_under(x, y))) {
1106         x -= ob_rr_theme->mbwidth + frame->area.x;
1107         y -= ob_rr_theme->mbwidth + frame->area.y;
1108
1109         for (it = frame->entries; it; it = g_list_next(it)) {
1110             ObMenuEntryFrame *e = it->data;
1111
1112             if (RECT_CONTAINS(e->area, x, y)) {
1113                 ret = e;
1114                 break;
1115             }
1116         }
1117     }
1118     return ret;
1119 }
1120
1121 static gboolean menu_entry_frame_submenu_timeout(gpointer data)
1122 {
1123     menu_entry_frame_show_submenu((ObMenuEntryFrame*)data);
1124     return FALSE;
1125 }
1126
1127 void menu_frame_select(ObMenuFrame *self, ObMenuEntryFrame *entry,
1128                        gboolean immediate)
1129 {
1130     ObMenuEntryFrame *old = self->selected;
1131     ObMenuFrame *oldchild = self->child;
1132
1133     if (entry && entry->entry->type == OB_MENU_ENTRY_TYPE_SEPARATOR)
1134         entry = old;
1135
1136     if (old == entry) return;
1137    
1138     if (config_submenu_show_delay) { 
1139         /* remove any submenu open requests */
1140         ob_main_loop_timeout_remove(ob_main_loop,
1141                                     menu_entry_frame_submenu_timeout);
1142     }
1143
1144     self->selected = entry;
1145
1146     if (old)
1147         menu_entry_frame_render(old);
1148     if (oldchild)
1149         menu_frame_hide(oldchild);
1150
1151     if (self->selected) {
1152         menu_entry_frame_render(self->selected);
1153
1154         if (self->selected->entry->type == OB_MENU_ENTRY_TYPE_SUBMENU) {
1155             if (config_submenu_show_delay && !immediate) {
1156                 /* initiate a new submenu open request */
1157                 ob_main_loop_timeout_add(ob_main_loop,
1158                                          config_submenu_show_delay * 1000,
1159                                          menu_entry_frame_submenu_timeout,
1160                                          self->selected, g_direct_equal,
1161                                          NULL);
1162             } else {
1163                 menu_entry_frame_show_submenu(self->selected);
1164             }
1165         }
1166     }
1167 }
1168
1169 void menu_entry_frame_show_submenu(ObMenuEntryFrame *self)
1170 {
1171     ObMenuFrame *f;
1172
1173     if (!self->entry->data.submenu.submenu) return;
1174
1175     f = menu_frame_new(self->entry->data.submenu.submenu,
1176                        self->entry->data.submenu.show_from,
1177                        self->frame->client);
1178     /* pass our direction on to our child */
1179     f->direction_right = self->frame->direction_right;
1180
1181     menu_frame_show_submenu(f, self->frame, self);
1182 }
1183
1184 void menu_entry_frame_execute(ObMenuEntryFrame *self, guint state)
1185 {
1186     if (self->entry->type == OB_MENU_ENTRY_TYPE_NORMAL &&
1187         self->entry->data.normal.enabled)
1188     {
1189         /* grab all this shizzle, cuz when the menu gets hidden, 'self'
1190            gets freed */
1191         ObMenuEntry *entry = self->entry;
1192         ObMenuExecuteFunc func = self->frame->menu->execute_func;
1193         gpointer data = self->frame->menu->data;
1194         GSList *acts = self->entry->data.normal.actions;
1195         ObClient *client = self->frame->client;
1196         ObMenuFrame *frame = self->frame;
1197
1198         /* release grabs before executing the shit */
1199         if (!(state & ControlMask)) {
1200             menu_frame_hide_all();
1201             frame = NULL;
1202         }
1203
1204         if (func)
1205             func(entry, frame, client, state, data);
1206         else
1207             actions_run_acts(acts, OB_USER_ACTION_MENU_SELECTION,
1208                              state, -1, -1, 0, OB_FRAME_CONTEXT_NONE, client);
1209     }
1210 }
1211
1212 void menu_frame_select_previous(ObMenuFrame *self)
1213 {
1214     GList *it = NULL, *start;
1215
1216     if (self->entries) {
1217         start = it = g_list_find(self->entries, self->selected);
1218         while (TRUE) {
1219             ObMenuEntryFrame *e;
1220
1221             it = it ? g_list_previous(it) : g_list_last(self->entries);
1222             if (it == start)
1223                 break;
1224
1225             if (it) {
1226                 e = it->data;
1227                 if (e->entry->type == OB_MENU_ENTRY_TYPE_SUBMENU)
1228                     break;
1229                 if (e->entry->type == OB_MENU_ENTRY_TYPE_NORMAL)
1230                     break;
1231             }
1232         }
1233     }
1234     menu_frame_select(self, it ? it->data : NULL, TRUE);
1235 }
1236
1237 void menu_frame_select_next(ObMenuFrame *self)
1238 {
1239     GList *it = NULL, *start;
1240
1241     if (self->entries) {
1242         start = it = g_list_find(self->entries, self->selected);
1243         while (TRUE) {
1244             ObMenuEntryFrame *e;
1245
1246             it = it ? g_list_next(it) : self->entries;
1247             if (it == start)
1248                 break;
1249
1250             if (it) {
1251                 e = it->data;
1252                 if (e->entry->type == OB_MENU_ENTRY_TYPE_SUBMENU)
1253                     break;
1254                 if (e->entry->type == OB_MENU_ENTRY_TYPE_NORMAL)
1255                     break;
1256             }
1257         }
1258     }
1259     menu_frame_select(self, it ? it->data : NULL, TRUE);
1260 }