// Copyright (c) 2017-2024, Mudita Sp. z.o.o. All rights reserved.
// For licensing, see https://github.com/mudita/MuditaOS/blob/master/LICENSE.md

#include "Item.hpp"
#include "BoundingBox.hpp" // for BoundingBox, BoundingBox::(anonymous)
#include "InputEvent.hpp"  // for InputEvent, KeyCode, InputEvent::State
#include "Navigation.hpp"  // for Navigation
#include <algorithm>       // for find
#include <list>            // for list<>::iterator, list, operator!=, _List...
#include <memory>
#include <DrawCommand.hpp>

namespace gui
{

    NavigationDirection inputToNavigation(const InputEvent &evt)
    {
        switch (evt.getKeyCode()) {
        case gui::KeyCode::KEY_LEFT:
            return gui::NavigationDirection::LEFT;
        case gui::KeyCode::KEY_RIGHT:
            return gui::NavigationDirection::RIGHT;
        case gui::KeyCode::KEY_UP:
            return gui::NavigationDirection::UP;
        case gui::KeyCode::KEY_DOWN:
            return gui::NavigationDirection::DOWN;
        default:
            return gui::NavigationDirection::NONE;
        }
    }

    bool isInputNavigation(const InputEvent &evt)
    {
        return inputToNavigation(evt) != NavigationDirection::NONE;
    }

    Item::Item()
        : focus{false}, type{ItemType::ITEM}, parent{nullptr}, radius{0}, visible{true},
          verticalPolicy{LayoutVerticalPolicy::LAYOUT_POLICY_VERTICAL_EXPAND},
          horizontalPolicy{LayoutHorizontalPolicy::LAYOUT_POLICY_HORIZONTAL_EXPAND}, navigationDirections{nullptr}
    {

        focusChangedCallback     = [](Item &) { return false; };
        activatedCallback        = [](Item &) { return false; };
        inputCallback            = [](Item &, const InputEvent &inputEvent) { return false; };
        dimensionChangedCallback = [](Item &, const BoundingBox &data) { return false; };
    }

    Item::~Item()
    {
        for (auto &widget : children) {
            delete widget;
        }

        if (navigationDirections) {
            delete navigationDirections;
        }
    }

    bool Item::erase(Item *item)
    {
        if (removeWidget(item)) {
            delete item;
            return true;
        }
        return false;
    }

    void Item::erase()
    {
        while (auto el = children.back()) {
            erase(el);
        }
    }

    void Item::addWidget(Item *item)
    {
        if (item == nullptr) {
            return;
        }
        if (item->parent) {
            item->parent->removeWidget(item);
        }
        item->parent = this;
        children.push_back(item);

        item->updateDrawArea();
    }

    bool Item::removeWidget(Item *item)
    {
        if (item == nullptr) {
            return false;
        }
        if (item == focusItem) {
            focusItem = nullptr;
            focus     = false;
        }

        auto fi = std::find(children.begin(), children.end(), item);
        if (fi != children.end()) {
            children.erase(fi);
            item->parent = nullptr;
            return true;
        }
        return false;
    }

    void Item::setVisible(bool value)
    {
        visible = value;
    }

    std::list<Command> Item::buildDrawList()
    {
        if (not visible) {
            return {};
        }
        auto commands = std::list<Command>();
        if (preBuildDrawListHook != nullptr) {
            preBuildDrawListHook(commands);
        }
        buildDrawListImplementation(commands);
        buildChildrenDrawList(commands);
        if (postBuildDrawListHook != nullptr) {
            postBuildDrawListHook(commands);
        }
        return commands;
    }

    void Item::buildChildrenDrawList(std::list<Command> &commands)
    {
        for (auto widget : children) {
            auto drawCommands = widget->buildDrawList();
            if (!drawCommands.empty()) {
                commands.splice(commands.end(), drawCommands);
            }
        }
    }

    void Item::setArea(BoundingBox area)
    {
        BoundingBox oldArea = widgetArea;
        widgetArea          = area;
        widgetMaximumArea.expandSize(widgetArea);
        contentChanged = false;
        updateDrawArea();
        onDimensionChanged(oldArea, widgetArea);
    }

    void Item::setPosition(const Position &x, const Position &y)
    {
        setArea({x, y, widgetArea.w, widgetArea.h});
    }

    void Item::setX(const Position x)
    {
        setArea({x, widgetArea.y, widgetArea.w, widgetArea.h});
    }

    void Item::setY(const Position y)
    {
        setArea({widgetArea.x, y, widgetArea.w, widgetArea.h});
    }

    Size Item::requestSize(Length request_w, Length request_h)
    {
        if (parent == nullptr) {
            setSize(request_w, request_h);
            return {request_w, request_h};
        }
        return parent->handleRequestResize(this, request_w, request_h);
    }

