ui/winui/appmenu.cpp

/*
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
 *
 * Copyright 2023 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 "pch.h"

#include "appmenu.h"

#include <cx/linked_list.h>
#include <cx/array_list.h>

#include "../common/context.h"
#include "../common/object.h"

#include "util.h"


using namespace winrt;
using namespace Microsoft::UI::Xaml;
using namespace Microsoft::UI::Xaml::Controls;
using namespace Microsoft::UI::Xaml::XamlTypeInfo;
using namespace Microsoft::UI::Xaml::Markup;
using namespace Windows::UI::Xaml::Interop;

static void add_top_menu_widget(MenuBar &parent, int i, UiMenuItemI* item, UiObject* obj);

static void add_menu_widget(winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent, int i, UiMenuItemI* item, UiObject* obj);
static void add_menuitem_widget(winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent, int i, UiMenuItemI* item, UiObject* obj);
static void add_menuseparator_widget(winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent, int i, UiMenuItemI* item, UiObject* obj);
static void add_checkitem_widget(winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent, int i, UiMenuItemI* item, UiObject* obj);
static void add_radioitem_widget(winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent, int i, UiMenuItemI* item, UiObject* obj);
static void add_menuitem_list_widget(winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent, int i, UiMenuItemI* item, UiObject* obj);

static ui_menu_add_f createMenuItem[] = {
    /* UI_MENU                 */ add_menu_widget,
    /* UI_MENU_ITEM            */ add_menuitem_widget,
    /* UI_MENU_CHECK_ITEM      */ add_checkitem_widget,
    /* UI_MENU_RADIO_ITEM      */ add_radioitem_widget,
    /* UI_MENU_ITEM_LIST       */ add_menuitem_list_widget,
    /* UI_MENU_CHECKITEM_LIST  */ add_menuitem_list_widget,
    /* UI_MENU_RADIOITEM_LIST  */ add_menuitem_list_widget,
    /* UI_MENU_SEPARATOR       */ add_menuseparator_widget
};

winrt::Microsoft::UI::Xaml::Controls::MenuBar ui_create_menubar(UiObject* obj) {
	MenuBar mb = MenuBar();

    UiMenu* menus_begin = uic_get_menu_list();

    UiMenu* ls = menus_begin;
    while (ls) {
        UiMenu* menu = ls;
        add_top_menu_widget(mb, 0, &menu->item, obj);

        ls = (UiMenu*)ls->item.next;
    }

	return mb;
}

static void add_top_menu_widget(MenuBar& parent, int i, UiMenuItemI* item, UiObject* obj) {
    UiMenu* menu = (UiMenu*)item;

    MenuBarItem mi = MenuBarItem();
    wchar_t* wlabel = str2wstr(menu->label, NULL);
    mi.Title(wlabel);
    free(wlabel);

    UiMenuItemI* it = menu->items_begin;
    int index = 0;
    while (it) {
        createMenuItem[it->type](mi.Items(), index, it, obj);

        it = it->next;
        index++;
    }

    parent.Items().Append(mi);
}

static void add_menu_widget(winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent, int i, UiMenuItemI* item, UiObject* obj) {
    UiMenu* menu = (UiMenu*)item;

    MenuFlyoutSubItem mi = MenuFlyoutSubItem();
    wchar_t* wlabel = str2wstr(menu->label, NULL);
    mi.Text(wlabel);
    free(wlabel);

    parent.Append(mi);

    UiMenuItemI* it = menu->items_begin;
    int index = 0;
    while (it) {
        createMenuItem[it->type](mi.Items(), index, it, obj);

        it = it->next;
        index++;
    }

    
}

static void add_menuitem_widget(winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent, int i, UiMenuItemI* item, UiObject* obj) {
    UiMenuItem* it = (UiMenuItem*)item;
    
    MenuFlyoutItem mi = MenuFlyoutItem();
    wchar_t* wlabel = str2wstr(it->label, NULL);
    mi.Text(wlabel);
    free(wlabel);

    parent.Append(mi);
}

