search_biomodel 0.1.2 → 1.0.0

data/search_biomodel/ruby/1.8/gems/httpi-0.9.4/spec/httpi/adapter/net_http_spec.rb

@@ -0,0 +1,142 @@
+require "spec_helper"
+require "httpi/adapter/net_http"
+require "httpi/request"
+
+describe HTTPI::Adapter::NetHTTP do
+  let(:net_http) { Net::HTTP.any_instance }
+  let(:basic_response) { { :body => Fixture.xml, :headers => { "Accept-encoding" => "utf-8" } } }
+
+  def adapter(request)
+    @adapter ||= HTTPI::Adapter::NetHTTP.new request
+  end
+
+  describe "#get" do
+    it "should return a valid HTTPI::Response" do
+      stub_request(:get, basic_request.url.to_s).to_return(basic_response)
+      adapter(basic_request).get(basic_request).should match_response(:body => Fixture.xml)
+    end
+  end
+
+  describe "#post" do
+    it "should return a valid HTTPI::Response" do
+      request = HTTPI::Request.new :url => "http://example.com", :body => Fixture.xml
+      stub_request(:post, request.url.to_s).with(:body => request.body).to_return(basic_response)
+
+      adapter(request).post(request).should match_response(:body => Fixture.xml)
+    end
+  end
+
+  describe "#head" do
+    it "should return a valid HTTPI::Response" do
+      stub_request(:head, basic_request.url.to_s).to_return(basic_response)
+      adapter(basic_request).head(basic_request).should match_response(:body => Fixture.xml)
+    end
+  end
+
+  describe "#put" do
+    it "should return a valid HTTPI::Response" do
+      request = HTTPI::Request.new(
+        :url     => "http://example.com",
+        :headers => { "Accept-encoding" => "utf-8" },
+        :body    => Fixture.xml
+      )
+      stub_request(:put, request.url.to_s).with(:body => request.body).to_return(basic_response)
+
+      adapter(request).put(request).should match_response(:body => Fixture.xml)
+    end
+  end
+
+  describe "#delete" do
+    it "should return a valid HTTPI::Response" do
+      stub_request(:delete, basic_request.url.to_s).to_return(basic_response)
+      adapter(basic_request).delete(basic_request).should match_response(:body => Fixture.xml)
+    end
+  end
+
+  describe "settings:" do
+    before { stub_request(:get, basic_request.url.to_s) }
+
+    describe "use_ssl" do
+      it "should be set to false for non-SSL requests" do
+        net_http.expects(:use_ssl=).with(false)
+        adapter(basic_request).get(basic_request)
+      end
+
+      it "should be set to true for SSL requests" do
+        request = basic_request { |request| request.ssl = true }
+
+        net_http.expects(:use_ssl=).with(true)
+        adapter(request).get(request)
+      end
+    end
+
+    describe "open_timeout" do
+      it "should not be set if not specified" do
+        net_http.expects(:open_timeout=).never
+        adapter(basic_request).get(basic_request)
+      end
+
+      it "should be set if specified" do
+        request = basic_request { |request| request.open_timeout = 30 }
+
+        net_http.expects(:open_timeout=).with(30)
+        adapter(request).get(request)
+      end
+    end
+
+    describe "read_timeout" do
+      it "should not be set if not specified" do
+        net_http.expects(:read_timeout=).never
+        adapter(basic_request).get(basic_request)
+      end
+
+      it "should be set if specified" do
+        request = basic_request { |request| request.read_timeout = 30 }
+
+        net_http.expects(:read_timeout=).with(30)
+        adapter(request).get(request)
+      end
+    end
+
+    describe "basic_auth" do
+      it "should be set for HTTP basic auth" do
+        request = basic_request { |request| request.auth.basic "username", "password" }
+
+        stub_request(:get, "http://username:password@example.com")
+        Net::HTTP::Get.any_instance.expects(:basic_auth).with(*request.auth.credentials)
+        adapter(request).get(request)
+      end
+    end
+
+    context "(for SSL client auth)" do
+      let(:ssl_auth_request) do
+        basic_request do |request|
+          request.auth.ssl.cert_key_file = "spec/fixtures/client_key.pem"
+          request.auth.ssl.cert_file = "spec/fixtures/client_cert.pem"
+        end
+      end
+
+      it "key, cert and verify_mode should be set" do
+        net_http.expects(:cert=).with(ssl_auth_request.auth.ssl.cert)
+        net_http.expects(:key=).with(ssl_auth_request.auth.ssl.cert_key)
+        net_http.expects(:verify_mode=).with(ssl_auth_request.auth.ssl.openssl_verify_mode)
+
+        adapter(ssl_auth_request).get(ssl_auth_request)
+      end
+
+      it "should set the client_ca if specified" do
+        ssl_auth_request.auth.ssl.ca_cert_file = "spec/fixtures/client_cert.pem"
+        net_http.expects(:ca_file=).with(ssl_auth_request.auth.ssl.ca_cert_file)
+
+        adapter(ssl_auth_request).get(ssl_auth_request)
+      end
+    end
+  end
+
+  def basic_request
+    request = HTTPI::Request.new "http://example.com"
+    yield request if block_given?
+    request
+  end
+
+end

