You are viewing a plain text version of this content. The canonical link for it is here.

Posted to test-cvs@httpd.apache.org by do...@apache.org on 2002/01/18 01:14:52 UTC

cvs commit: httpd-test/perl-framework/t/ssl v2.t

dougm       02/01/17 16:14:52

  Added:       perl-framework/t/ssl v2.t
  Log:
  test for SSLv2 (Net::SSL defaults to v3)
  
  Revision  Changes    Path
  1.1                  httpd-test/perl-framework/t/ssl/v2.t
  
  Index: v2.t
  ===================================================================
  BEGIN {
      $ENV{HTTPS_VERSION} = 2; #use SSLv2 instead of SSLv3
  }
  
  use strict;
  use warnings FATAL => 'all';
  
  use Apache::Test;
  use Apache::TestRequest;
  
  plan tests => 1;
  
  Apache::TestRequest::scheme('https');
  
  #just make sure the basics work for SSLv2
  ok GET_OK('/');
  
  #per-dir renegotiation does not work with SSLv2,
  #same breakage with apache-1.3.22+mod_ssl-2.8.5
  my $url = '/require/asf/index.html';
  
  #ok GET_RC($url, cert => undef) != 200;
  
  #ok GET_RC($url, cert => 'client_ok') == 200;
  
  #ok GET_RC($url, cert => 'client_revoked') != 200;