omassert.h

Go to the documentation of this file.

 
/* Copyright (C) 2007,2008,2009,2012,2013,2015 Olly Betts
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
 */
 
/* The "om" prefix is a historical vestige dating back to the "Open Muscat"
 * code base upon which Xapian is partly based.  It's preserved here only
 * to avoid colliding with the ISO C "assert.h" header.
 */
 
#ifndef XAPIAN_INCLUDED_OMASSERT_H
#define XAPIAN_INCLUDED_OMASSERT_H
 
#ifndef XAPIAN_ASSERTIONS
// The configure script should always define XAPIAN_ASSERTIONS if it defines
// XAPIAN_ASSERTIONS_PARANOID.
# ifdef XAPIAN_ASSERTIONS_PARANOID
#  error XAPIAN_ASSERTIONS_PARANOID defined without XAPIAN_ASSERTIONS
# endif
#else
 
#include <xapian/error.h>
 
#include "str.h"
 
#define XAPIAN_ASSERT_LOCATION__(LINE,MSG) __FILE__":"#LINE": "#MSG
#define XAPIAN_ASSERT_LOCATION_(LINE,MSG) XAPIAN_ASSERT_LOCATION__(LINE,MSG)
#define XAPIAN_ASSERT_LOCATION(MSG) XAPIAN_ASSERT_LOCATION_(__LINE__,MSG)
 
// Expensive (or potentially expensive) assertions can be marked as "Paranoid"
// - these can be disabled separately from other assertions to allow a build
// with assertions which still has good performance.
#ifdef XAPIAN_ASSERTIONS_PARANOID
# define AssertParanoid(COND) Assert(COND)
# define AssertRelParanoid(A,REL,B) AssertRel(A,REL,B)
# define AssertEqParanoid(A,B) AssertEq(A,B)
# define AssertEqDoubleParanoid(A,B) AssertEqDouble(A,B)
#endif
 
#define Assert(COND) \
    do {\
        if (rare(!(COND)))\
            throw Xapian::AssertionError(XAPIAN_ASSERT_LOCATION(COND));\
    } while (0)
 
#define AssertRel(A,REL,B) \
    do {\
        if (rare(!((A) REL (B)))) {\
            std::string xapian_assertion_msg(XAPIAN_ASSERT_LOCATION(A REL B));\
            xapian_assertion_msg += " : values were ";\
            xapian_assertion_msg += str(A);\
            xapian_assertion_msg += " and ";\
            xapian_assertion_msg += str(B);\
            throw Xapian::AssertionError(xapian_assertion_msg);\
        }\
    } while (0)
 
#define AssertEq(A,B) AssertRel(A,==,B)
 
namespace Xapian {
namespace Internal {
bool within_DBL_EPSILON(double a, double b);
}
}
 
#define AssertEqDouble(A,B) \
    do {\
        using Xapian::Internal::within_DBL_EPSILON;\
        if (rare(!within_DBL_EPSILON(A, B))) {\
            std::string xapian_assertion_msg(XAPIAN_ASSERT_LOCATION(within_DBL_EPSILON(A, B)));\
            xapian_assertion_msg += " : values were ";\
            xapian_assertion_msg += str(A);\
            xapian_assertion_msg += " and ";\
            xapian_assertion_msg += str(B);\
            throw Xapian::AssertionError(xapian_assertion_msg);\
        }\
    } while (0)
 
#endif
 
// If assertions are disabled, set the macros to expand to (void)0 so that
// we get a compiler error in this case for assertions missing a trailing
// semicolon.  This avoids one source of compile errors in debug builds
// which don't manifest in non-debug builds.
 
#ifndef Assert
# define Assert(COND) (void)0
# define AssertRel(A,REL,B) (void)0
# define AssertEq(A,B) (void)0
# define AssertEqDouble(A,B) (void)0
#endif
 
#ifndef AssertParanoid
# define AssertParanoid(COND) (void)0
# define AssertRelParanoid(A,REL,B) (void)0
# define AssertEqParanoid(A,B) (void)0
# define AssertEqDoubleParanoid(A,B) (void)0
#endif
 
#endif // XAPIAN_INCLUDED_OMASSERT_H