#include <libft.h>
#include <cub3d.h>
#include <stdlib.h>
#include <fcntl.h>
#include <unistd.h>

static void
ft_check_cub(const char *map_path, t_cub *clist)
{
	char	**words;
	size_t	i;

	if (!(words = ft_split(map_path, '.')))
	{
		ft_dprintf(STDERR_FILENO, "Error\n");
		ft_dprintf(STDERR_FILENO, "\033[31;1mMap is not a .cub\033[0m\n");
		ft_free_words(words);
		ft_exit(2, clist);
	}
	i = 0;
	while (words[i])
		i++;
	if (ft_strcmp(words[i - 1], "cub"))
	{
		ft_dprintf(STDERR_FILENO, "Error\n");
		ft_dprintf(STDERR_FILENO, "\033[31;1mMap is not a .cub\033[0m\n");
		ft_free_words(words);
		ft_exit(2, clist);
	}
	ft_free_words(words);
}

/* static void */
/* ft_check_map_last_line(t_cub *clist) */
/* { */
/* 	size_t	i; */
/* 	size_t	j; */

/* 	i = 0; */
/* 	while (clist->map[i]) */
/* 		i++; */
/* 	j = 0; */
/* 	while (clist->map[i - 1][j]) */
/* 	{ */
/* 		if (clist->map[i - 1][j] != '1' && clist->map[i - 1][j] != '\0') */
/* 			ft_map_error(clist); */
/* 		j++; */
/* 	} */
/* } */

static int8_t
ft_parse_it(int fd, t_cub *clist)
{
	char	*line;
	char	**words;
	int		ret;

	clist->line_chk += 1;
	if ((ret = get_next_line(fd, &line)) < 0)
		return (ft_map_error(clist));
	if (ret == 0)
	{
		ft_memdel(line);
		return (ft_map_error(clist));
	}
	if (!line[0])
	{
		ft_memdel(line);
		return (ft_parse_it(fd, clist));
	}
	if (!(words = ft_split(line, ' ')))
	{
		ft_memdel(line);
		return (ft_map_error(clist));
	}
	if ((ret = ft_select_get(words, clist)) == 12)
	{
		if (ft_get_map_first_line(line, clist) < 0)
			return (-1);
		return (12);
	}
	ft_memdel(line);
	return (ret);
}

void
ft_parse_map(const char *map_path, t_cub *clist)
{
	int		fd;
	int8_t	ret;

	ft_check_cub(map_path, clist);
	fd = open(map_path, O_RDONLY);
	if (fd < 0)
	{
		ft_dprintf(STDERR_FILENO, "Error\n");
		ft_dprintf(STDERR_FILENO, "\033[31;1mNo map\033[0m\n");
		ft_exit(2, clist);
	}
	ret = 1;
	while (ret != 12 && ret != -1)
		ret = ft_parse_it(fd, clist);
	if (ret == -1)
		ft_map_error(clist);
	clist->nsew = 0;
	if (ft_get_map_core(fd, clist) < 0)
		ft_map_error(clist);
	ft_check_missing(clist);
	/* if (ft_get_tex(fd, clist) < 0) */
	/* 	return ; */
	/* ft_check_empty_line(fd, 6, clist); */
	/* if (ft_get_sprite_tex(fd, clist) < 0) */
	/* 	return ; */
	/* ft_get_colors(fd, clist); */
	/* ft_check_empty_line(fd, 10, clist); */
	/* if (ft_get_map(fd, clist) < 0) */
	/* 	ft_map_error(11, clist); */
	/* ft_check_map_last_line(clist); */
	ft_print_list(clist);
	close(fd);
}