wash-out 0.10.1

data/Rakefile

@@ -0,0 +1,13 @@
+require 'bundler/setup'
+require 'bundler/gem_tasks'
+require 'appraisal'
+require 'rspec/core/rake_task'
+
+RSpec::Core::RakeTask.new(:spec)
+
+task :console do
+  require "action_controller/railtie"
+  require "rails/test_unit/railtie"
+  Bundler.require
+  binding.pry
+end

data/app/helpers/wash_out_helper.rb

@@ -0,0 +1,106 @@
+module WashOutHelper
+
+  def wsdl_data_options(param)
+    case controller.soap_config.wsdl_style
+    when 'rpc'
+      { :"xsi:type" => param.namespaced_type }
+    when 'document'
+      { }
+    end
+  end
+
+  def wsdl_data_attrs(param)
+    param.map.reduce({}) do |memo, p|
+      if p.respond_to?(:attribute?) && p.attribute?
+        memo.merge p.attr_name => p.value
+      else
+        memo
+      end
+    end
+  end
+
+  def wsdl_data(xml, params)
+    params.each do |param|
+      next if param.attribute?
+
+      tag_name = param.name
+      param_options = wsdl_data_options(param)
+      param_options.merge! wsdl_data_attrs(param)
+
+      if param.struct?
+        if param.multiplied
+          param.map.each do |p|
+            attrs = wsdl_data_attrs p
+            if p.is_a?(Array) || p.map.size > attrs.size
+              blk = proc { wsdl_data(xml, p.map) }
+            end
+            attrs.reject! { |_, v| v.nil? }
+            xml.tag! tag_name, param_options.merge(attrs), &blk
+          end
+        else
+          xml.tag! tag_name, param_options do
+            wsdl_data(xml, param.map)
+          end
+        end
+      else
+        if param.multiplied
+          param.value = [] unless param.value.is_a?(Array)
+          param.value.each do |v|
+            xml.tag! tag_name, v, param_options
+          end
+        else
+          xml.tag! tag_name, param.value, param_options
+        end
+      end
+    end
+  end
+
+  def wsdl_type(xml, param, defined=[])
+    more = []
+
+    if param.struct?
+      if !defined.include?(param.basic_type)
+        xml.tag! "xsd:complexType", :name => param.basic_type do
+          attrs, elems = [], []
+          param.map.each do |value|
+            more << value if value.struct?
+            if value.attribute?
+              attrs << value
+            else
+              elems << value
+            end
+          end
+
+          if elems.any?
+            xml.tag! "xsd:sequence" do
+              elems.each do |value|
+                xml.tag! "xsd:element", wsdl_occurence(value, false, :name => value.name, :type => value.namespaced_type)
+              end
+            end
+          end
+
+          attrs.each do |value|
+            xml.tag! "xsd:attribute", wsdl_occurence(value, false, :name => value.attr_name, :type => value.namespaced_type)
+          end
+        end
+
+        defined << param.basic_type
+      elsif !param.classified?
+        raise RuntimeError, "Duplicate use of `#{param.basic_type}` type name. Consider using classified types."
+      end
+    end
+
+    more.each do |p|
+      wsdl_type xml, p, defined
+    end
+  end
+
+  def wsdl_occurence(param, inject, extend_with = {})
+    data = !param.multiplied ? {} : {
+      "#{'xsi:' if inject}minOccurs" => 0,
+      "#{'xsi:' if inject}maxOccurs" => 'unbounded'
+    }
+
+    extend_with.merge(data)
+  end
+end

data/app/views/wash_out/document/error.builder

@@ -0,0 +1,9 @@
+xml.instruct!
+xml.tag! "soap:Envelope", "xmlns:soap" => 'http://schemas.xmlsoap.org/soap/envelope/' do
+  xml.tag! "soap:Body" do
+    xml.tag! "soap:Fault" do
+      xml.faultcode error_code
+      xml.faultstring error_message
+    end
+  end
+end

data/app/views/wash_out/document/response.builder

@@ -0,0 +1,10 @@
+xml.instruct!
+xml.tag! "soap:Envelope", "xmlns:soap" => 'http://schemas.xmlsoap.org/soap/envelope/',
+                          "xmlns:xsd" => 'http://www.w3.org/2001/XMLSchema',
+                          "xmlns:tns" => @namespace do
+  xml.tag! "soap:Body" do
+    xml.tag! "tns:#{@action_spec[:response_tag]}" do
+      wsdl_data xml, result
+    end
+  end
+end

