vcdom 0.2.0 → 0.3.0

data/lib/vcdom/element_ns.rb

@@ -0,0 +1,44 @@
+# coding : utf-8
+
+require "vcdom/node"
+require "vcdom/element"
+
+module VCDOM
+    class ElementNS < Element
+      
+      def initialize( doc, namespace_uri, prefix, local_name )
+        super( doc, local_name )
+        @namespace_uri = namespace_uri
+        @prefix = prefix
+      end
+      
+      def node_type
+        ELEMENT_NODE
+      end
+      
+      def tag_name
+        if @prefix then
+          "#{@prefix.to_s}:#{@local_name.to_s}"
+        else
+          @local_name.to_s()
+        end
+      end
+      alias :node_name :tag_name
+      
+      def prefix
+        @prefix.nil? ? nil : @prefix.to_s()
+      end
+      def local_name
+        @local_name.to_s()
+      end
+      def namespace_uri
+        @namespace_uri.nil? ? nil : @namespace_uri.to_s()
+      end
+      
+      def append_child( new_child )
+        # �m�[�h�̃^�C�v�`�F�b�N�Ȃ�
+        _append_child( new_child )
+      end
+      
+    end
+end

data/lib/vcdom/node.rb

@@ -0,0 +1,278 @@
+# coding : utf-8
+
+module VCDOM
+    class Node
+      
+      ELEMENT_NODE                = 1
+      ATTRIBUTE_NODE              = 2
+      TEXT_NODE                   = 3
+      CDATA_SECTION_NODE          = 4
+      ENTITY_REFERENCE_NODE       = 5
+      ENTITY_NODE                 = 6
+      PROCESSING_INSTRUCTION_NODE = 7
+      COMMENT_NODE                = 8
+      DOCUMENT_NODE               = 9
+      DOCUMENT_TYPE_NODE          = 10
+      DOCUMENT_FRAGMENT_NODE      = 11
+      NOTATION_NODE               = 12
+      
+      class << self
+        alias :_new :new
+        private :new
+      end
+      
+      def initialize( owner_document )
+        @owner_document = owner_document
+      end
+      
+      def owner_document
+        @owner_document
+      end
+      
+      def prefix
+        nil
+      end
+      def namespace_uri
+        nil
+      end
+      
+      def parent_node
+        nil
+      end
+      def previous_sibling
+        nil
+      end
+      def next_sibling
+        nil
+      end
+      def node_value
+        nil
+      end
+      def attributes
+        nil
+      end
+      def node_list
+        NodeList::EMPTY_NODE_LIST
+      end
+      def attributes
+        nil
+      end
+      
+      
+      
+      def lookup_prefix( namespace_uri )
+        if namespace_uri.nil? then #(namespaceURI has no value, i.e. namespaceURI is null or empty string) {
+          return nil
+        end
+        case self.node_type
+          when ELEMENT_NODE then
+            return lookup_namespace_prefix( namespace_uri, self )
+          when DOCUMENT_NODE then
+            #//////////////////////
+            # ����ł����́H
+            #//////////////////////
+            return self.document_element.lookup_namespace_prefix( namespace_uri, self )
+          when ENTITY_NODE, NOTATION_NODE, DOCUMENT_FRAGMENT_NODE, DOCUMENT_TYPE_NODE then
+            return nil # type is unknown  
+          when ATTRIBUTE_NODE then
+            if not self.owner_element.nil? then #( Attr has an owner Element ) 
+            #//////////////////////
+            # ����ł����́H
+            #//////////////////////
+              return self.owner_element.lookup_namespace_prefix( namespace_uri, self )
+            end
+            return nil
+          else
+            anc_node = self.parent_node
+            loop do
+              if anc_node.nil? or anc_node.node_type == ELEMENT_NODE then
+                break
+              end
+              anc_node = anc_node.parent_node
+            end
+            if not anc_node.nil? then
+            #// EntityReferences may have to be skipped to get to it 
+            #//////////////////////
+            # ����ł����́H
+            #//////////////////////
+              return anc_node.lookup_namespace_prefix( namespace_uri, self )
+            end
+            return nil
+        end
+      end
+      def lookup_namespace_prefix( namespace_uri, original_element )
+        if not self.namespace_uri.nil? and self.namespace_uri == namespace_uri and 
+              not self.prefix.nil? and original_element.lookup_namespace_uri( self.prefix ) == namespace_uri then
+          #( Element has a namespace and Element's namespace == namespaceURI and 
+          #   Element has a prefix and 
+          #originalElement.lookupNamespaceURI(Element's prefix) == namespaceURI) 
+          return self.prefix
+        end
+        self.each_attr_node do |attr|
+        #if #( Element has attributes) { 
+        #for ( all DOM Level 2 valid local namespace declaration attributes of Element ) {
+          #//////////////////////////
+          # �v�ύX
+          #//////////////////////////
+          if attr.prefix == "xmlns" and attr[0].data == namespace_uri and 
+                original_element.lookup_namespace_uri( attr.local_name ) == namespace_uri then
+          #if (Attr's prefix == "xmlns" and Attr's value == namespaceURI and 
+          #    originalElement.lookupNamespaceURI(Attr's localname) == namespaceURI) 
+            return attr.local_name
+          end
+        #}
+        end #} 
+            anc_node = self.parent_node
+            loop do
+              if anc_node.nil? or anc_node.node_type == ELEMENT_NODE then
+                break
+              end
+              anc_node = anc_node.parent_node
+            end
+            if not anc_node.nil? then
+            #// EntityReferences may have to be skipped to get to it 
+            #//////////////////////
+            # ����ł����́H
+            #//////////////////////
+              return anc_node.lookup_namespace_prefix( namespace_uri, original_element )
+            end
+        #if (Node has an ancestor Element ) 
+        #   // EntityReferences may have to be skipped to get to it 
+        #{ 
+        #    return ancestor.lookupNamespacePrefix(namespaceURI, originalElement); 
+        #} 
+        return nil
+      end
+
+      
+      def lookup_namespace_uri( prefix )
+        case self.node_type
+          when ELEMENT_NODE then
+            if not self.namespace_uri.nil? and self.prefix == prefix then
+              #( Element's namespace != null and Element's prefix == prefix ) 
+              #  Note: prefix could be "null" in this case we are looking for default namespace 
+              return self.namespace_uri
+            end
+            #if ( Element has attributes)
+            #for ( all DOM Level 2 valid local namespace declaration attributes of Element )
+            self.each_attr_node do |attr|
+              if attr.prefix == "xmlns" and attr.local_name == prefix then
+                #if (Attr's prefix == "xmlns" and Attr's localName == prefix ) 
+                #         // non default namespace
+                # /////////////////////
+                #  �ύX���K�v
+                # /////////////////////
+                if not attr[0].nil? then
+                  #if (Attr's value is not empty) {
+                  return attr[0].data
+                end
+                return nil
+              elsif attr.local_name == "xmlns" and prefix == nil then
+                #(Attr's localname == "xmlns" and prefix == null)
+                #       // default namespace { 
+                # /////////////////////
+                #  �ύX���K�v
+                # /////////////////////
+                if not attr[0].nil? then
+                  # if (Attr's value is not empty) {
+                  return attr[0].data
+                end
+                return nil
+              end
+            end
+            anc_node = self.parent_node
+            loop do
+              if anc_node.nil? or anc_node.node_type == ELEMENT_NODE then
+                break
+              end
+              anc_node = anc_node.parent_node
+            end
+            if not anc_node.nil? then
+            #if ( Element has an ancestor Element ) 
+            #// EntityReferences may have to be skipped to get to it { 
+              return anc_node.lookup_namespace_uri( prefix )
+            end
+            return nil
+          when DOCUMENT_NODE then
+            return self.document_element.lookup_namespace_uri( prefix )
+          when ENTITY_NODE, NOTATION_NODE, DOCUMENT_TYPE_NODE, DOCUMENT_FRAGMENT_NODE then
+            return nil
+          when ATTRIBUTE_NODE then
+            if not self.owner_element.nil? then #(Attr has an owner Element) { 
+              return self.owner_element.lookup_namespace_uri( prefix )
+            else
+              return nil
+            end
+          else
+            anc_node = self.parent_node
+            loop do
+              if anc_node.nil? or anc_node.node_type == ELEMENT_NODE then
+                break
+              end
+              anc_node = anc_node.parent_node
+            end
+            if not anc_node.nil? then
+              #if(Node has an ancestor Element) // EntityReferences may have to be skipped to get to it { 
+              return anc_node.lookup_namespace_uri( prefix )
+            else
+              return nil
+            end
+        end
+      end
+      
+      def is_default_namespace( namespace_uri )
+        case self.node_type
+          when ELEMENT_NODE then
+            if self.prefix.nil? then
+              return self.namespace_uri == namespace_uri
+            end
+            self.each_attr_node do |attr|
+              #( Element has attributes and there is a valid DOM Level 2 default namespace declaration, i.e. 
+              #Attr's localName == "xmlns" ) {
+              if attr.local_name == "xmlns" then
+                #/////////////////////////////////
+                # �ύX�K�v
+                #/////////////////////////////////
+                return attr[0] == namespace_uri
+              end
+            end
+            anc_node = self.parent_node
+            loop do
+              if anc_node.nil? or anc_node.node_type == ELEMENT_NODE then
+                break
+              end
+              anc_node = anc_node.parent_node
+            end
+            if not anc_node.nil? then #( Element has an ancestor Element ) // EntityReferences may have to be skipped to get to it {
+              return anc_node.is_default_namespace( namespace_uri )
+            else
+              return false
+            end
+          when DOCUMENT_NODE then
+            return self.document_element.is_default_namespace( namespace_uri )
+          when ENTITY_NODE, NOTATION_NODE, DOCUMENT_TYPE_NODE, DOCUMENT_FRAGMENT_NODE then
+            return false
+          when ATTRIBUTE_NODE then
+            if not self.owner_element.nil? then#( Attr has an owner Element ) {
+              return self.owner_element.is_default_namespace( namespace_uri )
+            else
+              return false
+            end
+          else
+            anc_node = self.parent_node
+            loop do
+              if anc_node.nil? or anc_node.node_type == ELEMENT_NODE then
+                break
+              end
+              anc_node = anc_node.parent_node
+            end
+            if not anc_node.nil? then #( Element has an ancestor Element ) // EntityReferences may have to be skipped to get to it {
+              return anc_node.is_default_namespace( namespace_uri )
+            else
+              return false
+            end
+        end
+      end
+      
+    end
+end

