soap5r 2.0.0

data/lib/xsd/xmlparser/parser.rb

@@ -0,0 +1,101 @@
+# encoding: ASCII-8BIT
+# XSD4R - XML Instance parser 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 'xsd/qname'
+require 'xsd/ns'
+require 'xsd/charset'
+
+
+module XSD
+module XMLParser
+
+
+class Parser
+  class ParseError < Error; end
+  class FormatDecodeError < ParseError; end
+  class UnknownElementError < FormatDecodeError; end
+  class UnknownAttributeError < FormatDecodeError; end
+  class UnexpectedElementError < FormatDecodeError; end
+  class ElementConstraintError < FormatDecodeError; end
+  class ParserError < ParseError; end
+
+  @@parser_factory = nil
+
+  def self.factory
+    @@parser_factory
+  end
+
+  def self.create_parser(host, opt = {})
+    unless @@parser_factory
+      raise ParserError.new("illegal XML parser configuration")
+    end
+    @@parser_factory.new(host, opt)
+  end
+
+  def self.add_factory(factory)
+    if $DEBUG
+      puts "Set #{ factory } as XML processor."
+    end
+    @@parser_factory = factory
+  end
+
+public
+
+  attr_accessor :charset
+
+  def initialize(host, opt = {})
+    @host = host
+    @charset = opt[:charset] || nil
+  end
+
+  def parse(string_or_readable)
+    @textbuf = ''
+    prologue
+    do_parse(string_or_readable)
+    epilogue
+  end
+
+private
+
+  def do_parse(string_or_readable)
+    raise ParserError.new(
+      'Method do_parse must be defined in derived class.')
+  end
+
+  def start_element(name, attrs)
+    @host.start_element(name, attrs)
+  end
+
+  def characters(text)
+    @host.characters(text)
+  end
+
+  def end_element(name)
+    @host.end_element(name)
+  end
+
+  def prologue
+  end
+
+  def epilogue
+  end
+
+  def xmldecl_encoding=(charset)
+    if @charset.nil?
+      @charset = charset
+    else
+      # Definition in a stream (like HTTP) has a priority.
+      p "encoding definition: #{ charset } is ignored." if $DEBUG
+    end
+  end
+end
+
+
+end
+end

data/lib/xsd/xmlparser/rexmlparser.rb

@@ -0,0 +1,59 @@
+# encoding: ASCII-8BIT
+# XSD4R - REXMLParser XML parser 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 'xsd/xmlparser'
+require 'rexml/streamlistener'
+require 'rexml/document'
+
+
+module XSD
+module XMLParser
+
+
+class REXMLParser < XSD::XMLParser::Parser
+  include REXML::StreamListener
+
+  def do_parse(string_or_readable)
+    source = nil
+    source = REXML::SourceFactory.create_from(string_or_readable)
+    source.encoding = charset if charset
+    # Listener passes a String in utf-8.
+    @charset = 'utf-8'
+    REXML::Document.parse_stream(source, self)
+  end
+
+  def epilogue
+  end
+
+  def tag_start(name, attrs)
+    start_element(name, attrs)
+  end
+
+  def tag_end(name)
+    end_element(name)
+  end
+
+  def text(text)
+    characters(text)
+  end
+
+  def cdata(content)
+    characters(content)
+  end
+
+  def xmldecl(version, encoding, standalone)
+    # Version should be checked.
+  end
+
+  add_factory(self)
+end
+
+
+end
+end

data/lib/xsd/xmlparser/xmlparser.rb

@@ -0,0 +1,51 @@
+# encoding: ASCII-8BIT
+# XSD4R - XMLParser XML parser 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 'xsd/xmlparser'
+require 'xml/parser'
+
+
+module XSD
+module XMLParser
+
+
+class XMLParser < XSD::XMLParser::Parser
+  class Listener < XML::Parser
+    begin
+      require 'xml/encoding-ja'
+      include XML::Encoding_ja
+    rescue LoadError
+      # uconv may not be installed.
+    end
+  end
+
+  def do_parse(string_or_readable)
+    # XMLParser passes a String in utf-8.
+    @charset = 'utf-8'
+    @parser = Listener.new
+    @parser.parse(string_or_readable) do |type, name, data|
+      case type
+      when XML::Parser::START_ELEM
+	start_element(name, data)
+      when XML::Parser::END_ELEM
+	end_element(name)
+      when XML::Parser::CDATA
+	characters(data)
+      else
+	raise FormatDecodeError.new("Unexpected XML: #{ type }/#{ name }/#{ data }.")
+      end
+    end
+  end
+
+  add_factory(self)
+end
+
+
+end
+end

