Blame gl/verify.h

Packit a4aae4
/* Compile-time assert-like macros.
Packit a4aae4
Packit a4aae4
   Copyright (C) 2005-2006, 2009-2017 Free Software Foundation, Inc.
Packit a4aae4
Packit a4aae4
   This program is free software: you can redistribute it and/or modify
Packit a4aae4
   it under the terms of the GNU Lesser General Public License as published by
Packit a4aae4
   the Free Software Foundation; either version 3 of the License, or
Packit a4aae4
   (at your option) any later version.
Packit a4aae4
Packit a4aae4
   This program is distributed in the hope that it will be useful,
Packit a4aae4
   but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit a4aae4
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Packit a4aae4
   GNU Lesser General Public License for more details.
Packit a4aae4
Packit a4aae4
   You should have received a copy of the GNU Lesser General Public License
Packit a4aae4
   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
Packit a4aae4
Packit a4aae4
/* Written by Paul Eggert, Bruno Haible, and Jim Meyering.  */
Packit a4aae4
Packit a4aae4
#ifndef _GL_VERIFY_H
Packit a4aae4
#define _GL_VERIFY_H
Packit a4aae4
Packit a4aae4
Packit a4aae4
/* Define _GL_HAVE__STATIC_ASSERT to 1 if _Static_assert works as per C11.
Packit a4aae4
   This is supported by GCC 4.6.0 and later, in C mode, and its use
Packit a4aae4
   here generates easier-to-read diagnostics when verify (R) fails.
Packit a4aae4
Packit a4aae4
   Define _GL_HAVE_STATIC_ASSERT to 1 if static_assert works as per C++11.
Packit a4aae4
   This will likely be supported by future GCC versions, in C++ mode.
Packit a4aae4
Packit a4aae4
   Use this only with GCC.  If we were willing to slow 'configure'
Packit a4aae4
   down we could also use it with other compilers, but since this
Packit a4aae4
   affects only the quality of diagnostics, why bother?  */
Packit a4aae4
#if (4 < __GNUC__ + (6 <= __GNUC_MINOR__) \
Packit a4aae4
     && (201112L <= __STDC_VERSION__  || !defined __STRICT_ANSI__) \
Packit a4aae4
     && !defined __cplusplus)
Packit a4aae4
# define _GL_HAVE__STATIC_ASSERT 1
Packit a4aae4
#endif
Packit a4aae4
/* The condition (99 < __GNUC__) is temporary, until we know about the
Packit a4aae4
   first G++ release that supports static_assert.  */
Packit a4aae4
#if (99 < __GNUC__) && defined __cplusplus
Packit a4aae4
# define _GL_HAVE_STATIC_ASSERT 1
Packit a4aae4
#endif
Packit a4aae4
Packit a4aae4
/* FreeBSD 9.1 <sys/cdefs.h>, included by <stddef.h> and lots of other
Packit a4aae4
   system headers, defines a conflicting _Static_assert that is no
Packit a4aae4
   better than ours; override it.  */
