enterprisifier 0.0.1

data/lib/enterprisifier/marshalling/xsd/schema/sequence.rb

@@ -0,0 +1,21 @@
+require 'enterprisifier/marshalling/schema_composition'
+require 'enterprisifier/marshalling/xsd/schema/element'
+require 'enterprisifier/marshalling/xsd/schema/group'
+require 'enterprisifier/marshalling/xsd/schema/choice'
+require 'enterprisifier/marshalling/xsd/schema/sequence'
+
+module Enterprisifier
+  module Marshalling
+    module XSD
+      module Schema
+        class Sequence
+          include Enterprisifier::Marshalling::SchemaComposition
+          composed_of :Element, :Group, :Choice, :Sequence
+          macros :max_occurs, :min_occurs
+
+        end   # Sequence
+      end     # Schema
+    end       # XSD
+  end         # Marshalling
+end           # Enterprisifier
+

data/lib/enterprisifier/marshalling/xsd/schema/simple_content.rb

@@ -0,0 +1,18 @@
+require 'enterprisifier/marshalling/schema_composition'
+require 'enterprisifier/marshalling/xsd/schema/restriction'
+require 'enterprisifier/marshalling/xsd/schema/extension'
+
+module Enterprisifier
+  module Marshalling
+    module XSD
+      module Schema
+        class SimpleContent
+          include Enterprisifier::Marshalling::SchemaComposition
+          composed_of :Restriction, :Extension
+
+
+        end # SimpleContent
+      end   # Schema
+    end     # XSD
+  end       # Marshalling
+end         # Enterprisifier

data/lib/enterprisifier/marshalling/xsd/schema/simple_type.rb

@@ -0,0 +1,23 @@
+require 'enterprisifier/marshalling/schema_composition'
+require 'enterprisifier/marshalling/xsd/schema/restriction'
+require 'enterprisifier/marshalling/xsd/schema/union'
+
+module Enterprisifier
+  module Marshalling
+    module XSD
+      module Schema
+        class SimpleType
+          include Enterprisifier::Marshalling::SchemaComposition
+          composed_of :Restriction, :Union
+          attr_reader :name
+
+          def initialize(name = nil)
+            super
+            @name = name
+          end
+
+        end   # SimpleType
+      end     # Schema
+    end       # XSD
+  end         # Marshalling
+end           # Enterprisifier

data/lib/enterprisifier/marshalling/xsd/schema/union.rb

@@ -0,0 +1,23 @@
+require 'enterprisifier/marshalling/schema_composition'
+require 'enterprisifier/marshalling/xsd/schema/simple_type'
+
+module Enterprisifier
+  module Marshalling
+    module XSD
+      module Schema
+        class Union
+          include Enterprisifier::Marshalling::SchemaComposition
+          composed_of :SimpleType
+
+        private
+
+          def member_types(*types)
+            return @member_types if types.empty?
+            @member_types = types
+          end
+
+        end   # Union
+      end     # Schema
+    end       # XSD
+  end         # Marshalling
+end           # Enterprisifier

data/lib/enterprisifier/marshalling/xsd/types/boolean.rb

@@ -0,0 +1,14 @@
+require 'enterprisifier/marshalling/reification'
+
+module Enterprisifier
+  module Marshalling
+    module XSD
+      module Types
+        class Boolean
+          extend Reification
+
+        end # Boolean
+      end   # Types
+    end     # XSD
+  end       # Marshalling
+end         # Enterprisifier

data/lib/enterprisifier/marshalling/xsd/types/date.rb

@@ -0,0 +1,13 @@
+require 'enterprisifier/marshalling/reification'
+
+module Enterprisifier
+  module Marshalling
+    module XSD
+      module Types
+        class Date
+          extend Reification
+        end # Date
+      end   # Types
+    end     # XSD
+  end       # Marshalling
+end         # Enterprisifier

data/lib/enterprisifier/marshalling/xsd/types/date_time.rb

@@ -0,0 +1,13 @@
+require 'enterprisifier/marshalling/reification'
+
+module Enterprisifier
+  module Marshalling
+    module XSD
+      module Types
+        class DateTime
+          extend Reification
+        end # DateTime
+      end   # Types
+    end     # XSD
+  end       # Marshalling
+end         # Enterprisifier

