/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   m_prompt.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"
#include "u_vars.h"

static char
	*m_subst_prompt_rice(char var[],
						t_msh *msh)
{
	size_t	i;
	size_t	j;
	char	*tmp;

	i = 0;
	while (var[i] != '\0')
	{
		if (var[i] == '\\')
		{
			if (var[i + 1] == 'w')
			{
				tmp = u_get_var_value("$PWD", msh);
				if (tmp != NULL)
				{
					var = ft_strsubst(var, "\\w", tmp);
					ft_memdel((void*)&tmp);
				}
				else
					var = ft_strsubst(var, "\\w", "?");
			}
			else if (var[i + 1] == 'W')
			{
				tmp = u_get_var_value("$PWD", msh);
				if (tmp != NULL)
				{
					j = ft_strlen(tmp);
					if (j > 1)
					{
						while (tmp[j] != '/' && j != 0)
							j--;
						j++;
						ft_memmove(tmp, tmp + j, (ft_strlen(tmp) - j) + 1);
					}
					var = ft_strsubst(var, "\\W", tmp);
					ft_memdel((void*)&tmp);
				}
				else
					var = ft_strsubst(var, "\\w", "?");
			}
			else if (var[i + 1] == 'v')
				var = ft_strsubst(var, "\\v", FT_MSH_VERSION);
			else if (var[i + 1] == 's')
				var = ft_strsubst(var, "\\s", FT_PROGNAME);
		}
		i++;
	}
	return (var);
}

static void
	m_update_psx(uint8_t x,
				t_msh *msh)
{
	char	*var;
	char	psx[5];

	ft_sprintf(psx, "$PS%hhu", x);
	if ((var = u_get_var_value(psx, msh)) == NULL)
	{
		msh->ps[x - 1][0] = '\0';
		return ;
	}
	var = m_subst_prompt_rice(var, msh);
	ft_strlcpy(msh->ps[x - 1], var, ft_strlen(var) + 1);
	ft_memdel((void*)&var);
}

void
	m_prompt_psx(uint8_t x,
				t_msh *msh)
{
	m_update_psx(x, msh);
	ft_dprintf(STDERR_FILENO, "%s", msh->ps[x - 1]);
}