type: Add missing space for printing complex types.
[cparser] / type_t.h
index 5fc4a3e..b0c21ac 100644 (file)
--- a/type_t.h
+++ b/type_t.h
+/*
+ * This file is part of cparser.
+ * 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
+ * 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 TYPE_T_H
 #define TYPE_T_H
 
+#include <stdbool.h>
+#include <assert.h>
+
+#include <libfirm/firm_types.h>
+
 #include "type.h"
 #include "symbol.h"
 #include "token_t.h"
 #include "ast_t.h"
 #include "adt/obst.h"
 
-struct obstack *type_obst;
-
-typedef enum {
-       TYPE_INVALID,
+typedef enum type_kind_t {
+       TYPE_ERROR = 1,
        TYPE_ATOMIC,
+       TYPE_COMPLEX,
+       TYPE_IMAGINARY,
        TYPE_COMPOUND_STRUCT,
        TYPE_COMPOUND_UNION,
        TYPE_ENUM,
-       TYPE_METHOD,
+       TYPE_FUNCTION,
        TYPE_POINTER,
-       TYPE_BUILTIN
-} type_type_t;
-
-typedef enum {
-       ATOMIC_TYPE_INVALID,
-       ATOMIC_TYPE_VOID,
-       ATOMIC_TYPE_CHAR,
-       ATOMIC_TYPE_SCHAR,
-       ATOMIC_TYPE_UCHAR,
-       ATOMIC_TYPE_SHORT,
-       ATOMIC_TYPE_USHORT,
-       ATOMIC_TYPE_INT,
-       ATOMIC_TYPE_UINT,
-       ATOMIC_TYPE_LONG,
-       ATOMIC_TYPE_ULONG,
-       ATOMIC_TYPE_LONGLONG,
-       ATOMIC_TYPE_ULONGLONG,
-       ATOMIC_TYPE_FLOAT,
-       ATOMIC_TYPE_DOUBLE,
-       ATOMIC_TYPE_LONG_DOUBLE,
-       ATOMIC_TYPE_BOOL,
-#ifdef PROVIDE_COMPLEX
-       ATOMIC_TYPE_FLOAT_COMPLEX,
-       ATOMIC_TYPE_DOUBLE_COMPLEX,
-       ATOMIC_TYPE_LONG_DOUBLE_COMPLEX,
-#endif
-#ifdef PROVIDE_IMAGINARY
-       ATOMIC_TYPE_FLOAT_IMAGINARY,
-       ATOMIC_TYPE_DOUBLE_IMAGINARY,
-       ATOMIC_TYPE_LONG_DOUBLE_IMAGINARY,
-#endif
-} atomic_type_type_t;
-
-typedef enum {
-       TYPE_QUALIFIER_CONST    = 1 << 0,
-       TYPE_QUALIFIER_RESTRICT = 1 << 1,
-       TYPE_QUALIFIER_VOLATILE = 1 << 2,
-       TYPE_QUALIFIER_INLINE   = 1 << 3,
-} type_qualifier_t;
-
-struct type_t {
-       type_type_t  type;
-       unsigned     qualifiers;
+       TYPE_REFERENCE,
+       TYPE_ARRAY,
+       TYPE_TYPEDEF,
+       TYPE_TYPEOF,
+} type_kind_t;
+
+struct type_base_t {
+       type_kind_t       kind;
+       type_qualifiers_t qualifiers;
+
+       /* cached ast2firm infos */
+       ir_type          *firm_type;
 };
 
+/**
+ * used for atomic types, complex and imaginary
+ */
 struct atomic_type_t {
-       type_t              type;
-       atomic_type_type_t  atype;
+       type_base_t         base;
+       atomic_type_kind_t  akind;
 };
 