data/lib/xsd/xmlparser/xmlscanner.rb

@@ -0,0 +1,150 @@
+# encoding: ASCII-8BIT
+# XSD4R - XMLScan XML parser 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 'xsd/xmlparser'
+require 'xmlscan/scanner'
+
+
+module XSD
+module XMLParser
+
+
+class XMLScanner < XSD::XMLParser::Parser
+  include XMLScan::Visitor
+
+  def do_parse(string_or_readable)
+    @attrs = {}
+    @curattr = nil
+    @scanner = XMLScan::XMLScanner.new(self)
+    @scanner.kcode = XSD::Charset.charset_str(charset) if charset
+    @scanner.parse(string_or_readable)
+  end
+
+  def scanner_kcode=(charset)
+    @scanner.kcode = XSD::Charset.charset_str(charset) if charset
+    self.xmldecl_encoding = charset
+  end
+
+  ENTITY_REF_MAP = {
+    'lt' => '<',
+    'gt' => '>',
+    'amp' => '&',
+    'quot' => '"',
+    'apos' => '\''
+  }
+
+  def parse_error(msg)
+    raise ParseError.new(msg)
+  end
+
+  def wellformed_error(msg)
+    raise NotWellFormedError.new(msg)
+  end
+
+  def valid_error(msg)
+    raise NotValidError.new(msg)
+  end
+
+  def warning(msg)
+    warn(msg)
+  end
+
+  # def on_xmldecl; end
+
+  def on_xmldecl_version(str)
+    # 1.0 expected.
+  end
+
+  def on_xmldecl_encoding(str)
+    self.scanner_kcode = str
+  end
+
+  # def on_xmldecl_standalone(str); end
+
+  # def on_xmldecl_other(name, value); end
+
+  # def on_xmldecl_end; end
+
+  # def on_doctype(root, pubid, sysid); end
+
+  # def on_prolog_space(str); end
+
+  # def on_comment(str); end
+
+  # def on_pi(target, pi); end
+
+  def on_chardata(str)
+    characters(str)
+  end
+
+  def on_cdata(str)
+    characters(str)
+  end
+
+  def on_etag(name)
+    end_element(name)
+  end
+
+  def on_entityref(ref)
+    characters(ENTITY_REF_MAP[ref])
+  end
+
+  def on_charref(code)
+    characters([code].pack('U'))
+  end
+
+  def on_charref_hex(code)
+    on_charref(code)
+  end
+
+  # def on_start_document; end
+
+  # def on_end_document; end
+
+  def on_stag(name)
+    @attrs = {}
+  end
+
+  def on_attribute(name)
+    @attrs[name] = @curattr = ''
+  end
+
+  def on_attr_value(str)
+    @curattr << str
+  end
+
+  def on_attr_entityref(ref)
+    @curattr << ENTITY_REF_MAP[ref]
+  end
+
+  def on_attr_charref(code)
+    @curattr << [code].pack('U')
+  end
+
+  def on_attr_charref_hex(code)
+    on_attr_charref(code)
+  end
+
+  # def on_attribute_end(name); end
+
+  def on_stag_end_empty(name)
+    on_stag_end(name)
+    on_etag(name)
+  end
+
+  def on_stag_end(name)
+    start_element(name, @attrs)
+  end
+
+  add_factory(self)
+end
+
+
+end
+end

data/lib/xsd/xmlparser.rb

@@ -0,0 +1,77 @@
+# encoding: ASCII-8BIT
+# XSD4R - XML Instance parser 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 'xsd/xmlparser/parser'
+
+
+module XSD
+
+
+module XMLParser
+  def create_parser(host, opt)
+    XSD::XMLParser::Parser.create_parser(host, opt)
+  end
+  module_function :create_parser
+
+  # $1 is necessary.
+  NSParseRegexp = Regexp.new('^xmlns:?(.*)$', nil, 'n')
+
+  def filter_ns(ns, attrs)
+    ns_updated = false
+    if attrs.nil? or attrs.empty?
+      return [ns, attrs]
+    end
+    newattrs = {}
+    attrs.each do |key, value|
+      if NSParseRegexp =~ key
+        unless ns_updated
+          ns = ns.clone_ns
+          ns_updated = true
+        end
+	# tag == '' means 'default namespace'
+        # value == '' means 'no default namespace'
+	tag = $1 || ''
+	ns.assign(value, tag)
+      else
+	newattrs[key] = value
+      end
+    end
+    return [ns, newattrs]
+  end
+  module_function :filter_ns
+end
+
+
+end
+
+
+# Try to load XML processor.
+loaded = false
+[
+  'nokogiri',
+#  'libxmlparser',
+#  'xmlparser',
+#  'xmlscanner',
+  'rexmlparser',
+].each do |name|
+  begin
+    require "xsd/xmlparser/#{name}"
+    # XXX: for a workaround of rubygems' require inconsistency
+    # XXX: MUST BE REMOVED IN THE FUTURE
+    raise LoadError unless XSD::XMLParser.constants.find { |c|
+      c.to_s.downcase == name
+    }
+    loaded = true
+    break
+  rescue LoadError
+  end
+end
+unless loaded
+  raise RuntimeError.new("XML processor module not found.")
+end

