101 lines
2.9 KiB
C
101 lines
2.9 KiB
C
/* ************************************************************************** */
|
|
/* */
|
|
/* ::: :::::::: */
|
|
/* expand_bquotes.c :+: :+: :+: */
|
|
/* +:+ +:+ +:+ */
|
|
/* By: jhalford <jack@crans.org> +#+ +:+ +#+ */
|
|
/* +#+#+#+#+#+ +#+ */
|
|
/* Created: 2017/01/11 16:46:27 by jhalford #+# #+# */
|
|
/* Updated: 2017/02/17 16:34:34 by jhalford ### ########.fr */
|
|
/* */
|
|
/* ************************************************************************** */
|
|
|
|
#include "lexer.h"
|
|
|
|
int bquotes_insert_words(t_list *cur_word, char *word, char *after_bq, char *ifs)
|
|
{
|
|
t_list *new_word;
|
|
t_list *after_word;
|
|
t_token *token;
|
|
|
|
after_word = cur_word->next;
|
|
if (ifs)
|
|
word = ft_strtok(word, ifs);
|
|
token = cur_word->content;
|
|
token_append_str(token, word, 0, 0);
|
|
if (ifs)
|
|
while ((word = ft_strtok(NULL, ifs)))
|
|
{
|
|
token = token_init();
|
|
token->type = TK_WORD;
|
|
token_append_str(token, word, 0, 0);
|
|
new_word = ft_lstnew(token, sizeof(*token));
|
|
cur_word->next = new_word;
|
|
new_word->next = after_word;
|
|
cur_word = new_word;
|
|
}
|
|
token = cur_word->content;
|
|
ft_strappend(&token->data, after_bq);
|
|
return (0);
|
|
}
|
|
|
|
int bquotes_substitute(t_list *cur_word, char *bq_start, char *bq_end)
|
|
{
|
|
char *output;
|
|
char *last_char;
|
|
char *after_bq;
|
|
char *ifs;
|
|
t_token *token;
|
|
|
|
*bq_start = 0;
|
|
*bq_end = 0;
|
|
if ((output = command_getoutput(bq_start + 1)))
|
|
{
|
|
last_char = output + ft_strlen(output) - 1;
|
|
while (*last_char == '\n')
|
|
*last_char++ = 0;
|
|
}
|
|
DG("output = [%s]", output);
|
|
after_bq = ft_strdup(bq_end + 1);
|
|
token = cur_word->content;
|
|
ifs = is_char_esc(token->esc, token->data, bq_start) ?
|
|
NULL : ft_getenv(data_singleton()->env, "IFS");
|
|
bquotes_insert_words(cur_word, output ? output : "", after_bq, ifs);
|
|
ft_strdel(&output);
|
|
ft_strdel(&after_bq);
|
|
return (0);
|
|
}
|
|
|
|
int bquotes_expand(t_list **alst)
|
|
{
|
|
t_list *cur_word;
|
|
char *bq_start;
|
|
char *bq_end;
|
|
t_flag tk_word;
|
|
t_token *token;
|
|
|
|
tk_word = TK_WORD;
|
|
cur_word = *alst;
|
|
while ((cur_word = ft_lst_find(cur_word, &tk_word, token_cmp_type)))
|
|
{
|
|
token = cur_word->content;
|
|
if (!(bq_start = ft_strchr(token->data, '`'))
|
|
|| is_char_esc(token->esc2, token->data, bq_start))
|
|
{
|
|
cur_word = cur_word->next;
|
|
return (0);
|
|
}
|
|
if (!(bq_end = ft_strchr(bq_start + 1, '`')))
|
|
{
|
|
ft_dprintf(2, "{red}%s: parse error near '`'{eoc}\n", SHELL_NAME);
|
|
return (-1);
|
|
}
|
|
if (bquotes_substitute(cur_word, bq_start, bq_end))
|
|
return (-1);
|
|
if (!(*token->data))
|
|
ft_lst_delif(alst, cur_word->content, ft_addrcmp, token_free);
|
|
cur_word = *alst;
|
|
}
|
|
return (0);
|
|
}
|
|
|