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
|
/* ************************************************************************** */
/* */
/* ::: :::::::: */
/* m_argv.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 <sys/stat.h>
#include <libft.h>
#include <stdlib.h>
#include <fcntl.h>
#include <unistd.h>
#include "f_fail.h"
#include "d_define.h"
#include "m_comm.h"
#include "m_init.h"
#include "m_loop.h"
#include "m_mshrc.h"
#include "s_struct.h"
#include "u_vars.h"
static char *m_get_prev_hist(t_msh *msh)
{
struct stat sb;
char *hist;
char histfile[PATH_MAX];
int fd;
hist = NULL;
u_get_var_value(histfile, "$HISTFILE", PATH_MAX, msh);
if (histfile[0] == C_NUL)
return (NULL);
if ((fd = open(histfile, O_RDONLY)) == -1)
return (NULL);
if (stat(histfile, &sb) == -1)
return (NULL);
if ((hist = (char*)malloc((sb.st_size + 1) * sizeof(char))) == NULL)
return (NULL);
if (read(fd, hist, sb.st_size) == -1)
return (NULL);
hist[sb.st_size] = C_NUL;
return (hist);
}
static void m_read_script(char *const argv[], t_msh *msh)
{
int fd;
if ((fd = open(*(argv + 1), O_RDONLY)) == -1)
f_open_file(*(argv + 1), msh);
msh->fd = fd;
msh->argv = (char**)(argv + 1);
msh->argc -= 1;
msh->ret = m_loop(fd, msh);
close(fd);
}
unsigned char m_argv(int argc, char *const argv[], t_msh *msh)
{
if (argc == 1)
{
m_init_custom_vars(msh);
msh->prev_hist = m_get_prev_hist(msh);
msh->ret = m_source_mshrc(msh);
msh->fd = STDIN_FILENO;
msh->ret = m_loop(STDIN_FILENO, msh);
}
else if (argc > 1 && ft_strncmp(*(argv + 1), M_OPT_COMMAND, 3) == 0)
{
if (*(argv + 2) == NULL)
{
ft_dprintf(STDERR_FILENO, "%s: %s: option requires an argument\n",
msh->argv[0], M_OPT_COMMAND);
return (2);
}
msh->ret = m_comm(*(argv + 2), msh);
}
else
{
m_read_script(argv, msh);
}
return (msh->ret);
}
|