soybean 1.0.0

data/vendor/soap4r/wsdl/soap/standalone_server_stub_creator.rb

@@ -0,0 +1,101 @@
+# encoding: ASCII-8BIT
+# WSDL4R - Creating standalone server stub code from WSDL.
+# Copyright (C) 2000-2007  NAKAMURA, Hiroshi <nahi@ruby-lang.org>.
+
+# This program is copyrighted free software by NAKAMURA, Hiroshi.  You can
+# redistribute it and/or modify it under the same terms of Ruby's license;
+# either the dual license version in 2003, or any later version.
+
+
+require 'wsdl/info'
+require 'wsdl/soap/mapping_registry_creator'
+require 'wsdl/soap/method_def_creator'
+require 'wsdl/soap/class_def_creator_support'
+
+
+module WSDL
+module SOAP
+
+
+class StandaloneServerStubCreator
+  include ClassDefCreatorSupport
+
+  attr_reader :definitions
+
+  def initialize(definitions, name_creator, modulepath = nil)
+    @definitions = definitions
+    @name_creator = name_creator
+    @modulepath = modulepath
+  end
+
+  def dump(service_name)
+    warn("- Standalone stub can have only 1 port for now.  So creating stub for the first port and rests are ignored.")
+    warn("- Standalone server stub ignores port location defined in WSDL.  Location is http://localhost:10080/ by default.  Generated client from WSDL must be configured to point this endpoint manually.")
+    services = @definitions.service(service_name)
+    unless services
+      raise RuntimeError.new("service not defined: #{service_name}")
+    end
+    ports = services.ports
+    if ports.empty?
+      raise RuntimeError.new("ports not found for #{service_name}")
+    end
+    port = ports[0]
+    if port.porttype.nil?
+      raise RuntimeError.new("porttype not found for #{port}")
+    end
+    dump_porttype(port.porttype)
+  end
+
+private
+
+  def dump_porttype(porttype)
+    class_name = mapped_class_name(porttype.name, @modulepath)
+    defined_const = {}
+    methoddef = MethodDefCreator.new(@definitions, @name_creator, @modulepath, defined_const).dump(porttype.name)
+    wsdl_name = @definitions.name ? @definitions.name.name : 'default'
+    mrname = safeconstname(wsdl_name + 'MappingRegistry')
+    c1 = XSD::CodeGen::ClassDef.new(class_name)
+    c1.def_require("soap/rpc/standaloneServer")
+    c1.def_code <<-EOD
+Methods = [
+#{methoddef.gsub(/^/, "  ")}
+]
+    EOD
+    defined_const.each do |ns, tag|
+      c1.def_const(tag, dq(ns))
+    end
+    c2 = XSD::CodeGen::ClassDef.new(class_name + "App",
+      "::SOAP::RPC::StandaloneServer")
+    c2.def_method("initialize", "*arg") do
+      <<-EOD
+        super(*arg)
+        servant = #{class_name}.new
+        #{class_name}::Methods.each do |definitions|
+          opt = definitions.last
+          if opt[:request_style] == :document
+            @router.add_document_operation(servant, *definitions)
+          else
+            @router.add_rpc_operation(servant, *definitions)
+          end
+        end
+        self.mapping_registry = #{mrname}::EncodedRegistry
+        self.literal_mapping_registry = #{mrname}::LiteralRegistry
+      EOD
+    end
+    c1.dump + "\n" + c2.dump + format(<<-EOD)
+
+      if $0 == __FILE__
+        # Change listen port.
+        server = #{class_name}App.new('app', nil, '0.0.0.0', 10080)
+        trap(:INT) do
+          server.shutdown
+        end
+        server.start
+      end
+    EOD
+  end
+end
+
+
+end
+end

data/vendor/soap4r/wsdl/soap/wsdl2ruby.rb