data/app/views/wash_out/document/wsdl.builder

@@ -0,0 +1,68 @@
+xml.instruct!
+xml.definitions 'xmlns' => 'http://schemas.xmlsoap.org/wsdl/',
+                'xmlns:tns' => @namespace,
+                'xmlns:soap' => 'http://schemas.xmlsoap.org/wsdl/soap/',
+                'xmlns:xsd' => 'http://www.w3.org/2001/XMLSchema',
+                'xmlns:soap-enc' => 'http://schemas.xmlsoap.org/soap/encoding/',
+                'xmlns:wsdl' => 'http://schemas.xmlsoap.org/wsdl/',
+                'name' => @name,
+                'targetNamespace' => @namespace do
+
+  xml.types do
+    xml.tag! "schema", :targetNamespace => @namespace, :xmlns => 'http://www.w3.org/2001/XMLSchema' do
+      defined = []
+      @map.each do |operation, formats|
+        (formats[:in] + formats[:out]).each do |p|
+          wsdl_type xml, p, defined
+        end
+      end
+    end
+  end
+
+  @map.each do |operation, formats|
+    xml.message :name => "#{operation}" do
+      formats[:in].each do |p|
+        xml.part wsdl_occurence(p, false, :name => p.name, :type => p.namespaced_type)
+      end
+    end
+    xml.message :name => formats[:response_tag] do
+      formats[:out].each do |p|
+        xml.part wsdl_occurence(p, false, :name => p.name, :type => p.namespaced_type)
+      end
+    end
+  end
+
+  xml.portType :name => "#{@name}_port" do
+    @map.each do |operation, formats|
+      xml.operation :name => operation do
+        xml.input :message => "tns:#{operation}"
+        xml.output :message => "tns:#{formats[:response_tag]}"
+      end
+    end
+  end
+
+  xml.binding :name => "#{@name}_binding", :type => "tns:#{@name}_port" do
+    xml.tag! "soap:binding", :style => 'document', :transport => 'http://schemas.xmlsoap.org/soap/http'
+    @map.keys.each do |operation|
+      xml.operation :name => operation do
+        xml.tag! "soap:operation", :soapAction => operation
+        xml.input do
+          xml.tag! "soap:body",
+            :use => "literal",
+            :namespace => @namespace
+        end
+        xml.output do
+          xml.tag! "soap:body",
+            :use => "literal",
+            :namespace => @namespace
+        end
+      end
+    end
+  end
+
+  xml.service :name => "service" do
+    xml.port :name => "#{@name}_port", :binding => "tns:#{@name}_binding" do
+      xml.tag! "soap:address", :location => send("#{@name}_action_url")
+    end
+  end
+end

data/app/views/wash_out/rpc/error.builder

@@ -0,0 +1,10 @@
+xml.instruct!
+xml.tag! "soap:Envelope", "xmlns:soap" => 'http://schemas.xmlsoap.org/soap/envelope/',
+                          "xmlns:xsi" => 'http://www.w3.org/2001/XMLSchema-instance' do
+  xml.tag! "soap:Body" do
+    xml.tag! "soap:Fault", :encodingStyle => 'http://schemas.xmlsoap.org/soap/encoding/' do
+      xml.faultcode error_code, 'xsi:type' => 'xsd:QName'
+      xml.faultstring error_message, 'xsi:type' => 'xsd:string'
+    end
+  end
+end

data/app/views/wash_out/rpc/response.builder

@@ -0,0 +1,11 @@
+xml.instruct!
+xml.tag! "soap:Envelope", "xmlns:soap" => 'http://schemas.xmlsoap.org/soap/envelope/',
+                          "xmlns:xsd" => 'http://www.w3.org/2001/XMLSchema',
+                          "xmlns:xsi" => 'http://www.w3.org/2001/XMLSchema-instance',
+                          "xmlns:tns" => @namespace do
+  xml.tag! "soap:Body" do
+    xml.tag! "tns:#{@action_spec[:response_tag]}" do
+      wsdl_data xml, result
+    end
+  end
+end

data/app/views/wash_out/rpc/wsdl.builder

