#include <cx.h>

int cx_glinit(GLFWwindow **window) {
	// Initialise GLFW
	if(!glfwInit()) {
		fprintf(stderr, "Failed to initialize GLFW\n");
		getchar();
		return -1;
	}

	glfwWindowHint(GLFW_SAMPLES, 4);
	glfwWindowHint(GLFW_CONTEXT_VERSION_MAJOR, 3);
	glfwWindowHint(GLFW_CONTEXT_VERSION_MINOR, 3);
	glfwWindowHint(GLFW_OPENGL_FORWARD_COMPAT, GL_TRUE); // To make MacOS happy; should not be needed
	glfwWindowHint(GLFW_OPENGL_PROFILE, GLFW_OPENGL_CORE_PROFILE);

	// Open a window and create its OpenGL context
	*window = glfwCreateWindow(1280, 720, "OpenGL Clock", NULL, NULL);
	if (*window == NULL) {
		fprintf(stderr, "Failed to open GLFW window.\n");
		glfwTerminate();
		return -1;
	}

	glfwMakeContextCurrent(*window);

	// Initialize GLEW
	if (glewInit() != GLEW_OK) {
		fprintf(stderr, "Failed to initialize GLEW\n");
		glfwTerminate();
		return -1;
	}

	// Ensure we can capture the escape key being pressed below
	glfwSetInputMode(*window, GLFW_STICKY_KEYS, GL_TRUE);

	// Dark grey background
	glClearColor(0.15f, 0.15f, 0.15f, 0.0f);

    return 0;
}

int cx_glrun(GLFWwindow *window) {
	GLuint VertexArrayID;
	GLuint programID;


	glGenVertexArrays(1, &VertexArrayID);
	glBindVertexArray(VertexArrayID);

	// Create and compile our GLSL program from the shaders
    if (LoadShaders(&programID,
                    "../shaders/SimpleVertexShader.vertexshader",
                    "../shaders/SimpleFragmentShader.fragmentshader")) {
        fprintf(stderr, "Could not load shaders.\n");
        return -1;
    }

    Model *model;
    model = model_load("../triangle.obj");

	GLuint vertexbuffer;
	glGenBuffers(1, &vertexbuffer);
	glBindBuffer(GL_ARRAY_BUFFER, vertexbuffer);
	glBufferData(GL_ARRAY_BUFFER, model->bufsize*4*sizeof(GLfloat), model->object, GL_STATIC_DRAW);

    double xpos, ypos;
    glfwGetCursorPos(window, &xpos, &ypos);

    GLfloat *matrix;
    GLfloat *temp = matrix_new();

    matrix = temp;
    time_t t = time(NULL);

    temp = matrix_new();

    temp[0] = cos(M_PI*2/60*(t%60));
    temp[4] = -sin(M_PI*2/60*(t%60));
    temp[1] = sin(M_PI*2/60*(t%60));
    temp[5] = cos(M_PI*2/60*(t%60));

    matrix = temp;
    t /= 60;


    GLfloat *projection = matrix_new();
    GLfloat *buffer;
    projection[14] = -1.0f;
    buffer = matrix_new();
    buffer[0] = (GLfloat)9/16;
    temp = matrix_multip(projection, buffer);
    free(buffer);
    free(projection);
    projection = temp;
    temp = malloc(model->bufsize * 4 * sizeof(GLfloat));
    buffer = malloc(model->bufsize * 4 * sizeof(GLfloat));
    memcpy(temp, model->object, model->bufsize * 4 * sizeof(GLfloat));

    GLfloat *orig;
    orig = malloc(model->bufsize * 4 * sizeof(GLfloat));
    memcpy(orig, model->object, model->bufsize * 4 * sizeof(GLfloat));

	do {
		// Clear the screen. It's not mentioned before Tutorial 02,
        // but it can cause flickering, so it's there nonetheless.
		glClear(GL_COLOR_BUFFER_BIT);

		// Use our shader
		glUseProgram(programID);
        time_t t = time(NULL);

        GLfloat *temp_mat;
        temp_mat = matrix_new();

        temp_mat[0] = cos(M_PI*2/60*(t%60));
        temp_mat[4] = -sin(M_PI*2/60*(t%60));
        temp_mat[1] = sin(M_PI*2/60*(t%60));
        temp_mat[5] = cos(M_PI*2/60*(t%60));

        matrix = temp_mat;
        t /= 60;

        for (int i = 2; i < 5; i++) {
            GLfloat *slice;
            slice = matrix_transform(orig, model->bufsize, matrix);
            memcpy(temp, slice, model->bufsize* 4 * sizeof(GLfloat));
            free(slice);
        }
        free(buffer);

        buffer = matrix_transform(temp, model->bufsize, projection);
        memcpy(model->object, buffer, model->bufsize * 4 * sizeof(GLfloat));

	    GLuint vertexbuffer;
	    glGenBuffers(1, &vertexbuffer);
	    glBindBuffer(GL_ARRAY_BUFFER, vertexbuffer);
	    glBufferData(GL_ARRAY_BUFFER, model->bufsize * 4 * sizeof(GLfloat), model->object, GL_STATIC_DRAW);


		// 1rst attribute buffer : vertices
		glEnableVertexAttribArray(0);
		glBindBuffer(GL_ARRAY_BUFFER, vertexbuffer);
		glVertexAttribPointer(
			0,                  // attribute 0. No particular reason for 0, but must match the layout in the shader.
			4,                  // size
			GL_FLOAT,           // type
			GL_FALSE,           // normalized?
			0,                  // stride
			NULL                // array buffer offset
		);


		// Draw!
		glDrawArrays(GL_TRIANGLES, 0, model->bufsize); // 3 indices starting at 0 -> 1 triangle

		glDisableVertexAttribArray(0);
		
		// Swap buffers
		glfwSwapBuffers(window);
		glfwPollEvents();

        // Check if the ESC key was pressed or the window was closed
        usleep(1000000/60);
	} while(glfwGetKey(window, GLFW_KEY_ESCAPE) != GLFW_PRESS &&
		   !glfwWindowShouldClose(window));

	// Close OpenGL window and terminate GLFW
    free(matrix);
	glfwTerminate();

    return 0;
}