s-savon 0.8.6

data/spec/savon/soap_spec.rb

@@ -0,0 +1,21 @@
+require "spec_helper"
+
+describe Savon::SOAP do
+
+  it "should contain the SOAP namespace for each supported SOAP version" do
+    Savon::SOAP::Versions.each do |soap_version|
+      Savon::SOAP::Namespace[soap_version].should be_a(String)
+      Savon::SOAP::Namespace[soap_version].should_not be_empty
+    end
+  end
+
+  it "should contain a Rage of supported SOAP versions" do
+    Savon::SOAP::Versions.should == (1..2)
+  end
+
+  it "should contain a Regexp matching the xs:dateTime format" do
+    Savon::SOAP::DateTimeRegexp.should be_a(Regexp)
+    (Savon::SOAP::DateTimeRegexp === "2012-03-22T16:22:33").should be_true
+  end
+
+end

data/spec/savon/wsdl/document_spec.rb

@@ -0,0 +1,132 @@
+require "spec_helper"
+
+describe Savon::WSDL::Document do
+
+  shared_examples_for "a WSDL document" do
+    it "should be present" do
+      wsdl.should be_present
+    end
+
+    describe "#namespace" do
+      it "should return the namespace URI" do
+        wsdl.namespace.should == "http://v1_0.ws.auth.order.example.com/"
+      end
+    end
+
+    describe "#soap_actions" do
+      it "should return an Array of available SOAP actions" do
+        wsdl.soap_actions.should == [:authenticate]
+      end
+    end
+
+    describe "#soap_action" do
+      it "should return the SOAP action for a given key" do
+        wsdl.soap_action(:authenticate).should == "authenticate"
+      end
+
+      it "should return nil if no SOAP action could be found" do
+        wsdl.soap_action(:unknown).should be_nil
+      end
+    end
+
+    describe "#soap_input" do
+      it "should return the SOAP input tag for a given key" do
+        wsdl.soap_input(:authenticate).should == :authenticate
+      end
+
+      it "should return nil if no SOAP input tag could be found" do
+        wsdl.soap_input(:unknown).should be_nil
+      end
+    end
+
+    describe "#operations" do
+      it "should return a Hash of SOAP operations" do
+        wsdl.operations.should == {
+          :authenticate => {
+            :input => "authenticate", :action => "authenticate"
+          }
+        }
+      end
+    end
+
+    describe "#document" do
+      it "should return the raw WSDL document" do
+        wsdl.document.should == Fixture.wsdl(:authentication)
+      end
+
+      it "should be memoized" do
+        wsdl.document.should equal(wsdl.document)
+      end
+    end
+  end
+
+  context "with a remote document" do
+    let(:wsdl) { Savon::WSDL::Document.new HTTPI::Request.new, Endpoint.wsdl }
+
+    before do
+      response = HTTPI::Response.new 200, {}, Fixture.wsdl(:authentication)
+      HTTPI.stubs(:get).returns(response)
+    end
+
+    it_should_behave_like "a WSDL document"
+
+    describe "#element_form_default" do
+      it "should return :unqualified" do
+        wsdl.element_form_default.should == :unqualified
+      end
+    end
+  end
+
+  context "with a local document" do
+    let(:wsdl) do
+      wsdl = "spec/fixtures/wsdl/authentication.xml"
+      Savon::WSDL::Document.new HTTPI::Request.new, wsdl
+    end
+
+    before { HTTPI.expects(:get).never }
+
+    it_should_behave_like "a WSDL document"
+  end
+
+  context "without a WSDL document" do
+    let(:wsdl) { Savon::WSDL::Document.new HTTPI::Request.new }
+
+    it "should not be present" do
+      wsdl.should_not be_present
+    end
+
+    describe "#soap_action" do
+      it "should return nil" do
+        wsdl.soap_action(:authenticate).should be_nil
+      end
+    end
+
+    describe "#soap_input" do
+      it "should return nil" do
+        wsdl.soap_input(:authenticate).should be_nil
+      end
+    end
+
+    describe "#document" do
+      it "should raise an ArgumentError" do
+        lambda { wsdl.document }.should raise_error(ArgumentError)
+      end
+    end
+  end
+
+  context "with a WSDL document containing elementFormDefault='qualified'" do
+    let(:wsdl) { Savon::WSDL::Document.new HTTPI::Request.new, Endpoint.wsdl }
+
+    before do
+      response = HTTPI::Response.new 200, {}, Fixture.wsdl(:geotrust)
+      HTTPI.stubs(:get).returns(response)
+    end
+
+    describe "#element_form_default" do
+      it "should return :qualified" do
+        wsdl.element_form_default.should == :qualified
+      end
+    end
+  end
+
+end