Packit a4aae4
#ifndef _GL_HAVE_STATIC_ASSERT
Packit a4aae4
# include <stddef.h>
Packit a4aae4
# undef _Static_assert
Packit a4aae4
#endif
Packit a4aae4
Packit a4aae4
/* Each of these macros verifies that its argument R is nonzero.  To
Packit a4aae4
   be portable, R should be an integer constant expression.  Unlike
Packit a4aae4
   assert (R), there is no run-time overhead.
Packit a4aae4
Packit a4aae4
   If _Static_assert works, verify (R) uses it directly.  Similarly,
Packit a4aae4
   _GL_VERIFY_TRUE works by packaging a _Static_assert inside a struct
Packit a4aae4
   that is an operand of sizeof.
Packit a4aae4
Packit a4aae4
   The code below uses several ideas for C++ compilers, and for C
Packit a4aae4
   compilers that do not support _Static_assert:
Packit a4aae4
Packit a4aae4
   * The first step is ((R) ? 1 : -1).  Given an expression R, of
Packit a4aae4
     integral or boolean or floating-point type, this yields an
Packit a4aae4
     expression of integral type, whose value is later verified to be
Packit a4aae4
     constant and nonnegative.
Packit a4aae4
Packit a4aae4
   * Next this expression W is wrapped in a type
Packit a4aae4
     struct _gl_verify_type {
Packit a4aae4
       unsigned int _gl_verify_error_if_negative: W;
Packit a4aae4
     }.
Packit a4aae4
     If W is negative, this yields a compile-time error.  No compiler can
Packit a4aae4
     deal with a bit-field of negative size.
Packit a4aae4
Packit a4aae4
     One might think that an array size check would have the same
Packit a4aae4
     effect, that is, that the type struct { unsigned int dummy[W]; }
Packit a4aae4
     would work as well.  However, inside a function, some compilers
Packit a4aae4
     (such as C++ compilers and GNU C) allow local parameters and
Packit a4aae4
     variables inside array size expressions.  With these compilers,
Packit a4aae4
     an array size check would not properly diagnose this misuse of
Packit a4aae4
     the verify macro:
Packit a4aae4
Packit a4aae4
       void function (int n) { verify (n < 0); }
Packit a4aae4
Packit a4aae4
   * For the verify macro, the struct _gl_verify_type will need to
Packit a4aae4
     somehow be embedded into a declaration.  To be portable, this
Packit a4aae4
     declaration must declare an object, a constant, a function, or a
Packit a4aae4
     typedef name.  If the declared entity uses the type directly,
Packit a4aae4
     such as in
Packit a4aae4
Packit a4aae4
       struct dummy {...};
Packit a4aae4
       typedef struct {...} dummy;
Packit a4aae4
       extern struct {...} *dummy;
Packit a4aae4
       extern void dummy (struct {...} *);
Packit a4aae4
       extern struct {...} *dummy (void);
Packit a4aae4
Packit a4aae4
     two uses of the verify macro would yield colliding declarations
Packit a4aae4
     if the entity names are not disambiguated.  A workaround is to
Packit a4aae4
     attach the current line number to the entity name:
Packit a4aae4
Packit a4aae4
       #define _GL_CONCAT0(x, y) x##y
Packit a4aae4
       #define _GL_CONCAT(x, y) _GL_CONCAT0 (x, y)
Packit a4aae4
       extern struct {...} * _GL_CONCAT (dummy, __LINE__);
Packit a4aae4
Packit a4aae4
     But this has the problem that two invocations of verify from
Packit a4aae4
     within the same macro would collide, since the __LINE__ value
Packit a4aae4
     would be the same for both invocations.  (The GCC __COUNTER__
Packit a4aae4
     macro solves this problem, but is not portable.)
Packit a4aae4
Packit a4aae4
     A solution is to use the sizeof operator.  It yields a number,
Packit a4aae4
     getting rid of the identity of the type.  Declarations like
Packit a4aae4
Packit a4aae4
       extern int dummy [sizeof (struct {...})];
Packit a4aae4
       extern void dummy (int [sizeof (struct {...})]);
Packit a4aae4
       extern int (*dummy (void)) [sizeof (struct {...})];
Packit a4aae4
Packit a4aae4
     can be repeated.
Packit a4aae4
Packit a4aae4
   * Should the implementation use a named struct or an unnamed struct?
Packit a4aae4
     Which of the following alternatives can be used?
Packit a4aae4
Packit a4aae4
       extern int dummy [sizeof (struct {...})];
Packit a4aae4
       extern int dummy [sizeof (struct _gl_verify_type {...})];
Packit a4aae4
       extern void dummy (int [sizeof (struct {...})]);
Packit a4aae4
       extern void dummy (int [sizeof (struct _gl_verify_type {...})]);
Packit a4aae4
       extern int (*dummy (void)) [sizeof (struct {...})];
Packit a4aae4
       extern int (*dummy (void)) [sizeof (struct _gl_verify_type {...})];
Packit a4aae4
Packit a4aae4
     In the second and sixth case, the struct type is exported to the
Packit a4aae4
     outer scope; two such declarations therefore collide.  GCC warns
Packit a4aae4
     about the first, third, and fourth cases.  So the only remaining
Packit a4aae4
     possibility is the fifth case:
Packit a4aae4
Packit a4aae4
       extern int (*dummy (void)) [sizeof (struct {...})];
Packit a4aae4
Packit a4aae4
   * GCC warns about duplicate declarations of the dummy function if
Packit a4aae4
     -Wredundant-decls is used.  GCC 4.3 and later have a builtin
Packit a4aae4
     __COUNTER__ macro that can let us generate unique identifiers for
Packit a4aae4
     each dummy function, to suppress this warning.
Packit a4aae4
Packit a4aae4
   * This implementation exploits the fact that older versions of GCC,
Packit a4aae4
     which do not support _Static_assert, also do not warn about the
Packit a4aae4
     last declaration mentioned above.
Packit a4aae4
Packit a4aae4
   * GCC warns if -Wnested-externs is enabled and verify() is used
Packit a4aae4
     within a function body; but inside a function, you can always
Packit a4aae4
     arrange to use verify_expr() instead.
Packit a4aae4
Packit a4aae4
   * In C++, any struct definition inside sizeof is invalid.
Packit a4aae4
     Use a template type to work around the problem.  */
