10 files changed, 2952 insertions, 25 deletions
diff --git a/api/examples/glfsxmp.c b/api/examples/glfsxmp.c
index 644793a4b1a..8231a3949f0 100644
--- a/api/examples/glfsxmp.c
+++ b/api/examples/glfsxmp.c
@@ -1,6 +1,8 @@
 #include <stdio.h>
+#include <stdlib.h>
 #include <errno.h>
 #include "api/glfs.h"
+#include "api/glfs-handles.h"
 #include <string.h>
 #include <time.h>
 
@@ -133,11 +135,1357 @@ test_chdir (glfs_t *fs)
 	return 0;
 }
 
+#ifdef DEBUG
+static void
+peek_stat (struct stat *sb)
+{
+	printf ("Dumping stat information:\n");
+	printf ("File type:                ");
+
+	switch (sb->st_mode & S_IFMT) {
+		case S_IFBLK:  printf ("block device\n");            break;
+		case S_IFCHR:  printf ("character device\n");        break;
+		case S_IFDIR:  printf ("directory\n");               break;
+		case S_IFIFO:  printf ("FIFO/pipe\n");               break;
+		case S_IFLNK:  printf ("symlink\n");                 break;
+		case S_IFREG:  printf ("regular file\n");            break;
+		case S_IFSOCK: printf ("socket\n");                  break;
+		default:       printf ("unknown?\n");                break;
+	}
+
+	printf ("I-node number:            %ld\n", (long) sb->st_ino);
+
+	printf ("Mode:                     %lo (octal)\n",
+		(unsigned long) sb->st_mode);
+
+	printf ("Link count:               %ld\n", (long) sb->st_nlink);
+	printf ("Ownership:                UID=%ld   GID=%ld\n",
+		(long) sb->st_uid, (long) sb->st_gid);
+
+	printf ("Preferred I/O block size: %ld bytes\n",
+		(long) sb->st_blksize);
+	printf ("File size:                %lld bytes\n",
+		(long long) sb->st_size);
+	printf ("Blocks allocated:         %lld\n",
+		(long long) sb->st_blocks);
+
+	printf ("Last status change:       %s", ctime(&sb->st_ctime));
+	printf ("Last file access:         %s", ctime(&sb->st_atime));
+	printf ("Last file modification:   %s", ctime(&sb->st_mtime));
+
+	return;
+}
+
+static void
+peek_handle (unsigned char *glid)
+{
+	int i;
+
+	for (i = 0; i < GFAPI_HANDLE_LENGTH; i++)
+	{
+		printf (":%02x:", glid[i]);
+	}
+	printf ("\n");
+}
+#else /* DEBUG */
+static void
+peek_stat (struct stat *sb)
+{
+	return;
+}
+
+static void
+peek_handle (unsigned char *id)
+{
+	return;
+}
+#endif /* DEBUG */
+
+glfs_t    *fs = NULL;
+char      *full_parent_name = "/testdir", *parent_name = "testdir";
+
+void
+test_h_unlink (void)
+{
+	char               *my_dir = "unlinkdir";
+	char               *my_file = "file.txt";
+	char               *my_subdir = "dir1";
+	struct glfs_object *parent = NULL, *leaf = NULL, *dir = NULL,
+			   *subdir = NULL, *subleaf = NULL;
+	struct stat         sb;
+	int                 ret;
+
+	printf ("glfs_h_unlink tests: In Progress\n");