mirror of
https://github.com/Unidata/netcdf-c.git
synced 2024-12-15 08:30:11 +08:00
69ed78e7d7
# Primary Change In order to conform to the cmake overhaul, occurrences of ENABLE_XXX options in the nczarr code have been changed to NETCDF_ENABLE_XXX. # Misc. Other changes * Fix use of rand_s in libdispatch/ncrandom.c * Fix some bugs in the mingw gitub action. * Fix signature bug in libncpoco/cp_win32.c * Make some NCZarr fixes to config.h.cmake.in
186 lines
3.9 KiB
C
186 lines
3.9 KiB
C
/*********************************************************************
|
|
* Copyright 2018, UCAR/Unidata
|
|
* See netcdf/COPYRIGHT file for copying and redistribution conditions.
|
|
*********************************************************************/
|
|
|
|
#include "config.h"
|
|
|
|
#ifdef USE_PARALLEL
|
|
#include <mpi.h>
|
|
#endif
|
|
|
|
#include "ncdispatch.h"
|
|
|
|
#ifdef USE_NETCDF4
|
|
#include "nc4internal.h"
|
|
#endif
|
|
|
|
#ifdef USE_HDF5
|
|
#include "hdf5internal.h"
|
|
extern int NC_HDF5_initialize(void);
|
|
extern int NC_HDF5_finalize(void);
|
|
#endif
|
|
|
|
#ifdef NETCDF_ENABLE_DAP2
|
|
extern int NCD2_initialize(void);
|
|
extern int NCD2_finalize(void);
|
|
#endif
|
|
|
|
#ifdef NETCDF_ENABLE_DAP4
|
|
extern int NCD4_initialize(void);
|
|
extern int NCD4_finalize(void);
|
|
#endif
|
|
|
|
|
|
#ifdef USE_PNETCDF
|
|
extern int NCP_initialize(void);
|
|
extern int NCP_finalize(void);
|
|
#endif
|
|
|
|
#ifdef USE_HDF4
|
|
extern int NC_HDF4_initialize(void);
|
|
extern int NC_HDF4_finalize(void);
|
|
#endif
|
|
|
|
#ifdef NETCDF_ENABLE_S3
|
|
EXTERNL int NC_s3sdkinitialize(void);
|
|
EXTERNL int NC_s3sdkfinalize(void);
|
|
#endif
|
|
|
|
#ifdef _MSC_VER
|
|
#include <io.h>
|
|
#include <fcntl.h>
|
|
#endif
|
|
|
|
int NC_initialized = 0;
|
|
int NC_finalized = 1;
|
|
|
|
#ifdef NETCDF_ENABLE_ATEXIT_FINALIZE
|
|
/* Provide the void function to give to atexit() */
|
|
static void
|
|
finalize_atexit(void)
|
|
{
|
|
(void)nc_finalize();
|
|
}
|
|
#endif
|
|
|
|
/**
|
|
This procedure invokes all defined
|
|
initializers, and there is an initializer
|
|
for every known dispatch table.
|
|
So if you modify the format of NC_Dispatch,
|
|
then you need to fix it everywhere.
|
|
It also initializes appropriate external libraries.
|
|
*/
|
|
|
|
int
|
|
nc_initialize()
|
|
{
|
|
int stat = NC_NOERR;
|
|
|
|
if(NC_initialized) return NC_NOERR;
|
|
NC_initialized = 1;
|
|
NC_finalized = 0;
|
|
|
|
/* Do general initialization */
|
|
if((stat = NCDISPATCH_initialize())) goto done;
|
|
|
|
/* Initialize each active protocol */
|
|
if((stat = NC3_initialize())) goto done;
|
|
#ifdef NETCDF_ENABLE_DAP
|
|
if((stat = NCD2_initialize())) goto done;
|
|
#endif
|
|
#ifdef NETCDF_ENABLE_DAP4
|
|
if((stat = NCD4_initialize())) goto done;
|
|
#endif
|
|
#ifdef USE_PNETCDF
|
|
if((stat = NCP_initialize())) goto done;
|
|
#endif
|
|
#ifdef USE_NETCDF4
|
|
if((stat = NC4_initialize())) goto done;
|
|
#endif /* USE_NETCDF4 */
|
|
#ifdef USE_HDF5
|
|
if((stat = NC_HDF5_initialize())) goto done;
|
|
#endif
|
|
#ifdef USE_HDF4
|
|
if((stat = NC_HDF4_initialize())) goto done;
|
|
#endif
|
|
#ifdef NETCDF_ENABLE_S3
|
|
if((stat = NC_s3sdkinitialize())) goto done;
|
|
#endif
|
|
#ifdef NETCDF_ENABLE_NCZARR
|
|
if((stat = NCZ_initialize())) goto done;
|
|
#endif
|
|
|
|
#ifdef NETCDF_ENABLE_ATEXIT_FINALIZE
|
|
/* Use atexit() to invoke nc_finalize */
|
|
if(atexit(finalize_atexit))
|
|
fprintf(stderr,"atexit failed\n");
|
|
#endif
|
|
|
|
done:
|
|
return stat;
|
|
}
|
|
|
|
/**
|
|
This procedure invokes all defined
|
|
finalizers, and there should be one
|
|
for every known dispatch table.
|
|
So if you modify the format of NC_Dispatch,
|
|
then you need to fix it everywhere.
|
|
It also finalizes appropriate external libraries.
|
|
*/
|
|
|
|
int
|
|
nc_finalize(void)
|
|
{
|
|
int stat = NC_NOERR;
|
|
int failed = stat;
|
|
|
|
if(NC_finalized) goto done;
|
|
NC_initialized = 0;
|
|
NC_finalized = 1;
|
|
|
|
/* Finalize each active protocol */
|
|
|
|
#ifdef NETCDF_ENABLE_DAP2
|
|
if((stat = NCD2_finalize())) failed = stat;
|
|
#endif
|
|
#ifdef NETCDF_ENABLE_DAP4
|
|
if((stat = NCD4_finalize())) failed = stat;
|
|
#endif
|
|
|
|
#ifdef USE_PNETCDF
|
|
if((stat = NCP_finalize())) failed = stat;
|
|
#endif
|
|
|
|
#ifdef USE_HDF4
|
|
if((stat = NC_HDF4_finalize())) failed = stat;
|
|
#endif /* USE_HDF4 */
|
|
|
|
#ifdef USE_NETCDF4
|
|
if((stat = NC4_finalize())) failed = stat;
|
|
#endif /* USE_NETCDF4 */
|
|
|
|
#ifdef USE_HDF5
|
|
if((stat = NC_HDF5_finalize())) failed = stat;
|
|
#endif
|
|
|
|
#ifdef NETCDF_ENABLE_NCZARR
|
|
if((stat = NCZ_finalize())) failed = stat;
|
|
#endif
|
|
|
|
#ifdef NETCDF_ENABLE_S3
|
|
if((stat = NC_s3sdkfinalize())) failed = stat;
|
|
#endif
|
|
|
|
if((stat = NC3_finalize())) failed = stat;
|
|
|
|
/* Do general finalization */
|
|
if((stat = NCDISPATCH_finalize())) failed = stat;
|
|
|
|
done:
|
|
if(failed) fprintf(stderr,"nc_finalize failed: %d\n",failed);
|
|
return failed;
|
|
}
|