Merge branch 'pda' of https://github.com/jzck/42sh into pda

"recup work last night"

42sh/sample/case/case.sh

@@ -1,4 +1,5 @@
-case $rental in
+case van in
 	( "bus" ) echo Hello world ;;
-	( "van" ) echo Comment va ? ;;
+	( "velo" ) echo Comment va  ;;
+	( "van" ) ls ;;
 esac

42sh/sample/for/for.sh

@@ -1,4 +1,8 @@
 for i in hello bonjour salut comment
 do
-	ls
+	while cat efezf
+	do
+		echo INSIDE
+	done
+	ls | cat
 done

42sh/src/exec/exec_case.c

@@ -14,19 +14,17 @@
 
 int			exec_case(t_btree **ast)
 {
-//	t_astnode	*node;
-	/* char		**av; */
-	t_exec	*exec;
+	t_astnode	*node;
+	char		*av;
+	t_exec		*exec;
 
 	(void)ast;
-	return (0);
 	exec = &data_singleton()->exec;
-	/* data_singleton()->exec.process.case_branch = 0; */
-	exec->attrs |= EXEC_CASE_BRANCH;
+	exec->attrs &= ~EXEC_CASE_BRANCH;
 
-//	node = (*ast)->item;
-	/* av = token_to_argv(node); */
-	/* data_singleton()->exec.process.case_pattern = av[0]; */
-	/* exec->case_pattern = av[0]; */
+	node = (*ast)->item;
+	av = node->data.str;
+//	av = token_to_argv(node);
+	exec->case_pattern = av;
 	return (0);
 }

42sh/src/exec/exec_case_branch.c

@@ -14,22 +14,24 @@
 
 int			exec_case_branch(t_btree **ast)
 {
-//	t_astnode	*node;
-	/* char		**av; */
+	t_astnode	*node;
+	char		*av;
 	t_exec	*exec;
 
 	(void)ast;
-	return (0);
 	exec = &data_singleton()->exec;
-	/* if (data_singleton()->exec.process.case_branch == 1) */
+
+	DG("case");
 	if (EXEC_IS_CASE_BRANCH(exec->attrs))
 		return (0);
-//	node = (*ast)->item;
-	/* av = token_to_argv(node); */
-	/* if (ft_strcmp(av[0], data_singleton()->exec.process.case_pattern) == 1) */
-	/* { */
-	/* 	data_singleton()->exec.process.case_branch = 1; */
-	/* 	ft_exec(&(*ast)->right); */
-	/* } */		
+	DG("case2");
+	node = (*ast)->item;
+	av = node->data.str;
+//	av = token_to_argv(node);
+	if (ft_strcmp(av, exec->case_pattern) == 0)
+	{ 
+		exec->attrs |= EXEC_CASE_BRANCH;
+	 	ft_exec(&(*ast)->right);
+	} 		
 	return (0);
 }

42sh/src/exec/exec_for.c

@@ -22,11 +22,12 @@ int			exec_for(t_btree **ast)
 	node = (*ast)->item;
 	temp = node->data.cmd.wordlist;
 	var = temp->content;
-	builtin_setenv("setenv", (char*[]){var, 0}, data_singleton()->local_var);
+	temp = temp->next;
+//	declare error bad identifier
 	while (temp)