data/lib/enterprisifier/marshalling/xsd/types/decimal.rb

@@ -0,0 +1,13 @@
+require 'enterprisifier/marshalling/reification'
+
+module Enterprisifier
+  module Marshalling
+    module XSD
+      module Types
+        class Decimal
+          extend Reification
+        end # Decimal
+      end   # Types
+    end     # XSD
+  end       # Marshalling
+end         # Enterprisifier

data/lib/enterprisifier/marshalling/xsd/types/string.rb

@@ -0,0 +1,14 @@
+require 'enterprisifier/marshalling/reification'
+
+module Enterprisifier
+  module Marshalling
+    module XSD
+      module Types
+        class String
+          extend Reification
+
+        end # String
+      end   # Types
+    end     # XSD
+  end       # Marshalling
+end         # Enterprisifier

data/lib/enterprisifier/marshalling/xsd/types/time.rb

@@ -0,0 +1,14 @@
+require 'enterprisifier/marshalling/reification'
+
+module Enterprisifier
+  module Marshalling
+    module XSD
+      module Types
+        class Time
+          extend Reification
+
+        end # Time
+      end   # Types
+    end     # XSD
+  end       # Marshalling
+end         # Enterprisifier

data/lib/enterprisifier/schema.rb

@@ -0,0 +1 @@
+require 'enterprisifier/schema/loader'

data/lib/enterprisifier/schema/base_element.rb

@@ -0,0 +1,156 @@
+require 'enterprisifier/schema/element_factory'
+require 'observer'
+
+module Enterprisifier
+  module Schema
+    class BaseElement
+      include Observable
+      include ActiveSupport::Callbacks
+
+      attr_accessor :parent
+      attr_reader :children, :namespaces, :attributes, :text
+      attr_reader :default_namespace
+
+      define_callbacks :after_parent_set
+      after_parent_set :preserve_namespaces
+
+      class << self
+        attr_reader :registered_as
+
+        def map_attribute(*camelized_attrs)
+          camelized_attrs.each do |attr|
+            underscored = attr.to_s.underscore
+            class_eval <<-EOM
+              def #{underscored}
+                return @#{underscored} if defined?(@#{underscored})
+                @#{underscored} = read_attribute('#{attr}')
+              end
+            EOM
+          end
+        end
+
+        def register(element_name)
+          @registered_as = element_name.to_sym
+          Enterprisifier::Schema::ElementFactory.register(element_name, self)
+        end
+      end # << self
+
+      map_attribute :value
+
+      def initialize(attributes, namespaces)
+        @attributes = attributes
+        @children = []
+        @namespaces = namespaces
+        @text = ''
+      end
+
+      def name
+        namespaced_name(read_attribute("name")) if read_attribute("name")
+      end
+
+      def ref
+        namespaced_name(read_attribute("ref")) if read_attribute("ref")
+      end
+
+      def base
+        namespaced_name(read_attribute("base")) if read_attribute("base")
+      end
+
+      def registered_as
+        self.class.registered_as
+      end
+
+      def add_child(child_element)
+        child_element.tap do |child|
+          @children << child
+          child.parent = self
+          changed
+          notify_observers(child, :child_added)
+        end
+      end
+
+      def each_child(skip_annotations = false)
+        children.each do |child|
+          yield(child) unless skip_annotations && child.registered_as == :annotation
+        end
+      end
+
+      def has_child?(*child_types)
+        child_types = child_types.map(&:to_sym)
+        children.any? do |child|
+          child_types.include?(child.registered_as)
+        end
+      end
+
+      def has_children?(skip_annotations = false)
+        children.any? do |child|
+          skip_annotations ? child.registered_as != :annotation : child
+        end
+      end
+
+      def add_text(text)
+        @text << text
+      end
+
+      def rootable?
+        false
+      end
+
+      def root
+        parent ? parent.root : self
+      end
+
+      def parent=(parent_element)
+        current_parent = parent
+        @parent = parent_element
+        add_observer(@parent)
+        run_callbacks(:after_parent_set) if !current_parent
+      end
+
+      def update(element, state)
+        changed
+        notify_observers(element, state)
+      end
+
+      def read_attribute(attr_name)
+        if found = @attributes.detect { |attr| attr.localname == attr_name }
+          found.value
+        else
+          nil
+        end
+      end
+
+      def documentation
+        return nil if children.empty? || annotation.nil?
+        annotation.documentation
+      end
+
+      def annotation
+        return @annotation if defined?(@annotation)
+        @annotation = children.detect { |c| c.registered_as == :annotation }
+      end
+
+    private
+
+      def namespaced_name(string)
+        namespaced = string.split(":", 2)
+        namespaced.size > 1 ? {:namespace => namespaced[0], :value => namespaced[1]} : {:value => namespaced[0]}
+      end
+
+      def set_default_namespace
+        @default_namespace = begin
+          (ns = @namespaces.assoc(nil)) ? ns.last : nil
+        end
+      end
+
+      def preserve_namespaces
+        if !root.namespaces.empty? && namespaces.empty?
+          @namespaces = root.namespaces
+          set_default_namespace
+        end
+      end
+
+    end   # BaseElement
+  end     # Schema
+end       # Enterprisifier
+

