/*
 * @file Application.cpp
 * @author Robert Borzecki (robert.borzecki@mudita.com)
 * @date 1 cze 2019
 * @brief
 * @copyright Copyright (C) 2019 mudita.com
 * @details
 */
#include <sstream>
#include <iomanip>
// module-utils
#include "log/log.hpp"
// module-services
#include "service-gui/messages/DrawMessage.hpp"
#include "service-appmgr/messages/APMMessage.hpp"
#include "service-evtmgr/messages/EVMessages.hpp"
#include "service-appmgr/ApplicationManager.hpp"
#include "service-db/api/DBServiceAPI.hpp"
#include "service-cellular/ServiceCellular.hpp"
#include "service-cellular/api/CellularServiceAPI.hpp"
// module-gui
#include "gui/core/DrawCommand.hpp"
#include "gui/input/InputEvent.hpp"
// module-sys
#include "SystemManager/SystemManager.hpp"

#include "Application.hpp"
#include "MessageType.hpp"
#include "messages/AppMessage.hpp"
#include "windows/AppWindow.hpp"
#include <Text.hpp>
#include <cassert>

#include "common_data/EventStore.hpp"

namespace app
{

    const char *Application::stateStr(Application::State st)
    {
        switch (st) {
        case State::NONE:
            return "NONE";
        case State::DEACTIVATED:
            return "DEACTIVATED";
        case State::INITIALIZING:
            return "INITIALIZING";
        case State::ACTIVATING:
            return "ACTIVATING";
        case State::ACTIVE_FORGROUND:
            return "ACTIVE_FORGROUND";
        case State::ACTIVE_BACKGROUND:
            return "ACTIVE_BACKGROUND";
        case State::DEACTIVATING:
            return "DEACTIVATING";
        default:
            return "FixIt";
        }
    }

    Application::Application(
        std::string name, std::string parent, bool startBackground, uint32_t stackDepth, sys::ServicePriority priority)
        : Service(name, parent, stackDepth, priority),
          longPressTimer(CreateAppTimer(
              key_timer_ms, true, [&]() { longPressTimerCallback(); }, "longPressTimer")),
          startBackground{startBackground}
    {
        keyTranslator = std::make_unique<gui::KeyInputSimpleTranslation>();
        busChannels.push_back(sys::BusChannels::ServiceCellularNotifications);
        if (startBackground) {
            setState(State::ACTIVE_BACKGROUND);
        }
        longPressTimer.restart();
    }

    Application::~Application()
    {
        for (auto it = windows.begin(); it != windows.end(); it++) {
            delete it->second;
        }
        windows.clear();
    }

    Application::State Application::getState()
    {
        return state;
    }

    void Application::setState(State st)
    {
#if DEBUG_APPLICATION_MANAGEMENT == 1
        LOG_DEBUG("[%s] (%s) -> (%s)", GetName().c_str(), stateStr(state), stateStr(st));
#endif
        state = st;
    }

    void Application::TickHandler(uint32_t id)
    {
        auto appTimer = std::find(appTimers.begin(), appTimers.end(), id);
        if (appTimer != appTimers.end()) {
            appTimer->runCallback();
        }
        else {
            LOG_ERROR("Requested timer doesn't exist here (ID: %s)\n",
                      std::to_string(id).c_str()); // either timer was deleted or this id should not arrive.
        }
    }

    void Application::DeleteTimer(AppTimer &timer)
    {
        Service::DeleteTimer(timer.getID()); // remove the real FreeRTOS timer
        auto timerOnTheList = std::find(appTimers.begin(), appTimers.end(), timer);
        if (timerOnTheList != appTimers.end()) {
            appTimers.erase(timerOnTheList);
        }
    }

    [[deprecated("only for compatibility")]] void Application::DeleteTimer(uint32_t id)
    {
        auto found = std::find(appTimers.begin(), appTimers.end(), id);
        if (found != appTimers.end()) {
            DeleteTimer(*found);
        }
    }

    void Application::longPressTimerCallback()
    {
        // TODO if(check widget type long press trigger)
        uint32_t time = xTaskGetTickCount();
        if (keyTranslator->timeout(time)) {
            // previous key press was over standard keypress timeout - send long press
            gui::InputEvent iev = keyTranslator->translate(time);
            messageInputEventApplication(this, this->GetName(), iev);
            // clean previous key
            keyTranslator->prev_key_press = {};
        }
    }

