#include "service_menu.h"
#include "screen.h"
#include <SDL3/SDL.h>
#include <array>
#include <string>
#include "text.h"
#include "resource.h"
#include "options.h"
#include "section.h" // Para Name, name, Options, options, AttractMode
#include "audio.h"
#include <unordered_map>

// Singleton
ServiceMenu *ServiceMenu::instance_ = nullptr;

// Inicializa la instancia única del singleton
void ServiceMenu::init() { ServiceMenu::instance_ = new ServiceMenu(); }

// Libera la instancia única del singleton
void ServiceMenu::destroy() { delete ServiceMenu::instance_; }

// Devuelve la instancia única del singleton
ServiceMenu *ServiceMenu::get() { return ServiceMenu::instance_; }

// Constructor de ServiceMenu
ServiceMenu::ServiceMenu()
    : element_text_(Resource::get()->getText("04b_25_flat")),
      title_text_(Resource::get()->getText("04b_25_flat_2x")),
      current_settings_group_(SettingsGroup::MAIN),
      previous_settings_group_(current_settings_group_)
{
    initializeOptions();
    setAnchors();
    updateMenu(current_settings_group_);
}

// Alterna la visibilidad del menú de servicio
void ServiceMenu::toggle()
{
    enabled_ = !enabled_;
    reset();
}

// Dibuja el menú de servicio en pantalla
void ServiceMenu::render()
{
    if (enabled_)
    {
        int y = rect_.y;

        // SOMBRA
        if (aspect_ == Aspect::ASPECT1)
        {
            SDL_FRect shadowRect = {rect_.x + 5, rect_.y + 5, rect_.w, rect_.h};
            SDL_SetRenderDrawColor(Screen::get()->getRenderer(), 0, 0, 0, 64);
            SDL_RenderFillRect(Screen::get()->getRenderer(), &shadowRect);
        }

        // FONDO
        const Uint8 ALPHA = aspect_ == Aspect::ASPECT1 ? 255 : 255;
        SDL_SetRenderDrawColor(Screen::get()->getRenderer(), bg_color_.r, bg_color_.g, bg_color_.b, ALPHA);
        SDL_RenderFillRect(Screen::get()->getRenderer(), &rect_);

        // BORDE
        SDL_SetRenderDrawColor(Screen::get()->getRenderer(), title_color_.r, title_color_.g, title_color_.b, 255);
        SDL_RenderRect(Screen::get()->getRenderer(), &rect_);

        // TITULO
        y += line_height_;
        title_text_->writeDX(TEXT_COLOR | TEXT_CENTER, param.game.game_area.center_x, y, "SERVICE MENU", -4, title_color_);

        // LINEA
        y += line_height_ * 2;
        SDL_SetRenderDrawColor(Screen::get()->getRenderer(), title_color_.r, title_color_.g, title_color_.b, 255);
        SDL_RenderLine(Screen::get()->getRenderer(), rect_.x + OPTIONS_HORIZONTAL_PADDING_, y, rect_.x + rect_.w - OPTIONS_HORIZONTAL_PADDING_, y);

        // OPCIONES
        for (size_t i = 0; i < option_pairs_.size(); ++i)
        {
            y += line_height_;
            if (getGroupAlignment(current_settings_group_) == GroupAlignment::LEFT)
            {
                // Nombre de la opción
                element_text_->writeColored(rect_.x + OPTIONS_HORIZONTAL_PADDING_, y, option_pairs_.at(i).first, i == selected_ ? selected_color_ : text_color_, -2);
                // Valor de la opción
                const int X = rect_.x + rect_.w - OPTIONS_HORIZONTAL_PADDING_ - element_text_->lenght(std::string(option_pairs_.at(i).second), -2);
                element_text_->writeColored(X, y, std::string(option_pairs_.at(i).second), i == selected_ ? selected_color_ : text_color_, -2);
            }
            else
            {
                // Nombre de la opción
                element_text_->writeDX(TEXT_CENTER | TEXT_COLOR, rect_.x + rect_.w / 2, y, option_pairs_.at(i).first, -2, i == selected_ ? selected_color_ : text_color_);
            }
        }
        /*
        SDL_SetRenderDrawColor(Screen::get()->getRenderer(), 0, 255, 0, 255);
        for (int i = rect_.y; i < rect_.y + rect_.h; i += line_height_)
        {
            SDL_RenderLine(Screen::get()->getRenderer(), rect_.x, i, rect_.x + rect_.w, i);
        }
        */
    }
}

// Actualiza el estado del menú de servicio (colores, animaciones, etc.)
void ServiceMenu::update()
{
    if (enabled_)
    {
        updateCounter();
        selected_color_ = getSelectedColor();
    }
}

// Calcula y establece los anclajes y dimensiones del menú
void ServiceMenu::setAnchors()
{
    line_height_ = element_text_->getCharacterSize() + 5;
    width_ = 220;
    height_ = calculateMenuHeight();
    rect_ = {
        (param.game.width - width_) / 2,
        (param.game.height - height_) / 2,
        static_cast<float>(width_),
        static_cast<float>(height_)};
}

