2 * This file is part of cparser.
3 * Copyright (C) 2007-2008 Matthias Braun <matze@braunis.de>
5 * This program is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU General Public License
7 * as published by the Free Software Foundation; either version 2
8 * of the License, or (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
23 #include <libfirm/firm_types.h>
32 /** The AST obstack contains all data that must stay in the AST. */
33 extern struct obstack ast_obstack;
38 typedef enum expression_kind_t {
43 EXPR_CHARACTER_CONSTANT,
44 EXPR_WIDE_CHARACTER_CONSTANT,
46 EXPR_WIDE_STRING_LITERAL,
47 EXPR_COMPOUND_LITERAL,
58 EXPR_BUILTIN_CONSTANT_P,
59 EXPR_BUILTIN_PREFETCH,
64 EXPR_LABEL_ADDRESS, /**< GCC extension &&label operator */
67 EXPR_UNARY_NEGATE = EXPR_UNARY_FIRST,
69 EXPR_UNARY_BITWISE_NEGATE,
71 EXPR_UNARY_DEREFERENCE,
72 EXPR_UNARY_TAKE_ADDRESS,
73 EXPR_UNARY_POSTFIX_INCREMENT,
74 EXPR_UNARY_POSTFIX_DECREMENT,
75 EXPR_UNARY_PREFIX_INCREMENT,
76 EXPR_UNARY_PREFIX_DECREMENT,
78 EXPR_UNARY_CAST_IMPLICIT, /**< compiler generated cast */
79 EXPR_UNARY_ASSUME, /**< MS __assume() */
80 EXPR_UNARY_LAST = EXPR_UNARY_ASSUME,
83 EXPR_BINARY_ADD = EXPR_BINARY_FIRST,
91 EXPR_BINARY_LESSEQUAL,
93 EXPR_BINARY_GREATEREQUAL,
94 EXPR_BINARY_BITWISE_AND,
95 EXPR_BINARY_BITWISE_OR,
96 EXPR_BINARY_BITWISE_XOR,
97 EXPR_BINARY_LOGICAL_AND,
98 EXPR_BINARY_LOGICAL_OR,
99 EXPR_BINARY_SHIFTLEFT,
100 EXPR_BINARY_SHIFTRIGHT,
102 EXPR_BINARY_MUL_ASSIGN,
103 EXPR_BINARY_DIV_ASSIGN,
104 EXPR_BINARY_MOD_ASSIGN,
105 EXPR_BINARY_ADD_ASSIGN,
106 EXPR_BINARY_SUB_ASSIGN,
107 EXPR_BINARY_SHIFTLEFT_ASSIGN,
108 EXPR_BINARY_SHIFTRIGHT_ASSIGN,
109 EXPR_BINARY_BITWISE_AND_ASSIGN,
110 EXPR_BINARY_BITWISE_XOR_ASSIGN,
111 EXPR_BINARY_BITWISE_OR_ASSIGN,
114 EXPR_BINARY_BUILTIN_EXPECT,
115 EXPR_BINARY_ISGREATER,
116 EXPR_BINARY_ISGREATEREQUAL,
118 EXPR_BINARY_ISLESSEQUAL,
119 EXPR_BINARY_ISLESSGREATER,
120 EXPR_BINARY_ISUNORDERED,
121 EXPR_BINARY_LAST = EXPR_BINARY_ISUNORDERED,
124 typedef enum funcname_kind_t {
125 FUNCNAME_FUNCTION, /**< C99 __func__, older __FUNCTION__ */
126 FUNCNAME_PRETTY_FUNCTION, /**< GNUC __PRETTY_FUNCTION__ */
127 FUNCNAME_FUNCSIG, /**< MS __FUNCSIG__ */
128 FUNCNAME_FUNCDNAME /**< MS __FUNCDNAME__ */
131 /* convenience macros */
132 #define EXPR_BINARY_CASES \
133 case EXPR_BINARY_ADD: \
134 case EXPR_BINARY_SUB: \
135 case EXPR_BINARY_MUL: \
136 case EXPR_BINARY_DIV: \
137 case EXPR_BINARY_MOD: \
138 case EXPR_BINARY_EQUAL: \
139 case EXPR_BINARY_NOTEQUAL: \
140 case EXPR_BINARY_LESS: \
141 case EXPR_BINARY_LESSEQUAL: \
142 case EXPR_BINARY_GREATER: \
143 case EXPR_BINARY_GREATEREQUAL: \
144 case EXPR_BINARY_BITWISE_AND: \
145 case EXPR_BINARY_BITWISE_OR: \
146 case EXPR_BINARY_BITWISE_XOR: \
147 case EXPR_BINARY_LOGICAL_AND: \
148 case EXPR_BINARY_LOGICAL_OR: \
149 case EXPR_BINARY_SHIFTLEFT: \
150 case EXPR_BINARY_SHIFTRIGHT: \
151 case EXPR_BINARY_ASSIGN: \
152 case EXPR_BINARY_MUL_ASSIGN: \
153 case EXPR_BINARY_DIV_ASSIGN: \
154 case EXPR_BINARY_MOD_ASSIGN: \
155 case EXPR_BINARY_ADD_ASSIGN: \
156 case EXPR_BINARY_SUB_ASSIGN: \
157 case EXPR_BINARY_SHIFTLEFT_ASSIGN: \
158 case EXPR_BINARY_SHIFTRIGHT_ASSIGN: \
159 case EXPR_BINARY_BITWISE_AND_ASSIGN: \
160 case EXPR_BINARY_BITWISE_XOR_ASSIGN: \
161 case EXPR_BINARY_BITWISE_OR_ASSIGN: \
162 case EXPR_BINARY_COMMA: \
163 case EXPR_BINARY_BUILTIN_EXPECT: \
164 case EXPR_BINARY_ISGREATER: \
165 case EXPR_BINARY_ISGREATEREQUAL: \
166 case EXPR_BINARY_ISLESS: \
167 case EXPR_BINARY_ISLESSEQUAL: \
168 case EXPR_BINARY_ISLESSGREATER: \
169 case EXPR_BINARY_ISUNORDERED:
171 #define EXPR_UNARY_CASES \
172 case EXPR_UNARY_NEGATE: \
173 case EXPR_UNARY_PLUS: \
174 case EXPR_UNARY_BITWISE_NEGATE: \
175 case EXPR_UNARY_NOT: \
176 case EXPR_UNARY_DEREFERENCE: \
177 case EXPR_UNARY_TAKE_ADDRESS: \
178 case EXPR_UNARY_POSTFIX_INCREMENT: \
179 case EXPR_UNARY_POSTFIX_DECREMENT: \
180 case EXPR_UNARY_PREFIX_INCREMENT: \
181 case EXPR_UNARY_PREFIX_DECREMENT: \
182 case EXPR_UNARY_CAST: \
183 case EXPR_UNARY_CAST_IMPLICIT: \
184 case EXPR_UNARY_ASSUME:
187 * A scope containing declarations.
190 declaration_t *declarations; /**< List of declarations in this scope. */
191 declaration_t *last_declaration; /**< last declaration in this scope. */
192 scope_t *parent; /**< points to the parent scope. */
193 unsigned depth; /**< while parsing, the depth of this scope in the scope stack. */
194 bool is_parameter; /**< Set if this scope is a parameter scope. */
197 struct expression_base_t {
198 expression_kind_t kind;
200 source_position_t source_position;
206 struct const_expression_t {
207 expression_base_t base;
210 long double float_value;
212 wide_string_t wide_character;
214 bool is_ms_noop; /**< True, if this constant is the result
215 of an microsoft __noop operator */
218 struct string_literal_expression_t {
219 expression_base_t base;
223 struct funcname_expression_t {
224 expression_base_t base;
225 funcname_kind_t kind;
226 string_t value; /**< the value once assigned. */
229 struct wide_string_literal_expression_t {
230 expression_base_t base;
234 struct compound_literal_expression_t {
235 expression_base_t base;
237 initializer_t *initializer;
240 struct builtin_symbol_expression_t {
241 expression_base_t base;
245 struct builtin_constant_expression_t {
246 expression_base_t base;
250 struct builtin_prefetch_expression_t {
251 expression_base_t base;
254 expression_t *locality;
257 struct reference_expression_t {
258 expression_base_t base;
259 declaration_t *declaration;
260 bool is_outer_ref; /**< Set, if this referenced a variable
261 outside of an inner function */
264 struct call_argument_t {
265 expression_t *expression;
266 call_argument_t *next;
269 struct call_expression_t {
270 expression_base_t base;
271 expression_t *function;
272 call_argument_t *arguments;
275 struct unary_expression_t {
276 expression_base_t base;
280 struct binary_expression_t {
281 expression_base_t base;
286 struct select_expression_t {
287 expression_base_t base;
288 expression_t *compound;
289 declaration_t *compound_entry;
292 struct array_access_expression_t {
293 expression_base_t base;
294 expression_t *array_ref;
296 bool flipped; /**< index/ref was written in a 5[a] way */
299 struct typeprop_expression_t {
300 expression_base_t base;
302 expression_t *tp_expression;
305 struct designator_t {
306 source_position_t source_position;
308 expression_t *array_index;
312 struct offsetof_expression_t {
313 expression_base_t base;
315 designator_t *designator;
318 struct va_start_expression_t {
319 expression_base_t base;
321 declaration_t *parameter;
324 struct va_arg_expression_t {
325 expression_base_t base;
329 struct conditional_expression_t {
330 expression_base_t base;
331 expression_t *condition;
332 expression_t *true_expression;
333 expression_t *false_expression;
336 struct statement_expression_t {
337 expression_base_t base;
338 statement_t *statement;
341 struct classify_type_expression_t {
342 expression_base_t base;
343 expression_t *type_expression;
346 struct label_address_expression_t {
347 expression_base_t base;
348 declaration_t *declaration;
352 expression_kind_t kind;
353 expression_base_t base;
354 const_expression_t conste;
355 funcname_expression_t funcname;
356 string_literal_expression_t string;
357 wide_string_literal_expression_t wide_string;
358 compound_literal_expression_t compound_literal;
359 builtin_symbol_expression_t builtin_symbol;
360 builtin_constant_expression_t builtin_constant;
361 builtin_prefetch_expression_t builtin_prefetch;
362 reference_expression_t reference;
363 call_expression_t call;
364 unary_expression_t unary;
365 binary_expression_t binary;
366 select_expression_t select;
367 array_access_expression_t array_access;
368 typeprop_expression_t typeprop;
369 offsetof_expression_t offsetofe;
370 va_start_expression_t va_starte;
371 va_arg_expression_t va_arge;
372 conditional_expression_t conditional;
373 statement_expression_t statement;
374 classify_type_expression_t classify_type;
375 label_address_expression_t label_address;
378 typedef enum storage_class_tag_t {
380 STORAGE_CLASS_EXTERN,
381 STORAGE_CLASS_STATIC,
382 STORAGE_CLASS_TYPEDEF,
384 STORAGE_CLASS_REGISTER,
385 STORAGE_CLASS_ENUM_ENTRY,
386 STORAGE_CLASS_THREAD,
387 STORAGE_CLASS_THREAD_EXTERN,
388 STORAGE_CLASS_THREAD_STATIC,
389 } storage_class_tag_t;
391 typedef enum namespace_t {
397 NAMESPACE_LOCAL_LABEL
400 typedef enum initializer_kind_t {
404 INITIALIZER_WIDE_STRING,
405 INITIALIZER_DESIGNATOR
406 } initializer_kind_t;
408 struct initializer_base_t {
409 initializer_kind_t kind;
412 struct initializer_value_t {
413 initializer_base_t base;
417 struct initializer_list_t {
418 initializer_base_t base;
420 initializer_t *initializers[];
423 struct initializer_string_t {
424 initializer_base_t base;
428 struct initializer_wide_string_t {
429 initializer_base_t base;
430 wide_string_t string;
433 struct initializer_designator_t {
434 initializer_base_t base;
435 designator_t *designator;
438 union initializer_t {
439 initializer_kind_t kind;
440 initializer_base_t base;
441 initializer_value_t value;
442 initializer_list_t list;
443 initializer_string_t string;
444 initializer_wide_string_t wide_string;
445 initializer_designator_t designator;
451 typedef enum gnu_attribute_kind_t {
462 GNU_AK_ALWAYS_INLINE,
468 GNU_AK_TRANSPARENT_UNION,
476 GNU_AK_NO_INSTRUMENT_FUNCTION,
477 GNU_AK_WARN_UNUSED_RESULT,
482 GNU_AK_FUNCTION_VECTOR,
484 GNU_AK_INTERRUPT_HANDLER,
490 GNU_AK_EIGTHBIT_DATA,
495 GNU_AK_EXTERNALLY_VISIBLE,
518 } gnu_attribute_kind_t;
521 * Extended microsoft modifier.
523 typedef enum decl_modifier_t {
524 DM_DLLIMPORT = 1 << 0,
525 DM_DLLEXPORT = 1 << 1,
528 DM_MICROSOFT_INLINE = 1 << 4,
529 DM_FORCEINLINE = 1 << 5,
530 DM_SELECTANY = 1 << 6,
532 DM_NOVTABLE = 1 << 8,
533 DM_NORETURN = 1 << 9,
534 DM_NOINLINE = 1 << 10,
535 DM_RESTRICT = 1 << 11,
536 DM_NOALIAS = 1 << 12,
538 DM_TRANSPARENT_UNION = 1 << 14,
541 DM_CONSTRUCTOR = 1 << 17,
542 DM_DESTRUCTOR = 1 << 18,
546 DM_FASTCALL = 1 << 22,
547 DM_STDCALL = 1 << 23,
548 DM_THISCALL = 1 << 24,
549 DM_DEPRECATED = 1 << 25
552 typedef unsigned decl_modifiers_t;
554 struct declaration_t {
555 unsigned char namespc;
556 unsigned char declared_storage_class;
557 unsigned char storage_class;
558 unsigned char alignment; /**< Alignment of the declaration, 0 for default. */
559 decl_modifiers_t modifiers; /**< modifiers. */
560 const char *deprecated_string; /**< MS deprecated string if any. */
561 symbol_t *get_property_sym; /**< MS get property. */
562 symbol_t *put_property_sym; /**< MS put property. */
563 unsigned int address_taken : 1; /**< Set if the address of this declaration was taken. */
564 unsigned int is_inline : 1;
565 unsigned int used : 1; /**< Set if the declaration is used. */
566 unsigned int implicit : 1; /**< Set for implicit (not found in source code) declarations. */
567 unsigned int need_closure : 1; /**< Inner function needs closure. */
568 unsigned int goto_to_outer : 1; /**< Inner function has goto to outer function. */
570 il_size_t offset; /**< The offset of this member inside a compound. */
572 string_t *asm_name; /**< GCC extension: ASM label. */
573 source_position_t source_position;
575 bool complete; /**< used to indicate whether struct/union types are already defined or if just the name is declared */
576 statement_t *statement;
577 initializer_t *initializer;
578 expression_t *enum_value;
580 scope_t scope; /**< The scope that this declaration opens. */
581 scope_t *parent_scope; /**< The parent scope where this declaration lives. */
583 /** next declaration in a scope */
585 /** next declaration with same symbol */
586 declaration_t *symbol_next;
588 /* the following fields are used in ast2firm module */
589 unsigned char declaration_kind;
591 unsigned int value_number;
600 typedef enum statement_kind_t {
605 STATEMENT_DECLARATION,
608 STATEMENT_EXPRESSION,
613 STATEMENT_CASE_LABEL,
618 STATEMENT_MS_TRY, /**< MS __try/__finally or __try/__except */
619 STATEMENT_LEAVE /**< MS __leave */
622 struct statement_base_t {
623 statement_kind_t kind;
625 source_position_t source_position;
633 struct invalid_statement_t {
634 statement_base_t base;
637 struct empty_statement_t {
638 statement_base_t base;
641 struct return_statement_t {
642 statement_base_t base;
646 struct compound_statement_t {
647 statement_base_t base;
648 statement_t *statements;
652 struct declaration_statement_t {
653 statement_base_t base;
654 declaration_t *declarations_begin;
655 declaration_t *declarations_end;
658 struct if_statement_t {
659 statement_base_t base;
660 expression_t *condition;
661 statement_t *true_statement;
662 statement_t *false_statement;
665 struct switch_statement_t {
666 statement_base_t base;
667 expression_t *expression;
669 case_label_statement_t *first_case, *last_case; /**< List of all cases, including default. */
670 case_label_statement_t *default_label; /**< The default label if existent. */
671 unsigned long default_proj_nr; /**< The Proj-number for the default Proj. */
674 struct goto_statement_t {
675 statement_base_t base;
676 declaration_t *label; /**< The destination label. */
677 expression_t *expression; /**< The expression for an assigned goto. */
678 goto_statement_t *next; /**< links all goto statements of a function */
679 bool outer_fkt_jmp; /**< Set if this goto jump to an outer function. */
682 struct case_label_statement_t {
683 statement_base_t base;
684 expression_t *expression; /**< The case label expression, NULL for default label. */
685 expression_t *end_range; /**< For GNUC case a .. b: the end range expression, NULL else. */
686 case_label_statement_t *next; /**< link to the next case label in switch */
687 statement_t *statement;
688 long first_case; /**< The folded value of expression. */
689 long last_case; /**< The folded value of end_range. */
690 bool is_bad; /**< If set marked as bad to suppress warnings. */
691 bool is_empty_range; /**< If set marked this as an empty range. */
694 struct label_statement_t {
695 statement_base_t base;
696 declaration_t *label;
697 statement_t *statement;
698 label_statement_t *next; /**< links all label statements of a function */
701 struct expression_statement_t {
702 statement_base_t base;
703 expression_t *expression;
706 struct while_statement_t {
707 statement_base_t base;
708 expression_t *condition;
712 struct do_while_statement_t {
713 statement_base_t base;
714 expression_t *condition;
718 struct for_statement_t {
719 statement_base_t base;
720 expression_t *initialisation;
721 expression_t *condition;
725 bool condition_reachable:1;
726 bool step_reachable:1;
729 struct asm_argument_t {
730 string_t constraints;
731 expression_t *expression;
733 asm_argument_t *next;
736 struct asm_clobber_t {
741 struct asm_statement_t {
742 statement_base_t base;
744 asm_argument_t *inputs;
745 asm_argument_t *outputs;
746 asm_clobber_t *clobbers;
750 struct ms_try_statement_t {
751 statement_base_t base;
752 statement_t *try_statement;
753 expression_t *except_expression; /**< non-null for except, NULL for finally */
754 statement_t *final_statement;
757 struct leave_statement_t {
758 statement_base_t base;
762 statement_kind_t kind;
763 statement_base_t base;
764 return_statement_t returns;
765 compound_statement_t compound;
766 declaration_statement_t declaration;
768 switch_statement_t switchs;
769 goto_statement_t gotos;
770 case_label_statement_t case_label;
771 label_statement_t label;
772 expression_statement_t expression;
773 while_statement_t whiles;
774 do_while_statement_t do_while;
775 for_statement_t fors;
776 asm_statement_t asms;
777 ms_try_statement_t ms_try;
778 leave_statement_t leave;
781 struct translation_unit_t {
783 statement_t *global_asm;
787 void *_allocate_ast(size_t size)
789 return obstack_alloc(&ast_obstack, size);
793 bool is_invalid_expression(expression_t *expression)
795 return expression->base.kind == EXPR_INVALID;
799 bool is_invalid_statement(statement_t *statement)
801 return statement->base.kind == STATEMENT_INVALID;
805 #define allocate_ast(size) _allocate_ast(size)