#include "window.h"
#include <string.h>
#include "texture.h"
#include "log.h"
#include <stdlib.h>
#include <stdio.h>
#include "input.h"
#include "script.h"
#include "nuke.h"

#include "stb_ds.h"

struct mSDLWindow *mainwin;

static struct mSDLWindow *windows = NULL;

struct Texture *icon = NULL;

int is_win(struct mSDLWindow *s, GLFWwindow *w)
{
    return s->window == w;
}

void window_size_callback(GLFWwindow *w)
{

}

struct mSDLWindow *winfind(GLFWwindow *w)
{
    for (int i = 0; i < arrlen(windows); i++) {
        if (windows[i].window == w)
          return &windows[i];
    }

    return NULL;
}

void window_iconify_callback(GLFWwindow *w, int iconified)
{
    struct mSDLWindow *win = winfind(w);
    win->iconified = iconified;
}

void window_focus_callback(GLFWwindow *w, int focused)
{
    struct mSDLWindow *win = winfind(w);
	}

void window_maximize_callback(GLFWwindow *w, int maximized)
{
    struct mSDLWindow *win = winfind(w);
    win->minimized = !maximized;
}

void window_framebuffer_size_cb(GLFWwindow *w, int width, int height)
{
    struct mSDLWindow *win = winfind(w);
    win->width = width;
    win->height = height;
    window_makecurrent(win);
    win->render = 1;
}

void window_close_callback(GLFWwindow *w)
{
    quit = 1;
}



struct mSDLWindow *MakeSDLWindow(const char *name, int width, int height, uint32_t flags)
{
    if (arrcap(windows) == 0)
        arrsetcap(windows, 5);

    GLFWwindow *sharewin = mainwin == NULL ? NULL : mainwin->window;

     struct mSDLWindow w = {
         .width = width,
         .height = height,
         .id = arrlen(windows),
         .window = glfwCreateWindow(width, height, name, NULL, sharewin)   };


     if (!w.window) {
         YughError("Couldn't make GLFW window\n", 1);
         return NULL;
     }



    if (icon) window_seticon(&w, icon);

    glfwMakeContextCurrent(w.window);
    gladLoadGL(glfwGetProcAddress);
    glfwSwapInterval(1);

    // Set callbacks
    glfwSetWindowCloseCallback(w.window, window_close_callback);
    glfwSetWindowSizeCallback(w.window, window_size_callback);
    glfwSetFramebufferSizeCallback(w.window, window_framebuffer_size_cb);
    glfwSetWindowFocusCallback(w.window, window_focus_callback);
    glfwSetKeyCallback(w.window, win_key_callback);

    nuke_init(&w);

     arrput(windows, w);

     if (arrlen(windows) == 1)
         mainwin = &windows[0];

    return &arrlast(windows);
}

void window_set_icon(const char *png)
{
    icon = texture_pullfromfile(png);
}

void window_destroy(struct mSDLWindow *w)
{
    glfwDestroyWindow(w->window);
    arrdelswap(windows, w->id);
}

struct mSDLWindow *window_i(int index) {
    return &windows[index];
}