-struct builtin_type_t {
-       type_t    type;
-       symbol_t *symbol;
+struct pointer_type_t {
+       type_base_t  base;
+       type_t      *points_to;
+       variable_t  *base_variable;  /**< Microsoft __based() extension: base variable or NULL. */
+};
+
+struct reference_type_t {
+       type_base_t  base;
+       type_t      *refers_to;
 };
 
-struct enum_entry_t {
-       symbol_t     *symbol;
-       expression_t *value;
-       enum_entry_t *next;
+struct array_type_t {
+       type_base_t   base;
+       type_t       *element_type;
+       expression_t *size_expression;
+       size_t        size;
+
+       ir_node      *size_node; /**< used by ast2firm phase */
+
+       bool          is_static         : 1; /**< a [static] type */
+       bool          is_variable       : 1; /**< a [*] type */
+       bool          has_implicit_size : 1;
+       bool          size_constant     : 1; /**< size expression is constant */
+       bool          is_vla            : 1; /**< it's a variable length array */
+};
+
+/**
+ * An entry in the parameter list of a function type.
+ */
+struct function_parameter_t {
+       type_t               *type;  /**< The parameter type. */
+       function_parameter_t *next;  /**< Points to the next type in the parameter list.*/
+};
+
+/** Linkage specifications. */
+typedef enum linkage_kind_t {
+       LINKAGE_C = 1,   /**< C linkage. */
+       LINKAGE_CXX      /**< C++ linkage. */
+} linkage_kind_t;
+
+/** Calling conventions. */
+typedef enum cc_kind_t {
+       CC_DEFAULT,      /**< default calling convention. */
+       CC_CDECL,        /**< cdecl calling convention. */
+       CC_STDCALL,      /**< stdcall calling convention. */
+       CC_FASTCALL,     /**< fastcall calling convention. */
+       CC_THISCALL      /**< thiscall calling convention. */
+} cc_kind_t;
+
+/**
+ * A function type.
+ */
+struct function_type_t {
+       type_base_t           base;
+       type_t               *return_type;        /**< The return type. */
+       function_parameter_t *parameters;         /**< A list of the parameter types. */
+       linkage_kind_t        linkage;
+       cc_kind_t             calling_convention; /**< The specified calling convention. */
+       decl_modifiers_t      modifiers;
+       bool                  variadic : 1;
+       bool                  unspecified_parameters : 1;
+       bool                  kr_style_parameters : 1;
+};
+
+struct compound_type_t {
+       type_base_t     base;
+       bool            packed : 1; /**< Set if packed was specified. */
+       /** the declaration of the compound type, the scope of the declaration
+        *  contains the compound entries. */
+       compound_t     *compound;
 };
 
 struct enum_type_t {
-       type_t             type;
-       symbol_t          *symbol;
-       enum_entry_t      *entries;
-       source_position_t  source_position;
-       enum_type_t       *next;
+       atomic_type_t       base;
+       /** the enum entity. You can find the enum entries by walking the
+        *  enum->base.next list until you don't find ENTITY_ENUM_VALUE entities
+        *  anymore */
+       enum_t             *enume;
 };
 
-struct pointer_type_t {
-       type_t   type;
-       type_t  *points_to;
+struct typedef_type_t {
+       type_base_t  base;
+       typedef_t   *typedefe;
+       type_t      *resolved_type;
 };
 
-struct method_parameter_t {
-       type_t             *type;
-       method_parameter_t *next;
+struct typeof_type_t {
+       type_base_t   base;
+       expression_t *expression;
+       type_t       *typeof_type;
+       type_t       *resolved_type;
 };
 
-struct method_type_t {
-       type_t              type;
-       type_t             *result_type;
-       method_parameter_t *parameters;
-       int                 variadic;
-       int                 unspecified_parameters;
+union type_t {
+       type_kind_t      kind;
+       type_base_t      base;
+       atomic_type_t    atomic;
+       pointer_type_t   pointer;
+       reference_type_t reference;
+       array_type_t     array;
+       function_type_t  function;
+       compound_type_t  compound;
+       enum_type_t      enumt;
+       typedef_type_t   typedeft;
+       typeof_type_t    typeoft;
 };
 
-struct compound_type_t {
-       type_t             type;
-       symbol_t          *symbol;
-       context_t          context;
-       source_position_t  source_position;
-       int                defined;
-       compound_type_t   *next;
+typedef struct atomic_type_properties_t atomic_type_properties_t;
+struct atomic_type_properties_t {
+       unsigned   size;              /**< type size in bytes */
+       unsigned   alignment;         /**< type alignment in bytes */
+       /** some ABIs are broken and require an alignment different from the
+        * recommended/best alignment inside structs. Fixing ABIs is difficult
+        * so people rather stick with the wrong values for compatibility.
+        * (double type on x86 System V ABI)
+        */
+       unsigned   struct_alignment;
+       unsigned   flags;             /**< type flags from atomic_type_flag_t */
+       unsigned   rank;              /**< integer conversion rank */
 };
 
+extern atomic_type_properties_t atomic_type_properties[ATOMIC_TYPE_LAST+1];
+extern atomic_type_properties_t pointer_properties;
+
+/** The default calling convention for functions. */
+extern cc_kind_t default_calling_convention;
+
+type_t *make_atomic_type(atomic_type_kind_t type, type_qualifiers_t qualifiers);
+type_t *make_complex_type(atomic_type_kind_t type, type_qualifiers_t qualifiers);
+type_t *make_imaginary_type(atomic_type_kind_t type, type_qualifiers_t qualifiers);
+type_t *make_pointer_type(type_t *points_to, type_qualifiers_t qualifiers);
+type_t *make_reference_type(type_t *refers_to);
+type_t *make_based_pointer_type(type_t *points_to,
+                                                               type_qualifiers_t qualifiers, variable_t *variable);
+type_t *make_array_type(type_t *element_type, size_t size,
+                        type_qualifiers_t qualifiers);
+function_parameter_t *allocate_parameter(type_t*);
+
+/**
+ * Duplicates a type.
+ *
+ * @param type  The type to copy.
+ * @return A copy of the type.
+ *
+ * @note This does not produce a deep copy!
+ */
+type_t *duplicate_type(const type_t *type);
+
+type_t *identify_new_type(type_t *type);
+
+static inline bool is_typeref(const type_t *type)
+{
+       return type->kind == TYPE_TYPEDEF || type->kind == TYPE_TYPEOF;
+}
+
+static inline bool is_type_atomic(const type_t *type, atomic_type_kind_t atype)
+{
+       assert(!is_typeref(type));
+
+       if(type->kind != TYPE_ATOMIC)
+               return false;
+       const atomic_type_t *atomic_type = &type->atomic;
+
+       return atomic_type->akind == atype;
+}
+
+static inline bool is_type_void(type_t const *const type)
+{
+       return is_type_atomic(type, ATOMIC_TYPE_VOID);
+}
+
+static inline bool is_type_pointer(const type_t *type)
+{
+       assert(!is_typeref(type));
+       return type->kind == TYPE_POINTER;
+}
+
+static inline bool is_type_reference(const type_t *type)
+{
+       assert(!is_typeref(type));
+       return type->kind == TYPE_REFERENCE;
+}
+
+static inline bool is_type_array(const type_t *type)
+{
+       assert(!is_typeref(type));
+       return type->kind == TYPE_ARRAY;
+}
+
+static inline bool is_type_function(const type_t *type)
+{
+       assert(!is_typeref(type));
+       return type->kind == TYPE_FUNCTION;
+}
+
+static inline bool is_type_union(const type_t *type)
+{
+       assert(!is_typeref(type));
+       return type->kind == TYPE_COMPOUND_UNION;
+}
+
+static inline bool is_type_struct(const type_t *type)
+{
+       assert(!is_typeref(type));
+       return type->kind == TYPE_COMPOUND_STRUCT;
+}
+
+static inline bool is_type_compound(const type_t *type)
+{
+       assert(!is_typeref(type));
+       return type->kind == TYPE_COMPOUND_STRUCT
+               || type->kind == TYPE_COMPOUND_UNION;
+}
+
+static inline bool is_type_valid(const type_t *type)
+{
+       assert(!is_typeref(type));
+       return type->kind != TYPE_ERROR;
+}
+
+/**
+ * return integer conversion rank of an atomic type kind
+ */
+static inline unsigned get_akind_rank(atomic_type_kind_t akind)
+{
+       return atomic_type_properties[akind].rank;
+}
+
+/**
+ * Allocate a type node of given kind and initialize all
+ * fields with zero.
+ *
+ * @param kind             type kind to allocate
+ */
+type_t *allocate_type_zero(type_kind_t kind);
+
+/**
+ * Creates a return_type (func)(void) function type if not
+ * already exists.
+ *
+ * @param return_type    the return type
+ */
+type_t *make_function_0_type(type_t *return_type,
+                             decl_modifiers_t modifiers);
+
+/**
+ * Creates a return_type (func)(argument_type) function type if not
+ * already exists.
+ *
+ * @param return_type    the return type
+ * @param argument_type  the argument type
+ */
+type_t *make_function_1_type(type_t *return_type, type_t *argument_type1,
+                             decl_modifiers_t modifiers);
+
+
+/**
+ * Creates a return_type (func)(argument_type1,argument_type2) function type
+ * if not already exists.
+ */
+type_t *make_function_2_type(type_t *return_type, type_t *argument_type1,
+                             type_t *argument_type2,
+                             decl_modifiers_t modifiers);
+
+/**
+ * Creates a return_type (func)(argument_type, ...) function type if not
+ * already exists.
+ *
+ * @param return_type    the return type
+ * @param argument_type  the argument type
+ */
+type_t *make_function_1_type_variadic(type_t *return_type,
+                                      type_t *argument_type,
+                                      decl_modifiers_t modifiers);
+
+/**
+ * Create a function type with n parameters
+ */
+type_t *make_function_type(type_t *return_type, int n_types,
+                           type_t *const *argument_types,
+                                                  decl_modifiers_t modifiers);
+
 #endif