-	{
-	//process expansion av = token_to_char(temp->content)
-		builtin_setenv("setenv", (char*[]){var, 0}, data_singleton()->local_var);
+	{		
+		builtin_setenv("setenv", (char*[]){var, temp->content, 0},
+		data_singleton()->local_var);
 		ft_exec(&(*ast)->right);
 		temp = temp->next;
 	}

42sh/src/exec/ft_exec.c

@@ -25,6 +25,9 @@ t_execmap	g_execmap[] =
 	{TK_ELIF, &exec_elif},
 	{TK_ELSE, &exec_else},
 	{TK_UNTIL, &exec_until},
+	{TK_FOR, &exec_for},
+	{TK_CASE, &exec_case},
+	{TK_PAREN_OPEN, &exec_case_branch},
 	/* {TK_SUBSHELL, &exec_}, */
 	{CMD, &exec_cmd},
 	{0, 0},

42sh/src/lexer/get_state_global.c

@@ -17,7 +17,6 @@ t_lexstate		get_state_global(t_lexer *lexer)
 	char	c;
 
 	c = lexer->str[lexer->pos];
-	DG("check, c=%c", lexer->str[lexer->pos]);
 	if (ft_is_delim(c))
 		return (DELIM);
 	else if (c == '&' || c == ';' || c == '|')

42sh/src/main/ft_putast.c

@@ -17,6 +17,8 @@ char	*ft_putast(void *nodein)
 	t_astnode	*node;
 	node = nodein;
 	
+	if (node->type == TK_DSEMI)
+		return ("TK_DSEMI");
 	if (node->type == WORDLIST)
 		return ("WORDLIST");
 	if (node->type == CMD)

42sh/src/main/main.c

@@ -62,7 +62,7 @@ int		handle_instruction(int fd)
 			error_syntax(&token, &parser, &ast);
 	}
 	DG("Before execution:");
-	btree_print(STDBUG, ast, &ft_putast);
+//	btree_print(STDBUG, ast, &ft_putast);
 	if (ft_exec(&ast))
 		return (1);
 	instruction_free(&token, &parser, &ast);

42sh/src/parser/add_case.c

@@ -34,6 +34,7 @@ int		iscase_pattern(t_btree **ast, t_list **lst)
 	t_astnode	*node;
 	t_token		*token;
 
+	DG(" add pattern");
 	node = NULL;
 	token = (*lst)->content;
 	if (*ast)

42sh/src/parser/add_cmd.c

@@ -39,7 +39,8 @@ int					superflous_token(t_btree **ast, t_list **lst)
 	if (*lst)
 	{
 		token = (*lst)->content;
-		if (token->type == TK_IN || token->type == TK_PAREN_OPEN)
+		if (token->type == TK_IN || token->type == TK_PAREN_CLOSE
+			|| token->type == TK_DSEMI)
 			return (1);
 	}
 	return (0);
