gl/verify.h

   1 /* Compile-time assert-like macros.
   2
   3    Copyright (C) 2005-2006, 2009-2024 Free Software Foundation, Inc.
   4
   5    This file is free software: you can redistribute it and/or modify
   6    it under the terms of the GNU Lesser General Public License as
   7    published by the Free Software Foundation; either version 2.1 of the
   8    License, or (at your option) any later version.
   9
  10    This file 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 Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public License
  16    along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
  17
  18 /* Written by Paul Eggert, Bruno Haible, and Jim Meyering.  */
  19
  20 #ifndef _GL_VERIFY_H
  21 #define _GL_VERIFY_H
  22
  23
  24 /* Define _GL_HAVE__STATIC_ASSERT to 1 if _Static_assert (R, DIAGNOSTIC)
  25    works as per C11.  This is supported by GCC 4.6.0+ and by clang 4+.
  26
  27    Define _GL_HAVE__STATIC_ASSERT1 to 1 if _Static_assert (R) works as
  28    per C23.  This is supported by GCC 9.1+.
  29
  30    Support compilers claiming conformance to the relevant standard,
  31    and also support GCC when not pedantic.  If we were willing to slow
  32    'configure' down we could also use it with other compilers, but
  33    since this affects only the quality of diagnostics, why bother?  */
  34 #ifndef __cplusplus
  35 # if (201112 <= __STDC_VERSION__ \
  36       || (!defined __STRICT_ANSI__ \
  37           && (4 < __GNUC__ + (6 <= __GNUC_MINOR__) || 5 <= __clang_major__)))
  38 #  define _GL_HAVE__STATIC_ASSERT 1
  39 # endif
  40 # if (202311 <= __STDC_VERSION__ \
  41       || (!defined __STRICT_ANSI__ && 9 <= __GNUC__))
  42 #  define _GL_HAVE__STATIC_ASSERT1 1
  43 # endif
  44 #endif
  45
  46 /* FreeBSD 9.1 <sys/cdefs.h>, included by <stddef.h> and lots of other
  47    system headers, defines a conflicting _Static_assert that is no
  48    better than ours; override it.  */
  49 #ifndef _GL_HAVE__STATIC_ASSERT
  50 # include <stddef.h>
  51 # undef _Static_assert
  52 #endif
  53
  54 /* Each of these macros verifies that its argument R is nonzero.  To
  55    be portable, R should be an integer constant expression.  Unlike
  56    assert (R), there is no run-time overhead.
  57
  58    If _Static_assert works, verify (R) uses it directly.  Similarly,
  59    _GL_VERIFY_TRUE works by packaging a _Static_assert inside a struct
  60    that is an operand of sizeof.
  61
  62    The code below uses several ideas for C++ compilers, and for C
  63    compilers that do not support _Static_assert:
  64
  65    * The first step is ((R) ? 1 : -1).  Given an expression R, of
  66      integral or boolean or floating-point type, this yields an
  67      expression of integral type, whose value is later verified to be
  68      constant and nonnegative.
  69
  70    * Next this expression W is wrapped in a type
  71      struct _gl_verify_type {
  72        unsigned int _gl_verify_error_if_negative: W;
  73      }.
  74      If W is negative, this yields a compile-time error.  No compiler can
  75      deal with a bit-field of negative size.
  76
  77      One might think that an array size check would have the same
  78      effect, that is, that the type struct { unsigned int dummy[W]; }
  79      would work as well.  However, inside a function, some compilers
  80      (such as C++ compilers and GNU C) allow local parameters and
  81      variables inside array size expressions.  With these compilers,
  82      an array size check would not properly diagnose this misuse of
  83      the verify macro:
  84
  85        void function (int n) { verify (n < 0); }
  86
  87    * For the verify macro, the struct _gl_verify_type will need to
  88      somehow be embedded into a declaration.  To be portable, this
  89      declaration must declare an object, a constant, a function, or a
  90      typedef name.  If the declared entity uses the type directly,
  91      such as in
  92
  93        struct dummy {...};
  94        typedef struct {...} dummy;
  95        extern struct {...} *dummy;
  96        extern void dummy (struct {...} *);
  97        extern struct {...} *dummy (void);
  98
  99      two uses of the verify macro would yield colliding declarations
 100      if the entity names are not disambiguated.  A workaround is to
 101      attach the current line number to the entity name:
 102
 103        #define _GL_CONCAT0(x, y) x##y
 104        #define _GL_CONCAT(x, y) _GL_CONCAT0 (x, y)
 105        extern struct {...} * _GL_CONCAT (dummy, __LINE__);
 106
 107      But this has the problem that two invocations of verify from
 108      within the same macro would collide, since the __LINE__ value
 109      would be the same for both invocations.  (The GCC __COUNTER__
 110      macro solves this problem, but is not portable.)
 111
 112      A solution is to use the sizeof operator.  It yields a number,
 113      getting rid of the identity of the type.  Declarations like
 114
 115        extern int dummy [sizeof (struct {...})];
 116        extern void dummy (int [sizeof (struct {...})]);
 117        extern int (*dummy (void)) [sizeof (struct {...})];
 118
 119      can be repeated.
 120
 121    * Should the implementation use a named struct or an unnamed struct?
 122      Which of the following alternatives can be used?
 123
 124        extern int dummy [sizeof (struct {...})];
 125        extern int dummy [sizeof (struct _gl_verify_type {...})];
 126        extern void dummy (int [sizeof (struct {...})]);
 127        extern void dummy (int [sizeof (struct _gl_verify_type {...})]);
 128        extern int (*dummy (void)) [sizeof (struct {...})];
 129        extern int (*dummy (void)) [sizeof (struct _gl_verify_type {...})];
 130
 131      In the second and sixth case, the struct type is exported to the
 132      outer scope; two such declarations therefore collide.  GCC warns
 133      about the first, third, and fourth cases.  So the only remaining
 134      possibility is the fifth case:
 135
 136        extern int (*dummy (void)) [sizeof (struct {...})];
 137
 138    * GCC warns about duplicate declarations of the dummy function if
 139      -Wredundant-decls is used.  GCC 4.3 and later have a builtin
 140      __COUNTER__ macro that can let us generate unique identifiers for
 141      each dummy function, to suppress this warning.
 142
 143    * This implementation exploits the fact that older versions of GCC,
 144      which do not support _Static_assert, also do not warn about the
 145      last declaration mentioned above.
 146
 147    * GCC warns if -Wnested-externs is enabled and 'verify' is used
 148      within a function body; but inside a function, you can always
 149      arrange to use verify_expr instead.
 150
 151    * In C++, any struct definition inside sizeof is invalid.
 152      Use a template type to work around the problem.  */
 153
 154 /* Concatenate two preprocessor tokens.  */
 155 #define _GL_CONCAT(x, y) _GL_CONCAT0 (x, y)
 156 #define _GL_CONCAT0(x, y) x##y
 157
 158 /* _GL_COUNTER is an integer, preferably one that changes each time we
 159    use it.  Use __COUNTER__ if it works, falling back on __LINE__
 160    otherwise.  __LINE__ isn't perfect, but it's better than a
 161    constant.  */
 162 #if defined __COUNTER__ && __COUNTER__ != __COUNTER__
 163 # define _GL_COUNTER __COUNTER__
 164 #else
 165 # define _GL_COUNTER __LINE__
 166 #endif
 167
 168 /* Generate a symbol with the given prefix, making it unique if
 169    possible.  */
 170 #define _GL_GENSYM(prefix) _GL_CONCAT (prefix, _GL_COUNTER)
 171
 172 /* Verify requirement R at compile-time, as an integer constant expression
 173    that returns 1.  If R is false, fail at compile-time, preferably
 174    with a diagnostic that includes the string-literal DIAGNOSTIC.  */
 175
 176 #define _GL_VERIFY_TRUE(R, DIAGNOSTIC) \
 177    (!!sizeof (_GL_VERIFY_TYPE (R, DIAGNOSTIC)))
 178
 179 #ifdef __cplusplus
 180 # if !GNULIB_defined_struct__gl_verify_type
 181 template <int w>
 182   struct _gl_verify_type {
 183     unsigned int _gl_verify_error_if_negative: w;
 184   };
 185 #  define GNULIB_defined_struct__gl_verify_type 1
 186 # endif
 187 # define _GL_VERIFY_TYPE(R, DIAGNOSTIC) \
 188     _gl_verify_type<(R) ? 1 : -1>
 189 #elif defined _GL_HAVE__STATIC_ASSERT
 190 # define _GL_VERIFY_TYPE(R, DIAGNOSTIC) \
 191     struct { \
 192       _Static_assert (R, DIAGNOSTIC); \
 193       int _gl_dummy; \
 194     }
 195 #else
 196 # define _GL_VERIFY_TYPE(R, DIAGNOSTIC) \
 197     struct { unsigned int _gl_verify_error_if_negative: (R) ? 1 : -1; }
 198 #endif
 199
 200 /* Verify requirement R at compile-time, as a declaration without a
 201    trailing ';'.  If R is false, fail at compile-time.
 202
 203    This macro requires three or more arguments but uses at most the first
 204    two, so that the _Static_assert macro optionally defined below supports
 205    both the C11 two-argument syntax and the C23 one-argument syntax.
 206
 207    Unfortunately, unlike C11, this implementation must appear as an
 208    ordinary declaration, and cannot appear inside struct { ... }.  */
 209
 210 #if 202311 <= __STDC_VERSION__ || 200410 <= __cpp_static_assert
 211 # define _GL_VERIFY(R, DIAGNOSTIC, ...) static_assert (R, DIAGNOSTIC)
 212 #elif defined _GL_HAVE__STATIC_ASSERT
 213 # define _GL_VERIFY(R, DIAGNOSTIC, ...) _Static_assert (R, DIAGNOSTIC)
 214 #else
 215 # define _GL_VERIFY(R, DIAGNOSTIC, ...) \
 216     extern int (*_GL_GENSYM (_gl_verify_function) (void)) \
 217       [_GL_VERIFY_TRUE (R, DIAGNOSTIC)]
 218 # if 4 < __GNUC__ + (6 <= __GNUC_MINOR__)
 219 #  pragma GCC diagnostic ignored "-Wnested-externs"
 220 # endif
 221 #endif
 222
 223 /* _GL_STATIC_ASSERT_H is defined if this code is copied into assert.h.  */
 224 #ifdef _GL_STATIC_ASSERT_H
 225 /* Define _Static_assert if needed.  */
 226 /* With clang ≥ 3.8.0 in C++ mode, _Static_assert already works and accepts
 227    1 or 2 arguments.  We better don't override it, because clang's standard
 228    C++ library uses static_assert inside classes in several places, and our
 229    replacement via _GL_VERIFY does not work in these contexts.  */
 230 # if (defined __cplusplus && defined __clang__ \
 231       && (4 <= __clang_major__ + (8 <= __clang_minor__)))
 232 #  if 5 <= __clang_major__
 233 /* Avoid "warning: 'static_assert' with no message is a C++17 extension".  */
 234 #   pragma clang diagnostic ignored "-Wc++17-extensions"
 235 #  else
 236 /* Avoid "warning: static_assert with no message is a C++1z extension".  */
 237 #   pragma clang diagnostic ignored "-Wc++1z-extensions"
 238 #  endif
 239 # elif !defined _GL_HAVE__STATIC_ASSERT1 && !defined _Static_assert
 240 #  if !defined _MSC_VER || defined __clang__
 241 #   define _Static_assert(...) \
 242       _GL_VERIFY (__VA_ARGS__, "static assertion failed", -)
 243 #  else
 244 #   if defined __cplusplus && _MSC_VER >= 1910
 245      /* In MSVC 14.1 or newer, static_assert accepts one or two arguments,
 246         but _Static_assert is not defined.  */
 247 #    define _Static_assert static_assert
 248 #   else
 249      /* Work around MSVC preprocessor incompatibility with ISO C; see
 250         <https://stackoverflow.com/questions/5134523/>.  */
 251 #    define _Static_assert(R, ...) \
 252        _GL_VERIFY ((R), "static assertion failed", -)
 253 #   endif
 254 #  endif
 255 # endif
 256 /* Define static_assert if needed.  */
 257 # if (!defined static_assert \
 258       && __STDC_VERSION__ < 202311 \
 259       && (!defined __cplusplus \
 260           || (__cpp_static_assert < 201411 \
 261               && __GNUG__ < 6 && __clang_major__ < 6 && _MSC_VER < 1910)))
 262 #  if defined __cplusplus && _MSC_VER >= 1900 && !defined __clang__
 263 /* MSVC 14 in C++ mode supports the two-arguments static_assert but not
 264    the one-argument static_assert, and it does not support _Static_assert.
 265    We have to play preprocessor tricks to distinguish the two cases.
 266    Since the MSVC preprocessor is not ISO C compliant (see above),.
 267    the solution is specific to MSVC.  */
 268 #   define _GL_EXPAND(x) x
 269 #   define _GL_SA1(a1) static_assert ((a1), "static assertion failed")
 270 #   define _GL_SA2 static_assert
 271 #   define _GL_SA3 static_assert
 272 #   define _GL_SA_PICK(x1,x2,x3,x4,...) x4
 273 #   define static_assert(...) _GL_EXPAND(_GL_SA_PICK(__VA_ARGS__,_GL_SA3,_GL_SA2,_GL_SA1)) (__VA_ARGS__)
 274 /* Avoid "fatal error C1189: #error:  The C++ Standard Library forbids macroizing keywords."  */
 275 #   define _ALLOW_KEYWORD_MACROS 1
 276 #  else
 277 #   define static_assert _Static_assert /* C11 requires this #define. */
 278 #  endif
 279 # endif
 280 #endif
 281
 282 /* @assert.h omit start@  */
 283
 284 #if defined __clang_major__ && __clang_major__ < 5
 285 # define _GL_HAS_BUILTIN_TRAP 0
 286 #elif 3 < __GNUC__ + (3 < __GNUC_MINOR__ + (4 <= __GNUC_PATCHLEVEL__))
 287 # define _GL_HAS_BUILTIN_TRAP 1
 288 #elif defined __has_builtin
 289 # define _GL_HAS_BUILTIN_TRAP __has_builtin (__builtin_trap)
 290 #else
 291 # define _GL_HAS_BUILTIN_TRAP 0
 292 #endif
 293
 294 #ifndef _GL_HAS_BUILTIN_UNREACHABLE
 295 # if defined __clang_major__ && __clang_major__ < 5
 296 #  define _GL_HAS_BUILTIN_UNREACHABLE 0
 297 # elif 4 < __GNUC__ + (5 <= __GNUC_MINOR__)
 298 #  define _GL_HAS_BUILTIN_UNREACHABLE 1
 299 # elif defined __has_builtin
 300 #  define _GL_HAS_BUILTIN_UNREACHABLE __has_builtin (__builtin_unreachable)
 301 # else
 302 #  define _GL_HAS_BUILTIN_UNREACHABLE 0
 303 # endif
 304 #endif
 305
 306 /* Each of these macros verifies that its argument R is nonzero.  To
 307    be portable, R should be an integer constant expression.  Unlike
 308    assert (R), there is no run-time overhead.
 309
 310    There are two macros, since no single macro can be used in all
 311    contexts in C.  verify_expr (R, E) is for scalar contexts, including
 312    integer constant expression contexts.  verify (R) is for declaration
 313    contexts, e.g., the top level.  */
 314
 315 /* Verify requirement R at compile-time.  Return the value of the
 316    expression E.  */
 317
 318 #define verify_expr(R, E) \
 319    (_GL_VERIFY_TRUE (R, "verify_expr (" #R ", " #E ")") ? (E) : (E))
 320
 321 /* Verify requirement R at compile-time, as a declaration without a
 322    trailing ';'.  verify (R) acts like static_assert (R) except that
 323    it is portable to C11/C++14 and earlier, it can issue better
 324    diagnostics, and its name is shorter and may be more convenient.  */
 325
 326 #ifdef __PGI
 327 /* PGI barfs if R is long.  */
 328 # define verify(R) _GL_VERIFY (R, "verify (...)", -)
 329 #else
 330 # define verify(R) _GL_VERIFY (R, "verify (" #R ")", -)
 331 #endif
 332
 333 /* Assume that R always holds.  Behavior is undefined if R is false,
 334    fails to evaluate, or has side effects.
 335
 336    'assume (R)' is a directive from the programmer telling the
 337    compiler that R is true so the compiler needn't generate code to
 338    test R.  This is why 'assume' is in verify.h: it's related to
 339    static checking (in this case, static checking done by the
 340    programmer), not dynamic checking.
 341
 342    'assume (R)' can affect compilation of all the code, not just code
 343    that happens to be executed after the assume (R) is "executed".
 344    For example, if the code mistakenly does 'assert (R); assume (R);'
 345    the compiler is entitled to optimize away the 'assert (R)'.
 346
 347    Although assuming R can help a compiler generate better code or
 348    diagnostics, performance can suffer if R uses hard-to-optimize
 349    features such as function calls not inlined by the compiler.
 350
 351    Avoid Clang's __builtin_assume, as it breaks GNU Emacs master
 352    as of 2020-08-23T21:09:49Z!eggert@cs.ucla.edu; see
 353    <https://bugs.gnu.org/43152#71>.  It's not known whether this breakage
 354    is a Clang bug or an Emacs bug; play it safe for now.  */
 355
 356 #if _GL_HAS_BUILTIN_UNREACHABLE
 357 # define assume(R) ((R) ? (void) 0 : __builtin_unreachable ())
 358 #elif 1200 <= _MSC_VER
 359 # define assume(R) __assume (R)
 360 #elif 202311 <= __STDC_VERSION__
 361 # include <stddef.h>
 362 # define assume(R) ((R) ? (void) 0 : unreachable ())
 363 #elif (defined GCC_LINT || defined lint) && _GL_HAS_BUILTIN_TRAP
 364   /* Doing it this way helps various packages when configured with
 365      --enable-gcc-warnings, which compiles with -Dlint.  It's nicer
 366      if 'assume' silences warnings with GCC 3.4 through GCC 4.4.7 (2012).  */
 367 # define assume(R) ((R) ? (void) 0 : __builtin_trap ())
 368 #else
 369   /* Some older tools grok NOTREACHED, e.g., Oracle Studio 12.6 (2017).  */
 370 # define assume(R) ((R) ? (void) 0 : /*NOTREACHED*/ (void) 0)
 371 #endif
 372
 373 /* @assert.h omit end@  */
 374
 375 #endif