    void Application::render(gui::RefreshModes mode)
    {
        if (getCurrentWindow() == nullptr) {
            LOG_ERROR("Current window is not defined");
            return;
        }

        // send drawing commands only when if application is in active and visible.
        if (state == State::ACTIVE_FORGROUND) {
            auto currwin = getCurrentWindow();
            if (Store::Battery::get().state == Store::Battery::State::Charging) {
                currwin->batteryCharging(true);
            }
            else {
                currwin->updateBatteryLevel(Store::Battery::get().level);
            }
            currwin->setSIM();
            currwin->updateSignalStrength();

            std::list<gui::DrawCommand *> commandsList = currwin->buildDrawList();

            if (shutdownInProgress) {
                auto msg =
                    std::make_shared<sgui::DrawMessage>(commandsList, mode, sgui::DrawMessage::DrawCommand::SHUTDOWN);
                sys::Bus::SendUnicast(msg, "ServiceGUI", this);
            }
            else if (suspendInProgress) {
                auto msg =
                    std::make_shared<sgui::DrawMessage>(commandsList, mode, sgui::DrawMessage::DrawCommand::SUSPEND);
                sys::Bus::SendUnicast(msg, "ServiceGUI", this);
            }
            else {
                auto msg =
                    std::make_shared<sgui::DrawMessage>(commandsList, mode, sgui::DrawMessage::DrawCommand::NORMAL);
                sys::Bus::SendUnicast(msg, "ServiceGUI", this);
            }
        }

        if (suspendInProgress)
            suspendInProgress = false;
    }
    void Application::blockEvents(bool isBlocked)
    {
        acceptInput = isBlocked;
    }
    int Application::switchWindow(const std::string &windowName,
                                  gui::ShowMode cmd,
                                  std::unique_ptr<gui::SwitchData> data)
    {

        std::string window;
#if DEBUG_APPLICATION_MANAGEMENT == 1
        LOG_INFO("switching [%s] to window: %s data description: %s",
                 GetName().c_str(),
                 windowName.length() ? windowName.c_str() : gui::name::window::main_window.c_str(),
                 data ? data->getDescription().c_str() : "");
#endif

        // case to handle returning to previous application
        if (windowName == "LastWindow") {
            window = getCurrentWindow()->getName();
            auto msg =
                std::make_shared<AppSwitchWindowMessage>(window, getCurrentWindow()->getName(), std::move(data), cmd);
            sys::Bus::SendUnicast(msg, this->GetName(), this);
        }
        else {
            window   = windowName.empty() ? gui::name::window::main_window : windowName;
            auto msg = std::make_shared<AppSwitchWindowMessage>(
                window, getCurrentWindow() ? getCurrentWindow()->getName() : "", std::move(data), cmd);
            sys::Bus::SendUnicast(msg, this->GetName(), this);
        }

        return 0;
    }

    // TODO: this one seems to be unused
    int Application::switchBackWindow(const std::string &windowName,
                                      uint32_t cmd,
                                      std::unique_ptr<gui::SwitchData> data)
    {
        auto msg = std::make_shared<AppMessage>(MessageType::AppSwitchWindowBack);
        sys::Bus::SendUnicast(msg, this->GetName(), this);

        return 0;
    }
    int Application::refreshWindow(gui::RefreshModes mode)
    {
        auto msg = std::make_shared<AppRefreshMessage>(mode);
        sys::Bus::SendUnicast(msg, this->GetName(), this);

        return 0;
    }

    bool Application::signalStrengthUpdateHandler()
    {
        if ((state == State::ACTIVE_FORGROUND) && getCurrentWindow()->updateSignalStrength()) {
            refreshWindow(gui::RefreshModes::GUI_REFRESH_FAST);
        }

        return true;
    }