@@ -0,0 +1,226 @@
+# encoding: ASCII-8BIT
+# WSDL4R - WSDL to ruby mapping library.
+# Copyright (C) 2000-2007  NAKAMURA, Hiroshi <nahi@ruby-lang.org>.
+
+# This program is copyrighted free software by NAKAMURA, Hiroshi.  You can
+# redistribute it and/or modify it under the same terms of Ruby's license;
+# either the dual license version in 2003, or any later version.
+
+
+require 'logger'
+require 'xsd/qname'
+require 'wsdl/importer'
+require 'wsdl/soap/class_def_creator'
+require 'wsdl/soap/servant_skelton_creator'
+require 'wsdl/soap/driver_creator'
+require 'wsdl/soap/client_skelton_creator'
+require 'wsdl/soap/standalone_server_stub_creator'
+require 'wsdl/soap/servlet_stub_creator'
+require 'wsdl/soap/cgi_stub_creator'
+require 'wsdl/soap/class_name_creator'
+
+
+module WSDL
+module SOAP
+
+
+class WSDL2Ruby
+  attr_accessor :location
+  attr_reader :opt
+  attr_accessor :logger
+  attr_accessor :basedir
+
+  def run
+    unless @location
+      raise RuntimeError, "WSDL location not given"
+    end
+    @wsdl = import(@location)
+    if @opt['classdef']
+      @name = @opt['classdef']
+    else
+      @name = @wsdl.name ? @wsdl.name.name : 'default'
+    end
+    create_file
+  end
+
+private
+
+  def initialize
+    @modulepath = nil
+    @location = nil
+    @opt = {}
+    @logger = Logger.new(STDERR)
+    @basedir = nil
+    @wsdl = nil
+    @name = nil
+    @classdef_filename = nil
+    @mr_filename = nil
+    @name_creator = ClassNameCreator.new
+  end
+
+  def create_file
+    @modulepath = @opt['module_path']
+    create_classdef if @opt.key?('classdef')
+    create_mapping_registry if @opt.key?('mapping_registry')
+    create_servant_skelton(@opt['servant_skelton']) if @opt.key?('servant_skelton')
+    create_cgi_stub(@opt['cgi_stub']) if @opt.key?('cgi_stub')
+    create_standalone_server_stub(@opt['standalone_server_stub']) if @opt.key?('standalone_server_stub')
+    create_servlet_stub(@opt['servlet_stub']) if @opt.key?('servlet_stub')
+    create_driver(@opt['driver'], @opt['drivername_postfix'] || '') if @opt.key?('driver')
+    create_client_skelton(@opt['client_skelton']) if @opt.key?('client_skelton')
+  end
+
+  def create_classdef
+    @logger.info { "Creating class definition." }
+    @classdef_filename = @name + '.rb'
+    check_file(@classdef_filename) or return
+    write_file(@classdef_filename) do |f|
+      f.puts "# encoding: ASCII-8BIT"
+      f << WSDL::SOAP::ClassDefCreator.new(@wsdl, @name_creator, @modulepath).dump
+    end
+  end
+
+  def create_mapping_registry
+    @logger.info { "Creating mapping registry definition." }
+    @mr_filename = @name + 'MappingRegistry.rb'
+    check_file(@mr_filename) or return
+    write_file(@mr_filename) do |f|
+      f.puts "# encoding: ASCII-8BIT"
+      f << "require '#{@classdef_filename}'\n" if @classdef_filename
+      f << WSDL::SOAP::MappingRegistryCreator.new(@wsdl, @name_creator, @modulepath).dump
+    end
+  end
+
+  def create_client_skelton(servicename)
+    return if @wsdl.services.empty?
+    @logger.info { "Creating client skelton." }
+    servicename ||= @wsdl.services[0].name.name
+    @client_skelton_filename = servicename + 'Client.rb'
+    check_file(@client_skelton_filename) or return
+    write_file(@client_skelton_filename) do |f|
+      f << shbang << "\n"
+      f.puts "# encoding: ASCII-8BIT"
+      f << "require '#{@driver_filename}'\n\n" if @driver_filename
+      f << WSDL::SOAP::ClientSkeltonCreator.new(@wsdl, @name_creator, @modulepath).dump(create_name(servicename))
+    end
+  end
+
+  def create_servant_skelton(porttypename)
+    @logger.info { "Creating servant skelton." }
+    @servant_skelton_filename = (porttypename || @name + 'Servant') + '.rb'
+    check_file(@servant_skelton_filename) or return
+    write_file(@servant_skelton_filename) do |f|
+      f.puts "# encoding: ASCII-8BIT"
+      f << "require '#{@classdef_filename}'\n\n" if @classdef_filename
+      f << WSDL::SOAP::ServantSkeltonCreator.new(@wsdl, @name_creator, @modulepath).dump(create_name(porttypename))
+    end
+  end
+
+  def create_cgi_stub(servicename)
+    @logger.info { "Creating CGI stub." }
+    servicename ||= @wsdl.services[0].name.name
+    @cgi_stubFilename = servicename + '.cgi'
+    check_file(@cgi_stubFilename) or return
+    write_file(@cgi_stubFilename) do |f|
+      f << shbang << "\n"
+      f.puts "# encoding: ASCII-8BIT"
+      f << "require '#{@servant_skelton_filename}'\n" if @servant_skelton_filename
+      f << "require '#{@mr_filename}'\n" if @mr_filename
+      f << WSDL::SOAP::CGIStubCreator.new(@wsdl, @name_creator, @modulepath).dump(create_name(servicename))
+    end
+  end
+
+  def create_standalone_server_stub(servicename)
+    @logger.info { "Creating standalone stub." }
+    servicename ||= @wsdl.services[0].name.name
+    @standalone_server_stub_filename = servicename + '.rb'
+    check_file(@standalone_server_stub_filename) or return
+    write_file(@standalone_server_stub_filename) do |f|
+      f << shbang << "\n"
+      f.puts "# encoding: ASCII-8BIT"
+      f << "require '#{@servant_skelton_filename}'\n" if @servant_skelton_filename
+      f << "require '#{@mr_filename}'\n" if @mr_filename
+      f << WSDL::SOAP::StandaloneServerStubCreator.new(@wsdl, @name_creator, @modulepath).dump(create_name(servicename))
+    end
+  end
+
+  def create_servlet_stub(servicename)
+    @logger.info { "Creating servlet stub." }
+    servicename ||= @wsdl.services[0].name.name
+    @servlet_stub_filename = servicename + 'Servlet.rb'
+    check_file(@servlet_stub_filename) or return
+    write_file(@servlet_stub_filename) do |f|
+      f << shbang << "\n"
+      f.puts "# encoding: ASCII-8BIT"
+      f << "require '#{@servant_skelton_filename}'\n" if @servant_skelton_filename
+      f << "require '#{@mr_filename}'\n" if @mr_filename
+      f << WSDL::SOAP::ServletStubCreator.new(@wsdl, @name_creator, @modulepath).dump(create_name(servicename))
+    end
+  end
+
+  def create_driver(porttypename, drivername_postfix)
+    @logger.info { "Creating driver." }
+    @driver_filename = (porttypename || @name) + 'Driver.rb'
+    creator = WSDL::SOAP::DriverCreator.new(@wsdl, @name_creator, @modulepath)
+    creator.drivername_postfix = drivername_postfix
+    check_file(@driver_filename) or return
+    write_file(@driver_filename) do |f|
+      f.puts "# encoding: ASCII-8BIT"
+      f << "require '#{@classdef_filename}'\n" if @classdef_filename
+      f << "require '#{@mr_filename}'\n" if @mr_filename
+      f << creator.dump(create_name(porttypename))
+    end
+  end
+
+  def write_file(filename)
+    if @basedir
+      filename = File.join(basedir, filename)
+    end
+    File.open(filename, "w") do |f|
+      yield f
+    end
+  end
+
+  def check_file(filename)
+    if @basedir
+      filename = File.join(basedir, filename)
+    end
+    if FileTest.exist?(filename)
+      if @opt.key?('force')
+	@logger.warn {
+	  "File '#{filename}' exists but overrides it."
+	}
+	true
+      else
+	@logger.warn {
+	  "File '#{filename}' exists.  #{$0} did not override it."
+	}
+	false
+      end
+    else
+      @logger.info { "Creates file '#{filename}'." }
+      true
+    end
+  end
+
+  def shbang
+    "#!/usr/bin/env ruby"
+  end
+
+  def create_name(name)
+    name ? XSD::QName.new(@wsdl.targetnamespace, name) : nil
+  end
+
+  def import(location)
+    WSDL::Importer.import(location)
+  end
+end
+
+
+end
+end
+
+
+if __FILE__ == $0
+  warn("WARNING: #{File.expand_path(__FILE__)} is a library file used by bin/wsdl2ruby.rb.  Find bin/wsdl2ruby.rb from tarball version of soap4r or install soap4r via gem.")
+end

