/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   e_builtins.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 <sys/wait.h>
#include <libft.h>
#include <stdlib.h>
#include <unistd.h>

#include "b_builtins.h"
#include "b_export_next.h"
#include "b_export_mute.h"
#include "e_redirs.h"
#include "m_loop.h"
#include "s_com.h"
#include "s_destroy.h"
#include "s_line.h"
#include "s_struct.h"
#include "u_utils.h"

static void	e_export_env_fork(const t_com *ptr, t_msh *msh)
{
	char	**re_ptr;

	re_ptr = ptr->env_fork;
	while (*re_ptr != NULL)
	{
		b_export_with_equals(*re_ptr, msh);
		re_ptr++;
	}
}

static void	e_builtin_child(const t_com *ptr, unsigned char bu_id, t_msh *msh)
{
	int	ret;

	if (ptr->env_fork != NULL)
		e_export_env_fork(ptr, msh);
	e_dup_redirs(ptr, msh);
	ret = 0;
	if (bu_id == B_ID_H && msh->fd == STDIN_FILENO)
		ret = msh->bu_ptr[bu_id](ptr->argv + 1, msh);
	else
		ret = msh->bu_ptr[bu_id](ptr->argv + 1, msh);
	u_eof_fd(msh->fd);
	s_com_destroy(&msh->com);
	s_line_clear(&msh->curr);
	s_destroy(msh);
	exit(ret);
}

static void	e_builtin_parent(pid_t pid,
							const t_com *ptr,
							unsigned char bu_id,
							t_msh *msh)
{
	int	status;
	int	ret;

	while (wait(&status) != pid)
		;
	ret = WEXITSTATUS(status);
	msh->ret = ret;
	if (bu_id == B_ID_CD && ret == 0)
		msh->bu_ptr[bu_id](ptr->argv + 1, msh);
	else if (bu_id == B_ID_EXPORT)
		b_export_mute(ptr->argv + 1, msh);
	else if (bu_id == B_ID_UNSET)
		msh->bu_ptr[bu_id](ptr->argv + 1, msh);
	else if (bu_id == B_ID_ALIAS)
		b_alias_mute(ptr->argv + 1, msh);
	else if (bu_id == B_ID_EXIT)
	{
		if (msh->fd == STDIN_FILENO)
			m_dump_hist(msh->curr_hist_ptr, msh);
		s_com_destroy(&msh->com);
		s_line_clear(&msh->curr);
		s_destroy(msh);
		exit(ret);
	}
}

/*
** TODO: handle fork() failed
*/

void		e_builtin(const t_com *ptr, unsigned char bu_id, t_msh *msh)
{
	pid_t	pid;

	if ((pid = fork()) == 0)
	{
		e_builtin_child(ptr, bu_id, msh);
	}
	else if (pid < 0)
	{
	}
	else
	{
		e_builtin_parent(pid, ptr, bu_id, msh);
	}
}