    Size Item::handleRequestResize(const Item *it, Length request_w, Length request_h)
    {
        if (it == nullptr) {
            return {0, 0};
        }
        return {it->getWidth(), it->getHeight()};
    }

    void Item::informContentChanged()
    {
        if (parent != nullptr) {
            contentChanged = true;
            parent->handleContentChanged();
        }
    }

    void Item::handleContentChanged()
    {
        informContentChanged();
    }

    void Item::setSize(Length w, Length h)
    {
        setArea({widgetArea.x, widgetArea.y, w, h});
    }

    void Item::setSize(Length val, Axis axis)
    {
        uint16_t w = getWidth();
        uint16_t h = getHeight();
        if (axis == Axis::X) {
            w = val;
        }
        else {
            h = val;
        }
        setArea({getX(), getY(), w, h});
    }

    void setAreaSizeInAxis(BoundingBox &area, Axis axis, uint32_t size)
    {
        if (axis == Axis::X) {
            area.w = size;
        }
        else {
            area.h = size;
        }
    }

    void Item::setAreaInAxis(
        Axis axis, Position posOnAxis, Position posOnOrthogonalAxis, Length sizeOnAxis, Length sizeOnOrthogonalAxis)
    {
        if (axis == Axis::X) {

            auto box = BoundingBox(posOnAxis, posOnOrthogonalAxis, sizeOnAxis, sizeOnOrthogonalAxis);

            if (widgetArea != box || contentChanged) {
                setArea(box);
            }
        }
        else {

            auto box = BoundingBox(posOnOrthogonalAxis, posOnAxis, sizeOnOrthogonalAxis, sizeOnAxis);

            if (widgetArea != box || contentChanged) {
                setArea(box);
            }
        }
    }

    /// set maximum
    void Item::setMaximumSize(Length val, Axis axis)
    {
        setAreaSizeInAxis(area(Area::Max), axis, val);
    }

    void Item::setMaximumWidth(Length w)
    {
        setMaximumSize(w, Axis::X);
    }

    void Item::setMaximumHeight(Length h)
    {
        setMaximumSize(h, Axis::Y);
    }

    void Item::setMaximumSize(Length w, Length h)
    {
        setMaximumHeight(h);
        setMaximumWidth(w);
    }

    /// set minimum

    void Item::setMinimumSize(Length val, Axis axis)
    {
        setAreaSizeInAxis(area(Area::Min), axis, val);
    }

    void Item::setMinimumWidth(Length w)
    {
        setMinimumSize(w, Axis::X);
    }

    void Item::setMinimumHeight(Length h)
    {
        setMinimumSize(h, Axis::Y);
    }

    void Item::setMinimumSize(Length w, Length h)
    {
        setMinimumWidth(w);
        setMinimumHeight(h);
    }

    /// set and get Margins
    void Item::setMargins(const Margins &value)
    {
        if (margins != value) {
            margins = value;
        }
    }

    Margins Item::getMargins()
    {
        return margins;
    }

    void Item::setPadding(const Padding &value)
    {
        if (padding != value) {
            padding = value;
        }
    }

    Padding Item::getPadding() const
    {
        return padding;
    }

    Length Item::getSize(Axis axis) const
    {
        return widgetArea.size(axis);
    }

    Position Item::getPosition(Axis axis) const
    {
        return widgetArea.pos(axis);
    }

    void Item::setPosition(const Position &val, Axis axis)
    {
        Position x = getX();
        Position y = getY();
        if (axis == Axis::X) {
            x = val;
        }
        else {
            y = val;
        }
        setArea({x, y, getWidth(), getHeight()});
    }

    void Item::setAlignment(const Alignment &value)
    {
        if (alignment != value) {
            alignment = value;
        }
    }

    Alignment Item::getAlignment(Axis axis)
    {
        if (axis == Axis::X) {
            return {alignment.horizontal, Alignment::Vertical::None};
        }
        return {Alignment::Horizontal::None, alignment.vertical};
    }

    Alignment &Item::getAlignment()
    {
        return alignment;
    }

    Length Item::getAxisAlignmentValue(Axis axis, Length itemSize)
    {
        auto tempAlignment = getAlignment(axis);

        if (parent->getAlignment(axis).vertical != Alignment::Vertical::None) {
            tempAlignment.vertical = parent->getAlignment(axis).vertical;
        }

        if (parent->getAlignment(axis).horizontal != Alignment::Horizontal::None) {
            tempAlignment.horizontal = parent->getAlignment(axis).horizontal;
        }

        switch (tempAlignment.vertical) {
        case gui::Alignment::Vertical::Top:
            return this->margins.getMarginInAxis(axis, MarginInAxis::First);
        case gui::Alignment::Vertical::Center:
            return (parent->area().size(axis) - (itemSize + this->margins.getSumInAxis(axis))) / 2;
        case gui::Alignment::Vertical::Bottom:
            return parent->area().size(axis) - itemSize - this->margins.getMarginInAxis(axis, MarginInAxis::Second);
        default:
            break;
        }

        switch (tempAlignment.horizontal) {
        case gui::Alignment::Horizontal::Left:
            return this->margins.getMarginInAxis(axis, MarginInAxis::First);
        case gui::Alignment::Horizontal::Center:
            return (parent->area().size(axis) - (itemSize + this->margins.getSumInAxis(axis))) / 2;
        case gui::Alignment::Horizontal::Right:
            return parent->area().size(axis) - itemSize - this->margins.getMarginInAxis(axis, MarginInAxis::Second);
        default:
            break;
        }

        return getPosition(axis);
    }