data/lib/vcdom/node_list.rb

@@ -0,0 +1,32 @@
+# coding : utf-8
+
+require "vcdom/node"
+
+module VCDOM
+    class NodeList
+      
+      include Enumerable
+      
+      def initialize( nodes )
+        @nodes = nodes
+      end
+      def item( index )
+        @nodes[index]
+      end
+      def length
+        @nodes.length
+      end
+      def each
+        @nodes.each do |n|
+          yield n
+        end
+      end
+      
+      def inspect
+        "#<VCXML::DOM::NodeList>"
+      end
+      
+      #EMPTY_NODE_LIST = NodeList.new( Array.new() )
+      
+    end
+end

data/lib/vcdom/parent.rb

@@ -0,0 +1,126 @@
+# coding : utf-8
+
+require "vcdom/node_list"
+
+module VCDOM
+    module Parent
+      
+      class ChildNodes
+        def initialize()
+          @first_child = nil
+          @last_child  = nil
+          @length      = 0
+        end
+        def first_child; @first_child end
+        def first_child=(c); @first_child = c end
+        def last_child; @last_child end
+        def last_child=(c); @last_child = c end
+        def length; @length end
+        def length=(c); @length = c end
+        
+        def each
+          node = @first_child
+          while not node.nil? do
+            yield node
+            node = node.next_sibling
+          end
+        end
+        def []( index )
+          if index >= 0 then
+            node = @first_child
+            index.times do
+              if node.nil? then
+                return node
+              end
+              node = node.next_sibling
+            end
+          elsif index < 0 then
+            node = @last_child
+            index *= -1
+            index -= 1
+            index.times do
+              if node.nil? then
+                return node
+              end
+              node = node.next_sibling
+            end
+          else
+            raise "ERROR"
+          end
+          return node
+        end
+      end
+      
+      def initialize_parent()
+        @child_nodes = ChildNodes.new()
+      end
+      
+      def each_child_node
+        @child_nodes.each do |n|
+          yield n
+        end
+      end
+      def child_nodes
+        NodeList.new( @child_nodes )
+      end
+      def first_child
+        @child_nodes.first_child
+      end
+      def last_child
+        @child_nodes.last_child
+      end
+      
+      def _append_child( new_child )
+        #@child_nodes << new_child
+        if not new_child.parent_node.nil? then
+          # ��c�����݂���
+          # new_child �������̐�c����Ȃ����m�F����
+          node = self.parent_node
+          while not node.nil? do
+            if node.equal? new_child then
+              raise "HIERARCHY_REQUEST_ERR"
+            end
+            node = node.parent_node
+          end
+          # new_child ���Ƃ肠�����c���[����폜
+          new_child.parent_node.remove_child( new_child )
+        end
+        new_child._set_parent_node( self )
+        if @child_nodes.last_child.nil? then
+          @child_nodes.first_child = new_child
+        else
+          @child_nodes.last_child._set_next_sibling( new_child )
+        end
+        @child_nodes.last_child  = new_child
+        @child_nodes.length += 1
+        new_child
+      end
+      private :_append_child
+      def <<( new_child )
+        self.append_child( new_child )
+        self
+      end
+      def remove_child( old_child )
+        if not old_child.is_a? Node then
+          raise ArgumentError.new()
+        end
+        if old_child.parent_node and old_child.parent_node.equal? self then
+          @child_nodes.length -= 1
+        else
+          raise "ERROR"
+        end
+        if @child_nodes.first_child.equal? old_child then
+          @child_nodes.first_child = old_child.next_sibling
+        end
+        if @child_nodes.last_child.equal? old_child then
+          @child_nodes.last_child = old_child.previous_sibling
+        end
+        old_child._leave_from_tree()
+        return old_child
+      end
+      def []( index )
+        @child_nodes[index]
+      end
+      
+    end
+end

data/lib/vcdom/text.rb

@@ -0,0 +1,23 @@
+# coding : utf-8
+
+require "vcdom/character_data"
+require "vcdom/child"
+
+module VCDOM
+    class Text < CharacterData
+      
+      include Child
+      
+      def initialize( doc, data )
+        super( doc, data )
+      end
+      
+      def node_type
+        TEXT_NODE
+      end
+      def node_name
+        "#text"
+      end
+      
+    end
+end