data/vendor/soap4r/wsdl/types.rb

@@ -0,0 +1,45 @@
+# encoding: ASCII-8BIT
+# WSDL4R - WSDL types definition.
+# Copyright (C) 2000-2007  NAKAMURA, Hiroshi <nahi@ruby-lang.org>.
+
+# This program is copyrighted free software by NAKAMURA, Hiroshi.  You can
+# redistribute it and/or modify it under the same terms of Ruby's license;
+# either the dual license version in 2003, or any later version.
+
+
+require 'wsdl/info'
+
+
+module WSDL
+
+
+class Types < Info
+  attr_reader :schemas
+
+  def initialize
+    super
+    @schemas = []
+  end
+
+  def parse_element(element)
+    case element
+    when SchemaName
+      o = XMLSchema::Schema.new
+      o.location = parent.location
+      @schemas << o
+      o
+    when DocumentationName
+      o = Documentation.new
+      o
+    else
+      nil
+    end
+  end
+
+  def parse_attr(attr, value)
+    nil
+  end
+end
+
+
+end

data/vendor/soap4r/wsdl/wsdl.rb

@@ -0,0 +1,25 @@
+# encoding: ASCII-8BIT
+# WSDL4R - Base definitions.
+# Copyright (C) 2000-2007  NAKAMURA, Hiroshi <nahi@ruby-lang.org>.
+
+# This program is copyrighted free software by NAKAMURA, Hiroshi.  You can
+# redistribute it and/or modify it under the same terms of Ruby's license;
+# either the dual license version in 2003, or any later version.
+
+
+require 'xsd/qname'
+require 'soap/nestedexception'
+
+
+module WSDL
+
+
+Version = '0.0.2'
+
+Namespace = 'http://schemas.xmlsoap.org/wsdl/'
+SOAPBindingNamespace ='http://schemas.xmlsoap.org/wsdl/soap/'
+
+class Error < StandardError; include ::SOAP::NestedException; end
+
+
+end