@@ -54,7 +55,7 @@ static int			no_del_token(t_btree **ast, t_list **lst)
 	if (*ast)
 	{
 		node = (*ast)->item;
-		if (node->type != TK_DO && node->type != TK_THEN && node->type != TK_PAREN_CLOSE
+		if (node->type != TK_DO && node->type != TK_THEN
 			&& node->type != CMD && node->type != REDIR)
 			return (1);
 	}
@@ -91,6 +92,7 @@ int			add_cmd(t_btree **ast, t_list **lst)
 		node->type = CMD;
 	if (token->type == TK_WORD || token->type == TK_ASSIGNEMENT_WORD)
 	{
+		DG("add cmd default");
 		if ((my_tab = (char **)malloc(sizeof(char *) * 4)))
 		{
 			my_tab[0] = ft_strdup(token->data);

42sh/src/parser/add_condition.c

@@ -19,7 +19,6 @@ int		iscondition(t_btree **ast, t_list **lst)
 
 	node = NULL;
 //	token = (*lst)->content;
-	DG("iscondition");
 	if (*ast)
 	{
 		node = (*ast)->item;

42sh/src/parser/add_number.c

@@ -15,11 +15,20 @@
 int		isionumber(t_btree **ast, t_list **lst)
 {
 	t_token 	*token;
+	t_astnode	*node;
 
-	(void)ast;
 	token = (*lst)->content;
-	if (token->type == TK_IO_NUMBER)
-		return (1);
+	if (*ast)
+	{
+		node = (*ast)->item;
+		if (node->type == CMD && token->type == TK_IO_NUMBER)
+			return (1);
+	}
+	if (!*ast)
+	{
+		if (token->type == TK_IO_NUMBER)
+			return (1);
+	}
 	return (0);
 }
 

42sh/src/parser/add_redir.c

@@ -15,13 +15,25 @@
 int			isdir_sep(t_btree **ast, t_list **list)
 {
 	t_token		*token;
+	t_astnode	*node;
 
-	(void)ast;
 	token = (*list)->content;
-	if (token->type == TK_LESS || token->type == TK_GREAT
-		|| token->type == TK_GREATAND || token->type == TK_LESSAND
-		|| token->type == TK_DLESS || token->type == TK_DGREAT)
+	if (*ast)
+	{
+		node = (*ast)->item;
+		if ((node->type == CMD || node->type == TK_IO_NUMBER) && 
+			(token->type == TK_LESS || token->type == TK_GREAT
+			|| token->type == TK_GREATAND || token->type == TK_LESSAND
+			|| token->type == TK_DLESS || token->type == TK_DGREAT))
+			return (1);
+	}
+	if (!*ast)
+	{	
+		if (token->type == TK_LESS || token->type == TK_GREAT
+			|| token->type == TK_GREATAND || token->type == TK_LESSAND
+			|| token->type == TK_DLESS || token->type == TK_DGREAT)
 		return (1);
+	}
 	return (0);
 }
 

42sh/src/parser/aggregate_sym.c

@@ -18,6 +18,7 @@ t_aggrematch		g_aggrematch[] =
 	{TK_WORD, TK_IN, FOR_WORDLIST, TK_IN},
 	{TK_WORD, FOR_WORDLIST, FOR_WORDLIST, FOR_WORDLIST},
 	{TK_SEMI, FOR_WORDLIST, SEQUENTIAL_SEP, 0},	
+	{TK_DSEMI, CMD_SUPERIOR, PIPE_SEQUENCE, CMD_SUPERIOR},
 	{TK_DSEMI, PIPE_SEMI_SEQUENCE, PIPE_SEQUENCE, PIPE_SEMI_SEQUENCE},
 	{TK_PAREN_OPEN, TK_IN, PATTERN_CASE, 0},
 	{TK_PAREN_OPEN, CASE_LIST_NS, PATTERN_CASE, 0},	

42sh/src/parser/eval_sym.c

@@ -50,6 +50,7 @@ t_stackmatch	g_stackmatch[] =
 	{TK_DSEMI, COMPLETE_COMMANDS},
 	{TK_DSEMI, COMPOUND_LIST},
 	{TK_DSEMI, CASE_LIST_NS},
+	{TK_DSEMI, CMD_SUPERIOR},
 	{TK_DSEMI, PIPE_SEMI_SEQUENCE},
 	{TK_DSEMI, SEQUENCE},
 //	watch!
@@ -852,7 +853,7 @@ t_stackmatch	g_stackmatch[] =
 	{COMPOUND_LIST, TK_ELSE},
 	{COMPOUND_LIST, COMPOUND_LIST},
 	{COMPOUND_LIST, COMPLETE_CONDITION},
-	{CLOSE_LIST, PATTERN_CASE},
+	{CLOSE_LIST, PATTERN},
 	{CLOSE_LIST, FUNC_NAME},
 	{SUBSHELL, LINEBREAK},
 	{SUBSHELL, COMPLETE_COMMANDS},

42sh/src/parser/ft_parse.c

@@ -37,7 +37,7 @@ int			ft_parse(t_btree **ast, t_list **token, t_parser *parser)
 	while (*token)
 	{
 		produce_sym(&parser->stack, parser->new_sym, token);
-//		DG("new sym %s", read_state(*parser->new_sym));
+		DG("new sym %s", read_state(*parser->new_sym));
 		if (eval_sym(&parser->stack, *parser->new_sym))
 			return ((parser->state = ERROR));
 		else
@@ -52,7 +52,7 @@ int			ft_parse(t_btree **ast, t_list **token, t_parser *parser)
 		else
 			parser->state = UNDEFINED;
 		build_tree(ast, token);
-		btree_print(STDBUG, *ast, &ft_putast);
+//		btree_print(STDBUG, *ast, &ft_putast);
 		if ((end_instruction(&parser->stack) && !(*token)->next))
 			insert_linebreak(token);
 		else