Packit a4aae4
Packit a4aae4
/* Concatenate two preprocessor tokens.  */
Packit a4aae4
#define _GL_CONCAT(x, y) _GL_CONCAT0 (x, y)
Packit a4aae4
#define _GL_CONCAT0(x, y) x##y
Packit a4aae4
Packit a4aae4
/* _GL_COUNTER is an integer, preferably one that changes each time we
Packit a4aae4
   use it.  Use __COUNTER__ if it works, falling back on __LINE__
Packit a4aae4
   otherwise.  __LINE__ isn't perfect, but it's better than a
Packit a4aae4
   constant.  */
Packit a4aae4
#if defined __COUNTER__ && __COUNTER__ != __COUNTER__
Packit a4aae4
# define _GL_COUNTER __COUNTER__
Packit a4aae4
#else
Packit a4aae4
# define _GL_COUNTER __LINE__
Packit a4aae4
#endif
Packit a4aae4
Packit a4aae4
/* Generate a symbol with the given prefix, making it unique if
Packit a4aae4
   possible.  */
Packit a4aae4
#define _GL_GENSYM(prefix) _GL_CONCAT (prefix, _GL_COUNTER)
Packit a4aae4
Packit a4aae4
/* Verify requirement R at compile-time, as an integer constant expression
Packit a4aae4
   that returns 1.  If R is false, fail at compile-time, preferably
Packit a4aae4
   with a diagnostic that includes the string-literal DIAGNOSTIC.  */
Packit a4aae4
Packit a4aae4
#define _GL_VERIFY_TRUE(R, DIAGNOSTIC) \
Packit a4aae4
   (!!sizeof (_GL_VERIFY_TYPE (R, DIAGNOSTIC)))
Packit a4aae4
Packit a4aae4
#ifdef __cplusplus
Packit a4aae4
# if !GNULIB_defined_struct__gl_verify_type
Packit a4aae4
template <int w>
Packit a4aae4
  struct _gl_verify_type {
Packit a4aae4
    unsigned int _gl_verify_error_if_negative: w;
Packit a4aae4
  };
Packit a4aae4
#  define GNULIB_defined_struct__gl_verify_type 1
Packit a4aae4
# endif
Packit a4aae4
# define _GL_VERIFY_TYPE(R, DIAGNOSTIC) \
Packit a4aae4
    _gl_verify_type<(R) ? 1 : -1>
Packit a4aae4
#elif defined _GL_HAVE__STATIC_ASSERT
Packit a4aae4
# define _GL_VERIFY_TYPE(R, DIAGNOSTIC) \
Packit a4aae4
    struct {                                   \
Packit a4aae4
      _Static_assert (R, DIAGNOSTIC);          \
Packit a4aae4
      int _gl_dummy;                          \
Packit a4aae4
    }
Packit a4aae4
#else
Packit a4aae4
# define _GL_VERIFY_TYPE(R, DIAGNOSTIC) \
Packit a4aae4
    struct { unsigned int _gl_verify_error_if_negative: (R) ? 1 : -1; }
Packit a4aae4
#endif
Packit a4aae4
Packit a4aae4
/* Verify requirement R at compile-time, as a declaration without a
Packit a4aae4
   trailing ';'.  If R is false, fail at compile-time, preferably
Packit a4aae4
   with a diagnostic that includes the string-literal DIAGNOSTIC.
Packit a4aae4
Packit a4aae4
   Unfortunately, unlike C11, this implementation must appear as an
Packit a4aae4
   ordinary declaration, and cannot appear inside struct { ... }.  */
Packit a4aae4
Packit a4aae4
#ifdef _GL_HAVE__STATIC_ASSERT
Packit a4aae4
# define _GL_VERIFY _Static_assert
Packit a4aae4
#else
Packit a4aae4
# define _GL_VERIFY(R, DIAGNOSTIC)				       \
Packit a4aae4
    extern int (*_GL_GENSYM (_gl_verify_function) (void))	       \
Packit a4aae4
      [_GL_VERIFY_TRUE (R, DIAGNOSTIC)]
