Gecko [ www.corporacionhdm.com.pe ]

Name	Size	Permission	Date
all.rb	1.15 KB	-rw-r--r--	2007-02-12 23:01
annotation.rb	601 B	-rw-r--r--	2007-02-12 23:01
any.rb	1.06 KB	-rw-r--r--	2007-02-12 23:01
attribute.rb	2.52 KB	-rw-r--r--	2007-02-12 23:01
choice.rb	1.15 KB	-rw-r--r--	2007-02-12 23:01
complexContent.rb	1.85 KB	-rw-r--r--	2007-02-12 23:01
complexType.rb	2.91 KB	-rw-r--r--	2007-02-12 23:01
content.rb	1.59 KB	-rw-r--r--	2007-02-12 23:01
data.rb	3.25 KB	-rw-r--r--	2007-02-12 23:01
element.rb	3.31 KB	-rw-r--r--	2007-02-12 23:01
enumeration.rb	645 B	-rw-r--r--	2007-02-12 23:01
import.rb	1.42 KB	-rw-r--r--	2007-02-12 23:01
importer.rb	2.18 KB	-rw-r--r--	2007-02-12 23:01
include.rb	1014 B	-rw-r--r--	2007-02-12 23:01
length.rb	594 B	-rw-r--r--	2007-02-12 23:01
parser.rb	3.91 KB	-rw-r--r--	2007-02-12 23:01
pattern.rb	642 B	-rw-r--r--	2007-02-12 23:01
schema.rb	3.02 KB	-rw-r--r--	2007-02-12 23:01
sequence.rb	1.15 KB	-rw-r--r--	2007-02-12 23:01
simpleContent.rb	1.15 KB	-rw-r--r--	2007-02-12 23:01
simpleExtension.rb	938 B	-rw-r--r--	2007-02-12 23:01
simpleRestriction.rb	1.46 KB	-rw-r--r--	2007-02-12 23:01
simpleType.rb	1.37 KB	-rw-r--r--	2007-02-12 23:01
unique.rb	584 B	-rw-r--r--	2007-02-12 23:01
xsd2ruby.rb	2.08 KB	-rw-r--r--	2007-02-12 23:01

Rename

# WSDL4R - XMLSchema complexType definition for WSDL.
# Copyright (C) 2002, 2003  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/xmlSchema/content'
require 'wsdl/xmlSchema/element'
require 'xsd/namedelements'

module WSDL
module XMLSchema

class ComplexType < Info
  attr_accessor :name
  attr_accessor :complexcontent
  attr_accessor :simplecontent
  attr_reader :content
  attr_accessor :final
  attr_accessor :mixed
  attr_reader :attributes

def initialize(name = nil)
    super()
    @name = name
    @complexcontent = nil
    @simplecontent = nil
    @content = nil
    @final = nil
    @mixed = false
    @attributes = XSD::NamedElements.new
  end

def targetnamespace
    # inner elements can be qualified
    # parent.is_a?(WSDL::XMLSchema::Element) ? nil : parent.targetnamespace
    parent.targetnamespace
  end

def elementformdefault
    parent.elementformdefault
  end
 
  AnyAsElement = Element.new(XSD::QName.new(nil, 'any'), XSD::AnyTypeName)
  def each_element
    if content
      content.elements.each do |element|
        if element.is_a?(Any)
          yield(AnyAsElement)
        else
          yield(element)
        end
      end
    end
  end

def find_element(name)
    if content
      content.elements.each do |element|
        if element.is_a?(Any)
          return AnyAsElement if name == AnyAsElement.name
        else
          return element if name == element.name
        end
      end
    end
    nil
  end

def find_element_by_name(name)
    if content
      content.elements.each do |element|
        if element.is_a?(Any)
          return AnyAsElement if name == AnyAsElement.name.name
        else
          return element if name == element.name.name
        end
      end
    end
    nil
  end

def sequence_elements=(elements)
    @content = Sequence.new
    elements.each do |element|
      @content << element
    end
  end

def all_elements=(elements)
    @content = All.new
    elements.each do |element|
      @content << element
    end
  end

def parse_element(element)
    case element
    when AllName
      @content = All.new
    when SequenceName
      @content = Sequence.new
    when ChoiceName
      @content = Choice.new
    when ComplexContentName
      @complexcontent = ComplexContent.new
    when SimpleContentName
      @simplecontent = SimpleContent.new
    when AttributeName
      o = Attribute.new
      @attributes << o
      o
    else
      nil
    end
  end

def parse_attr(attr, value)
    case attr
    when FinalAttrName
      @final = value.source
    when MixedAttrName
      @mixed = (value.source == 'true')
    when NameAttrName
      @name = XSD::QName.new(targetnamespace, value.source)
    else
      nil
    end
  end
end

end
end