/*
* This file is part of cparser.
- * Copyright (C) 2007-2008 Matthias Braun <matze@braunis.de>
+ * Copyright (C) 2007-2009 Matthias Braun <matze@braunis.de>
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
EXPR_INVALID,
EXPR_REFERENCE,
EXPR_REFERENCE_ENUM_VALUE,
- EXPR_CONST,
- EXPR_CHARACTER_CONSTANT,
- EXPR_WIDE_CHARACTER_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,
EXPR_ALIGNOF,
EXPR_FUNCNAME,
- EXPR_BUILTIN_SYMBOL,
EXPR_BUILTIN_CONSTANT_P,
- EXPR_BUILTIN_PREFETCH,
+ EXPR_BUILTIN_TYPES_COMPATIBLE_P,
EXPR_OFFSETOF,
EXPR_VA_START,
EXPR_VA_ARG,
+ EXPR_VA_COPY,
EXPR_STATEMENT,
EXPR_LABEL_ADDRESS, /**< GCC extension &&label operator */
case EXPR_UNARY_DELETE_ARRAY:
/**
- * unary expression with optinal operand
+ * unary expression with optional operand
*/
#define EXPR_UNARY_CASES_OPTIONAL \
case EXPR_UNARY_THROW: \
EXPR_UNARY_CASES_MANDATORY \
EXPR_UNARY_CASES_OPTIONAL
+#define EXPR_LITERAL_CASES \
+ case 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.
+ */
struct expression_base_t {
- expression_kind_t kind;
- type_t *type;
- source_position_t source_position;
+ 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 : 1;
#ifndef NDEBUG
- bool transformed;
+ bool transformed : 1; /**< Set if this expression was transformed. */
#endif
};
-struct const_expression_t {
+/**
+ * integer/float constants, character and string literals
+ */
+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;
+ symbol_t *suffix;
+
+ /* ast2firm data */
+ ir_tarval *target_value;
};
struct string_literal_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;
initializer_t *initializer;
};
-struct builtin_symbol_expression_t {
- expression_base_t base;
- symbol_t *symbol;
-};
-
struct builtin_constant_expression_t {
expression_base_t base;
expression_t *value;
};
-struct builtin_prefetch_expression_t {
+struct builtin_types_compatible_expression_t {
expression_base_t base;
- expression_t *adr;
- expression_t *rw;
- expression_t *locality;
+ type_t *left;
+ type_t *right;
};
struct reference_expression_t {
entity_t *entity;
};
+/**
+ * An argument of a call.
+ */
struct call_argument_t {
- expression_t *expression;
- call_argument_t *next;
+ expression_t *expression; /**< The expression which value is transmitted. */
+ call_argument_t *next; /**< Links to the next argument of this call. */
};
+
struct call_expression_t {
expression_base_t base;
- expression_t *function;
- call_argument_t *arguments;
+ expression_t *function; /**< The address of the function to call. */
+ call_argument_t *arguments; /**< List of arguments of this call. */
};
+
struct unary_expression_t {
expression_base_t base;
- expression_t *value;
+ expression_t *value; /**< The unary operand. */
};
struct binary_expression_t {
expression_base_t base;
expression_t *compound;
entity_t *compound_entry;
+ bool implicit : 1; /**< compiler generated select
+ (for anonymous struct/union) */
};
struct array_access_expression_t {
expression_base_t base;
- expression_t *array_ref;
- expression_t *index;
- bool flipped; /**< index/ref was written in a 5[a] way */
+ expression_t *array_ref; /**< the referenced array */
+ expression_t *index; /**< the index used */
+ bool flipped; /**< True if index/ref was written in a 5[a] way */
};
struct typeprop_expression_t {
struct designator_t {
source_position_t source_position;
- symbol_t *symbol;
- expression_t *array_index;
+ symbol_t *symbol; /**< the symbol if any */
+ expression_t *array_index; /**< the array index if any */
designator_t *next;
};
expression_t *ap;
};
+struct va_copy_expression_t {
+ expression_base_t base;
+ expression_t *dst; /**< destination argument */
+ expression_t *src; /**< source argument */
+};
+
struct conditional_expression_t {
expression_base_t base;
expression_t *condition;
};
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;
- builtin_symbol_expression_t builtin_symbol;
- builtin_constant_expression_t builtin_constant;
- builtin_prefetch_expression_t builtin_prefetch;
- reference_expression_t reference;
- call_expression_t call;
- unary_expression_t unary;
- binary_expression_t binary;
- select_expression_t select;
- array_access_expression_t array_access;
- typeprop_expression_t typeprop;
- offsetof_expression_t offsetofe;
- va_start_expression_t va_starte;
- va_arg_expression_t va_arge;
- conditional_expression_t conditional;
- statement_expression_t statement;
- classify_type_expression_t classify_type;
- label_address_expression_t label_address;
+ expression_kind_t kind;
+ expression_base_t base;
+ literal_expression_t literal;
+ string_literal_expression_t string_literal;
+ funcname_expression_t funcname;
+ compound_literal_expression_t compound_literal;
+ builtin_constant_expression_t builtin_constant;
+ builtin_types_compatible_expression_t builtin_types_compatible;
+ reference_expression_t reference;
+ call_expression_t call;
+ unary_expression_t unary;
+ binary_expression_t binary;
+ select_expression_t select;
+ array_access_expression_t array_access;
+ typeprop_expression_t typeprop;
+ offsetof_expression_t offsetofe;
+ va_start_expression_t va_starte;
+ va_arg_expression_t va_arge;
+ va_copy_expression_t va_copye;
+ conditional_expression_t conditional;
+ statement_expression_t statement;
+ classify_type_expression_t classify_type;
+ label_address_expression_t label_address;
};
typedef enum initializer_kind_t {
struct initializer_wide_string_t {
initializer_base_t base;
- wide_string_t string;
+ string_t string;
};
struct initializer_designator_t {
};
/**
- * GNU attributes.
+ * The statement kinds.
*/
-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;
-
typedef enum statement_kind_t {
STATEMENT_INVALID,
STATEMENT_EMPTY,
STATEMENT_COMPOUND,
STATEMENT_RETURN,
STATEMENT_DECLARATION,
- STATEMENT_LOCAL_LABEL,
STATEMENT_IF,
STATEMENT_SWITCH,
STATEMENT_EXPRESSION,
STATEMENT_LEAVE /**< MS __leave */
} statement_kind_t;
+/**
+ * The base class of every statement.
+ */
struct statement_base_t {
statement_kind_t kind;
- statement_t *next;
+ statement_t *next; /**< Point to the next statement in a compound statement. */
source_position_t source_position;
- statement_t *parent;
- bool reachable;
+ statement_t *parent; /**< The Parent statement that controls the execution. */
+ bool reachable; /**< True, if this statement is reachable. */
#ifndef NDEBUG
bool transformed;
#endif
struct return_statement_t {
statement_base_t base;
- expression_t *value;
+ expression_t *value; /**< The return value if any. */
};
struct compound_statement_t {
statement_base_t base;
statement_t *statements;
scope_t scope;
+ bool stmt_expr; /**< True if this compound statement is a statement expression. */
};
struct declaration_statement_t {
entity_t *declarations_end;
};
-struct local_label_statement_t {
- statement_base_t base;
- entity_t *labels_begin;
- entity_t *labels_end;
-};
-
struct if_statement_t {
statement_base_t base;
expression_t *condition;
return_statement_t returns;
compound_statement_t compound;
declaration_statement_t declaration;
- local_label_statement_t local_label;
if_statement_t ifs;
switch_statement_t switchs;
goto_statement_t gotos;
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)
+static inline bool is_invalid_expression(expression_t *expression)
{
return expression->base.kind == EXPR_INVALID;
}
-static inline
-bool is_invalid_statement(statement_t *statement)
+static inline bool is_invalid_statement(statement_t *statement)
{
return statement->base.kind == STATEMENT_INVALID;
}
+/**
+ * Allocate an AST node with given size and
+ * initialize all fields with zero.
+ */
+static inline void *allocate_ast_zero(size_t size)
+{
+ 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