3 /* gs/parse.h -- automatic parsing of data structures */
5 /* Authors: Arnaud Legrand, Martin Quinson */
8 GRAS_DDT_PARSE_TOKEN_EMPTY = 0,
9 GRAS_DDT_PARSE_TOKEN_LA = 512, /* { 'A' for the french "accolade" since there is a name conflict in english (braket/brace) */
10 GRAS_DDT_PARSE_TOKEN_RA, /* } */
11 GRAS_DDT_PARSE_TOKEN_LB, /* [ */
12 GRAS_DDT_PARSE_TOKEN_RB, /* ] */
13 GRAS_DDT_PARSE_TOKEN_LP, /* ( */
14 GRAS_DDT_PARSE_TOKEN_RP, /* ) */
15 GRAS_DDT_PARSE_TOKEN_WORD,
16 GRAS_DDT_PARSE_TOKEN_SPACE,
17 GRAS_DDT_PARSE_TOKEN_COMMENT,
18 GRAS_DDT_PARSE_TOKEN_ANNOTATE,
19 GRAS_DDT_PARSE_TOKEN_NEWLINE,
20 GRAS_DDT_PARSE_TOKEN_STAR,
21 GRAS_DDT_PARSE_TOKEN_SEMI_COLON,
22 GRAS_DDT_PARSE_TOKEN_COLON, /* impossible since the macro think that it's a arg separator.
23 But handle anyway for the *vicious* calling gras_ddt_parse manually */
24 GRAS_DDT_PARSE_TOKEN_ERROR
25 } gras_ddt_parse_token_t;
27 #define GRAS_DDT_PARSE_MAX_STR_CONST 4048
29 extern int gras_ddt_parse_line_pos;
30 extern int gras_ddt_parse_col_pos;
31 extern int gras_ddt_parse_char_pos;
32 extern int gras_ddt_parse_tok_num;
34 void gras_ddt_parse_dump(void);
35 int gras_ddt_parse_lex(void);
36 int gras_ddt_parse_lex_n_dump(void);
37 void gras_ddt_parse_pointer_init(const char *file);
38 void gras_ddt_parse_pointer_close(void);
39 void gras_ddt_parse_pointer_string_init(const char *string_to_parse);
40 void gras_ddt_parse_pointer_string_close(void);
42 /* prototypes of the functions offered by flex */
43 int gras_ddt_parse_get_lineno (void);
44 FILE *gras_ddt_parse_get_in (void);
45 FILE *gras_ddt_parse_get_out (void);
46 int gras_ddt_parse_get_leng (void);
47 char *gras_ddt_parse_get_text (void);
48 void gras_ddt_parse_set_lineno (int line_number );
49 void gras_ddt_parse_set_in (FILE * in_str );
50 void gras_ddt_parse_set_out (FILE * out_str );
51 int gras_ddt_parse_get_debug (void);
52 void gras_ddt_parse_set_debug (int bdebug );
53 int gras_ddt_parse_lex_destroy (void);
55 #define PARSE_ERROR_PRE do {
56 #define PARSE_ERROR_POST xbt_abort();} while (0)
58 #define PARSE_ERROR0(fmt) PARSE_ERROR_PRE \
59 ERROR3(fmt " at %d:%d of :\n%s", gras_ddt_parse_line_pos,gras_ddt_parse_col_pos,definition);\
61 #define PARSE_ERROR1(fmt,a) PARSE_ERROR_PRE \
62 ERROR4(fmt " at %d:%d of :\n%s",a, gras_ddt_parse_line_pos,gras_ddt_parse_col_pos,definition);\
64 #define PARSE_ERROR2(fmt,a,b) PARSE_ERROR_PRE \
65 ERROR5(fmt " at %d:%d of :\n%s",a,b, gras_ddt_parse_line_pos,gras_ddt_parse_col_pos,definition);\