data/search_biomodel/ruby/1.8/gems/httpi-0.9.4/spec/httpi/adapter_spec.rb

@@ -0,0 +1,55 @@
+require "spec_helper"
+require "httpi/adapter"
+
+describe HTTPI::Adapter do
+  let(:adapter) { HTTPI::Adapter }
+
+  describe ".use" do
+    around do |example|
+      adapter.use = nil
+      example.run
+      adapter.use = nil
+    end
+
+    it "sets the adapter to use" do
+      adapter.use.should_not == :net_http
+
+      adapter.use = :net_http
+      adapter.use.should == :net_http
+    end
+
+    it "defaults to use the HTTPClient adapter" do
+      adapter.use.should == :httpclient
+    end
+
+    it "loads the adapter's client library" do
+      adapter.expects(:require).with("httpclient")
+      adapter.use = :httpclient
+    end
+
+    it "raises an ArgumentError in case of an invalid adapter" do
+      expect { adapter.use = :unknown }.to raise_error(ArgumentError)
+    end
+  end
+
+  describe ".load" do
+    context "called with a valid adapter" do
+      it "returns the adapter's name and class" do
+        adapter.load(:curb).should == [:curb, HTTPI::Adapter::Curb]
+      end
+    end
+
+    context "called with nil" do
+      it "returns the default adapter's name and class" do
+        adapter.load(nil).should == [:httpclient, HTTPI::Adapter::HTTPClient]
+      end
+    end
+
+    context "called with an invalid adapter" do
+      it "raises an ArgumentError" do
+        expect { adapter.use = :unknown }.to raise_error(ArgumentError)
+      end
+    end
+  end
+
+end

data/search_biomodel/ruby/1.8/gems/httpi-0.9.4/spec/httpi/auth/config_spec.rb

