#include <Tactility/Tactility.h>

#include <Tactility/Paths.h>
#include <Tactility/app/AppContext.h>
#include <Tactility/app/AppPaths.h>
#include <Tactility/app/AppRegistration.h>
#include <Tactility/app/setup/Setup.h>
#include <Tactility/file/File.h>
#include <Tactility/lvgl/Lvgl.h>
#include <Tactility/service/loader/Loader.h>
#include <Tactility/service/wifi/Wifi.h>
#include <Tactility/settings/BootSettings.h>
#include <Tactility/settings/Time.h>

#include <algorithm>
#include <cstdio>
#include <cstring>
#include <ctime>
#include <lvgl.h>
#include <string>

#include <tactility/device.h>
#include <tactility/drivers/power_supply.h>
#include <tactility/log.h>
#include <tactility/lvgl_fonts.h>
#include <tactility/lvgl_icon_launcher.h>
#include <tactility/lvgl_icon_statusbar.h>
#include <tactility/lvgl_module.h>

namespace tt::app::launcher {

constexpr auto* TAG = "Launcher";
constexpr auto* BACKGROUND_ASSET = "color-field.png";
constexpr auto* CUSTOM_BACKGROUND_PATH = "tactility/launcher/background.bin";
constexpr lv_color_t TEXT_COLOR = LV_COLOR_MAKE(0xF8, 0xF5, 0xF2);
constexpr lv_color_t MUTED_TEXT_COLOR = LV_COLOR_MAKE(0xDF, 0xD6, 0xD3);
constexpr lv_color_t ACCENT_COLOR = LV_COLOR_MAKE(0xEC, 0x75, 0x69);

class LauncherApp final : public App {
    lv_obj_t* timeLabel = nullptr;
    lv_obj_t* dateLabel = nullptr;
    lv_obj_t* dataLabel = nullptr;
    lv_obj_t* statusLabel = nullptr;
    lv_timer_t* updateTimer = nullptr;

    static void onAppPressed(lv_event_t* event) {
        const auto* app_id = static_cast<const char*>(lv_event_get_user_data(event));
        start(app_id);
    }

    static bool shouldShowPowerButton() {
        bool show_power_button = false;
        device_for_each_of_type(&POWER_SUPPLY_TYPE, &show_power_button, [](Device* device, void* context) {
            if (device_is_ready(device) && power_supply_supports_power_off(device)) {
                *static_cast<bool*>(context) = true;
                return false;
            }
            return true;
        });
        return show_power_button;
    }

    static int getBatteryPercentage() {
        Device* power = nullptr;
        device_for_each_of_type(&POWER_SUPPLY_TYPE, &power, [](Device* device, void* context) {
            if (device_is_ready(device) && power_supply_supports_property(device, POWER_SUPPLY_PROP_CAPACITY)) {
                *static_cast<Device**>(context) = device;
                return false;
            }
            return true;
        });

        if (power == nullptr) {
            return -1;
        }

        PowerSupplyPropertyValue charge_level;
        if (power_supply_get_property(power, POWER_SUPPLY_PROP_CAPACITY, &charge_level) != ERROR_NONE) {
            return -1;
        }
        return std::clamp(charge_level.int_value, 0, 100);
    }

    static const char* getWifiStatusIcon(service::wifi::RadioState state) {
        using enum service::wifi::RadioState;
        switch (state) {
            case ConnectionActive:
                return LVGL_ICON_STATUSBAR_SIGNAL_WIFI_4_BAR;
            case Off:
            case OffPending:
                return LVGL_ICON_STATUSBAR_SIGNAL_WIFI_OFF;
            default:
                return LVGL_ICON_STATUSBAR_SIGNAL_WIFI_0_BAR;
        }
    }

    static const char* getBatteryStatusIcon(int percentage) {
        if (percentage < 0) {
            return "";
        } else if (percentage >= 95) {
            return LVGL_ICON_STATUSBAR_BATTERY_ANDROID_FRAME_FULL;
        } else if (percentage >= 64) {
            return LVGL_ICON_STATUSBAR_BATTERY_ANDROID_FRAME_5;
        } else if (percentage >= 32) {
            return LVGL_ICON_STATUSBAR_BATTERY_ANDROID_FRAME_3;
        }
        return LVGL_ICON_STATUSBAR_BATTERY_ANDROID_FRAME_1;
    }