data/rubyStyle.css

@@ -0,0 +1,104 @@
+body {
+    background: #fff;
+    color: black;
+    margin-left: 2%;
+    margin-right: 2%;
+    font-family: Verdana, Arial, Helvetica, Sans-Serif;
+}
+
+a:link, a:visited {
+    text-decoration: none;
+    font-weight: bold;
+    color: #c00;
+    background: white;
+}
+
+a:link:hover, a:visited:hover {
+    font-weight: bold;
+    color: #fff;
+    background: black;
+}
+
+h1 {
+    color: #666;
+    background: white;
+    text-align: right;
+    margin-top: 1em;
+}
+
+h2 {
+    color: #666;
+    background: #ddd;
+    margin-top: 3ex;
+}
+
+h2 span.content {
+    border-style: solid solid dashed solid;
+    border-width: 0px 0px 1px 20px;
+    border-color: #666;
+    padding-left: 1ex;
+}
+
+h3 {
+    color: #666;
+    background: #ddd;
+    margin-top: 2ex;
+}
+
+h3 span.content {
+    border-style: solid;
+    border-width: 0px 0px 0px 10px;
+    border-color: #999;
+    padding-left: 1ex;
+}
+
+dt {
+    font-weight: bold;
+    margin-top: 2ex;
+    margin-left: 1em;
+}
+
+ul {
+    margin-bottom: 0.5em;
+}
+
+li {
+    margin-bottom: 0.1em;
+}
+
+table {
+    border-collapse: collapse;
+    empty-cells: show;
+    border-style: solid;
+    border-color: black;
+}
+
+table td {
+    border-style: solid;
+}
+
+address {
+    color: gray;
+    background: #fff;
+    text-align: right;
+    font-family: Times, serif;
+    font-style: normal;
+    font-variant: normal;
+    font-weight: normal;
+}
+
+pre {
+    font-size: 90%;
+    border-style: inset;
+    border-width: 1px;
+    border-color: #666;
+    padding-right: 1ex;
+    padding-top: 0.5em;
+    padding-left: 1ex;
+    padding-bottom: 0.5em;
+    margin-left: 1em;
+    margin-right: 2em;
+    white-space: pre;
+    background: #e6e6e6;
+    color: black;
+}

data/sample/attachment/complexmime/EdmService.rb