@@ -0,0 +1,117 @@
+require "spec_helper"
+require "httpi/auth/config"
+
+describe HTTPI::Auth::Config do
+  let(:auth) { HTTPI::Auth::Config.new }
+
+  describe "#basic" do
+    it "lets you specify the basic auth credentials" do
+      auth.basic "username", "password"
+      auth.basic.should == ["username", "password"]
+    end
+
+    it "also accepts an Array of credentials" do
+      auth.basic ["username", "password"]
+      auth.basic.should == ["username", "password"]
+    end
+
+    it "sets the authentication type to :basic" do
+      auth.basic "username", "password"
+      auth.type.should == :basic
+    end
+  end
+
+  describe "#basic?" do
+    it "defaults to return false" do
+      auth.should_not be_basic
+    end
+
+    it "returns true for HTTP basic auth" do
+      auth.basic "username", "password"
+      auth.should be_basic
+    end
+  end
+
+  describe "#digest" do
+    it "lets you specify the digest auth credentials" do
+      auth.digest "username", "password"
+      auth.digest.should == ["username", "password"]
+    end
+
+    it "also accepts an Array of credentials" do
+      auth.digest ["username", "password"]
+      auth.digest.should == ["username", "password"]
+    end
+
+    it "sets the authentication type to :digest" do
+      auth.digest "username", "password"
+      auth.type.should == :digest
+    end
+  end
+
+  describe "#digest?" do
+    it "defaults to return false" do
+      auth.should_not be_digest
+    end
+
+    it "returns true for HTTP digest auth" do
+      auth.digest "username", "password"
+      auth.should be_digest
+    end
+  end
+
+  describe "#http?" do
+    it "defaults to return false" do
+      auth.should_not be_http
+    end
+
+    it "returns true for HTTP basic auth" do
+      auth.basic "username", "password"
+      auth.should be_http
+    end
+
+    it "returns true for HTTP digest auth" do
+      auth.digest "username", "password"
+      auth.should be_http
+    end
+  end
+
+  describe "#ssl" do
+    it "returns the HTTPI::Auth::SSL object" do
+      auth.ssl.should be_a(HTTPI::Auth::SSL)
+    end
+  end
+
+  describe "#ssl?" do
+    it "defaults to return false" do
+      auth.should_not be_ssl
+    end
+
+    it "returns true for SSL client auth" do
+      auth.ssl.cert_key_file = "spec/fixtures/client_key.pem"
+      auth.ssl.cert_file = "spec/fixtures/client_cert.pem"
+
+      auth.should be_ssl
+    end
+  end
+
+  describe "#type" do
+    it "returns the authentication type" do
+      auth.basic "username", "password"
+      auth.type.should == :basic
+    end
+  end
+
+  describe "#credentials" do
+    it "returns the credentials for HTTP basic auth" do
+      auth.basic "username", "basic"
+      auth.credentials.should == ["username", "basic"]
+    end
+
+    it "returns the credentials for HTTP digest auth" do
+      auth.digest "username", "digest"
+      auth.credentials.should == ["username", "digest"]
+    end
+  end
+
+end

data/search_biomodel/ruby/1.8/gems/httpi-0.9.4/spec/httpi/auth/ssl_spec.rb

