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
|
/* ************************************************************************** */
/* */
/* ::: :::::::: */
/* debug.c :+: :+: :+: */
/* +:+ +:+ +:+ */
/* By: charles <me@cacharle.xyz> +#+ +:+ +#+ */
/* +#+#+#+#+#+ +#+ */
/* Created: 2020/09/16 15:58:35 by charles #+# #+# */
/* Updated: 2020/10/09 14:27:40 by cacharle ### ########.fr */
/* */
/* ************************************************************************** */
#include "lexer.h"
#include "parser.h"
void debug_tok_lst(t_tok_lst *tokens)
{
while (tokens != NULL)
{
// FIXME libft for safer correction
printf("[%#06x] |%s|%s\n", tokens->tag, tokens->content,
tokens->tag & TAG_STICK ? " STICK" : "");
tokens = tokens->next;
}
}
void debug_tok_lst_line(t_tok_lst *tokens)
{
while (tokens != NULL)
{
// FIXME libft for safer correction
printf("|%s| ", tokens->content);
tokens = tokens->next;
}
}
int debug_lexer(char *input)
{
int status;
t_tok_lst *out;
status = lexer(input, &out);
if (status != 0)
return (status);
debug_tok_lst(out);
return (status);
}
void print_level(int level)
{
while (level-- > 0)
printf(" ");
}
void ast_print(int level, t_ast *ast)
{
if (ast == NULL)
return ;
if (ast->tag == AST_PARENT)
{
print_level(level);
printf("parent: redir [ ");
debug_tok_lst_line(ast->redirs);
printf(" ]\n");
ast_print(level + 1, ast->parent_ast);
}
else if (ast->tag == AST_PIPELINE)
{
print_level(level);
printf("pipeline: {\n");
t_ftlst *curr = ast->pipeline;
while (curr != NULL)
{
ast_print(level + 1, (t_ast*)curr->data);
printf("\n");
curr = curr->next;
}
print_level(level);
printf(" }\n");
}
else if (ast->tag == AST_CMD)
{
print_level(level);
printf("cmd: [ ");
debug_tok_lst_line(ast->cmd_argv);
printf(" ] redirs: [");
debug_tok_lst_line(ast->redirs);
printf(" ]");
}
else if (ast->tag == AST_OP) {
printf("{\n");
print_level(level);
printf(" left:\n");
ast_print(level + 1, ast->op.left);
printf("\n");
print_level(level);
printf(" right:\n");
ast_print(level + 1, ast->op.right);
printf("\n");
print_level(level);
printf("}\n");
}
}
int debug_parser(char *input)
{
int status;
t_tok_lst *out;
status = lexer(input, &out);
if (status != 0)
{
printf("Lexer error\n");
debug_tok_lst(out);
return (status);
}
t_parsed *ret = parse(out);
if (ret == NULL || ret->syntax_error)
return (1);
ast_print(0, ret->ast);
return (status);
}
|
