Fix logic in mkdef.pl function is_valid.
authorDr. Stephen Henson <steve@openssl.org>
Tue, 19 Apr 2005 23:54:44 +0000 (23:54 +0000)
committerDr. Stephen Henson <steve@openssl.org>
Tue, 19 Apr 2005 23:54:44 +0000 (23:54 +0000)
Update symbols

util/libeay.num
util/mkdef.pl

index 30beee2..a0bb214 100755 (executable)
@@ -2891,7 +2891,7 @@ BN_GF2m_mod_exp_arr                     3324      EXIST::FUNCTION:
 STORE_ATTR_INFO_modify_number           3325   EXIST::FUNCTION:
 X509_keyid_get0                         3326   EXIST::FUNCTION:
 EC_GROUP_new_by_nid                     3327   EXIST::FUNCTION:EC
-ENGINE_load_gmp                         3328   EXIST::FUNCTION:ENGINE,STATIC_ENGINE
+ENGINE_load_gmp                         3328   EXIST::FUNCTION:ENGINE,GMP,STATIC_ENGINE
 BN_GF2m_mod_mul_arr                     3329   EXIST::FUNCTION:
 STORE_list_public_key_endp              3330   EXIST::FUNCTION:
 o2i_ECPublicKey                         3331   EXIST::FUNCTION:EC
@@ -3300,3 +3300,4 @@ BIO_dump_cb                             3699      EXIST::FUNCTION:
 SHA256_Update                           3700   EXIST::FUNCTION:SHA,SHA256
 BN_GF2m_mod_inv_arr                     3701   EXIST::FUNCTION:
 ENGINE_unregister_ECDSA                 3702   EXIST::FUNCTION:ENGINE
+OPENSSL_ia32cap_loc                     3703   EXIST::FUNCTION:
index 6cbdf77..357adf4 100755 (executable)
@@ -1032,7 +1032,7 @@ sub is_valid
 {
        my ($keywords_txt,$platforms) = @_;
        my (@keywords) = split /,/,$keywords_txt;
-       my ($falsesum, $truesum) = (0, !grep(/^[^!]/,@keywords));
+       my ($falsesum, $truesum) = (0, 1);
 
        # Param: one keyword
        sub recognise
@@ -1102,7 +1102,7 @@ sub is_valid
                if ($k =~ /^!(.*)$/) {
                        $falsesum += &recognise($1,$platforms);
                } else {
-                       $truesum += &recognise($k,$platforms);
+                       $truesum *= &recognise($k,$platforms);
                }
        }
        print STDERR "DEBUG: [",$#keywords,",",$#keywords < 0,"] is_valid($keywords_txt) => (\!$falsesum) && $truesum = ",(!$falsesum) && $truesum,"\n" if $debug;