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
|
#include <stdio.h>
#include <getopt.h>
#include "cibic.tab.h"
#include "ast.h"
extern int yyparse();
extern FILE *yyin;
int yywrap() {
return 1;
}
int yyerror(char *s) {
}
void print_ast() {
yyparse();
if (ast_root)
cnode_debug_print(ast_root, 1);
else
fprintf(stderr, "Syntax Error\n");
}
void print_help() {
}
static struct option lopts[] = {
{ "ast", no_argument, 0, 'a'},
{ "help", no_argument, 0, 'h'},
{0, 0, 0, 0}
};
enum {
PRINT_AST,
PRINT_HELP
} mode = PRINT_HELP;
int main(int argc, char **argv) {
int option_index = 0, i;
while (1)
{
int c = getopt_long(argc, argv, "ah", lopts, &option_index);
if (c == -1)
break;
switch (c)
{
case 0: break;
case 'a': mode = PRINT_AST; break;
case 'h': mode = PRINT_HELP; break;
}
}
if (optind == argc - 1)
{
yyin = fopen(argv[argc - 1], "r");
if (!yyin)
{
fprintf(stderr, "Error while opening file.");
return 1;
}
}
else if (optind == argc)
yyin = stdin;
else
{
fprintf(stderr, "Only one source file is exepected.\n");
return 1;
}
switch (mode)
{
case PRINT_AST: print_ast(); break;
case PRINT_HELP: print_help(); break;
}
return 0;
}
|