[prev in list] [next in list] [prev in thread] [next in thread] 

List:       apache-modperl-test-cvs
Subject:    svn commit: r946166 - /perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm
From:       jorton () apache ! org
Date:       2010-05-19 13:02:22
Message-ID: 20100519130222.5BBAE23889B6 () eris ! apache ! org
[Download RAW message or body]

Author: jorton
Date: Wed May 19 13:02:22 2010
New Revision: 946166

URL: http://svn.apache.org/viewvc?rev=946166&view=rev
Log:
* lib/Apache/TestSSLCA.pm (generate): Ensure the DNs in the server certs
  match up with the server hostname being used for testing; the proxy 
  now (correctly) fails if they don't match.

Modified:
    perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm

Modified: perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm
URL: http://svn.apache.org/viewvc/perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm?rev=946166&r1=946165&r2=946166&view=diff
 ==============================================================================
--- perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm (original)
+++ perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm Wed May 19 13:02:22 2010
@@ -470,6 +470,13 @@ sub generate {
 
     chdir $base;
 
+    # Ensure the CNs used in the server certs match up with the
+    # hostname being used for testing.
+    while (my($key, $val) = each %$cert_dn) {
+        next unless $key =~ /^server/;
+        $val->{CN} = $Config->{vars}->{servername};
+    }        
+
     #make a note that we created the tree
     $Config->clean_add_path($root);
 


[prev in list] [next in list] [prev in thread] [next in thread]