@@ -0,0 +1,125 @@
+# encoding: ASCII-8BIT
+require 'xsd/qname'
+
+# {urn:EDD:Edm}LocationInfo
+class LocationInfo
+  @@schema_type = "LocationInfo"
+  @@schema_ns = "urn:EDD:Edm"
+  @@schema_element = [["bottomLeft", ["Coordinates", XSD::QName.new(nil, "bottomLeft")]], ["topRight", ["Coordinates", XSD::QName.new(nil, "topRight")]], ["startTime", ["SOAP::SOAPDateTime", XSD::QName.new(nil, "startTime")]], ["endTime", ["SOAP::SOAPDateTime", XSD::QName.new(nil, "endTime")]]]
+
+  attr_accessor :bottomLeft
+  attr_accessor :topRight
+  attr_accessor :startTime
+  attr_accessor :endTime
+
+  def initialize(bottomLeft = nil, topRight = nil, startTime = nil, endTime = nil)
+    @bottomLeft = bottomLeft
+    @topRight = topRight
+    @startTime = startTime
+    @endTime = endTime
+  end
+end
+
+# {urn:EDD:Edm}MapInfo
+class MapInfo
+  @@schema_type = "MapInfo"
+  @@schema_ns = "urn:EDD:Edm"
+  @@schema_element = [["mapArea", ["MapArea", XSD::QName.new(nil, "mapArea")]], ["mapTime", ["SOAP::SOAPDateTime", XSD::QName.new(nil, "mapTime")]], ["mapOptions", ["MapOptions", XSD::QName.new(nil, "mapOptions")]]]
+
+  attr_accessor :mapArea
+  attr_accessor :mapTime
+  attr_accessor :mapOptions
+
+  def initialize(mapArea = nil, mapTime = nil, mapOptions = nil)
+    @mapArea = mapArea
+    @mapTime = mapTime
+    @mapOptions = mapOptions
+  end
+end
+
+# {urn:EDD}ObjectIdentification
+class ObjectIdentification
+  @@schema_type = "ObjectIdentification"
+  @@schema_ns = "urn:EDD"
+  @@schema_element = [["mmsiNumber", ["SOAP::SOAPString", XSD::QName.new(nil, "mmsiNumber")]], ["weight", ["SOAP::SOAPLong", XSD::QName.new(nil, "weight")]], ["length", ["SOAP::SOAPLong", XSD::QName.new(nil, "length")]], ["width", ["SOAP::SOAPLong", XSD::QName.new(nil, "width")]], ["draught", ["SOAP::SOAPLong", XSD::QName.new(nil, "draught")]]]
+
+  attr_accessor :mmsiNumber
+  attr_accessor :weight
+  attr_accessor :length
+  attr_accessor :width
+  attr_accessor :draught
+
+  def initialize(mmsiNumber = nil, weight = nil, length = nil, width = nil, draught = nil)
+    @mmsiNumber = mmsiNumber
+    @weight = weight
+    @length = length
+    @width = width
+    @draught = draught
+  end
+end
+
+# {urn:EDD}Coordinates
+class Coordinates
+  @@schema_type = "Coordinates"
+  @@schema_ns = "urn:EDD"
+  @@schema_element = [["wgs84Latitude", ["SOAP::SOAPDouble", XSD::QName.new(nil, "wgs84Latitude")]], ["wgs84Longitude", ["SOAP::SOAPDouble", XSD::QName.new(nil, "wgs84Longitude")]]]
+
+  attr_accessor :wgs84Latitude
+  attr_accessor :wgs84Longitude
+
+  def initialize(wgs84Latitude = nil, wgs84Longitude = nil)
+    @wgs84Latitude = wgs84Latitude
+    @wgs84Longitude = wgs84Longitude
+  end
+end
+
+# {urn:EDD}LastKnownPosition
+class LastKnownPosition
+  @@schema_type = "LastKnownPosition"
+  @@schema_ns = "urn:EDD"
+  @@schema_element = [["location", ["Coordinates", XSD::QName.new(nil, "location")]], ["timestamp", ["SOAP::SOAPDateTime", XSD::QName.new(nil, "timestamp")]]]
+
+  attr_accessor :location
+  attr_accessor :timestamp
+
+  def initialize(location = nil, timestamp = nil)
+    @location = location
+    @timestamp = timestamp
+  end
+end
+
+# {urn:EDD}MapArea
+class MapArea
+  @@schema_type = "MapArea"
+  @@schema_ns = "urn:EDD"
+  @@schema_element = [["bottomLeft", ["Coordinates", XSD::QName.new(nil, "bottomLeft")]], ["topRight", ["Coordinates", XSD::QName.new(nil, "topRight")]], ["width", ["SOAP::SOAPLong", XSD::QName.new(nil, "width")]], ["height", ["SOAP::SOAPLong", XSD::QName.new(nil, "height")]]]
+
+  attr_accessor :bottomLeft
+  attr_accessor :topRight
+  attr_accessor :width
+  attr_accessor :height
+
+  def initialize(bottomLeft = nil, topRight = nil, width = nil, height = nil)
+    @bottomLeft = bottomLeft
+    @topRight = topRight
+    @width = width
+    @height = height
+  end
+end
+
+# {urn:EDD}MapOptions
+class MapOptions
+  @@schema_type = "MapOptions"
+  @@schema_ns = "urn:EDD"
+  @@schema_element = [["showCurrentData", ["SOAP::SOAPBoolean", XSD::QName.new(nil, "showCurrentData")]], ["showWaveData", ["SOAP::SOAPBoolean", XSD::QName.new(nil, "showWaveData")]], ["showWindData", ["SOAP::SOAPBoolean", XSD::QName.new(nil, "showWindData")]]]
+
+  attr_accessor :showCurrentData
+  attr_accessor :showWaveData
+  attr_accessor :showWindData
+
+  def initialize(showCurrentData = nil, showWaveData = nil, showWindData = nil)
+    @showCurrentData = showCurrentData
+    @showWaveData = showWaveData
+    @showWindData = showWindData
+  end
+end

data/sample/attachment/complexmime/README.txt

@@ -0,0 +1,3 @@
+This directory includes Complex Type + MIME attachment example
+by Ger Apeldoorn <g.apeldoorn at argoss dot nl>
+Thanks.