#include <SDL.h>
#include "system/stacktrace.h"
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <errno.h>

#include "platforms.h"
#include "system/lt.h"
#include "system/line_stream.h"
#include "system/nth_alloc.h"
#include "system/log.h"
#include "game/level/level_editor/rect_layer.h"

struct Platforms {
    Lt *lt;

    Rect *rects;
    Color *colors;
    size_t rects_size;
};

Platforms *create_platforms_from_rect_layer(const RectLayer *layer)
{
    trace_assert(layer);

    Lt *lt = create_lt();

    Platforms *platforms = PUSH_LT(
        lt,
        nth_calloc(1, sizeof(Platforms)),
        free);
    if (platforms == NULL) {
        RETURN_LT(lt, NULL);
    }
    platforms->lt = lt;

    platforms->rects_size = rect_layer_count(layer);

    platforms->rects = PUSH_LT(lt, nth_calloc(1, sizeof(Rect) * platforms->rects_size), free);
    if (platforms->rects == NULL) {
        RETURN_LT(lt, NULL);
    }
    memcpy(platforms->rects, rect_layer_rects(layer), sizeof(Rect) * platforms->rects_size);


    platforms->colors = PUSH_LT(lt, nth_calloc(1, sizeof(Color) * platforms->rects_size), free);
    if (platforms->colors == NULL) {
        RETURN_LT(lt, NULL);
    }
    memcpy(platforms->colors, rect_layer_colors(layer), sizeof(Color) * platforms->rects_size);

    return platforms;
}

void destroy_platforms(Platforms *platforms)
{
    trace_assert(platforms);
    RETURN_LT0(platforms->lt);
}

/* TODO(#450): platforms do not render their ids in debug mode */
int platforms_render(const Platforms *platforms,
                     Camera *camera)
{
    for (size_t i = 0; i < platforms->rects_size; ++i) {
        if (camera_fill_rect(
                camera,
                platforms->rects[i],
                platforms->colors[i]) < 0) {
            return -1;
        }
    }

    return 0;
}

void platforms_touches_rect_sides(const Platforms *platforms,
                                  Rect object,
                                  int sides[RECT_SIDE_N])
{
    trace_assert(platforms);

    for (size_t i = 0; i < platforms->rects_size; ++i) {
        rect_object_impact(object, platforms->rects[i], sides);
    }
}

Vec platforms_snap_rect(const Platforms *platforms,
                         Rect *object)
{
    trace_assert(platforms);

    Vec result = vec(1.0f, 1.0f);
    for (size_t i = 0; i < platforms->rects_size; ++i) {
        if (rects_overlap(platforms->rects[i], *object)) {
            result = vec_entry_mult(result, rect_snap(platforms->rects[i], object));
        }
    }

    return result;
}