You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@santuario.apache.org by bl...@apache.org on 2003/11/12 05:53:08 UTC

cvs commit: xml-security/c/src basicTests.pl

blautenb    2003/11/11 20:53:08

  Modified:    c/src    basicTests.pl
  Log:
  Update to work under Windows
  
  Revision  Changes    Path
  1.2       +13 -3     xml-security/c/src/basicTests.pl
  
  Index: basicTests.pl
  ===================================================================
  RCS file: /home/cvs/xml-security/c/src/basicTests.pl,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- basicTests.pl	12 Nov 2003 04:26:09 -0000	1.1
  +++ basicTests.pl	12 Nov 2003 04:53:08 -0000	1.2
  @@ -87,8 +87,17 @@
   
   # Program setup
   
  -my $checksig = "../bin/checksig";
  -my $cipher = "../bin/cipher";
  +my $checksig;
  +my $cipher;
  +
  +if ($^O =~ m/Win/) {
  +  $checksig = "../Build/Win32/VC6/Debug/checksig.exe";
  +  $cipher = "../Build/Win32/VC6/Debug/cipher.exe";
  +}
  +else {
  +  $checksig = "../bin/checksig";
  +  $cipher = "../bin/cipher";
  +}
   
   # Directory setup
   my $data_dir = "../../data";
  @@ -236,6 +245,7 @@
     my $args = $fields[$dsig_args];
   
     my $result = `$checksig $checksig_args $args $data_dir/$file_name`;
  +
     if ($? == 0) {
   	print "$file_name OK\n";
   	$dsig_pass_count++;
  @@ -281,7 +291,7 @@
     else {
   	print "\nFAILURE\n";
   	print "---------\n";
  -	print "\n$file_name failed.  \n\nOutut was \n\n$result\n\n";
  +	print "\n$file_name failed.  \n\nOutput was \n\n$result\n\n";
   	print "---------\n\n";
   	$xenc_failure_count++;
     }