generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

automatically make output directory is using minimal script

Browse Source
This commit is contained in:
Dr. Stephen Henson
2012-06-07 17:14:31 +00:00
parent 83db979256
commit 88e9264dd2
1 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
fips/fipsalgtest.pl
View File

@@ -1021,6 +1021,10 @@ END
$out =~ s|/req/(\S+)\.req|/$rspdir/$1.rsp|;
my $outdir = $out;
$outdir =~ s|/[^/]*$||;
if ( !-d $outdir && ($outfile eq "" || $minimal_script)) {
print STDERR "DEBUG: Creating directory $outdir\n" if $debug;
mkdir($outdir) || die "Can't create directory $outdir";
}
if ($outfile ne "") {
if ($win32) {
$outdir =~ tr|/|\\|;
@@ -1043,9 +1047,6 @@ END
}
$lastdir = $outdir;
}
} elsif ( !-d $outdir ) {
print STDERR "DEBUG: Creating directory $outdir\n" if $debug;
mkdir($outdir) || die "Can't create directory $outdir";
}
}
my $cmd = "$tcmd \"$sfprefix$req\" \"$sfprefix$out\"";