#include "get_next_line.h"

/*
**	//-g -fsanitize=address
**	//:set noendofline binary
**	//https://github.com/lgrellie/gnl_tester
**	//https://github.com/Mazoise/42TESTERS-GNL
**	//https://github.com/charMstr/GNL_lover
**	//https://github.com/mrjvs/42cursus_gnl_tests
**	//https://github.com/Sherchryst/gnlkiller
**	//https://github.com/Hellio404/Get_Next_Line_Tester
**	//https://github.com/TinfoilPancakes/get-next-line-testing-tools
**
**	#include <stdio.h>	//for printf
**	#include <fcntl.h>	//for open
**
**	void	ft_putchar(char c){
**		write(1, &c, 1);
**	}
**
**	void	ft_putstr(char *s)
**	{
**		while (s && *s)
**			ft_putchar(*s++);
**	}
**
**	void	ft_putnbr(int n)
**	{
**		long	l;
**
**		l = n;
**		if (l < 0)
**		{
**			ft_putchar('-');
**			l *= -1;
**		}
**		if (l >= 10)
**			ft_putnbr(l / 10);
**		ft_putchar((l % 10) + '0');
**	}
**
**	int		main(int ac, char **av)
**	{
**		int		*fd;
**		int		i;
**		int		j;
**		int		ret;
**		char	*line;
**
**		line = NULL;
**		i = 0;
**		if (!(fd = (int *)malloc(sizeof(int) * ac)))
**			return (0);
**		while (++i <= ac - 1)
**			fd[i - 1] = open(av[i], O_RDONLY);
**		i = 0;
**		j = 0;
**		ret = 1;
**		while (j < ac - 1)
**		{
**			if (ret > 0)
**			{
**				ret = get_next_line(fd[i], &line);
**				// soit afficher le contenu de line
**				printf("[fd%i-%i] %s\n", fd[i], ret, line);
**				// soit afficher en direct les fd ouverts simultanements
**				//ft_putstr("[fd");ft_putnbr(fd[i]);ft_putchar('-');ft_putnbr(ret);ft_putstr("]\n");
**				free(line);
**				j = 0;
**			}
**			else
**			{
**				// soit afficher le contenu de line
**				printf("[fd%i-%i]*FINI*\n", fd[i], ret);
**				// soit afficher en direct les fd ouverts simultanements
**				//ft_putstr("[fd");ft_putnbr(fd[i]);ft_putchar('-');ft_putnbr(ret);ft_putstr("]*FINI*\n");
**				j++;
**			}
**			i++;
**			if (i >= ac - 1)
**				i = 0;
**		}
**		free(fd);
**		while (1);
**		return (0);
**	}
*/

int		free_lst(t_gnlist **lst, int ret)
{
	t_gnlist	*tmp;

	tmp = *lst;
//	//////////////////////////////////////////////////////////////////////////////////////
//	int			debug;																	//
//	t_gnlist	*tmp2;																	//
//	if (tmp->next != tmp)																//
//		tmp2 = tmp->next;																//
//	else																				//
//		tmp2 = NULL;																	//
//	debug = tmp->lfd;																	//
//	//////////////////////////////////////////////////////////////////////////////////////
	while ((*lst)->next != tmp)
		(*lst) = (*lst)->next;
	(*lst)->next = (*lst)->next->next;
	free(tmp->str);
	free(tmp);
	tmp = NULL;
	*lst = tmp;

//	//////////////////////////////////////////////////////////////////////////////////////
//	if (tmp2)																			//
//	{																					//
//		tmp = tmp2;																		//
//		ft_putstr("\nDEL ");debug>9 ? ft_putstr("  "):ft_putstr(" ");ft_putchar('-');	//
//		while (tmp != *lst)																//
//		{																				//
//			ft_putnbr(tmp->lfd); ft_putchar('-'); tmp = tmp->next;						//
//		}																				//
//		ft_putnbr(tmp->lfd); ft_putchar('-'); tmp = tmp->next;							//
//		ft_putchar('('); ft_putnbr(tmp->lfd); ft_putstr(")\n");							//
//	}																					//
//	else																				//
//		ft_putstr("DEL\n");																//
//	//////////////////////////////////////////////////////////////////////////////////////

	return (ret);
}

int		multi_fd(int fd, t_gnlist **lst)
{
	t_gnlist	*tmp;

	tmp = *lst;
	while (*lst && (*lst)->lfd != fd && (*lst)->next != tmp)
		*lst = (*lst)->next;
//	//////////////////////////////////////////////////////////////////////////////////////
//	ft_putnbr(fd); ft_putstr("-");														//
//	int	j = 1;																			//
//	while (j)																			//
//	{																					//
//		if (*lst)																		//
//		{																				//
//			if ((*lst)->lfd != fd)														//
//			{																			//
//				if ((*lst)->next != tmp)												//
//				{																		//
//					*lst = (*lst)->next;												//
//				}																		//
//				else																	//
//					j = 0;																//
//			}																			//
//			else																		//
//				j = 0;																	//
//		}																				//
//		else																			//
//			j = 0;																		//
//	}																					//
//	//////////////////////////////////////////////////////////////////////////////////////
	if (!tmp || ((*lst)->next == tmp && (*lst)->lfd != fd))
	{
		if (!(tmp = (t_gnlist*)malloc(sizeof(*tmp))))
			return (0);
		tmp->lfd = fd;
		if (!(tmp->str = ft_strdup("")))
			return (0);
		if (*lst)
		{
			tmp->next = (*lst)->next;
			(*lst)->next = tmp;
		}
		else
			tmp->next = tmp;
		*lst = tmp;
	}

//	//////////////////////////////////////////////////////////////////////////////////////
//	tmp = *lst;																			//
//	ft_putstr("LST ");ft_putnbr(tmp->lfd); ft_putchar('-'); tmp = tmp->next;			//
//	while (tmp != *lst)																	//
//	{																					//
//		ft_putnbr(tmp->lfd); ft_putchar('-'); tmp = tmp->next;							//
//	}																					//
//	ft_putchar('('); ft_putnbr(tmp->lfd); ft_putstr(")\n");								//
//	//////////////////////////////////////////////////////////////////////////////////////

	return (1);
}

int		get_next_line(const int fd, char **line)
{
	char				buf[BUFFER_SIZE + 1];
	int					ret;
	static t_gnlist		*lst = NULL;
	char				*str;

	ret = 1;
	if (!(multi_fd(fd, &lst)) || !line || BUFFER_SIZE < 1)
		return (free_lst(&lst, -1));
	while (!(str = ft_strchr(lst->str, '\n')) && ret != 0)
	{
		if ((ret = read(fd, buf, BUFFER_SIZE)) < 0)
			return (free_lst(&lst, -1));
		buf[ret] = '\0';
		if (!(lst->str = ft_strjoinfree(lst->str, buf)))
			return (free_lst(&lst, -1));
	}
	if (str != NULL)
		str[0] = '\0';
	if (!(*line = ft_strdup(lst->str)))
		return (free_lst(&lst, -1));
	if (str != NULL)
		return(ft_memmove(lst->str, str + 1, ft_strlen(str + 1) + 1) != NULL);
	return (free_lst(&lst, 0));
}