summaryrefslogtreecommitdiffstats
path: root/test/srb_append.c
diff options
context:
space:
mode:
Diffstat (limited to 'test/srb_append.c')
-rw-r--r--test/srb_append.c196
1 files changed, 0 insertions, 196 deletions
diff --git a/test/srb_append.c b/test/srb_append.c
deleted file mode 100644
index e752b4a..0000000
--- a/test/srb_append.c
+++ /dev/null
@@ -1,196 +0,0 @@
-/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
- * 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 files COPYING and Copyright.html. COPYING can be found at the root *
- * of the source code distribution tree; Copyright.html can be found at the *
- * root level of an installed copy of the electronic HDF5 document set and *
- * is linked from the top-level documents page. It can also be found at *
- * http://hdf.ncsa.uiuc.edu/HDF5/doc/Copyright.html. If you do not have *
- * access to either file, you may request a copy from hdfhelp@ncsa.uiuc.edu. *
- * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
-
-/*
- * Programmer: Raymond Lu <slu@ncsa.uiuc.edu>
- * April 14, 2000
- *
- * Purpose: Test HDF-SRB if it is configured and compiled. Append an
- * integer dataset to an existent HDF5 file with an integer array
- * on SRB server.
- *
- * Usage: The HDF5 is built on the top of SRB. So you just need to
- * activate a connection to SRB server by calling function
- * H5Pset_fapl_srb()(after creating file property list by calling
- * H5Pcreate()). All server information is passed in through its
- * parameter SRB_Info(a structure). Its fields are
- * char *srbHost: SRB host address of server. If the input is
- * NULL, it will use the environment varible "srbHost" if
- * it is defined. If it is not defined, the
- * ~/.srb/.MdasEnd file will be checked next. If not, it
- * will use the hostname of the client machine.
- * char *srbPort: SRB host port number of server. If the
- * input value is NULL, it will use the env variable
- * "srbPort" if it is defined. If not, it defaults to
- * 5558.
- * char *srbAuth: SRB Authentication-password. It is used to
- * define password for MDAS or SEA authentication.
- * For SEA authentication, this is the password used by
- * the SEA library to decrypt the encrypted private key
- * stored in the file ~/.SEAuuuuu@ddddd(where uuuuu is
- * the user ID and ddddd is the user domain name). This
- * input is not needed if an unencrypted private key is
- * available in the /tmp directory(generated using the
- * 'seaauth auto' command). To provide additional
- * flexibility, a client may also use the environment
- * variable "srbAuth" to specify the password. A client
- * may also supply the password in the ~/.srb/.MdasAuth
- * file. If a client uses more than one method to specfy
- * the password, the value given in this function call
- * will take precedent, then the environment variable
- * "srbAuth", and lastly, the ~/.srb/.MdasAuth file.
- * int storSysType: Storage system type on SRB server.
- * 0=Unix, 1=UniTree, 2=HPSS, 3=FTP, 4=HTTP
- * int mode: File access mode, same definition with Unix.
- * int size: File Size, only valid for HPSS, -1 is default
- *
- * Then you can open an HDF5 file by calling H5Fopen(). When
- * you pass in the file name, it has to be file name with an
- * absolute path. It you use SDSC server(ghidorah.sdsc.edu), your
- * home directory is possibly in /projects/mdas/srb/SRBVault/.
- */
-#include "h5test.h"
-
-#ifndef H5_HAVE_SRB
-int main(void)
-{
- printf("Test skipped because SRB driver not available\n");
- return 0;
-}
-#else
-
-#define fileName "/projects/mdas/srb/SRBVault/slu.ncsa/a.h5"
-#define DATASETNAME "Int1Array"
-#define NX 5 /* dataset dimensions */
-#define NY 6
-#define RANK 2
-
-int main(void)
-{
- SRB_Info srb_info={ NULL, /* Use the server name in ~/.srb/MdasEnv */
- NULL, /* Use the server port number in
- * ~/.srb/MdasEnv */
- NULL, /* Use the password in ~/.srb/MdasAuth */
- 0, /* Using Unix storage system. */
- 0600, /* Open file for read and write for owner */
- -1 /* default */
- };
- hid_t fapl =-1, file;
- hid_t dataspace, datatype, dataset;
- hsize_t dimsf[2];
-
- herr_t status = 0;
- int data[NX][NY]; /* data to write */
- int i, j;
-
- /*
- * Data and output buffer initialization.
- */
- for (j = 0; j < NX; j++) {
- for (i = 0; i < NY; i++)
- data[j][i] = i*i + j*j;
- }
- /*
- * 0 1 4 9 16 25
- * 1 2 5 10 17 26
- * 4 5 8 13 20 29
- * 9 10 13 18 25 34
- * 16 17 20 25 32 41
- */
-
- /* Create access property list and set the driver to SRB */
- fapl = H5Pcreate (H5P_FILE_ACCESS);
- if (fapl < 0) {
- printf (" H5Pcreate failed. \n");
- return -1;
- }
- status = H5Pset_fapl_srb (fapl, srb_info);
- if (status < 0) {
- printf ("H5Pset_fapl_srb failed. \n");
- return -1;
- }
-
- /*
- * Open an existing file using H5F_ACC_RDWR access,
- * and srb file access properties.
- */
- file = H5Fopen(fileName, H5F_ACC_RDWR, fapl);
- if (file < 0) {
- printf ("H5Fopen failed. \n");
- return -1;
- }
-
- /*
- * Describe the size of the array and create the data space for fixed
- * size dataset.
- */
- dimsf[0] = NX;
- dimsf[1] = NY;
- dataspace = H5Screate_simple(RANK, dimsf, NULL);
- if (dataspace < 0) {
- printf ("H5Screate failed. \n");
- return -1;
- }
-
- /*
- * Define datatype for the data in the file.
- * We will store little endian INT numbers.
- */
- datatype = H5Tcopy(H5T_NATIVE_INT);
- if (datatype < 0) {
- printf ("H5Tcopy failed. \n");
- return -1;
- }
-
- status = H5Tset_order(datatype, H5T_ORDER_LE);
- if (status < 0) {
- printf ("H5Tset_order failed. \n");
- return -1;
- }
-
- /*
- * Create a new dataset within the file using defined dataspace and
- * datatype and default dataset creation properties.
- */
- dataset = H5Dcreate(file, DATASETNAME, datatype, dataspace,
- H5P_DEFAULT);
- if (dataset < 0) {
- printf ("H5Dcreate failed. \n");
- return -1;
- }
-
- /*
- * Write the data to the dataset using default transfer properties.
- */
- status = H5Dwrite(dataset, H5T_NATIVE_INT, H5S_ALL, H5S_ALL,
- H5P_DEFAULT, data);
- if (status < 0) {
- printf ("H5Dwrite failed. \n");
- return -1;
- }
-
- /*
- * Close/release resources.
- */
- H5Sclose(dataspace);
- H5Tclose(datatype);
- H5Dclose(dataset);
- H5Fclose(file);
- H5Pclose(fapl);
-
- printf("Test finished!\n");
- return 0;
-}
-
-#endif