static void add_menuseparator_widget(
    winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent,
    int i,
    UiMenuItemI* item,
    UiObject* obj)
{

}

static void add_checkitem_widget(
    winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent,
    int i,
    UiMenuItemI* item,
    UiObject* obj)
{

}

static void add_radioitem_widget(
    winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent,
    int i,
    UiMenuItemI* item,
    UiObject* obj)
{

}


class UiMenuList {
public:
    UiObject *obj = nullptr;
    winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent = { nullptr };
    UiMenuItemType type;
    int prevSize = 0;
    int insertPos = 0;
    UiVar* var = nullptr;
    ui_getvaluefunc getvalue = nullptr;
    ui_callback callback = nullptr;
    void* userdata = nullptr;

    UiMenuList() {

    }

    void updateItems() {
        UiList* list = (UiList*)var->value;

        // delete previous items
        for (int i = 0; i < prevSize; i++) {
            parent.RemoveAt(insertPos);
        }
        
        // insert new items
        int count = 0;
        void* elm = list->first(list);
        while (elm) {
            char *menuItemLabel = (char*) (getvalue ? getvalue(elm, 0) : elm);

            MenuFlyoutItem mi = MenuFlyoutItem();
            wchar_t* wlabel = str2wstr(menuItemLabel ? menuItemLabel : "", NULL);
            mi.Text(wlabel);
            free(wlabel);

            if (callback) {
                mi.Click([this, elm, count](Windows::Foundation::IInspectable const& sender, RoutedEventArgs const& e)
                    {
                        UiEvent evt;
                        evt.obj = obj;
                        evt.window = obj->window;
                        evt.document = obj->ctx->document;
                        evt.eventdata = elm;
                        evt.intval = count;
                        callback(&evt, userdata);
                    });
            }

            parent.InsertAt(insertPos + count, mi);

            elm = list->next(list);
            count++;
        }

        prevSize = count;
    }
};

extern "C" void destroy_ui_menu_list(void* ptr) {
    UiMenuList* ls = (UiMenuList*)ptr;
    delete ls;
}

static void ui_context_add_menu_list_destructor(UiContext* ctx, UiMenuList* list) {
    cxMempoolRegister(ctx->mp, list, destroy_ui_menu_list);
}

static void ui_menulist_update(UiEvent* event, void* userdata) {
    UiMenuList* mlist = (UiMenuList*)userdata;
    mlist->updateItems();
}

static void add_menuitem_list_widget(
    winrt::Windows::Foundation::Collections::IVector<winrt::Microsoft::UI::Xaml::Controls::MenuFlyoutItemBase> parent,
    int i,
    UiMenuItemI* item,
    UiObject* obj)
{
    UiMenuItemList* it = (UiMenuItemList*)item;
    if (!it->varname) {
        return;
    }
    
    uint32_t size = parent.Size();
    
    UiVar* var = uic_create_var(ui_global_context(), it->varname, UI_VAR_LIST);

    UiMenuList* mlist = new UiMenuList();
    mlist->obj = obj;
    mlist->parent = parent;
    mlist->getvalue = it->getvalue;
    mlist->callback = it->callback;
    mlist->userdata = it->userdata;
    mlist->prevSize = 0;
    mlist->insertPos = size;
    mlist->type = item->type;
    mlist->var = var;
    ui_context_add_menu_list_destructor(obj->ctx, mlist);

    UiList* list = (UiList*)var->value;
    list->observers = ui_add_observer(list->observers, ui_menulist_update, mlist);

    mlist->updateItems();
}


winrt::Microsoft::UI::Xaml::Controls::MenuFlyout ui_create_menu_flyout(UiObject* obj, UiMenu* menudef) {
    MenuFlyout flyout = MenuFlyout();

    UiMenuItemI* it = menudef->items_begin;
    int index = 0;
    while (it) {
        createMenuItem[it->type](flyout.Items(), index, it, obj);

        it = it->next;
        index++;
    }

    return flyout;
}