int
main()
{
extern int ncopts; /* netCDF error options */
static char testfile[] = "testfile.nc";
ncopts &= ~NC_FATAL; /* make errors nonfatal */
ncopts &= ~NC_VERBOSE; /* turn off error messages */
test_nccreate(testfile);
test_ncopen(testfile);
test_ncredef(testfile);
test_ncendef(testfile);
test_ncclose(testfile);
test_ncinquire(testfile);
test_ncsync(testfile);
test_ncabort(testfile);
test_ncdimdef(testfile);
test_ncdimid(testfile);
test_ncdiminq(testfile);
test_ncdimrename(testfile);
test_ncvardef(testfile);
test_ncvarid(testfile);
test_ncvarinq(testfile);
test_ncvarput1(testfile);
test_ncvarget1(testfile);
test_ncvarput(testfile);
test_ncvarget(testfile);
test_ncvarputg(testfile);
test_ncvargetg(testfile);
test_ncrecinq(testfile);
test_ncrecput(testfile);
test_ncrecget(testfile);
test_ncvarrename(testfile);
test_ncattput(testfile);
test_ncattinq(testfile);
test_ncattget(testfile);
test_ncattcopy(testfile, "test2.nc");
test_ncattname(testfile);
test_ncattrename(testfile);
test_ncattdel(testfile);
test_nctypelen();
#ifdef vms
#define EXIT_SUCCESS 1
#else
#define EXIT_SUCCESS 0
#endif
return EXIT_SUCCESS;
}
int
main(int argc, char **argv)
{
extern int ncopts; /* netCDF error options */
char *testfiles[] = {"nonesuch", "nctest_classic.nc",
"nctest_64bit_offset.nc", "nctest_netcdf4.nc"};
char *testfile;
int i, nerrs = 0;
#ifdef USE_PARALLEL
MPI_Init(&argc, &argv);
#endif
ncopts &= ~NC_FATAL; /* make errors nonfatal */
ncopts &= ~NC_VERBOSE; /* turn off error messages */
fprintf(stderr, "Testing V2 API with %d different netCDF formats.\n",
NUM_FORMATS);
for (i = 1; i <= NUM_FORMATS; i++)
{
switch (i)
{
case NC_FORMAT_CLASSIC:
nc_set_default_format(NC_FORMAT_CLASSIC, NULL);
fprintf(stderr, "\n\nSwitching to netCDF classic format.\n");
break;
case NC_FORMAT_64BIT:
nc_set_default_format(NC_FORMAT_64BIT, NULL);
fprintf(stderr, "\n\nSwitching to 64-bit offset format.\n");
break;
#ifdef USE_NETCDF4
case NC_FORMAT_NETCDF4: /* actually it's _CLASSIC. */
nc_set_default_format(NC_FORMAT_NETCDF4_CLASSIC, NULL);
fprintf(stderr, "\n\nSwitching to netCDF-4 format (with NC_CLASSIC_MODEL).\n");
break;
#endif
default:
fprintf(stderr, "Unexpected format!\n");
return 2;
}
testfile = testfiles[i];
/* Run all the tests for this format. */
nerrs += test_nccreate(testfile);
nerrs += test_ncopen(testfile);
nerrs += test_ncredef(testfile);
nerrs += test_ncendef(testfile);
nerrs += test_ncclose(testfile);
nerrs += test_ncinquire(testfile);
nerrs += test_ncsync(testfile);
nerrs += test_ncabort(testfile);
nerrs += test_ncdimdef(testfile);
nerrs += test_ncdimid(testfile);
nerrs += test_ncdiminq(testfile);
nerrs += test_ncdimrename(testfile);
nerrs += test_ncvardef(testfile);
nerrs += test_ncvarid(testfile);
nerrs += test_ncvarinq(testfile);
nerrs += test_ncvarput1(testfile);
nerrs += test_ncvarget1(testfile);
nerrs += test_ncvarput(testfile);
nerrs += test_ncvarget(testfile);
nerrs += test_ncvarputg(testfile);
nerrs += test_ncvargetg(testfile);
nerrs += test_ncrecinq(testfile);
nerrs += test_ncrecput(testfile);
nerrs += test_ncrecget(testfile);
nerrs += test_ncvarrename(testfile);
nerrs += test_ncattput(testfile);
nerrs += test_ncattinq(testfile);
nerrs += test_ncattget(testfile);
nerrs += test_ncattcopy(testfile, "test2.nc");
nerrs += test_ncattname(testfile);
nerrs += test_ncattrename(testfile);
nerrs += test_ncattdel(testfile);
nerrs += test_nctypelen();
}
fprintf(stderr, "\nTotal number of failures: %d\n", nerrs);
if (nerrs)
{
fprintf(stderr, "nctest FAILURE!!!\n");
return 2;
}
else
fprintf(stderr, "nctest SUCCESS!!!\n");
#ifdef USE_PARALLEL
MPI_Finalize();
#endif
return 0;
}