    static lv_obj_t* createAppButton(
        lv_obj_t* parent,
        const char* icon,
        const char* appId,
        bool emphasized
    ) {
        auto* button = lv_button_create(parent);
        lv_obj_set_size(button, 52, 52);
        lv_obj_set_style_radius(button, 15, LV_PART_MAIN);
        lv_obj_set_style_shadow_width(button, 0, LV_PART_MAIN);
        lv_obj_set_style_border_width(button, emphasized ? 2 : 1, LV_PART_MAIN);
        lv_obj_set_style_border_color(button, emphasized ? ACCENT_COLOR : lv_color_hex(0x746568), LV_PART_MAIN);
        lv_obj_set_style_border_opa(button, emphasized ? LV_OPA_COVER : LV_OPA_60, LV_PART_MAIN);
        lv_obj_set_style_bg_color(button, lv_color_hex(0x211B20), LV_PART_MAIN);
        lv_obj_set_style_bg_opa(button, emphasized ? LV_OPA_80 : LV_OPA_70, LV_PART_MAIN);
        lv_obj_set_style_bg_color(button, lv_color_hex(0x392C32), LV_STATE_PRESSED);
        lv_obj_set_style_transform_scale(button, 238, LV_STATE_PRESSED);
        lv_obj_set_style_outline_color(button, ACCENT_COLOR, LV_STATE_FOCUSED);
        lv_obj_set_style_outline_width(button, 2, LV_STATE_FOCUSED);
        lv_obj_set_style_outline_pad(button, 2, LV_STATE_FOCUSED);

        auto* image = lv_image_create(button);
        lv_obj_set_size(image, 36, 36);
        lv_obj_center(image);
        lv_obj_set_style_text_font(image, lvgl_get_launcher_icon_font(), LV_STATE_DEFAULT);
        lv_image_set_src(image, icon);
        lv_obj_set_style_image_recolor(image, TEXT_COLOR, LV_STATE_DEFAULT);
        lv_obj_set_style_image_recolor_opa(image, LV_OPA_COVER, LV_STATE_DEFAULT);

        lv_obj_add_event_cb(button, onAppPressed, LV_EVENT_SHORT_CLICKED, const_cast<char*>(appId));
        return button;
    }

    void updateInformation() {
        const std::time_t now = std::time(nullptr);
        std::tm local_time {};
        localtime_r(&now, &local_time);

        char time_buffer[12];
        char date_buffer[40];
        if (local_time.tm_year >= 125) {
            if (settings::isTimeFormat24Hour()) {
                std::strftime(time_buffer, sizeof(time_buffer), "%H:%M", &local_time);
            } else {
                std::strftime(time_buffer, sizeof(time_buffer), "%I:%M", &local_time);
                if (time_buffer[0] == '0') {
                    std::memmove(time_buffer, time_buffer + 1, std::strlen(time_buffer));
                }
            }
            std::strftime(date_buffer, sizeof(date_buffer), "%A, %B %e", &local_time);
        } else {
            std::strcpy(time_buffer, "--:--");
            std::strcpy(date_buffer, "Set date and time");
        }
        lv_label_set_text(timeLabel, time_buffer);
        lv_label_set_text(dateLabel, date_buffer);

        const auto wifi_state = service::wifi::getRadioState();
        const bool wifi_connected = wifi_state == service::wifi::RadioState::ConnectionActive;
        std::string sd_card_path;
        const bool sd_ready = findFirstMountedSdCardPath(sd_card_path);
        const int battery_percentage = getBatteryPercentage();

        char data_buffer[80];
        if (battery_percentage >= 0) {
            std::snprintf(
                data_buffer,
                sizeof(data_buffer),
                "%s  •  %s  •  %d%%",
                wifi_connected ? "Wi-Fi connected" : "Wi-Fi offline",
                sd_ready ? "SD ready" : "No SD",
                battery_percentage
            );
        } else {
            std::snprintf(
                data_buffer,
                sizeof(data_buffer),
                "%s  •  %s",
                wifi_connected ? "Wi-Fi connected" : "Wi-Fi offline",
                sd_ready ? "SD ready" : "No SD"
            );
        }
        lv_label_set_text(dataLabel, data_buffer);

        char status_buffer[24];
        std::snprintf(
            status_buffer,
            sizeof(status_buffer),
            "%s%s",
            getWifiStatusIcon(wifi_state),
            getBatteryStatusIcon(battery_percentage)
        );
        lv_label_set_text(statusLabel, status_buffer);
    }

