1 files changed, 64 insertions, 0 deletions
diff --git a/src/tc-realpath.c b/src/tc-realpath.c
new file mode 100644
index 0000000..5dd9aa2
--- /dev/null
+++ b/src/tc-realpath.c
@@ -0,0 +1,64 @@
+/*
+ *	Test utility for libHX's realpath
+ *	Copyright Jan Engelhardt
+ *
+ *	This program is free software; you can redistribute it and/or
+ *	modify it under the terms of the WTF Public License version 2 or
+ *	(at your option) any later version.
+ */
+#include <stdbool.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <libHX/io.h>
+#include <libHX/option.h>
+
+static unsigned int rp_flags;
+static unsigned int rp_absolute;
+static unsigned int rp_no_parent, rp_no_self;
+
+static const struct HXoption rp_option_table[] = {
+	{.sh = 'a', .type = HXTYPE_NONE, .ptr = &rp_absolute,
+	 .help = "Produce an absolute path"},
+	{.sh = 'p', .type = HXTYPE_NONE, .ptr = &rp_no_parent,
+	 .help = "Deactivate resolution of \"..\" entries"},
+	{.sh = 's', .type = HXTYPE_NONE, .ptr = &rp_no_self,
+	 .help = "Deactivate resolution of \".\" entries"},
+	HXOPT_AUTOHELP,
+	HXOPT_TABLEEND,
+};
+
+static bool rp_get_options(int *argc, const char ***argv)
+{
+	if (HX_getopt(rp_option_table, argc, argv, HXOPT_USAGEONERR) !=
+	    HXOPT_ERR_SUCCESS)
+		return false;
+	rp_flags = HX_REALPATH_DEFAULT;
+	if (rp_absolute)
+		rp_flags |= HX_REALPATH_ABSOLUTE;
+	if (rp_no_parent)
+		rp_flags &= ~HX_REALPATH_PARENT;
+	if (rp_no_self)
+		rp_flags &= ~HX_REALPATH_SELF;
+	return true;
+}
+
+int main(int argc, const char **argv)
+{
+	hxmc_t *res;
+	int ret;
+
+	if (!rp_get_options(&argc, &argv))
+		return EXIT_FAILURE;
+
+	res = NULL;
+	while (--argc > 0) {
+		ret = HX_realpath(&res, *++argv, rp_flags);
+		if (ret < 0) {
+			perror("HX_realpath");
+			printf("\n");
+		} else {
+			printf("%s\n", res);
+		}
+	}
+	return EXIT_SUCCESS;
+}