1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
|
/* ************************************************************************** */
/* */
/* ::: :::::::: */
/* p_line_next.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 <stdlib.h>
#include <stdint.h>
#include "d_enum.h"
#include "s_destroy.h"
#include "f_fail.h"
#include "s_struct.h"
#include "u_vars.h"
#include "u_vars_next.h"
static int8_t
subst_those_vars(int64_t i,
char **p_words,
t_msh *msh)
{
size_t varlen;
char *s_varname;
char *varval;
varval = NULL;
s_varname = NULL;
varlen = i + 1;
while ((*p_words)[varlen] != '\0' &&
ft_ischarset("$=/#@%^*+{}[],.-", (*p_words)[varlen]) == FALSE)
varlen += 1;
if (!(s_varname = ft_substr(*p_words, (uint32_t)i, varlen - i)))
return (-1);
varval = u_get_var_value(s_varname, msh);
*p_words = ft_strsubst(*p_words, s_varname, varval);
ft_memdel((void*)&s_varname);
ft_memdel((void*)&varval);
return (0);
}
char
**p_subst_vars(char *words[],
t_msh *msh)
{
char **p_words;
int64_t i;
p_words = words;
i = 0;
while (*p_words)
{
while ((i = ft_strlchr((*p_words), '$')) != -1)
{
if (*(*p_words) + i - 1 != '\\')
{
if (subst_those_vars(i, p_words, msh) != 0)
return (NULL);
}
}
p_words += 1;
}
return (words);
}
void
p_add_to_env_fork(int64_t i,
char *words[],
t_msh *msh)
{
int64_t j;
j = 0;
while(j < i)
{
ft_strlcpy(msh->env_fork_tmp[j], words[j], ft_strlen(words[j]) + 1);
j++;
}
msh->env_fork_tmp[j][0] = '\0';
}
char
**p_subst_args(const char word[],
int8_t redir)
{
char **words;
char *subst;
size_t i;
if (redir == 0)
{
if (!(words = ft_split(word, ' ')))
return (NULL);
return (words);
}
i = 0;
while (word[i] && ft_ischarset("<>", word[i]) == FALSE)
i++;
while (redir > 0 && ft_isdigit(word[i]) == TRUE)
i--;
if (!(subst = ft_substr(word, 0, i)))
return (NULL);
if (!(words = ft_split(subst, ' ')))
{
ft_memdel((void*)&subst);
return (NULL);
}
ft_memdel((void*)&subst);
return (words);
}
char
**p_subst_home(char *words[],
t_msh *msh)
{
char *path;
char **ptr;
if ((path = u_get_var_value("$HOME", msh)) == NULL)
return (words);
ptr = words;
while (*ptr != NULL)
{
if (*ptr[0] == '~')
{
*ptr = ft_strsubst(*ptr, "~", path);
}
ptr++;
}
ft_memdel((void*)&path);
return (words);
}
|
