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
|
/* ************************************************************************** */
/* */
/* ::: :::::::: */
/* redir.c :+: :+: :+: */
/* +:+ +:+ +:+ */
/* By: charles <charles.cabergs@gmail.com> +#+ +:+ +#+ */
/* +#+#+#+#+#+ +#+ */
/* Created: 2020/06/15 11:05:34 by charles #+# #+# */
/* Updated: 2020/08/27 09:28:55 by charles ### ########.fr */
/* */
/* ************************************************************************** */
#include "eval.h"
static enum e_tok st_lst_tag(t_ftlst *lst)
{
return (((t_token*)lst->data)->tag);
}
static bool st_open_replace(int *fd, char *filename, int oflag)
{
if (*fd != MS_NO_FD)
close(*fd);
if (oflag & O_CREAT)
*fd = open(filename, oflag, 0644);
else
*fd = open(filename, oflag);
if (*fd == -1)
{
errorf("%s: %s\n", filename, strerror(errno));
free(filename);
return (false);
}
return (true);
}
bool redir_extract(
t_ftlst *redirs,
t_env env,
int fds[2])
{
t_ftlst *after;
t_ftlst *curr;
char *filename;
if (redirs == NULL)
return (true);
if (!(st_lst_tag(redirs) & TAG_IS_REDIR) || redirs->next == NULL
|| !(st_lst_tag(redirs->next) & TAG_IS_STR))
return (false);
curr = redirs->next;
after = NULL;
while (curr != NULL && st_lst_tag(curr) & TAG_IS_STR)
{
if (curr->next == NULL || st_lst_tag(curr->next) & TAG_IS_REDIR)
{
after = curr->next;
curr->next = NULL;
}
curr = curr->next;
}
if ((filename = preprocess_filename(&redirs->next, env)) == NULL)
{
token_destroy_lst2(redirs, after);
return (false);
}
if ((st_lst_tag(redirs) == TAG_REDIR_IN
&& !st_open_replace(&fds[FDS_READ], filename, O_RDONLY))
|| (st_lst_tag(redirs) == TAG_REDIR_OUT
&& !st_open_replace(&fds[FDS_WRITE], filename, O_WRONLY | O_CREAT | O_TRUNC))
|| (st_lst_tag(redirs) == TAG_REDIR_APPEND
&& !st_open_replace(&fds[FDS_WRITE], filename, O_WRONLY | O_CREAT | O_APPEND)))
{
token_destroy_lst2(redirs, after);
return (false);
}
token_destroy_lst(redirs);
free(filename);
return (redir_extract(after, env, fds));
}
|