    sys::Message_t Application::DataReceivedHandler(sys::DataMessage *msgl)
    {

        bool handled = false;

        auto msg = dynamic_cast<CellularNotificationMessage *>(msgl);
        if (msg != nullptr && msg->type == CellularNotificationMessage::Type::SignalStrengthUpdate) {
            handled = signalStrengthUpdateHandler();
        }
        else if (msgl->messageType == MessageType::AppInputEvent) {
            AppInputEventMessage *msg = reinterpret_cast<AppInputEventMessage *>(msgl);
            if (getCurrentWindow() != nullptr)
                getCurrentWindow()->onInput(msg->getEvent());

            //		LOG_INFO( "Key event :%s", msg->getEvent().to_string().c_str());
            handled = true;
        }
        else if (msgl->messageType == MessageType::KBDKeyEvent) {
            if (this->getState() != app::Application::State::ACTIVE_FORGROUND) {
                LOG_FATAL("!!! Terrible terrible damage! application with no focus grabbed key!");
            }
            sevm::KbdMessage *msg = static_cast<sevm::KbdMessage *>(msgl);
            gui::InputEvent iev   = keyTranslator->translate(msg->key);
            if (iev.keyCode != gui::KeyCode::KEY_UNDEFINED) {
                messageInputEventApplication(this, this->GetName(), iev);
            }
            handled = true;
        }
        else if (msgl->messageType == MessageType::EVMBatteryLevel) {
            sevm::BatteryLevelMessage *msg = static_cast<sevm::BatteryLevelMessage *>(msgl);
            LOG_INFO("Application battery level: %d", msg->levelPercents);

            if (getCurrentWindow()->updateBatteryLevel(msg->levelPercents)) {
                refreshWindow(gui::RefreshModes::GUI_REFRESH_FAST);
            }

            handled = true;
        }
        else if (msgl->messageType == MessageType::EVMChargerPlugged) {
            sevm::BatteryPlugMessage *msg = static_cast<sevm::BatteryPlugMessage *>(msgl);
            if (msg->plugged == true) {
                LOG_INFO("Application charger connected");
                getCurrentWindow()->batteryCharging(true);
                refreshWindow(gui::RefreshModes::GUI_REFRESH_FAST);
            }
            else {
                // hide plug icon
                LOG_INFO("Application charger disconnected");
                getCurrentWindow()->batteryCharging(false);
                refreshWindow(gui::RefreshModes::GUI_REFRESH_FAST);
            }

            refreshWindow(gui::RefreshModes::GUI_REFRESH_FAST);
            handled = true;
        }
        else if (msgl->messageType == MessageType::EVMMinuteUpdated) {
            sevm::RtcMinuteAlarmMessage *msg = static_cast<sevm::RtcMinuteAlarmMessage *>(msgl);
            LOG_INFO("Application time updated");

            getCurrentWindow()->updateTime(msg->timestamp, !settings.timeFormat12);

            if (state == State::ACTIVE_FORGROUND)
                refreshWindow(gui::RefreshModes::GUI_REFRESH_FAST);

            handled = true;
        }

        else if (msgl->messageType == MessageType::AppSwitch) {
            AppSwitchMessage *msg = reinterpret_cast<AppSwitchMessage *>(msgl);
            LOG_DEBUG("AppSwitch: %s", msg->getTargetApplicationName().c_str());
            // Application is starting or it is in the background. Upon switch command if name if correct it goes
            // foreground
            if ((state == State::ACTIVATING) || (state == State::INITIALIZING) || (state == State::ACTIVE_BACKGROUND)) {

                if (msg->getTargetApplicationName() == this->GetName()) {
                    setState(State::ACTIVE_FORGROUND);
                    if (sapm::ApplicationManager::messageConfirmSwitch(this)) {
                        LOG_INFO("target Window: %s : target description: %s",
                                 msg->getTargetWindowName().c_str(),
                                 msg->getData() ? msg->getData()->getDescription().c_str() : "");
                        switchWindow(msg->getTargetWindowName(), std::move(msg->getData()));
                        handled = true;
                    }
                    else {
                        // TODO send to itself message to close
                        LOG_ERROR("Failed to communicate ");
                    }
                }
                else {
                    LOG_ERROR("Received switch message outside of activation flow");
                }
            }
            else if (state == State::ACTIVE_FORGROUND) {
                if (msg->getTargetApplicationName() == this->GetName()) {
                    // if window name and data are null pointers this is a message informing
                    // that application should go to background mode
                    if ((msg->getTargetWindowName() == "") && (msg->getData() == nullptr)) {
                        setState(State::ACTIVE_BACKGROUND);
                        if (sapm::ApplicationManager::messageConfirmSwitch(this)) {
                            handled = true;
                        }
                        else {
                            // TODO send to itself message to close
                            LOG_ERROR("Failed to communicate ");
                        }
                    }
                    // if application is in front and receives message with defined window it should
                    // change to that window.
                    else {
                        switchWindow(msg->getTargetWindowName(), std::move(msg->getData()));
                        handled = true;
                    }
                }
                else {
                    LOG_ERROR("Received switch message outside of activation flow");
                }
            }
            else {
                LOG_ERROR("Wrong internal application %s switch to ACTIVE state form %s",
                          msg->getTargetApplicationName().c_str(),
                          stateStr(state));
            }
        }
        else if (msgl->messageType == MessageType::AppSwitchWindow) {
            AppSwitchWindowMessage *msg = reinterpret_cast<AppSwitchWindowMessage *>(msgl);
            // check if specified window is in the application
            auto it = windows.find(msg->getWindowName());
            if (it != windows.end()) {

                setActiveWindow(msg->getWindowName());

                getCurrentWindow()->handleSwitchData(msg->getData().get());

                // check if this is case where application is returning to the last visible window.
                if ((msg->getData() != nullptr) && (msg->LastSeenWindow)) {}
                else {
                    getCurrentWindow()->onBeforeShow(msg->getCommand(), msg->getData().get());
                    auto ret = dynamic_cast<gui::SwitchSpecialChar *>(msg->getData().get());
                    if (ret != nullptr && msg->getData() != nullptr) {
                        auto text = dynamic_cast<gui::Text *>(getCurrentWindow()->getFocusItem());
                        if (text) {
                            if (text->handleChar(ret->getDescription()[0])) {
                                text->updateCursor();
                            }
                        }
                    }
                }

                refreshWindow(gui::RefreshModes::GUI_REFRESH_DEEP);
            }
            else {
                LOG_ERROR("No such window: %s", msg->getWindowName().c_str());
            }
            handled = true;
        }

        else if (msgl->messageType == MessageType::AppClose) {
            setState(State::DEACTIVATING);
            sapm::ApplicationManager::messageConfirmClose(this);
            // here should go all the cleaning
            handled = true;
        }
        else if (msgl->messageType == MessageType::AppRebuild) {

            LOG_INFO("Application %s rebuilding gui", GetName().c_str());
            // for all windows call rebuild method
            for (auto it = windows.begin(); it != windows.end(); it++) {
                LOG_DEBUG("Rebuild: %s", it->first.c_str());
                if (!it->second) {
                    LOG_ERROR("NO SUCH WINDOW");
                }
                else {
                    it->second->rebuild();
                }
            }
            // if application has focus call deep refresh
            LOG_INFO("Refresh app with focus!");
            if (state == State::ACTIVE_FORGROUND) {
                refreshWindow(gui::RefreshModes::GUI_REFRESH_DEEP);
            }
            handled = true;
            LOG_INFO("App rebuild done");
        }
        else if (msgl->messageType == MessageType::AppRefresh) {
            AppRefreshMessage *msg = reinterpret_cast<AppRefreshMessage *>(msgl);
            // getCurrentWindow()->onBeforeShow( gui::ShowMode::GUI_SHOW_RETURN, 0, nullptr );
            render(msg->getMode());
            handled = true;
        }
        else if (dynamic_cast<sevm::SIMMessage *>(msgl) != nullptr) {
            getCurrentWindow()->setSIM();
            refreshWindow(gui::RefreshModes::GUI_REFRESH_DEEP);
        }

        if (handled)
            return std::make_shared<sys::ResponseMessage>();
        else
            return std::make_shared<sys::ResponseMessage>(sys::ReturnCodes::Unresolved);
    }

