inittyp.c revision 1.17
1 /* $NetBSD: inittyp.c,v 1.17 2021/01/17 13:50:32 rillig Exp $ */ 2 3 /* 4 * Copyright (c) 1994, 1995 Jochen Pohl 5 * All Rights Reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by Jochen Pohl for 18 * The NetBSD Project. 19 * 4. The name of the author may not be used to endorse or promote products 20 * derived from this software without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 25 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 26 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 27 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 28 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 29 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 30 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 31 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 32 */ 33 34 #if HAVE_NBTOOL_CONFIG_H 35 #include "nbtool_config.h" 36 #endif 37 38 #include <sys/cdefs.h> 39 #if defined(__RCSID) && !defined(lint) 40 __RCSID("$NetBSD: inittyp.c,v 1.17 2021/01/17 13:50:32 rillig Exp $"); 41 #endif 42 43 #include <limits.h> 44 #include <stdlib.h> 45 46 #include "lint.h" 47 48 /* various type information */ 49 ttab_t ttab[NTSPEC]; 50 51 #if INTPTR_IS_LONG 52 #define INT_RSIZE 3 53 #else 54 #define INT_RSIZE 4 55 #endif 56 57 void 58 inittyp(void) 59 { 60 size_t i; 61 static const struct { 62 tspec_t it_tspec; 63 ttab_t it_ttab; 64 } ittab[NTSPEC] = { 65 { SIGNED, { 0, 0, 66 SIGNED, UNSIGN, 67 0, 0, 0, 0, 0, 0, "signed" } }, 68 { UNSIGN, { 0, 0, 69 SIGNED, UNSIGN, 70 0, 0, 0, 0, 0, 0, "unsigned" } }, 71 { BOOL, { CHAR_SIZE, 1, 72 BOOL, BOOL, 73 1, 1, 0, 1, 1, 0, "_Bool" } }, 74 { CHAR, { CHAR_SIZE, 8, 75 SCHAR, UCHAR, 76 1, 0, 0, 1, 1, 0, "char" } }, 77 { SCHAR, { CHAR_SIZE, 8, 78 SCHAR, UCHAR, 79 1, 0, 0, 1, 1, 0, "signed char" } }, 80 { UCHAR, { CHAR_SIZE, 8, 81 SCHAR, UCHAR, 82 1, 1, 0, 1, 1, 0, "unsigned char" } }, 83 { SHORT, { SHORT_SIZE, 16, 84 SHORT, USHORT, 85 1, 0, 0, 1, 1, 0, "short" } }, 86 { USHORT, { SHORT_SIZE, 16, 87 SHORT, USHORT, 88 1, 1, 0, 1, 1, 0, "unsigned short" } }, 89 { INT, { INT_SIZE, INT_RSIZE * 8, 90 INT, UINT, 91 1, 0, 0, 1, 1, 0, "int" } }, 92 { UINT, { INT_SIZE, INT_RSIZE * 8, 93 INT, UINT, 94 1, 1, 0, 1, 1, 0, "unsigned int" } }, 95 { LONG, { LONG_SIZE, 32, 96 LONG, ULONG, 97 1, 0, 0, 1, 1, 0, "long" } }, 98 { ULONG, { LONG_SIZE, 32, 99 LONG, ULONG, 100 1, 1, 0, 1, 1, 0, "unsigned long" } }, 101 { QUAD, { QUAD_SIZE, 64, 102 QUAD, UQUAD, 103 1, 0, 0, 1, 1, 0, "long long" } }, 104 { UQUAD, { QUAD_SIZE, 64, 105 QUAD, UQUAD, 106 1, 1, 0, 1, 1, 0, "unsigned long long" } }, 107 #ifdef INT128_SIZE 108 { INT128, { INT128_SIZE, 128, 109 INT128, UINT128, 110 1, 0, 0, 1, 1, 0, "__int128_t" } }, 111 { UINT128, { INT128_SIZE, 128, 112 INT128, UINT128, 113 1, 1, 0, 1, 1, 0, "__uint128_t" } }, 114 #endif 115 116 { FLOAT, { FLOAT_SIZE, 32, 117 FLOAT, FLOAT, 118 0, 0, 1, 1, 1, 0, "float" } }, 119 { DOUBLE, { DOUBLE_SIZE, 64, 120 DOUBLE, DOUBLE, 121 0, 0, 1, 1, 1, 0, "double" } }, 122 { LDOUBLE, { LDOUBLE_SIZE, 80, 123 LDOUBLE, LDOUBLE, 124 0, 0, 1, 1, 1, 0, "long double" } }, 125 { FCOMPLEX, { FLOAT_SIZE * 2, 32 * 2, 126 FCOMPLEX, FCOMPLEX, 127 0, 0, 1, 1, 1, 1, "float _Complex" } }, 128 { DCOMPLEX, { DOUBLE_SIZE * 2, 64 * 2, 129 DCOMPLEX, DCOMPLEX, 130 0, 0, 1, 1, 1, 1, "double _Complex" } }, 131 /* 132 * XXX: with -p, LCOMPLEX.tt_psz != 2 * LDOUBLE.tt_psz. 133 * This may or may not have been intentional. 134 */ 135 { LCOMPLEX, { LDOUBLE_SIZE * 2, 64 * 2, 136 LCOMPLEX, LCOMPLEX, 137 0, 0, 1, 1, 1, 1, "long double _Complex" } }, 138 { VOID, { -1, -1, 139 VOID, VOID, 140 0, 0, 0, 0, 0, 0, "void" } }, 141 { STRUCT, { -1, -1, 142 STRUCT, STRUCT, 143 0, 0, 0, 0, 0, 0, "struct" } }, 144 { UNION, { -1, -1, 145 UNION, UNION, 146 0, 0, 0, 0, 0, 0, "union" } }, 147 { ENUM, { ENUM_SIZE, 24, 148 ENUM, ENUM, 149 1, 0, 0, 1, 1, 0, "enum" } }, 150 { PTR, { PTR_SIZE, 32, 151 PTR, PTR, 152 0, 1, 0, 0, 1, 0, "pointer" } }, 153 { ARRAY, { -1, -1, 154 ARRAY, ARRAY, 155 0, 0, 0, 0, 0, 0, "array" } }, 156 { FUNC, { -1, -1, 157 FUNC, FUNC, 158 0, 0, 0, 0, 0, 0, "function" } }, 159 }; 160 161 for (i = 0; i < sizeof (ittab) / sizeof (ittab[0]); i++) 162 ttab[ittab[i].it_tspec] = ittab[i].it_ttab; 163 if (!pflag) { 164 for (i = 0; i < NTSPEC; i++) 165 ttab[i].tt_psz = ttab[i].tt_sz; 166 } 167 if (Tflag) { 168 ttab[BOOL].tt_is_integer = false; 169 ttab[BOOL].tt_is_uinteger = false; 170 ttab[BOOL].tt_is_arithmetic = false; 171 } 172 } 173
Indexes created Thu Oct 23 22:10:10 GMT 2025