s-savon 0.8.6

data/spec/savon/core_ext/hash_spec.rb

@@ -0,0 +1,121 @@
+require "spec_helper"
+
+describe Hash do
+
+  describe "#deep_merge!" do
+    it "should recursively merge two Hashes" do
+      hash = { :one => 1, "two" => { "three" => 3 } }
+      other_hash = { :four => 4, "two" => { "three" => "merge", :five => 5 } }
+
+      hash.merge!(other_hash).should == { :one => 1, :four => 4, "two" => { "three" => "merge", :five => 5 } }
+    end
+  end
+
+  describe "#find_soap_header" do
+    it "should return the content from the 'soap:Header' element" do
+      soap_header = { "soap:Envelope" => { "soap:Header" => "content" } }
+      soap_header.find_soap_header.should == "content"
+    end
+
+    it "should return an empty Hash in case the 'soap:Header' element could not be found" do
+      soap_header = { "some_hash" => "content" }
+      soap_header.find_soap_header.should == {}
+    end
+  end
+
+  describe "#find_soap_body" do
+    it "should return the content from the 'soap:Body' element" do
+      soap_body = { "soap:Envelope" => { "soap:Body" => "content" } }
+      soap_body.find_soap_body.should == "content"
+    end
+
+    it "should return an empty Hash in case the 'soap:Body' element could not be found" do
+      soap_body = { "some_hash" => "content" }
+      soap_body.find_soap_body.should == {}
+    end
+  end
+
+  describe "#map_soap_response" do
+    it "should convert Hash key Strings to snake_case Symbols" do
+      soap_response = { "userResponse" => { "accountStatus" => "active" } }
+      result = { :user_response => { :account_status => "active" } }
+
+      soap_response.map_soap_response.should == result
+    end
+
+    it "should strip namespaces from Hash keys" do
+      soap_response = { "ns:userResponse" => { "ns2:id" => "666" } }
+      result = { :user_response => { :id => "666" } }
+
+      soap_response.map_soap_response.should == result
+    end
+
+    context "with Savon.strip_namespaces set to false" do
+      around do |example|
+        Savon.strip_namespaces = false
+        example.run
+        Savon.strip_namespaces = true
+      end
+
+      it "should not strip namespaces from Hash keys" do
+        soap_response = { "ns:userResponse" => { "ns2:id" => "666" } }
+        result = { "ns:user_response" => { "ns2:id" => "666" } }
+
+        soap_response.map_soap_response.should == result
+      end
+    end
+
+    it "should convert Hash keys and values in Arrays" do
+      soap_response = { "response" => [{ "name" => "dude" }, { "name" => "gorilla" }] }
+      result = { :response=> [{ :name => "dude" }, { :name => "gorilla" }] }
+
+      soap_response.map_soap_response.should == result
+    end
+
+    it "should convert xsi:nil values to nil Objects" do
+      soap_response = { "userResponse" => { "xsi:nil" => "true" } }
+      result = { :user_response => nil }
+
+      soap_response.map_soap_response.should == result
+    end
+
+    it "should convert Hash values matching the xs:dateTime format into DateTime Objects" do
+      soap_response = { "response" => { "at" => "2012-03-22T16:22:33+00:00" } }
+      result = { :response => { :at => DateTime.new(2012, 03, 22, 16, 22, 33) } }
+
+      soap_response.map_soap_response.should == result
+    end
+
+    it "should convert Hash values matching 'true' to TrueClass" do
+      soap_response = { "response" => { "active" => "false" } }
+      result = { :response => { :active => false } }
+
+      soap_response.map_soap_response.should == result
+    end
+
+    it "should convert Hash values matching 'false' to FalseClass" do
+      soap_response = { "response" => { "active" => "true" } }
+      result = { :response => { :active => true } }
+
+      soap_response.map_soap_response.should == result
+    end
+
+    it "should convert namespaced entries to array elements" do
+      soap_response = {
+        "history" => {
+          "ns10:case" => { "ns10:name" => "a_name" },
+          "ns11:case" => { "ns11:name" => "another_name" }
+        }
+      }
+
+      result = {
+        :history => {
+          :case => [{ :name => "a_name" }, { :name => "another_name" }]
+        }
+      }
+
+      soap_response.map_soap_response.should == result
+    end
+  end
+
+end

