WIP parsing expansions

srcs/parsing/expansions/expand_token.c

@@ -0,0 +1,113 @@
+/* ************************************************************************** */
+/*                                                                            */
+/*                                                        :::      ::::::::   */
+/*   expand_token.c                                     :+:      :+:    :+:   */
+/*                                                    +:+ +:+         +:+     */
+/*   By: lperrey <lperrey@student.42.fr>            +#+  +:+       +#+        */
+/*                                                +#+#+#+#+#+   +#+           */
+/*   Created: 2021/11/07 02:01:33 by lperrey           #+#    #+#             */
+/*   Updated: 2021/11/07 04:36:12 by lperrey          ###   ########.fr       */
+/*                                                                            */
+/* ************************************************************************** */
+
+#include "minishell.h"
+
+t_list	*ft_lstnew_generic(size_t lst_sizse, size_t content_size);
+
+enum	e_in_quote_state
+{
+	NOT_IN = 0,
+	IN_QUOTES = '\'',
+	IN_DQUOTES = '\"'
+};
+
+static t_list	*ret_parameter_expansion(t_token *t, int *i);
+
+t_list	*expand_token(t_token *t)
+{
+	int		in_quotes;
+	int		i;
+	t_list	head;
+	t_list	*expand;
+
+	in_quotes = 0;
+	i = 0;
+	head.next = NULL;
+	expand = &head;
+	while (t->content[i])
+	{
+		if (t->content[i] == '$')
+		{
+			expand->next = ret_parameter_expansion(t, &i);
+			if (!expand->next)
+			{//todo wrap
+				perror("expand_token() error");
+				return (ft_lstclear(&head.next, free));
+			}
+		}
+		else
+		{
+			expand->next = ft_lstnew_generic(sizeof(t_list), ft_strlen(&t->content[i]) + 1);
+			if (!expand->next)
+			{//todo wrap
+				perror("expand_token() error");
+				return (ft_lstclear(&head.next, free));
+			}
+			while (t->content[i] && (t->content[i] != '$' && in_quotes != IN_QUOTES))
+			{
+				// quoting
+				if (t->content[i] == '\'' && in_quotes != IN_DQUOTES)
+				{
+					if (in_quotes == IN_QUOTES)
+						in_quotes = 0;
+					else
+						in_quotes = IN_QUOTES;
+				}
+				i++;
+			}
+		}
+	}
+	return (head.next);
+}
+
+// a voir si je retourne pas plutot un "char *".
+// Malloc la lst dans la fonction est peut-être un peu superflu et pas super clair.
+// et aussi changer "t_token *t" en "char *content", inutile d'avoir le token entier.
+static t_list	*ret_parameter_expansion(t_token *t, int *i)
+{
+	t_list	*expand;
+	char	*tmp;
+	int		i_tmp;
+
+	tmp = ft_calloc(ft_strlen(&t->content[*i]) + 1, 1);
+	if (!tmp)
+		return (NULL);
+	expand = ft_lstnew(NULL);
+	if (!expand)
+		return (ft_retp_free(NULL, tmp, free));
+	(*i)++; // skip '$'
+	if (t->content[*i] == '?')
+	{
+		i++;
+		expand->content = ft_itoa(g_all->last_exit_status);
+		return (ft_retp_free(expand, tmp, free));
+	}
+	else if (t->content[*i] != '_' && !ft_isalpha(t->content[*i]))
+	{
+		tmp[0] = '$';
+		expand->content = tmp;
+		return (expand);
+	}
+	i_tmp = 0;
+	while (t->content[*i] == '_' || ft_isalnum(t->content[*i]))
+		tmp[i_tmp++] = t->content[*i++];
+	expand->content = getenv(tmp);
+	free(tmp);
+	if (expand->content)
+		expand->content = ft_strdup(expand->content);
+	else
+		expand->content = ft_calloc(1, 1);
+	if (!expand->content)
+		return (ft_retp_free(NULL, expand, free));
+	return (expand);
+}