data/spec/savon/wsdl/parser_spec.rb

@@ -0,0 +1,99 @@
+require "spec_helper"
+
+describe Savon::WSDL::Parser do
+
+  context "with namespaced_actions.xml" do
+    let(:parser) { new_parser :namespaced_actions }
+
+    it "should return the target namespace" do
+      parser.namespace.should == "http://api.example.com/api/"
+    end
+
+    it "should return the SOAP endpoint" do
+      parser.endpoint.should == URI("https://api.example.com/api/api.asmx")
+    end
+
+    it "should return the available SOAP operations" do
+      parser.operations.should match_operations(
+        :get_api_key => { :input => "GetApiKey", :action => "http://api.example.com/api/User.GetApiKey" },
+        :delete_client => { :input => "DeleteClient", :action => "http://api.example.com/api/Client.Delete" },
+        :get_clients => { :input => "GetClients", :action => "http://api.example.com/api/User.GetClients" }
+      )
+    end
+
+    it "should return that :element_form_default is set to :qualified" do
+      parser.element_form_default.should == :qualified
+    end
+  end
+
+  context "with no_namespace.xml" do
+    let(:parser) { new_parser :no_namespace }
+
+    it "should return the target namespace" do
+      parser.namespace.should == "urn:ActionWebService"
+    end
+
+    it "should return the SOAP endpoint" do
+      parser.endpoint.should == URI("http://example.com/api/api")
+    end
+
+    it "should return the available SOAP operations" do
+      parser.operations.should match_operations(
+        :search_user => { :input => "SearchUser", :action => "/api/api/SearchUser" },
+        :get_user_login_by_id => { :input => "GetUserLoginById", :action => "/api/api/GetUserLoginById" },
+        :get_all_contacts => { :input => "GetAllContacts", :action => "/api/api/GetAllContacts" }
+      )
+    end
+
+    it "should return that :element_form_default is set to :unqualified" do
+      parser.element_form_default.should == :unqualified
+    end
+  end
+
+  context "with geotrust.xml" do
+    let(:parser) { new_parser :geotrust }
+
+    it "should return the target namespace" do
+      parser.namespace.should == "http://api.geotrust.com/webtrust/query"
+    end
+
+    it "should return the SOAP endpoint" do
+      parser.endpoint.should == URI("https://test-api.geotrust.com/webtrust/query.jws")
+    end
+
+    it "should return the available SOAP operations" do
+      parser.operations.should match_operations(
+        :get_quick_approver_list => { :input => "GetQuickApproverList", :action => "GetQuickApproverList" },
+        :hello => { :input => "hello", :action => "hello" }
+      )
+    end
+
+    it "should return that :element_form_default is set to :qualified" do
+      parser.element_form_default.should == :qualified
+    end
+  end
+
+  context "with two_bindings.xml" do
+    let(:parser) { new_parser :two_bindings }
+
+    it "should merge operations from all binding sections (until we have an example where it makes sense to do otherwise)" do
+      parser.operations.keys.map(&:to_s).sort.should ==
+        %w{post post11only post12only}
+    end
+  end
+
+  RSpec::Matchers.define :match_operations do |expected|
+    match do |actual|
+      actual.should have(expected.keys.size).items
+      actual.keys.should include(*expected.keys)
+      actual.each { |key, value| value.should == expected[key] }
+    end
+  end
+
+  def new_parser(fixture)
+    parser = Savon::WSDL::Parser.new
+    REXML::Document.parse_stream Fixture[:wsdl, fixture], parser
+    parser
+  end
+
+end

