From f9bdcf54952717b79e2ae274bfc4f2b14187c726 Mon Sep 17 00:00:00 2001
From: gotoyuzo <gotoyuzo@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Sun, 20 Jun 2004 15:57:40 +0000
Subject: * test/openssl/test_ssl.rb: use Process.kill to kill child process  
 instead of waiting for closing popen-ed IO.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6482 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 test/openssl/test_ssl.rb | 18 +++++++++++++-----
 1 file changed, 13 insertions(+), 5 deletions(-)

(limited to 'test/openssl/test_ssl.rb')

diff --git a/test/openssl/test_ssl.rb b/test/openssl/test_ssl.rb
index e0517f9953..3ca25cbfe1 100644
--- a/test/openssl/test_ssl.rb
+++ b/test/openssl/test_ssl.rb
@@ -16,7 +16,7 @@ class OpenSSL::TestSSL < Test::Unit::TestCase
   )
   SSL_SERVER = File.join(File.dirname(__FILE__), "ssl_server.rb")
   PORT = 20443
- ITERATIONS = ($0 == __FILE__) ? 100 : 10
+  ITERATIONS = ($0 == __FILE__) ? 100 : 10
 
   def setup
     @ca_key  = OpenSSL::TestUtils::TEST_KEY_RSA2048
@@ -65,15 +65,23 @@ class OpenSSL::TestSSL < Test::Unit::TestCase
       server.write(@ca_cert.to_pem)
       server.write(@svr_cert.to_pem)
       server.write(@svr_key.to_pem)
-      def server.starttls; self.puts("STARTTLS") end
       pid = Integer(server.gets)
       $stderr.printf("%s started: pid=%d\n", SSL_SERVER, pid) if $DEBUG
       block.call(server)
     ensure
-      server.close if server
+      if server
+        server.close_write
+        Process.kill(:TERM, pid) rescue nil
+        Process.waitpid(pid)
+      end
     end
   end
 
+  def starttls(ssl)
+    ssl.puts("STARTTLS")
+    ssl.connect
+  end
+
   def test_connect_and_close
     start_server(PORT, OpenSSL::SSL::VERIFY_NONE, true){
       sock = TCPSocket.new("127.0.0.1", PORT)
@@ -148,8 +156,7 @@ class OpenSSL::TestSSL < Test::Unit::TestCase
         assert_equal(str, ssl.gets)
       }
 
-      s.starttls
-      ssl.connect
+      starttls(ssl)
 
       ITERATIONS.times{
         ssl.puts(str)
@@ -177,6 +184,7 @@ class OpenSSL::TestSSL < Test::Unit::TestCase
           assert_equal(str, ssl.gets)
         }
       }
+      ssls.each{|ssl| ssl.close }
     }
   end
 end
-- 
cgit v1.2.3