test: Add simple test cases for functions in src/StrToShap.c

Signed-off-by: Alan Coopersmith <alan.coopersmith@oracle.com>

2 files changed, 202 insertions, 1 deletions

diff --git a/test/Makefile.am b/test/Makefile.am
index 5fc2310..807276a 100644
--- a/test/Makefile.am
+++ b/test/Makefile.am
@@ -39,7 +39,8 @@ check_PROGRAMS = \
         StrToGrav \
         StrToJust \
         StrToLong \
-        StrToOrnt
+        StrToOrnt \
+        StrToShap
 TESTS = $(check_PROGRAMS)
 
 TESTS_ENVIRONMENT = $(MALLOC_DEBUG_ENV)
@@ -77,6 +78,9 @@ StrToLong_LDADD = $(XMU_TEST_LIBS)
 StrToOrnt_SOURCES = StrToOrnt.c
 StrToOrnt_LDADD = $(XMU_TEST_LIBS)
 
+StrToShap_SOURCES = StrToShap.c
+StrToShap_LDADD = $(XMU_TEST_LIBS)
+
 endif HAVE_GLIB
 endif ENABLE_UNIT_TESTS
 
diff --git a/test/StrToShap.c b/test/StrToShap.c
new file mode 100644
index 0000000..c73d5eb
--- /dev/null
+++ b/test/StrToShap.c
@@ -0,0 +1,197 @@
+/*
+ * Copyright (c) 2023, Oracle and/or its affiliates.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a
+ * copy of this software and associated documentation files (the "Software"),
+ * to deal in the Software without restriction, including without limitation
+ * the rights to use, copy, modify, merge, publish, distribute, sublicense,
+ * and/or sell copies of the Software, and to permit persons to whom the
+ * Software is furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice (including the next
+ * paragraph) shall be included in all copies or substantial portions of the
+ * Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
+ * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+ * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+ * DEALINGS IN THE SOFTWARE.
+ */
+
+/* Test code for functions in src/StrToShap.c */
+#include "config.h"
+#include <X11/Xmu/Converters.h>
+#include <X11/Xmu/CharSet.h>
+#include <X11/ThreadsI.h>
+#include <glib.h>
+#include <setjmp.h>
+
+struct TestData {
+    const char *name;
+    int value;
+};
+
+static const struct TestData data[] = {
+        { XtERectangle,         XmuShapeRectangle },
+        { XtEOval,              XmuShapeOval },
+        { XtEEllipse,           XmuShapeEllipse },
+        { XtERoundedRectangle,  XmuShapeRoundedRectangle },
+};
+#define DATA_ENTRIES (sizeof(data) / sizeof(data[0]))
+
+static int warning_count;
+
+static void
+xt_warning_handler(String message)
+{
+    g_test_message("Caught warning: %s", message ? message : "<NULL>");
+    warning_count++;
+}
+
+/* Environment saved by setjmp() */
+static jmp_buf jmp_env;
+
+static void _X_NORETURN
+xt_error_handler(String message)
+{
+    g_test_message("Caught error: %s", message ? message : "<NULL>");
+    warning_count++;
+
+    UNLOCK_PROCESS;
+
+    /* Avoid exit() in XtErrorMsg() */
+    longjmp(jmp_env, 1);
+}
+
+
+static void
+test_XmuCvtStringToShapeStyle(void)
+{
+    XrmValue from, to;
+    Cardinal nargs = 0;
+    Boolean ret;
+    char namebuf[32];
+
+    g_test_message("test_XmuCvtStringToShapeStyle starting");
+    for (unsigned int i = 0; i < DATA_ENTRIES; i++) {
+        g_test_message("StringToShapeStyle(%s)", data[i].name);
+
+        strncpy(namebuf, data[i].name, sizeof(namebuf) - 1);
+        namebuf[sizeof(namebuf) - 1] = 0;
+        from.addr = namebuf;
+        from.size = sizeof(char *);
+        to.addr = NULL;
+        to.size = 0;
+        ret = XmuCvtStringToShapeStyle(NULL, NULL, &nargs, &from, &to, NULL);
+        g_assert_cmpint(ret, ==, True);
+        g_assert_cmpint(*(int *)to.addr, ==, data[i].value);
+        g_assert_cmpint(to.size, ==, sizeof(int));
+
+
+        XmuNCopyISOLatin1Uppered(namebuf, data[i].name, sizeof(namebuf));
+        from.addr = namebuf;
+        from.size = sizeof(char *);
+        to.addr = NULL;
+        to.size = 0;
+        ret = XmuCvtStringToShapeStyle(NULL, NULL, &nargs, &from, &to, NULL);
+        g_assert_cmpint(ret, ==, True);
+        g_assert_cmpint(*(int *)to.addr, ==, data[i].value);
+        g_assert_cmpint(to.size, ==, sizeof(int));
+    }
+
+    /* No warning is currently issued for unused args */
+#if 0
+    warning_count = 0;
+    nargs = 1;
+    g_test_message("StringToShapeStyle with extra args");
+    XmuCvtStringToShapeStyle(NULL, &args, &nargs, &from, &to, NULL);
+    g_assert_cmpint(warning_count, >, 0);
+#endif
+
+    /* Verify warning issued for unknown string */
+    warning_count = 0;
+    from.addr = (char *) "DoesNotExist";
+    nargs = 0;
+    g_test_message("StringToShapeStyle(%s)", from.addr);
+    if (setjmp(jmp_env) == 0) {
+        ret = XmuCvtStringToShapeStyle(NULL, NULL, &nargs, &from, &to, NULL);
+        g_assert_cmpint(ret, ==, False);
+    } else {
+        /* We jumped here from error handler as expected. */
+    }
+    g_assert_cmpint(warning_count, >, 0);
+    g_test_message("test_XmuCvtStringToShapeStyle completed");
+}
+
+static void
+test_XmuCvtShapeStyleToString(void)
+{
+    XrmValue from, to;
+    int value;
+    Cardinal nargs = 0;
+    Boolean ret;
+    char namebuf[32];
+
+    g_test_message("test_XmuCvtShapeStyleToString starting");
+    for (unsigned int i = 0; i < DATA_ENTRIES; i++) {
+        g_test_message("ShapeStyleToString(%d)", data[i].value);
+
+        value = data[i].value;
+        from.addr = (XPointer) &value;
+        from.size = sizeof(int *);
+
+        /* First test without providing a buffer to copy the string into */
+        to.addr = NULL;
+        to.size = 0;
+        ret = XmuCvtShapeStyleToString(NULL, NULL, &nargs, &from, &to, NULL);
+        g_assert_cmpint(ret, ==, True);
+        g_assert_cmpstr(to.addr, ==, data[i].name);
+        g_assert_cmpint(to.size, ==, strlen(data[i].name) + 1);
+
+        /* Then test with a buffer that's too small to copy the string into */
+        to.addr = namebuf;
+        to.size = 4;
+        ret = XmuCvtShapeStyleToString(NULL, NULL, &nargs, &from, &to, NULL);
+        g_assert_cmpint(ret, ==, False);
+        g_assert_cmpint(to.size, ==, strlen(data[i].name) + 1);
+
+        /* Then test with a buffer that's big enough to copy the string into */
+        to.addr = namebuf;
+        to.size = sizeof(namebuf);
+        ret = XmuCvtShapeStyleToString(NULL, NULL, &nargs, &from, &to, NULL);
+        g_assert_cmpint(ret, ==, True);
+        g_assert_cmpstr(to.addr, ==, data[i].name);
+        g_assert_cmpint(to.size, ==, strlen(data[i].name) + 1);
+    }
+
+    /* Verify warning and return of False for invalid value */
+    warning_count = 0;
+    value = 1984;
+    from.addr = (XPointer) &value;
+    g_test_message("ShapeStyleToString(%d)", value);
+    ret = XmuCvtShapeStyleToString(NULL, NULL, &nargs, &from, &to, NULL);
+    g_assert_cmpint(ret, ==, False);
+    g_assert_cmpint(warning_count, >, 0);
+    g_test_message("test_XmuCvtShapeStyleToString completed");
+}
+
+int
+main(int argc, char** argv)
+{
+    g_test_init(&argc, &argv, NULL);
+    g_test_bug_base(PACKAGE_BUGREPORT);
+
+    XtSetWarningHandler(xt_warning_handler);
+    XtSetErrorHandler(xt_error_handler);
+
+    g_test_add_func("/StrToShap/XmuCvtStringToShapeStyle",
+                    test_XmuCvtStringToShapeStyle);
+    g_test_add_func("/StrToShap/XmuCvtShapeStyleToString",
+                    test_XmuCvtShapeStyleToString);
+
+
+    return g_test_run();
+}