@@ -0,0 +1,68 @@
+xml.instruct!
+xml.definitions 'xmlns' => 'http://schemas.xmlsoap.org/wsdl/',
+                'xmlns:tns' => @namespace,
+                'xmlns:soap' => 'http://schemas.xmlsoap.org/wsdl/soap/',
+                'xmlns:xsd' => 'http://www.w3.org/2001/XMLSchema',
+                'xmlns:xsi' => 'http://www.w3.org/2001/XMLSchema-instance',
+                'xmlns:soap-enc' => 'http://schemas.xmlsoap.org/soap/encoding/',
+                'xmlns:wsdl' => 'http://schemas.xmlsoap.org/wsdl/',
+                'name' => @name,
+                'targetNamespace' => @namespace do
+  xml.types do
+    xml.tag! "schema", :targetNamespace => @namespace, :xmlns => 'http://www.w3.org/2001/XMLSchema' do
+      defined = []
+      @map.each do |operation, formats|
+        (formats[:in] + formats[:out]).each do |p|
+          wsdl_type xml, p, defined
+        end
+      end
+    end
+  end
+
+  @map.each do |operation, formats|
+    xml.message :name => "#{operation}" do
+      formats[:in].each do |p|
+        xml.part wsdl_occurence(p, true, :name => p.name, :type => p.namespaced_type)
+      end
+    end
+    xml.message :name => formats[:response_tag] do
+      formats[:out].each do |p|
+        xml.part wsdl_occurence(p, true, :name => p.name, :type => p.namespaced_type)
+      end
+    end
+  end
+
+  xml.portType :name => "#{@name}_port" do
+    @map.each do |operation, formats|
+      xml.operation :name => operation do
+        xml.input :message => "tns:#{operation}"
+        xml.output :message => "tns:#{formats[:response_tag]}"
+      end
+    end
+  end
+
+  xml.binding :name => "#{@name}_binding", :type => "tns:#{@name}_port" do
+    xml.tag! "soap:binding", :style => 'rpc', :transport => 'http://schemas.xmlsoap.org/soap/http'
+    @map.keys.each do |operation|
+      xml.operation :name => operation do
+        xml.tag! "soap:operation", :soapAction => operation
+        xml.input do
+          xml.tag! "soap:body",
+            :use => "encoded", :encodingStyle => 'http://schemas.xmlsoap.org/soap/encoding/',
+            :namespace => @namespace
+        end
+        xml.output do
+          xml.tag! "soap:body",
+            :use => "encoded", :encodingStyle => 'http://schemas.xmlsoap.org/soap/encoding/',
+            :namespace => @namespace
+        end
+      end
+    end
+  end
+
+  xml.service :name => "service" do
+    xml.port :name => "#{@name}_port", :binding => "tns:#{@name}_binding" do
+      xml.tag! "soap:address", :location => send("#{@name}_action_url")
+    end
+  end
+end

data/gemfiles/rails_3.1.3.gemfile

@@ -0,0 +1,20 @@
+# This file was generated by Appraisal
+
+source "http://rubygems.org"
+
+gem "wasabi"
+gem "savon", ">= 2.0.0"
+gem "httpi"
+gem "rspec-rails"
+gem "guard"
+gem "guard-rspec"
+gem "rb-fsevent"
+gem "appraisal"
+gem "tzinfo"
+gem "pry"
+gem "simplecov"
+gem "simplecov-summary"
+gem "rails", "3.1.3"
+gem "test-unit"
+
+gemspec :path => "../"

data/gemfiles/rails_3.2.12.gemfile

@@ -0,0 +1,20 @@
+# This file was generated by Appraisal
+
+source "http://rubygems.org"
+
+gem "wasabi"
+gem "savon", ">= 2.0.0"
+gem "httpi"
+gem "rspec-rails"
+gem "guard"
+gem "guard-rspec"
+gem "rb-fsevent"
+gem "appraisal"
+gem "tzinfo"
+gem "pry"
+gem "simplecov"
+gem "simplecov-summary"
+gem "rails", "3.2.12"
+gem "test-unit"
+
+gemspec :path => "../"

data/gemfiles/rails_4.0.0.gemfile

