/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   env.c                                              :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: narnaud <narnaud@student.42.fr>            +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2022/02/16 09:41:29 by narnaud           #+#    #+#             */
/*   Updated: 2022/05/06 13:39:03 by narnaud          ###   ########.fr       */
/*                                                                            */
/* ************************************************************************** */

#include "minishell.h"

int	is_valid_identifier(char *ident)
{
	if (ft_isalpha(ident[0]) || ident[0] == '_')
	{
		while (*ident)
		{
			if (!ft_isalpha(*ident) && !ft_isdigit(*ident) && *ident != '_')
				return (0);
			ident++;
		}
		return (1);
	}
	return (0);
}
void	clean_env(t_datas *datas)
{
	int i;
	int j;

	i = 0;
	j = 0;
	while (i < 1024)
	{
		if (!datas->envp[i])
		{
			j = 1;
			while (!datas->envp[i + j] && (i + j) < 1024)
				j++;
			if (i + j == 1024)
				return ;
			datas->envp[i] = datas->envp[i + j];
			datas->envp[i + j] = NULL;
		}
		i++;
	}
}
int	ft_unset(t_datas *datas, t_command *cmd)
{
	char	**env;
	int		i;
	int		j;
	int		name_len;

	if (cmd->argc < 2)
		return (1);
	env = datas->envp;
	i = 1;
	while (i < cmd->argc && datas->envp[i - 1])
	{
		name_len = ft_strlen(cmd->argv[i]);
		j = 0;
		while (datas->envp[j])
		{
			env = ft_split(datas->envp[j], '=');
			if (!ft_strncmp(cmd->argv[i], env[0], name_len + 1))
			{
				free(datas->envp[j]);
				datas->envp[j] = NULL;
				clean_env(datas);
				continue;
			}
			ft_free_split(env);
			j++;
		}
		i++;
	}
	return (0);
}

int	ft_env(t_datas *datas, t_command *cmd)
{
	int i;
	int	fd_out;

	if (cmd->fd[1])
		fd_out = cmd->fd[1];
	else
		fd_out = 1;
	i = 0;
	while (datas->envp[i])
	{
		ft_putstr_fd(datas->envp[i], fd_out);
		ft_putchar_fd('\n', fd_out);
		i++;
	}
	return (0);
}

int	ft_export(t_datas *datas, t_command *cmd)
{
	char	**new;
	int		name_len;
	char	**env;
	int		i;

	i = 0;
	if (cmd->argc < 2)
		return  (0);
	new = ft_split(cmd->argv[1], '=');
	name_len = ft_strlen(new[0]);
	if (!is_valid_identifier(new[0]))
	{
		ft_putstr_fd("export: not an identifier: ", 2);
		ft_putstr_fd(new[0], 2);
		ft_putchar_fd('\n', 2);
		return (0);
	}
	while (datas->envp[i])
	{
		env = ft_split(datas->envp[i], '=');
		if (!ft_strncmp(new[0], env[0], name_len + 1))
		{
			datas->envp[i] = ft_strdup(cmd->argv[1]);
			return (1);
		}
		ft_free_split(env);
		i++;
	}
	datas->envp[i] = ft_strdup(cmd->argv[1]);
	return (1);
}