Cloned library NetCDF-C-4.9.2 with extra build files for internal package management.
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.
 
 
 
 
 
 

67 lines
1.8 KiB

/*! \file
Copyright 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002,
2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014,
2015, 2016, 2017, 2018
University Corporation for Atmospheric Research/Unidata.
See \ref copyright file for more info.
* Test some illegal mode combinations
*
*/
#include "nc_tests.h"
#include "err_macros.h"
#include "netcdf_par.h"
#define FILE_NAME "tst_mode.nc"
int
main(int argc, char** argv)
{
int ncid,varid,dimid;
int retval;
printf("\n*** Testing illegal mode combinations\n");
MPI_Init(&argc,&argv);
printf("*** Testing create + MPIO + fletcher32\n");
if ((retval = nc_create_par(FILE_NAME, NC_CLOBBER|NC_NETCDF4, MPI_COMM_WORLD, MPI_INFO_NULL, &ncid))) ERR;
if ((retval = nc_def_dim(ncid,"whatever",10,&dimid))) ERR;
if ((retval = nc_def_var(ncid,"whatever",NC_INT,1,&dimid,&varid))) ERR;
retval = nc_def_var_fletcher32(ncid,varid,NC_FLETCHER32);
#ifdef HDF5_SUPPORTS_PAR_FILTERS
if(retval != NC_NOERR) ERR;
#else
if(retval != NC_EINVAL) ERR;
#endif
if ((retval = nc_abort(ncid)))
{
fprintf(stderr,"XXX: err=%d\n",retval);
fflush(stderr);
ERR;
}
printf("*** Testing create + MPIO + deflation\n");
if ((retval = nc_create_par(FILE_NAME, NC_CLOBBER|NC_NETCDF4, MPI_COMM_WORLD, MPI_INFO_NULL, &ncid))) ERR;
if ((retval = nc_def_dim(ncid,"whatever",10,&dimid))) ERR;
if ((retval = nc_def_var(ncid,"whatever",NC_INT,1,&dimid,&varid))) ERR;
retval = nc_def_var_deflate(ncid,varid, NC_NOSHUFFLE, 1, 1);
#ifdef HDF5_SUPPORTS_PAR_FILTERS
if(retval != NC_NOERR) ERR;
#else
if(retval != NC_EINVAL) ERR;
#endif
if ((retval = nc_abort(ncid))) {
fprintf(stderr,"XXX: nc_abort: %d\n",retval); fflush(stderr);
ERR;
}
MPI_Finalize();
SUMMARIZE_ERR;
FINAL_RESULTS;
}