    void Item::setBoundingBox(const BoundingBox &new_box)
    {
        BoundingBox oldArea = widgetArea;
        widgetArea          = new_box;
        updateDrawArea();
        onDimensionChanged(oldArea, widgetArea);
    }

    void Item::setRadius(int value)
    {
        radius = std::abs(value);
    }

    void Item::updateDrawArea()
    {
        Item *parentItem = parent;

        BoundingBox result = widgetArea;

        // iterate up to top widget in hierarchy
        while (parentItem != nullptr) {

            result.x += parentItem->widgetArea.x;
            result.y += parentItem->widgetArea.y;
            BoundingBox newResult;
            if (!BoundingBox::intersect(parentItem->widgetArea, result, newResult)) {
                result.clear();
                break;
            }
            result = newResult;

            parentItem = parentItem->parent;
        }

        drawArea = result;

        for (const auto &it : children) {
            it->updateDrawArea();
        }
    }

    Item *Item::getNavigationItem(NavigationDirection direction)
    {
        if (navigationDirections != nullptr) {
            return navigationDirections->getDirectionItem(direction);
        }
        return nullptr;
    }

    void Item::setNavigationItem(gui::NavigationDirection direction, Item *item)
    {
        if (navigationDirections == nullptr) {
            navigationDirections = new Navigation();
        }
        navigationDirections->setDirectionItem(direction, item);
    }

    void Item::clearNavigationItem(gui::NavigationDirection direction)
    {
        if (navigationDirections != nullptr) {
            navigationDirections->clearDirection(direction);
        }
    }

    bool Item::handleNavigation(const InputEvent inputEvent)
    {
        gui::Item *newFocusItem = nullptr;
        if ((focusItem != nullptr) && (inputEvent.isShortRelease())) {
            if (itemNavigation != nullptr && itemNavigation(inputEvent)) {
                return true;
            }
            if (inputEvent.is(gui::KeyCode::KEY_ENTER) && focusItem != nullptr) {
                return focusItem->onActivated(nullptr);
            }
            newFocusItem = focusItem->getNavigationItem(inputToNavigation(inputEvent));
        }
        if (newFocusItem != nullptr) {
            setFocusItem(newFocusItem);
            return true;
        }
        return false;
    }

    bool Item::setFocus(bool state)
    {
        if (state != focus) {
            focus = state;
            onFocus(state);
            if (focusChangedCallback) {
                focusChangedCallback(*this);
            }
        };
        return state;
    }

    void Item::setFocusItem(Item *item)
    {
        auto checknrun = [=](bool on) {
            if (focusItem != nullptr) {
                focusItem->setFocus(on);
            }
        };
        checknrun(false);
        focusItem = item;
        checknrun(true);
    }

    Item *Item::getFocusItem() const
    {
        if (focusItem) {
            auto subFocusItem = focusItem->getFocusItem();
            return subFocusItem == nullptr ? focusItem : subFocusItem;
        }
        return nullptr;
    }

    bool Item::onFocus([[maybe_unused]] bool state)
    {
        return true;
    }

    bool Item::onActivated([[maybe_unused]] void *data)
    {
        if (activatedCallback) {
            return activatedCallback(*this);
        }
        return false;
    }

    bool Item::onInput(const InputEvent &inputEvent)
    {
        if (inputCallback) {
            return inputCallback(*this, inputEvent);
        }
        return false;
    }

    bool Item::onDimensionChanged(const BoundingBox &oldDim, const BoundingBox &newDim)
    {
        if (dimensionChangedCallback) {
            return dimensionChangedCallback(*this, newDim);
        }
        return false;
    }

    bool Item::onTimer(sys::Timer &timer)
    {
        if (timerCallback != nullptr) {
            return timerCallback(*this, timer);
        }
        return false;
    }

    void Item::detachTimer(sys::Timer &timer)
    {
        const auto it = std::find_if(timers.begin(), timers.end(), [&timer](auto &ptr) { return ptr == &timer; });
        if (it != timers.end()) {
            timers.erase(it);
        }
    }

    void Item::accept(GuiVisitor &visitor)
    {
        visitor.visit(*this);
    }
} // namespace gui