void window_handle_event(struct mSDLWindow *w)
{
/*
    if (e->type == SDL_WINDOWEVENT && e->window.windowID == w->id) {	// TODO: Check ptr direct?
	switch (e->window.event) {
	case SDL_WINDOWEVENT_SHOWN:
	    YughLog(0, SDL_LOG_PRIORITY_INFO, "Showed window %d.", w->id);
	    w->shown = true;
	    break;

	case SDL_WINDOWEVENT_HIDDEN:
	    w->shown = false;
	    YughLog(0, SDL_LOG_PRIORITY_INFO, "Hid window %d.", w->id);
	    break;

	case SDL_WINDOWEVENT_SIZE_CHANGED:

	    w->width = e->window.data1;
	    w->height = e->window.data2;
	    YughLog(0, SDL_LOG_PRIORITY_INFO,
		    "Changed size of window %d: width %d, height %d.",
		    w->id, w->width, w->height);
	    window_makecurrent(w);
	    w.projection =
	       glm::ortho(0.f, (float) width, 0.f, (float) height, -1.f,
	       1.f);
	    w->render = true;
	    break;

	case SDL_WINDOWEVENT_EXPOSED:
	    YughLog(0, SDL_LOG_PRIORITY_INFO, "Exposed window %d.", w->id);
	    w->render = true;
	    break;

	case SDL_WINDOWEVENT_ENTER:
	    YughLog(0, SDL_LOG_PRIORITY_INFO, "Entered window %d.", w->id);
	    w->mouseFocus = true;
	    SDL_RaiseWindow(w->window);
	    break;

	case SDL_WINDOWEVENT_LEAVE:
	    YughLog(0, SDL_LOG_PRIORITY_INFO, "Left window %d.", w->id);
	    w->mouseFocus = false;
	    break;

	case SDL_WINDOWEVENT_FOCUS_LOST:
	    YughLog(0, SDL_LOG_PRIORITY_INFO,
		    "Lost focus on window %d.", w->id);
	    w->keyboardFocus = false;
	    break;

	case SDL_WINDOWEVENT_FOCUS_GAINED:
	    YughLog(0, SDL_LOG_PRIORITY_INFO,
		    "Gained focus on window %d.", w->id);
	    w->keyboardFocus = true;
	    break;

	case SDL_WINDOWEVENT_MINIMIZED:
	    YughLog(0, SDL_LOG_PRIORITY_INFO,
		    "Minimized window %d.", w->id);
	    w->minimized = true;
	    break;

	case SDL_WINDOWEVENT_MAXIMIZED:
	    YughLog(0, SDL_LOG_PRIORITY_INFO,
		    "Maximized window %d.", w->id);
	    w->minimized = false;
	    break;

	case SDL_WINDOWEVENT_RESTORED:
	    YughLog(0, SDL_LOG_PRIORITY_INFO,
		    "Restored window %d.", w->id);
	    w->minimized = false;
	    break;

	case SDL_WINDOWEVENT_CLOSE:
	    YughLog(0, SDL_LOG_PRIORITY_INFO, "Closed window %d.", w->id);
	    break;
	}
    }
*/
}

void window_all_handle_events()
{
    arrwalk(windows, window_handle_event);
}

void window_makefullscreen(struct mSDLWindow *w)
{
    if (!w->fullscreen)
        window_togglefullscreen(w);
}

void window_unfullscreen(struct mSDLWindow *w)
{
    if (w->fullscreen)
        window_togglefullscreen(w);
}

void window_togglefullscreen(struct mSDLWindow *w)
{
    w->fullscreen = !w->fullscreen;

    if (w->fullscreen) {
        glfwMaximizeWindow(w->window);
    } else {
	glfwRestoreWindow(w->window);
    }

}

void window_makecurrent(struct mSDLWindow *w)
{

    if (w->window != glfwGetCurrentContext())
	glfwMakeContextCurrent(w->window);
    glViewport(0, 0, w->width, w->height);

}



void window_swap(struct mSDLWindow *w)
{
    glfwSwapBuffers(w->window);
}

void window_seticon(struct mSDLWindow *w, struct Texture *icon)
{

    static GLFWimage images[1];
    images[0].width = icon->width;
    images[0].height = icon->height;
    images[0].pixels = icon->data;
    glfwSetWindowIcon(w->window, 1, images);

}

int window_hasfocus(struct mSDLWindow *w)
{
    return glfwGetWindowAttrib(w->window, GLFW_FOCUSED);
}

void window_render(struct mSDLWindow *w) {
    window_makecurrent(w);
    openglRender(w);

    if (script_has_sym(w->nuke_cb)) {
        nuke_start();
        script_call_sym(w->nuke_cb);
        nk_end(ctx);
        nuke_end();
    } else if (w->nuke_gui != NULL) {
        nuke_start();
        w->nuke_gui();
        nuke_end();
    }


    window_swap(w);
}

void window_renderall() {
    //arrwalk(windows, window_render);
    for (int i = 0; i < arrlen(windows); i++)
      window_render(&windows[i]);
}