- implemented -Wwrite-strings
[cparser] / 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_signed_char;
37 type_t *type_unsigned_int;
38 type_t *type_unsigned_long_long;
39 type_t *type_unsigned_long;
40 type_t *type_void;
41
42 type_t *type_char_ptr;
43 type_t *type_const_char_ptr;
44 type_t *type_int_ptr;
45 type_t *type_long_long_ptr;
46 type_t *type_long_ptr;
47 type_t *type_short_ptr;
48 type_t *type_signed_char_ptr;
49 type_t *type_void_ptr;
50
51 type_t *type_char_ptr_ptr;
52
53 type_t *type_intmax_t;
54 type_t *type_ptrdiff_t;
55 type_t *type_size_t;
56 type_t *type_ssize_t;
57 type_t *type_uintmax_t;
58 type_t *type_uptrdiff_t;
59 type_t *type_wchar_t;
60 type_t *type_const_wchar_t;
61 type_t *type_wint_t;
62
63 type_t *type_intmax_t_ptr;
64 type_t *type_ptrdiff_t_ptr;
65 type_t *type_ssize_t_ptr;
66 type_t *type_wchar_t_ptr;
67 type_t *type_const_wchar_t_ptr;
68
69 /* microsoft types */
70 atomic_type_kind_t int8_type_kind            = ATOMIC_TYPE_INVALID;
71 atomic_type_kind_t int16_type_kind           = ATOMIC_TYPE_INVALID;
72 atomic_type_kind_t int32_type_kind           = ATOMIC_TYPE_INVALID;
73 atomic_type_kind_t int64_type_kind           = ATOMIC_TYPE_INVALID;
74 atomic_type_kind_t int128_type_kind          = ATOMIC_TYPE_INVALID;
75 atomic_type_kind_t unsigned_int8_type_kind   = ATOMIC_TYPE_INVALID;
76 atomic_type_kind_t unsigned_int16_type_kind  = ATOMIC_TYPE_INVALID;
77 atomic_type_kind_t unsigned_int32_type_kind  = ATOMIC_TYPE_INVALID;
78 atomic_type_kind_t unsigned_int64_type_kind  = ATOMIC_TYPE_INVALID;
79 atomic_type_kind_t unsigned_int128_type_kind = ATOMIC_TYPE_INVALID;
80
81 type_t *type_int8;
82 type_t *type_int16;
83 type_t *type_int32;
84 type_t *type_int64;
85 type_t *type_unsigned_int8;
86 type_t *type_unsigned_int16;
87 type_t *type_unsigned_int32;
88 type_t *type_unsigned_int64;
89
90
91 void init_basic_types(void)
92 {
93         static const type_base_t error = { TYPE_ERROR, TYPE_QUALIFIER_NONE,
94                                            TYPE_MODIFIER_NONE, 0, { NULL, 0 },
95                                            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_int                = make_atomic_type(ATOMIC_TYPE_INT,         TYPE_QUALIFIER_NONE);
101         type_unsigned_int       = make_atomic_type(ATOMIC_TYPE_UINT,        TYPE_QUALIFIER_NONE);
102         type_long               = make_atomic_type(ATOMIC_TYPE_LONG,        TYPE_QUALIFIER_NONE);
103         type_unsigned_long      = make_atomic_type(ATOMIC_TYPE_ULONG,       TYPE_QUALIFIER_NONE);
104         type_long_long          = make_atomic_type(ATOMIC_TYPE_LONGLONG,    TYPE_QUALIFIER_NONE);
105         type_unsigned_long_long = make_atomic_type(ATOMIC_TYPE_ULONGLONG,   TYPE_QUALIFIER_NONE);
106         type_long_double        = make_atomic_type(ATOMIC_TYPE_LONG_DOUBLE, TYPE_QUALIFIER_NONE);
107         type_double             = make_atomic_type(ATOMIC_TYPE_DOUBLE,      TYPE_QUALIFIER_NONE);
108         type_float              = make_atomic_type(ATOMIC_TYPE_FLOAT,       TYPE_QUALIFIER_NONE);
109         type_char               = make_atomic_type(ATOMIC_TYPE_CHAR,        TYPE_QUALIFIER_NONE);
110         type_void               = make_atomic_type(ATOMIC_TYPE_VOID,        TYPE_QUALIFIER_NONE);
111
112         /* microsoft types */
113         if(c_mode & _MS) {
114                 int8_type_kind           = find_signed_int_atomic_type_kind_for_size(1);
115                 type_int8                = make_atomic_type(int8_type_kind, TYPE_QUALIFIER_NONE);
116                 int16_type_kind          = find_signed_int_atomic_type_kind_for_size(2);
117                 type_int16               = make_atomic_type(int16_type_kind, TYPE_QUALIFIER_NONE);
118                 int32_type_kind          = find_signed_int_atomic_type_kind_for_size(4);
119                 type_int32               = make_atomic_type(int32_type_kind, TYPE_QUALIFIER_NONE);
120                 int64_type_kind          = find_signed_int_atomic_type_kind_for_size(8);
121                 type_int64               = make_atomic_type(int64_type_kind, TYPE_QUALIFIER_NONE);
122                 unsigned_int8_type_kind  = find_unsigned_int_atomic_type_kind_for_size(1);
123                 type_unsigned_int8       = make_atomic_type(unsigned_int8_type_kind, TYPE_QUALIFIER_NONE);
124                 unsigned_int16_type_kind = find_unsigned_int_atomic_type_kind_for_size(2);
125                 type_unsigned_int16      = make_atomic_type(unsigned_int16_type_kind, TYPE_QUALIFIER_NONE);
126                 unsigned_int32_type_kind = find_unsigned_int_atomic_type_kind_for_size(4);
127                 type_unsigned_int32      = make_atomic_type(unsigned_int32_type_kind, TYPE_QUALIFIER_NONE);
128                 unsigned_int64_type_kind = find_unsigned_int_atomic_type_kind_for_size(8);
129                 type_unsigned_int64      = make_atomic_type(unsigned_int64_type_kind, TYPE_QUALIFIER_NONE);
130         }
131
132         /* pointer types */
133         type_void_ptr           = make_pointer_type(type_void,              TYPE_QUALIFIER_NONE);
134         type_char_ptr           = make_pointer_type(type_char,              TYPE_QUALIFIER_NONE);
135         type_signed_char_ptr    = make_pointer_type(type_signed_char,       TYPE_QUALIFIER_NONE);
136         type_short_ptr          = make_pointer_type(type_short,             TYPE_QUALIFIER_NONE);
137         type_int_ptr            = make_pointer_type(type_int,               TYPE_QUALIFIER_NONE);
138         type_long_ptr           = make_pointer_type(type_long,              TYPE_QUALIFIER_NONE);
139         type_long_long_ptr      = make_pointer_type(type_long_long,         TYPE_QUALIFIER_NONE);
140
141         type_char_ptr_ptr       = make_pointer_type(type_char_ptr,          TYPE_QUALIFIER_NONE);
142
143         /* const character types */
144         type_const_char         = make_atomic_type(ATOMIC_TYPE_CHAR,        TYPE_QUALIFIER_CONST);
145         type_const_char_ptr     = make_pointer_type(type_const_char,        TYPE_QUALIFIER_NONE);
146 }