ast2firm: Implement casting from complex to real types.
[cparser] / type_t.h
index a2ccb37..8e948cf 100644 (file)
--- a/type_t.h
+++ b/type_t.h
@@ -1,21 +1,6 @@
 /*
  * 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.
+ * Copyright (C) 2012 Matthias Braun <matze@braunis.de>
  */
 #ifndef TYPE_T_H
 #define TYPE_T_H
 #include "ast_t.h"
 #include "adt/obst.h"
 
-extern struct obstack *type_obst;
-
 typedef enum type_kind_t {
-       TYPE_INVALID,
-       TYPE_ERROR,
+       TYPE_ERROR = 1,
        TYPE_ATOMIC,
        TYPE_COMPLEX,
        TYPE_IMAGINARY,
@@ -46,7 +28,6 @@ typedef enum type_kind_t {
        TYPE_POINTER,
        TYPE_REFERENCE,
        TYPE_ARRAY,
-       TYPE_BITFIELD,
        TYPE_TYPEDEF,
        TYPE_TYPEOF,
 } type_kind_t;
@@ -59,21 +40,14 @@ struct type_base_t {
        ir_type          *firm_type;
 };
 
+/**
+ * used for atomic types, complex and imaginary and as base for enum
+ */
 struct atomic_type_t {
        type_base_t         base;
        atomic_type_kind_t  akind;
 };
 
-struct complex_type_t {
-       type_base_t         base;
-       atomic_type_kind_t  akind;
-};
-
-struct imaginary_type_t {
-       type_base_t         base;
-       atomic_type_kind_t  akind;
-};
-
 struct pointer_type_t {
        type_base_t  base;
        type_t      *points_to;
@@ -110,8 +84,7 @@ struct function_parameter_t {
 
 /** Linkage specifications. */
 typedef enum linkage_kind_t {
-       LINKAGE_INVALID,
-       LINKAGE_C,       /**< C linkage. */
+       LINKAGE_C = 1,   /**< C linkage. */
        LINKAGE_CXX      /**< C++ linkage. */
 } linkage_kind_t;
 
@@ -148,8 +121,7 @@ struct compound_type_t {
 };
 
 struct enum_type_t {
-       type_base_t         base;
-       atomic_type_kind_t  akind; /**< underlying atomic type */
+       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 */
@@ -169,19 +141,10 @@ struct typeof_type_t {
        type_t       *resolved_type;
 };
 
-struct bitfield_type_t {
-       type_base_t   base;
-       type_t       *base_type;
-       expression_t *size_expression; /**< The expression for the bit size. */
-       il_size_t     bit_size;        /**< Size of this bitfield in bits. */
-};
-
 union type_t {
        type_kind_t      kind;
        type_base_t      base;
        atomic_type_t    atomic;
-       complex_type_t   complex;
-       imaginary_type_t imaginary;
        pointer_type_t   pointer;
        reference_type_t reference;
        array_type_t     array;
@@ -189,10 +152,26 @@ union type_t {
        compound_type_t  compound;
        enum_type_t      enumt;
        typedef_type_t   typedeft;
-       bitfield_type_t  bitfield;
        typeof_type_t    typeoft;
 };
 
+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;
 
@@ -205,8 +184,18 @@ 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)
@@ -218,13 +207,18 @@ static inline bool is_type_atomic(const type_t *type, atomic_type_kind_t atype)
 {
        assert(!is_typeref(type));
 
-       if(type->kind != TYPE_ATOMIC)
+       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));
@@ -274,6 +268,27 @@ static inline bool is_type_valid(const type_t *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;
+}
+
+static inline bool is_akind_signed(atomic_type_kind_t akind)
+{
+       return atomic_type_properties[akind].flags & ATOMIC_TYPE_FLAG_SIGNED;
+}
+
+static inline atomic_type_kind_t get_arithmetic_akind(const type_t *type)
+{
+       assert(type->kind == TYPE_ATOMIC || type->kind == TYPE_COMPLEX
+              || type->kind == TYPE_IMAGINARY || type->kind == TYPE_ENUM);
+       /* note that atomic, complex and enum share atomic_type_t base */
+       return type->atomic.akind;
+}
+
 /**
  * Allocate a type node of given kind and initialize all
  * fields with zero.
@@ -288,7 +303,8 @@ type_t *allocate_type_zero(type_kind_t kind);
  *
  * @param return_type    the return type
  */
-type_t *make_function_0_type(type_t *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
@@ -297,7 +313,8 @@ type_t *make_function_0_type(type_t *return_type);
  * @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);
+type_t *make_function_1_type(type_t *return_type, type_t *argument_type1,
+                             decl_modifiers_t modifiers);
 
 
 /**
@@ -305,7 +322,8 @@ type_t *make_function_1_type(type_t *return_type, type_t *argument_type1);
  * if not already exists.
  */
 type_t *make_function_2_type(type_t *return_type, type_t *argument_type1,
-                             type_t *argument_type2);
+                             type_t *argument_type2,
+                             decl_modifiers_t modifiers);
 
 /**
  * Creates a return_type (func)(argument_type, ...) function type if not
@@ -314,7 +332,9 @@ type_t *make_function_2_type(type_t *return_type, type_t *argument_type1,
  * @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);
+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