be more specific which NETSCAPE stuff to ignore, and why

1 files changed, 7 insertions, 10 deletions

diff --git a/src/regress/lib/libcrypto/man/check_complete.pl b/src/regress/lib/libcrypto/man/check_complete.pl
index 142413867c..3af44218b6 100755
--- a/src/regress/lib/libcrypto/man/check_complete.pl
+++ b/src/regress/lib/libcrypto/man/check_complete.pl
@@ -20,13 +20,14 @@ use warnings;
 my @obsolete = qw(
     d2i_PBEPARAM d2i_PBE2PARAM d2i_PBKDF2PARAM
     i2d_PBEPARAM i2d_PBE2PARAM i2d_PBKDF2PARAM
+    NETSCAPE_SPKAC NETSCAPE_SPKI
     PBEPARAM PBEPARAM_free PBEPARAM_new
     PBE2PARAM PBE2PARAM_free PBE2PARAM_new
     PBKDF2PARAM PBKDF2PARAM_free PBKDF2PARAM_new
     PKCS5_pbe_set PKCS5_pbe_set0_algor
     PKCS5_pbe2_set PKCS5_pbe2_set_iv
     PKCS5_pbkdf2_set
-    X509_EX_V_INIT
+    X509_EX_V_INIT X509_EX_V_NETSCAPE_HACK
     X509_EXT_PACK_STRING X509_EXT_PACK_UNKNOWN
     X509_VERIFY_PARAM_ID
 );
@@ -106,10 +107,6 @@ try_again:
                         print "Vt $line\n" if $verbose;
                         next;
                 }
-                if ($id =~ /NETSCAPE/) {
-                        print "V- $line\n" if $verbose;
-                        next;
-                }
                 if (grep { $_ eq $id } @obsolete) {
                         print "V- $line\n" if $verbose;
                         next;
@@ -188,10 +185,6 @@ try_again:
                         print "D- $line\n" if $verbose;
                         next;
                 }
-                if ($id =~ /NETSCAPE/) {
-                        print "D- $line\n" if $verbose;
-                        next;
-                }
                 if ($id =~ /^(?:ASN1|X509(?:V3)?)_[FR]_\w+$/) {
                         print "D- $line\n" if $verbose;
                         next;
@@ -285,7 +278,11 @@ try_again:
                         print "Fn $line\n" if $verbose;
                         next;
                 }
-                if ($id =~ /NETSCAPE/) {
+                # These functions are still provided by OpenSSL
+                # and still used by the Python test suite,
+                # but intentionally undocumented because nothing
+                # else uses them according to tb@, Dec 3, 2021.
+                if ($id =~ /NETSCAPE_(?:CERT_SEQUENCE|SPKAC|SPKI)/) {
                         print "F- $line\n" if $verbose;
                         next;
                 }