From 0efea28dcb055c20380726f2dcd533e9a58c5c6b Mon Sep 17 00:00:00 2001
From: "Dr. Stephen Henson" <steve@openssl.org>
Date: Thu, 1 Jul 2004 18:15:33 +0000
Subject: [PATCH] Don't try to parse non string types.

---
 apps/asn1pars.c | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/apps/asn1pars.c b/apps/asn1pars.c
index 305db15903..f1d8bc8b98 100644
--- a/apps/asn1pars.c
+++ b/apps/asn1pars.c
@@ -309,6 +309,7 @@ bad:
 		for (i=0; i<sk_num(osk); i++)
 			{
 			ASN1_TYPE *atmp;
+			int typ;
 			j=atoi(sk_value(osk,i));
 			if (j == 0)
 				{
@@ -327,6 +328,15 @@ bad:
 				ERR_print_errors(bio_err);
 				goto end;
 				}
+			typ = ASN1_TYPE_get(at);
+			if ((typ == V_ASN1_OBJECT)
+				|| (typ == V_ASN1_NULL))
+				{
+				BIO_printf(bio_err, "Can't parse %s type\n",
+					typ == V_ASN1_NULL ? "NULL" : "OBJECT");
+				ERR_print_errors(bio_err);
+				goto end;
+				}
 			/* hmm... this is a little evil but it works */
 			tmpbuf=at->value.asn1_string->data;
 			tmplen=at->value.asn1_string->length;
-- 
2.25.1