Skip to content

O
openssl

btwise / openssl

通知 1
Star 0
Fork 0
O
openssl

体验新版 GitCode，发现更多精彩内容 >>

提交 c20de038 编写于 作者: D Dr. Stephen Henson
浏览文件
操作

Fix fipsalgtest.pl to still work with old test vectors.

上级 eea98320
隐藏空白更改
内联 并排
Showing with 10 addition and 11 deletion
fips/fipsalgtest.pl
浏览文件 @ c20de038
......@@ -12,16 +12,16 @@ my @fips_dsa_test_list = (
"DSA",
[ "PQGGen", "fips_dssvs pqg", "path:/DSA/.*PQGGen" ],
[ "KeyPair", "fips_dssvs keypair", "path:/DSA/.*KeyPair" ],
[ "SigGen", "fips_dssvs siggen", "path:/DSA/.*SigGen" ],
[ "SigVer", "fips_dssvs sigver", "path:/DSA/.*SigVer" ]
[ "PQGGen", "fips_dssvs pqg", "path:[^C]DSA/.*PQGGen" ],
[ "KeyPair", "fips_dssvs keypair", "path:[^C]DSA/.*KeyPair" ],
[ "SigGen", "fips_dssvs siggen", "path:[^C]DSA/.*SigGen" ],
[ "SigVer", "fips_dssvs sigver", "path:[^C]DSA/.*SigVer" ]
);
my @fips_dsa_pqgver_test_list = (
[ "PQGVer", "fips_dssvs pqgver", "path:/DSA/.*PQGVer" ]
[ "PQGVer", "fips_dssvs pqgver", "path:[^C]DSA/.*PQGVer" ]
);
......@@ -30,11 +30,11 @@ my @fips_dsa2_test_list = (
"DSA2",
[ "PQGGen", "fips_dssvs pqg", "path:/DSA2/.*PQGGen" ],
[ "KeyPair", "fips_dssvs keypair", "path:/DSA2/.*KeyPair" ],
[ "SigGen", "fips_dssvs siggen", "path:/DSA2/.*SigGen" ],
[ "SigVer", "fips_dssvs sigver", "path:/DSA2/.*SigVer" ],
[ "PQGVer", "fips_dssvs pqgver", "path:/DSA2/.*PQGVer" ]
[ "PQGGen", "fips_dssvs pqg", "path:[^C]DSA2/.*PQGGen" ],
[ "KeyPair", "fips_dssvs keypair", "path:[^C]DSA2/.*KeyPair" ],
[ "SigGen", "fips_dssvs siggen", "path:[^C]DSA2/.*SigGen" ],
[ "SigVer", "fips_dssvs sigver", "path:[^C]DSA2/.*SigVer" ],
[ "PQGVer", "fips_dssvs pqgver", "path:[^C]DSA2/.*PQGVer" ]
);
......@@ -616,7 +616,6 @@ if (!$fips_enabled{"v2"}) {
foreach (keys %fips_enabled) {
$fips_enabled{$_} = 0 if $fips_enabled{$_} == 2;
}
$fips_enabled{"rsa-pss0"} = 1;
}
push @fips_test_list, @fips_dsa_test_list if $fips_enabled{"dsa"};
......
Markdown is supported
0% 或 .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑！
想要评论请 注册 或