@@ -0,0 +1,19 @@
+# This file was generated by Appraisal
+
+source "http://rubygems.org"
+
+gem "wasabi"
+gem "savon", ">= 2.0.0"
+gem "httpi"
+gem "rspec-rails"
+gem "guard"
+gem "guard-rspec"
+gem "rb-fsevent"
+gem "appraisal"
+gem "tzinfo"
+gem "pry"
+gem "simplecov"
+gem "simplecov-summary"
+gem "rails", "4.0.0"
+
+gemspec :path => "../"

data/gemfiles/rails_4.1.0.gemfile

@@ -0,0 +1,19 @@
+# This file was generated by Appraisal
+
+source "http://rubygems.org"
+
+gem "wasabi"
+gem "savon", ">= 2.0.0"
+gem "httpi"
+gem "rspec-rails"
+gem "guard"
+gem "guard-rspec"
+gem "rb-fsevent"
+gem "appraisal"
+gem "tzinfo"
+gem "pry"
+gem "simplecov"
+gem "simplecov-summary"
+gem "rails", "4.1.0"
+
+gemspec :path => "../"

data/gemfiles/rails_4.2.0.gemfile

@@ -0,0 +1,19 @@
+# This file was generated by Appraisal
+
+source "http://rubygems.org"
+
+gem "wasabi"
+gem "savon", ">= 2.0.0"
+gem "httpi"
+gem "rspec-rails"
+gem "guard"
+gem "guard-rspec"
+gem "rb-fsevent"
+gem "appraisal"
+gem "tzinfo"
+gem "pry"
+gem "simplecov"
+gem "simplecov-summary"
+gem "rails", "4.2.0"
+
+gemspec :path => "../"

data/gemfiles/rails_5.0.0.beta2.gemfile

@@ -0,0 +1,19 @@
+# This file was generated by Appraisal
+
+source "http://rubygems.org"
+
+gem "wasabi"
+gem "savon", ">= 2.0.0"
+gem "httpi"
+gem "rspec-rails"
+gem "guard"
+gem "guard-rspec"
+gem "rb-fsevent"
+gem "appraisal"
+gem "tzinfo"
+gem "pry"
+gem "simplecov"
+gem "simplecov-summary"
+gem "rails", "5.0.0.beta2"
+
+gemspec :path => "../"

data/init.rb

@@ -0,0 +1 @@
+require 'wash_out'

data/lib/wash_out.rb

@@ -0,0 +1,53 @@
+require 'wash_out/configurable'
+require 'wash_out/soap_config'
+require 'wash_out/soap'
+require 'wash_out/engine'
+require 'wash_out/param'
+require 'wash_out/dispatcher'
+require 'wash_out/soap'
+require 'wash_out/router'
+require 'wash_out/type'
+require 'wash_out/model'
+require 'wash_out/wsse'
+require 'wash_out/middleware'
+
+module WashOut
+  def self.root
+    File.expand_path '../..', __FILE__
+  end
+end
+
+module ActionDispatch::Routing
+  class Mapper
+    # Adds the routes for a SOAP endpoint at +controller+.
+    def wash_out(controller_name, options={})
+      options.each_with_index { |key, value|  @scope[key] = value } if @scope
+      controller_class_name = [options[:module], controller_name].compact.join("/")
+
+      match "#{controller_name}/wsdl"   => "#{controller_name}#_generate_wsdl", :via => :get, :format => false
+      match "#{controller_name}/action" => WashOut::Router.new(controller_class_name), :via => [:get, :post], :defaults => { :controller => controller_class_name, :action => '_action' }, :format => false
+    end
+  end
+end
+
+Mime::Type.register "application/soap+xml", :soap
+ActiveRecord::Base.send :extend, WashOut::Model if defined?(ActiveRecord)
+
+ActionController::Renderers.add :soap do |what, options|
+  _render_soap(what, options)
+end
+
+ActionController::Base.class_eval do
+
+  # Define a SOAP service. The function has no required +options+:
+  # but allow any of :parser, :namespace, :wsdl_style, :snakecase_input,
+  # :camelize_wsdl, :wsse_username, :wsse_password and :catch_xml_errors.
+  #
+  # Any of the the params provided allows for overriding the defaults
+  # (like supporting multiple namespaces instead of application wide such)
+  #
+  def self.soap_service(options={})
+    include WashOut::SOAP
+    self.soap_config = options
+  end
+end