mogilefs-client 1.0.1

data/test/test_pool.rb

@@ -0,0 +1,98 @@
+require 'test/unit'
+
+$TESTING = true
+
+require 'mogilefs/pool'
+
+class MogileFS::Pool
+
+  attr_reader :objects, :queue
+
+end
+
+class Resource; end
+
+class ResourceWithArgs
+
+  def initialize(args)
+  end
+
+end
+
+class TestPool < Test::Unit::TestCase
+
+  def setup
+    @pool = MogileFS::Pool.new Resource
+  end
+
+  def test_get
+    o1 = @pool.get
+    o2 = @pool.get
+    assert_kind_of Resource, o1
+    assert_kind_of Resource, o2
+    assert_not_equal o1, o2
+  end
+
+  def test_get_with_args
+    @pool = MogileFS::Pool.new ResourceWithArgs, 'my arg'
+    o = @pool.get
+    assert_kind_of ResourceWithArgs, o
+  end
+
+  def test_put
+    o = @pool.get
+    @pool.put o
+
+    assert_raises(MogileFS::Pool::BadObjectError) { @pool.put nil }
+    assert_raises(MogileFS::Pool::BadObjectError) { @pool.put Resource.new }
+  end
+
+  def test_put_destroy
+    objs = (0...7).map { @pool.get } # pool full
+
+    assert_equal 7, @pool.objects.length
+    assert_equal 0, @pool.queue.length
+
+    4.times { @pool.put objs.shift }
+
+    assert_equal 7, @pool.objects.length
+    assert_equal 4, @pool.queue.length
+
+    @pool.put objs.shift # trip threshold
+
+    assert_equal 4, @pool.objects.length
+    assert_equal 2, @pool.queue.length
+
+    @pool.put objs.shift # don't need to remove any more
+
+    assert_equal 4, @pool.objects.length
+    assert_equal 3, @pool.queue.length
+
+    @pool.put objs.shift until objs.empty?
+
+    assert_equal 4, @pool.objects.length
+    assert_equal 4, @pool.queue.length
+  end
+
+  def test_use
+    val = @pool.use { |o| assert_kind_of Resource, o }
+    assert_equal nil, val, "Don't return object from pool"
+  end
+
+  def test_use_with_exception
+    @pool.use { |o| raise } rescue nil
+    assert_equal 1, @pool.queue.length, "Resource not returned to pool"
+  end
+
+  def test_use_reuse
+    o1 = nil
+    o2 = nil
+
+    @pool.use { |o| o1 = o }
+    @pool.use { |o| o2 = o }
+
+    assert_equal o1, o2, "Objects must be reused"
+  end
+
+end
+

metadata

@@ -0,0 +1,63 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.8.11.6
+specification_version: 1
+name: mogilefs-client
+version: !ruby/object:Gem::Version 
+  version: 1.0.1
+date: 2006-03-21 00:00:00 -08:00
+summary: A Ruby MogileFS client
+require_paths: 
+- lib
+email: eric@robotcoop.com
+homepage: 
+rubyforge_project: 
+description: A Ruby MogileFS client.  MogileFS is a distributed filesystem written by Danga Interactive.  This client supports NFS mode and has untested support for HTTP mode.
+autorequire: 
+default_executable: 
+bindir: bin
+has_rdoc: true
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+post_install_message: 
+authors: 
+- Eric Hodel
+files: 
+- LICENSE
+- Manifest.txt
+- README
+- Rakefile
+- lib/mogilefs.rb
+- lib/mogilefs/admin.rb
+- lib/mogilefs/backend.rb
+- lib/mogilefs/client.rb
+- lib/mogilefs/httpfile.rb
+- lib/mogilefs/mogilefs.rb
+- lib/mogilefs/nfsfile.rb
+- lib/mogilefs/pool.rb
+- test/setup.rb
+- test/test_admin.rb
+- test/test_backend.rb
+- test/test_client.rb
+- test/test_mogilefs.rb
+- test/test_pool.rb
+test_files: []
+
+rdoc_options: []
+
+extra_rdoc_files: []
+
+executables: []
+
+extensions: []
+
+requirements: []
+
+dependencies: []
+