net-http-pool 0.0.2

data/Gemfile

@@ -0,0 +1,4 @@
+source "http://rubygems.org"
+
+gemspec
+gem "rake"

data/README.md

@@ -0,0 +1,24 @@
+# Net::HTTP::Pool
+
+![Pool](http://www.beijingboyce.com/wp-content/uploads/2008/03/pool-table.JPG)
+
+Act like a database pool but for HTTP.
+
+It will attenmpt to open (default: 5) persistent connections to a given server.
+Then you can make your requests as you want and the pool get recycled.
+The implementation it's made throght actors (celluloid) so the behaviour in the
+verb block it's async.
+
+The target of the lib it's to provide DB-like pool to handle information
+exchange.
+
+## Example
+
+```ruby
+require 'net/http/pool'
+
+pool = Net::HTTP::Pool.new("http://elcuervo.co")
+pool.get("/humans.txt") do |response|
+  File.open('nevermore.txt', 'w') { |f| f << response.body } if response.code == "200"
+end
+```

data/Rakefile

@@ -0,0 +1,12 @@
+task :test do
+  require "cutest"
+  require "capybara/dsl"
+
+  Cutest.run(Dir["test/*.rb"])
+
+  class Cutest::Scope
+    include Capybara::DSL
+  end
+end
+
+task :default => :test

data/SPEC.md

@@ -0,0 +1,3 @@
+# Pool of persistent connections
+
+Pool of connections to use with Spirit... for now

data/lib/net/http/pool.rb

@@ -0,0 +1,84 @@
+require 'celluloid'
+require 'net/http/persistent'
+
+# Public: The Pool itself
+#
+# host - The string of the host.
+class Net::HTTP::Pool
+  include Celluloid
+
+  # Private: Custom Error for a missing block in the call.
+  class MissingBlock < StandardError
+    def message
+      "You must pass a block"
+    end
+  end
+
+  # Public: The Connection Pool.
+  #
+  # host    - The string of the host.
+  # options - The hash of options (default: {}).
+  #           :size - The integer size of the pool (default: 5)
+  class Connections
+    include Celluloid
+
+    attr_reader :pool
+
+    def initialize(host, options = {})
+      @current_index = 0
+      @pool = Array.new(options.fetch(:size, 5)) do
+        connection = Net::HTTP::Persistent.new(host)
+        connection.idle_timeout = nil
+        connection
+      end
+    end
+
+    # Private: Round robin one of the connections
+    #
+    # &block - The block to be called passing the current connection
+    def round_robin(&block)
+      raise MissingBlock unless block
+      @current_index = @current_index > @pool.size ? 0 : @current_index + 1
+      yield @pool[@current_index] if block
+    end
+
+    # Public: Helper to access the connection asynchronous
+    #
+    # &block - The block to be called passing the current connection
+    def with(&block)
+      round_robin! &block
+    end
+  end
+
+  def initialize(host, options = {})
+    @pool = Connections.new(host, options)
+    @uri = URI(host)
+  end
+
+  def get(path, headers = {}, &block)
+    request!(path, Net::HTTP::Get, nil, headers, &block)
+  end
+
+  def post(path, body = nil, headers = {}, &block)
+    request!(path, Net::HTTP::Post, body, headers, &block)
+  end
+
+  def put(path, body = nil, headers = {}, &block)
+    request!(path, Net::HTTP::Put, body, headers, &block)
+  end
+
+  def delete(path, headers = {}, &block)
+    request!(path, Net::HTTP::Delete, headers, &block)
+  end
+
+  def request(path, type, body = nil, headers = {}, &block)
+    raise MissingBlock unless block
+    @pool.with do |connection|
+      request = type.new(path)
+      request.body = body if body
+      headers.each { |key, value| request.add_field(key, value) }
+      request['Content-Length'] = body && body.length || 0
+      yield connection.request(@uri, request) if block
+    end
+  end
+end

data/net-http-pool.gemspec

@@ -0,0 +1,17 @@
+Gem::Specification.new do |s|
+  s.name       = "net-http-pool"
+  s.version    = "0.0.2"
+  s.summary    = "Persistent pool of HTTP connections"
+  s.authors    = ["elcuervo"]
+  s.email      = ["yo@brunoaguirre.com"]
+  s.homepage   = "http://github.com/elcuervo/net-http-pool"
+  s.files      = `git ls-files`.split("\n")
+  s.test_files = `git ls-files test`.split("\n")
+
+  s.add_dependency("net-http-persistent", ">= 2.6")
+  s.add_dependency("celluloid", "~> 0.9.0")
+
+  s.add_development_dependency("cutest", "~> 1.1.3")
+  s.add_development_dependency("capybara", "~> 1.1.2")
+  s.add_development_dependency("mock-server", "~> 0.1.2")
+end

data/test/connections.rb

@@ -0,0 +1,9 @@
+require 'cutest'
+require_relative '../lib/net/http/pool'
+
+scope do
+  test "generates the default pool" do
+    connections = Net::HTTP::Pool::Connections.new('http://localhost', size: 9)
+    assert connections.pool.size == 9
+  end
+end

data/test/pool.rb

@@ -0,0 +1,68 @@
+require 'cutest'
+require 'mock_server'
+require_relative '../lib/net/http/pool'
+
+extend MockServer::Methods
+
+mock_server {
+  get '/' do
+    'What is up dog!'
+  end
+
+  get '/marco' do
+    'polo'
+  end
+
+  post '/post' do
+    params[:test] ? 'this is a test' : 'the post'
+  end
+
+  put '/put' do
+    params[:run] || 'the put'
+  end
+
+  get '/wait' do
+    sleep 5
+    "Finally!"
+  end
+
+  delete('/delete') {}
+}
+
+scope do
+  setup do
+    @pool = Net::HTTP::Pool.new("http://localhost:4000/")
+  end
+
+  test "check that the HTTP verbs do work" do
+    @pool.get("/") do |res|
+      assert_equal "200", res.code
+      assert_equal 'What is up dog!', res.body
+    end
+
+    @pool.get("/marco") do |res|
+      assert_equal "200", res.code
+      assert_equal 'polo', res.body
+    end
+
+    @pool.post("/post", 'test=yes', {'X-Fancy-Header' => 'Sometimes'}) do |res|
+      assert_equal "200", res.code
+      assert_equal 'this is a test', res.body
+    end
+
+    @pool.put("/put", 'run=fast') do |res|
+      assert_equal "200", res.code
+      assert_equal 'fast', res.body
+    end
+
+    @pool.delete("/delete") do |res|
+      assert_equal "200", res.code
+    end
+  end
+
+  test "do not block main thread when resource is slow" do
+    start = Time.now
+    5.times { @pool.get("/wait") {} }
+    assert Time.now - start < 20
+  end
+end

metadata

@@ -0,0 +1,110 @@
+--- !ruby/object:Gem::Specification
+name: net-http-pool
+version: !ruby/object:Gem::Version
+  version: 0.0.2
+  prerelease: 
+platform: ruby
+authors:
+- elcuervo
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-04-12 00:00:00.000000000Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: net-http-persistent
+  requirement: &70302928111800 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '2.6'
+  type: :runtime
+  prerelease: false
+  version_requirements: *70302928111800
+- !ruby/object:Gem::Dependency
+  name: celluloid
+  requirement: &70302928111020 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 0.9.0
+  type: :runtime
+  prerelease: false
+  version_requirements: *70302928111020
+- !ruby/object:Gem::Dependency
+  name: cutest
+  requirement: &70302928110440 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 1.1.3
+  type: :development
+  prerelease: false
+  version_requirements: *70302928110440
+- !ruby/object:Gem::Dependency
+  name: capybara
+  requirement: &70302928109860 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 1.1.2
+  type: :development
+  prerelease: false
+  version_requirements: *70302928109860
+- !ruby/object:Gem::Dependency
+  name: mock-server
+  requirement: &70302928109300 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 0.1.2
+  type: :development
+  prerelease: false
+  version_requirements: *70302928109300
+description: 
+email:
+- yo@brunoaguirre.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- Gemfile
+- README.md
+- Rakefile
+- SPEC.md
+- lib/net/http/pool.rb
+- net-http-pool.gemspec
+- test/connections.rb
+- test/pool.rb
+homepage: http://github.com/elcuervo/net-http-pool
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.15
+signing_key: 
+specification_version: 3
+summary: Persistent pool of HTTP connections
+test_files:
+- test/connections.rb
+- test/pool.rb