1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* Copyright by The HDF Group. *
* Copyright by the Board of Trustees of the University of Illinois. *
* All rights reserved. *
* *
* This file is part of HDF5. The full HDF5 copyright notice, including *
* terms governing use, modification, and redistribution, is contained in *
* the COPYING file, which can be found at the root of the source code *
* distribution tree, or in https://support.hdfgroup.org/ftp/HDF5/releases. *
* If you do not have access to either file, you may request a copy from *
* help@hdfgroup.org. *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
/*
* A program to verify that the chunk indexing type of a dataset in a file
* is version 1 B-tree.
* This is to support the testing of the tool "h5format_convert".
*/
#include "hdf5.h"
#include "H5private.h"
#include "h5tools.h"
static void usage(void);
static void
usage(void)
{
HDfprintf(stdout, "Usage: h5fc_chk_idx file_name dataset_pathname\n");
} /* usage() */
/*-------------------------------------------------------------------------
* Function: main
*
* Purpose: To check that the chunk indexing type for the dataset in
* the file is version 1 B-tree.
*
* Return: 0 -- the indexing type is version 1 B-tree
* 1 -- otherwise
*
*-------------------------------------------------------------------------
*/
int
main(int argc, char *argv[])
{
char *fname = NULL;
char *dname = NULL;
hid_t fid = H5I_INVALID_HID;
hid_t did = H5I_INVALID_HID;
H5D_chunk_index_t idx_type;
/* h5fc_chk_idx fname dname */
if(argc != 3) {
usage();
HDexit(EXIT_FAILURE);
} /* end if */
/* Duplicate the file name & dataset name */
fname = HDstrdup(argv[1]);
dname = HDstrdup(argv[2]);
/* Try opening the file */
if((fid = h5tools_fopen(fname, H5F_ACC_RDONLY, H5P_DEFAULT, NULL, NULL, (size_t)0)) < 0) {
HDfprintf(stderr, "h5fc_chk_idx: unable to open the file\n");
HDexit(EXIT_FAILURE);
} /* end if */
/* Open the dataset */
if((did = H5Dopen2(fid, dname, H5P_DEFAULT)) < 0) {
HDfprintf(stderr, "h5fc_chk_idx: unable to open the dataset\n");
HDexit(EXIT_FAILURE);
} /* end if */
/* Get the dataset's chunk indexing type */
if(H5Dget_chunk_index_type(did, &idx_type) < 0) {
HDfprintf(stderr, "h5fc_chk_idx: unable to get chunk index type for the dataset\n");
HDexit(EXIT_FAILURE);
} /* end if */
/* Close the dataset */
if(H5Dclose(did) < 0) {
HDfprintf(stderr, "h5fc_chk_idx: unable to close the dataset\n");
HDexit(EXIT_FAILURE);
} /* end if */
/* Close the file */
if(H5Fclose(fid) < 0) {
HDfprintf(stderr, "h5fc_chk_idx_type: cannot close the file\n");
HDexit(EXIT_FAILURE);
} /* end if */
/* Return success when the chunk indexing type is version 1 B-tree */
if(idx_type == H5D_CHUNK_IDX_BTREE)
HDexit(EXIT_SUCCESS);
else {
HDfprintf(stderr, "Error: chunk indexing type is %d\n", idx_type);
HDexit(EXIT_FAILURE);
} /* end if */
} /* main() */
|
