You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
73 lines
1.6 KiB
73 lines
1.6 KiB
2 years ago
|
/* Copyright 2018, University Corporation for Atmospheric Research. See
|
||
|
|
COPYRIGHT file for copying and redistribution conditions. */
|
||
|
|
/**
|
||
|
|
* @file @internal This file is part of netcdf-4, a netCDF-like
|
||
|
|
* interface for HDF5, or a HDF5 backend for netCDF, depending on your
|
||
|
|
* point of view.
|
||
|
|
*
|
||
|
|
* This file contains macros and prototypes relating to logging.
|
||
|
|
*
|
||
|
|
* @author Ed Hartnett
|
||
|
|
*/
|
||
|
|
|
||
|
|
#ifndef _NCLOGGING_
|
||
|
|
#define _NCLOGGING_
|
||
|
|
|
||
|
|
#include <stdlib.h>
|
||
|
|
#include <assert.h>
|
||
|
|
|
||
|
|
#ifdef LOGGING
|
||
|
|
|
||
|
|
/* To log something... */
|
||
|
|
void nc_log(int severity, const char *fmt, ...);
|
||
|
|
|
||
|
|
#define LOG(e) nc_log e
|
||
|
|
|
||
|
|
/* BAIL2 was moved to libhdf5/hdf5err.h+hdf5internal.c
|
||
|
|
because of the call to nc_log_hdf5 */
|
||
|
|
|
||
|
|
/* Define a replacement for BAIL2 that is not HDF5 dependent */
|
||
|
|
#define BAILLOG(e) \
|
||
|
|
do { \
|
||
|
|
retval = e; \
|
||
|
|
LOG((0, "file %s, line %d.\n%s", __FILE__, __LINE__, nc_strerror(e))); \
|
||
|
|
} while (0)
|
||
|
|
|
||
|
|
/* To set retval and jump to exit, without logging error message. */
|
||
|
|
#define BAIL_QUIET(e) \
|
||
|
|
do { \
|
||
|
|
retval = e; \
|
||
|
|
goto exit; \
|
||
|
|
} while (0)
|
||
|
|
|
||
|
|
#else /* LOGGING */
|
||
|
|
|
||
|
|
/* These definitions will be used unless LOGGING is defined. */
|
||
|
|
#define LOG(e)
|
||
|
|
|
||
|
|
#define BAILLOG(e) \
|
||
|
|
do { \
|
||
|
|
retval = e; \
|
||
|
|
} while (0)
|
||
|
|
|
||
|
|
#define BAIL_QUIET BAIL
|
||
|
|
|
||
|
|
#ifdef USE_NETCDF4
|
||
|
|
#ifndef ENABLE_SET_LOG_LEVEL
|
||
|
|
/* Define away any calls to nc_set_log_level(), if its not enabled. */
|
||
|
|
#define nc_set_log_level(e)
|
||
|
|
#endif /* ENABLE_SET_LOG_LEVEL */
|
||
|
|
#endif
|
||
|
|
|
||
|
|
#endif /* LOGGING */
|
||
|
|
|
||
|
|
/* To log an error message (if 'LOGGING' is defined), set retval, and jump to exit. */
|
||
|
|
#define BAIL(e) \
|
||
|
|
do { \
|
||
|
|
BAILLOG(e); \
|
||
|
|
goto exit; \
|
||
|
|
} while (0)
|
||
|
|
|
||
|
|
#endif /* _NCLOGGING_ */
|
||
|
|
|