regenersis-savon 1.0.0

data/Gemfile

@@ -0,0 +1,4 @@
+source :rubygems
+gemspec
+
+gem "httpclient", "~> 2.1.5"

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2010 Daniel Harrington
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.md

@@ -0,0 +1,42 @@
+Savon [![Build Status](https://secure.travis-ci.org/rubiii/savon.png)](http://travis-ci.org/rubiii/savon)
+=====
+
+Heavy metal Ruby SOAP client
+
+[Documentation](http://savonrb.com) | [RDoc](http://rubydoc.info/gems/savon) |
+[Mailing list](https://groups.google.com/forum/#!forum/savonrb) | [Twitter](http://twitter.com/savonrb)
+
+Installation
+------------
+
+Savon is available through [Rubygems](http://rubygems.org/gems/savon) and can be installed via:
+
+```
+$ gem install savon
+```
+
+Introduction
+------------
+
+``` ruby
+require "savon"
+
+# create a client for your SOAP service
+client = Savon::Client.new("http://service.example.com?wsdl")
+
+client.wsdl.soap_actions
+# => [:create_user, :get_user, :get_all_users]
+
+# execute a SOAP request to call the "getUser" action
+response = client.request(:get_user) do
+  soap.body = { :id => 1 }
+end
+
+response.body
+# => { :get_user_response => { :first_name => "The", :last_name => "Hoff" } }
+```
+
+Documentation
+-------------
+
+Continue reading at [savonrb.com](http://savonrb.com)

data/Rakefile

@@ -0,0 +1,7 @@
+require "bundler/gem_tasks"
+require "rspec/core/rake_task"
+
+RSpec::Core::RakeTask.new
+
+task :default => :spec
+task :test => :spec

data/lib/regenersis-savon.rb

@@ -0,0 +1 @@
+require "savon"

data/lib/savon.rb

@@ -0,0 +1,15 @@
+require "savon/version"
+require "savon/global"
+require "savon/client"
+require "savon/model"
+
+module Savon
+  extend Global
+
+  # Yields this module to a given +block+. Please refer to the
+  # <tt>Savon::Global</tt> module for configuration options.
+  def self.configure
+    yield self if block_given?
+  end
+
+end

data/lib/savon/client.rb

@@ -0,0 +1,168 @@
+require "httpi/request"
+require "akami"
+
+require "savon/wasabi/document"
+require "savon/soap/xml"
+require "savon/soap/request"
+require "savon/soap/response"
+
+module Savon
+
+  # = Savon::Client
+  #
+  # Savon::Client is the main object for connecting to a SOAP service.
+  class Client
+
+    # Initializes the Savon::Client for a SOAP service. Accepts a +block+ which is evaluated in the
+    # context of this object to let you access the +wsdl+, +http+, and +wsse+ methods.
+    #
+    # == Examples
+    #
+    #   # Using a remote WSDL
+    #   client = Savon::Client.new("http://example.com/UserService?wsdl")
+    #
+    #   # Using a local WSDL
+    #   client = Savon::Client.new File.expand_path("../wsdl/service.xml", __FILE__)
+    #
+    #   # Directly accessing a SOAP endpoint
+    #   client = Savon::Client.new do
+    #     wsdl.endpoint = "http://example.com/UserService"
+    #     wsdl.namespace = "http://users.example.com"
+    #   end
+    def initialize(wsdl_document = nil, &block)
+      wsdl.document = wsdl_document if wsdl_document
+      process 1, &block if block
+      wsdl.request = http
+    end
+
+    # Returns the <tt>Savon::Wasabi::Document</tt>.
+    def wsdl
+      @wsdl ||= Wasabi::Document.new
+    end
+
+    # Returns the <tt>HTTPI::Request</tt>.
+    def http
+      @http ||= HTTPI::Request.new
+    end
+
+    # Returns the <tt>Akami::WSSE</tt> object.
+    def wsse
+      @wsse ||= Akami.wsse
+    end
+
+    # Returns the <tt>Savon::SOAP::XML</tt> object. Please notice, that this object is only available
+    # in a block given to <tt>Savon::Client#request</tt>. A new instance of this object is created
+    # per SOAP request.
+    attr_reader :soap
+
+    # Executes a SOAP request for a given SOAP action. Accepts a +block+ which is evaluated in the
+    # context of this object to let you access the +soap+, +wsdl+, +http+ and +wsse+ methods.
+    #
+    # == Examples
+    #
+    #   # Calls a "getUser" SOAP action with the payload of "<userId>123</userId>"
+    #   client.request(:get_user) { soap.body = { :user_id => 123 } }
+    #
+    #   # Prefixes the SOAP input tag with a given namespace: "<wsdl:GetUser>...</wsdl:GetUser>"
+    #   client.request(:wsdl, "GetUser") { soap.body = { :user_id => 123 } }
+    #
+    #   # SOAP input tag with attributes: <getUser xmlns:wsdl="http://example.com">...</getUser>"
+    #   client.request(:get_user, "xmlns:wsdl" => "http://example.com")
+    def request(*args, &block)
+      raise ArgumentError, "Savon::Client#request requires at least one argument" if args.empty?
+
+      self.soap = SOAP::XML.new
+      preconfigure extract_options(args)
+      process &block if block
+      soap.wsse = wsse
+
+      response = SOAP::Request.new(http, soap).response
+      set_cookie response.http.headers
+      response
+    end
+
+  private
+
+    # Writer for the <tt>Savon::SOAP::XML</tt> object.
+    attr_writer :soap
+
+    # Accessor for the original self of a given block.
+    attr_accessor :original_self
+
+    # Passes a cookie from the last request +headers+ to the next one.
+    def set_cookie(headers)
+      http.headers["Cookie"] = headers["Set-Cookie"] if headers["Set-Cookie"]
+    end
+
+    # Expects an Array of +args+ and returns an Array containing the namespace (might be +nil+),
+    # the SOAP input and a Hash of attributes for the input tag (which might be empty).
+    def extract_options(args)
+      attributes = Hash === args.last ? args.pop : {}
+      namespace = args.size > 1 ? args.shift.to_sym : nil
+      input = args.first
+
+      [namespace, input, attributes]
+    end
+
+    # Expects an Array of +args+ to preconfigure the system.
+    def preconfigure(args)
+      soap.endpoint = wsdl.endpoint
+      soap.namespace_identifier = args[0]
+      soap.namespace = wsdl.namespace
+      soap.element_form_default = wsdl.element_form_default if wsdl.document?
+
+      body = args[2].delete(:body)
+      soap.body = body if body
+
+      wsdl.type_namespaces.each do |path, uri|
+        soap.use_namespace(path, uri)
+      end
+
+      wsdl.type_definitions.each do |path, type|
+        soap.types[path] = type
+      end
+
+      set_soap_action args[1]
+      set_soap_input *args
+    end
+
+    # Expects an +input+ and sets the +SOAPAction+ HTTP headers.
+    def set_soap_action(input_tag)
+      soap_action = wsdl.soap_action(input_tag.to_sym) if wsdl.document?
+      soap_action ||= Gyoku::XMLKey.create(input_tag).to_sym
+      http.headers["SOAPAction"] = %{"#{soap_action}"}
+    end
+
+    # Expects a +namespace+, +input+ and +attributes+ and sets the SOAP input.
+    def set_soap_input(namespace, input, attributes)
+      new_input_tag = wsdl.soap_input(input.to_sym) if wsdl.document?
+      new_input_tag ||= Gyoku::XMLKey.create(input)
+      soap.input = [namespace, new_input_tag.to_sym, attributes]
+    end
+
+    # Processes a given +block+. Yields objects if the block expects any arguments.
+    # Otherwise evaluates the block in the context of this object.
+    def process(offset = 0, &block)
+      block.arity > 0 ? yield_objects(offset, &block) : evaluate(&block)
+    end
+
+    # Yields a number of objects to a given +block+ depending on how many arguments
+    # the block is expecting.
+    def yield_objects(offset, &block)
+      yield *[soap, wsdl, http, wsse][offset, block.arity]
+    end
+
+    # Evaluates a given +block+ inside this object. Stores the original block binding.
+    def evaluate(&block)
+      self.original_self = eval "self", block.binding
+      instance_eval &block
+    end
+
+    # Handles calls to undefined methods by delegating to the original block binding.
+    def method_missing(method, *args, &block)
+      super unless original_self
+      original_self.send method, *args, &block
+    end
+
+  end
+end

data/lib/savon/core_ext/object.rb

@@ -0,0 +1,14 @@
+module Savon
+  module CoreExt
+    module Object
+
+      # Returns +true+ if the Object is nil, false or empty. Implementation from ActiveSupport.
+      def blank?
+        respond_to?(:empty?) ? empty? : !self
+      end unless method_defined?(:blank?)
+
+    end
+  end
+end
+
+Object.send :include, Savon::CoreExt::Object

data/lib/savon/core_ext/string.rb

@@ -0,0 +1,23 @@
+require "savon/soap"
+
+module Savon
+  module CoreExt
+    module String
+
+      # Returns the String in snake_case.
+      def snakecase
+        str = dup
+        str.gsub! /::/, '/'
+        str.gsub! /([A-Z]+)([A-Z][a-z])/, '\1_\2'
+        str.gsub! /([a-z\d])([A-Z])/, '\1_\2'
+        str.tr! ".", "_"
+        str.tr! "-", "_"
+        str.downcase!
+        str
+      end unless method_defined?(:snakecase)
+
+    end
+  end
+end
+
+String.send :include, Savon::CoreExt::String

data/lib/savon/error.rb

@@ -0,0 +1,6 @@
+module Savon
+
+  # Base class for Savon errors.
+  class Error < RuntimeError; end
+
+end

data/lib/savon/global.rb

@@ -0,0 +1,115 @@
+require "logger"
+require "savon/soap"
+require "savon/hooks/group"
+
+module Savon
+  module Global
+
+    # Sets whether to log HTTP requests.
+    attr_writer :log
+
+    # Returns whether to log HTTP requests. Defaults to +true+.
+    def log?
+      @log != false
+    end
+
+    # Sets the logger to use.
+    attr_writer :logger
+
+    # Returns the logger. Defaults to an instance of +Logger+ writing to STDOUT.
+    def logger
+      @logger ||= ::Logger.new STDOUT
+    end
+
+    # Sets the log level.
+    attr_writer :log_level
+
+    # Returns the log level. Defaults to :debug.
+    def log_level
+      @log_level ||= :debug
+    end
+
+    # Logs a given +message+.
+    def log(message)
+      logger.send log_level, message if log?
+    end
+
+    # Sets whether to raise HTTP errors and SOAP faults.
+    attr_writer :raise_errors
+
+    # Returns whether to raise errors. Defaults to +true+.
+    def raise_errors?
+      @raise_errors != false
+    end
+
+    # Sets the global SOAP version.
+    def soap_version=(version)
+      raise ArgumentError, "Invalid SOAP version: #{version}" unless SOAP::Versions.include? version
+      @version = version
+    end
+
+    # Returns SOAP version. Defaults to +DefaultVersion+.
+    def soap_version
+      @version ||= SOAP::DefaultVersion
+    end
+
+    # Returns whether to strip namespaces in a SOAP response Hash.
+    # Defaults to +true+.
+    def strip_namespaces?
+      Savon.deprecate("use Nori.strip_namespaces? instead of Savon.strip_namespaces?")
+      Nori.strip_namespaces?
+    end
+
+    # Sets whether to strip namespaces in a SOAP response Hash.
+    def strip_namespaces=(strip)
+      Savon.deprecate("use Nori.strip_namespaces= instead of Savon.strip_namespaces=")
+      Nori.strip_namespaces = strip
+    end
+
+    # Returns the global env_namespace.
+    attr_reader :env_namespace
+
+    # Sets the global env_namespace.
+    attr_writer :env_namespace
+
+    # Returns the global soap_header.
+    attr_reader :soap_header
+
+    # Sets the global soap_header.
+    attr_writer :soap_header
+
+    # Expects a +message+ and raises a warning if configured.
+    def deprecate(message)
+      warn("Deprecation: #{message}") if deprecate?
+    end
+
+    # Sets whether to warn about deprecations.
+    def deprecate=(deprecate)
+      @deprecate = deprecate
+    end
+
+    # Returns whether to warn about deprecation.
+    def deprecate?
+      @deprecate != false
+    end
+
+    # Returns the hooks.
+    def hooks
+      @hooks ||= Hooks::Group.new
+    end
+
+    # Reset to default configuration.
+    def reset_config!
+      self.log = true
+      self.logger = ::Logger.new STDOUT
+      self.log_level = :debug
+      self.raise_errors = true
+      self.soap_version = SOAP::DefaultVersion
+      self.strip_namespaces = true
+      self.env_namespace = nil
+      self.soap_header = {}
+    end
+
+  end
+end
+

data/lib/savon/hooks/group.rb

@@ -0,0 +1,46 @@
+require "savon/hooks/hook"
+
+module Savon
+  module Hooks
+
+    # = Savon::Hooks::Group
+    #
+    # Manages a list of hooks.
+    class Group
+
+      # Accepts an Array of +hooks+ to start with.
+      def initialize(hooks = nil)
+        self.hooks = hooks
+      end
+
+      attr_writer :hooks
+
+      def hooks
+        @hooks ||= []
+      end
+
+      # Adds a new hook.
+      def define(id, hook, &block)
+        hooks << Hook.new(id, hook, &block)
+      end
+
+      # Removes hooks matching the given +ids+.
+      def reject!(*ids)
+        ids = ids.flatten
+        hooks.reject! { |hook| ids.include? hook.id }
+      end
+
+      # Returns a new group for a given +hook+.
+      def select(hook)
+        Group.new hooks.select { |h| h.hook == hook }
+      end
+
+      # Calls the hooks with the given +args+ and returns the
+      # value of the last hooks.
+      def call(*args)
+        hooks.inject(nil) { |memo, hook| hook.call(*args) }
+      end
+
+    end
+  end
+end