/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   export.c                                           :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: marde-vr <marde-vr@42angouleme.fr>         +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2024/02/18 18:29:20 by marde-vr          #+#    #+#             */
/*   Updated: 2024/05/03 14:29:08 by tomoron          ###   ########.fr       */
/*                                                                            */
/* ************************************************************************** */

#include "minishell.h"

int	export_invalid_identifier(char *arg, char *name)
{
	ft_putstr_fd("minishell: export: `", 2);
	ft_putstr_fd(arg, 2);
	ft_putstr_fd("': not a valid identifier\n", 2);
	free(name);
	return (1);
}

t_env	*set_env(t_env *env, char *name, char *value, int flags)
{
	t_env	*tmp;

	tmp = env;
	while (tmp)
	{
		if (!ft_strcmp(name, tmp->name))
		{
			free(name);
			if (!*value && !(flags & 0b10))
			{
				free(value);
				return (env);
			}
			if ((flags & 0b1) && tmp->value)
				value = ft_strjoin_free(tmp->value, value, 2);
			if (!value)
				return (env);
			free(tmp->value);
			tmp->value = value;
			return (env);
		}
		tmp = tmp->next;
	}
	return (env_add_back(env, name, value, !(flags & 0b10)));
}

t_env	*export_set_env(t_env *env, char *name, char *value, int flags)
{
	if (!value || !name)
	{
		free(name);
		free(value);
		ft_printf_fd(2, "minishell: malloc failed");
		return (env);
	}
	return (set_env(env, name, value, flags));
}

int	export_var(t_token *cmd, t_env *env)
{
	char	*arg;
	char	*name;
	char	*value;
	int		len;
	int		flags;

	len = 0;
	arg = cmd->value;
	while (arg[len] && arg[len] != '=' && arg[len] != '+')
		len++;
	name = ft_substr(arg, 0, len);
	flags = arg[len] == '+';
	if (arg[len] == '+' && arg[len + 1] == '=')
		len++;
	if (arg[len] == '=')
	{
		flags += 0b10;
		len++;
	}
	if (!name || !check_var_name(name) || arg[len] == '+')
		return (export_invalid_identifier(arg, name));
	value = ft_strdup(arg + len);
	env = export_set_env(env, name, value, flags);
	return (0);
}

int	ft_export(t_msh *msh, t_token *cmd, t_env *env)
{
	int	error;

	error = 0;
	if (cmd && !cmd->next)
	{
		print_env_declare(msh, env);
		return (0);
	}
	cmd = cmd->next;
	while (cmd->next)
	{
		if (export_var(cmd, env))
			error = 1;
		cmd = cmd->next;
	}
	if (export_var(cmd, env))
		error = 1;
	return (error);
}