diff options
Diffstat (limited to '')
-rwxr-xr-x | src/regress/lib/libcrypto/man/check_complete.pl | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/src/regress/lib/libcrypto/man/check_complete.pl b/src/regress/lib/libcrypto/man/check_complete.pl index 5f2d12ec73..3cbf02f16a 100755 --- a/src/regress/lib/libcrypto/man/check_complete.pl +++ b/src/regress/lib/libcrypto/man/check_complete.pl | |||
@@ -1,6 +1,6 @@ | |||
1 | #!/usr/bin/perl | 1 | #!/usr/bin/perl |
2 | # | 2 | # |
3 | # Copyright (c) 2021 Ingo Schwarze <schwarze@openbsd.org> | 3 | # Copyright (c) 2021,2022,2023,2024,2025 Ingo Schwarze <schwarze@openbsd.org> |
4 | # | 4 | # |
5 | # Permission to use, copy, modify, and distribute this software for any | 5 | # Permission to use, copy, modify, and distribute this software for any |
6 | # purpose with or without fee is hereby granted, provided that the above | 6 | # purpose with or without fee is hereby granted, provided that the above |
@@ -30,6 +30,9 @@ my %internal = ( | |||
30 | BN_MASK2 BN_MASK2h BN_MASK2h1 BN_MASK2l | 30 | BN_MASK2 BN_MASK2h BN_MASK2h1 BN_MASK2l |
31 | BN_TBIT BN_ULLONG | 31 | BN_TBIT BN_ULLONG |
32 | )], | 32 | )], |
33 | conf => [qw( | ||
34 | conf_st conf_method_st | ||
35 | )], | ||
33 | evp => [qw( | 36 | evp => [qw( |
34 | ASN1_PKEY_CTRL_CMS_ENVELOPE ASN1_PKEY_CTRL_CMS_RI_TYPE | 37 | ASN1_PKEY_CTRL_CMS_ENVELOPE ASN1_PKEY_CTRL_CMS_RI_TYPE |
35 | ASN1_PKEY_CTRL_CMS_SIGN | 38 | ASN1_PKEY_CTRL_CMS_SIGN |
@@ -116,7 +119,7 @@ my %postponed = ( | |||
116 | 119 | ||
117 | my $MANW = 'man -M /usr/share/man -w'; | 120 | my $MANW = 'man -M /usr/share/man -w'; |
118 | my $srcdir = '/usr/src/lib/libcrypto/man'; | 121 | my $srcdir = '/usr/src/lib/libcrypto/man'; |
119 | my $hfile = '/usr/include/openssl'; | 122 | my $hfile = '/usr/include'; |
120 | 123 | ||
121 | my $in_cplusplus = 0; | 124 | my $in_cplusplus = 0; |
122 | my $in_comment = 0; | 125 | my $in_comment = 0; |
@@ -133,6 +136,7 @@ if (defined $ARGV[0] && $ARGV[0] eq '-v') { | |||
133 | shift @ARGV; | 136 | shift @ARGV; |
134 | } | 137 | } |
135 | $#ARGV == 0 or die "usage: $0 [-v] headername"; | 138 | $#ARGV == 0 or die "usage: $0 [-v] headername"; |
139 | $hfile .= "/openssl" unless $ARGV[0] eq 'tls'; | ||
136 | $hfile .= "/$ARGV[0].h"; | 140 | $hfile .= "/$ARGV[0].h"; |
137 | open my $in_fh, '<', $hfile or die "$hfile: $!"; | 141 | open my $in_fh, '<', $hfile or die "$hfile: $!"; |
138 | 142 | ||
@@ -236,6 +240,7 @@ try_again: | |||
236 | # Uninteresting lines. | 240 | # Uninteresting lines. |
237 | 241 | ||
238 | if (/^\s*$/ || | 242 | if (/^\s*$/ || |
243 | /^DECLARE_LHASH_OF\(\w+\);$/ || | ||
239 | /^DECLARE_STACK_OF\(\w+\)$/ || | 244 | /^DECLARE_STACK_OF\(\w+\)$/ || |
240 | /^DECLARE_PKCS12_STACK_OF\(\w+\)$/ || | 245 | /^DECLARE_PKCS12_STACK_OF\(\w+\)$/ || |
241 | /^TYPEDEF_D2I2D_OF\(\w+\);$/ || | 246 | /^TYPEDEF_D2I2D_OF\(\w+\);$/ || |
@@ -288,7 +293,7 @@ try_again: | |||
288 | print "D- $line\n" if $verbose; | 293 | print "D- $line\n" if $verbose; |
289 | next; | 294 | next; |
290 | } | 295 | } |
291 | if ($id =~ /^(?:ASN1|BIO|BN|EVP|X509(?:V3)?)_[FR]_\w+$/) { | 296 | if ($id =~ /^(?:ASN1|BIO|BN|CONF|EVP|X509(?:V3)?)_[FR]_\w+$/) { |
292 | print "D- $line\n" if $verbose; | 297 | print "D- $line\n" if $verbose; |
293 | next; | 298 | next; |
294 | } | 299 | } |