#include "window.h"

#include <cstdint>

#include <imgui.h>
#include <imgui_impl_glfw.h>
#include <imgui_impl_opengl3.h>

namespace Donut
{
    static bool     s_glfw_initialized = false;
    static uint32_t s_glfw_window_count = 0;

    Window::Window(const std::string& title, int width, int height)
        : m_title(title), m_width(width), 
          m_height(height), m_is_closed(false)
    {
        init();
    }

    Window::~Window()
    {
        shutdown();
    }

    void Window::init()
    {
        DONUT_INFO("Initializing window: ", m_title, " (", m_width, "x", m_height, ")");
        
        if (!s_glfw_initialized)
        {
            int success = glfwInit();
            if (!success)
            {
                DONUT_ERROR("Could not initialize GLFW!");
                return;
            }

            s_glfw_initialized = true;
            DONUT_INFO("GLFW initialized successfully");
        }

        m_window = glfwCreateWindow(m_width, m_height, m_title.c_str(), nullptr, nullptr);
        if (!m_window)
        {
            DONUT_ERROR("Could not create GLFW window!");
            glfwTerminate();
            return;
        }
        
        DONUT_INFO("GLFW window created successfully");

        glfwMakeContextCurrent(m_window);
        glfwSetWindowUserPointer(m_window, this);

        glfwSetErrorCallback(glfw_error_callback);
        glfwSetWindowCloseCallback(m_window, glfw_window_close_callback);
        glfwSetWindowSizeCallback(m_window,  glfw_window_size_callback);
        glfwSetWindowFocusCallback(m_window, glfw_window_focus_callback);
        glfwSetWindowPosCallback(m_window,   glfw_window_pos_callback);
        glfwSetKeyCallback(m_window,         glfw_key_callback);
        glfwSetCharCallback(m_window,        glfw_char_callback);
        glfwSetMouseButtonCallback(m_window, glfw_mouse_button_callback);
        glfwSetScrollCallback(m_window,      glfw_mouse_scroll_callback);
        glfwSetCursorPosCallback(m_window,   glfw_cursor_pos_callback);

        s_glfw_window_count++;
    }

    void Window::shutdown()
    {
        DONUT_INFO("Shutting down window: ", m_title);
        
        shutdown_im_gui();
        
        glfwDestroyWindow(m_window);
        s_glfw_window_count--;

        if (s_glfw_window_count == 0)
        {
            glfwTerminate();
            s_glfw_initialized = false;
            DONUT_INFO("GLFW terminated (no more windows)");
        }
    }

    void Window::on_update() const
    {
        glfwPollEvents();
        glfwSwapBuffers(m_window);
    }

    bool Window::should_close() const
    {
        return glfwWindowShouldClose(m_window) || m_is_closed;
    }

    void Window::set_cursor_locked(bool locked)
    {
        m_cursor_locked = locked;
        glfwSetInputMode(m_window, GLFW_CURSOR, locked ? 
                         GLFW_CURSOR_DISABLED : GLFW_CURSOR_NORMAL);
    }

    void Window::set_cursor_visible(bool visible)
    {
        m_cursor_visible = visible;
        glfwSetInputMode(m_window, GLFW_CURSOR, visible ? 
                         GLFW_CURSOR_NORMAL : GLFW_CURSOR_HIDDEN);
    }

    void Window::init_im_gui()
    {
        IMGUI_CHECKVERSION();
        ImGui::CreateContext();
        ImGuiIO& io = ImGui::GetIO();
        io.ConfigFlags |= ImGuiConfigFlags_NavEnableKeyboard;
        io.ConfigFlags |= ImGuiConfigFlags_DockingEnable;
        io.ConfigFlags |= ImGuiConfigFlags_ViewportsEnable;

        ImGui::StyleColorsDark();

        ImGuiStyle& style = ImGui::GetStyle();
        if (io.ConfigFlags & ImGuiConfigFlags_ViewportsEnable)
        {
            style.WindowRounding = 0.0f;
            style.Colors[ImGuiCol_WindowBg].w = 1.0f;
        }

        ImGui_ImplGlfw_InitForOpenGL(m_window, true);
        ImGui_ImplOpenGL3_Init("#version 130");
        
        DONUT_INFO("ImGUI initialized successfully");
    }

    void Window::shutdown_im_gui()
    {
        ImGui_ImplOpenGL3_Shutdown();
        ImGui_ImplGlfw_Shutdown();
        ImGui::DestroyContext();
        
        DONUT_INFO("ImGUI shutdown");
    }