// Actualiza el contador interno para animaciones o efectos visuales
void ServiceMenu::updateCounter()
{
    static Uint64 lastUpdate = SDL_GetTicks();
    Uint64 currentTicks = SDL_GetTicks();
    if (currentTicks - lastUpdate >= 50)
    {
        counter_++;
        lastUpdate = currentTicks;
    }
}

// Devuelve el color actual del elemento seleccionado (animado)
Color ServiceMenu::getSelectedColor() const
{
    static std::array<Color, 12> colors = {
        Color(0xFF, 0xFB, 0x8A), // Amarillo suave
        Color(0xFF, 0xE4, 0x5D), // Dorado medio
        Color(0xFF, 0xD1, 0x3C), // Amarillo pastel intenso
        Color(0xFF, 0xBF, 0x23), // Amarillo anaranjado
        Color(0xFF, 0xAA, 0x12), // Amarillo cálido
        Color(0xE6, 0x9A, 0x08), // Mostaza oscuro
        Color(0xE6, 0x9A, 0x08), // Mostaza oscuro (regreso, cierre)
        Color(0xFF, 0xAA, 0x12), // Amarillo cálido (regreso)
        Color(0xFF, 0xBF, 0x23), // Amarillo anaranjado (regreso)
        Color(0xFF, 0xD1, 0x3C), // Amarillo pastel intenso (regreso)
        Color(0xFF, 0xE4, 0x5D), // Dorado medio (regreso)
        Color(0xFF, 0xFB, 0x8A)  // Amarillo suave (regreso)
    };

    const size_t index = counter_ % colors.size();

    return colors.at(index);
}

// Método privado para reproducir el sonido del menú
void ServiceMenu::playMenuSound()
{
    Audio::get()->playSound(MENU_SOUND_);
}

// Mueve el selector hacia arriba en la lista de opciones
void ServiceMenu::setSelectorUp()
{
    if (display_options_.empty())
        return;
    selected_ = (selected_ > 0) ? selected_ - 1 : display_options_.size() - 1;
    playMenuSound();
}

// Mueve el selector hacia abajo en la lista de opciones
void ServiceMenu::setSelectorDown()
{
    if (display_options_.empty())
        return;
    selected_ = (selected_ + 1) % display_options_.size();
    playMenuSound();
}

// Ajusta el valor de la opción seleccionada (si es ajustable)
void ServiceMenu::adjustOption(bool adjust_up)
{
    if (display_options_.empty() || selected_ >= display_options_.size())
        return;

    if (display_options_.at(selected_).behavior == OptionBehavior::ADJUST)
    {
        display_options_.at(selected_).adjustValue(adjust_up);
        option_pairs_ = getOptionPairs(current_settings_group_);
        applySettings(current_settings_group_);
        playMenuSound();
    }
}

// Ejecuta la acción de la opción seleccionada o navega a un submenú
void ServiceMenu::selectOption()
{
    if (display_options_.empty() || selected_ >= display_options_.size())
        return;

    // Carpeta
    if (display_options_.at(selected_).type == ValueType::FOLDER)
    {
        previous_settings_group_ = current_settings_group_;
        current_settings_group_ = display_options_.at(selected_).target_group;
        updateMenu(current_settings_group_);
        selected_ = 0;
        playMenuSound();
        return;
    }

    // Opción
    if (display_options_.at(selected_).behavior == OptionBehavior::SELECT)
    {
        if (display_options_.at(selected_).caption == "RESET")
        {
            section::name = section::Name::INIT;
            toggle();
            return;
        }
        else if (display_options_.at(selected_).caption == "QUIT")
        {
            section::name = section::Name::QUIT;
            section::options = section::Options::QUIT_WITH_KEYBOARD;
            return;
        }
        else if (display_options_.at(selected_).caption == "SHUTDOWN")
        {
            section::name = section::Name::QUIT;
            section::options = section::Options::QUIT_WITH_CONTROLLER;
            return;
        }
        return;
    }
}

// Vuelve al grupo de opciones anterior o cierra el menú si está en el principal
void ServiceMenu::moveBack()
{
    if (current_settings_group_ == SettingsGroup::MAIN)
    {
        enabled_ = false;
        return;
    }
    else
    {
        selected_ = 0;
        current_settings_group_ = previous_settings_group_;
        updateMenu(current_settings_group_);
        playMenuSound();
    }
}

