DeforaOS/C99
DeforaOS/C99
2
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Also avoiding segfaults while printing debugging information

Browse Source
This commit is contained in:
Pierre Pronchery 2008-03-14 02:40:55 +00:00
parent 451ad81a66
commit d1257d2e4e
1 changed files with 34 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

61
src/parser.c
View File

@ -32,6 +32,7 @@
/* prototypes */ /* prototypes */
static int _parse_check(C99 * c99, TokenCode code); static int _parse_check(C99 * c99, TokenCode code);
static int _parse_error(C99 * c99, char const * format, ...); static int _parse_error(C99 * c99, char const * format, ...);
static char const * _parse_get_string(C99 * c99);
static int _parse_in_set(C99 * c99, TokenSet set); static int _parse_in_set(C99 * c99, TokenSet set);
static int _parse_is_code(C99 * c99, TokenCode code); static int _parse_is_code(C99 * c99, TokenCode code);
@ -147,6 +148,15 @@ static int _parse_error(C99 * c99, char const * format, ...)
} }
/* parse_get_string */
static char const * _parse_get_string(C99 * c99)
{
if(c99->token == NULL)
return "EOF";
return token_get_string(c99->token);
}
/* parse_in_set */ /* parse_in_set */
static int _parse_in_set(C99 * c99, TokenSet set) static int _parse_in_set(C99 * c99, TokenSet set)
{ {
@ -289,7 +299,7 @@ static int _storage_class_specifier(C99 * c99)
{ {
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
return c99_scan(c99); return c99_scan(c99);
} }
@ -305,7 +315,7 @@ static int _type_specifier(C99 * c99)
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
if(_parse_in_set(c99, c99set_struct_or_union_specifier)) if(_parse_in_set(c99, c99set_struct_or_union_specifier))
ret = _struct_or_union_specifier(c99); ret = _struct_or_union_specifier(c99);
@ -351,7 +361,7 @@ static int _struct_or_union(C99 * c99)
{ {
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
return c99_scan(c99); return c99_scan(c99);
} }
@ -438,7 +448,7 @@ static int _enum_specifier(C99 * c99)
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
ret = c99_scan(c99); ret = c99_scan(c99);
if(_parse_is_code(c99, C99_CODE_IDENTIFIER)) if(_parse_is_code(c99, C99_CODE_IDENTIFIER))
@ -496,14 +506,11 @@ static int _enumeration_constant(C99 * c99)
static int _typedef_name(C99 * c99) static int _typedef_name(C99 * c99)
/* identifier */ /* identifier */
{ {
int ret;
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
ret = c99_scan(c99); return c99_scan(c99);
return ret;
} }
@ -513,7 +520,7 @@ static int _type_qualifier(C99 * c99)
{ {
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
return c99_scan(c99); return c99_scan(c99);
} }
@ -525,7 +532,7 @@ static int _function_specifier(C99 * c99)
{ {
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
return c99_scan(c99); return c99_scan(c99);
} }
@ -555,7 +562,7 @@ static int _pointer(C99 * c99)
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"*\" got \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"*\" got \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
ret = c99_scan(c99); ret = c99_scan(c99);
if(_parse_in_set(c99, c99set_type_qualifier_list)) if(_parse_in_set(c99, c99set_type_qualifier_list))
@ -641,7 +648,7 @@ static int _identifier(C99 * c99)
{ {
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
return c99_scan(c99); return c99_scan(c99);
} }
@ -787,7 +794,7 @@ static int _assignment_expr(C99 * c99)
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
/* FIXME heavily suspect conflict between unary and conditional */ /* FIXME heavily suspect conflict between unary and conditional */
while(_parse_in_set(c99, c99set_unary_expr)) while(_parse_in_set(c99, c99set_unary_expr))
@ -815,7 +822,7 @@ static int _unary_expr(C99 * c99)
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
if(_parse_in_set(c99, c99set_postfix_expr)) if(_parse_in_set(c99, c99set_postfix_expr))
return _postfix_expr(c99); return _postfix_expr(c99);
@ -920,7 +927,7 @@ static int _argument_expression_list(C99 * c99)
unsigned int cnt = 1; unsigned int cnt = 1;
fprintf(stderr, "DEBUG: %s() arg 1 \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() arg 1 \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
ret = _assignment_expr(c99); ret = _assignment_expr(c99);
while(_parse_is_code(c99, C99_CODE_COMMA)) while(_parse_is_code(c99, C99_CODE_COMMA))
@ -928,7 +935,7 @@ static int _argument_expression_list(C99 * c99)
ret |= c99_scan(c99); ret |= c99_scan(c99);
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() arg %u \"%s\"\n", __func__, ++cnt, fprintf(stderr, "DEBUG: %s() arg %u \"%s\"\n", __func__, ++cnt,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
ret |= _assignment_expr(c99); ret |= _assignment_expr(c99);
} }
@ -949,7 +956,7 @@ static int _primary_expr(C99 * c99)
/* FIXME complete */ /* FIXME complete */
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
if(c99->token == NULL) if(c99->token == NULL)
return _parse_error(c99, "Unexpected end of file"); return _parse_error(c99, "Unexpected end of file");
@ -992,7 +999,7 @@ static int _specifier_qualifier_list(C99 * c99)
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
for(;;) for(;;)
{ {
@ -1017,7 +1024,7 @@ static int _unary_operator(C99 * c99)
{ {
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() %s\n", __func__, fprintf(stderr, "DEBUG: %s() %s\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
return c99_scan(c99); return c99_scan(c99);
} }
@ -1043,7 +1050,7 @@ static int _conditional_expr(C99 * c99)
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
ret = _logical_or_expr(c99); ret = _logical_or_expr(c99);
if(_parse_is_code(c99, C99_CODE_OPERATOR_QUESTION)) if(_parse_is_code(c99, C99_CODE_OPERATOR_QUESTION))
@ -1279,7 +1286,7 @@ static int _cast_expr(C99 * c99)
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
while(_parse_is_code(c99, C99_CODE_OPERATOR_LPAREN)) while(_parse_is_code(c99, C99_CODE_OPERATOR_LPAREN))
{ {
@ -1298,7 +1305,7 @@ static int _compound_statement(C99 * c99)
{ {
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"{\" got \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"{\" got \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
c99_scan(c99); c99_scan(c99);
if(_parse_in_set(c99, c99set_block_item_list)) if(_parse_in_set(c99, c99set_block_item_list))
@ -1378,7 +1385,7 @@ static int _labeled_statement(C99 * c99)
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() %s\n", __func__, fprintf(stderr, "DEBUG: %s() %s\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
if(c99->token == NULL) if(c99->token == NULL)
return _parse_error(c99, "Unexpected end of file"); return _parse_error(c99, "Unexpected end of file");
@ -1416,7 +1423,7 @@ static int _expression_statement(C99 * c99)
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
if(_parse_in_set(c99, c99set_expression)) if(_parse_in_set(c99, c99set_expression))
ret = _expression(c99); ret = _expression(c99);
@ -1454,7 +1461,7 @@ static int _selection_statement(C99 * c99)
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
if(c99->token == NULL) if(c99->token == NULL)
return _parse_error(c99, "Unexpected end of file"); return _parse_error(c99, "Unexpected end of file");
@ -1540,7 +1547,7 @@ static int _jump_statement(C99 * c99)
#ifdef DEBUG #ifdef DEBUG
fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__, fprintf(stderr, "DEBUG: %s() \"%s\"\n", __func__,
token_get_string(c99->token)); _parse_get_string(c99));
#endif #endif
if(c99->token == NULL) if(c99->token == NULL)
return _parse_error(c99, "Unexpected end of file"); return _parse_error(c99, "Unexpected end of file");