@@ -0,0 +1,128 @@
+require "spec_helper"
+require "httpi/auth/ssl"
+
+describe HTTPI::Auth::SSL do
+
+  describe "VERIFY_MODES" do
+    it "contains the supported SSL verify modes" do
+      HTTPI::Auth::SSL::VERIFY_MODES.should == [:none, :peer, :fail_if_no_peer_cert, :client_once]
+    end
+  end
+
+  describe "#present?" do
+    it "defaults to return false" do
+      ssl = HTTPI::Auth::SSL.new
+      ssl.should_not be_present
+    end
+
+    it "returns false if only a client key was specified" do
+      ssl = HTTPI::Auth::SSL.new
+      ssl.cert_key_file = "spec/fixtures/client_key.pem"
+
+      ssl.should_not be_present
+    end
+
+    it "returns false if only a client key was specified" do
+      ssl = HTTPI::Auth::SSL.new
+      ssl.cert_file = "spec/fixtures/client_cert.pem"
+
+      ssl.should_not be_present
+    end
+
+    it "returns true if both client key and cert are present" do
+      ssl.should be_present
+    end
+
+    it "returns true of the verify_mode is :none" do
+      ssl = HTTPI::Auth::SSL.new
+      ssl.verify_mode = :none
+      ssl.should be_present
+    end
+  end
+
+  describe "#verify_mode" do
+    it "defaults to return :peer" do
+      ssl.verify_mode.should == :peer
+    end
+
+    it "sets the verify mode to use" do
+      ssl = HTTPI::Auth::SSL.new
+
+      ssl.verify_mode = :none
+      ssl.verify_mode.should == :none
+    end
+
+    it "raises an ArgumentError if the given mode is not supported" do
+      expect { ssl.verify_mode = :invalid }.to raise_error(ArgumentError)
+    end
+  end
+
+  describe "#cert" do
+    it "returns an OpenSSL::X509::Certificate for the given cert_file" do
+      ssl.cert.should be_a(OpenSSL::X509::Certificate)
+    end
+
+    it "returns nil if no cert_file was given" do
+      ssl = HTTPI::Auth::SSL.new
+      ssl.cert.should be_nil
+    end
+  end
+
+  describe "#cert_key" do
+    it "returns a OpenSSL::PKey::RSA for the given cert_key" do
+      ssl.cert_key.should be_a(OpenSSL::PKey::RSA)
+    end
+
+    it "returns nil if no cert_key_file was given" do
+      ssl = HTTPI::Auth::SSL.new
+      ssl.cert_key.should be_nil
+    end
+  end
+
+  describe "#ca_cert" do
+    it "returns an OpenSSL::X509::Certificate for the given ca_cert_file" do
+      ssl = HTTPI::Auth::SSL.new
+
+      ssl.ca_cert_file = "spec/fixtures/client_cert.pem"
+      ssl.ca_cert.should be_a(OpenSSL::X509::Certificate)
+    end
+  end
+
+  describe "#openssl_verify_mode" do
+    it "returns the OpenSSL verify mode for :none" do
+      ssl = HTTPI::Auth::SSL.new
+
+      ssl.verify_mode = :none
+      ssl.openssl_verify_mode.should == OpenSSL::SSL::VERIFY_NONE
+    end
+
+    it "returns the OpenSSL verify mode for :peer" do
+      ssl = HTTPI::Auth::SSL.new
+
+      ssl.verify_mode = :peer
+      ssl.openssl_verify_mode.should == OpenSSL::SSL::VERIFY_PEER
+    end
+
+    it "returns the OpenSSL verify mode for :fail_if_no_peer_cert" do
+      ssl = HTTPI::Auth::SSL.new
+
+      ssl.verify_mode = :fail_if_no_peer_cert
+      ssl.openssl_verify_mode.should == OpenSSL::SSL::VERIFY_FAIL_IF_NO_PEER_CERT
+    end
+
+    it "returns the OpenSSL verify mode for :client_once" do
+      ssl = HTTPI::Auth::SSL.new
+
+      ssl.verify_mode = :client_once
+      ssl.openssl_verify_mode.should == OpenSSL::SSL::VERIFY_CLIENT_ONCE
+    end
+  end
+
+  def ssl
+    ssl = HTTPI::Auth::SSL.new
+    ssl.cert_key_file = "spec/fixtures/client_key.pem"
+    ssl.cert_file = "spec/fixtures/client_cert.pem"
+    ssl
+  end
+
+end

data/search_biomodel/ruby/1.8/gems/httpi-0.9.4/spec/httpi/httpi_spec.rb

