/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   m_loop_next.c                                      :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: rbousset <marvin@42.fr>                    +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2020/02/14 17:19:27 by rbousset          #+#    #+#             */
/*   Updated: 2020/02/14 17:19:29 by rbousset         ###   ########lyon.fr   */
/*                                                                            */
/* ************************************************************************** */

#include <libft.h>
#include <stdint.h>
#include <unistd.h>

#include "d_define.h"
#include "m_prompt.h"
#include "s_struct.h"

static char
	*m_counter_line_backslash(int32_t fd, uint8_t psx, char *line, t_msh *msh)
{
	char	*counter_line;

	if (fd == STDIN_FILENO)
		m_prompt_psx(psx, msh);
	get_next_line(fd, &counter_line);
	if (counter_line[0] != C_NULL)
	{
		line = ft_nrealloc(line,
			ft_strlen(line) + 1,
			ft_strlen(line) + ft_strlen(counter_line));
		ft_memcpy(line + ft_strlen(line) - 1,
			counter_line,
			ft_strlen(counter_line) + 1);
	}
	ft_memdel((void*)&counter_line);
	return (line);
}

static char
	*m_counter_line_pipes(int32_t fd, uint8_t psx, char *line, t_msh *msh)
{
	char	*counter_line;

	if (fd == STDIN_FILENO)
		m_prompt_psx(psx, msh);
	get_next_line(fd, &counter_line);
	if (counter_line[0] != C_NULL)
	{
		line = ft_nrealloc(line,
			ft_strlen(line) + 1,
			ft_strlen(line) + ft_strlen(counter_line) + 1);
		ft_memcpy(line + ft_strlen(line),
			counter_line,
			ft_strlen(counter_line) + 1);
	}
	ft_memdel((void*)&counter_line);
	return (line);
}

static char
	*m_counter_line_quotes(int32_t fd, uint8_t psx, char *line, t_msh *msh)
{
	char	*counter_line;

	if (fd == STDIN_FILENO)
		m_prompt_psx(psx, msh);
	get_next_line(fd, &counter_line);
	if (counter_line[0] != C_NULL)
	{
		line = ft_nrealloc(line,
			ft_strlen(line) + 1,
			ft_strlen(line) + ft_strlen(counter_line) + 2);
		line[ft_strlen(line) + 1] = '\0';
		line[ft_strlen(line)] = '\n';
		ft_memcpy(line + ft_strlen(line),
			counter_line,
			ft_strlen(counter_line) + 1);
	}
	ft_memdel((void*)&counter_line);
	return (line);
}

char
	*m_check_multi_backslash(int32_t fd, char line[], t_msh *msh)
{
	if (line[ft_strlen(line) - 1] == '\\')
	{
		line = m_counter_line_backslash(fd, 2, line, msh);
		line = m_check_multi_backslash(fd, line, msh);
	}
	return (line);
}

char
	*m_check_multi_pipe(int32_t fd, char line[], t_msh *msh)
{
	char	*pipe;

	if ((pipe = ft_strrchr(line, '|')) != NULL)
	{
		pipe += 1;
		while (*pipe != '\0')
		{
			if (ft_iswhitespace(*pipe) == FALSE)
			{
				return (line);
			}
			pipe++;
		}
		line = m_counter_line_pipes(fd, 2, line, msh);
		line = m_check_multi_backslash(fd, line, msh);
		line = m_check_multi_pipe(fd, line, msh);
	}
	return (line);
}

char
	*m_check_multi_and(int32_t fd, char line[], t_msh *msh)
{
	char	*and;

	if ((and = ft_strrchr(line, '&')) != NULL && *(and - 1) == '&')
	{
		and += 1;
		while (*and != '\0')
		{
			if (ft_iswhitespace(*and) == FALSE)
			{
				return (line);
			}
			and++;
		}
		line = m_counter_line_pipes(fd, 2, line, msh);
		line = m_check_multi_backslash(fd, line, msh);
		line = m_check_multi_pipe(fd, line, msh);
		line = m_check_multi_and(fd, line, msh);
	}
	return (line);
}

static void
	m_set_q_arr(size_t q[], char line[])
{
	char	*ptr;

	q[0] = 0;
	q[1] = 0;
	ptr = line;
	while (*ptr != C_NULL)
	{
		if (*ptr == C_SQUOTE)
		{
			q[0] += 1;
		}
		else if (*ptr == C_DQUOTE)
		{
			if (*(ptr - 1) != C_BACKSLASH)
				q[1] += 1;
			else if (*(ptr - 2) == C_BACKSLASH)
				q[1] += 1;
		}
		ptr++;
	}
}

char
	*m_check_multi_quotes(int32_t fd, char line[], t_msh *msh)
{
	size_t	q[2];

	m_set_q_arr(q, line);
	if (q[0] % 2 == 1 || q[1] % 2 == 1)
	{
		line = m_counter_line_quotes(fd, 2, line, msh);
		line = m_check_multi_backslash(fd, line, msh);
		line = m_check_multi_pipe(fd, line, msh);
		line = m_check_multi_and(fd, line, msh);
		line = m_check_multi_quotes(fd, line, msh);
	}
	return (line);
}