2015-08-16 06:26:35 +08:00
|
|
|
/*********************************************************************
|
2018-12-07 05:34:40 +08:00
|
|
|
* Copyright 2018, UCAR/Unidata
|
2015-08-16 06:26:35 +08:00
|
|
|
* See netcdf/COPYRIGHT file for copying and redistribution conditions.
|
|
|
|
*********************************************************************/
|
|
|
|
|
|
|
|
#include "config.h"
|
|
|
|
|
|
|
|
#ifdef USE_PARALLEL
|
|
|
|
#include <mpi.h>
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#include "ncdispatch.h"
|
|
|
|
|
|
|
|
extern int NC3_initialize(void);
|
|
|
|
extern int NC3_finalize(void);
|
|
|
|
|
|
|
|
#ifdef USE_NETCDF4
|
2016-06-09 01:26:37 +08:00
|
|
|
#include "nc4internal.h"
|
2018-11-17 06:31:37 +08:00
|
|
|
#include "hdf5internal.h"
|
2015-08-16 06:26:35 +08:00
|
|
|
extern int NC4_initialize(void);
|
|
|
|
extern int NC4_finalize(void);
|
|
|
|
#endif
|
|
|
|
|
2018-11-26 20:35:44 +08:00
|
|
|
#ifdef USE_HDF5
|
|
|
|
extern int NC_HDF5_initialize(void);
|
|
|
|
extern int NC_HDF5_finalize(void);
|
|
|
|
#endif
|
|
|
|
|
2017-03-09 08:01:10 +08:00
|
|
|
#ifdef ENABLE_DAP2
|
2015-08-16 06:26:35 +08:00
|
|
|
extern int NCD2_initialize(void);
|
|
|
|
extern int NCD2_finalize(void);
|
|
|
|
#endif
|
|
|
|
|
2017-03-09 08:01:10 +08:00
|
|
|
#ifdef ENABLE_DAP4
|
|
|
|
extern int NCD4_initialize(void);
|
|
|
|
extern int NCD4_finalize(void);
|
|
|
|
#endif
|
|
|
|
|
2015-08-16 06:26:35 +08:00
|
|
|
#ifdef USE_PNETCDF
|
|
|
|
extern int NCP_initialize(void);
|
|
|
|
extern int NCP_finalize(void);
|
|
|
|
#endif
|
|
|
|
|
2018-02-08 21:20:58 +08:00
|
|
|
#ifdef USE_HDF4
|
2018-04-05 04:11:44 +08:00
|
|
|
extern int NC_HDF4_initialize(void);
|
|
|
|
extern int NC_HDF4_finalize(void);
|
2018-02-08 21:20:58 +08:00
|
|
|
#endif
|
|
|
|
|
2017-07-18 08:58:45 +08:00
|
|
|
#ifdef _MSC_VER
|
|
|
|
#include <io.h>
|
|
|
|
#include <fcntl.h>
|
|
|
|
#endif
|
|
|
|
|
2015-08-16 06:26:35 +08:00
|
|
|
int NC_initialized = 0;
|
|
|
|
int NC_finalized = 1;
|
|
|
|
|
|
|
|
/**
|
|
|
|
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 */
|
2016-05-04 11:17:06 +08:00
|
|
|
if((stat = NCDISPATCH_initialize())) goto done;
|
2015-08-16 06:26:35 +08:00
|
|
|
|
|
|
|
/* Initialize each active protocol */
|
2016-05-04 11:17:06 +08:00
|
|
|
if((stat = NC3_initialize())) goto done;
|
2017-03-09 08:01:10 +08:00
|
|
|
#ifdef ENABLE_DAP
|
2016-05-04 11:17:06 +08:00
|
|
|
if((stat = NCD2_initialize())) goto done;
|
2015-08-16 06:26:35 +08:00
|
|
|
#endif
|
2017-03-09 08:01:10 +08:00
|
|
|
#ifdef ENABLE_DAP4
|
|
|
|
if((stat = NCD4_initialize())) goto done;
|
|
|
|
#endif
|
2015-08-16 06:26:35 +08:00
|
|
|
#ifdef USE_PNETCDF
|
2016-05-04 11:17:06 +08:00
|
|
|
if((stat = NCP_initialize())) goto done;
|
2015-08-16 06:26:35 +08:00
|
|
|
#endif
|
|
|
|
#ifdef USE_NETCDF4
|
2016-05-04 11:17:06 +08:00
|
|
|
if((stat = NC4_initialize())) goto done;
|
2016-08-08 23:24:19 +08:00
|
|
|
#endif /* USE_NETCDF4 */
|
2018-11-26 20:35:44 +08:00
|
|
|
#ifdef USE_HDF5
|
|
|
|
if((stat = NC_HDF5_initialize())) goto done;
|
|
|
|
#endif
|
|
|
|
#ifdef USE_HDF4
|
|
|
|
if((stat = NC_HDF4_initialize())) goto done;
|
|
|
|
#endif
|
2016-05-04 11:17:06 +08:00
|
|
|
|
|
|
|
done:
|
|
|
|
return stat;
|
2015-08-16 06:26:35 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
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;
|
|
|
|
|
|
|
|
if(NC_finalized) return NC_NOERR;
|
|
|
|
NC_initialized = 0;
|
|
|
|
NC_finalized = 1;
|
|
|
|
|
|
|
|
/* Finalize each active protocol */
|
|
|
|
|
2017-03-09 08:01:10 +08:00
|
|
|
#ifdef ENABLE_DAP2
|
2015-08-16 06:26:35 +08:00
|
|
|
if((stat = NCD2_finalize())) return stat;
|
|
|
|
#endif
|
2017-03-09 08:01:10 +08:00
|
|
|
#ifdef ENABLE_DAP4
|
|
|
|
if((stat = NCD4_finalize())) return stat;
|
|
|
|
#endif
|
2015-08-16 06:26:35 +08:00
|
|
|
|
|
|
|
#ifdef USE_PNETCDF
|
|
|
|
if((stat = NCP_finalize())) return stat;
|
|
|
|
#endif
|
|
|
|
|
2018-04-05 04:11:44 +08:00
|
|
|
#ifdef USE_HDF4
|
|
|
|
if((stat = NC_HDF4_finalize())) return stat;
|
|
|
|
#endif /* USE_HDF4 */
|
|
|
|
|
2015-08-16 06:26:35 +08:00
|
|
|
#ifdef USE_NETCDF4
|
|
|
|
if((stat = NC4_finalize())) return stat;
|
|
|
|
#endif /* USE_NETCDF4 */
|
|
|
|
|
Provide byte-range reading of remote datasets
re: issue https://github.com/Unidata/netcdf-c/issues/1251
Assume that you have the URL to a remote dataset
which is a normal netcdf-3 or netcdf-4 file.
This PR allows the netcdf-c to read that dataset's
contents as a netcdf file using HTTP byte ranges
if the remote server supports byte-range access.
Originally, this PR was set up to access Amazon S3 objects,
but it can also access other remote datasets such as those
provided by a Thredds server via the HTTPServer access protocol.
It may also work for other kinds of servers.
Note that this is not intended as a true production
capability because, as is known, this kind of access to
can be quite slow. In addition, the byte-range IO drivers
do not currently do any sort of optimization or caching.
An additional goal here is to gain some experience with
the Amazon S3 REST protocol.
This architecture and its use documented in
the file docs/byterange.dox.
There are currently two test cases:
1. nc_test/tst_s3raw.c - this does a simple open, check format, close cycle
for a remote netcdf-3 file and a remote netcdf-4 file.
2. nc_test/test_s3raw.sh - this uses ncdump to investigate some remote
datasets.
This PR also incorporates significantly changed model inference code
(see the superceded PR https://github.com/Unidata/netcdf-c/pull/1259).
1. It centralizes the code that infers the dispatcher.
2. It adds support for byte-range URLs
Other changes:
1. NC_HDF5_finalize was not being properly called by nc_finalize().
2. Fix minor bug in ncgen3.l
3. fix memory leak in nc4info.c
4. add code to walk the .daprc triples and to replace protocol=
fragment tag with a more general mode= tag.
Final Note:
Th inference code is still way too complicated. We need to move
to the validfile() model used by netcdf Java, where each
dispatcher is asked if it can process the file. This decentralizes
the inference code. This will be done after all the major new
dispatchers (PIO, Zarr, etc) have been implemented.
2019-01-02 09:27:36 +08:00
|
|
|
#ifdef USE_HDF5
|
|
|
|
if((stat = NC_HDF5_finalize())) return stat;
|
|
|
|
#endif
|
|
|
|
|
2015-08-16 06:26:35 +08:00
|
|
|
if((stat = NC3_finalize())) return stat;
|
|
|
|
|
|
|
|
/* Do general finalization */
|
|
|
|
if((stat = NCDISPATCH_finalize())) return stat;
|
|
|
|
|
|
|
|
return NC_NOERR;
|
|
|
|
}
|