    void Window::begin_im_gui_frame()
    {
        ImGui_ImplOpenGL3_NewFrame();
        ImGui_ImplGlfw_NewFrame();
        ImGui::NewFrame();
    }

    void Window::end_im_gui_frame()
    {
        ImGui::Render();
        ImGui_ImplOpenGL3_RenderDrawData(ImGui::GetDrawData());

        ImGuiIO& io = ImGui::GetIO();
        if (io.ConfigFlags & ImGuiConfigFlags_ViewportsEnable)
        {
            GLFWwindow* backup_current_context = glfwGetCurrentContext();
            ImGui::UpdatePlatformWindows();
            ImGui::RenderPlatformWindowsDefault();
            glfwMakeContextCurrent(backup_current_context);
        }
    }

    void Window::glfw_error_callback(int error, const char* description)
    {
        DONUT_ERROR("GLFW Error (", error, "): ", description);
    }

    void Window::glfw_window_close_callback(GLFWwindow* window)
    {
        Window* win = static_cast<Window*>(glfwGetWindowUserPointer(window));
        WindowCloseEvent event;
        win->m_event_handler.on_event(event);
    }

    void Window::glfw_window_size_callback(GLFWwindow* window, int width, int height)
    {
        Window* win = static_cast<Window*>(glfwGetWindowUserPointer(window));
        win->m_width = width;
        win->m_height = height;
        
        WindowResizeEvent event(width, height);
        win->m_event_handler.on_event(event);
    }

    void Window::glfw_window_focus_callback(GLFWwindow* window, int focused)
    {
        Window* win = static_cast<Window*>(glfwGetWindowUserPointer(window));
        
        if (focused)
        {
            WindowFocusEvent event;
            win->m_event_handler.on_event(event);
        }
        else
        {
            WindowLostFocusEvent event;
            win->m_event_handler.on_event(event);
        }
    }

    void Window::glfw_window_pos_callback(GLFWwindow* window, int xpos, int ypos)
    {
        Window* win = static_cast<Window*>(glfwGetWindowUserPointer(window));
        WindowMovedEvent event(xpos, ypos);
        win->m_event_handler.on_event(event);
    }

    void Window::glfw_key_callback(GLFWwindow* window, int key, int scancode, 
                                 int action, int mods)
    {
        Window* win = static_cast<Window*>(glfwGetWindowUserPointer(window));
        
        switch (action)
        {
            case GLFW_PRESS:
            {
                KeyPressedEvent event(key, false);
                win->m_event_handler.on_event(event);
            } break;
            case GLFW_RELEASE:
            {
                KeyReleasedEvent event(key);
                win->m_event_handler.on_event(event);
            } break;
            case GLFW_REPEAT:
            {
                KeyPressedEvent event(key, true);
                win->m_event_handler.on_event(event);
            } break;
        }
    }

    void Window::glfw_char_callback(GLFWwindow* window, unsigned int keycode)
    {
        Window* win = static_cast<Window*>(glfwGetWindowUserPointer(window));
        KeyTypedEvent event(keycode);
        win->m_event_handler.on_event(event);
    }

    void Window::glfw_mouse_button_callback(GLFWwindow* window, int button, 
                                         int action, int mods)
    {
        Window* win = static_cast<Window*>(glfwGetWindowUserPointer(window));
        
        switch (action)
        {
            case GLFW_PRESS:
            {
                MouseButtonPressedEvent event(button);
                win->m_event_handler.on_event(event);
            } break;
            case GLFW_RELEASE:
            {
                MouseButtonReleasedEvent event(button);
                win->m_event_handler.on_event(event);
            } break;
        }
    }

    void Window::glfw_mouse_scroll_callback(GLFWwindow* window, double x_offset, double y_offset)
    {
        Window* win = static_cast<Window*>(glfwGetWindowUserPointer(window));
        MouseScrolledEvent event((float)x_offset, (float)y_offset);
        win->m_event_handler.on_event(event);
    }

    void Window::glfw_cursor_pos_callback(GLFWwindow* window, double x_pos, double y_pos)
    {
        Window* win = static_cast<Window*>(glfwGetWindowUserPointer(window));
        MouseMovedEvent event((float)x_pos, (float)y_pos);
        win->m_event_handler.on_event(event);
    }
}