#include <stdbool.h>
#include <stdio.h>
#include <stdlib.h>
#include "game.h"
#include "game_aux.h"

bool checkerr(game g, char taberr[]) {
	if (taberr == NULL || g == NULL) {
		return -1;
	}
	uint err = 0;
	taberr[0] = '\0';
	for (int i = 0; i < DEFAULT_SIZE; i++) {
		for (int j = 0; j < DEFAULT_SIZE; j++) {
			// check each case
			if (game_has_error(g, i, j)) {
				// if error append taberr with coo+,
				taberr[err] = i + 48;
				err++;
				taberr[err] = ':';
				err++;
				taberr[err] = j + 48;
				err++;
				taberr[err] = ' ';
				err++;
			}
		}
	}
	// if taberr changes print
	if (taberr[0] != '\0') {
		taberr[err] = '\0';
		return true;
	}
	return false;
}

void printhelp(void) {
	printf("Liste des différentes commandes :\n");
	printf("h : Affiche cette aide.\n");
	printf("r : Réinitialise la partie.\n");
	printf("q : Quitter la partie (abandon).\n");
	printf(
	    "l <i> <j> : Place une ampoule (*light bulb*) dans la case "
	    "(<i>,<j>).\n");
	printf("m <i> <j> : Place une marque (*mark*) dans la case (<i>,<j>).\n");
	printf(
	    "b <i> <j> : Place placer une case vide (*blank*) à la position "
	    "(<i>,<j>).\n");
}

int main(void) {
	// Create new game
	game g = game_default();
	// test if game is over
	uint i;
	uint j;
	char taberr[DEFAULT_SIZE * DEFAULT_SIZE * 4];
	char c;
	// print game
	game_print(g);
	while (!game_is_over(g)) {
		// print errors
		if (checkerr(g, taberr)) {
			printf("Il y a un problème case: %s\n", taberr);
		}
		printf("Entrez une commande (h pour afficher l'aide): ");
		if (scanf(" %c", &c)) {
			if (c == 'h') {
				printhelp();
			} else if (c == 'r') {
				game_restart(g);
				printf("Partie réinitialisé avec success !\n");
				game_update_flags(g);
				game_print(g);
			} else if (c == 'q') {
				printf("Solution: \n");
				game_print(game_default_solution());
				printf("shame\n");
				return EXIT_SUCCESS;
			} else if (c == 'l' || c == 'm' || c == 'b') {
				if (scanf(" %u %u", &i, &j) == 2) {
					if (i < DEFAULT_SIZE && j < DEFAULT_SIZE &&
					    !game_is_black(g, i, j)) {
						if (c == 'l') {
							game_set_square(g, i, j, S_LIGHTBULB);
							game_update_flags(g);
							game_print(g);
						} else if (c == 'm') {
							game_set_square(g, i, j, S_MARK);
							game_update_flags(g);
							game_print(g);
						} else if (c == 'b') {
							game_set_square(g, i, j, S_BLANK);
							game_update_flags(g);
							game_print(g);
						}
					} else {
						printf("Erreur: (<i>,<j>) invalide.\n");
					}
				} else {
					printf("Commande inconnue.\n");
				}
			} else {
				printf("Commande inconnue.\n");
			}
		}
	}
	printf("congratulation\n");
	return EXIT_SUCCESS;
}