#ifndef _DB_DEBUG_H_
#define _DB_DEBUG_H_
#if defined(__cplusplus)
extern "C" {
#endif
#if !defined(__GNUC__) || __GNUC__ < 2 || (__GNUC__ == 2 && __GNUC_MINOR__ < 5)
#define __attribute__(s)
#endif
#define CLEAR_BYTE 0xdb
#define GUARD_BYTE 0xdc
#if defined(DIAGNOSTIC) && defined(__STDC__)
#define DB_ASSERT(env, e) \
((e) ? (void)0 : __db_assert(env, #e, __FILE__, __LINE__))
#else
#define DB_ASSERT(env, e)
#endif
#define COMPQUIET(n, v) do { \
(n) = (v); \
(n) = (n); \
} while (0)
#ifdef UMRW
#define UMRW_SET(v) (v) = 0
#else
#define UMRW_SET(v)
#endif
typedef enum {
DB_ERROR_NOT_SET=0,
DB_ERROR_SET=1,
DB_ERROR_SYSTEM=2
} db_error_set_t;
#if defined(STDC_HEADERS) || defined(__cplusplus)
#define DB_REAL_ERR(dbenv, error, error_set, app_call, fmt) { \
va_list __ap; \
\
\
va_start(__ap, fmt); \
if ((dbenv) != NULL && (dbenv)->db_errcall != NULL) \
__db_errcall(dbenv, error, error_set, fmt, __ap); \
va_end(__ap); \
\
\
va_start(__ap, fmt); \
if ((dbenv) == NULL || \
(dbenv)->db_errfile != NULL || \
((dbenv)->db_errcall == NULL && \
((app_call) || F_ISSET((dbenv)->env, ENV_NO_OUTPUT_SET)))) \
__db_errfile(dbenv, error, error_set, fmt, __ap); \
va_end(__ap); \
}
#else
#define DB_REAL_ERR(dbenv, error, error_set, app_call, fmt) { \
va_list __ap; \
\
\
va_start(__ap); \
if ((dbenv) != NULL && (dbenv)->db_errcall != NULL) \
__db_errcall(dbenv, error, error_set, fmt, __ap); \
va_end(__ap); \
\
\
va_start(__ap); \
if ((dbenv) == NULL || \
(dbenv)->db_errfile != NULL || \
((dbenv)->db_errcall == NULL && \
((app_call) || F_ISSET((dbenv)->env, ENV_NO_OUTPUT_SET)))) \
__db_errfile(env, error, error_set, fmt, __ap); \
va_end(__ap); \
}
#endif
#if defined(STDC_HEADERS) || defined(__cplusplus)
#define DB_REAL_MSG(dbenv, fmt) { \
va_list __ap; \
\
\
va_start(__ap, fmt); \
if ((dbenv) != NULL && (dbenv)->db_msgcall != NULL) \
__db_msgcall(dbenv, fmt, __ap); \
va_end(__ap); \
\
\
va_start(__ap, fmt); \
if ((dbenv) == NULL || \
(dbenv)->db_msgfile != NULL || \
(dbenv)->db_msgcall == NULL) { \
__db_msgfile(dbenv, fmt, __ap); \
} \
va_end(__ap); \
}
#else
#define DB_REAL_MSG(dbenv, fmt) { \
va_list __ap; \
\
\
va_start(__ap); \
if ((dbenv) != NULL && (dbenv)->db_msgcall != NULL) \
__db_msgcall(dbenv, fmt, __ap); \
va_end(__ap); \
\
\
va_start(__ap); \
if ((dbenv) == NULL || \
(dbenv)->db_msgfile != NULL || \
(dbenv)->db_msgcall == NULL) { \
__db_msgfile(dbenv, fmt, __ap); \
} \
va_end(__ap); \
}
#endif
#define LOG_OP(C, T, O, K, A, F) { \
DB_LSN __lsn; \
DBT __op; \
if (DBC_LOGGING((C))) { \
memset(&__op, 0, sizeof(__op)); \
__op.data = O; \
__op.size = strlen(O) + 1; \
(void)__db_debug_log((C)->env, T, &__lsn, 0, \
&__op, (C)->dbp->log_filename->id, K, A, F); \
} \
}
#ifdef DEBUG_ROP
#define DEBUG_LREAD(C, T, O, K, A, F) LOG_OP(C, T, O, K, A, F)
#else
#define DEBUG_LREAD(C, T, O, K, A, F)
#endif
#ifdef DEBUG_WOP
#define DEBUG_LWRITE(C, T, O, K, A, F) LOG_OP(C, T, O, K, A, F)
#else
#define DEBUG_LWRITE(C, T, O, K, A, F)
#endif
#if CONFIG_TEST
#define DB_TEST_SUBLOCKS(env, flags) do { \
if ((env)->test_abort == DB_TEST_SUBDB_LOCKS) \
(flags) |= DB_LOCK_NOWAIT; \
} while (0)
#define DB_ENV_TEST_RECOVERY(env, val, ret, name) do { \
int __ret; \
PANIC_CHECK((env)); \
if ((env)->test_copy == (val)) { \
\
if ((__ret = __db_testcopy((env), NULL, (name))) != 0) \
(ret) = __env_panic((env), __ret); \
} \
if ((env)->test_abort == (val)) { \
\
(env)->test_abort = 0; \
(ret) = EINVAL; \
goto db_tr_err; \
} \
} while (0)
#define DB_TEST_RECOVERY(dbp, val, ret, name) do { \
ENV *__env = (dbp)->env; \
int __ret; \
PANIC_CHECK(__env); \
if (__env->test_copy == (val)) { \
\
if (F_ISSET((dbp), \
DB_AM_OPEN_CALLED) && (dbp)->mpf != NULL) \
(void)__db_sync(dbp); \
if ((__ret = \
__db_testcopy(__env, (dbp), (name))) != 0) \
(ret) = __env_panic(__env, __ret); \
} \
if (__env->test_abort == (val)) { \
\
__env->test_abort = 0; \
(ret) = EINVAL; \
goto db_tr_err; \
} \
} while (0)
#define DB_TEST_RECOVERY_LABEL db_tr_err:
#define DB_TEST_WAIT(env, val) \
if ((val) != 0) \
__os_yield((env), (u_long)(val), 0)
#else
#define DB_TEST_SUBLOCKS(env, flags)
#define DB_ENV_TEST_RECOVERY(env, val, ret, name)
#define DB_TEST_RECOVERY(dbp, val, ret, name)
#define DB_TEST_RECOVERY_LABEL
#define DB_TEST_WAIT(env, val)
#endif
#if defined(__cplusplus)
}
#endif
#endif