/*
 * Copyright (C) 2021  P. J. McDermott
 *
 * This file is part of Dodge Balls
 *
 * Dodge Balls is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * Dodge Balls is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with Dodge Balls.  If not, see <http://www.gnu.org/licenses/>.
 */

#include <SDL.h>
#include <SDL_ttf.h>
#include <stdlib.h>
#include "game.h"
#include "main-menu.h"
#include "main.h"
#include "output.h"
#include "util.h"

struct _db_main_menu_button {
	SDL_Texture                 *texture_text;
	SDL_Texture                 *texture_over;
	SDL_Rect                     rect;
	struct _db_main_menu_button *u;
	struct _db_main_menu_button *d;
	struct _db_main_menu_button *l;
	struct _db_main_menu_button *r;
};

static SDL_Texture *
_db_main_menu_text(TTF_Font *font, const char *text, SDL_Color *color,
		int width, SDL_Renderer *renderer, SDL_Rect *rect)
{
	SDL_Surface *surface;
	SDL_Texture *texture;

	surface = TTF_RenderText_Blended_Wrapped(font, text, *color, width);
	if (surface == NULL) {
		db_err("Failed to create surface (%s)", TTF_GetError());
		return NULL;
	}

	texture = SDL_CreateTextureFromSurface(renderer, surface);
	if (texture == NULL) {
		db_err("Failed to create texture (%s)", SDL_GetError());
		return NULL;
	}

	rect->w = surface->w;
	rect->h = surface->h;

	SDL_FreeSurface(surface);

	return texture;
}

void
db_main_menu(void)
{
	const char                   *games_dir;
	char                         *font_path;
	SDL_Renderer                 *renderer;
	SDL_Color                     text_color;
	SDL_Color                     over_color;
	SDL_Rect                      dest_rect;
	TTF_Font                     *font;
	SDL_Texture                  *texture_title;
	struct db_game              **games;
	int                           n;
	struct _db_main_menu_button **buttons;
	char                         *name_desc;
	int                           i;

	games_dir = db_get_games_dir();
	font_path = db_strcat(db_get_fonts_dir(), "/UbuntuTitling-Bold.ttf");

	renderer = db_get_renderer();

	/* Render background */
	SDL_SetRenderDrawColor(renderer, 0x7F, 0x7F, 0x7F, 0xFF);
	SDL_RenderClear(renderer);

	text_color.r = 0x00;
	text_color.g = 0x00;
	text_color.b = 0xFF;
	text_color.a = 0xFF;

	over_color.r = 0xFF;
	over_color.g = 0xFF;
	over_color.b = 0xFF;
	over_color.a = 0xFF;

	/* Render title text */
	font = TTF_OpenFont(font_path, 48);
	if (font == NULL) {
		db_err("Failed to open font (%s)", TTF_GetError());
		free(font_path);
		return;
	}
	texture_title = _db_main_menu_text(font, "Dodge Balls", &text_color, 0,
			renderer, &dest_rect);
	if (texture_title == NULL) {
		goto err;
	}
	dest_rect.x = 16;
	dest_rect.y = 16;
	SDL_RenderCopy(renderer, texture_title, NULL, &dest_rect);
	SDL_DestroyTexture(texture_title);

	TTF_CloseFont(font);
	font = TTF_OpenFont(font_path, 16);
	if (font == NULL) {
		db_err("Failed to open font (%s)", TTF_GetError());
		free(font_path);
		return;
	}

	/* Find games */
	n = db_games_find(games_dir, &games);
	buttons = calloc(n + 2, sizeof(*buttons));
	if (buttons == NULL) {
		db_err("Failed to allocate memory");
		goto err;
	}

	/* Render help button */
	buttons[0] = malloc(sizeof(**buttons));
	if (buttons[0] == NULL) {
		db_err("Failed to allocate memory");
		goto err;
	}
	buttons[0]->texture_text = _db_main_menu_text(font, "How to Play",
			&text_color, 0, renderer, &buttons[0]->rect);
	if (buttons[0]->texture_text == NULL) {
		goto err;
	}
	buttons[0]->texture_over = _db_main_menu_text(font, "How to Play",
			&over_color, 0, renderer, &buttons[0]->rect);
	if (buttons[0]->texture_over == NULL) {
		goto err;
	}
	buttons[0]->rect.x = 640 - 16 - buttons[0]->rect.w;
	buttons[0]->rect.y = 16;
	SDL_RenderCopy(renderer, buttons[0]->texture_text, NULL,
			&buttons[0]->rect);

	/* Render quit button */
	buttons[1] = malloc(sizeof(**buttons));
	if (buttons[1] == NULL) {
		db_err("Failed to allocate memory");
		goto err;
	}
	buttons[1]->texture_text = _db_main_menu_text(font, "Quit",
			&text_color, 0, renderer, &buttons[1]->rect);
	if (buttons[1]->texture_text == NULL) {
		goto err;
	}
	buttons[1]->texture_over = _db_main_menu_text(font, "Quit",
			&over_color, 0, renderer, &buttons[1]->rect);
	if (buttons[1]->texture_over == NULL) {
		goto err;
	}
	buttons[1]->rect.x = 640 - 16 - buttons[1]->rect.w;
	buttons[1]->rect.y = 48;
	SDL_RenderCopy(renderer, buttons[1]->texture_text, NULL,
			&buttons[1]->rect);

	/* Render game buttons */
	if (n > 0) {
		for (i = 0; i < n; ++i) {
			buttons[i + 2] = malloc(sizeof(**buttons));
			if (buttons[i + 2] == NULL) {
				db_err("Failed to allocate memory");
				goto err;
			}
			name_desc = malloc((strlen(db_game_get_name(games[i])) +
						strlen(db_game_get_desc(
								games[i])) + 2)
						* sizeof(*name_desc));
			if (name_desc == NULL) {
				db_err("Failed to allocate memory");
				goto err;
			}
			sprintf(name_desc, "%s\n%s", db_game_get_name(games[i]),
					db_game_get_desc(games[i]));
			buttons[i + 2]->texture_text = _db_main_menu_text(font,
					name_desc, &text_color, 608, renderer,
					&dest_rect);
			if (buttons[i + 2]->texture_text == NULL) {
				free(name_desc);
				goto err;
			}
			dest_rect.x = 16;
			dest_rect.y = 80 + 48 * i + 2;
			SDL_RenderCopy(renderer, buttons[i + 2]->texture_text, NULL,
					&dest_rect);
			buttons[i + 2]->texture_over = _db_main_menu_text(font,
					name_desc, &over_color, 608, renderer,
					&dest_rect);
			free(name_desc);
			if (buttons[i + 2]->texture_over == NULL) {
				goto err;
			}
		}
	}

	SDL_RenderPresent(renderer);
	SDL_Delay(1000);

 err:
	if (n > 0) {
		for (i = 0; i < n; ++i) {
			db_game_free(games[i]);
		}
		free(games);
	}
	free(font_path);
	TTF_CloseFont(font);
}