X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ast_t.h;h=652909087298be0cba18232f51b9f575a1fff182;hb=953a820405dfd857ff9f5e24f3b630b6103dad46;hp=ef20c902984daea0c1bba0bd08a43c1365c0c49e;hpb=f3efbc82b8253fbe5334f33cb77b63ff59fa47e6;p=cparser diff --git a/ast_t.h b/ast_t.h index ef20c90..6529090 100644 --- a/ast_t.h +++ b/ast_t.h @@ -1,3 +1,22 @@ +/* + * This file is part of cparser. + * Copyright (C) 2007-2008 Matthias Braun + * + * This program is free software; you can redistribute it and/or + * modify it under the terms of the GNU General Public License + * as published by the Free Software Foundation; either version 2 + * of the License, or (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA + * 02111-1307, USA. + */ #ifndef AST_T_H #define AST_T_H @@ -10,14 +29,19 @@ #include "type.h" #include "adt/obst.h" +/** The AST obstack contains all data that must stay in the AST. */ extern struct obstack ast_obstack; -typedef enum { +/** + * Expression kinds. + */ +typedef enum expression_kind_t { EXPR_UNKNOWN = 0, EXPR_INVALID, EXPR_REFERENCE, EXPR_CONST, - EXPR_CHAR_CONST, + EXPR_CHARACTER_CONSTANT, + EXPR_WIDE_CHARACTER_CONSTANT, EXPR_STRING_LITERAL, EXPR_WIDE_STRING_LITERAL, EXPR_COMPOUND_LITERAL, @@ -29,8 +53,7 @@ typedef enum { EXPR_CLASSIFY_TYPE, EXPR_ALIGNOF, - EXPR_FUNCTION, - EXPR_PRETTY_FUNCTION, + EXPR_FUNCNAME, EXPR_BUILTIN_SYMBOL, EXPR_BUILTIN_CONSTANT_P, EXPR_BUILTIN_PREFETCH, @@ -38,6 +61,7 @@ typedef enum { EXPR_VA_START, EXPR_VA_ARG, EXPR_STATEMENT, + EXPR_LABEL_ADDRESS, /**< GCC extension &&label operator */ EXPR_UNARY_FIRST, EXPR_UNARY_NEGATE = EXPR_UNARY_FIRST, @@ -53,8 +77,7 @@ typedef enum { EXPR_UNARY_CAST, EXPR_UNARY_CAST_IMPLICIT, /**< compiler generated cast */ EXPR_UNARY_ASSUME, /**< MS __assume() */ - EXPR_UNARY_BITFIELD_EXTRACT, - EXPR_UNARY_LAST = EXPR_UNARY_BITFIELD_EXTRACT, + EXPR_UNARY_LAST = EXPR_UNARY_ASSUME, EXPR_BINARY_FIRST, EXPR_BINARY_ADD = EXPR_BINARY_FIRST, @@ -98,6 +121,13 @@ typedef enum { EXPR_BINARY_LAST = EXPR_BINARY_ISUNORDERED, } expression_kind_t; +typedef enum funcname_kind_t { + FUNCNAME_FUNCTION, /**< C99 __func__, older __FUNCTION__ */ + FUNCNAME_PRETTY_FUNCTION, /**< GNUC __PRETTY_FUNCTION__ */ + FUNCNAME_FUNCSIG, /**< MS __FUNCSIG__ */ + FUNCNAME_FUNCDNAME /**< MS __FUNCDNAME__ */ +} funcname_kind_t; + /* convenience macros */ #define EXPR_BINARY_CASES \ case EXPR_BINARY_ADD: \ @@ -151,27 +181,35 @@ typedef enum { case EXPR_UNARY_PREFIX_DECREMENT: \ case EXPR_UNARY_CAST: \ case EXPR_UNARY_CAST_IMPLICIT: \ - case EXPR_UNARY_ASSUME: \ - case EXPR_UNARY_BITFIELD_EXTRACT: + case EXPR_UNARY_ASSUME: +/** + * A scope containing declarations. + */ struct scope_t { declaration_t *declarations; /**< List of declarations in this scope. */ - declaration_t *last_declaration; + declaration_t *last_declaration; /**< last declaration in this scope. */ }; struct expression_base_t { expression_kind_t kind; type_t *type; source_position_t source_position; +#ifndef NDEBUG + bool transformed; +#endif }; struct const_expression_t { expression_base_t base; union { - long long int_value; - long double float_value; - string_t chars; + 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 */ }; struct string_literal_expression_t { @@ -179,6 +217,12 @@ struct string_literal_expression_t { string_t value; }; +struct funcname_expression_t { + expression_base_t base; + funcname_kind_t kind; + string_t value; /**< the value once assigned. */ +}; + struct wide_string_literal_expression_t { expression_base_t base; wide_string_t value; @@ -209,7 +253,6 @@ struct builtin_prefetch_expression_t { struct reference_expression_t { expression_base_t base; - symbol_t *symbol; declaration_t *declaration; }; @@ -238,8 +281,6 @@ struct binary_expression_t { struct select_expression_t { expression_base_t base; expression_t *compound; - symbol_t *symbol; - declaration_t *compound_entry; }; @@ -297,10 +338,16 @@ struct classify_type_expression_t { expression_t *type_expression; }; +struct label_address_expression_t { + expression_base_t base; + declaration_t *declaration; +}; + union expression_t { expression_kind_t kind; expression_base_t base; const_expression_t conste; + funcname_expression_t funcname; string_literal_expression_t string; wide_string_literal_expression_t wide_string; compound_literal_expression_t compound_literal; @@ -320,9 +367,10 @@ union expression_t { conditional_expression_t conditional; statement_expression_t statement; classify_type_expression_t classify_type; + label_address_expression_t label_address; }; -typedef enum { +typedef enum storage_class_tag_t { STORAGE_CLASS_NONE, STORAGE_CLASS_EXTERN, STORAGE_CLASS_STATIC, @@ -335,15 +383,16 @@ typedef enum { STORAGE_CLASS_THREAD_STATIC, } storage_class_tag_t; -typedef enum { +typedef enum namespace_t { NAMESPACE_NORMAL, NAMESPACE_STRUCT, NAMESPACE_UNION, NAMESPACE_ENUM, NAMESPACE_LABEL, + NAMESPACE_LOCAL_LABEL } namespace_t; -typedef enum { +typedef enum initializer_kind_t { INITIALIZER_VALUE, INITIALIZER_LIST, INITIALIZER_STRING, @@ -391,38 +440,137 @@ union initializer_t { initializer_designator_t designator; }; -typedef enum { - DM_DLLIMPORT = (1 << 0), - DM_DLLEXPORT = (1 << 1), - DM_THREAD = (1 << 2), - DM_NAKED = (1 << 3), - DM_FORCEINLINE = (1 << 4), - DM_NOTHROW = (1 << 5), - DM_NORETURN = (1 << 6), - DM_NOINLINE = (1 << 7) +/** + * 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_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; + +/** + * Extended microsoft modifier. + */ +typedef enum decl_modifier_t { + DM_DLLIMPORT = 1 << 0, + DM_DLLEXPORT = 1 << 1, + DM_THREAD = 1 << 2, + DM_NAKED = 1 << 3, + DM_MICROSOFT_INLINE = 1 << 4, + DM_FORCEINLINE = 1 << 5, + DM_SELECTANY = 1 << 6, + DM_NOTHROW = 1 << 7, + DM_NOVTABLE = 1 << 8, + DM_NORETURN = 1 << 9, + DM_NOINLINE = 1 << 10, + DM_RESTRICT = 1 << 11, + DM_NOALIAS = 1 << 12, + DM_PACKED = 1 << 13, + DM_TRANSPARENT_UNION = 1 << 14, + DM_PURE = 1 << 15, + DM_CONSTRUCTOR = 1 << 16, + DM_DESTRUCTOR = 1 << 17, + DM_UNUSED = 1 << 18, + DM_USED = 1 << 19, + DM_CDECL = 1 << 20, + DM_FASTCALL = 1 << 21, + DM_STDCALL = 1 << 22, + DM_THISCALL = 1 << 23, + DM_DEPRECATED = 1 << 24 } decl_modifier_t; -typedef unsigned short decl_modifiers_t; +typedef unsigned decl_modifiers_t; struct declaration_t { unsigned char namespc; unsigned char declared_storage_class; unsigned char storage_class; - decl_modifiers_t modifiers; - unsigned int address_taken : 1; + unsigned char alignment; /**< Alignment of the declaration, 0 for default. */ + decl_modifiers_t modifiers; /**< modifiers. */ + const char *deprecated_string; /**< MS deprecated string if any. */ + symbol_t *get_property_sym; /**< MS get property. */ + symbol_t *put_property_sym; /**< MS put property. */ + unsigned int address_taken : 1; /**< Set if the address of this declaration was taken. */ unsigned int is_inline : 1; unsigned int used : 1; /**< Set if the declaration is used. */ + unsigned int implicit : 1; /**< Set for implicit (not found in source code) declarations. */ type_t *type; + il_size_t offset; /**< The offset of this member inside a compound. */ symbol_t *symbol; + string_t *asm_name; /**< GCC extension: ASM label. */ source_position_t source_position; union { - bool is_defined; + bool complete; /**< used to indicate whether struct/union types are already defined or if just the name is declared */ statement_t *statement; initializer_t *initializer; expression_t *enum_value; } init; - scope_t scope; - scope_t *parent_scope; + scope_t scope; /**< The scope that this declaration opens. */ + scope_t *parent_scope; /**< The parent scope where this declaration lives. */ /** next declaration in a scope */ declaration_t *next; @@ -432,16 +580,18 @@ struct declaration_t { /* the following fields are used in ast2firm module */ unsigned char declaration_kind; union { - unsigned int value_number; - ir_entity *entity; - ir_node *block; - tarval *enum_val; - ir_type *irtype; + unsigned int value_number; + ir_entity *entity; + ir_node *block; + ir_node *vla_base; + tarval *enum_val; + ir_type *irtype; } v; }; -typedef enum { +typedef enum statement_kind_t { STATEMENT_INVALID, + STATEMENT_EMPTY, STATEMENT_COMPOUND, STATEMENT_RETURN, STATEMENT_DECLARATION, @@ -456,13 +606,28 @@ typedef enum { STATEMENT_WHILE, STATEMENT_DO_WHILE, STATEMENT_FOR, - STATEMENT_ASM + STATEMENT_ASM, + STATEMENT_MS_TRY, /**< MS __try/__finally or __try/__except */ + STATEMENT_LEAVE /**< MS __leave */ } statement_kind_t; struct statement_base_t { statement_kind_t kind; statement_t *next; source_position_t source_position; + statement_t *parent; + bool reachable; +#ifndef NDEBUG + bool transformed; +#endif +}; + +struct invalid_statement_t { + statement_base_t base; +}; + +struct empty_statement_t { + statement_base_t base; }; struct return_statement_t { @@ -490,24 +655,31 @@ struct if_statement_t { }; struct switch_statement_t { - statement_base_t base; + statement_base_t base; expression_t *expression; statement_t *body; - case_label_statement_t *first_case, *last_case; + 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. */ }; struct goto_statement_t { statement_base_t base; - declaration_t *label; /**< The destination label. */ - goto_statement_t *next; /**< links all goto statements of a function */ + declaration_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 case_label_statement_t { statement_base_t base; - expression_t *expression; /**< The case label expression, NULL for default label. */ - expression_t *end_range; /**< For GNUC case a .. b: the end range expression, NULL else. */ + expression_t *expression; /**< The case label expression, NULL for default label. */ + expression_t *end_range; /**< For GNUC case a .. b: the end range expression, NULL else. */ + case_label_statement_t *next; /**< link to the next case label in switch */ statement_t *statement; - case_label_statement_t *next; /**< link to the next case label in switch */ + long first_case; /**< The folded value of expression. */ + 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. */ }; struct label_statement_t { @@ -541,13 +713,15 @@ struct for_statement_t { expression_t *step; statement_t *body; scope_t scope; + bool condition_reachable:1; + bool step_reachable:1; }; -struct asm_constraint_t { - string_t constraints; - expression_t *expression; - symbol_t *symbol; - asm_constraint_t *next; +struct asm_argument_t { + string_t constraints; + expression_t *expression; + symbol_t *symbol; + asm_argument_t *next; }; struct asm_clobber_t { @@ -556,12 +730,23 @@ struct asm_clobber_t { }; struct asm_statement_t { + statement_base_t base; + string_t asm_text; + asm_argument_t *inputs; + asm_argument_t *outputs; + asm_clobber_t *clobbers; + bool is_volatile; +}; + +struct ms_try_statement_t { + statement_base_t base; + statement_t *try_statement; + expression_t *except_expression; /**< non-null for except, NULL for finally */ + statement_t *final_statement; +}; + +struct leave_statement_t { statement_base_t base; - string_t asm_text; - asm_constraint_t *inputs; - asm_constraint_t *outputs; - asm_clobber_t *clobbers; - bool is_volatile; }; union statement_t { @@ -580,10 +765,13 @@ union statement_t { 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 { - scope_t scope; + scope_t scope; + statement_t *global_asm; }; static inline @@ -592,6 +780,19 @@ 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) +{ + return statement->base.kind == STATEMENT_INVALID; +} + + #define allocate_ast(size) _allocate_ast(size) #endif