recognise SCTP in mkdef.pl script
authorDr. Stephen Henson <steve@openssl.org>
Sun, 25 Dec 2011 14:47:46 +0000 (14:47 +0000)
committerDr. Stephen Henson <steve@openssl.org>
Sun, 25 Dec 2011 14:47:46 +0000 (14:47 +0000)
util/mkdef.pl

index a8a2dfe..ae6e00d 100755 (executable)
@@ -114,7 +114,9 @@ my @known_algorithms = ( "RC2", "RC4", "RC5", "IDEA", "DES", "BF",
                         # Deprecated functions
                         "DEPRECATED",
                         # Hide SSL internals
-                        "SSL_INTERN");
+                        "SSL_INTERN",
+                        # SCTP
+                        "SCTP");
 
 my $options="";
 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_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_nextprotoneg;
+my $no_nextprotoneg; my $no_sctp;
 
 my $fips;
 
@@ -232,6 +234,7 @@ foreach (@ARGV, split(/ /, $options))
        elsif (/^no-capieng$/)  { $no_capieng=1; }
        elsif (/^no-jpake$/)    { $no_jpake=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 "JPAKE" && $no_jpake) { 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; }
 
                        # Nothing recognise as true