/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   m_loop.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 <stdlib.h>
#include <fcntl.h>
#include <unistd.h>
#include <limits.h>

#include "d_define.h"
#include "e_line.h"
#include "m_loop_next.h"
#include "m_prompt.h"
#include "p_line.h"
#include "s_line.h"
#include "u_vars.h"

static void
	m_parse_and_run_line(char line[], t_msh *msh)
{
	p_line(line, msh);
	ft_memdel((void*)&line);
	e_line(msh);
	s_line_clear(&msh->curr);
}

void
	m_dump_hist(t_msh *msh)
{
	int32_t	fd;
	char	histfile[PATH_MAX];

	if (ft_strlen(msh->hist) > 0)
	{
		u_get_var_value(histfile, "$HISTFILE", PATH_MAX, msh);
		if (histfile[0] != C_NUL)
		{
			if ((fd = open(histfile,
				O_WRONLY | O_CREAT | O_APPEND, 0644)) != -1)
			{
				ft_dprintf(fd, "%s", msh->hist);
				close(fd);
			}
		}
	}
}

static void
	m_handle_hist(char line[], t_msh *msh)
{
	static uint16_t	hist_i = 0;

	if (hist_i == 0)
		msh->hist[0] = '\0';
	ft_strlcpy(msh->hist + ft_strlen(msh->hist), line, 4096);
	msh->hist[ft_strlen(msh->hist) + 1] = '\0';
	msh->hist[ft_strlen(msh->hist)] = '\n';
	hist_i += 1;
	if (hist_i == 255)
	{
		m_dump_hist(msh);
		hist_i = 0;
	}
}

uint8_t
	m_loop(int32_t fd, t_msh *msh)
{
	char			*line;
	int8_t			gnl;

	msh->fd = fd;
	gnl = 1;
	while (gnl > 0)
	{
		if (fd == STDIN_FILENO)
			m_prompt_psx(1, msh);
		gnl = get_next_line(fd, &line);
		if (line[0] != '\0')
		{
			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);
			if (fd == STDIN_FILENO)
				m_handle_hist(line, msh);
			m_parse_and_run_line(line, msh);
			/* TODO: (null): Bad address on "msh ~> echo a > asd; cat < asd" but not on "msh ~> echo a > asd; cat asd" */
		}
		else
			ft_memdel((void*)&line);
	}
	if (fd == STDIN_FILENO)
		m_dump_hist(msh);
	return (msh->ret);
}