* lib/soap/* (29 files): SOAP4R added.

* lib/wsdl/* (42 files): WSDL4R added.

* lib/xsd/* (12 files): XSD4R added.

* test/soap/* (16 files): added.

* test/wsdl/* (2 files): added.

* test/xsd/* (3 files): added.

* sample/soap/* (27 files): added.

* sample/wsdl/* (13 files): added.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4591 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 115 insertions, 0 deletions

diff --git a/lib/wsdl/xmlSchema/element.rb b/lib/wsdl/xmlSchema/element.rb
new file mode 100644
index 0000000000..d6d17c08cf
--- /dev/null
+++ b/lib/wsdl/xmlSchema/element.rb
@@ -0,0 +1,115 @@
+=begin
+WSDL4R - XMLSchema element definition for WSDL.
+Copyright (C) 2002, 2003  NAKAMURA, Hiroshi.
+
+This program is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free Software
+Foundation; either version 2 of the License, or (at your option) any later
+version.
+
+This program is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
+PRATICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along with
+this program; if not, write to the Free Software Foundation, Inc., 675 Mass
+Ave, Cambridge, MA 02139, USA.
+=end
+
+
+require 'wsdl/info'
+
+
+module WSDL
+module XMLSchema
+
+
+class Element < Info
+  attr_accessor :name	# required
+  attr_accessor :type
+  attr_accessor :local_complextype
+  attr_accessor :constraint
+  attr_accessor :maxoccurs
+  attr_accessor :minoccurs
+  attr_accessor :nillable
+
+  def initialize(name = nil, type = XSD::AnyTypeName)
+    super()
+    @name = name
+    @type = type
+    @local_complextype = nil
+    @constraint = nil
+    @maxoccurs = 1
+    @minoccurs = 1
+    @nillable = nil
+  end
+
+  def targetnamespace
+    parent.targetnamespace
+  end
+
+  def parse_element(element)
+    case element
+    when ComplexTypeName
+      @type = nil
+      @local_complextype = ComplexType.new
+      @local_complextype
+    when UniqueName
+      @constraint = Unique.new
+      @constraint
+    else
+      nil
+    end
+  end
+
+  def parse_attr(attr, value)
+    case attr
+    when NameAttrName
+      #@name = XSD::QName.new(nil, value)
+      @name = XSD::QName.new(targetnamespace, value)
+    when TypeAttrName
+      @type = if value.is_a?(XSD::QName)
+	  value
+	else
+	  XSD::QName.new(XSD::Namespace, value)
+	end
+    when MaxOccursAttrName
+      case parent
+      when All
+	if value != '1'
+	  raise Parser::AttrConstraintError.new(
+	    "Cannot parse #{ value } for #{ attr }.")
+	end
+	@maxoccurs = value
+      when Sequence
+	@maxoccurs = value
+      else
+	raise NotImplementedError.new
+      end
+      @maxoccurs
+    when MinOccursAttrName
+      case parent
+      when All
+	if ['0', '1'].include?(value)
+	  @minoccurs = value
+	else
+	  raise Parser::AttrConstraintError.new(
+	    "Cannot parse #{ value } for #{ attr }.")
+	end
+      when Sequence
+	@minoccurs = value
+      else
+	raise NotImplementedError.new
+      end
+      @minoccurs
+    when NillableAttrName
+      @nillable = (value == 'true')
+    else
+      nil
+    end
+  end
+end
+
+
+end
+end