    static void onUpdateTimer(lv_timer_t* timer) {
        static_cast<LauncherApp*>(lv_timer_get_user_data(timer))->updateInformation();
    }

public:
    void onCreate(AppContext& app) override {
        settings::BootSettings boot_properties;
        if (
            std::strcmp(CONFIG_TT_AUTO_START_APP_ID, "") != 0 &&
            findAppManifestById(CONFIG_TT_AUTO_START_APP_ID) != nullptr
        ) {
            LOG_I(TAG, "Starting %s", CONFIG_TT_AUTO_START_APP_ID);
            start(CONFIG_TT_AUTO_START_APP_ID);
        } else if (
            settings::loadBootSettings(boot_properties) &&
            !boot_properties.autoStartAppId.empty() &&
            findAppManifestById(boot_properties.autoStartAppId) != nullptr
        ) {
            LOG_I(TAG, "Starting %s", boot_properties.autoStartAppId.c_str());
            start(boot_properties.autoStartAppId);
        } else if (!setup::isCompleted()) {
            setup::start();
        }
    }

    void onShow(AppContext& app, lv_obj_t* parent) override {
        lv_obj_set_style_bg_color(parent, lv_color_hex(0x211A20), LV_PART_MAIN);
        lv_obj_set_style_bg_opa(parent, LV_OPA_COVER, LV_PART_MAIN);
        lv_obj_set_style_pad_all(parent, 0, LV_PART_MAIN);
        lv_obj_clear_flag(parent, LV_OBJ_FLAG_SCROLLABLE);

        auto background_path = lvgl::PATH_PREFIX + app.getPaths()->getAssetsPath(BACKGROUND_ASSET);
        std::string sd_card_path;
        if (findFirstMountedSdCardPath(sd_card_path)) {
            const auto custom_background_path = file::getChildPath(sd_card_path, CUSTOM_BACKGROUND_PATH);
            if (file::isFile(custom_background_path)) {
                const auto lvgl_custom_background_path = lvgl::PATH_PREFIX + custom_background_path;
                lv_image_header_t header {};
                if (lv_image_decoder_get_info(lvgl_custom_background_path.c_str(), &header) == LV_RESULT_OK) {
                    background_path = lvgl_custom_background_path;
                    LOG_I(
                        TAG,
                        "Using SD background %s (%ux%u, format 0x%02x)",
                        custom_background_path.c_str(),
                        header.w,
                        header.h,
                        header.cf
                    );
                } else {
                    LOG_W(TAG, "Ignoring invalid SD background %s", custom_background_path.c_str());
                }
            }
        }

        auto* background = lv_image_create(parent);
        lv_image_set_src(background, background_path.c_str());
        lv_obj_align(background, LV_ALIGN_CENTER, 0, 0);
        lv_obj_add_flag(background, LV_OBJ_FLAG_IGNORE_LAYOUT);

        timeLabel = lv_label_create(parent);
        lv_label_set_text(timeLabel, "--:--");
        lv_obj_set_style_text_color(timeLabel, TEXT_COLOR, LV_PART_MAIN);
#if LV_FONT_MONTSERRAT_48
        lv_obj_set_style_text_font(timeLabel, &lv_font_montserrat_48, LV_PART_MAIN);
#else
        lv_obj_set_style_text_font(timeLabel, lvgl_get_text_font(FONT_SIZE_LARGE), LV_PART_MAIN);
#endif
        lv_obj_align(timeLabel, LV_ALIGN_TOP_LEFT, 18, 58);

        dateLabel = lv_label_create(parent);
        lv_obj_set_style_text_font(dateLabel, lvgl_get_text_font(FONT_SIZE_LARGE), LV_PART_MAIN);
        lv_obj_set_style_text_color(dateLabel, TEXT_COLOR, LV_PART_MAIN);
        lv_obj_align(dateLabel, LV_ALIGN_TOP_LEFT, 20, 118);

        dataLabel = lv_label_create(parent);
        lv_obj_set_width(dataLabel, 225);
        lv_label_set_long_mode(dataLabel, LV_LABEL_LONG_MODE_WRAP);
        lv_obj_set_style_text_font(dataLabel, lvgl_get_text_font(FONT_SIZE_SMALL), LV_PART_MAIN);
        lv_obj_set_style_text_color(dataLabel, MUTED_TEXT_COLOR, LV_PART_MAIN);
        lv_obj_align(dataLabel, LV_ALIGN_TOP_LEFT, 20, 148);

        statusLabel = lv_label_create(parent);
        lv_obj_set_style_text_font(statusLabel, lvgl_get_statusbar_icon_font(), LV_PART_MAIN);
        lv_obj_set_style_text_color(statusLabel, TEXT_COLOR, LV_PART_MAIN);
        lv_obj_align(statusLabel, LV_ALIGN_TOP_RIGHT, -15, 8);

        auto* buttonRail = lv_obj_create(parent);
        lv_obj_set_size(buttonRail, 60, 184);
        lv_obj_align(buttonRail, LV_ALIGN_RIGHT_MID, -7, 8);
        lv_obj_set_flex_flow(buttonRail, LV_FLEX_FLOW_COLUMN);
        lv_obj_set_flex_align(buttonRail, LV_FLEX_ALIGN_SPACE_EVENLY, LV_FLEX_ALIGN_CENTER, LV_FLEX_ALIGN_CENTER);
        lv_obj_set_style_pad_all(buttonRail, 0, LV_PART_MAIN);
        lv_obj_set_style_border_width(buttonRail, 0, LV_PART_MAIN);
        lv_obj_set_style_bg_opa(buttonRail, LV_OPA_TRANSP, LV_PART_MAIN);
        lv_obj_clear_flag(buttonRail, LV_OBJ_FLAG_SCROLLABLE);

        createAppButton(buttonRail, LVGL_ICON_LAUNCHER_APPS, "AppList", true);
        createAppButton(buttonRail, LVGL_ICON_LAUNCHER_FOLDER, "Files", false);
        createAppButton(buttonRail, LVGL_ICON_LAUNCHER_SETTINGS, "Settings", false);

        if (shouldShowPowerButton()) {
            auto* power_button = lv_button_create(parent);
            lv_obj_set_size(power_button, 36, 36);
            lv_obj_align(power_button, LV_ALIGN_BOTTOM_LEFT, 16, -12);
            lv_obj_set_style_radius(power_button, LV_RADIUS_CIRCLE, LV_PART_MAIN);
            lv_obj_set_style_shadow_width(power_button, 0, LV_PART_MAIN);
            lv_obj_set_style_bg_color(power_button, lv_color_hex(0x211B20), LV_PART_MAIN);
            lv_obj_set_style_bg_opa(power_button, LV_OPA_70, LV_PART_MAIN);
            lv_obj_add_event_cb(power_button, onAppPressed, LV_EVENT_SHORT_CLICKED, const_cast<char*>("PowerOff"));

            auto* power_label = lv_label_create(power_button);
            lv_label_set_text(power_label, LV_SYMBOL_POWER);
            lv_obj_set_style_text_color(power_label, TEXT_COLOR, LV_PART_MAIN);
            lv_obj_center(power_label);
        }

        updateInformation();
        updateTimer = lv_timer_create(onUpdateTimer, 1000, this);
    }

    void onHide(AppContext& app) override {
        if (updateTimer != nullptr) {
            lv_timer_delete(updateTimer);
            updateTimer = nullptr;
        }
        timeLabel = nullptr;
        dateLabel = nullptr;
        dataLabel = nullptr;
        statusLabel = nullptr;
    }
};

extern const AppManifest manifest = {
    .appId = "Launcher",
    .appName = "Launcher",
    .appCategory = Category::System,
    .appFlags = AppManifest::Flags::Hidden | AppManifest::Flags::HideStatusBar,
    .createApp = create<LauncherApp>
};

LaunchId start() {
    return app::start(manifest.appId);
}

} // namespace tt::app::launcher