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
|
/* ************************************************************************** */
/* */
/* ::: :::::::: */
/* ft_u_vars.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 "ft_f_fail.h"
#include "ft_s_destroy.h"
#include "ft_s_lcom.h"
#include "ft_s_struct.h"
static char
*ft_set_rva(const char varname[],
t_msh *msh)
{
char *rvarname;
if (!(rvarname = (char*)malloc((ft_strlen(varname) + 1) * sizeof(char))))
{
ft_lcom_clear(&msh->curr);
ft_s_destroy(msh);
ft_fail_alloc(msh);
}
ft_memcpy((char*)rvarname, (const char*)varname + 1,
ft_strlen(varname + 1));
ft_strlcpy(rvarname + ft_strlen(varname + 1), "=", 2);
return (rvarname);
}
static char
*ft_dup_val(char *p_env,
char *rvarname,
t_msh *msh)
{
char *varval;
if (!(varval = ft_strdup(p_env)))
{
ft_memdel((void*)&rvarname);
ft_lcom_clear(&msh->curr);
ft_s_destroy(msh);
ft_fail_alloc(msh);
}
ft_memdel((void*)&rvarname);
return (varval);
}
static char
*ft_get_frm_env(char rvarname[],
t_msh *msh)
{
char **p_env;
char *varval;
p_env = msh->envp;
while (*p_env)
{
if (!ft_strncmp(rvarname, *p_env, ft_strlen(rvarname)))
{
while (**p_env != '\0' && **p_env != '=')
*p_env += 1;
if (**p_env == '=')
*p_env += 1;
varval = ft_dup_val(*p_env, rvarname, msh);
return (varval);
}
p_env += 1;
}
return (NULL);
}
/*
** char *
** ft_subst_var_value(const char varname[], const t_msh *msh);
**
** DESCRIPTION
** The ft_subst_var_value() function returns
** a heap-allocated, null-terminated string
** that may later be free'd containing the
** value of the variable varname[] including
** the '$' prefix. NULL is returned if varname[]
** wasn't found.
*/
char
*ft_subst_var_value(const char varname[],
t_msh *msh)
{
/* TODO: check behaviour on empty vars -> "QWE=" */
/* TODO: add support for special variables -> "$? $0..." */
/* TODO: add support for global variables -> "$hey $nigga..." */
char *varval;
char *rvarname;
varval = NULL;
rvarname = ft_set_rva(varname, msh);
if ((varval = ft_get_special()) != NULL)
{
return (varval);
}
else
{
varval = ft_get_frm_env(rvarname, msh);
return (varval);
}
return (NULL);
}
|