data/lib/enterprisifier/schema/element_factory.rb

@@ -0,0 +1,29 @@
+module Enterprisifier
+  module Schema
+    module ElementFactory
+      class MissingElementError < RuntimeError; end
+
+      @registered_elements = {}
+
+      def self.create_element(name, attributes, namespaces)
+        get_element_class(name).new(attributes, namespaces)
+      end
+
+      def self.register(element_name, klass)
+        @registered_elements[element_name.to_s] = klass
+      end
+
+      def self.get_element_class(element_name)
+        if klass = @registered_elements[element_name.to_s]
+          klass
+        else
+          Logger.warn("Unhandled element: #{element_name}")
+          Enterprisifier::Schema::Elements::UnknownElement
+        end
+      end
+
+    end # ElementFactory
+  end   # Schema
+end     # Enterprisifier
+
+Dir["#{File.dirname(__FILE__)}/elements/*.rb"].each {|f| require f}

data/lib/enterprisifier/schema/elements/annotation.rb

@@ -0,0 +1,20 @@
+require 'enterprisifier/schema/base_element'
+
+module Enterprisifier
+  module Schema
+    module Elements
+      class AnnotationElement < BaseElement
+        register :annotation
+
+        def documentation
+          return @documentation if defined?(@documentation)
+          docs = children.inject('') do |doc,child|
+            doc << "#{child.text}\n"
+          end
+          @documentation = docs.blank? ? nil : docs
+        end
+
+      end # AnnotationElement
+    end   # Elements
+  end     # Schema
+end       # Enterprisifier

data/lib/enterprisifier/schema/elements/attribute.rb

@@ -0,0 +1,22 @@
+require 'enterprisifier/schema/base_element'
+
+module Enterprisifier
+  module Schema
+    module Elements
+      class AttributeElement < BaseElement
+        register :attribute
+        map_attribute :default, :fixed, :form, :use
+
+        def value_type
+          return @value_type if defined?(@value_type)
+          if type_val = read_attribute("type")
+            @value_type = namespaced_name(type_val)
+          else
+            @value_type = nil
+          end
+        end
+
+      end # AttributeElement
+    end   # Elements
+  end     # Schema
+end       # Enterprisifier

data/lib/enterprisifier/schema/elements/choice.rb

@@ -0,0 +1,13 @@
+require 'enterprisifier/schema/base_element'
+
+module Enterprisifier
+  module Schema
+    module Elements
+      class ChoiceElement < BaseElement
+        register :choice
+        map_attribute :minOccurs, :maxOccurs
+
+      end # ChoiceElement
+    end   # Elements
+  end     # Schema
+end       # Enterprisifier

data/lib/enterprisifier/schema/elements/complex_content.rb

@@ -0,0 +1,13 @@
+require 'enterprisifier/schema/base_element'
+
+module Enterprisifier
+  module Schema
+    module Elements
+      class ComplexContentElement < BaseElement
+        register :complexContent
+        map_attribute :mixed
+
+      end # ComplexContentElement
+    end   # Elements
+  end     # Schema
+end       # Enterprisifier