rtiss_soap4r 1.6.0

data/bin/wsdl2ruby.rb

@@ -0,0 +1,139 @@
+#!/usr/bin/env ruby
+# encoding: ASCII-8BIT
+$:.unshift File.join(File.dirname(__FILE__),'../lib') if ENV['DEBUG_SOAP4R']
+
+require 'getoptlong'
+require 'logger'
+require 'wsdl/soap/wsdl2ruby'
+
+
+class WSDL2RubyApp < Logger::Application
+private
+
+  OptSet = [
+    ['--wsdl','-w', GetoptLong::REQUIRED_ARGUMENT],
+    ['--module_path','-m', GetoptLong::REQUIRED_ARGUMENT],
+    ['--type','-t', GetoptLong::REQUIRED_ARGUMENT],
+    ['--classdef','-e', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--mapping_registry','-r', GetoptLong::NO_ARGUMENT],
+    ['--client_skelton','-c', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--servant_skelton','-s', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--cgi_stub','-g', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--servlet_stub','-l', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--standalone_server_stub','-a', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--driver','-d', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--drivername_postfix','-n', GetoptLong::REQUIRED_ARGUMENT],
+    ['--force','-f', GetoptLong::NO_ARGUMENT],
+    ['--quiet','-q', GetoptLong::NO_ARGUMENT],
+  ]
+
+  def initialize
+    super('app')
+    STDERR.sync = true
+    self.level = Logger::FATAL
+  end
+
+  def run
+    @worker = WSDL::SOAP::WSDL2Ruby.new
+    @worker.logger = @log
+    location, opt = parse_opt(GetoptLong.new(*OptSet))
+    usage_exit unless location
+    @worker.location = location
+    if opt['quiet']
+      self.level = Logger::FATAL
+    else
+      self.level = Logger::INFO
+    end
+    @worker.opt.update(opt)
+    @worker.run
+    0
+  end
+
+  def usage_exit
+    puts <<__EOU__
+Usage: #{ $0 } --wsdl wsdl_location [options]
+  wsdl_location: filename or URL
+
+Example:
+  For server side:
+    #{ $0 } --wsdl myapp.wsdl --type server
+  For client side:
+    #{ $0 } --wsdl myapp.wsdl --type client
+
+Options:
+  --wsdl wsdl_location
+  --type server|client
+    --type server implies;
+  	--classdef --mapping_registry --servant_skelton --standalone_server_stub
+    --type client implies;
+     	--classdef --mapping_registry --client_skelton --driver
+  --classdef [filenameprefix]
+  --mapping_registry
+  --client_skelton [servicename]
+  --servant_skelton [porttypename]
+  --cgi_stub [servicename]
+  --servlet_stub [servicename]
+  --standalone_server_stub [servicename]
+  --driver [porttypename]
+  --drivername_postfix driver_classname_postfix
+  --module_path Module::Path::Name
+  --force
+  --quiet
+
+Terminology:
+  Client <-> Driver <-(SOAP)-> Stub <-> Servant
+
+  Driver and Stub: Automatically generated
+  Client and Servant: Skelton generated (you should change)
+__EOU__
+    exit 1
+  end
+
+  def parse_opt(getoptlong)
+    opt = {}
+    wsdl = nil
+    begin
+      getoptlong.each do |name, arg|
+       	case name
+	when "--wsdl"
+	  wsdl = arg
+        when "--module_path"
+          opt['module_path'] = arg
+	when "--type"
+  	  case arg
+  	  when "server"
+  	    opt['classdef'] ||= nil
+  	    opt['mapping_registry'] ||= nil
+  	    opt['servant_skelton'] ||= nil
+  	    opt['standalone_server_stub'] ||= nil
+  	  when "client"
+  	    opt['classdef'] ||= nil
+  	    opt['mapping_registry'] ||= nil
+  	    opt['driver'] ||= nil
+  	    opt['client_skelton'] ||= nil
+  	  else
+  	    raise ArgumentError.new("Unknown type #{ arg }")
+  	  end
+   	when "--classdef", "--mapping_registry",
+            "--client_skelton", "--servant_skelton",
+            "--cgi_stub", "--servlet_stub", "--standalone_server_stub",
+            "--driver"
+  	  opt[name.sub(/^--/, '')] = arg.empty? ? nil : arg
+        when "--drivername_postfix"
+          opt['drivername_postfix'] = arg
+	when "--force"
+	  opt['force'] = true
+        when "--quiet"
+          opt['quiet'] = true
+   	else
+  	  raise ArgumentError.new("Unknown type #{ arg }")
+   	end
+      end
+    rescue
+      usage_exit
+    end
+    return wsdl, opt
+  end
+end
+
+WSDL2RubyApp.new.start

data/bin/xsd2ruby.rb

@@ -0,0 +1,91 @@
+#!/usr/bin/env ruby
+# encoding: ASCII-8BIT
+$:.unshift File.join(File.dirname(__FILE__),'../lib') if ENV['DEBUG_SOAP4R']
+
+require 'getoptlong'
+require 'logger'
+require 'wsdl/xmlSchema/xsd2ruby'
+
+class XSD2RubyApp < Logger::Application
+private
+
+  OptSet = [
+    ['--xsd','-x', GetoptLong::REQUIRED_ARGUMENT],
+    ['--module_path','-m', GetoptLong::REQUIRED_ARGUMENT],
+    ['--classdef','-e', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--mapping_registry','-r', GetoptLong::NO_ARGUMENT],
+    ['--mapper','-p', GetoptLong::NO_ARGUMENT],
+    ['--force','-f', GetoptLong::NO_ARGUMENT],
+    ['--quiet','-q', GetoptLong::NO_ARGUMENT],
+  ]
+
+  def initialize
+    super('app')
+    STDERR.sync = true
+    self.level = Logger::FATAL
+  end
+
+  def run
+    @worker = WSDL::XMLSchema::XSD2Ruby.new
+    @worker.logger = @log
+    location, opt = parse_opt(GetoptLong.new(*OptSet))
+    usage_exit unless location
+    @worker.location = location
+    if opt['quiet']
+      self.level = Logger::FATAL
+    else
+      self.level = Logger::INFO
+    end
+    @worker.opt.update(opt)
+    @worker.run
+    0
+  end
+
+  def usage_exit
+    puts <<__EOU__
+Usage: #{ $0 } --xsd xsd_location [options]
+  xsd_location: filename or URL
+
+Example:
+  #{ $0 } --xsd myapp.xsd --classdef foo
+
+Options:
+  --xsd xsd_location
+  --classdef [filenameprefix]
+  --mapping_registry
+  --mapper
+  --module_path [Module::Path::Name]
+  --force
+  --quiet
+__EOU__
+    exit 1
+  end
+
+  def parse_opt(getoptlong)
+    opt = {}
+    xsd = nil
+    begin
+      getoptlong.each do |name, arg|
+       	case name
+	when "--xsd"
+	  xsd = arg
+        when "--module_path"
+          opt['module_path'] = arg
+	when "--classdef", "--mapping_registry", "--mapper"
+  	  opt[name.sub(/^--/, '')] = arg.empty? ? nil : arg
+	when "--force"
+	  opt['force'] = true
+        when "--quiet"
+          opt['quiet'] = true
+   	else
+  	  raise ArgumentError.new("Unknown type #{ arg }")
+   	end
+      end
+    rescue
+      usage_exit
+    end
+    return xsd, opt
+  end
+end
+
+XSD2RubyApp.new.start

data/lib/soap/attachment.rb

@@ -0,0 +1,109 @@
+# encoding: ASCII-8BIT
+# soap/attachment.rb: SOAP4R - SwA implementation.
+# 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 'soap/baseData'
+require 'soap/mapping'
+
+
+module SOAP
+
+
+class SOAPAttachment < SOAPExternalReference
+  attr_reader :data
+
+  def initialize(value)
+    super()
+    @data = value
+  end
+
+private
+
+  def external_contentid
+    @data.contentid
+  end
+end
+
+
+class Attachment
+  attr_reader :io
+  attr_accessor :contenttype
+
+  def initialize(string_or_readable = nil)
+    @string_or_readable = string_or_readable
+    @contenttype = "application/octet-stream"
+    @contentid = nil
+    @content = nil
+  end
+
+  def contentid
+    @contentid ||= Attachment.contentid(self)
+  end
+
+  def contentid=(contentid)
+    @contentid = contentid
+  end
+
+  def mime_contentid
+    '<' + contentid + '>'
+  end
+
+  def content
+    if @content == nil and @string_or_readable != nil
+      @content = @string_or_readable.respond_to?(:read) ?
+	@string_or_readable.read : @string_or_readable
+    end
+    @content
+  end
+
+  def to_s
+    content
+  end
+
+  def write(out)
+    out.write(content)
+  end
+
+  def save(filename)
+    File.open(filename, "wb") do |f|
+      write(f)
+    end
+  end
+
+  def self.contentid(obj)
+    # this needs to be fixed
+    [obj.__id__.to_s, Process.pid.to_s].join('.')
+  end
+
+  def self.mime_contentid(obj)
+    '<' + contentid(obj) + '>'
+  end
+end
+
+
+module Mapping
+  class AttachmentFactory < SOAP::Mapping::Factory
+    def obj2soap(soap_class, obj, info, map)
+      soap_obj = soap_class.new(obj)
+      mark_marshalled_obj(obj, soap_obj)
+      soap_obj
+    end
+
+    def soap2obj(obj_class, node, info, map)
+      obj = node.data
+      mark_unmarshalled_obj(node, obj)
+      return true, obj
+    end
+  end
+
+  DefaultRegistry.add(::SOAP::Attachment, ::SOAP::SOAPAttachment,
+    AttachmentFactory.new, nil)
+end
+
+
+end

data/lib/soap/attrproxy.rb

@@ -0,0 +1,35 @@
+# encoding: ASCII-8BIT
+# SOAP4R - attribute proxy interface.
+# 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.
+
+
+module SOAP
+
+
+module AttrProxy
+  def self.included(klass)
+    klass.extend(AttrProxyClassSupport)
+  end
+
+  module AttrProxyClassSupport
+    def attr_proxy(symbol, assignable = false)
+      name = symbol.to_s
+      define_method(name) {
+        attrproxy.__send__(name)
+      }
+      if assignable
+        aname = name + '='
+        define_method(aname) { |rhs|
+          attrproxy.__send__(aname, rhs)
+        }
+      end
+    end
+  end
+end
+
+
+end