--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/ui/motif/menu.c Wed Dec 09 11:32:01 2020 +0100
@@ -0,0 +1,626 @@
+/*
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
+ *
+ * Copyright 2014 Olaf Wintermann. All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions are met:
+ *
+ * 1. Redistributions of source code must retain the above copyright
+ * notice, this list of conditions and the following disclaimer.
+ *
+ * 2. Redistributions in binary form must reproduce the above copyright
+ * notice, this list of conditions and the following disclaimer in the
+ * documentation and/or other materials provided with the distribution.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+ * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+ * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+ * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+ * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+ * POSSIBILITY OF SUCH DAMAGE.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <stdarg.h>
+
+#include "menu.h"
+#include "button.h"
+#include "toolkit.h"
+#include "stock.h"
+#include "container.h"
+#include "../common/context.h"
+#include "../ui/window.h"
+
+UcxList *menus;
+UcxList *current;
+
+void ui_menu(char *label) {
+ // free current menu hierarchy
+ ucx_list_free(current);
+
+ // create menu
+ UiMenu *menu = malloc(sizeof(UiMenu));
+ menu->item.add_to = (ui_menu_add_f)add_menu_widget;
+
+ menu->label = label;
+ menu->items = NULL;
+ menu->parent = NULL;
+
+ current = ucx_list_prepend(NULL, menu);
+ menus = ucx_list_append(menus, menu);
+
+}
+
+void ui_submenu(char *label) {
+ UiMenu *menu = malloc(sizeof(UiMenu));
+ menu->item.add_to = (ui_menu_add_f)add_menu_widget;
+
+ menu->label = label;
+ menu->items = NULL;
+ menu->parent = NULL;
+
+ // add submenu to current menu
+ UiMenu *cm = current->data;
+ cm->items = ucx_list_append(cm->items, menu);
+
+ // set the submenu to current menu
+ current = ucx_list_prepend(current, menu);
+}
+
+void ui_submenu_end() {
+ if(ucx_list_size(current) < 2) {
+ return;
+ }
+ current = ucx_list_remove(current, current);
+}
+
+void ui_menuitem(char *label, ui_callback f, void *userdata) {
+ ui_menuitem_gr(label, f, userdata, -1);
+}
+
+void ui_menuitem_st(char *stockid, ui_callback f, void *userdata) {
+ ui_menuitem_stgr(stockid, f, userdata, -1);
+}
+
+void ui_menuitem_gr(char *label, ui_callback f, void *userdata, ...) {
+ if(!current) {
+ return;
+ }
+
+ UiMenuItem *item = malloc(sizeof(UiMenuItem));
+ item->item.add_to = (ui_menu_add_f)add_menuitem_widget;
+
+ item->label = label;
+ item->userdata = userdata;
+ item->callback = f;
+ item->groups = NULL;
+
+ // add groups
+ va_list ap;
+ va_start(ap, userdata);
+ int group;
+ while((group = va_arg(ap, int)) != -1) {
+ item->groups = ucx_list_append(item->groups, (void*)(intptr_t)group);
+ }
+ va_end(ap);
+
+ UiMenu *cm = current->data;
+ cm->items = ucx_list_append(cm->items, item);
+}
+
+void ui_menuitem_stgr(char *stockid, ui_callback f, void *userdata, ...) {
+ if(!current) {
+ return;
+ }
+
+ UiStMenuItem *item = malloc(sizeof(UiStMenuItem));
+ item->item.add_to = (ui_menu_add_f)add_menuitem_st_widget;
+
+ item->stockid = stockid;
+ item->userdata = userdata;
+ item->callback = f;
+ item->groups = NULL;
+
+ // add groups
+ va_list ap;
+ va_start(ap, userdata);
+ int group;
+ while((group = va_arg(ap, int)) != -1) {
+ item->groups = ucx_list_append(item->groups, (void*)(intptr_t)group);
+ }
+ va_end(ap);
+
+ UiMenu *cm = current->data;
+ cm->items = ucx_list_append(cm->items, item);
+}
+
+void ui_menuseparator() {
+ if(!current) {
+ return;
+ }
+
+ UiMenuItemI *item = malloc(sizeof(UiMenuItemI));
+ item->add_to = (ui_menu_add_f)add_menuseparator_widget;
+
+ UiMenu *cm = current->data;
+ cm->items = ucx_list_append(cm->items, item);
+}
+
+
+void ui_checkitem(char *label, ui_callback f, void *userdata) {
+ if(!current) {
+ return;
+ }
+
+ UiCheckItem *item = malloc(sizeof(UiCheckItem));
+ item->item.add_to = (ui_menu_add_f)add_checkitem_widget;
+ item->label = label;
+ item->callback = f;
+ item->userdata = userdata;
+
+ UiMenu *cm = current->data;
+ cm->items = ucx_list_append(cm->items, item);
+}
+
+void ui_checkitem_nv(char *label, char *vname) {
+ if(!current) {
+ return;
+ }
+
+ UiCheckItemNV *item = malloc(sizeof(UiCheckItemNV));
+ item->item.add_to = (ui_menu_add_f)add_checkitemnv_widget;
+ item->varname = vname;
+ item->label = label;
+
+ UiMenu *cm = current->data;
+ cm->items = ucx_list_append(cm->items, item);
+}
+
+void ui_menuitem_list(UiList *items, ui_callback f, void *userdata) {
+ if(!current) {
+ return;
+ }
+
+ UiMenuItemList *item = malloc(sizeof(UiMenuItemList));
+ item->item.add_to = (ui_menu_add_f)add_menuitem_list_widget;
+ item->callback = f;
+ item->userdata = userdata;
+ item->list = items;
+
+ UiMenu *cm = current->data;
+ cm->items = ucx_list_append(cm->items, item);
+}
+
+
+// private menu functions
+void ui_create_menubar(UiObject *obj) {
+ if(!menus) {
+ return;
+ }
+
+ Widget menubar = XmCreateMenuBar(obj->widget, "main_list", NULL, 0);
+ XtManageChild(menubar);
+
+ UcxList *ls = menus;
+ int menu_index = 0;
+ while(ls) {
+ UiMenu *menu = ls->data;
+ menu_index += menu->item.add_to(menubar, menu_index, &menu->item, obj);
+
+ ls = ls->next;
+ }
+}
+
+int add_menu_widget(Widget parent, int i, UiMenuItemI *item, UiObject *obj) {
+ UiMenu *menu = (UiMenu*)item;
+
+ Widget menuItem = XtVaCreateManagedWidget(
+ menu->label,
+ xmCascadeButtonWidgetClass,
+ parent,
+ NULL);
+ Widget m = XmVaCreateSimplePulldownMenu(parent, menu->label, i, NULL, NULL);
+
+ UcxList *ls = menu->items;
+ int menu_index = 0;
+ while(ls) {
+ UiMenuItemI *mi = ls->data;
+ menu_index += mi->add_to(m, menu_index, mi, obj);
+ ls = ls->next;
+ }
+
+ return 1;
+}
+
+int add_menuitem_widget(
+ Widget parent,
+ int i,
+ UiMenuItemI *item,
+ UiObject *obj)
+{
+ UiMenuItem *mi = (UiMenuItem*)item;
+
+ Arg args[1];
+ XmString label = XmStringCreateLocalized(mi->label);
+ XtSetArg(args[0], XmNlabelString, label);
+
+ Widget mitem = XtCreateManagedWidget(
+ "menubutton",
+ xmPushButtonWidgetClass,
+ parent,
+ args,
+ 1);
+ XmStringFree(label);
+
+ if(mi->callback != NULL) {
+ UiEventData *event = ucx_mempool_malloc(
+ obj->ctx->mempool,
+ sizeof(UiEventData));
+ event->obj = obj;
+ event->userdata = mi->userdata;
+ event->callback = mi->callback;
+ event->value = 0;
+ XtAddCallback(
+ mitem,
+ XmNactivateCallback,
+ (XtCallbackProc)ui_push_button_callback,
+ event);
+ }
+
+ if(mi->groups) {
+ uic_add_group_widget(obj->ctx, mitem, mi->groups);
+ }
+
+ return 1;
+}
+
+int add_menuitem_st_widget(Widget parent, int i, UiMenuItemI *item, UiObject *obj) {
+ UiStMenuItem *mi = (UiStMenuItem*)item;
+
+ UiStockItem *si = ui_get_stock_item(mi->stockid);
+ if(!si) {
+ fprintf(stderr, "UI Error: unknown stock id: %s\n", mi->stockid);
+ return 0;
+ }
+
+ int n = 0;
+ Arg args[4];
+ XmString label = XmStringCreateLocalized(si->label);
+ XmString at = NULL;
+
+ XtSetArg(args[n], XmNlabelString, label);
+ n++;
+ if(si->accelerator) {
+ XtSetArg(args[n], XmNaccelerator, si->accelerator);
+ n++;
+ }
+ if(si->accelerator_label) {
+ at = XmStringCreateLocalized(si->accelerator_label);
+ XtSetArg(args[n], XmNacceleratorText, at);
+ n++;
+ }
+
+ Widget mitem = XtCreateManagedWidget(
+ "menubutton",
+ xmPushButtonWidgetClass,
+ parent,
+ args,
+ n);
+ XmStringFree(label);
+ if(at) {
+ XmStringFree(at);
+ }
+
+ if(mi->callback != NULL) {
+ UiEventData *event = ucx_mempool_malloc(
+ obj->ctx->mempool,
+ sizeof(UiEventData));
+ event->obj = obj;
+ event->userdata = mi->userdata;
+ event->callback = mi->callback;
+ event->value = 0;
+ XtAddCallback(
+ mitem,
+ XmNactivateCallback,
+ (XtCallbackProc)ui_push_button_callback,
+ event);
+ }
+
+ if(mi->groups) {
+ uic_add_group_widget(obj->ctx, mitem, mi->groups);
+ }
+
+ return 1;
+}
+
+int add_menuseparator_widget(
+ Widget parent,
+ int i,
+ UiMenuItemI *item,
+ UiObject *obj)
+{
+ Widget s = XmCreateSeparatorGadget (parent, "menu_separator", NULL, 0);
+ XtManageChild(s);
+ return 1;
+}
+
+int add_checkitem_widget(
+ Widget parent,
+ int i,
+ UiMenuItemI *item,
+ UiObject *obj)
+{
+ UiCheckItem *ci = (UiCheckItem*)item;
+
+ Arg args[3];
+ XmString label = XmStringCreateLocalized(ci->label);
+ XtSetArg(args[0], XmNlabelString, label);
+ XtSetArg(args[1], XmNvisibleWhenOff, 1);
+ Widget checkbox = XtCreateManagedWidget(
+ "menutogglebutton",
+ xmToggleButtonWidgetClass,
+ parent,
+ args,
+ 2);
+ XmStringFree(label);
+
+ if(ci->callback) {
+ UiEventData *event = ucx_mempool_malloc(
+ obj->ctx->mempool,
+ sizeof(UiEventData));
+ event->obj = obj;
+ event->userdata = ci->userdata;
+ event->callback = ci->callback;
+ XtAddCallback(
+ checkbox,
+ XmNvalueChangedCallback,
+ (XtCallbackProc)ui_toggle_button_callback,
+ event);
+ }
+
+ return 1;
+}
+
+int add_checkitemnv_widget(
+ Widget parent,
+ int i,
+ UiMenuItemI *item,
+ UiObject *obj)
+{
+ UiCheckItemNV *ci = (UiCheckItemNV*)item;
+
+ Arg args[3];
+ XmString label = XmStringCreateLocalized(ci->label);
+ XtSetArg(args[0], XmNlabelString, label);
+ XtSetArg(args[1], XmNvisibleWhenOff, 1);
+ Widget checkbox = XtCreateManagedWidget(
+ "menutogglebutton",
+ xmToggleButtonWidgetClass,
+ parent,
+ args,
+ 2);
+ XmStringFree(label);
+
+ UiVar *var = uic_create_var(obj->ctx, ci->varname, UI_VAR_INTEGER);
+ if(var) {
+ UiInteger *value = var->value;
+ value->obj = checkbox;
+ value->get = ui_toggle_button_get;
+ value->set = ui_toggle_button_set;
+ value = 0;
+ } else {
+ // TODO: error
+ }
+
+ return 1;
+}
+
+int add_menuitem_list_widget(
+ Widget parent,
+ int i,
+ UiMenuItemI *item,
+ UiObject *obj)
+{
+ UiMenuItemList *il = (UiMenuItemList*)item;
+ UcxMempool *mp = obj->ctx->mempool;
+
+ UiActiveMenuItemList *ls = ucx_mempool_malloc(
+ mp,
+ sizeof(UiActiveMenuItemList));
+
+ ls->object = obj;
+ ls->menu = parent;
+ ls->index = i;
+ ls->oldcount = 0;
+ ls->list = il->list;
+ ls->callback = il->callback;
+ ls->userdata = il->userdata;
+
+ ls->list->observers = ui_add_observer(
+ ls->list->observers,
+ (ui_callback)ui_update_menuitem_list,
+ ls);
+
+ ui_update_menuitem_list(NULL, ls);
+
+ return 0;
+}
+
+void ui_update_menuitem_list(UiEvent *event, UiActiveMenuItemList *list) {
+ Arg args[4];
+
+ // remove old items
+ if(list->oldcount > 0) {
+ Widget *children;
+ int nc;
+
+ XtVaGetValues(
+ list->menu,
+ XmNchildren,
+ &children,
+ XmNnumChildren,
+ &nc,
+ NULL);
+
+ for(int i=0;i<list->oldcount;i++) {
+ XtDestroyWidget(children[list->index + i]);
+ }
+ }
+
+ char *str = ui_list_first(list->list);
+ if(str) {
+ // add separator
+ XtSetArg(args[0], XmNpositionIndex, list->index);
+ Widget s = XmCreateSeparatorGadget (list->menu, "menu_separator", args, 1);
+ XtManageChild(s);
+ }
+ int i = 1;
+ while(str) {
+ XmString label = XmStringCreateLocalized(str);
+ XtSetArg(args[0], XmNlabelString, label);
+ XtSetArg(args[1], XmNpositionIndex, list->index + i);
+
+ Widget mitem = XtCreateManagedWidget(
+ "menubutton",
+ xmPushButtonWidgetClass,
+ list->menu,
+ args,
+ 2);
+ XmStringFree(label);
+
+ if(list->callback) {
+ // TODO: use mempool
+ UiEventData *event = malloc(sizeof(UiEventData));
+ event->obj = list->object;
+ event->userdata = list->userdata;
+ event->callback = list->callback;
+ event->value = i - 1;
+
+ XtAddCallback(
+ mitem,
+ XmNactivateCallback,
+ (XtCallbackProc)ui_push_button_callback,
+ event);
+ }
+
+ str = ui_list_next(list->list);
+ i++;
+ }
+
+ list->oldcount = i;
+}
+
+void ui_menu_event_wrapper(Widget widget, XtPointer udata, XtPointer cdata) {
+ UiEventData *event = udata;
+ UiEvent e;
+ e.obj = event->obj;
+ e.window = event->obj->window;
+ e.document = event->obj->ctx->document;
+ e.intval = 0;
+ event->callback(&e, event->userdata);
+}
+
+
+/*
+ * widget menu functions
+ */
+
+static void ui_popup_handler(Widget widget, XtPointer data, XEvent *event, Boolean *c) {
+ Widget menu = data;
+ XmMenuPosition(menu, (XButtonPressedEvent *)event);
+ XtManageChild(menu);
+
+ *c = FALSE;
+}
+
+UIMENU ui_contextmenu(UiObject *obj) {
+ UiContainer *ct = uic_get_current_container(obj);
+ if(ct->current) {
+ return ui_contextmenu_w(obj, ct->current);
+ } else {
+ return NULL; // TODO: warn
+ }
+}
+
+UIMENU ui_contextmenu_w(UiObject *obj, UIWIDGET widget) {
+ UiContainer *ct = uic_get_current_container(obj);
+
+ Widget menu = XmCreatePopupMenu(widget, "popup_menu", NULL, 0);
+ ct->menu = menu;
+
+ XtAddEventHandler(widget, ButtonPressMask, FALSE, ui_popup_handler, menu);
+
+ return menu;
+}
+
+void ui_contextmenu_popup(UIMENU menu) {
+
+}
+
+void ui_widget_menuitem(UiObject *obj, char *label, ui_callback f, void *userdata) {
+ ui_widget_menuitem_gr(obj, label, f, userdata, -1);
+}
+
+void ui_widget_menuitem_gr(UiObject *obj, char *label, ui_callback f, void *userdata, ...) {
+ UiContainer *ct = uic_get_current_container(obj);
+ if(!ct->menu) {
+ return;
+ }
+
+ // add groups
+ UcxList *groups = NULL;
+ va_list ap;
+ va_start(ap, userdata);
+ int group;
+ while((group = va_arg(ap, int)) != -1) {
+ ucx_list_append(groups, (void*)(intptr_t)group);
+ }
+ va_end(ap);
+
+ // create menuitem
+ Arg args[4];
+ XmString labelstr = XmStringCreateLocalized(label);
+ XtSetArg(args[0], XmNlabelString, labelstr);
+
+ Widget item = XmCreatePushButton(ct->menu, "menu_button", args, 1);
+ XtManageChild(item);
+ XmStringFree(labelstr);
+}
+
+void ui_widget_menuitem_st(UiObject *obj, char *stockid, ui_callback f, void *userdata) {
+ ui_widget_menuitem_stgr(obj, stockid, f, userdata, -1);
+}
+
+void ui_widget_menuitem_stgr(UiObject *obj, char *stockid, ui_callback f, void *userdata, ...) {
+ UiContainer *ct = uic_get_current_container(obj);
+ if(!ct->menu) {
+ return;
+ }
+
+ // add groups
+ UcxList *groups = NULL;
+ va_list ap;
+ va_start(ap, userdata);
+ int group;
+ while((group = va_arg(ap, int)) != -1) {
+ ucx_list_append(groups, (void*)(intptr_t)group);
+ }
+ va_end(ap);
+
+ // create menuitem
+ UiStockItem *stockItem = ui_get_stock_item(stockid);
+ Arg args[4];
+ XmString labelstr = XmStringCreateLocalized(stockItem->label);
+ XtSetArg(args[0], XmNlabelString, labelstr);
+
+ Widget item = XmCreatePushButton(ct->menu, "menu_button", args, 1);
+ XtManageChild(item);
+ XmStringFree(labelstr);
+}