data/spec/savon/wsdl/request_spec.rb

@@ -0,0 +1,15 @@
+require "spec_helper"
+
+describe Savon::WSDL::Request do
+  let(:http_request) { HTTPI::Request.new :url => Endpoint.wsdl }
+  let(:request) { Savon::WSDL::Request.new http_request }
+
+  describe "#response" do
+    it "execute an HTTP GET request and return the HTTPI::Response" do
+      response = HTTPI::Response.new 200, {}, Fixture.response(:authentication)
+      HTTPI.expects(:get).with(http_request).returns(response)
+      request.response.should == response
+    end
+  end
+
+end

data/spec/savon/wsse_spec.rb

@@ -0,0 +1,213 @@
+require "spec_helper"
+
+describe Savon::WSSE do
+  let(:wsse) { Savon::WSSE.new }
+
+  it "should contain the namespace for WS Security Secext" do
+    Savon::WSSE::WSENamespace.should ==
+      "http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd"
+  end
+
+  it "should contain the namespace for WS Security Utility" do
+    Savon::WSSE::WSUNamespace.should ==
+      "http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd"
+  end
+
+  it "should contain the namespace for the PasswordText type" do
+    Savon::WSSE::PasswordTextURI.should ==
+      "http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-username-token-profile-1.0#PasswordText"
+  end
+
+  it "should contain the namespace for the PasswordDigest type" do
+    Savon::WSSE::PasswordDigestURI.should ==
+      "http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-username-token-profile-1.0#PasswordDigest"
+  end
+
+  describe "#credentials" do
+    it "should set the username" do
+      wsse.credentials "username", "password"
+      wsse.username.should == "username"
+    end
+
+    it "should set the password" do
+      wsse.credentials "username", "password"
+      wsse.password.should == "password"
+    end
+
+    it "should default to set digest to false" do
+      wsse.credentials "username", "password"
+      wsse.should_not be_digest
+    end
+
+    it "should set digest to true if specified" do
+      wsse.credentials "username", "password", :digest
+      wsse.should be_digest
+    end
+  end
+
+  describe "#username" do
+    it "should set the username" do
+      wsse.username = "username"
+      wsse.username.should == "username"
+    end
+  end
+
+  describe "#password" do
+    it "should set the password" do
+      wsse.password = "password"
+      wsse.password.should == "password"
+    end
+  end
+
+  describe "#digest" do
+    it "should default to false" do
+      wsse.should_not be_digest
+    end
+
+    it "should specify whether to use digest auth" do
+      wsse.digest = true
+      wsse.should be_digest
+    end
+  end
+
+  describe "#to_xml" do
+    context "with no credentials" do
+      it "should return an empty String" do
+        wsse.to_xml.should == ""
+      end
+    end
+
+    context "with only a username" do
+      before { wsse.username = "username" }
+
+      it "should return an empty String" do
+        wsse.to_xml.should == ""
+      end
+    end
+
+    context "with only a password" do
+      before { wsse.password = "password" }
+
+      it "should return an empty String" do
+        wsse.to_xml.should == ""
+      end
+    end
+
+    context "with credentials" do
+      before { wsse.credentials "username", "password" }
+
+      it "should contain a wsse:Security tag" do
+        namespace = "http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd"
+        wsse.to_xml.should include("<wsse:Security xmlns:wsse=\"#{namespace}\">")
+      end
+
+      it "should contain a wsu:Id attribute" do
+        wsse.to_xml.should include('<wsse:UsernameToken wsu:Id="UsernameToken-1"')
+      end
+
+      it "should increment the wsu:Id attribute count" do
+        wsse.to_xml.should include('<wsse:UsernameToken wsu:Id="UsernameToken-1"')
+        wsse.to_xml.should include('<wsse:UsernameToken wsu:Id="UsernameToken-2"')
+      end
+
+      it "should contain the WSE and WSU namespaces" do
+        wsse.to_xml.should include(Savon::WSSE::WSENamespace, Savon::WSSE::WSUNamespace)
+      end
+
+      it "should contain the username and password" do
+        wsse.to_xml.should include("username", "password")
+      end
+
+      it "should not contain a wsse:Nonce tag" do
+        wsse.to_xml.should_not match(/<wsse:Nonce>.*<\/wsse:Nonce>/)
+      end
+
+      it "should not contain a wsu:Created tag" do
+        wsse.to_xml.should_not match(/<wsu:Created>.*<\/wsu:Created>/)
+      end
+
+      it "should contain the PasswordText type attribute" do
+        wsse.to_xml.should include(Savon::WSSE::PasswordTextURI)
+      end
+    end
+
+    context "with credentials and digest auth" do
+      before { wsse.credentials "username", "password", :digest }
+
+      it "should contain the WSE and WSU namespaces" do
+        wsse.to_xml.should include(Savon::WSSE::WSENamespace, Savon::WSSE::WSUNamespace)
+      end
+
+      it "should contain the username" do
+        wsse.to_xml.should include("username")
+      end
+
+      it "should not contain the (original) password" do
+        wsse.to_xml.should_not include("password")
+      end
+
+      it "should contain a wsse:Nonce tag" do
+        wsse.to_xml.should match(/<wsse:Nonce>\w+<\/wsse:Nonce>/)
+      end
+
+      it "should contain a wsu:Created tag" do
+        wsse.to_xml.should match(/<wsu:Created>#{Savon::SOAP::DateTimeRegexp}.+<\/wsu:Created>/)
+      end
+
+      it "should contain the PasswordDigest type attribute" do
+        wsse.to_xml.should include(Savon::WSSE::PasswordDigestURI)
+      end
+    end
+
+    context "with #timestamp set to true" do
+      before { wsse.timestamp = true }
+
+      it "should contain a wsse:Timestamp node" do
+        wsse.to_xml.should include('<wsse:Timestamp wsu:Id="Timestamp-1" ' +
+          'xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd">')
+      end
+
+      it "should contain a wsu:Created node defaulting to Time.now" do
+        created_at = Time.now
+        Timecop.freeze created_at do
+          wsse.to_xml.should include("<wsu:Created>#{created_at.xs_datetime}</wsu:Created>")
+        end
+      end
+
+      it "should contain a wsu:Expires node defaulting to Time.now + 60 seconds" do
+        created_at = Time.now
+        Timecop.freeze created_at do
+          wsse.to_xml.should include("<wsu:Expires>#{(created_at + 60).xs_datetime}</wsu:Expires>")
+        end
+      end
+    end
+
+    context "with #created_at" do
+      before { wsse.created_at = Time.now + 86400 }
+
+      it "should contain a wsu:Created node with the given time" do
+        wsse.to_xml.should include("<wsu:Created>#{wsse.created_at.xs_datetime}</wsu:Created>")
+      end
+
+      it "should contain a wsu:Expires node set to #created_at + 60 seconds" do
+        wsse.to_xml.should include("<wsu:Expires>#{(wsse.created_at + 60).xs_datetime}</wsu:Expires>")
+      end
+    end
+
+    context "with #expires_at" do
+      before { wsse.expires_at = Time.now + 86400 }
+
+      it "should contain a wsu:Created node defaulting to Time.now" do
+        created_at = Time.now
+        Timecop.freeze created_at do
+          wsse.to_xml.should include("<wsu:Created>#{created_at.xs_datetime}</wsu:Created>")
+        end
+      end
+
+      it "should contain a wsu:Expires node set to the given time" do
+        wsse.to_xml.should include("<wsu:Expires>#{wsse.expires_at.xs_datetime}</wsu:Expires>")
+      end
+    end
+  end
+
+end