    sys::ReturnCodes Application::InitHandler()
    {
        bool initState = true;
        setState(State::INITIALIZING);
        //	uint32_t start = xTaskGetTickCount();
        settings = DBServiceAPI::SettingsGet(this);
        //	uint32_t stop = xTaskGetTickCount();
        //	LOG_INFO("DBServiceAPI::SettingsGet %d", stop-start);
        initState = (settings.dbID == 1);

        // send response to application manager true if successful, false otherwise.
        sapm::ApplicationManager::messageRegisterApplication(this, initState, startBackground);
        sys::ReturnCodes retCode = (initState ? sys::ReturnCodes::Success : sys::ReturnCodes::Failure);
        return retCode;
    }

    void Application::setActiveWindow(const std::string &windowName)
    {
        pushWindow(windowName);
        acceptInput = true;
    }

    bool Application::messageSwitchApplication(sys::Service *sender,
                                               std::string application,
                                               std::string window,
                                               std::unique_ptr<gui::SwitchData> data)
    {
        auto msg = std::make_shared<AppSwitchMessage>(application, window, std::move(data));
        sys::Bus::SendUnicast(msg, application, sender);
        return true;
    }

    bool Application::messageRefreshApplication(sys::Service *sender,
                                                std::string application,
                                                std::string window,
                                                gui::SwitchData *data)
    {
        auto msg = std::make_shared<AppMessage>(MessageType::AppRefresh);
        sys::Bus::SendUnicast(msg, application, sender);
        return true;
    }

