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
|
/* ************************************************************************** */
/* */
/* ::: :::::::: */
/* b_export.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 "b_env.h"
#include "b_export_next.h"
#include "d_enum.h"
#include "f_fail.h"
#include "s_destroy.h"
#include "s_line.h"
#include "s_lvars.h"
#include "s_struct.h"
#include "u_utils.h"
#include "u_vars.h"
t_bool check_valid_identifier(const char arg[])
{
char *ptr;
ptr = (char*)arg;
if (ft_isalpha(ptr[0]) == TRUE || ptr[0] == '_')
{
return (TRUE);
}
return (FALSE);
}
t_bool check_equals(const char *arg)
{
char *ptr;
ptr = (char*)arg;
while (*ptr != '\0')
{
if (*ptr == '=')
{
return (TRUE);
}
ptr++;
}
return (FALSE);
}
void b_add_to_env_from_globals(const char varname[],
const char var[],
t_msh *msh)
{
size_t i;
char **nenvp;
i = 0;
while (msh->envp[i] != NULL)
i++;
if ((nenvp = (char**)malloc((i + 2) * sizeof(char*))) == NULL)
f_alloc_and_destroy_msh(msh);
i = 0;
while (msh->envp[i] != NULL)
{
if ((nenvp[i] = ft_strdup(msh->envp[i])) == NULL)
f_alloc_and_destroy_msh(msh);
i++;
}
if ((nenvp[i] = ft_strdup(var)) == NULL)
f_alloc_and_destroy_msh(msh);
nenvp[i + 1] = 0;
ft_delwords(msh->envp);
lvars_delone(&msh->vars, varname);
msh->envp = nenvp;
}
static void b_classic_export(char *ptr[], t_msh *msh)
{
char varval[4096];
char fmt[4096];
if (check_equals(*ptr) == FALSE)
{
ft_sprintf(fmt, "$%s", *ptr);
u_get_custom_var(varval, fmt, 4096, msh);
if (varval[0] != C_NUL)
{
ft_sprintf(fmt, "%s=%s", *ptr, varval);
b_add_to_env_from_globals(*ptr, fmt, msh);
}
}
else
{
b_export_with_equals(*ptr, msh);
}
}
unsigned char b_export(char *args[], t_msh *msh)
{
char **ptr;
unsigned char r;
if (args[0] == NULL)
return (b_env(NULL, msh));
r = 0;
ptr = args;
while (*ptr != NULL)
{
if (check_valid_identifier(*ptr) == FALSE)
{
f_fail_identifier("export", *ptr);
r = 1;
ptr++;
continue ;
}
b_classic_export(ptr, msh);
ptr++;
}
return (r);
}
|
