From f788a3b206edfcaedda33dddaaadb8f9fc6cefa9 Mon Sep 17 00:00:00 2001
From: ocean <ocean@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Sun, 4 Jul 2004 16:29:03 +0000
Subject: * lib/drb/drb.rb(DRbConn self.open): If socket pool is full, close  
 the socket whose last-access-time is oldest. (and add new one)

git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@6580 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog      |  5 +++++
 lib/drb/drb.rb | 11 +++++++----
 2 files changed, 12 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 898f5a037..a0f9ac00c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Mon Jul  5 01:27:32  Hirokazu Yamamoto  <ocean@m2.ccsnet.ne.jp>
+
+	* lib/drb/drb.rb(DRbConn self.open): If socket pool is full, close
+	  the socket whose last-access-time is oldest. (and add new one)
+
 Sun Jul  4 12:24:50 2004  Kouhei Sutou  <kou@cozmixng.org>
 
 	* lib/rss/rss.rb: added copyright header.
diff --git a/lib/drb/drb.rb b/lib/drb/drb.rb
index 4613e6062..c90259f87 100644
--- a/lib/drb/drb.rb
+++ b/lib/drb/drb.rb
@@ -1080,11 +1080,14 @@ module DRb
 	return succ, result
 
       ensure
-	@mutex.synchronize do
-	  if @pool.size > POOL_SIZE or ! succ
-	    conn.close if conn
+	if conn
+	  if succ
+	    @mutex.synchronize do
+	      @pool.unshift(conn)
+	      @pool.pop.close while @pool.size > POOL_SIZE
+	    end
 	  else
-	    @pool.unshift(conn)
+	    conn.close
 	  end
 	end
       end
-- 
cgit