Packit a4aae4
#endif
Packit a4aae4
Packit a4aae4
/* _GL_STATIC_ASSERT_H is defined if this code is copied into assert.h.  */
Packit a4aae4
#ifdef _GL_STATIC_ASSERT_H
Packit a4aae4
# if !defined _GL_HAVE__STATIC_ASSERT && !defined _Static_assert
Packit a4aae4
#  define _Static_assert(R, DIAGNOSTIC) _GL_VERIFY (R, DIAGNOSTIC)
Packit a4aae4
# endif
Packit a4aae4
# if !defined _GL_HAVE_STATIC_ASSERT && !defined static_assert
Packit a4aae4
#  define static_assert _Static_assert /* C11 requires this #define.  */
Packit a4aae4
# endif
Packit a4aae4
#endif
Packit a4aae4
Packit a4aae4
/* @assert.h omit start@  */
Packit a4aae4
Packit a4aae4
/* Each of these macros verifies that its argument R is nonzero.  To
Packit a4aae4
   be portable, R should be an integer constant expression.  Unlike
Packit a4aae4
   assert (R), there is no run-time overhead.
Packit a4aae4
Packit a4aae4
   There are two macros, since no single macro can be used in all
Packit a4aae4
   contexts in C.  verify_true (R) is for scalar contexts, including
Packit a4aae4
   integer constant expression contexts.  verify (R) is for declaration
Packit a4aae4
   contexts, e.g., the top level.  */
Packit a4aae4
Packit a4aae4
/* Verify requirement R at compile-time, as an integer constant expression.
Packit a4aae4
   Return 1.  This is equivalent to verify_expr (R, 1).
Packit a4aae4
Packit a4aae4
   verify_true is obsolescent; please use verify_expr instead.  */
Packit a4aae4
Packit a4aae4
#define verify_true(R) _GL_VERIFY_TRUE (R, "verify_true (" #R ")")
Packit a4aae4
Packit a4aae4
/* Verify requirement R at compile-time.  Return the value of the
Packit a4aae4
   expression E.  */
Packit a4aae4
Packit a4aae4
#define verify_expr(R, E) \
Packit a4aae4
   (_GL_VERIFY_TRUE (R, "verify_expr (" #R ", " #E ")") ? (E) : (E))
Packit a4aae4
Packit a4aae4
/* Verify requirement R at compile-time, as a declaration without a
Packit a4aae4
   trailing ';'.  */
Packit a4aae4
Packit a4aae4
#ifdef __GNUC__
Packit a4aae4
# define verify(R) _GL_VERIFY (R, "verify (" #R ")")
Packit a4aae4
#else
Packit a4aae4
/* PGI barfs if R is long.  Play it safe.  */
Packit a4aae4
# define verify(R) _GL_VERIFY (R, "verify (...)")
Packit a4aae4
#endif
Packit a4aae4
Packit a4aae4
#ifndef __has_builtin
Packit a4aae4
# define __has_builtin(x) 0
Packit a4aae4
#endif
Packit a4aae4
Packit a4aae4
/* Assume that R always holds.  This lets the compiler optimize
Packit a4aae4
   accordingly.  R should not have side-effects; it may or may not be
Packit a4aae4
   evaluated.  Behavior is undefined if R is false.  */
Packit a4aae4
Packit a4aae4
#if (__has_builtin (__builtin_unreachable) \
Packit a4aae4
     || 4 < __GNUC__ + (5 <= __GNUC_MINOR__))
Packit a4aae4
# define assume(R) ((R) ? (void) 0 : __builtin_unreachable ())
Packit a4aae4
#elif 1200 <= _MSC_VER
Packit a4aae4
# define assume(R) __assume (R)
Packit a4aae4
#elif ((defined GCC_LINT || defined lint) \
Packit a4aae4
       && (__has_builtin (__builtin_trap) \
Packit a4aae4
           || 3 < __GNUC__ + (3 < __GNUC_MINOR__ + (4 <= __GNUC_PATCHLEVEL__))))
Packit a4aae4
  /* Doing it this way helps various packages when configured with
Packit a4aae4
     --enable-gcc-warnings, which compiles with -Dlint.  It's nicer
Packit a4aae4
     when 'assume' silences warnings even with older GCCs.  */
Packit a4aae4
# define assume(R) ((R) ? (void) 0 : __builtin_trap ())
Packit a4aae4
#else
Packit a4aae4
# define assume(R) ((void) (0 && (R)))
Packit a4aae4
#endif
Packit a4aae4
Packit a4aae4
/* @assert.h omit end@  */
Packit a4aae4
Packit a4aae4
#endif