diff options
Diffstat (limited to 'fips/mkfipsscr.pl')
-rw-r--r-- | fips/mkfipsscr.pl | 44 |
1 files changed, 43 insertions, 1 deletions
diff --git a/fips/mkfipsscr.pl b/fips/mkfipsscr.pl index 8f1275c7b5..16d4842aec 100644 --- a/fips/mkfipsscr.pl +++ b/fips/mkfipsscr.pl @@ -294,6 +294,10 @@ foreach (@ARGV) { $win32 = 1; } + if ($_ eq "--vxworks") + { + $vxworks = 1; + } elsif ($_ eq "--onedir") { $onedir = 1; @@ -332,6 +336,11 @@ foreach (@ARGV) } } +if ($win32 && $vxworks) { + print STDERR "Can't specify both --win32 and --vxworks\n"; + exit(1); +} + $tvdir = "." unless defined $tvdir; if ($win32) @@ -359,6 +368,21 @@ rem Do not edit END } +elsif ($vxworks) + { + # Always assume onedir. + $tprefix = "" unless defined $tprefix; + $outfile = "fipstests" unless defined $outfile; + open(OUT, ">$outfile"); + + print OUT <<END; +# Test vector run script +# Auto generated by mkfipsscr.pl script +# Do not edit + +END + + } else { if ($onedir) @@ -459,6 +483,16 @@ if exist "$rsp" rd /s /q "$rsp" md "$rsp" END } + elsif ($vxworks) + { + print OUT <<END; + +echo Running tests in "$req" +rm -r "$rsp" +mkdir "$rsp" + +END + } else { print OUT <<END; @@ -484,6 +518,10 @@ sub test_line $rsp =~ tr|/|\\|; print OUT "$tprefix$tcmd \"$req\" \"$rsp\"\n"; } + elsif ($vxworks) + { + print OUT "run $tprefix$tcmd \"$req\" \"$rsp\"\n"; + } else { print OUT <<END; @@ -518,7 +556,11 @@ END { $req =~ tr|/|\\|; $rsp =~ tr|/|\\|; - print OUT "$tprefix$tcmd < \"$req\" > \"$rsp\"\n"; + print OUT "$tprefix$tcmd < \"$req\" > \"$rsp\"\n"; + } + elsif ($vxworks) + { + print OUT "run $tprefix$tcmd \"$req\" \"$rsp\"\n"; } else { |