Test ASN1_STRING_copy(3).

As a side effect, this also tests various aspects of ASN1_STRING_new(3),
ASN1_STRING_set(3), ASN1_STRING_length_set(3), ASN1_STRING_get0_data(3),
ASN1_STRING_length(3), and ASN1_STRING_type(3).

2 files changed, 121 insertions, 1 deletions

diff --git a/regress/lib/libcrypto/asn1/Makefile b/regress/lib/libcrypto/asn1/Makefile
index 2dae70e9e58..a7dd6338694 100644
--- a/regress/lib/libcrypto/asn1/Makefile
+++ b/regress/lib/libcrypto/asn1/Makefile
@@ -1,7 +1,8 @@
-#	$OpenBSD: Makefile,v 1.5 2018/08/31 17:35:21 tb Exp $
+#	$OpenBSD: Makefile,v 1.6 2021/11/13 20:50:14 schwarze Exp $
 
 TESTS = \
 	asn1evp \
+	asn1string_copy \
 	asn1time \
 	rfc5280time
 
diff --git a/regress/lib/libcrypto/asn1/asn1string_copy.c b/regress/lib/libcrypto/asn1/asn1string_copy.c
new file mode 100644
index 00000000000..9c71dd08a08
--- /dev/null
+++ b/regress/lib/libcrypto/asn1/asn1string_copy.c
@@ -0,0 +1,119 @@
+/* $OpenBSD: asn1string_copy.c,v 1.1 2021/11/13 20:50:14 schwarze Exp $ */
+/*
+ * Copyright (c) 2021 Ingo Schwarze <schwarze@openbsd.org>
+ *
+ * Permission to use, copy, modify, and distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+ * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ */
+
+#include <err.h>
+#include <string.h>
+
+#include <openssl/asn1.h>
+
+int
+main(void)
+{
+	const unsigned char	*data = "hello world";
+	const unsigned char	*str;
+	ASN1_STRING		*src, *dst;
+	int			 irc;
+
+	/* Set up the source string. */
+
+	if ((src = ASN1_IA5STRING_new()) == NULL)
+		err(1, "FAIL: ASN1_IA5STRING_new() returned NULL");
+	if (ASN1_STRING_set(src, data, -1) == 0)
+		err(1, "FAIL: ASN1_STRING_set(src) failed");
+	if ((str = ASN1_STRING_get0_data(src)) == NULL)
+		errx(1, "FAIL: 1st ASN1_STRING_get0_data(src) returned NULL");
+	if (strcmp(str, data))
+		errx(1, "FAIL: 1st ASN1_STRING_get0_data(src) "
+		    "returned wrong data: \"%s\" (expected \"%s\")",
+		    str, data);
+	if ((irc = ASN1_STRING_length(src)) != (int)strlen(data))
+		errx(1, "FAIL: 1st ASN1_STRING_length(src) "
+		    "returned a wrong length: %d (expected %zu)",
+		    irc, strlen(data));
+	if ((irc = ASN1_STRING_type(src)) != V_ASN1_IA5STRING)
+		errx(1, "FAIL: 1st ASN1_STRING_type(src) "
+		    "returned a wrong type: %d (expected %d)",
+		    irc, V_ASN1_IA5STRING);
+
+	/* Set up the destination string. */
+
+	if ((dst = ASN1_STRING_new()) == NULL)
+		err(1, "FAIL: ASN1_STRING_new() returned NULL");
+	if ((str = ASN1_STRING_get0_data(dst)) != NULL)
+		errx(1, "FAIL: 1st ASN1_STRING_get0_data(dst) "
+		    "returned \"%s\" (expected NULL)", str);
+	if ((irc = ASN1_STRING_length(dst)) != 0)
+		errx(1, "FAIL: 1st ASN1_STRING_length(dst) "
+		    "returned a wrong length: %d (expected 0)", irc);
+	if ((irc = ASN1_STRING_type(dst)) != V_ASN1_OCTET_STRING)
+		errx(1, "FAIL: 1st ASN1_STRING_type(dst) "
+		    "returned a wrong type: %d (expected %d)",
+		    irc, V_ASN1_OCTET_STRING);
+	ASN1_STRING_length_set(dst, -1);
+	if ((str = ASN1_STRING_get0_data(dst)) != NULL)
+		errx(1, "FAIL: 2nd ASN1_STRING_get0_data(dst) "
+		    "returned \"%s\" (expected NULL)", str);
+	if ((irc = ASN1_STRING_length(dst)) != -1)
+		errx(1, "FAIL: 2nd ASN1_STRING_length(dst) "
+		    "returned a wrong length: %d (expected -1)", irc);
+	if ((irc = ASN1_STRING_type(dst)) != V_ASN1_OCTET_STRING)
+		errx(1, "FAIL: 2nd ASN1_STRING_type(dst) "
+		    "returned a wrong type: %d (expected %d)",
+		    irc, V_ASN1_OCTET_STRING);
+
+	/* Attempt to copy in the wrong direction. */
+
+	if (ASN1_STRING_copy(src, dst) != 0)
+		errx(1, "FAIL: ASN1_STRING_copy unexpectedly succeeded");
+	if ((str = ASN1_STRING_get0_data(src)) == NULL)
+		errx(1, "FAIL: 2nd ASN1_STRING_get0_data(src) returned NULL");
+	if (strcmp(str, data))
+		errx(1, "FAIL: 2nd ASN1_STRING_get0_data(src) "
+		    "returned wrong data: \"%s\" (expected \"%s\")",
+		    str, data);
+	if ((irc = ASN1_STRING_length(src)) != (int)strlen(data))
+		errx(1, "FAIL: 2nd ASN1_STRING_length(src) "
+		    "returned a wrong length: %d (expected %zu)",
+		    irc, strlen(data));
+	if ((irc = ASN1_STRING_type(src)) != V_ASN1_IA5STRING)
+		errx(1, "FAIL: 2nd ASN1_STRING_type(src) "
+		    "returned a wrong type: %d (expected %d)",
+		    irc, V_ASN1_IA5STRING);
+
+	/* Copy in the right direction. */
+
+	if (ASN1_STRING_copy(dst, src) != 1)
+		err(1, "FAIL: ASN1_STRING_copy unexpectedly failed");
+	if ((str = ASN1_STRING_get0_data(dst)) == NULL)
+		errx(1, "FAIL: 3rd ASN1_STRING_get0_data(dst) returned NULL");
+	if (strcmp(str, data))
+		errx(1, "FAIL: 3rd ASN1_STRING_get0_data(dst) "
+		    "returned wrong data: \"%s\" (expected \"%s\")",
+		    str, data);
+	if ((irc = ASN1_STRING_length(dst)) != (int)strlen(data))
+		errx(1, "FAIL: 3rd ASN1_STRING_length(dst) "
+		    "returned a wrong length: %d (expected %zu)",
+		    irc, strlen(data));
+	if ((irc = ASN1_STRING_type(dst)) != V_ASN1_IA5STRING)
+		errx(1, "FAIL: 3rd ASN1_STRING_type(dst) "
+		    "returned a wrong type: %d (expected %d)",
+		    irc, V_ASN1_IA5STRING);
+
+	ASN1_STRING_free(src);
+	ASN1_STRING_free(dst);
+	return 0;
+}