// Inicializa todas las opciones del menú de servicio
void ServiceMenu::initializeOptions()
{
    // Video
    options_.emplace_back("FULLSCREEN", SettingsGroup::VIDEO, OptionBehavior::ADJUST, &options.video.fullscreen, ValueType::BOOL);
    options_.emplace_back("WINDOW SIZE", SettingsGroup::VIDEO, OptionBehavior::ADJUST, &options.window.size, ValueType::INT, 1, options.window.max_size, 1);
    options_.emplace_back("SHADERS", SettingsGroup::VIDEO, OptionBehavior::ADJUST, &options.video.shaders, ValueType::BOOL);
    options_.emplace_back("VSYNC", SettingsGroup::VIDEO, OptionBehavior::ADJUST, &options.video.v_sync, ValueType::BOOL);
    options_.emplace_back("INTEGER SCALE", SettingsGroup::VIDEO, OptionBehavior::ADJUST, &options.video.integer_scale, ValueType::BOOL);

    // Audio
    options_.emplace_back("AUDIO", SettingsGroup::AUDIO, OptionBehavior::ADJUST, &options.audio.enabled, ValueType::BOOL);
    options_.emplace_back("MAIN VOLUME", SettingsGroup::AUDIO, OptionBehavior::ADJUST, &options.audio.volume, ValueType::INT, 0, 100, 5);
    options_.emplace_back("MUSIC VOLUME", SettingsGroup::AUDIO, OptionBehavior::ADJUST, &options.audio.music.volume, ValueType::INT, 0, 100, 5);
    options_.emplace_back("SFX VOLUME", SettingsGroup::AUDIO, OptionBehavior::ADJUST, &options.audio.sound.volume, ValueType::INT, 0, 100, 5);

    // Game
    options_.emplace_back("AUTOFIRE", SettingsGroup::GAME, OptionBehavior::ADJUST, &options.game.autofire, ValueType::BOOL);
    // options_.emplace_back("LANG", SettingsGroup::GAME, OptionBehavior::ADJUST, &options.game.language, ValueType::BOOL);

    // System
    options_.emplace_back("RESET", SettingsGroup::SYSTEM, OptionBehavior::SELECT, nullptr, ValueType::NONE);
    options_.emplace_back("QUIT", SettingsGroup::SYSTEM, OptionBehavior::SELECT, nullptr, ValueType::NONE);
    options_.emplace_back("SHUTDOWN", SettingsGroup::SYSTEM, OptionBehavior::SELECT, nullptr, ValueType::NONE);

    // Menu principal
    options_.emplace_back("VIDEO", SettingsGroup::MAIN, OptionBehavior::SELECT, SettingsGroup::VIDEO);
    options_.emplace_back("AUDIO", SettingsGroup::MAIN, OptionBehavior::SELECT, SettingsGroup::AUDIO);
    options_.emplace_back("GAME", SettingsGroup::MAIN, OptionBehavior::SELECT, SettingsGroup::GAME);
    options_.emplace_back("SYSTEM", SettingsGroup::MAIN, OptionBehavior::SELECT, SettingsGroup::SYSTEM);
}

// Devuelve las opciones del grupo como pares (nombre, valor)
ServiceMenu::OptionPairs ServiceMenu::getOptionPairs(ServiceMenu::SettingsGroup group) const
{
    OptionPairs optionPairs;

    for (const auto &option : options_)
    {
        if (option.group == group)
        {
            optionPairs.emplace_back(option.caption, option.getValueAsString());
        }
    }

    return optionPairs;
}

// Devuelve las opciones del grupo como un vector de OptionEntry
std::vector<ServiceMenu::OptionEntry> ServiceMenu::getOptionsByGroup(SettingsGroup group) const
{
    std::vector<OptionEntry> filteredOptions;

    for (const auto &option : options_)
    {
        if (option.group == group)
        {
            filteredOptions.push_back(option);
        }
    }

    return filteredOptions;
}

// Aplica la configuración correspondiente al grupo seleccionado
void ServiceMenu::applySettings(ServiceMenu::SettingsGroup group)
{
    switch (group)
    {
    case SettingsGroup::VIDEO:
        Screen::get()->applySettings();
        break;

    case SettingsGroup::AUDIO:
        Audio::get()->applySettings();
        break;

    default:
        break;
    }
}

// Actualiza las opciones mostradas según el grupo seleccionado
void ServiceMenu::updateMenu(SettingsGroup group)
{
    option_pairs_ = getOptionPairs(group);
    display_options_ = getOptionsByGroup(group);
}

// Reinicia el menú al estado inicial (grupo principal y opción seleccionada)
void ServiceMenu::reset()
{
    selected_ = 0;
    previous_settings_group_ = current_settings_group_ = SettingsGroup::MAIN;
    updateMenu(current_settings_group_);
}

// Calcula la altura total del menú en píxeles
int ServiceMenu::calculateMenuHeight() const
{
    return ((4 + findLargestGroupSize() + 1) * line_height_) - 5;
}

// Devuelve el tamaño (número de opciones) del grupo más grande
int ServiceMenu::findLargestGroupSize() const
{
    std::unordered_map<SettingsGroup, int> group_counts;
    for (const auto &option : options_)
        ++group_counts[option.group];

    int max_size = 0;
    for (const auto &pair : group_counts)
        if (pair.second > max_size)
            max_size = pair.second;
    return max_size;
}

// Devuelve la alineación de las opciones para el grupo dado
ServiceMenu::GroupAlignment ServiceMenu::getGroupAlignment(SettingsGroup group) const
{
    switch (group)
    {
    case SettingsGroup::VIDEO:
    case SettingsGroup::AUDIO:
    case SettingsGroup::GAME:
        return GroupAlignment::LEFT;

    default:
        return GroupAlignment::CENTERED;
    }
}