recognise SCTP in mkdef.pl script

This commit is contained in:
Dr. Stephen Henson 2011-12-25 14:47:46 +00:00
parent e065e6cda2
commit 53de315b78

View File

@ -114,7 +114,9 @@ my @known_algorithms = ( "RC2", "RC4", "RC5", "IDEA", "DES", "BF",
# Deprecated functions # Deprecated functions
"DEPRECATED", "DEPRECATED",
# Hide SSL internals # Hide SSL internals
"SSL_INTERN"); "SSL_INTERN",
# SCTP
"SCTP");
my $options=""; my $options="";
open(IN,"<Makefile") || die "unable to open Makefile!\n"; open(IN,"<Makefile") || die "unable to open Makefile!\n";
@ -134,7 +136,7 @@ my $no_ec; my $no_ecdsa; my $no_ecdh; my $no_engine; my $no_hw;
my $no_fp_api; my $no_static_engine=1; my $no_gmp; my $no_deprecated; my $no_fp_api; my $no_static_engine=1; my $no_gmp; my $no_deprecated;
my $no_rfc3779; my $no_psk; my $no_tlsext; my $no_cms; my $no_capieng; my $no_rfc3779; my $no_psk; my $no_tlsext; my $no_cms; my $no_capieng;
my $no_jpake; my $no_srp; my $no_ssl2; my $no_ec2m; my $no_nistp_gcc; my $no_jpake; my $no_srp; my $no_ssl2; my $no_ec2m; my $no_nistp_gcc;
my $no_nextprotoneg; my $no_nextprotoneg; my $no_sctp;
my $fips; my $fips;
@ -232,6 +234,7 @@ foreach (@ARGV, split(/ /, $options))
elsif (/^no-capieng$/) { $no_capieng=1; } elsif (/^no-capieng$/) { $no_capieng=1; }
elsif (/^no-jpake$/) { $no_jpake=1; } elsif (/^no-jpake$/) { $no_jpake=1; }
elsif (/^no-srp$/) { $no_srp=1; } elsif (/^no-srp$/) { $no_srp=1; }
elsif (/^no-sctp$/) { $no_sctp=1; }
} }
@ -1201,6 +1204,7 @@ sub is_valid
if ($keyword eq "CAPIENG" && $no_capieng) { return 0; } if ($keyword eq "CAPIENG" && $no_capieng) { return 0; }
if ($keyword eq "JPAKE" && $no_jpake) { return 0; } if ($keyword eq "JPAKE" && $no_jpake) { return 0; }
if ($keyword eq "SRP" && $no_srp) { return 0; } if ($keyword eq "SRP" && $no_srp) { return 0; }
if ($keyword eq "SCTP" && $no_sctp) { return 0; }
if ($keyword eq "DEPRECATED" && $no_deprecated) { return 0; } if ($keyword eq "DEPRECATED" && $no_deprecated) { return 0; }
# Nothing recognise as true # Nothing recognise as true