Updating to version 0.20.2
[wmaker-crm.git] / src / menu.c
blob69e2215112e67480e60c1d3964389651891448ef
1 /* menu.c- generic menu, used for root menu, application menus etc.
3 * Window Maker window manager
4 *
5 * Copyright (c) 1997, 1998 Alfredo K. Kojima
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.
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.
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
20 * USA.
23 #include "wconfig.h"
25 #include <X11/Xlib.h>
26 #include <X11/Xutil.h>
27 #include <X11/keysym.h>
28 #include <stdlib.h>
29 #include <string.h>
30 #include <stdio.h>
31 #include <unistd.h>
32 #include <ctype.h>
34 #include "WindowMaker.h"
35 #include "wcore.h"
36 #include "framewin.h"
37 #include "menu.h"
38 #include "actions.h"
39 #include "funcs.h"
40 #include "stacking.h"
41 #include "text.h"
44 /****** Global Variables ******/
46 extern Cursor wCursor[WCUR_LAST];
48 extern XContext wWinContext;
50 extern WPreferences wPreferences;
52 #define MOD_MASK wPreferences.modifier_mask
54 #define MENU_SCROLL_STEP menuScrollParameters[(int)wPreferences.menu_scroll_speed].steps
55 #define MENU_SCROLL_DELAY menuScrollParameters[(int)wPreferences.menu_scroll_speed].delay
59 #define MENUW(m) ((m)->frame->core->width+2*FRAME_BORDER_WIDTH)
60 #define MENUH(m) ((m)->frame->core->height+2*FRAME_BORDER_WIDTH)
63 /***** Local Stuff ******/
65 static struct {
66 int steps;
67 int delay;
68 } menuScrollParameters[5] = {
69 {MENU_SCROLL_STEPS_UF, MENU_SCROLL_DELAY_UF},
70 {MENU_SCROLL_STEPS_F, MENU_SCROLL_DELAY_F},
71 {MENU_SCROLL_STEPS_M, MENU_SCROLL_DELAY_M},
72 {MENU_SCROLL_STEPS_S, MENU_SCROLL_DELAY_S},
73 {MENU_SCROLL_STEPS_U, MENU_SCROLL_DELAY_U}};
76 static void menuMouseDown(WObjDescriptor *desc, XEvent *event);
77 static void menuExpose(WObjDescriptor *desc, XEvent *event);
79 static void menuTitleDoubleClick(WCoreWindow *sender, void *data, XEvent *event);
80 static void menuTitleMouseDown(WCoreWindow *sender, void *data, XEvent *event);
82 static void menuCloseClick(WCoreWindow *sender, void *data, XEvent *event);
86 static void selectEntry(WMenu *menu, int entry_no);
87 static void closeCascade(WMenu *menu);
92 *----------------------------------------------------------------------
93 * wMenuCreate--
94 * Creates a new empty menu with the specified title. If main_menu
95 * is True, the created menu will be a main menu, which has some special
96 * properties such as being placed over other normal menus.
97 * If title is NULL, the menu will have no titlebar.
99 * Returns:
100 * The created menu.
101 *----------------------------------------------------------------------
103 WMenu*
104 wMenuCreate(WScreen *screen, char *title, int main_menu)
106 WMenu *menu;
107 static int brother=0;
108 int tmp, flags;
110 menu = wmalloc(sizeof(WMenu));
112 memset(menu, 0, sizeof(WMenu));
114 #ifdef SINGLE_MENULEVEL
115 tmp = WMSubmenuWindowLevel;
116 #else
117 tmp = (main_menu ? WMMainMenuWindowLevel : WMSubmenuWindowLevel);
118 #endif
120 flags = WFF_SINGLE_STATE;
121 if (title) {
122 flags |= WFF_TITLEBAR|WFF_RIGHT_BUTTON;
123 menu->flags.titled = 1;
125 menu->frame =
126 wFrameWindowCreate(screen, tmp, 8, 2, 1, 1, flags,
127 screen->menu_title_texture, NULL,
128 screen->menu_title_pixel, &screen->menu_title_gc,
129 &screen->menu_title_font);
131 menu->frame->core->descriptor.parent = menu;
132 menu->frame->core->descriptor.parent_type = WCLASS_MENU;
133 menu->frame->core->descriptor.handle_mousedown = menuMouseDown;
135 wFrameWindowHideButton(menu->frame, WFF_RIGHT_BUTTON);
137 if (title) {
138 menu->frame->title = wstrdup(title);
141 menu->frame->flags.justification = WTJ_LEFT;
143 menu->frame->rbutton_image = screen->b_pixmaps[WBUT_CLOSE];
145 menu->entry_no = 0;
146 menu->alloced_entries = 0;
147 menu->selected_entry = -1;
148 menu->entries = NULL;
150 menu->frame_x = screen->app_menu_x;
151 menu->frame_y = screen->app_menu_y;
153 menu->frame->child = menu;
155 menu->flags.lowered = 0;
157 /* create borders */
158 if (title) {
159 /* setup object descriptors */
160 menu->frame->on_mousedown_titlebar = menuTitleMouseDown;
161 menu->frame->on_dblclick_titlebar = menuTitleDoubleClick;
164 menu->frame->on_click_right = menuCloseClick;
167 menu->menu = wCoreCreate(menu->frame->core, 0, menu->frame->top_width,
168 menu->frame->core->width, 10);
170 menu->menu->descriptor.parent = menu;
171 menu->menu->descriptor.parent_type = WCLASS_MENU;
172 menu->menu->descriptor.handle_expose = menuExpose;
173 menu->menu->descriptor.handle_mousedown = menuMouseDown;
175 menu->menu_texture_data = None;
177 XMapWindow(dpy, menu->menu->window);
179 XFlush(dpy);
181 if (!brother) {
182 brother = 1;
183 menu->brother = wMenuCreate(screen, title, main_menu);
184 brother = 0;
185 menu->brother->flags.brother = 1;
186 menu->brother->brother = menu;
190 return menu;
196 WMenu*
197 wMenuCreateForApp(WScreen *screen, char *title, int main_menu)
199 WMenu *menu;
201 menu = wMenuCreate(screen, title, main_menu);
202 if (!menu)
203 return NULL;
204 menu->flags.app_menu = 1;
205 menu->brother->flags.app_menu = 1;
207 return menu;
212 static void
213 insertEntry(WMenu *menu, WMenuEntry *entry, int index)
215 int i;
217 for (i=menu->entry_no; i>index; i--) {
218 menu->entries[i]->order++;
219 menu->entries[i+1]=menu->entries[i];
221 menu->entries[index] = entry;
225 void
226 wMenuRefresh(WMenu *menu, int flags)
228 int i;
230 if (flags & MR_TEXT_BACK) {
231 menu->frame->flags.need_texture_remake = 1;
234 if (flags & (MR_RESIZED|MR_TITLE_TEXT)) {
235 menu->flags.realized = 0;
238 wMenuRealize(menu);
240 if (menu->flags.titled)
241 wFrameWindowPaint(menu->frame);
243 if (!menu->flags.brother) {
244 if (menu->brother)
245 wMenuRefresh(menu->brother, flags);
247 for (i=0; i < menu->cascade_no; i++) {
248 if (!menu->cascades[i]->flags.brother)
249 wMenuRefresh(menu->cascades[i], flags);
250 else
251 wMenuRefresh(menu->cascades[i]->brother, flags);
258 WMenuEntry*
259 wMenuInsertCallback(WMenu *menu, int index, char *text,
260 void (*callback)(WMenu *menu, WMenuEntry *entry),
261 void *clientdata)
263 WMenuEntry *entry;
265 #ifdef DEBUG
266 if (!menu) {
267 printf("Passed NULL as menu parameter to wMenuAddCallback() \n");
268 return NULL;
270 #endif
272 assert(menu->flags.brother==0);
273 menu->flags.realized = 0;
274 menu->brother->flags.realized = 0;
276 /* reallocate array if it's too small */
277 if (menu->entry_no >= menu->alloced_entries) {
278 void *tmp;
279 #ifdef DEBUG
280 puts("doing wrealloc()");
281 #endif
282 tmp = wrealloc(menu->entries,
283 sizeof(WMenuEntry)*(menu->alloced_entries+5));
284 if (tmp==NULL) {
285 wwarning(_("wrealloc() failed while trying to add menu item"));
286 return NULL;
289 menu->entries = tmp;
290 menu->alloced_entries += 5;
292 menu->brother->entries = tmp;
293 menu->brother->alloced_entries = menu->alloced_entries;
295 entry = wmalloc(sizeof(WMenuEntry));
296 memset(entry, 0, sizeof(WMenuEntry));
297 entry->flags.enabled = 1;
298 entry->text = wstrdup(text);
299 entry->cascade = -1;
300 entry->clientdata = clientdata;
301 entry->callback = callback;
302 if (index<0 || index>=menu->entry_no) {
303 entry->order = menu->entry_no;
304 menu->entries[menu->entry_no] = entry;
305 } else {
306 entry->order = index;
307 insertEntry(menu, entry, index);
310 menu->entry_no++;
311 menu->brother->entry_no = menu->entry_no;
313 return entry;
318 void
319 wMenuEntrySetCascade(WMenu *menu, WMenuEntry *entry, WMenu *cascade)
321 WMenu *brother = menu->brother;
322 int i, done;
324 assert(menu->flags.brother==0);
326 if (entry->cascade>=0) {
327 menu->flags.realized = 0;
328 brother->flags.realized = 0;
331 cascade->parent = menu;
333 cascade->brother->parent = brother;
335 done = 0;
336 for (i=0; i<menu->cascade_no; i++) {
337 if (menu->cascades[i]==NULL) {
338 menu->cascades[i] = cascade;
339 brother->cascades[i] = cascade->brother;
340 done = 1;
341 entry->cascade = i;
342 break;
345 if (!done) {
346 entry->cascade = menu->cascade_no;
348 menu->cascades = wrealloc(menu->cascades,
349 sizeof(WMenu)*(menu->cascade_no+1));
350 menu->cascades[menu->cascade_no++] = cascade;
353 brother->cascades = wrealloc(brother->cascades,
354 sizeof(WMenu)*(brother->cascade_no+1));
355 brother->cascades[brother->cascade_no++] = cascade->brother;
359 if (menu->flags.lowered) {
361 cascade->flags.lowered = 1;
362 ChangeStackingLevel(cascade->frame->core, WMNormalWindowLevel);
364 cascade->brother->flags.lowered = 1;
365 ChangeStackingLevel(cascade->brother->frame->core, WMNormalWindowLevel);
368 if (!menu->flags.realized)
369 wMenuRealize(menu);
373 void
374 wMenuEntryRemoveCascade(WMenu *menu, WMenuEntry *entry)
376 assert(menu->flags.brother==0);
378 /* destroy cascade menu */
379 if (entry->cascade>=0 && menu->cascades
380 && menu->cascades[entry->cascade]!=NULL) {
382 wMenuDestroy(menu->cascades[entry->cascade], True);
384 menu->cascades[entry->cascade] = NULL;
385 menu->brother->cascades[entry->cascade] = NULL;
387 entry->cascade = -1;
392 void
393 wMenuRemoveItem(WMenu *menu, int index)
395 int i;
397 if (menu->flags.brother) {
398 wMenuRemoveItem(menu->brother, index);
399 return;
402 if (index>=menu->entry_no) return;
404 /* destroy cascade menu */
405 wMenuEntryRemoveCascade(menu, menu->entries[index]);
407 /* destroy unshared data */
409 if (menu->entries[index]->text)
410 free(menu->entries[index]->text);
412 if (menu->entries[index]->rtext)
413 free(menu->entries[index]->rtext);
415 if (menu->entries[index]->free_cdata && menu->entries[index]->clientdata)
416 (*menu->entries[index]->free_cdata)(menu->entries[index]->clientdata);
418 free(menu->entries[index]);
420 for (i=index; i<menu->entry_no-1; i++) {
421 menu->entries[i+1]->order--;
422 menu->entries[i]=menu->entries[i+1];
424 menu->entry_no--;
425 menu->brother->entry_no--;
430 void
431 wMenuRealize(WMenu *menu)
433 int i;
434 int width, rwidth, mrwidth, mwidth;
435 int theight, twidth, eheight;
436 WScreen *scr = menu->frame->screen_ptr;
437 static int brother_done=0;
438 int flags;
440 if (!brother_done) {
441 brother_done = 1;
442 wMenuRealize(menu->brother);
443 brother_done = 0;
446 flags = WFF_SINGLE_STATE;
447 if (menu->flags.titled)
448 flags |= WFF_TITLEBAR|WFF_RIGHT_BUTTON;
450 wFrameWindowUpdateBorders(menu->frame, flags);
452 if (menu->flags.titled) {
453 twidth = wTextWidth(scr->menu_title_font->font, menu->frame->title,
454 strlen(menu->frame->title));
455 theight = menu->frame->top_width;
456 twidth += theight + theight/2 + (wPreferences.new_style ? 8 : 0);
457 } else {
458 twidth = 0;
459 theight = 0;
461 eheight = scr->menu_entry_font->height + 6;
462 menu->entry_height = eheight;
463 mrwidth = 0;
464 mwidth = 0;
465 for (i=0; i<menu->entry_no; i++) {
466 char *text;
468 /* search widest text */
469 text = menu->entries[i]->text;
470 width = wTextWidth(scr->menu_entry_font->font, text, strlen(text))+12;
472 if (menu->entries[i]->flags.indicator) {
473 width += MENU_INDICATOR_SPACE;
476 if (width > mwidth)
477 mwidth = width;
479 /* search widest text on right */
480 text = menu->entries[i]->rtext;
481 if (text)
482 rwidth = wTextWidth(scr->menu_entry_font->font, text,
483 strlen(text)) + 5;
484 else if (menu->entries[i]->cascade>=0)
485 rwidth = eheight;
486 else
487 rwidth = 4;
489 if (rwidth > mrwidth)
490 mrwidth = rwidth;
492 mwidth += mrwidth;
494 if (mwidth < twidth)
495 mwidth = twidth;
497 wCoreConfigure(menu->menu, 0, theight, mwidth, menu->entry_no*eheight -1);
499 wFrameWindowResizeInternal(menu->frame, mwidth, menu->entry_no*eheight -1);
502 /* setup background texture */
503 switch (scr->menu_item_texture->any.type) {
504 case WTEX_DGRADIENT:
505 case WTEX_VGRADIENT:
506 case WTEX_HGRADIENT:
507 case WTEX_MHGRADIENT:
508 case WTEX_MVGRADIENT:
509 case WTEX_MDGRADIENT:
510 case WTEX_PIXMAP:
511 if (!menu->flags.brother) {
512 FREE_PIXMAP(menu->menu_texture_data);
514 wTextureRender(scr, scr->menu_item_texture,
515 &menu->menu_texture_data, menu->menu->width,
516 menu->entry_height, WREL_MENUENTRY);
517 XSetWindowBackgroundPixmap(dpy, menu->menu->window,
518 menu->menu_texture_data);
519 XClearWindow(dpy, menu->menu->window);
521 XSetWindowBackgroundPixmap(dpy, menu->brother->menu->window,
522 menu->menu_texture_data);
523 XClearWindow(dpy, menu->brother->menu->window);
525 break;
527 default:
528 XSetWindowBackground(dpy, menu->menu->window,
529 scr->menu_item_texture->any.color.pixel);
530 XClearWindow(dpy, menu->menu->window);
533 menu->flags.realized = 1;
535 if (menu->flags.mapped)
536 wMenuPaint(menu);
537 if (menu->brother->flags.mapped)
538 wMenuPaint(menu->brother);
542 void
543 wMenuDestroy(WMenu *menu, int recurse)
545 int i;
547 /* remove any pending timers */
548 if (menu->timer)
549 WMDeleteTimerHandler(menu->timer);
550 menu->timer = NULL;
552 /* call destroy handler */
553 if (menu->on_destroy)
554 (*menu->on_destroy)(menu);
556 /* Destroy items if this menu own them. If this is the "brother" menu,
557 * leave them alone as it is shared by them.
559 if (!menu->flags.brother) {
560 for (i=0; i<menu->entry_no; i++) {
562 free(menu->entries[i]->text);
564 if (menu->entries[i]->rtext)
565 free(menu->entries[i]->rtext);
567 if (menu->entries[i]->free_cdata && menu->entries[i]->clientdata) {
568 (*menu->entries[i]->free_cdata)(menu->entries[i]->clientdata);
570 free(menu->entries[i]);
573 if (recurse) {
574 for (i=0; i<menu->cascade_no; i++) {
575 if (menu->cascades[i]) {
576 if (menu->cascades[i]->flags.brother)
577 wMenuDestroy(menu->cascades[i]->brother, recurse);
578 else
579 wMenuDestroy(menu->cascades[i], recurse);
584 if (menu->entries)
585 free(menu->entries);
589 FREE_PIXMAP(menu->menu_texture_data);
591 if (menu->cascades)
592 free(menu->cascades);
594 wCoreDestroy(menu->menu);
595 wFrameWindowDestroy(menu->frame);
597 /* destroy copy of this menu */
598 if (!menu->flags.brother && menu->brother)
599 wMenuDestroy(menu->brother, False);
601 free(menu);
605 static void
606 drawFrame(WScreen *scr, Window win, int y, int w, int h)
608 XSegment segs[2];
610 segs[0].x1 = 0;
611 segs[0].y1 = y;
612 segs[0].x2 = w-1;
613 segs[0].y2 = y;
614 segs[1].x1 = 0;
615 segs[1].y1 = y;
616 segs[1].x2 = 0;
617 segs[1].y2 = y + h - 2;
618 XDrawSegments(dpy, win, scr->menu_item_auxtexture->light_gc, segs, 2);
620 XDrawLine(dpy, win, scr->menu_item_auxtexture->dark_gc, 0, y+h-1,
621 w-1, y+h-1);
623 segs[0].x1 = 1;
624 segs[0].y1 = segs[0].y2 = y + h-2;
625 segs[0].x2 = w-1;
626 segs[1].x1 = segs[1].x2 = w-1;
627 segs[1].y1 = y + 1;
628 segs[1].y2 = y + h-2;
629 XDrawSegments(dpy, win, scr->menu_item_auxtexture->dim_gc, segs, 2);
633 static void
634 paintEntry(WMenu *menu, int index, int selected)
636 int x, y, w, h, tw;
637 GC light, dim, dark, textGC;
638 WScreen *scr=menu->frame->screen_ptr;
639 Window win = menu->menu->window;
640 WMenuEntry *entry=menu->entries[index];
642 if (!menu->flags.realized) return;
643 h = menu->entry_height;
644 w = menu->menu->width;
645 y = index * h;
647 light = scr->menu_item_auxtexture->light_gc;
648 dim = scr->menu_item_auxtexture->dim_gc;
649 dark = scr->menu_item_auxtexture->dark_gc;
651 /* paint background */
652 if (selected) {
653 XSetForeground(dpy, scr->select_menu_gc, scr->select_pixel);
654 XFillRectangle(dpy, win, scr->select_menu_gc, 1, y+1, w-2, h-3);
655 if (scr->menu_item_texture->any.type == WTEX_SOLID)
656 drawFrame(scr, win, y, w, h);
657 } else {
658 if (scr->menu_item_texture->any.type == WTEX_SOLID) {
659 XClearArea(dpy, win, 0, y + 1, w - 1, h - 3, False);
660 /* draw the frame */
661 drawFrame(scr, win, y, w, h);
662 } else {
663 XClearArea(dpy, win, 0, y, w, h, False);
667 if (selected) {
668 textGC = scr->select_menu_gc;
669 if (entry->flags.enabled)
670 XSetForeground(dpy, textGC, scr->select_text_pixel);
671 else
672 XSetForeground(dpy, textGC, scr->dtext_pixel);
673 } else if (!entry->flags.enabled) {
674 textGC = scr->disabled_menu_entry_gc;
675 } else {
676 textGC = scr->menu_entry_gc;
678 /* draw text */
679 x = 5;
680 if (entry->flags.indicator)
681 x += MENU_INDICATOR_SPACE + 2;
683 wDrawString(win, scr->menu_entry_font,
684 textGC, x, 3+y+scr->menu_entry_font->y, entry->text,
685 strlen(entry->text));
687 if (entry->cascade>=0) {
688 /* draw the cascade indicator */
689 XDrawLine(dpy,win,dim, w-11, y+6, w-6, y+h/2-1);
690 XDrawLine(dpy,win,light, w-11, y+h-8, w-6, y+h/2-1);
691 XDrawLine(dpy,win,dark, w-12, y+6, w-12, y+h-8);
694 /* draw indicator */
695 if (entry->flags.indicator && entry->flags.indicator_on) {
696 int iw, ih;
697 WPixmap *indicator;
700 switch (entry->flags.indicator_type) {
701 case MI_CHECK:
702 indicator = scr->menu_check_indicator;
703 break;
704 case MI_MINIWINDOW:
705 indicator = scr->menu_mini_indicator;
706 break;
707 case MI_HIDDEN:
708 indicator = scr->menu_hide_indicator;
709 break;
710 case MI_SHADED:
711 indicator = scr->menu_shade_indicator;
712 break;
713 case MI_DIAMOND:
714 default:
715 indicator = scr->menu_radio_indicator;
716 break;
719 iw = indicator->width;
720 ih = indicator->height;
721 XSetClipMask(dpy, scr->copy_gc, indicator->mask);
722 XSetClipOrigin(dpy, scr->copy_gc, 5, y+(h-ih)/2);
723 if (selected)
724 XSetForeground(dpy, scr->copy_gc, scr->black_pixel);
725 else
726 XSetForeground(dpy, scr->copy_gc, scr->mtext_pixel);
727 XFillRectangle(dpy, win, scr->copy_gc, 5, y+(h-ih)/2, iw, ih);
729 XCopyArea(dpy, indicator->image, win, scr->copy_gc, 0, 0,
730 iw, ih, 5, y+(h-ih)/2);
732 XSetClipOrigin(dpy, scr->copy_gc, 0, 0);
735 /* draw right text */
737 if (entry->rtext && entry->cascade<0) {
738 tw = wTextWidth(scr->menu_entry_font->font, entry->rtext,
739 strlen(entry->rtext));
741 wDrawString(win, scr->menu_entry_font, textGC, w-6-tw,
742 3+y+scr->menu_entry_font->y, entry->rtext,
743 strlen(entry->rtext));
747 static void
748 move_menus(WMenu *menu, int x, int y)
750 while (menu->parent) {
751 menu = menu->parent;
752 x -= MENUW(menu);
753 if (!wPreferences.align_menus && menu->selected_entry>=0) {
754 y -= menu->selected_entry*menu->entry_height;
757 wMenuMove(menu, x, y, True);
760 static void
761 makeVisible(WMenu *menu)
763 WScreen *scr = menu->frame->screen_ptr;
764 int x1, y1, x2, y2, new_x, new_y, move;
766 if (menu->entry_no<0) return;
768 x1 = menu->frame_x;
769 y1 = menu->frame_y+menu->frame->top_width
770 + menu->selected_entry*menu->entry_height;
771 x2 = x1 + MENUW(menu);
772 y2 = y1 + menu->entry_height;
774 new_x = x1;
775 new_y = y1;
776 move = 0;
778 if (x1 < 0) {
779 new_x = 0;
780 move = 1;
781 } else if (x2 >= scr->scr_width) {
782 new_x = scr->scr_width - MENUW(menu) - 1;
783 move = 1;
786 if (y1 < 0) {
787 new_y = 0;
788 move = 1;
789 } else if (y2 >= scr->scr_height) {
790 new_y = scr->scr_height - menu->entry_height - 1;
791 move = 1;
794 new_y = new_y - menu->frame->top_width
795 - menu->selected_entry*menu->entry_height;
796 move_menus(menu, new_x, new_y);
801 static int
802 check_key(WMenu *menu, XKeyEvent *event)
804 int i, ch, s;
805 char buffer[32];
807 if (XLookupString(event, buffer, 32, NULL, NULL)<1)
808 return -1;
810 ch = toupper(buffer[0]);
812 s = (menu->selected_entry>=0 ? menu->selected_entry+1 : 0);
814 again:
815 for (i=s; i<menu->entry_no; i++) {
816 if (ch==toupper(menu->entries[i]->text[0])) {
817 return i;
820 /* no match. Retry from start, if previous started from a selected entry */
821 if (s!=0) {
822 s = 0;
823 goto again;
825 return -1;
829 static int
830 keyboardMenu(WMenu *menu)
832 XEvent event;
833 KeySym ksym=NoSymbol;
834 int done=0;
835 int index;
836 WMenuEntry *entry;
837 int old_pos_x = menu->frame_x;
838 int old_pos_y = menu->frame_y;
839 int new_x = old_pos_x, new_y = old_pos_y;
840 int scr_width = menu->frame->screen_ptr->scr_width;
841 int scr_height = menu->frame->screen_ptr->scr_height;
843 if (menu->flags.editing)
844 return False;
847 XGrabKeyboard(dpy, menu->frame->core->window, True, GrabModeAsync,
848 GrabModeAsync, CurrentTime);
850 if (menu->frame_y+menu->frame->top_width >= scr_height)
851 new_y = scr_height - menu->frame->top_width;
853 if (menu->frame_x+MENUW(menu) >= scr_width)
854 new_x = scr_width-MENUW(menu)-1;
856 move_menus(menu, new_x, new_y);
858 while (!done) {
859 XAllowEvents(dpy, AsyncKeyboard, CurrentTime);
860 WMMaskEvent(dpy, ExposureMask|ButtonMotionMask|ButtonPressMask
861 |ButtonReleaseMask|KeyPressMask|KeyReleaseMask
862 |SubstructureNotifyMask, &event);
864 switch (event.type) {
865 case KeyPress:
866 ksym = XLookupKeysym(&event.xkey, 0);
867 switch (ksym) {
868 case XK_Escape:
869 done = 1;
870 break;
872 case XK_Home:
873 case XK_KP_Home:
874 selectEntry(menu, 0);
875 makeVisible(menu);
876 break;
878 case XK_End:
879 case XK_KP_End:
880 selectEntry(menu, menu->entry_no-1);
881 makeVisible(menu);
882 break;
884 case XK_Up:
885 #ifdef ARROWLESS_KBD
886 case XK_k:
887 #endif
888 case XK_KP_Up:
889 if (menu->selected_entry <= 0)
890 selectEntry(menu, menu->entry_no-1);
891 else
892 selectEntry(menu, menu->selected_entry-1);
893 makeVisible(menu);
894 break;
896 case XK_Down:
897 #ifdef ARROWLESS_KBD
898 case XK_j:
899 #endif
900 case XK_KP_Down:
901 if (menu->selected_entry<0)
902 selectEntry(menu, 0);
903 else if (menu->selected_entry == menu->entry_no-1)
904 selectEntry(menu, 0);
905 else if (menu->selected_entry < menu->entry_no-1)
906 selectEntry(menu, menu->selected_entry+1);
907 makeVisible(menu);
908 break;
910 case XK_Right:
911 #ifdef ARROWLESS_KBD
912 case XK_l:
913 #endif
914 case XK_KP_Right:
915 if (menu->selected_entry>=0) {
916 WMenuEntry *entry;
917 entry = menu->entries[menu->selected_entry];
919 if (entry->cascade >= 0 && menu->cascades
920 && menu->cascades[entry->cascade]->entry_no > 0) {
922 XUngrabKeyboard(dpy, CurrentTime);
924 selectEntry(menu->cascades[entry->cascade], 0);
925 if (!keyboardMenu(menu->cascades[entry->cascade]))
926 done = 1;
928 XGrabKeyboard(dpy, menu->frame->core->window, True,
929 GrabModeAsync, GrabModeAsync,
930 CurrentTime);
933 break;
935 case XK_Left:
936 #ifdef ARROWLESS_KBD
937 case XK_h:
938 #endif
939 case XK_KP_Left:
940 if (menu->parent!=NULL && menu->parent->selected_entry>=0) {
941 selectEntry(menu, -1);
942 move_menus(menu, old_pos_x, old_pos_y);
943 return True;
945 break;
947 case XK_Return:
948 done = 2;
949 break;
951 default:
952 index = check_key(menu, &event.xkey);
953 if (index>=0) {
954 selectEntry(menu, index);
957 break;
959 default:
960 if (event.type==ButtonPress)
961 done = 1;
962 WMHandleEvent(&event);
966 XUngrabKeyboard(dpy, CurrentTime);
968 if (done==2 && menu->selected_entry>=0) {
969 entry = menu->entries[menu->selected_entry];
970 } else {
971 entry = NULL;
974 if (entry && entry->callback!=NULL && entry->flags.enabled
975 && entry->cascade < 0) {
976 #if (MENU_BLINK_COUNT > 0)
977 int sel = menu->selected_entry;
978 int i;
980 for (i=0; i<MENU_BLINK_COUNT; i++) {
981 paintEntry(menu, sel, False);
982 XSync(dpy, 0);
983 wusleep(MENU_BLINK_DELAY);
984 paintEntry(menu, sel, True);
985 XSync(dpy, 0);
986 wusleep(MENU_BLINK_DELAY);
988 #endif
989 selectEntry(menu, -1);
991 if (!menu->flags.buttoned) {
992 wMenuUnmap(menu);
993 move_menus(menu, old_pos_x, old_pos_y);
995 closeCascade(menu);
997 (*entry->callback)(menu, entry);
998 } else {
999 if (!menu->flags.buttoned) {
1000 wMenuUnmap(menu);
1001 move_menus(menu, old_pos_x, old_pos_y);
1003 selectEntry(menu, -1);
1007 /* returns True if returning from a submenu to a parent menu,
1008 * False if exiting from menu */
1009 return False;
1013 void
1014 wMenuMapAt(WMenu *menu, int x, int y, int keyboard)
1016 int scr_width = menu->frame->screen_ptr->scr_width;
1017 int scr_height = menu->frame->screen_ptr->scr_height;
1019 if (!menu->flags.realized) {
1020 menu->flags.realized=1;
1021 wMenuRealize(menu);
1023 if (!menu->flags.mapped) {
1024 if (wPreferences.wrap_menus) {
1025 if (x<0) x = 0;
1026 if (y<0) y = 0;
1027 if (x+MENUW(menu) > scr_width)
1028 x = scr_width - MENUW(menu);
1029 if (y+MENUH(menu) > scr_height)
1030 y = scr_height - MENUH(menu);
1033 XMoveWindow(dpy, menu->frame->core->window, x, y);
1034 menu->frame_x = x;
1035 menu->frame_y = y;
1036 XMapWindow(dpy, menu->frame->core->window);
1037 wRaiseFrame(menu->frame->core);
1038 menu->flags.mapped = 1;
1039 } else {
1040 selectEntry(menu, 0);
1043 if (keyboard)
1044 keyboardMenu(menu);
1048 void
1049 wMenuMap(WMenu *menu)
1051 if (!menu->flags.realized) {
1052 menu->flags.realized=1;
1053 wMenuRealize(menu);
1055 if (menu->flags.app_menu && menu->parent==NULL) {
1056 menu->frame_x = menu->frame->screen_ptr->app_menu_x;
1057 menu->frame_y = menu->frame->screen_ptr->app_menu_y;
1058 XMoveWindow(dpy, menu->frame->core->window, menu->frame_x, menu->frame_y);
1060 XMapWindow(dpy, menu->frame->core->window);
1061 wRaiseFrame(menu->frame->core);
1062 menu->flags.mapped = 1;
1066 void
1067 wMenuUnmap(WMenu *menu)
1069 int i;
1071 XUnmapWindow(dpy, menu->frame->core->window);
1072 if (menu->flags.titled && menu->flags.buttoned) {
1073 wFrameWindowHideButton(menu->frame, WFF_RIGHT_BUTTON);
1075 menu->flags.buttoned = 0;
1076 menu->flags.mapped = 0;
1077 menu->flags.open_to_left = 0;
1079 for (i=0; i<menu->cascade_no; i++) {
1080 if (menu->cascades[i]!=NULL
1081 && menu->cascades[i]->flags.mapped
1082 && !menu->cascades[i]->flags.buttoned) {
1084 wMenuUnmap(menu->cascades[i]);
1087 menu->selected_entry = -1;
1092 void
1093 wMenuPaint(WMenu *menu)
1095 int i;
1097 if (!menu->flags.mapped) {
1098 return;
1101 /* paint entries */
1102 for (i=0; i<menu->entry_no; i++) {
1103 paintEntry(menu, i, i==menu->selected_entry);
1108 void
1109 wMenuSetEnabled(WMenu *menu, int index, int enable)
1111 if (index>=menu->entry_no) return;
1112 menu->entries[index]->flags.enabled=enable;
1113 paintEntry(menu, index, index==menu->selected_entry);
1114 paintEntry(menu->brother, index, index==menu->selected_entry);
1118 /* ====================================================================== */
1121 static void
1122 editEntry(WMenu *menu, WMenuEntry *entry)
1124 WTextInput *text;
1125 XEvent event;
1126 WObjDescriptor *desc;
1127 char *t;
1128 int done = 0;
1129 Window old_focus;
1130 int old_revert;
1132 menu->flags.editing = 1;
1134 text = wTextCreate(menu->menu, 1, menu->entry_height * entry->order,
1135 menu->menu->width - 2, menu->entry_height - 1);
1137 wTextPutText(text, entry->text);
1138 XGetInputFocus(dpy, &old_focus, &old_revert);
1139 XSetInputFocus(dpy, text->core->window, RevertToNone, CurrentTime);
1141 if (XGrabKeyboard(dpy, text->core->window, True, GrabModeAsync,
1142 GrabModeAsync, CurrentTime)!=GrabSuccess) {
1143 wwarning("could not grab keyboard");
1144 wTextDestroy(text);
1146 wSetFocusTo(menu->frame->screen_ptr,
1147 menu->frame->screen_ptr->focused_window);
1148 return;
1152 while (!done && !text->done) {
1153 XSync(dpy, 0);
1154 XAllowEvents(dpy, AsyncKeyboard|AsyncPointer, CurrentTime);
1155 XSync(dpy, 0);
1156 WMNextEvent(dpy, &event);
1158 if (XFindContext(dpy, event.xany.window, wWinContext,
1159 (XPointer *)&desc)==XCNOENT)
1160 desc = NULL;
1162 if ((desc != NULL) && (desc->handle_anything != NULL)) {
1164 (*desc->handle_anything)(desc, &event);
1166 } else {
1167 switch (event.type) {
1168 case ButtonPress:
1169 XAllowEvents(dpy, ReplayPointer, CurrentTime);
1170 done = 1;
1172 default:
1173 WMHandleEvent(&event);
1178 XSetInputFocus(dpy, old_focus, old_revert, CurrentTime);
1180 wSetFocusTo(menu->frame->screen_ptr,
1181 menu->frame->screen_ptr->focused_window);
1184 t = wTextGetText(text);
1185 /* if !t, the user has canceled editing */
1186 if (t) {
1187 if (entry->text)
1188 free(entry->text);
1189 entry->text = wstrdup(t);
1191 menu->flags.realized = 0;
1193 wTextDestroy(text);
1195 XUngrabKeyboard(dpy, CurrentTime);
1197 if (t && menu->on_edit)
1198 (*menu->on_edit)(menu, entry);
1200 menu->flags.editing = 0;
1202 if (!menu->flags.realized)
1203 wMenuRealize(menu);
1207 static void
1208 selectEntry(WMenu *menu, int entry_no)
1210 WMenuEntry *entry;
1211 WMenu *submenu;
1212 int old_entry;
1214 if (menu->entries==NULL)
1215 return;
1217 if (entry_no >= menu->entry_no)
1218 return;
1220 old_entry = menu->selected_entry;
1221 menu->selected_entry = entry_no;
1223 if (old_entry!=entry_no) {
1225 /* unselect previous entry */
1226 if (old_entry>=0) {
1227 paintEntry(menu, old_entry, False);
1228 entry = menu->entries[old_entry];
1230 /* unmap cascade */
1231 if (entry->cascade>=0 && menu->cascades) {
1232 if (!menu->cascades[entry->cascade]->flags.buttoned) {
1233 wMenuUnmap(menu->cascades[entry->cascade]);
1238 if (entry_no<0) {
1239 menu->selected_entry = -1;
1240 return;
1242 entry = menu->entries[entry_no];
1244 if (entry->cascade>=0 && menu->cascades && entry->flags.enabled) {
1245 /* Callback for when the submenu is opened.
1247 submenu = menu->cascades[entry->cascade];
1248 if (submenu && submenu->flags.brother)
1249 submenu = submenu->brother;
1251 if (entry->callback) {
1252 /* Only call the callback if the submenu is not yet mapped.
1254 if (menu->flags.brother) {
1255 if (!submenu || !submenu->flags.mapped)
1256 (*entry->callback)(menu->brother, entry);
1257 } else {
1258 if (!submenu || !submenu->flags.buttoned)
1259 (*entry->callback)(menu, entry);
1263 /* the submenu menu might have changed */
1264 submenu = menu->cascades[entry->cascade];
1266 /* map cascade */
1267 if (!submenu->flags.mapped) {
1268 int x, y;
1270 if (!submenu->flags.realized)
1271 wMenuRealize(submenu);
1272 if (wPreferences.wrap_menus) {
1273 if (menu->flags.open_to_left)
1274 submenu->flags.open_to_left = 1;
1276 if (submenu->flags.open_to_left) {
1277 x = menu->frame_x - MENUW(submenu);
1278 if (x<0) {
1279 x = 0;
1280 submenu->flags.open_to_left = 0;
1282 } else {
1283 x = menu->frame_x + MENUW(menu);
1285 if (x + MENUW(submenu)
1286 >= menu->frame->screen_ptr->scr_width) {
1288 x = menu->frame_x - MENUW(submenu);
1289 submenu->flags.open_to_left = 1;
1292 } else {
1293 x = menu->frame_x + MENUW(menu);
1296 if (wPreferences.align_menus) {
1297 y = menu->frame_y;
1298 } else {
1299 y = menu->frame_y + menu->entry_height*entry_no;
1300 if (menu->flags.titled)
1301 y += menu->frame->top_width;
1302 if (menu->cascades[entry->cascade]->flags.titled)
1303 y -= menu->cascades[entry->cascade]->frame->top_width;
1306 wMenuMapAt(menu->cascades[entry->cascade], x, y, False);
1307 menu->cascades[entry->cascade]->parent = menu;
1308 } else {
1309 return;
1312 paintEntry(menu, entry_no, True);
1317 static WMenu*
1318 findMenu(WScreen *scr, int *x_ret, int *y_ret)
1320 WMenu *menu;
1321 WObjDescriptor *desc;
1322 Window root_ret, win, junk_win;
1323 int x, y, wx, wy;
1324 unsigned int mask;
1326 XQueryPointer(dpy, scr->root_win, &root_ret, &win, &x, &y, &wx, &wy,
1327 &mask);
1329 if (win==None) return NULL;
1331 if (XFindContext(dpy, win, wWinContext, (XPointer *)&desc)==XCNOENT)
1332 return NULL;
1334 if (desc->parent_type == WCLASS_MENU) {
1335 menu = (WMenu*)desc->parent;
1336 XTranslateCoordinates(dpy, root_ret, menu->menu->window, wx, wy,
1337 x_ret, y_ret, &junk_win);
1338 return menu;
1340 return NULL;
1346 static void
1347 closeCascade(WMenu *menu)
1349 WMenu *parent=menu->parent;
1351 if (menu->flags.brother
1352 || (!menu->flags.buttoned
1353 && (!menu->flags.app_menu||menu->parent!=NULL))) {
1355 selectEntry(menu, -1);
1356 XSync(dpy, 0);
1357 #if (MENU_BLINK_DELAY > 2)
1358 wusleep(MENU_BLINK_DELAY/2);
1359 #endif
1360 wMenuUnmap(menu);
1361 while (parent!=NULL
1362 && (parent->parent!=NULL || !parent->flags.app_menu
1363 || parent->flags.brother)
1364 && !parent->flags.buttoned) {
1365 selectEntry(parent, -1);
1366 wMenuUnmap(parent);
1367 parent = parent->parent;
1369 if (parent)
1370 selectEntry(parent, -1);
1375 static void
1376 closeBrotherCascadesOf(WMenu *menu)
1378 WMenu *tmp;
1379 int i;
1381 for (i=0; i<menu->cascade_no; i++) {
1382 if (menu->cascades[i]->flags.brother) {
1383 tmp = menu->cascades[i];
1384 } else {
1385 tmp = menu->cascades[i]->brother;
1387 if (tmp->flags.mapped) {
1388 selectEntry(tmp->parent, -1);
1389 closeBrotherCascadesOf(tmp);
1390 break;
1396 #define getEntryAt(menu, x, y) ((y)<0 ? -1 : (y)/(menu->entry_height))
1399 static WMenu*
1400 parentMenu(WMenu *menu)
1402 WMenu *parent;
1403 WMenuEntry *entry;
1405 if (menu->flags.buttoned)
1406 return menu;
1408 while (menu->parent && menu->parent->flags.mapped) {
1409 parent = menu->parent;
1410 if (parent->selected_entry < 0)
1411 break;
1412 entry = parent->entries[parent->selected_entry];
1413 if (!entry->flags.enabled || entry->cascade<0 || !parent->cascades ||
1414 parent->cascades[entry->cascade] != menu)
1415 break;
1416 menu = parent;
1417 if (menu->flags.buttoned)
1418 break;
1421 return menu;
1427 * Will raise the passed menu, if submenu = 0
1428 * If submenu > 0 will also raise all mapped submenus
1429 * until the first buttoned one
1430 * If submenu < 0 will also raise all mapped parent menus
1431 * until the first buttoned one
1434 static void
1435 raiseMenus(WMenu *menu, int submenus)
1437 WMenu *submenu;
1438 int i;
1440 if(!menu) return;
1442 wRaiseFrame(menu->frame->core);
1444 if (submenus>0 && menu->selected_entry>=0) {
1445 i = menu->entries[menu->selected_entry]->cascade;
1446 if (i>=0 && menu->cascades) {
1447 submenu = menu->cascades[i];
1448 if (submenu->flags.mapped && !submenu->flags.buttoned)
1449 raiseMenus(submenu, submenus);
1452 if (submenus<0 && !menu->flags.buttoned &&
1453 menu->parent && menu->parent->flags.mapped)
1454 raiseMenus(menu->parent, submenus);
1458 WMenu*
1459 wMenuUnderPointer(WScreen *screen)
1461 WObjDescriptor *desc;
1462 Window root_ret, win;
1463 int dummy;
1464 unsigned int mask;
1466 XQueryPointer(dpy, screen->root_win, &root_ret, &win, &dummy, &dummy,
1467 &dummy, &dummy, &mask);
1469 if (win==None) return NULL;
1471 if (XFindContext(dpy, win, wWinContext, (XPointer *)&desc)==XCNOENT)
1472 return NULL;
1474 if (desc->parent_type == WCLASS_MENU)
1475 return (WMenu *)desc->parent;
1476 return NULL;
1481 #define MIN(a,b) (((a) > (b)) ? (b) : (a))
1484 static void
1485 getPointerPosition(WScreen *scr, int *x, int *y)
1487 Window root_ret, win;
1488 int wx, wy;
1489 unsigned int mask;
1491 XQueryPointer(dpy, scr->root_win, &root_ret, &win, x, y, &wx, &wy, &mask);
1495 static void
1496 getScrollAmount(WMenu *menu, int *hamount, int *vamount)
1498 WScreen *scr = menu->menu->screen_ptr;
1499 int menuX1 = menu->frame_x;
1500 int menuY1 = menu->frame_y;
1501 int menuX2 = menu->frame_x + MENUW(menu);
1502 int menuY2 = menu->frame_y + MENUH(menu);
1503 int screenW = scr->scr_width;
1504 int screenH = scr->scr_height;
1505 int xroot, yroot;
1507 *hamount = 0;
1508 *vamount = 0;
1510 getPointerPosition(scr, &xroot, &yroot);
1513 if (xroot <= 1 && menuX1 < 0) {
1514 /* scroll to the right */
1515 *hamount = MIN(MENU_SCROLL_STEP, abs(menuX1));
1517 } else if (xroot >= screenW-2 && menuX2 > screenW-1) {
1518 /* scroll to the left */
1519 *hamount = MIN(MENU_SCROLL_STEP, abs(menuX2-screenW-1));
1521 if (*hamount==0)
1522 *hamount = 1;
1524 *hamount = -*hamount;
1527 if (yroot <= 1 && menuY1 < 0) {
1528 /* scroll down */
1529 *vamount = MIN(MENU_SCROLL_STEP, abs(menuY1));
1531 } else if (yroot >= screenH-2 && menuY2 > screenH-1) {
1532 /* scroll up */
1533 *vamount = MIN(MENU_SCROLL_STEP, abs(menuY2-screenH-1));
1535 *vamount = -*vamount;
1540 static void
1541 dragScrollMenuCallback(void *data)
1543 WMenu *menu = (WMenu*)data;
1544 WScreen *scr = menu->menu->screen_ptr;
1545 WMenu *parent = parentMenu(menu);
1546 int hamount, vamount;
1547 int x, y;
1548 int newSelectedEntry;
1550 getScrollAmount(menu, &hamount, &vamount);
1553 if (hamount != 0 || vamount != 0) {
1554 wMenuMove(parent, parent->frame_x + hamount,
1555 parent->frame_y + vamount, True);
1556 if (findMenu(scr, &x, &y)) {
1557 newSelectedEntry = getEntryAt(menu, x, y);
1558 selectEntry(menu, newSelectedEntry);
1559 } else {
1560 /* Pointer fell outside of menu. If the selected entry is
1561 * not a submenu, unselect it */
1562 if (menu->selected_entry >= 0
1563 && menu->entries[menu->selected_entry]->cascade<0)
1564 selectEntry(menu, -1);
1565 newSelectedEntry = 0;
1568 /* paranoid check */
1569 if (newSelectedEntry >= 0) {
1570 /* keep scrolling */
1571 menu->timer = WMAddTimerHandler(MENU_SCROLL_DELAY,
1572 dragScrollMenuCallback, menu);
1573 } else {
1574 menu->timer = NULL;
1576 } else {
1577 /* don't need to scroll anymore */
1578 menu->timer = NULL;
1579 if (findMenu(scr, &x, &y)) {
1580 newSelectedEntry = getEntryAt(menu, x, y);
1581 selectEntry(menu, newSelectedEntry);
1587 static void
1588 scrollMenuCallback(void *data)
1590 WMenu *menu = (WMenu*)data;
1591 WMenu *parent = parentMenu(menu);
1592 int hamount = 0; /* amount to scroll */
1593 int vamount = 0;
1595 getScrollAmount(menu, &hamount, &vamount);
1597 if (hamount != 0 || vamount != 0) {
1598 wMenuMove(parent, parent->frame_x + hamount,
1599 parent->frame_y + vamount, True);
1601 /* keep scrolling */
1602 menu->timer = WMAddTimerHandler(MENU_SCROLL_DELAY,
1603 scrollMenuCallback, menu);
1604 } else {
1605 /* don't need to scroll anymore */
1606 menu->timer = NULL;
1612 #define MENU_SCROLL_BORDER 5
1614 static int
1615 isPointNearBoder(WMenu *menu, int x, int y)
1617 int menuX1 = menu->frame_x;
1618 int menuY1 = menu->frame_y;
1619 int menuX2 = menu->frame_x + MENUW(menu);
1620 int menuY2 = menu->frame_y + MENUH(menu);
1621 int scrXe = menu->menu->screen_ptr->scr_width-1;
1622 int scrYe = menu->menu->screen_ptr->scr_height-1;
1623 int flag = 0;
1625 if (x >= menuX1 && x <= menuX2 && (y < MENU_SCROLL_BORDER
1626 || y > scrYe-MENU_SCROLL_BORDER))
1627 flag = 1;
1628 else if (y >= menuY1 && y <= menuY2 && (x < MENU_SCROLL_BORDER
1629 || x > scrXe-MENU_SCROLL_BORDER))
1630 flag = 1;
1632 return flag;
1636 void
1637 wMenuScroll(WMenu *menu, XEvent *event)
1639 WMenu *smenu;
1640 WMenu *omenu = parentMenu(menu);
1641 WScreen *scr = menu->frame->screen_ptr;
1642 int done = 0;
1643 int jump_back = 0;
1644 int old_frame_x = omenu->frame_x;
1645 int old_frame_y = omenu->frame_y;
1646 XEvent ev;
1648 #ifdef DEBUG
1649 puts("Entering menu Scroll");
1650 #endif
1652 if ((/*omenu->flags.buttoned &&*/ !wPreferences.wrap_menus)
1653 || omenu->flags.app_menu) {
1654 jump_back = 1;
1657 if (!wPreferences.wrap_menus)
1658 raiseMenus(omenu, True);
1659 else
1660 raiseMenus(menu, False);
1662 if (!menu->timer)
1663 scrollMenuCallback(menu);
1665 while(!done) {
1666 int x, y, on_border, on_x_edge, on_y_edge, on_title;
1668 WMNextEvent(dpy, &ev);
1669 switch (ev.type) {
1670 case EnterNotify:
1671 WMHandleEvent(&ev);
1672 case MotionNotify:
1673 x = (ev.type==MotionNotify) ? ev.xmotion.x_root : ev.xcrossing.x_root;
1674 y = (ev.type==MotionNotify) ? ev.xmotion.y_root : ev.xcrossing.y_root;
1676 /* on_border is != 0 if the pointer is between the menu
1677 * and the screen border and is close enough to the border */
1678 on_border = isPointNearBoder(menu, x, y);
1680 smenu = wMenuUnderPointer(scr);
1682 if ((smenu==NULL && !on_border) || (smenu && parentMenu(smenu)!=omenu)) {
1683 done = 1;
1684 break;
1687 on_x_edge = x <= 1 || x >= scr->scr_width - 2;
1688 on_y_edge = y <= 1 || y >= scr->scr_height - 2;
1689 on_border = on_x_edge || on_y_edge;
1691 if (!on_border && !jump_back) {
1692 done = 1;
1693 break;
1696 if (menu->timer && (smenu!=menu || (!on_y_edge && !on_x_edge))) {
1697 WMDeleteTimerHandler(menu->timer);
1698 menu->timer = NULL;
1701 if (smenu != NULL)
1702 menu = smenu;
1704 if (!menu->timer)
1705 scrollMenuCallback(menu);
1706 break;
1707 case ButtonPress:
1708 /* True if we push on title, or drag the omenu to other position */
1709 on_title = ev.xbutton.x_root >= omenu->frame_x &&
1710 ev.xbutton.x_root <= omenu->frame_x + MENUW(omenu) &&
1711 ev.xbutton.y_root >= omenu->frame_y &&
1712 ev.xbutton.y_root <= omenu->frame_y + omenu->frame->top_width;
1713 WMHandleEvent(&ev);
1714 smenu = wMenuUnderPointer(scr);
1715 if (smenu == NULL || (smenu && smenu->flags.buttoned && smenu != omenu))
1716 done = 1;
1717 else if (smenu==omenu && on_title) {
1718 jump_back = 0;
1719 done = 1;
1721 break;
1722 case KeyPress:
1723 done = 1;
1724 default:
1725 WMHandleEvent(&ev);
1726 break;
1730 if (menu->timer) {
1731 WMDeleteTimerHandler(menu->timer);
1732 menu->timer = NULL;
1735 if (jump_back)
1736 wMenuMove(omenu, old_frame_x, old_frame_y, True);
1738 #ifdef DEBUG
1739 puts("Leaving menu Scroll");
1740 #endif
1745 static void
1746 menuExpose(WObjDescriptor *desc, XEvent *event)
1748 wMenuPaint(desc->parent);
1751 typedef struct {
1752 int *delayed_select;
1753 WMenu *menu;
1754 WMHandlerID magic;
1755 } delay_data;
1758 static void
1759 delaySelection(void *data)
1761 delay_data *d = (delay_data*)data;
1762 int x, y, entry_no;
1764 d->magic = NULL;
1765 *(d->delayed_select) = 0;
1767 if (findMenu(d->menu->menu->screen_ptr, &x, &y)) {
1768 entry_no = getEntryAt(d->menu, x, y);
1769 selectEntry(d->menu, entry_no);
1774 static void
1775 menuMouseDown(WObjDescriptor *desc, XEvent *event)
1777 XButtonEvent *bev = &event->xbutton;
1778 WMenu *menu = desc->parent;
1779 WMenu *smenu;
1780 WScreen *scr=menu->frame->screen_ptr;
1781 WMenuEntry *entry=NULL;
1782 XEvent ev;
1783 int close_on_exit=0;
1784 int done=0;
1785 int delayed_select = 0;
1786 int entry_no;
1787 int x, y;
1788 int old_frame_x = 0;
1789 int old_frame_y = 0;
1790 delay_data d_data = {NULL, NULL, NULL};
1792 if (!wPreferences.wrap_menus) {
1793 smenu = parentMenu(menu);
1794 old_frame_x = smenu->frame_x;
1795 old_frame_y = smenu->frame_y;
1797 else if (event->xbutton.window == menu->frame->core->window) {
1798 /* This is true if the menu was launched with right click on root window */
1799 delayed_select = 1;
1800 d_data.delayed_select = &delayed_select;
1801 d_data.menu = menu;
1802 d_data.magic = WMAddTimerHandler(wPreferences.dblclick_time,
1803 delaySelection, &d_data);
1806 wRaiseFrame(menu->frame->core);
1808 close_on_exit = (bev->send_event || menu->flags.brother);
1810 smenu = findMenu(scr, &x, &y);
1811 if (!smenu) {
1812 x = -1;
1813 y = -1;
1814 } else {
1815 menu = smenu;
1818 if (menu->flags.editing) {
1819 return;
1821 entry_no = getEntryAt(menu, x, y);
1822 if (entry_no>=0) {
1823 entry = menu->entries[entry_no];
1825 if (!close_on_exit && (bev->state & ControlMask) && smenu
1826 && entry->flags.editable) {
1827 editEntry(smenu, entry);
1828 return;
1829 } else if (bev->state & ControlMask) {
1830 return;
1833 if (entry->flags.enabled && entry->cascade>=0 && menu->cascades) {
1834 WMenu *submenu = menu->cascades[entry->cascade];
1835 /* map cascade */
1836 if (submenu->flags.mapped && !submenu->flags.buttoned &&
1837 menu->selected_entry!=entry_no) {
1838 wMenuUnmap(submenu);
1840 if (!submenu->flags.mapped && !delayed_select) {
1841 selectEntry(menu, entry_no);
1842 } else if (!submenu->flags.buttoned) {
1843 selectEntry(menu, -1);
1846 } else if (!delayed_select) {
1847 selectEntry(menu, entry_no);
1850 if (!wPreferences.wrap_menus && !wPreferences.scrollable_menus) {
1851 if (!menu->timer)
1852 dragScrollMenuCallback(menu);
1856 while (!done) {
1857 int x, y;
1858 WMMaskEvent(dpy, ExposureMask|ButtonMotionMask|ButtonReleaseMask
1859 |ButtonPressMask, &ev);
1860 switch (ev.type) {
1861 case MotionNotify:
1862 smenu = findMenu(scr, &x, &y);
1863 if (smenu == NULL) {
1864 if (menu==NULL
1865 || (menu->selected_entry>=0
1866 && menu->entries[menu->selected_entry]->cascade>=0))
1867 break;
1868 selectEntry(menu, -1);
1869 menu = smenu;
1870 break;
1871 } else if (menu && menu!=smenu
1872 && (menu->selected_entry<0
1873 || menu->entries[menu->selected_entry]->cascade<0)) {
1874 selectEntry(menu, -1);
1876 if (menu!=smenu) {
1877 /* pointer crossed menus */
1878 if (menu && menu->timer) {
1879 WMDeleteTimerHandler(menu->timer);
1880 menu->timer = NULL;
1882 if (smenu)
1883 dragScrollMenuCallback(smenu);
1885 menu = smenu;
1886 if (!menu->timer)
1887 dragScrollMenuCallback(menu);
1889 if (!delayed_select) {
1890 entry_no = getEntryAt(menu, x, y);
1891 if (entry_no>=0) {
1892 entry = menu->entries[entry_no];
1893 if (entry->flags.enabled && entry->cascade>=0 &&
1894 menu->cascades) {
1895 WMenu *submenu = menu->cascades[entry->cascade];
1896 if (submenu->flags.mapped && !submenu->flags.buttoned
1897 && menu->selected_entry!=entry_no) {
1898 wMenuUnmap(submenu);
1902 selectEntry(menu, entry_no);
1904 break;
1906 case ButtonPress:
1907 break;
1909 case ButtonRelease:
1910 if (ev.xbutton.button == event->xbutton.button)
1911 done=1;
1912 break;
1914 case Expose:
1915 WMHandleEvent(&ev);
1916 break;
1920 if (menu && menu->timer) {
1921 WMDeleteTimerHandler(menu->timer);
1922 menu->timer = NULL;
1924 if (d_data.magic!=NULL)
1925 WMDeleteTimerHandler(d_data.magic);
1927 if (menu && menu->selected_entry>=0) {
1928 entry = menu->entries[menu->selected_entry];
1929 if (entry->callback!=NULL && entry->flags.enabled
1930 && entry->cascade < 0) {
1931 /* blink and erase menu selection */
1932 #if (MENU_BLINK_DELAY > 0)
1933 int sel = menu->selected_entry;
1934 int i;
1936 for (i=0; i<MENU_BLINK_COUNT; i++) {
1937 paintEntry(menu, sel, False);
1938 XSync(dpy, 0);
1939 wusleep(MENU_BLINK_DELAY);
1940 paintEntry(menu, sel, True);
1941 XSync(dpy, 0);
1942 wusleep(MENU_BLINK_DELAY);
1944 #endif
1945 /* unmap the menu, it's parents and call the callback */
1946 if (!menu->flags.buttoned &&
1947 (!menu->flags.app_menu||menu->parent!=NULL)) {
1948 closeCascade(menu);
1949 } else {
1950 selectEntry(menu, -1);
1952 (*entry->callback)(menu, entry);
1954 /* If the user double clicks an entry, the entry will
1955 * be executed twice, which is not good for things like
1956 * the root menu. So, ignore any clicks that were generated
1957 * while the entry was being executed */
1958 while (XCheckTypedWindowEvent(dpy, menu->menu->window,
1959 ButtonPress, &ev));
1960 } else if (entry->callback!=NULL && entry->cascade<0) {
1961 selectEntry(menu, -1);
1962 } else {
1963 if (entry->cascade>=0 && menu->cascades
1964 && menu->cascades[entry->cascade]->flags.brother) {
1965 selectEntry(menu, -1);
1970 if (((WMenu*)desc->parent)->flags.brother || close_on_exit
1971 || !smenu)
1972 closeCascade(desc->parent);
1974 /* close the cascade windows that should not remain opened */
1975 closeBrotherCascadesOf(desc->parent);
1977 if (!wPreferences.wrap_menus)
1978 wMenuMove(parentMenu(desc->parent), old_frame_x, old_frame_y, True);
1982 void
1983 wMenuMove(WMenu *menu, int x, int y, int submenus)
1985 WMenu *submenu;
1986 int i;
1988 if (!menu) return;
1990 menu->frame_x = x;
1991 menu->frame_y = y;
1992 XMoveWindow(dpy, menu->frame->core->window, x, y);
1994 if (submenus>0 && menu->selected_entry>=0) {
1995 i = menu->entries[menu->selected_entry]->cascade;
1997 if (i>=0 && menu->cascades) {
1998 submenu = menu->cascades[i];
1999 if (submenu->flags.mapped && !submenu->flags.buttoned)
2000 if (wPreferences.align_menus) {
2001 wMenuMove(submenu, x + MENUW(menu), y, submenus);
2002 } else {
2003 wMenuMove(submenu, x+ MENUW(menu),
2004 y + submenu->entry_height*menu->selected_entry,
2005 submenus);
2009 if (submenus<0 && menu->parent!=NULL && menu->parent->flags.mapped &&
2010 !menu->parent->flags.buttoned) {
2011 if (wPreferences.align_menus) {
2012 wMenuMove(menu->parent, x - MENUW(menu->parent), y, submenus);
2013 } else {
2014 wMenuMove(menu->parent, x - MENUW(menu->parent), menu->frame_y
2015 - menu->parent->entry_height*menu->parent->selected_entry,
2016 submenus);
2022 static void
2023 changeMenuLevels(WMenu *menu, int lower)
2025 int i;
2027 if (!lower) {
2028 ChangeStackingLevel(menu->frame->core, (!menu->parent ? WMMainMenuWindowLevel
2029 : WMSubmenuWindowLevel));
2030 wRaiseFrame(menu->frame->core);
2031 menu->flags.lowered = 0;
2032 } else {
2033 ChangeStackingLevel(menu->frame->core, WMNormalWindowLevel);
2034 wLowerFrame(menu->frame->core);
2035 menu->flags.lowered = 1;
2037 for (i=0; i<menu->cascade_no; i++) {
2038 if (menu->cascades[i]
2039 && !menu->cascades[i]->flags.buttoned
2040 && menu->cascades[i]->flags.lowered!=lower) {
2041 changeMenuLevels(menu->cascades[i], lower);
2048 static void
2049 menuTitleDoubleClick(WCoreWindow *sender, void *data, XEvent *event)
2051 WMenu *menu = data;
2052 int lower;
2054 if (event->xbutton.state & MOD_MASK) {
2055 if (menu->flags.lowered) {
2056 lower = 0;
2057 } else {
2058 lower = 1;
2060 changeMenuLevels(menu, lower);
2065 static void
2066 menuTitleMouseDown(WCoreWindow *sender, void *data, XEvent *event)
2068 WMenu *menu = data;
2069 WMenu *tmp;
2070 XEvent ev;
2071 int x=menu->frame_x, y=menu->frame_y;
2072 int dx=event->xbutton.x_root, dy=event->xbutton.y_root;
2073 int i, lower;
2075 #ifdef DEBUG
2076 printf("Moving menu\n");
2077 #endif
2079 /* can't touch the menu copy */
2080 if (menu->flags.brother)
2081 return;
2083 if (event->xbutton.button != Button1 && event->xbutton.button != Button2)
2084 return;
2085 if (XGrabPointer(dpy, menu->frame->titlebar->window, False,
2086 ButtonMotionMask|ButtonReleaseMask|ButtonPressMask,
2087 GrabModeAsync, GrabModeAsync, None,
2088 wCursor[WCUR_MOVE], CurrentTime)!=GrabSuccess) {
2089 #ifdef DEBUG0
2090 wwarning("pointer grab failed for menu move\n");
2091 #endif
2092 return;
2094 if (event->xbutton.state & MOD_MASK) {
2095 wLowerFrame(menu->frame->core);
2096 lower = 1;
2097 } else {
2098 wRaiseFrame(menu->frame->core);
2099 lower = 0;
2101 tmp = menu;
2103 /* lower/raise all submenus */
2104 while (1) {
2105 if (tmp->selected_entry>=0 && tmp->cascades) {
2106 tmp = tmp->cascades[tmp->entries[tmp->selected_entry]->cascade];
2107 if (!tmp || !tmp->flags.mapped)
2108 break;
2109 if (lower)
2110 wLowerFrame(tmp->frame->core);
2111 else
2112 wRaiseFrame(tmp->frame->core);
2113 } else {
2114 break;
2117 /* tear off the menu if it's a root menu or a cascade
2118 application menu */
2119 if (!menu->flags.buttoned && !menu->flags.brother
2120 && (!menu->flags.app_menu||menu->parent!=NULL)) {
2121 menu->flags.buttoned=1;
2122 wFrameWindowShowButton(menu->frame, WFF_RIGHT_BUTTON);
2123 if (menu->parent) {
2124 /* turn off selected menu entry in parent menu */
2125 selectEntry(menu->parent, -1);
2127 /* make parent map the copy in place of the original */
2128 for (i=0; i<menu->parent->cascade_no; i++) {
2129 if (menu->parent->cascades[i] == menu) {
2130 menu->parent->cascades[i] = menu->brother;
2131 break;
2137 while(1) {
2138 WMMaskEvent(dpy, ButtonMotionMask|ButtonReleaseMask|ButtonPressMask
2139 |ExposureMask, &ev);
2140 switch (ev.type) {
2141 case MotionNotify:
2142 x += ev.xmotion.x_root - dx;
2143 y += ev.xmotion.y_root - dy;
2144 dx = ev.xmotion.x_root;
2145 dy = ev.xmotion.y_root;
2146 wMenuMove(menu, x, y, True);
2147 break;
2149 case ButtonPress:
2150 break;
2152 case ButtonRelease:
2153 if (ev.xbutton.button != event->xbutton.button)
2154 break;
2155 #ifdef DEBUG
2156 printf("End menu move\n");
2157 #endif
2158 XUngrabPointer(dpy, CurrentTime);
2159 return;
2161 default:
2162 WMHandleEvent(&ev);
2168 *----------------------------------------------------------------------
2169 * menuCloseClick--
2170 * Handles mouse click on the close button of menus. The menu is
2171 * closed when the button is clicked.
2173 * Side effects:
2174 * The closed menu is reinserted at it's parent menus
2175 * cascade list.
2176 *----------------------------------------------------------------------
2178 static void
2179 menuCloseClick(WCoreWindow *sender, void *data, XEvent *event)
2181 WMenu *menu = (WMenu*)data;
2182 WMenu *parent = menu->parent;
2183 int i;
2185 if (parent) {
2186 for (i=0; i<parent->cascade_no; i++) {
2187 /* find the entry that points to the copy */
2188 if (parent->cascades[i] == menu->brother) {
2189 /* make it point to the original */
2190 parent->cascades[i] = menu;
2191 menu->parent = parent;
2192 break;
2196 wMenuUnmap(menu);
2200 void
2201 wMenuSaveState(WScreen *scr)
2203 proplist_t menus, key, value;
2204 int save_menus = 0;
2205 char buffer[256];
2207 menus = PLMakeDictionaryFromEntries(NULL, NULL, NULL);
2209 if (scr->root_menu && scr->root_menu->flags.buttoned) {
2210 sprintf(buffer, "%i,%i", scr->root_menu->frame_x,
2211 scr->root_menu->frame_y);
2212 key = PLMakeString("RootMenu");
2213 value = PLMakeString(buffer);
2214 PLInsertDictionaryEntry(menus, key, value);
2215 PLRelease(key);
2216 PLRelease(value);
2217 save_menus = 1;
2220 if (scr->switch_menu && scr->switch_menu->flags.buttoned) {
2221 sprintf(buffer, "%i,%i", scr->switch_menu->frame_x,
2222 scr->switch_menu->frame_y);
2223 key = PLMakeString("SwitchMenu");
2224 value = PLMakeString(buffer);
2225 PLInsertDictionaryEntry(menus, key, value);
2226 PLRelease(key);
2227 PLRelease(value);
2228 save_menus = 1;
2231 if (scr->workspace_menu && scr->workspace_menu->flags.buttoned) {
2232 sprintf(buffer, "%i,%i", scr->workspace_menu->frame_x,
2233 scr->workspace_menu->frame_y);
2234 key = PLMakeString("WorkspaceMenu");
2235 value = PLMakeString(buffer);
2236 PLInsertDictionaryEntry(menus, key, value);
2237 PLRelease(key);
2238 PLRelease(value);
2239 save_menus = 1;
2242 if (save_menus) {
2243 key = PLMakeString("Menus");
2244 PLInsertDictionaryEntry(scr->session_state, key, menus);
2245 PLRelease(key);
2247 PLRelease(menus);
2251 #define COMPLAIN(key) wwarning(_("bad value in menus state info:%s"), key)
2254 static int
2255 restoreMenu(WScreen *scr, proplist_t menu, int which)
2257 int i, x, y;
2258 WMenu *pmenu = NULL;
2260 if (!menu)
2261 return False;
2263 if (!PLIsString(menu)) {
2264 COMPLAIN("Position");
2265 return False;
2268 if (sscanf(PLGetString(menu), "%i,%i", &x, &y)!=2)
2269 COMPLAIN("Position");
2271 if (which & WSS_ROOTMENU) {
2272 OpenRootMenu(scr, x, y, False);
2273 pmenu = scr->root_menu;
2275 else if (which & WSS_SWITCHMENU) {
2276 OpenSwitchMenu(scr, x, y, False);
2277 pmenu = scr->switch_menu;
2279 else if (which & WSS_WSMENU) {
2280 OpenWorkspaceMenu(scr, x, y);
2281 pmenu = scr->workspace_menu;
2282 if (pmenu->parent) {
2283 /* make parent map the copy in place of the original */
2284 for (i=0; i<pmenu->parent->cascade_no; i++) {
2285 if (pmenu->parent->cascades[i] == pmenu) {
2286 pmenu->parent->cascades[i] = pmenu->brother;
2287 break;
2293 if (pmenu) {
2294 int width = MENUW(pmenu);
2295 int height = MENUH(pmenu);
2297 x = (x < -width) ? 0 : x;
2298 x = (x > scr->scr_width) ? scr->scr_width - width : x;
2299 y = (y < 0) ? 0 : y;
2300 y = (y > scr->scr_height) ? scr->scr_height - height : y;
2301 wMenuMove(pmenu, x, y, True);
2302 pmenu->flags.buttoned = 1;
2303 wFrameWindowShowButton(pmenu->frame, WFF_RIGHT_BUTTON);
2304 return True;
2306 return False;
2310 void
2311 wMenuRestoreState(WScreen *scr)
2313 proplist_t menus, menu, key, rkey, skey, wkey;
2315 key = PLMakeString("Menus");
2316 menus = PLGetDictionaryEntry(scr->session_state, key);
2317 PLRelease(key);
2319 if (!menus)
2320 return;
2322 /* restore menus */
2324 rkey = PLMakeString("RootMenu");
2325 skey = PLMakeString("SwitchMenu");
2326 wkey = PLMakeString("WorkspaceMenu");
2327 menu = PLGetDictionaryEntry(menus, rkey);
2328 restoreMenu(scr, menu, WSS_ROOTMENU);
2329 menu = PLGetDictionaryEntry(menus, skey);
2330 restoreMenu(scr, menu, WSS_SWITCHMENU);
2331 menu = PLGetDictionaryEntry(menus, wkey);
2332 restoreMenu(scr, menu, WSS_WSMENU);
2334 PLRelease(rkey);
2335 PLRelease(skey);
2336 PLRelease(wkey);
2340 void
2341 OpenWorkspaceMenu(WScreen *scr, int x, int y)
2343 WMenu *menu, *parent;
2344 WMenuEntry *entry;
2346 if (!scr->root_menu) {
2347 OpenRootMenu(scr, scr->scr_width*2, 0, False);
2348 wMenuUnmap(scr->root_menu);
2351 menu = scr->workspace_menu;
2352 if (menu) {
2353 if (menu->flags.mapped) {
2354 if (!menu->flags.buttoned) {
2355 wMenuUnmap(menu);
2356 parent = menu->parent;
2357 if (parent && parent->selected_entry >= 0) {
2358 entry = parent->entries[parent->selected_entry];
2359 if (parent->cascades[entry->cascade] == menu) {
2360 selectEntry(parent, -1);
2361 wMenuMapAt(menu, x, y, False);
2364 } else {
2365 wRaiseFrame(menu->frame->core);
2366 wMenuMapCopyAt(menu, x, y);
2369 else {
2370 wMenuMapAt(menu, x, y, False);