    bool Application::messageCloseApplication(sys::Service *sender, std::string application)
    {

        auto msg = std::make_shared<AppMessage>(MessageType::AppClose);
        sys::Bus::SendUnicast(msg, application, sender);
        return true;
    }

    bool Application::messageRebuildApplication(sys::Service *sender, std::string application)
    {
        auto msg = std::make_shared<AppRebuildMessage>();
        sys::Bus::SendUnicast(msg, application, sender);
        return true;
    }

    bool Application::messageInputEventApplication(sys::Service *sender,
                                                   std::string application,
                                                   const gui::InputEvent &event)
    {
        auto msg = std::make_shared<AppInputEventMessage>(event);
        sys::Bus::SendUnicast(msg, application, sender);
        return true;
    }

    bool Application::popToWindow(const std::string &window)
    {
        auto ret = std::find(windowStack.begin(), windowStack.end(), window);
        if (ret != windowStack.end()) {
            LOG_INFO("Pop last window(s) : %d! %s", std::distance(ret, windowStack.end()), ret->c_str());
            windowStack.erase(std::next(ret), windowStack.end());
            return true;
        }
        return false;
    }

    void Application::pushWindow(const std::string &newWindow)
    {
        // handle if window was already on
        if (popToWindow(newWindow)) {
            return;
        }
        else {
            windowStack.push_back(newWindow);
        }
#if DEBUG_APPLICATION_MANAGEMENT == 1
        LOG_DEBUG("[%d] newWindow: %s", windowStack.size(), newWindow.c_str());
        for (auto &el : windowStack) {
            LOG_DEBUG("-> %s", el.c_str());
        }
        LOG_INFO("\n\n");
#endif
    };

    const std::string Application::getPrevWindow() const
    {
        if (this->windowStack.size() <= 1) {
            return gui::name::window::no_window;
        }
        return *std::prev(windowStack.end(), 2);
    }

    void Application::Application::cleanPrevWindw()
    {
        this->windowStack.clear();
    }

    gui::AppWindow *Application::getWindow(const std::string &window)
    {
        auto it = windows.find(window);
        if (it != windows.end()) {
            return it->second;
        }
        return nullptr;
    }

    gui::AppWindow *Application::getCurrentWindow()
    {
        std::string window = "";
        if (windowStack.size() == 0) {
            window = gui::name::window::main_window;
        }
        else {
            window = windowStack.back();
        }

        return getWindow(window);
    }

    AppTimer Application::CreateAppTimer(TickType_t interval,
                                         bool isPeriodic,
                                         std::function<void()> callback,
                                         const std::string &name)
    {
        auto id    = CreateTimer(interval, isPeriodic, name);
        auto timer = AppTimer(this, id, callback, name);
        appTimers.push_back(timer);
        return timer; // return ptr to the timer on the list
    }

    AppTimer::AppTimer(Application *parent, uint32_t id, std::function<void()> callback, const std::string &name)
        : parent(parent)
    {
        this->id = id;
        registerCallback(callback);
    }
    AppTimer::AppTimer() = default;

    AppTimer::~AppTimer()
    {
        callback = nullptr;
    }

    void AppTimer::registerCallback(std::function<void()> callback)
    {
        this->callback = callback;
    }
    void AppTimer::runCallback()
    {
        callback();
    }
    uint32_t AppTimer::getID()
    {
        return id;
    }
    void AppTimer::stop()
    {
        if (parent) {
            parent->stopTimer(getID());
        }
    }
    void AppTimer::restart()
    {
        if (parent) {
            parent->ReloadTimer(getID());
        }
    }
    bool AppTimer::operator==(const AppTimer &rhs) const
    {
        return this->id == rhs.id;
    }
    bool AppTimer::operator==(const uint32_t &rhs) const
    {
        return this->id == rhs;
    }
} /* namespace app */