data/spec/savon/core_ext/object_spec.rb

@@ -0,0 +1,19 @@
+require "spec_helper"
+
+describe Object do
+
+  describe "blank?" do
+    it "returns true for Objects perceived to be blank" do
+      ["", false, nil, [], {}].each do |object|
+        object.should be_blank
+      end
+    end
+
+    it "returns false for every other Object" do
+      ["!blank", true, [:a], {:a => "b"}].each do |object|
+        object.should_not be_blank
+      end
+    end
+  end
+
+end

data/spec/savon/core_ext/string_spec.rb

@@ -0,0 +1,57 @@
+require "spec_helper"
+
+describe String do
+
+  describe "snakecase" do
+    it "converts a lowerCamelCase String to snakecase" do
+      "lowerCamelCase".snakecase.should == "lower_camel_case"
+    end
+
+    it "converts period characters to underscores" do
+      "User.GetEmail".snakecase.should == "user_get_email"
+    end
+  end
+
+  describe "lower_camelcase" do
+    it "converts a snakecase String to lowerCamelCase" do
+      "lower_camel_case".lower_camelcase.should == "lowerCamelCase"
+    end
+  end
+
+  describe "starts_with?" do
+    it "should return whether it starts with a given suffix" do
+      "authenticate".starts_with?("auth").should be_true
+      "authenticate".starts_with?("cate").should be_false
+    end
+  end
+
+  describe "strip_namespace" do
+    it "strips the namespace from a namespaced String" do
+      "ns:customer".strip_namespace.should == "customer"
+    end
+
+    it "returns the original String for a String without namespace" do
+      "customer".strip_namespace.should == "customer"
+    end
+  end
+
+  describe "map_soap_response" do
+    it "returns a DateTime Object for Strings matching the xs:dateTime format" do
+      "2012-03-22T16:22:33".map_soap_response.should ==
+        DateTime.new(2012, 03, 22, 16, 22, 33)
+    end
+
+    it "returns true for Strings matching 'true'" do
+      "true".map_soap_response.should be_true
+    end
+
+    it "returns false for Strings matching 'false'" do
+      "false".map_soap_response.should be_false
+    end
+
+    it "defaults to return the original value" do
+      "whatever".map_soap_response.should == "whatever"
+    end
+  end
+
+end

data/spec/savon/core_ext/time_spec.rb

@@ -0,0 +1,13 @@
+require "spec_helper"
+
+describe Time do
+
+  describe "#xs_datetime" do
+    let(:time) { Time.utc(2011, 01, 04, 13, 45, 55) }
+
+    it "should return an xs:dateTime formatted String" do
+      time.xs_datetime.should == "2011-01-04T13:45:55UTC"
+    end
+  end
+
+end

data/spec/savon/http/error_spec.rb

@@ -0,0 +1,52 @@
+require "spec_helper"
+
+describe Savon::HTTP::Error do
+  let(:http_error) { Savon::HTTP::Error.new new_response(:code => 404, :body => "Not Found") }
+  let(:no_error) { Savon::HTTP::Error.new new_response }
+
+  it "should be a Savon::Error" do
+    Savon::HTTP::Error.should < Savon::Error
+  end
+
+  describe "#http" do
+    it "should return the HTTPI::Response" do
+      http_error.http.should be_an(HTTPI::Response)
+    end
+  end
+
+  describe "#present?" do
+    it "should return true if there was an HTTP error" do
+      http_error.should be_present
+    end
+
+    it "should return false unless there was an HTTP error" do
+      no_error.should_not be_present
+    end
+  end
+
+  [:message, :to_s].each do |method|
+    describe "##{method}" do
+      it "should return an empty String unless an HTTP error is present" do
+        no_error.send(method).should == ""
+      end
+
+      it "should return the HTTP error message" do
+        http_error.send(method).should == "HTTP error (404): Not Found"
+      end
+    end
+  end
+
+  describe "#to_hash" do
+    it "should return the HTTP response details as a Hash" do
+      http_error.to_hash.should == { :code => 404, :headers => {}, :body => "Not Found" }
+    end
+  end
+
+  def new_response(options = {})
+    defaults = { :code => 200, :headers => {}, :body => Fixture.response(:authentication) }
+    response = defaults.merge options
+    
+    HTTPI::Response.new response[:code], response[:headers], response[:body]
+  end
+
+end

