From 79796269957a9fa8d3dc55b2d02425404b77ce04 Mon Sep 17 00:00:00 2001 From: "Dr. Stephen Henson" Date: Sun, 24 Apr 2011 12:13:32 +0000 Subject: [PATCH] Recognise invalid enable/disable options. Option to shut up bogus warnings. --- fips/fipsalgtest.pl | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/fips/fipsalgtest.pl b/fips/fipsalgtest.pl index c3ac3608fb..077fab1bb5 100644 --- a/fips/fipsalgtest.pl +++ b/fips/fipsalgtest.pl @@ -461,6 +461,7 @@ my $list_tests = 0; my $minimal_script = 0; my $outfile = ''; my $no_warn_missing = 0; +my $no_warn_bogus = 0; my %fips_enabled = ( dsa => 1, @@ -479,7 +480,7 @@ my %fips_enabled = ( "des3-cfb1" => 0, drbg => 0, ccm => 0, - xts => 0, + "aes-xts" => 0, gcm => 0, dh => 0, ecdh => 0, @@ -502,6 +503,10 @@ foreach (@ARGV) { elsif ( $_ eq "--ignore-missing" ) { $ignore_missing = 1; } + elsif ( $_ eq "--quiet-bogus" ) { + $ignore_bogus = 1; + $no_warn_bogus = 1; + } elsif ( $_ eq "--ignore-bogus" ) { $ignore_bogus = 1; } @@ -532,6 +537,7 @@ foreach (@ARGV) { elsif (/^--(enable|disable)-(.*)$/) { if ( !exists $fips_enabled{$2} ) { print STDERR "Unknown test $2\n"; + exit(1); } if ( $1 eq "enable" ) { $fips_enabled{$2} = 1; @@ -741,7 +747,7 @@ sub find_files { } } else { - print STDERR "WARNING: bogus file $_\n"; + print STDERR "WARNING: bogus file $_\n" unless $no_warn_bogus; $nbogus++; } } @@ -761,7 +767,7 @@ sub find_files { } elsif ( !/SHAmix\.req$/ ) { - print STDERR "WARNING: unrecognized filename $_\n"; + print STDERR "WARNING: unrecognized filename $_\n" unless $no_warn_bogus; $nbogus++; } } -- 2.34.1