config: don't add -Wa options with no-asm.
[openssl.git] / util / fipsas.pl
index 49cf564e5ce70e3d2d9202b0931ec0edd6bd7fdb..fc2a759308e62f4e90e8fc297076c2757fbfe591 100644 (file)
@@ -17,12 +17,9 @@ if ($ARGS[0] eq "norunasm")
        shift @ARGS;
        }
 
-# HACK to disable operation if no OPENSSL_FIPSSYMS option.
-# will go away when tested more fully.
-
 my $enabled = 0;
 
-foreach (@ARGS) { $enabled = 1 if /-DOPENSSL_FIPSSYMS/ ; }
+$enabled = 1 if $ENV{FIPSCANISTERINTERNAL} eq "y";
 
 if ($enabled == 0 && $runasm)
        {
@@ -52,11 +49,11 @@ while (<IN>)
 my ($from, $to);
 
 #rename target temporarily
-rename($target, "tmptarg.s") || die "Can't rename $target\n";
+rename($target, "tmptarg.s") || die "Can't rename $target";
 
 #edit target
-open IN,"tmptarg.s";
-open OUT, ">$target";
+open(IN,"tmptarg.s") || die "Can't open temporary file";
+open(OUT, ">$target") || die "Can't open output file $target";
 
 while (<IN>)
 {