mark all block comments that need format preserving so that
[openssl.git] / test / cms-test.pl
index 5e553c8..7d4ca29 100644 (file)
@@ -83,6 +83,8 @@ my $halt_err = 1;
 
 my $badcmd = 0;
 my $no_ec;
+my $no_ec2m;
+my $no_ecdh;
 my $ossl8 = `$ossl_path version -v` =~ /0\.9\.8/;
 
 system ("$ossl_path no-ec >/dev/null");
@@ -90,7 +92,7 @@ if ($? == 0)
        {
        $no_ec = 1;
        }
-elsif ($? == 1)
+elsif ($? == 256)
        {
        $no_ec = 0;
        }
@@ -98,7 +100,35 @@ else
        {
        die "Error checking for EC support\n";
        }
+    
+system ("$ossl_path no-ec2m >/dev/null");
+if ($? == 0)
+       {
+       $no_ec2m = 1;
+       }
+elsif ($? == 256)
+       {
+       $no_ec2m = 0;
+       }
+else
+       {
+       die "Error checking for EC2M support\n";
+       }
 
+system ("$ossl_path no-ecdh >/dev/null");
+if ($? == 0)
+       {
+       $no_ecdh = 1;
+       }
+elsif ($? == 256)
+       {
+       $no_ecdh = 0;
+       }
+else
+       {
+       die "Error checking for ECDH support\n";
+       }
+    
 my @smime_pkcs7_tests = (
 
     [
@@ -492,6 +522,16 @@ sub run_smime_tests {
                print "$tnam: skipped, EC disabled\n";
                next;
                }
+       if ($no_ecdh && $tnam =~ /ECDH/)
+               {
+               print "$tnam: skipped, ECDH disabled\n";
+               next;
+               }
+       if ($no_ec2m && $tnam =~ /K-283/)
+               {
+               print "$tnam: skipped, EC2M disabled\n";
+               next;
+               }
         system("$scmd$rscmd$redir");
         if ($?) {
             print "$tnam: generation error\n";