data/spec/savon/savon_spec.rb

@@ -0,0 +1,85 @@
+require "spec_helper"
+
+describe Savon do
+
+  describe ".configure" do
+    around do |example|
+      Savon.reset_config!
+      example.run
+      Savon.reset_config!
+      Savon.log = false  # disable logging
+    end
+
+    describe "log" do
+      it "should default to true" do
+        Savon.log?.should be_true
+      end
+
+      it "should set whether to log HTTP requests" do
+        Savon.configure { |config| config.log = false }
+        Savon.log?.should be_false
+      end
+    end
+
+    describe "logger" do
+      it "should set the logger to use" do
+        MyLogger = Class.new
+        Savon.configure { |config| config.logger = MyLogger }
+        Savon.logger.should == MyLogger
+      end
+
+      it "should default to Logger writing to STDOUT" do
+        Savon.logger.should be_a(Logger)
+      end
+    end
+
+    describe "log_level" do
+      it "should default to :debug" do
+        Savon.log_level.should == :debug
+      end
+
+      it "should set the log level to use" do
+        Savon.configure { |config| config.log_level = :info }
+        Savon.log_level.should == :info
+      end
+    end
+
+    describe "raise_errors" do
+      it "should default to true" do
+        Savon.raise_errors?.should be_true
+      end
+
+      it "should not raise errors when disabled" do
+        Savon.raise_errors = false
+        Savon.raise_errors?.should be_false
+      end
+    end
+
+    describe "soap_version" do
+      it "should default to SOAP 1.1" do
+        Savon.soap_version.should == 1
+      end
+
+      it "should return 2 if set to SOAP 1.2" do
+        Savon.soap_version = 2
+        Savon.soap_version.should == 2
+      end
+
+      it "should raise an ArgumentError in case of an invalid version" do
+        lambda { Savon.soap_version = 3 }.should raise_error(ArgumentError)
+      end
+    end
+
+    describe "strip_namespaces" do
+      it "should default to true" do
+        Savon.strip_namespaces?.should == true
+      end
+
+      it "should not strip namespaces when set to false" do
+        Savon.strip_namespaces = false
+        Savon.strip_namespaces?.should == false
+      end
+    end
+  end
+
+end

data/spec/savon/soap/fault_spec.rb

