summaryrefslogtreecommitdiffstats
path: root/tools/h5import.c
diff options
context:
space:
mode:
Diffstat (limited to 'tools/h5import.c')
-rw-r--r--tools/h5import.c141
1 files changed, 0 insertions, 141 deletions
diff --git a/tools/h5import.c b/tools/h5import.c
deleted file mode 100644
index e896feb..0000000
--- a/tools/h5import.c
+++ /dev/null
@@ -1,141 +0,0 @@
-/*
- * 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 H5_STDC_HEADERS
-# include <fcntl.h>
-# include <string.h>
-# include <stdlib.h>
-# include <stdio.h>
-#endif
-
-#ifdef H5_HAVE_UNISTD_H
-# include <sys/types.h>
-# include <unistd.h>
-#endif
-
-#ifdef H5_HAVE_SYS_STAT_H
-# include <sys/stat.h>
-#endif
-
-#ifdef WIN32
-#include <io.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;
-}