#include "v4k.h"

int SKY_DIR = 0;
const char *SKY_DIRS[] = {
    "cubemaps/bridge3/",
    "cubemaps/colors/",
    "cubemaps/colors2/",
    "hdr/Tokyo_BigSight_1k.hdr",
};

int OBJ_MDL = 0;
const char *OBJ_MDLS[] = {
    "meshes/ShadowsTest.obj",
    "meshes/sphere.obj",
    "meshes/suzanne.obj",
    "meshes/gazebo.obj",
};

int main(int argc, char** argv) {
    window_create(85, WINDOW_MSAA8);
    // window_fps_unlock();

    camera_t cam = camera(); {
        cam.position = vec3(0, 7.5, 15);
        cam.pitch = -15;
        cam.yaw = -90;
        camera_fps(&cam, 0, 0);
    }
    skybox_t sky = {0};
    model_t mdl = {0};
    shadowmap_t sm = {0};
    light_t lit = light(); {
        lit.type = LIGHT_POINT;
        lit.cast_shadows = true;
        // lit.shadow_distance = 3.0f;
    }
    light_t lit2 = light(); {
        lit2.type = LIGHT_POINT;
        lit2.cast_shadows = true;
        lit2.diffuse = vec3(1, 0.7, 0.8);
    }

    array(light_t) lights = 0;
    array_push(lights, lit);
    array_push(lights, lit2);

    bool initialized = 0;
    bool must_reload = 0;

    while( window_swap()) {
        if (input_down(KEY_ESC)) break;
        // reloading
        if( must_reload ) {
            must_reload = 0;
            skybox_destroy(&sky);
            model_destroy(mdl);
            initialized = 0;
        }
        if( !initialized ) {
            initialized = 1;
            sky = skybox(flag("--mie") ? 0 : SKY_DIRS[SKY_DIR], 0);
            sm = shadowmap(1024);
            mdl = model(OBJ_MDLS[OBJ_MDL], 0);
            shader_bind(mdl.program);
            cubemap_sh_shader(&sky.cubemap);
        }

        // fps camera
        bool active = ui_active() || ui_hover() || gizmo_active() ? false : input(MOUSE_L) || input(MOUSE_M) || input(MOUSE_R);
        window_cursor( !active );

        if( active ) cam.speed = clampf(cam.speed + input_diff(MOUSE_W) / 10, 0.05f, 5.0f);
        vec2 mouse = scale2(vec2(input_diff(MOUSE_X), -input_diff(MOUSE_Y)), 0.2f * active);
        vec3 wasdec = scale3(vec3(input(KEY_D)-input(KEY_A),input(KEY_E)-input(KEY_C),input(KEY_W)-input(KEY_S)), cam.speed);
        camera_moveby(&cam, wasdec);
        camera_fps(&cam, mouse.x,mouse.y);

        // Animate light
        lights[0].pos = vec3(0, 5.5, 1);
        lights[0].pos.x += sinf(window_time()*2)*4.5f;
        lights[0].pos.y += cosf(window_time()*2)*1.0;
        lights[0].pos.z += cosf(window_time()*2)*6.0;

        lights[1].pos = vec3(0, 7.5, 1);
        lights[1].pos.x += sinf(window_time()*4)*4.5f;
        lights[1].pos.y += cosf(window_time()*4)*1.0;
        lights[1].pos.z += cosf(window_time()*4)*6.0;

        // Render shadowmap
        shadowmap_begin(&sm);
        {
            for (int i = 0; i < array_count(lights); i++) {
                while (shadowmap_step(&sm)) {
                    shadowmap_light(&sm, &lights[i]);
                    model_render(mdl, cam.proj, cam.view, mdl.pivot, 0);
                }
            }
        }
        shadowmap_end(&sm);

        // render
        mat44 mvp; multiply44x2(mvp, cam.proj, cam.view);
        {
            skybox_render(&sky, cam.proj, cam.view);
            shader_bind(mdl.program);
            shader_int("u_textured", false);
            light_update(array_count(lights), lights);

            ddraw_sphere(lights[0].pos, 0.1f);
            ddraw_sphere(lights[1].pos, 0.1f);
            ddraw_flush();

            model_shadow(&mdl, &sm);
            model_render(mdl, cam.proj, cam.view, mdl.pivot, 0);
        }

        if( ui_panel("Scene", 0)) {
            if( ui_list("Skybox", SKY_DIRS, countof(SKY_DIRS), &SKY_DIR) ) {
                must_reload = 1;
            }
            if( ui_list("Model", OBJ_MDLS, countof(OBJ_MDLS), &OBJ_MDL) ) {
                must_reload = 1;
            }
            ui_panel_end();
        }
    }
}