/*
 * Copyright (c) 2018 Amine Ben Hassouna <amine.benhassouna@gmail.com>
 * All rights reserved.
 *
 * Permission is hereby granted, free of charge, to any
 * person obtaining a copy of this software and associated
 * documentation files (the "Software"), to deal in the
 * Software without restriction, including without
 * limitation the rights to use, copy, modify, merge,
 * publish, distribute, sublicense, and/or sell copies of
 * the Software, and to permit persons to whom the Software
 * is furnished to do so, subject to the following
 * conditions:
 *
 * The above copyright notice and this permission notice
 * shall be included in all copies or substantial portions
 * of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF
 * ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED
 * TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A
 * PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT
 * SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
 * CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
 * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR
 * IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
 * DEALINGS IN THE SOFTWARE.
 *
 */

#include "grid.h"


int Grid_ajustSize(Grid *grid)
{
    if(!grid->rect.w || !grid->rect.h || !grid->xCells || !grid->yCells)
    {
        fprintf(stderr, "Grid dimensions or number of cells not initialised !\n");
        return false;
    }

    // Init rect
    int interspaceWidth = (grid->xCells + 2) * grid->xInterspace;
    grid->rect.w -= (grid->rect.w - interspaceWidth) % grid->xCells;

    int interspaceHeigth = (grid->yCells + 2) * grid->yInterspace;
    grid->rect.h -= (grid->rect.h - interspaceHeigth) % grid->yCells;

    return true;
}

void Grid_alignCenter(Grid *grid, int screenWidth, int screenHeight)
{
    grid->rect.x = (screenWidth - grid->rect.w) / 2;
    grid->rect.y = (screenHeight - grid->rect.h) / 2;
}

bool Grid_init(Grid *grid)
{
    if(!grid->rect.w || !grid->rect.h || !grid->xCells || !grid->yCells)
    {
        fprintf(stderr, "Grid dimensions or number of cells not initialised !\n");
        return false;
    }

    if(grid->xCells > GRID_MAX_X_CELLS || grid->yCells > GRID_MAX_Y_CELLS)
    {
        fprintf(stderr, "Grid number of cells (%d,%d) is greater than (%d,%d) !\n",
                grid->xCells, grid->yCells,
                GRID_MAX_X_CELLS, GRID_MAX_Y_CELLS);
        return false;
    }

    // Init all cells
    for(int i = 0; i < grid->xCells; ++i)
    {
        for(int j = 0; j < grid->yCells; ++j)
        {
            Grid_initCell(grid,
                          &(grid->cells[i][j]),
                          i, j,
                          grid->backgroundColor,
                          grid->borderColor);
        }
    }

    return true;
}

void Grid_initCell(Grid *grid, Cell *cell, int i, int j, SDL_Color color, SDL_Color borderColor)
{
    // Init rect
    int interspaceWidth = (grid->xCells + 2) * grid->xInterspace;
    cell->rect.w = (grid->rect.w - interspaceWidth) / grid->xCells;

    int interspaceHeigth = (grid->yCells + 2) * grid->yInterspace;
    cell->rect.h = (grid->rect.h - interspaceHeigth) / grid->yCells;

    cell->rect.x = grid->rect.x + grid->xInterspace * (i+1.5) + cell->rect.w * i;
    cell->rect.y = grid->rect.y + grid->yInterspace * (j+1.5) + cell->rect.h * j;

    // Init rectColor
    cell->rectColor = color;

    // Init border
    cell->border.w = cell->rect.w + grid->xInterspace;
    cell->border.h = cell->rect.h + grid->yInterspace;
    cell->border.x = cell->rect.x - grid->xInterspace/2;
    cell->border.y = cell->rect.y - grid->yInterspace/2;

    // Init borderColor
    cell->borderColor = borderColor;
}

void Grid_render(Grid *grid, SDL_Renderer *renderer)
{
    // Set renderer color to draw the grid border
    SDL_SetRenderDrawColor(renderer,
                           grid->borderColor.r,
                           grid->borderColor.g,
                           grid->borderColor.b,
                           grid->borderColor.a);

    // Render grid border
    SDL_RenderFillRect(renderer, &(grid->rect));

    // Render all cells
    for(int i = 0; i < grid->xCells; ++i)
    {
        for(int j = 0; j < grid->yCells; ++j)
        {
            Grid_renderCell(&(grid->cells[i][j]), renderer);
        }
    }
}

void Grid_renderCell(Cell *cell, SDL_Renderer *renderer)
{
    // Set renderer color to cell color
    SDL_SetRenderDrawColor(renderer,
                           cell->borderColor.r,
                           cell->borderColor.g,
                           cell->borderColor.b,
                           cell->borderColor.a);

    // Render filled cell
    SDL_RenderFillRect(renderer, &(cell->border));

    // Set renderer color to cell color
    SDL_SetRenderDrawColor(renderer,
                           cell->rectColor.r,
                           cell->rectColor.g,
                           cell->rectColor.b,
                           cell->rectColor.a);

    // Render filled cell
    SDL_RenderFillRect(renderer, &(cell->rect));
}