mirror of
https://github.com/HDFGroup/hdf5.git
synced 2026-10-07 04:02:30 +03:00
Robb Matzke
ffcbc32d66
---------------------- ./doc/html/Datatypes.html ./src/H5.c ./src/H5T.c ./src/H5Tconv.c ./src/H5Tpkg.h ./src/H5Tpublic.h ./src/H5detect.c ./test/chunk.c ./test/dtypes.c ./test/h5test.c ./test/mtime.c ./test/tattr.c ./test/th5s.c ./tools/h5dump.c ./tools/h5dumputil.c ./tools/h5import.c ./tools/h5ls.c ./tools/h5toh4.c ./tools/h5tools.c Renamed the old H5T_NATIVE_CHAR type to H5T_NATIVE_SCHAR to denote that it is always signed. Added a new H5T_NATIVE_CHAR type which has the same range, representation, and behavior as either H5T_NATIVE_SCHAR or H5T_NATIVE_UCHAR depending on the compiler and its command-line switches for the application source file which references H5T_NATIVE_CHAR. If source files are compiled with different switches then each source file will resolve H5T_NATIVE_CHAR appropriately so it matches the C type `char' in that source file. NOTE: THERE ARE OTHER DOCUMENTATION FILES THAT I DIDN'T CHANGE BECAUSE I CAN'T MODIFY THE SOURCE. ./test/extend.c Swapped two lines to prevent diagnostic messages from messing up the formatted output.
139 lines
2.8 KiB
C
139 lines
2.8 KiB
C
/*
|
|
* Copyright (C) 1998 NCSA
|
|
* All rights reserved.
|
|
*
|
|
* Programmer: Robb Matzke <matzke@llnl.gov>
|
|
* Thursday, June 11, 1998
|
|
*
|
|
* Purpose: Create an hdf5 file with a 1d dataset of uint8.
|
|
*/
|
|
|
|
/* See H5private.h for how to include system headers */
|
|
#include <hdf5.h>
|
|
#ifdef STDC_HEADERS
|
|
# include <fcntl.h>
|
|
# include <string.h>
|
|
# include <stdlib.h>
|
|
# include <stdio.h>
|
|
#endif
|
|
|
|
#ifdef HAVE_UNISTD_H
|
|
# include <sys/types.h>
|
|
# include <unistd.h>
|
|
#endif
|
|
|
|
#ifdef HAVE_SYS_STAT_H
|
|
# include <sys/stat.h>
|
|
#endif
|
|
|
|
|
|
|
|
/*-------------------------------------------------------------------------
|
|
* Function: usage
|
|
*
|
|
* Purpose: Print a usage message and exit with non-zero status
|
|
*
|
|
* Return: never returns
|
|
*
|
|
* Programmer: Robb Matzke
|
|
* Thursday, June 11, 1998
|
|
*
|
|
* Modifications:
|
|
*
|
|
*-------------------------------------------------------------------------
|
|
*/
|
|
static void
|
|
usage (const char *argv0)
|
|
{
|
|
fprintf (stderr, "Usage: %s -f HDF5-FILE FILES...\n", argv0);
|
|
exit (1);
|
|
}
|
|
|
|
|
|
/*-------------------------------------------------------------------------
|
|
* Function: main
|
|
*
|
|
* Purpose:
|
|
*
|
|
* Return: Success: 0
|
|
*
|
|
* Failure: 1
|
|
*
|
|
* Programmer: Robb Matzke
|
|
* Thursday, June 11, 1998
|
|
*
|
|
* Modifications:
|
|
*
|
|
*-------------------------------------------------------------------------
|
|
*/
|
|
int
|
|
main (int argc, char *argv[])
|
|
{
|
|
hid_t file, space=-1, dset=-1;
|
|
const char *output_name, *dset_name;
|
|
int argno, fd=-1;
|
|
hsize_t size[1];
|
|
struct stat sb;
|
|
|
|
/* Parse arguments */
|
|
if (argc<4) usage (argv[0]);
|
|
if (strcmp (argv[1], "-f")) usage (argv[0]);
|
|
output_name = argv[2];
|
|
|
|
/* create the file */
|
|
H5E_BEGIN_TRY {
|
|
if ((file = H5Fcreate (output_name, H5F_ACC_EXCL,
|
|
H5P_DEFAULT, H5P_DEFAULT))<0 &&
|
|
(file = H5Fopen (output_name, H5F_ACC_RDWR, H5P_DEFAULT)<0)) {
|
|
fprintf (stderr, "%s: unable to create or open hdf5 file\n",
|
|
output_name);
|
|
exit (1);
|
|
}
|
|
} H5E_END_TRY;
|
|
|
|
/* process files from command-line */
|
|
for (argno=3; argno<argc; argno++) {
|
|
|
|
/* Open the file */
|
|
if ((dset_name=strrchr (argv[argno], '/'))) dset_name++;
|
|
else dset_name = argv[argno];
|
|
fprintf (stderr, "%s\n", dset_name);
|
|
if ((fd=open (argv[argno], O_RDONLY))<0) {
|
|
perror (argv[argno]);
|
|
goto next;
|
|
}
|
|
if (fstat (fd, &sb)<0) {
|
|
perror (argv[argno]);
|
|
goto next;
|
|
}
|
|
|
|
/* Data space */
|
|
size[0] = sb.st_size;
|
|
if ((space = H5Screate_simple (1, size, size))<0) goto next;
|
|
|
|
/* Dataset */
|
|
if ((dset=H5Dcreate (file, dset_name, H5T_NATIVE_SCHAR,
|
|
space, H5P_DEFAULT))<0) goto next;
|
|
|
|
|
|
|
|
next:
|
|
if (fd>=0) close (fd);
|
|
fd = -1;
|
|
H5E_BEGIN_TRY {
|
|
if (space>=0) {
|
|
H5Sclose (space);
|
|
space = -1;
|
|
}
|
|
if (dset>=0) {
|
|
H5Dclose (dset);
|
|
dset = -1;
|
|
}
|
|
} H5E_END_TRY;
|
|
}
|
|
|
|
/* Close the file */
|
|
H5Fclose (file);
|
|
return 0;
|
|
}
|