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 read : 1;
567 unsigned int implicit : 1; /**< Set for implicit (not found in source code) declarations. */
568 unsigned int need_closure : 1; /**< Inner function needs closure. */
569 unsigned int goto_to_outer : 1; /**< Inner function has goto to outer function. */
571 il_size_t offset; /**< The offset of this member inside a compound. */
573 string_t *asm_name; /**< GCC extension: ASM label. */
574 source_position_t source_position;
576 bool complete; /**< used to indicate whether struct/union types are already defined or if just the name is declared */
577 statement_t *statement;
578 initializer_t *initializer;
579 expression_t *enum_value;
581 scope_t scope; /**< The scope that this declaration opens. */
582 scope_t *parent_scope; /**< The parent scope where this declaration lives. */
584 /** next declaration in a scope */
586 /** next declaration with same symbol */
587 declaration_t *symbol_next;
589 /* the following fields are used in ast2firm module */
590 unsigned char declaration_kind;
592 unsigned int value_number;
601 typedef enum statement_kind_t {
606 STATEMENT_DECLARATION,
609 STATEMENT_EXPRESSION,
614 STATEMENT_CASE_LABEL,
619 STATEMENT_MS_TRY, /**< MS __try/__finally or __try/__except */
620 STATEMENT_LEAVE /**< MS __leave */
623 struct statement_base_t {
624 statement_kind_t kind;
626 source_position_t source_position;
634 struct invalid_statement_t {
635 statement_base_t base;
638 struct empty_statement_t {
639 statement_base_t base;
642 struct return_statement_t {
643 statement_base_t base;
647 struct compound_statement_t {
648 statement_base_t base;
649 statement_t *statements;
653 struct declaration_statement_t {
654 statement_base_t base;
655 declaration_t *declarations_begin;
656 declaration_t *declarations_end;
659 struct if_statement_t {
660 statement_base_t base;
661 expression_t *condition;
662 statement_t *true_statement;
663 statement_t *false_statement;
666 struct switch_statement_t {
667 statement_base_t base;
668 expression_t *expression;
670 case_label_statement_t *first_case, *last_case; /**< List of all cases, including default. */
671 case_label_statement_t *default_label; /**< The default label if existent. */
672 unsigned long default_proj_nr; /**< The Proj-number for the default Proj. */
675 struct goto_statement_t {
676 statement_base_t base;
677 declaration_t *label; /**< The destination label. */
678 expression_t *expression; /**< The expression for an assigned goto. */
679 goto_statement_t *next; /**< links all goto statements of a function */
680 bool outer_fkt_jmp; /**< Set if this goto jump to an outer function. */
683 struct case_label_statement_t {
684 statement_base_t base;
685 expression_t *expression; /**< The case label expression, NULL for default label. */
686 expression_t *end_range; /**< For GNUC case a .. b: the end range expression, NULL else. */
687 case_label_statement_t *next; /**< link to the next case label in switch */
688 statement_t *statement;
689 long first_case; /**< The folded value of expression. */
690 long last_case; /**< The folded value of end_range. */
691 bool is_bad; /**< If set marked as bad to suppress warnings. */
692 bool is_empty_range; /**< If set marked this as an empty range. */
695 struct label_statement_t {
696 statement_base_t base;
697 declaration_t *label;
698 statement_t *statement;
699 label_statement_t *next; /**< links all label statements of a function */
702 struct expression_statement_t {
703 statement_base_t base;
704 expression_t *expression;
707 struct while_statement_t {
708 statement_base_t base;
709 expression_t *condition;
713 struct do_while_statement_t {
714 statement_base_t base;
715 expression_t *condition;
719 struct for_statement_t {
720 statement_base_t base;
721 expression_t *initialisation;
722 expression_t *condition;
726 bool condition_reachable:1;
727 bool step_reachable:1;
730 struct asm_argument_t {
731 string_t constraints;
732 expression_t *expression;
734 asm_argument_t *next;
737 struct asm_clobber_t {
742 struct asm_statement_t {
743 statement_base_t base;
745 asm_argument_t *inputs;
746 asm_argument_t *outputs;
747 asm_clobber_t *clobbers;
751 struct ms_try_statement_t {
752 statement_base_t base;
753 statement_t *try_statement;
754 expression_t *except_expression; /**< non-null for except, NULL for finally */
755 statement_t *final_statement;
758 struct leave_statement_t {
759 statement_base_t base;
763 statement_kind_t kind;
764 statement_base_t base;
765 return_statement_t returns;
766 compound_statement_t compound;
767 declaration_statement_t declaration;
769 switch_statement_t switchs;
770 goto_statement_t gotos;
771 case_label_statement_t case_label;
772 label_statement_t label;
773 expression_statement_t expression;
774 while_statement_t whiles;
775 do_while_statement_t do_while;
776 for_statement_t fors;
777 asm_statement_t asms;
778 ms_try_statement_t ms_try;
779 leave_statement_t leave;
782 struct translation_unit_t {
784 statement_t *global_asm;
788 void *_allocate_ast(size_t size)
790 return obstack_alloc(&ast_obstack, size);
794 bool is_invalid_expression(expression_t *expression)
796 return expression->base.kind == EXPR_INVALID;
800 bool is_invalid_statement(statement_t *statement)
802 return statement->base.kind == STATEMENT_INVALID;
806 #define allocate_ast(size) _allocate_ast(size)