X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ast_t.h;h=dfe84facff8428c2a44643bdf012da336b61cacb;hb=8691dbaacbd6149a95aeaae14c081dcb0c04153f;hp=af807be5fd5f70c8cc8485e70b0278ff0ca757ed;hpb=b3b5cda5150d090e2286748b06d4fef3f29a5371;p=cparser diff --git a/ast_t.h b/ast_t.h index af807be..dfe84fa 100644 --- a/ast_t.h +++ b/ast_t.h @@ -1,6 +1,6 @@ /* * This file is part of cparser. - * Copyright (C) 2007-2008 Matthias Braun + * Copyright (C) 2007-2009 Matthias Braun * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License @@ -62,13 +62,18 @@ typedef enum precedence_t { * Expression kinds. */ typedef enum expression_kind_t { - EXPR_UNKNOWN = 0, - EXPR_INVALID, + EXPR_ERROR = 1, EXPR_REFERENCE, - EXPR_REFERENCE_ENUM_VALUE, - EXPR_CONST, - EXPR_CHARACTER_CONSTANT, - EXPR_WIDE_CHARACTER_CONSTANT, + EXPR_ENUM_CONSTANT, + EXPR_LITERAL_BOOLEAN, + EXPR_LITERAL_INTEGER, + EXPR_LITERAL_INTEGER_OCTAL, + EXPR_LITERAL_INTEGER_HEXADECIMAL, + EXPR_LITERAL_FLOATINGPOINT, + EXPR_LITERAL_FLOATINGPOINT_HEXADECIMAL, + EXPR_LITERAL_CHARACTER, + EXPR_LITERAL_WIDE_CHARACTER, + EXPR_LITERAL_MS_NOOP, /**< MS __noop extension */ EXPR_STRING_LITERAL, EXPR_WIDE_STRING_LITERAL, EXPR_COMPOUND_LITERAL, @@ -102,7 +107,6 @@ typedef enum expression_kind_t { EXPR_UNARY_PREFIX_INCREMENT, EXPR_UNARY_PREFIX_DECREMENT, EXPR_UNARY_CAST, - EXPR_UNARY_CAST_IMPLICIT, /**< compiler generated cast */ EXPR_UNARY_ASSUME, /**< MS __assume() */ EXPR_UNARY_DELETE, EXPR_UNARY_DELETE_ARRAY, @@ -158,73 +162,83 @@ typedef enum funcname_kind_t { } funcname_kind_t; /* convenience macros */ -#define EXPR_BINARY_CASES \ - case EXPR_BINARY_ADD: \ - case EXPR_BINARY_SUB: \ - case EXPR_BINARY_MUL: \ - case EXPR_BINARY_DIV: \ - case EXPR_BINARY_MOD: \ - case EXPR_BINARY_EQUAL: \ - case EXPR_BINARY_NOTEQUAL: \ - case EXPR_BINARY_LESS: \ - case EXPR_BINARY_LESSEQUAL: \ - case EXPR_BINARY_GREATER: \ - case EXPR_BINARY_GREATEREQUAL: \ - case EXPR_BINARY_BITWISE_AND: \ - case EXPR_BINARY_BITWISE_OR: \ - case EXPR_BINARY_BITWISE_XOR: \ - case EXPR_BINARY_LOGICAL_AND: \ - case EXPR_BINARY_LOGICAL_OR: \ - case EXPR_BINARY_SHIFTLEFT: \ - case EXPR_BINARY_SHIFTRIGHT: \ - case EXPR_BINARY_ASSIGN: \ - case EXPR_BINARY_MUL_ASSIGN: \ - case EXPR_BINARY_DIV_ASSIGN: \ - case EXPR_BINARY_MOD_ASSIGN: \ - case EXPR_BINARY_ADD_ASSIGN: \ - case EXPR_BINARY_SUB_ASSIGN: \ - case EXPR_BINARY_SHIFTLEFT_ASSIGN: \ - case EXPR_BINARY_SHIFTRIGHT_ASSIGN: \ - case EXPR_BINARY_BITWISE_AND_ASSIGN: \ - case EXPR_BINARY_BITWISE_XOR_ASSIGN: \ - case EXPR_BINARY_BITWISE_OR_ASSIGN: \ - case EXPR_BINARY_COMMA: \ - case EXPR_BINARY_ISGREATER: \ - case EXPR_BINARY_ISGREATEREQUAL: \ - case EXPR_BINARY_ISLESS: \ - case EXPR_BINARY_ISLESSEQUAL: \ - case EXPR_BINARY_ISLESSGREATER: \ - case EXPR_BINARY_ISUNORDERED: +#define EXPR_BINARY_CASES \ + EXPR_BINARY_ADD: \ + case EXPR_BINARY_SUB: \ + case EXPR_BINARY_MUL: \ + case EXPR_BINARY_DIV: \ + case EXPR_BINARY_MOD: \ + case EXPR_BINARY_EQUAL: \ + case EXPR_BINARY_NOTEQUAL: \ + case EXPR_BINARY_LESS: \ + case EXPR_BINARY_LESSEQUAL: \ + case EXPR_BINARY_GREATER: \ + case EXPR_BINARY_GREATEREQUAL: \ + case EXPR_BINARY_BITWISE_AND: \ + case EXPR_BINARY_BITWISE_OR: \ + case EXPR_BINARY_BITWISE_XOR: \ + case EXPR_BINARY_LOGICAL_AND: \ + case EXPR_BINARY_LOGICAL_OR: \ + case EXPR_BINARY_SHIFTLEFT: \ + case EXPR_BINARY_SHIFTRIGHT: \ + case EXPR_BINARY_ASSIGN: \ + case EXPR_BINARY_MUL_ASSIGN: \ + case EXPR_BINARY_DIV_ASSIGN: \ + case EXPR_BINARY_MOD_ASSIGN: \ + case EXPR_BINARY_ADD_ASSIGN: \ + case EXPR_BINARY_SUB_ASSIGN: \ + case EXPR_BINARY_SHIFTLEFT_ASSIGN: \ + case EXPR_BINARY_SHIFTRIGHT_ASSIGN: \ + case EXPR_BINARY_BITWISE_AND_ASSIGN: \ + case EXPR_BINARY_BITWISE_XOR_ASSIGN: \ + case EXPR_BINARY_BITWISE_OR_ASSIGN: \ + case EXPR_BINARY_COMMA: \ + case EXPR_BINARY_ISGREATER: \ + case EXPR_BINARY_ISGREATEREQUAL: \ + case EXPR_BINARY_ISLESS: \ + case EXPR_BINARY_ISLESSEQUAL: \ + case EXPR_BINARY_ISLESSGREATER: \ + case EXPR_BINARY_ISUNORDERED /** * unary expression with mandatory operand */ -#define EXPR_UNARY_CASES_MANDATORY \ - case EXPR_UNARY_NEGATE: \ - case EXPR_UNARY_PLUS: \ - case EXPR_UNARY_BITWISE_NEGATE: \ - case EXPR_UNARY_NOT: \ - case EXPR_UNARY_DEREFERENCE: \ - case EXPR_UNARY_TAKE_ADDRESS: \ - case EXPR_UNARY_POSTFIX_INCREMENT: \ - case EXPR_UNARY_POSTFIX_DECREMENT: \ - case EXPR_UNARY_PREFIX_INCREMENT: \ - case EXPR_UNARY_PREFIX_DECREMENT: \ - case EXPR_UNARY_CAST: \ - case EXPR_UNARY_CAST_IMPLICIT: \ - case EXPR_UNARY_ASSUME: \ - case EXPR_UNARY_DELETE: \ - case EXPR_UNARY_DELETE_ARRAY: +#define EXPR_UNARY_CASES_MANDATORY \ + EXPR_UNARY_NEGATE: \ + case EXPR_UNARY_PLUS: \ + case EXPR_UNARY_BITWISE_NEGATE: \ + case EXPR_UNARY_NOT: \ + case EXPR_UNARY_DEREFERENCE: \ + case EXPR_UNARY_TAKE_ADDRESS: \ + case EXPR_UNARY_POSTFIX_INCREMENT: \ + case EXPR_UNARY_POSTFIX_DECREMENT: \ + case EXPR_UNARY_PREFIX_INCREMENT: \ + case EXPR_UNARY_PREFIX_DECREMENT: \ + case EXPR_UNARY_CAST: \ + case EXPR_UNARY_ASSUME: \ + case EXPR_UNARY_DELETE: \ + case EXPR_UNARY_DELETE_ARRAY /** * unary expression with optional operand */ #define EXPR_UNARY_CASES_OPTIONAL \ - case EXPR_UNARY_THROW: \ - -#define EXPR_UNARY_CASES \ - EXPR_UNARY_CASES_MANDATORY \ - EXPR_UNARY_CASES_OPTIONAL + EXPR_UNARY_THROW + +#define EXPR_UNARY_CASES \ + EXPR_UNARY_CASES_MANDATORY: \ + case EXPR_UNARY_CASES_OPTIONAL + +#define EXPR_LITERAL_CASES \ + EXPR_LITERAL_BOOLEAN: \ + case EXPR_LITERAL_INTEGER: \ + case EXPR_LITERAL_INTEGER_OCTAL: \ + case EXPR_LITERAL_INTEGER_HEXADECIMAL: \ + case EXPR_LITERAL_FLOATINGPOINT: \ + case EXPR_LITERAL_FLOATINGPOINT_HEXADECIMAL: \ + case EXPR_LITERAL_CHARACTER: \ + case EXPR_LITERAL_WIDE_CHARACTER: \ + case EXPR_LITERAL_MS_NOOP /** * The base class of every expression. @@ -233,25 +247,27 @@ struct expression_base_t { expression_kind_t kind; /**< The expression kind. */ type_t *type; /**< The type of the expression. */ source_position_t source_position; /**< The source position of this expression. */ - bool parenthesized; + bool parenthesized : 1; #ifndef NDEBUG - bool transformed; /**< Set if this expression was transformed. */ + bool transformed : 1; /**< Set if this expression was transformed. */ #endif + bool implicit : 1; /**< compiler generated expression. + Examples: + select into anonymous structs + implicit casts + */ }; /** - * A constant. + * integer/float constants, character and string literals */ -struct const_expression_t { +struct literal_expression_t { expression_base_t base; - union { - long long int_value; - long double float_value; - string_t character; - wide_string_t wide_character; - } v; - bool is_ms_noop; /**< True, if this constant is the result - of an microsoft __noop operator */ + string_t value; + string_t suffix; + + /* ast2firm data */ + ir_tarval *target_value; }; struct string_literal_expression_t { @@ -265,11 +281,6 @@ struct funcname_expression_t { string_t value; /**< the value once assigned. */ }; -struct wide_string_literal_expression_t { - expression_base_t base; - wide_string_t value; -}; - struct compound_literal_expression_t { expression_base_t base; type_t *type; @@ -393,10 +404,9 @@ struct label_address_expression_t { union expression_t { expression_kind_t kind; expression_base_t base; - const_expression_t conste; + literal_expression_t literal; + string_literal_expression_t string_literal; funcname_expression_t funcname; - string_literal_expression_t string; - wide_string_literal_expression_t wide_string; compound_literal_expression_t compound_literal; builtin_constant_expression_t builtin_constant; builtin_types_compatible_expression_t builtin_types_compatible; @@ -447,7 +457,7 @@ struct initializer_string_t { struct initializer_wide_string_t { initializer_base_t base; - wide_string_t string; + string_t string; }; struct initializer_designator_t { @@ -465,84 +475,11 @@ union initializer_t { initializer_designator_t designator; }; -/** - * GNU attributes. - */ -typedef enum gnu_attribute_kind_t { - GNU_AK_CONST, - GNU_AK_VOLATILE, - GNU_AK_CDECL, - GNU_AK_STDCALL, - GNU_AK_FASTCALL, - GNU_AK_DEPRECATED, - GNU_AK_NOINLINE, - GNU_AK_RETURNS_TWICE, - GNU_AK_NORETURN, - GNU_AK_NAKED, - GNU_AK_PURE, - GNU_AK_ALWAYS_INLINE, - GNU_AK_MALLOC, - GNU_AK_WEAK, - GNU_AK_CONSTRUCTOR, - GNU_AK_DESTRUCTOR, - GNU_AK_NOTHROW, - GNU_AK_TRANSPARENT_UNION, - GNU_AK_COMMON, - GNU_AK_NOCOMMON, - GNU_AK_PACKED, - GNU_AK_SHARED, - GNU_AK_NOTSHARED, - GNU_AK_USED, - GNU_AK_UNUSED, - GNU_AK_NO_INSTRUMENT_FUNCTION, - GNU_AK_WARN_UNUSED_RESULT, - GNU_AK_LONGCALL, - GNU_AK_SHORTCALL, - GNU_AK_LONG_CALL, - GNU_AK_SHORT_CALL, - GNU_AK_FUNCTION_VECTOR, - GNU_AK_INTERRUPT, - GNU_AK_INTERRUPT_HANDLER, - GNU_AK_NMI_HANDLER, - GNU_AK_NESTING, - GNU_AK_NEAR, - GNU_AK_FAR, - GNU_AK_SIGNAL, - GNU_AK_EIGTHBIT_DATA, - GNU_AK_TINY_DATA, - GNU_AK_SAVEALL, - GNU_AK_FLATTEN, - GNU_AK_SSEREGPARM, - GNU_AK_EXTERNALLY_VISIBLE, - GNU_AK_RETURN_TWICE, - GNU_AK_MAY_ALIAS, - GNU_AK_MS_STRUCT, - GNU_AK_GCC_STRUCT, - GNU_AK_DLLIMPORT, - GNU_AK_DLLEXPORT, - GNU_AK_ALIGNED, - GNU_AK_ALIAS, - GNU_AK_SECTION, - GNU_AK_FORMAT, - GNU_AK_FORMAT_ARG, - GNU_AK_WEAKREF, - GNU_AK_NONNULL, - GNU_AK_TLS_MODEL, - GNU_AK_VISIBILITY, - GNU_AK_REGPARM, - GNU_AK_MODEL, - GNU_AK_MODE, - GNU_AK_TRAP_EXIT, - GNU_AK_SP_SWITCH, - GNU_AK_SENTINEL, - GNU_AK_LAST -} gnu_attribute_kind_t; - /** * The statement kinds. */ typedef enum statement_kind_t { - STATEMENT_INVALID, + STATEMENT_ERROR = 1, STATEMENT_EMPTY, STATEMENT_COMPOUND, STATEMENT_RETURN, @@ -552,6 +489,7 @@ typedef enum statement_kind_t { STATEMENT_EXPRESSION, STATEMENT_CONTINUE, STATEMENT_BREAK, + STATEMENT_COMPUTED_GOTO, STATEMENT_GOTO, STATEMENT_LABEL, STATEMENT_CASE_LABEL, @@ -577,14 +515,6 @@ struct statement_base_t { #endif }; -struct invalid_statement_t { - statement_base_t base; -}; - -struct empty_statement_t { - statement_base_t base; -}; - struct return_statement_t { statement_base_t base; expression_t *value; /**< The return value if any. */ @@ -614,18 +544,21 @@ struct switch_statement_t { statement_base_t base; expression_t *expression; statement_t *body; - case_label_statement_t *first_case, *last_case; /**< List of all cases, including default. */ - case_label_statement_t *default_label; /**< The default label if existent. */ - unsigned long default_proj_nr; /**< The Proj-number for the default Proj. */ + case_label_statement_t *first_case, *last_case; /**< List of all cases, including default. */ + case_label_statement_t *default_label; /**< The default label if existent. */ }; struct goto_statement_t { statement_base_t base; label_t *label; /**< The destination label. */ - expression_t *expression; /**< The expression for an assigned goto. */ goto_statement_t *next; /**< links all goto statements of a function */ }; +struct computed_goto_statement_t { + statement_base_t base; + expression_t *expression; /**< The expression for the computed goto. */ +}; + struct case_label_statement_t { statement_base_t base; expression_t *expression; /**< The case label expression, NULL for default label. */ @@ -636,6 +569,7 @@ struct case_label_statement_t { long last_case; /**< The folded value of end_range. */ bool is_bad; /**< If set marked as bad to suppress warnings. */ bool is_empty_range; /**< If set marked this as an empty range. */ + long pn; }; struct label_statement_t { @@ -706,23 +640,24 @@ struct leave_statement_t { }; union statement_t { - statement_kind_t kind; - statement_base_t base; - return_statement_t returns; - compound_statement_t compound; - declaration_statement_t declaration; - if_statement_t ifs; - switch_statement_t switchs; - goto_statement_t gotos; - case_label_statement_t case_label; - label_statement_t label; - expression_statement_t expression; - while_statement_t whiles; - do_while_statement_t do_while; - for_statement_t fors; - asm_statement_t asms; - ms_try_statement_t ms_try; - leave_statement_t leave; + statement_kind_t kind; + statement_base_t base; + return_statement_t returns; + compound_statement_t compound; + declaration_statement_t declaration; + if_statement_t ifs; + switch_statement_t switchs; + computed_goto_statement_t computed_goto; + goto_statement_t gotos; + case_label_statement_t case_label; + label_statement_t label; + expression_statement_t expression; + while_statement_t whiles; + do_while_statement_t do_while; + for_statement_t fors; + asm_statement_t asms; + ms_try_statement_t ms_try; + leave_statement_t leave; }; struct translation_unit_t { @@ -730,25 +665,18 @@ struct translation_unit_t { statement_t *global_asm; }; -static inline -void *_allocate_ast(size_t size) -{ - return obstack_alloc(&ast_obstack, size); -} - -static inline -bool is_invalid_expression(expression_t *expression) -{ - return expression->base.kind == EXPR_INVALID; -} - -static inline -bool is_invalid_statement(statement_t *statement) +/** + * Allocate an AST node with given size and + * initialize all fields with zero. + */ +static inline void *allocate_ast_zero(size_t size) { - return statement->base.kind == STATEMENT_INVALID; + return memset(obstack_alloc(&ast_obstack, size), 0, size); } - -#define allocate_ast(size) _allocate_ast(size) +/** If set, implicit casts are printed. */ +extern bool print_implicit_casts; +/** If set parenthesis are printed to indicate operator precedence. */ +extern bool print_parenthesis; #endif