nsz Git - cparser/blob - types.c

   1 /*
   2  * This file is part of cparser.
   3  * Copyright (C) 2007-2008 Matthias Braun <matze@braunis.de>
   4  *
   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.
   9  *
  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.
  14  *
  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
  18  * 02111-1307, USA.
  19  */
  20 #include "type_t.h"
  21 #include "types.h"
  22 #include "lang_features.h"
  23
  24 /** The error type. */
  25 type_t *type_error_type;
  26
  27 type_t *type_char;
  28 type_t *type_const_char;
  29 type_t *type_double;
  30 type_t *type_float;
  31 type_t *type_int;
  32 type_t *type_long_double;
  33 type_t *type_long_long;
  34 type_t *type_long;
  35 type_t *type_short;
  36 type_t *type_unsigned_short;
  37 type_t *type_signed_char;
  38 type_t *type_unsigned_int;
  39 type_t *type_unsigned_long_long;
  40 type_t *type_unsigned_long;
  41 type_t *type_void;
  42
  43 type_t *type_char_ptr;
  44 type_t *type_const_char_ptr;
  45 type_t *type_int_ptr;
  46 type_t *type_long_long_ptr;
  47 type_t *type_long_ptr;
  48 type_t *type_short_ptr;
  49 type_t *type_signed_char_ptr;
  50 type_t *type_void_ptr;
  51
  52 type_t *type_char_ptr_ptr;
  53
  54 type_t *type_intmax_t;
  55 type_t *type_ptrdiff_t;
  56 type_t *type_size_t;
  57 type_t *type_ssize_t;
  58 type_t *type_uintmax_t;
  59 type_t *type_uptrdiff_t;
  60 type_t *type_wchar_t;
  61 type_t *type_const_wchar_t;
  62 type_t *type_wint_t;
  63
  64 type_t *type_intmax_t_ptr;
  65 type_t *type_ptrdiff_t_ptr;
  66 type_t *type_ssize_t_ptr;
  67 type_t *type_wchar_t_ptr;
  68 type_t *type_const_wchar_t_ptr;
  69
  70 /* microsoft types */
  71 atomic_type_kind_t int8_type_kind            = ATOMIC_TYPE_INVALID;
  72 atomic_type_kind_t int16_type_kind           = ATOMIC_TYPE_INVALID;
  73 atomic_type_kind_t int32_type_kind           = ATOMIC_TYPE_INVALID;
  74 atomic_type_kind_t int64_type_kind           = ATOMIC_TYPE_INVALID;
  75 atomic_type_kind_t int128_type_kind          = ATOMIC_TYPE_INVALID;
  76 atomic_type_kind_t unsigned_int8_type_kind   = ATOMIC_TYPE_INVALID;
  77 atomic_type_kind_t unsigned_int16_type_kind  = ATOMIC_TYPE_INVALID;
  78 atomic_type_kind_t unsigned_int32_type_kind  = ATOMIC_TYPE_INVALID;
  79 atomic_type_kind_t unsigned_int64_type_kind  = ATOMIC_TYPE_INVALID;
  80 atomic_type_kind_t unsigned_int128_type_kind = ATOMIC_TYPE_INVALID;
  81
  82 type_t *type_int8;
  83 type_t *type_int16;
  84 type_t *type_int32;
  85 type_t *type_int64;
  86 type_t *type_unsigned_int8;
  87 type_t *type_unsigned_int16;
  88 type_t *type_unsigned_int32;
  89 type_t *type_unsigned_int64;
  90
  91
  92 void init_basic_types(void)
  93 {
  94         static const type_base_t error = { TYPE_ERROR, 0, TYPE_QUALIFIER_NONE,
  95                                            TYPE_MODIFIER_NONE, 0, NULL };
  96
  97         type_error_type         = (type_t*)&error;
  98         type_signed_char        = make_atomic_type(ATOMIC_TYPE_SCHAR,       TYPE_QUALIFIER_NONE);
  99         type_short              = make_atomic_type(ATOMIC_TYPE_SHORT,       TYPE_QUALIFIER_NONE);
 100         type_unsigned_short     = make_atomic_type(ATOMIC_TYPE_USHORT,      TYPE_QUALIFIER_NONE);
 101         type_int                = make_atomic_type(ATOMIC_TYPE_INT,         TYPE_QUALIFIER_NONE);
 102         type_unsigned_int       = make_atomic_type(ATOMIC_TYPE_UINT,        TYPE_QUALIFIER_NONE);
 103         type_long               = make_atomic_type(ATOMIC_TYPE_LONG,        TYPE_QUALIFIER_NONE);
 104         type_unsigned_long      = make_atomic_type(ATOMIC_TYPE_ULONG,       TYPE_QUALIFIER_NONE);
 105         type_long_long          = make_atomic_type(ATOMIC_TYPE_LONGLONG,    TYPE_QUALIFIER_NONE);
 106         type_unsigned_long_long = make_atomic_type(ATOMIC_TYPE_ULONGLONG,   TYPE_QUALIFIER_NONE);
 107         type_long_double        = make_atomic_type(ATOMIC_TYPE_LONG_DOUBLE, TYPE_QUALIFIER_NONE);
 108         type_double             = make_atomic_type(ATOMIC_TYPE_DOUBLE,      TYPE_QUALIFIER_NONE);
 109         type_float              = make_atomic_type(ATOMIC_TYPE_FLOAT,       TYPE_QUALIFIER_NONE);
 110         type_char               = make_atomic_type(ATOMIC_TYPE_CHAR,        TYPE_QUALIFIER_NONE);
 111         type_void               = make_atomic_type(ATOMIC_TYPE_VOID,        TYPE_QUALIFIER_NONE);
 112
 113         /* microsoft types */
 114         if(c_mode & _MS) {
 115                 int8_type_kind           = find_signed_int_atomic_type_kind_for_size(1);
 116                 type_int8                = make_atomic_type(int8_type_kind, TYPE_QUALIFIER_NONE);
 117                 int16_type_kind          = find_signed_int_atomic_type_kind_for_size(2);
 118                 type_int16               = make_atomic_type(int16_type_kind, TYPE_QUALIFIER_NONE);
 119                 int32_type_kind          = find_signed_int_atomic_type_kind_for_size(4);
 120                 type_int32               = make_atomic_type(int32_type_kind, TYPE_QUALIFIER_NONE);
 121                 int64_type_kind          = find_signed_int_atomic_type_kind_for_size(8);
 122                 type_int64               = make_atomic_type(int64_type_kind, TYPE_QUALIFIER_NONE);
 123                 unsigned_int8_type_kind  = find_unsigned_int_atomic_type_kind_for_size(1);
 124                 type_unsigned_int8       = make_atomic_type(unsigned_int8_type_kind, TYPE_QUALIFIER_NONE);
 125                 unsigned_int16_type_kind = find_unsigned_int_atomic_type_kind_for_size(2);
 126                 type_unsigned_int16      = make_atomic_type(unsigned_int16_type_kind, TYPE_QUALIFIER_NONE);
 127                 unsigned_int32_type_kind = find_unsigned_int_atomic_type_kind_for_size(4);
 128                 type_unsigned_int32      = make_atomic_type(unsigned_int32_type_kind, TYPE_QUALIFIER_NONE);
 129                 unsigned_int64_type_kind = find_unsigned_int_atomic_type_kind_for_size(8);
 130                 type_unsigned_int64      = make_atomic_type(unsigned_int64_type_kind, TYPE_QUALIFIER_NONE);
 131         }
 132
 133         /* pointer types */
 134         type_void_ptr           = make_pointer_type(type_void,              TYPE_QUALIFIER_NONE);
 135         type_char_ptr           = make_pointer_type(type_char,              TYPE_QUALIFIER_NONE);
 136         type_signed_char_ptr    = make_pointer_type(type_signed_char,       TYPE_QUALIFIER_NONE);
 137         type_short_ptr          = make_pointer_type(type_short,             TYPE_QUALIFIER_NONE);
 138         type_int_ptr            = make_pointer_type(type_int,               TYPE_QUALIFIER_NONE);
 139         type_long_ptr           = make_pointer_type(type_long,              TYPE_QUALIFIER_NONE);
 140         type_long_long_ptr      = make_pointer_type(type_long_long,         TYPE_QUALIFIER_NONE);
 141
 142         type_char_ptr_ptr       = make_pointer_type(type_char_ptr,          TYPE_QUALIFIER_NONE);
 143
 144         /* const character types */
 145         type_const_char         = make_atomic_type(ATOMIC_TYPE_CHAR,        TYPE_QUALIFIER_CONST);
 146         type_const_char_ptr     = make_pointer_type(type_const_char,        TYPE_QUALIFIER_NONE);
 147 }