@@ -0,0 +1,89 @@
+require "spec_helper"
+
+describe Savon::SOAP::Fault do
+  let(:soap_fault) { Savon::SOAP::Fault.new new_response(:body => Fixture.response(:soap_fault)) }
+  let(:soap_fault2) { Savon::SOAP::Fault.new new_response(:body => Fixture.response(:soap_fault12)) }
+  let(:another_soap_fault) { Savon::SOAP::Fault.new new_response(:body => Fixture.response(:another_soap_fault)) }
+  let(:no_fault) { Savon::SOAP::Fault.new new_response }
+
+  it "should be a Savon::Error" do
+    Savon::SOAP::Fault.should < Savon::Error
+  end
+
+  describe "#http" do
+    it "should return the HTTPI::Response" do
+      soap_fault.http.should be_an(HTTPI::Response)
+    end
+  end
+
+  describe "#present?" do
+    it "should return true if the HTTP response contains a SOAP 1.1 fault" do
+      soap_fault.should be_present
+    end
+
+    it "should return true if the HTTP response contains a SOAP 1.2 fault" do
+      soap_fault2.should be_present
+    end
+
+    it "should return true if the HTTP response contains a SOAP fault with different namespaces" do
+      another_soap_fault.should be_present
+    end
+
+    it "should return false unless the HTTP response contains a SOAP fault" do
+      no_fault.should_not be_present
+    end
+  end
+
+  [:message, :to_s].each do |method|
+    describe "##{method}" do
+      it "should return an empty String unless a SOAP fault is present" do
+        no_fault.send(method).should == ""
+      end
+
+      it "should return a SOAP 1.1 fault message" do
+        soap_fault.send(method).should == "(soap:Server) Fault occurred while processing."
+      end
+
+      it "should return a SOAP 1.2 fault message" do
+        soap_fault2.send(method).should == "(soap:Sender) Sender Timeout"
+      end
+
+      it "should return a SOAP fault message (with different namespaces)" do
+        another_soap_fault.send(method).should == "(ERR_NO_SESSION) Wrong session message"
+      end
+    end
+  end
+
+  describe "#to_hash" do
+    it "should return the SOAP response as a Hash unless a SOAP fault is present" do
+      no_fault.to_hash[:authenticate_response][:return][:success].should be_true
+    end
+
+    it "should return a SOAP 1.1 fault as a Hash" do
+      soap_fault.to_hash.should == {
+        :fault => {
+          :faultstring => "Fault occurred while processing.",
+          :faultcode   => "soap:Server"
+        }
+      }
+    end
+
+    it "should return a SOAP 1.2 fault as a Hash" do
+      soap_fault2.to_hash.should == {
+        :fault => {
+          :detail => { :max_time => "P5M" },
+          :reason => { :text => "Sender Timeout" },
+          :code   => { :value => "soap:Sender", :subcode => { :value => "m:MessageTimeout" } }
+        }
+      }
+    end
+  end
+
+  def new_response(options = {})
+    defaults = { :code => 500, :headers => {}, :body => Fixture.response(:authentication) }
+    response = defaults.merge options
+    
+    HTTPI::Response.new response[:code], response[:headers], response[:body]
+  end
+
+end

data/spec/savon/soap/request_spec.rb

@@ -0,0 +1,45 @@
+require "spec_helper"
+
+describe Savon::SOAP::Request do
+  let(:request) { Savon::SOAP::Request.new HTTPI::Request.new, soap }
+  let(:soap) { Savon::SOAP::XML.new Endpoint.soap, :get_user, :id => 1 }
+
+  it "contains the content type for each supported SOAP version" do
+    content_type = Savon::SOAP::Request::ContentType
+    content_type[1].should == "text/xml;charset=UTF-8"
+    content_type[2].should == "application/soap+xml;charset=UTF-8"
+  end
+
+  describe ".new" do
+    it "should use the SOAP endpoint for the request" do
+      request.request.url.should == URI(soap.endpoint)
+    end
+
+    it "should set the SOAP body for the request" do
+      request.request.body.should == soap.to_xml
+    end
+
+    it "should set the 'Content-Type' header for SOAP 1.1" do
+      request.request.headers["Content-Type"].should == Savon::SOAP::Request::ContentType[1]
+    end
+
+    it "should set the 'Content-Type' header for SOAP 1.2" do
+      soap.version = 2
+      request.request.headers["Content-Type"].should == Savon::SOAP::Request::ContentType[2]
+    end
+
+    it "should not set the 'Content-Type' header if it's already specified" do
+      headers = { "Content-Type" => "text/plain" }
+      request = Savon::SOAP::Request.new HTTPI::Request.new(:headers => headers), soap
+      request.request.headers["Content-Type"].should == headers["Content-Type"]
+    end
+  end
+
+  describe "#response" do
+    it "should execute an HTTP POST request and return a Savon::SOAP::Response" do
+      HTTPI.expects(:post).returns(HTTPI::Response.new 200, {}, Fixture.response(:authentication))
+      request.response.should be_a(Savon::SOAP::Response)
+    end
+  end
+
+end