summaryrefslogtreecommitdiffstats
path: root/src/m_loop.c
blob: 2521204f0235a3f962c941f618f5ce3ce9de0e52 (plain)
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
/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   m_loop.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 <stdint.h>
#include <stdlib.h>
#include <unistd.h>

#include "e_line.h"
#include "m_prompt.h"
#include "p_line.h"
#include "s_line.h"


static char
	*strjoin_m(char *s1,
				  char *s2,
				  uint8_t mode)
{
	size_t	i;
	size_t	j;
	size_t	size1;
	size_t	size2;
	char	*dst;

	i = -1;
	j = -1;
	size1 = ft_strlen(s1);
	size2 = ft_strlen(s2) + 1;
	if (!(dst = (char*)malloc((size1 + size2 + 2) * sizeof(char))))
		return (NULL);
	while (++i < size1)
		dst[i] = s1[i];
	(mode == 0) ? dst[i++] = '\n' : 0;
	while (++j < size2)
		dst[i + j] = s2[j];
	dst[i + j] = '\0';
	(mode == 0) ? ft_memdel((void*)&s1) : ft_memdel((void*)&s2);
	return (dst);
}

void
	m_loop_cont(t_msh *msh,
				   char *line,
				   char *quote,
				   int8_t gnl)
{
	char	*prog;
	char	*buf;
	char	*fin;

	if (!(prog = ft_calloc(ft_strlen(line) + 1, sizeof(char))) ||
		!(buf = ft_strdup(line + (quote - line) + 1)))
		return ;
	ft_memcpy(prog, line, (quote - line));
	while (gnl > 0 && ((!(quote = ft_strrchr(buf, '\"'))) &&
					   (!(quote = ft_strrchr(buf, '\'')))))
	{
		m_prompt_psx(2, msh);
		gnl = get_next_line(STDIN_FILENO, &line);
		buf = strjoin_m(buf, line, 0);
		ft_memdel((void*)&line);
	}
	fin = ft_strtrim(buf, "\"'");
	ft_memdel((void*)&buf);
	fin = (ft_strrchr(fin, '\'')) ? ft_strsubst(fin, "\'", "") : fin;
	fin = strjoin_m(prog, fin, 1);
	p_line(fin, msh);
	ft_memdel((void*)&prog);
	ft_memdel((void*)&fin);
	e_line(msh);
	s_line_clear(&msh->curr);
}

uint8_t
	m_loop(int32_t fd, t_msh *msh)
{
	char	*line;
	char	*quote;
	int8_t	gnl;

	gnl = 1;
	while (gnl > 0)
	{
		if (fd == STDIN_FILENO)
			m_prompt_psx(1, msh);
		gnl = get_next_line(fd, &line);
		if (line[0] != '\0')
		{
            if (!(quote = ft_strchr(line, '\'')) && !(quote = ft_strchr(line, '\"')))
            {
                p_line(line, msh);
                ft_memdel((void*)&line);
				e_line(msh);
				s_line_clear(&msh->curr);
			}
			else
            {
                m_loop_cont(msh, line, quote, 1);
                if (line != NULL)
                    ft_memdel((void*)&line);
            }
			/* TODO: (null): Bad address on "msh ~> echo a > asd; cat < asd" but not on "msh ~> echo a > asd; cat asd" */
			/* TODO: GNL 25 leak on "msh ~> exit" | gl hf */
			/* TODO: "msh ~> some command \": re GNL into ft_nrealloc */
			/* TODO: a histfile would be nice */
		}
		else
		{
			ft_memdel((void*)&line);
		}
	}
	return (msh->ret);
}