@@ -0,0 +1,284 @@
+require "spec_helper"
+require "httpi"
+
+describe HTTPI do
+  let(:client) { HTTPI }
+  let(:httpclient) { HTTPI::Adapter.load(:httpclient)[1] }
+  let(:curb) { HTTPI::Adapter.load(:curb)[1] }
+
+  describe ".get(request)" do
+    it "executes a GET request using the default adapter" do
+      request = HTTPI::Request.new
+      httpclient.any_instance.expects(:get).with(request)
+
+      client.get request
+    end
+  end
+
+  describe ".get(request, adapter)" do
+    it "executes a GET request using the given adapter" do
+      request = HTTPI::Request.new
+      curb.any_instance.expects(:get).with(request)
+
+      client.get request, :curb
+    end
+  end
+
+  describe ".get(url)" do
+    it "executes a GET request using the default adapter" do
+      HTTPI::Request.any_instance.expects(:url=).with("http://example.com")
+      httpclient.any_instance.expects(:get).with(instance_of(HTTPI::Request))
+
+      client.get "http://example.com"
+    end
+  end
+
+  describe ".get(url, adapter)" do
+    it "executes a GET request using the given adapter" do
+      HTTPI::Request.any_instance.expects(:url=).with("http://example.com")
+      curb.any_instance.expects(:get).with(instance_of(HTTPI::Request))
+
+      client.get "http://example.com", :curb
+    end
+  end
+
+  describe ".post(request)" do
+    it "executes a POST request using the default adapter" do
+      request = HTTPI::Request.new
+      httpclient.any_instance.expects(:post).with(request)
+
+      client.post request
+    end
+  end
+
+  describe ".post(request, adapter)" do
+    it "executes a POST request using the given adapter" do
+      request = HTTPI::Request.new
+      curb.any_instance.expects(:post).with(request)
+
+      client.post request, :curb
+    end
+  end
+
+  describe ".post(url, body)" do
+    it "executes a POST request using the default adapter" do
+      HTTPI::Request.any_instance.expects(:url=).with("http://example.com")
+      HTTPI::Request.any_instance.expects(:body=).with("<some>xml</some>")
+      httpclient.any_instance.expects(:post).with(instance_of(HTTPI::Request))
+
+      client.post "http://example.com", "<some>xml</some>"
+    end
+  end
+
+  describe ".post(url, body, adapter)" do
+    it "executes a POST request using the given adapter" do
+      HTTPI::Request.any_instance.expects(:url=).with("http://example.com")
+      HTTPI::Request.any_instance.expects(:body=).with("<some>xml</some>")
+      curb.any_instance.expects(:post).with(instance_of(HTTPI::Request))
+
+      client.post "http://example.com", "<some>xml</some>", :curb
+    end
+  end
+
+  describe ".head(request)" do
+    it "executes a HEAD request using the default adapter" do
+      request = HTTPI::Request.new
+      httpclient.any_instance.expects(:head).with(request)
+
+      client.head request
+    end
+  end
+
+  describe ".head(request, adapter)" do
+    it "executes a HEAD request using the given adapter" do
+      request = HTTPI::Request.new
+      curb.any_instance.expects(:head).with(request)
+
+      client.head request, :curb
+    end
+  end
+
+  describe ".head(url)" do
+    it "executes a HEAD request using the default adapter" do
+      HTTPI::Request.any_instance.expects(:url=).with("http://example.com")
+      httpclient.any_instance.expects(:head).with(instance_of(HTTPI::Request))
+
+      client.head "http://example.com"
+    end
+  end
+
+  describe ".head(url, adapter)" do
+    it "executes a HEAD request using the given adapter" do
+      HTTPI::Request.any_instance.expects(:url=).with("http://example.com")
+      curb.any_instance.expects(:head).with(instance_of(HTTPI::Request))
+
+      client.head "http://example.com", :curb
+    end
+  end
+
+  describe ".put(request)" do
+    it "executes a PUT request using the default adapter" do
+      request = HTTPI::Request.new
+      httpclient.any_instance.expects(:put).with(request)
+
+      client.put request
+    end
+  end
+
+  describe ".put(request, adapter)" do
+    it "executes a PUT request using the given adapter" do
+      request = HTTPI::Request.new
+      curb.any_instance.expects(:put).with(request)
+
+      client.put request, :curb
+    end
+  end
+
+  describe ".put(url, body)" do
+    it "executes a PUT request using the default adapter" do
+      HTTPI::Request.any_instance.expects(:url=).with("http://example.com")
+      HTTPI::Request.any_instance.expects(:body=).with("<some>xml</some>")
+      httpclient.any_instance.expects(:put).with(instance_of(HTTPI::Request))
+
+      client.put "http://example.com", "<some>xml</some>"
+    end
+  end
+
+  describe ".put(url, body, adapter)" do
+    it "executes a PUT request using the given adapter" do
+      HTTPI::Request.any_instance.expects(:url=).with("http://example.com")
+      HTTPI::Request.any_instance.expects(:body=).with("<some>xml</some>")
+      curb.any_instance.expects(:put).with(instance_of(HTTPI::Request))
+
+      client.put "http://example.com", "<some>xml</some>", :curb
+    end
+  end
+
+  describe ".delete(request)" do
+    it "executes a DELETE request using the default adapter" do
+      request = HTTPI::Request.new
+      httpclient.any_instance.expects(:delete).with(request)
+
+      client.delete request
+    end
+  end
+
+  describe ".delete(request, adapter)" do
+    it "executes a DELETE request using the given adapter" do
+      request = HTTPI::Request.new
+      curb.any_instance.expects(:delete).with(request)
+
+      client.delete request, :curb
+    end
+  end
+
+  describe ".delete(url)" do
+    it "executes a DELETE request using the default adapter" do
+      HTTPI::Request.any_instance.expects(:url=).with("http://example.com")
+      httpclient.any_instance.expects(:delete).with(instance_of(HTTPI::Request))
+
+      client.delete "http://example.com"
+    end
+  end
+
+  describe ".delete(url, adapter)" do
+    it "executes a DELETE request using the given adapter" do
+      HTTPI::Request.any_instance.expects(:url=).with("http://example.com")
+      curb.any_instance.expects(:delete).with(instance_of(HTTPI::Request))
+
+      client.delete "http://example.com", :curb
+    end
+  end
+
+  describe ".request" do
+    it "raises an ArgumentError in case of an invalid request method" do
+      expect { client.request :invalid, HTTPI::Request.new }.to raise_error(ArgumentError)
+    end
+  end
+
+  describe ".adapter=" do
+    it "sets the default adapter to use" do
+      HTTPI::Adapter.expects(:use=).with(:net_http)
+      HTTPI.adapter = :net_http
+    end
+  end
+
+  HTTPI::REQUEST_METHODS.each do |method|
+    describe ".request(#{method}, request, adapter)" do
+      it "delegates to the .#{method} method" do
+        HTTPI.expects(method)
+        client.request method, HTTPI::Request.new
+      end
+    end
+
+    describe ".#{method}" do
+      let(:request) { HTTPI::Request.new :url => "http://example.com" }
+
+      it "raises an ArgumentError in case of an invalid adapter" do
+        expect { client.request method, request, :invalid }.to raise_error(ArgumentError)
+      end
+
+      it "raises an ArgumentError in case of an invalid request" do
+        expect { client.request method, "invalid" }.to raise_error(ArgumentError)
+      end
+
+      HTTPI::Adapter::ADAPTERS.each do |adapter, opts|
+        client_class = {
+          :httpclient => lambda { HTTPClient },
+          :curb       => lambda { Curl::Easy },
+          :net_http   => lambda { Net::HTTP }
+        }
+
+        context "using #{adapter}" do
+          before { opts[:class].any_instance.expects(method) }
+
+          it "logs that we're executing a request" do
+            HTTPI.expects(:log).with(:debug, "HTTPI executes HTTP #{method.to_s.upcase} using the #{adapter} adapter")
+            client.request method, request, adapter
+          end
+
+          it "yields the HTTP client instance used for the request" do
+            block = lambda { |http| http.be_a(client_class[adapter].call) }
+            client.request(method, request, adapter, &block)
+          end
+        end
+      end
+    end
+  end
+
+  context "(with reset)" do
+    before { HTTPI.reset_config! }
+
+    after do
+      HTTPI.reset_config!
+      HTTPI.log = false  # disable for specs
+    end
+
+    describe ".log" do
+      it "defaults to true" do
+        HTTPI.log?.should be_true
+      end
+    end
+
+    describe ".logger" do
+      it "defaults to Logger writing to STDOUT" do
+        HTTPI.logger.should be_a(Logger)
+      end
+    end
+
+    describe ".log_level" do
+      it "defaults to :warn" do
+        HTTPI.log_level.should == :warn
+      end
+    end
+
+    describe ".log" do
+      it "logs the given messages" do
+        HTTPI.log_level = :debug
+        HTTPI.logger.expects(:debug).with("Log this")
+        HTTPI.log "Log", "this"
+      end
+    end
+  end
+
+end