#include <stdbool.h>

#include <SDL.h>

#include "system/stacktrace.h"
#include "system/log.h"
#include "game/camera.h"

#include "rect_layer.h"
#include "proto_rect.h"

#define PROTO_AREA_THRESHOLD 10.0

int proto_rect_render(const ProtoRect *proto_rect,
                      Camera *camera)
{
    trace_assert(proto_rect);
    trace_assert(proto_rect->color_current);
    trace_assert(camera);

    if (proto_rect->active) {
        if (camera_fill_rect(
                camera,
                rect_from_points(
                    proto_rect->begin,
                    proto_rect->end),
                *proto_rect->color_current) < 0) {
            return -1;
        }
    }

    return 0;
}

int proto_rect_event(ProtoRect *proto_rect,
                     const SDL_Event *event,
                     const Camera *camera)
{
    trace_assert(proto_rect);
    trace_assert(proto_rect->color_current);
    trace_assert(proto_rect->layer_current);
    trace_assert(event);
    trace_assert(camera);

    if (proto_rect->active) {
        // Active
        switch (event->type) {
        case SDL_MOUSEBUTTONUP: {
            switch (event->button.button) {
            case SDL_BUTTON_LEFT: {
                const Rect real_rect =
                    rect_from_points(
                        proto_rect->begin,
                        proto_rect->end);
                const float area = real_rect.w * real_rect.h;

                if (area >= PROTO_AREA_THRESHOLD) {
                    rect_layer_add_rect(proto_rect->layer_current, real_rect, *proto_rect->color_current);
                } else {
                    log_info("The area is too small %f. Such small box won't be created.\n", area);
                }
                proto_rect->active = false;
            } break;
            }
        } break;

        case SDL_MOUSEMOTION: {
            proto_rect->end = camera_map_screen(
                camera,
                event->motion.x,
                event->motion.y);
        } break;
        }
    } else {
        // Inactive
        switch (event->type) {
        case SDL_MOUSEBUTTONDOWN: {
            switch (event->button.button) {
            case SDL_BUTTON_LEFT: {
                proto_rect->active = true;
                proto_rect->begin = camera_map_screen(
                    camera,
                    event->button.x,
                    event->button.y);
                proto_rect->end = proto_rect->begin;
            } break;
            }
        } break;
        }
    }

    return 0;
}

int proto_rect_mouse_button(ProtoRect *proto_rect,
                            const SDL_MouseButtonEvent *event,
                            const Camera *camera)
{
    trace_assert(proto_rect);
    trace_assert(proto_rect->color_current);
    trace_assert(proto_rect->layer_current);
    trace_assert(event);
    trace_assert(camera);

    if (proto_rect->active) {
        // Active
        switch (event->type) {
        case SDL_MOUSEBUTTONUP: {
            switch (event->button) {
            case SDL_BUTTON_LEFT: {
                const Rect real_rect =
                    rect_from_points(
                        proto_rect->begin,
                        proto_rect->end);
                const float area = real_rect.w * real_rect.h;

                if (area >= PROTO_AREA_THRESHOLD) {
                    rect_layer_add_rect(proto_rect->layer_current, real_rect, *proto_rect->color_current);
                } else {
                    log_info("The area is too small %f. Such small box won't be created.\n", area);
                }
                proto_rect->active = false;
            } break;

            case SDL_BUTTON_RIGHT: {
                proto_rect->active = false;
            } break;
            }
        } break;
        }
    } else {
        // Inactive
        switch (event->type) {
        case SDL_MOUSEBUTTONDOWN: {
            switch (event->button) {
            case SDL_BUTTON_LEFT: {
                proto_rect->active = true;
                proto_rect->begin = camera_map_screen(
                    camera,
                    event->x,
                    event->y);
                proto_rect->end = proto_rect->begin;
            } break;
            }
        } break;
        }
    }

    return 0;
}


int proto_rect_mouse_motion(ProtoRect *proto_rect,
                            const SDL_MouseMotionEvent *event,
                            const Camera *camera)
{
    trace_assert(proto_rect);
    trace_assert(event);

    if (proto_rect->active) {
        proto_rect->end = camera_map_screen(
            camera,
            event->x,
            event->y);
    }

    return 0;
}