data/vendor/soap4r/wsdl/xml_schema/all.rb

@@ -0,0 +1,25 @@
+# encoding: ASCII-8BIT
+# WSDL4R - XMLSchema complexType definition for WSDL.
+# Copyright (C) 2000-2007  NAKAMURA, Hiroshi <nahi@ruby-lang.org>.
+
+# This program is copyrighted free software by NAKAMURA, Hiroshi.  You can
+# redistribute it and/or modify it under the same terms of Ruby's license;
+# either the dual license version in 2003, or any later version.
+
+
+require 'wsdl/xml_schema/content'
+
+
+module WSDL
+  module XMLSchema
+
+
+    class All < Content
+      def initialize
+        super()
+      end
+    end
+
+
+  end
+end

data/vendor/soap4r/wsdl/xml_schema/annotation.rb

@@ -0,0 +1,35 @@
+# encoding: ASCII-8BIT
+# WSDL4R - WSDL SOAP documentation element.
+# Copyright (C) 2000-2007  NAKAMURA, Hiroshi <nahi@ruby-lang.org>.
+
+# This program is copyrighted free software by NAKAMURA, Hiroshi.  You can
+# redistribute it and/or modify it under the same terms of Ruby's license;
+# either the dual license version in 2003, or any later version.
+
+
+require 'wsdl/info'
+
+
+module WSDL
+  module XMLSchema
+
+
+    class Annotation < Info
+      def initialize
+        super
+      end
+
+      def parse_element(element)
+        # Accepts any element.
+        self
+      end
+
+      def parse_attr(attr, value)
+        # Accepts any attribute.
+        true
+      end
+    end
+
+
+  end
+end