summaryrefslogtreecommitdiffstats
path: root/hl/examples/ptExampleVL.c
diff options
context:
space:
mode:
authorJames Laird <jlaird@hdfgroup.org>2005-12-09 20:59:11 (GMT)
committerJames Laird <jlaird@hdfgroup.org>2005-12-09 20:59:11 (GMT)
commitb1fd3f565750a18246239cdac50e433d6d668524 (patch)
treef09179e1fb2a04e01983c85f9a3873c159fefda7 /hl/examples/ptExampleVL.c
parent9124030f911f002bd49ec8bccd4c051df410cc72 (diff)
downloadhdf5-b1fd3f565750a18246239cdac50e433d6d668524.zip
hdf5-b1fd3f565750a18246239cdac50e433d6d668524.tar.gz
hdf5-b1fd3f565750a18246239cdac50e433d6d668524.tar.bz2
[svn-r11780] Purpose:
Added high-level example directories Description: Refactored common code out of examples Makefiles.am, added high-level example directories, added packet table examples. Solution: Examples now draw from a common config/examples.am file, which contains rules for installing, uninstalling, and cleaning examples. High-level example directories are mostly empty, except for the C and C++ packet table tests. Platforms tested: mir, sleipnir, copper, shanti
Diffstat (limited to 'hl/examples/ptExampleVL.c')
-rw-r--r--hl/examples/ptExampleVL.c118
1 files changed, 118 insertions, 0 deletions
diff --git a/hl/examples/ptExampleVL.c b/hl/examples/ptExampleVL.c
new file mode 100644
index 0000000..68a01c7
--- /dev/null
+++ b/hl/examples/ptExampleVL.c
@@ -0,0 +1,118 @@
+/****************************************************************************
+ * NCSA HDF *
+ * Scientific Data Technologies *
+ * National Center for Supercomputing Applications *
+ * University of Illinois at Urbana-Champaign *
+ * 605 E. Springfield, Champaign IL 61820 *
+ * *
+ * For conditions of distribution and use, see the accompanying *
+ * hdf/COPYING f. *
+ * *
+ ****************************************************************************/
+
+#include "H5PT.h"
+#include <stdlib.h>
+
+/*-------------------------------------------------------------------------
+ * Packet Table Variable-Length Example
+ *
+ * Example program that creates a variable-length packet table and performs
+ * writes and reads.
+ *
+ *-------------------------------------------------------------------------
+ */
+
+int main(void)
+{
+ hid_t fid; /* File identifier */
+ hid_t ptable; /* Packet table identifier */
+
+ herr_t err; /* Function return status */
+ hsize_t count; /* Number of records in the table */
+ int x; /* Loop variable */
+
+ /* Buffers to hold data */
+ hvl_t writeBuffer[5];
+ hvl_t readBuffer[5];
+
+ /* This example has two different sizes of "record": longs and shorts */
+ long longBuffer[5];
+ short shortBuffer[5];
+
+ /* Initialize buffers */
+ for(x=0; x<5; x++)
+ {
+ longBuffer[x] = -x;
+ shortBuffer[x] = x;
+ }
+
+ /* Fill the write buffer with a mix of longs and shorts */
+ /* We need to supply the length of each record and a pointer to */
+ /* the beginning of each record. */
+ writeBuffer[0].len = sizeof(long);
+ writeBuffer[0].p = &(longBuffer[0]);
+ writeBuffer[1].len = sizeof(short);
+ writeBuffer[1].p = &(shortBuffer[1]);
+ writeBuffer[2].len = sizeof(long);
+ writeBuffer[2].p = &(longBuffer[2]);
+ writeBuffer[3].len = sizeof(long);
+ writeBuffer[3].p = &(longBuffer[3]);
+ writeBuffer[4].len = sizeof(short);
+ writeBuffer[4].p = &(shortBuffer[4]);
+
+ /* Create a file using default properties */
+ fid=H5Fcreate("packet_table_VLexample.h5",H5F_ACC_TRUNC,H5P_DEFAULT,H5P_DEFAULT);
+
+ /* Create a variable-length packet table within the file */
+ ptable = H5PTcreate_vl(fid, "Packet Test Dataset", 1);
+ if(ptable == H5I_INVALID_HID)
+ goto out;
+
+ /* Write the entire buffer to the packet table */
+ err = H5PTappend(ptable, 5, writeBuffer );
+ if(err < 0)
+ goto out;
+
+ /* Get the number of packets in the packet table. This should be five. */
+ err = H5PTget_num_packets(ptable, &count);
+ if(err < 0)
+ goto out;
+
+ printf("Number of packets in packet table after five appends: %d\n", count);
+
+ /* Read all five packets back */
+ err = H5PTread_packets(ptable, 0, 5, readBuffer );
+ if(err < 0)
+ goto out;
+
+ for(x=0; x<5; x++)
+ {
+ printf("Packet %d's length is %d\n", x, readBuffer[x].len);
+ if(readBuffer[x].len == sizeof(long))
+ printf("Packet %d's value is %d\n", x, *( (long *) readBuffer[x].p) );
+ else
+ printf("Packet %d's value is %d\n", x, *( (short *) readBuffer[x].p) );
+ }
+
+ /* Before we close the packet table, we must free the memory that */
+ /* the pointers in readBuffer point to. */
+ err = H5PTfree_vlen_readbuff(ptable, 5, readBuffer);
+ if(err < 0)
+ goto out;
+
+ /* Close the packet table */
+ err = H5PTclose(ptable);
+ if(err < 0)
+ goto out;
+
+ /* Close the file */
+ H5Fclose(fid);
+
+ return 0;
+
+ out: /* An error has occurred. Clean up and exit. */
+ fprintf(stderr, "An error has occurred!\n");
+ H5PTclose(ptable);
+ H5Fclose(fid);
+ return -1;
+}