/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   m_prompt_seq.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 <stddef.h>
#include <stdint.h>
#include <unistd.h>
#include <limits.h>

#include "s_struct.h"
#include "u_vars.h"

#define _POSIX_C_SOURCE	200112L

size_t	m_prompt_sequences_again(char var[], size_t i, t_msh *msh)
{
	char	tmp[PATH_MAX];

	if (var[i + 1] == '?')
	{
		tmp[0] = C_NUL;
		ft_uitoa_s(tmp, msh->ret);
		if (var[i + 2] == '!')
		{
			if (tmp[0] != '0')
				ft_strsubst_s(var, "\\?!", tmp);
			else
			{
				(void)ft_memmove(var + i, var + i + 3,
					(ft_strlen(var + i + 3) + 1) * sizeof(char));
				i -= 1;
			}
		}
		else
			ft_strsubst_s(var, "\\?", tmp);
	}
	return (i);
}

void	m_prompt_sequences_more(char var[], size_t i, t_msh *msh)
{
	char	tmp[PATH_MAX];
	size_t	j;

	if (var[i + 1] == 'W')
	{
		if (u_get_var_value(tmp, "$PWD", PATH_MAX, msh) == 0)
		{
			j = ft_strlen(tmp);
			if (j > 1)
			{
				while (tmp[j] != '/' && j != 0)
					j--;
				j++;
				(void)ft_memmove(tmp, tmp + j,
					((ft_strlen(tmp) - j) + 1) * sizeof(char));
			}
			ft_strsubst_s(var, "\\W", tmp);
		}
		else
			ft_strsubst_s(var, "\\w", "?");
	}
	else if (var[i + 1] == 'v')
		ft_strsubst_s(var, "\\v", M_MSH_VERSION);
	else if (var[i + 1] == 's')
		ft_strsubst_s(var, "\\s", M_PROGNAME);
}

void	m_prompt_sequences_next(char var[], size_t i, t_msh *msh)
{
	char	tmp[PATH_MAX];

	if (var[i + 1] == 'w')
	{
		if (u_get_var_value(tmp, "$PWD", PATH_MAX, msh) == 0)
			ft_strsubst_s(var, "\\w", tmp);
		else
			ft_strsubst_s(var, "\\w", "?");
	}
}

void	m_prompt_sequences(char var[], size_t i)
{
	char	tmp[PATH_MAX];

	if (var[i + 1] == '0' && var[i + 2] == '3' && var[i + 3] == '3')
	{
		(void)ft_memmove(var + i, var + (i + 3),
			(ft_strlen(var + (i + 3)) + 1) * sizeof(char));
		var[i] = C_ESC;
	}
	else if (var[i + 1] == 'n')
	{
		(void)ft_memmove(var + i, var + (i + 1),
			(ft_strlen(var + (i + 1)) + 1) * sizeof(char));
		var[i] = C_LF;
	}
	else if (var[i + 1] == 'h' || var[i + 1] == 'H')
	{
		tmp[0] = C_NUL;
		gethostname(tmp, 255);
		if (tmp[0] != C_NUL)
		{
			(void)ft_memmove(var + i + ft_strlen(tmp), var + (i + 2),
				(ft_strlen(var + (i + 2)) + 1) * sizeof(char));
			(void)ft_memcpy(var + i, tmp, ft_strlen(tmp) * sizeof(char));
		}
	}
}