libxml-ruby 0.6.0-x86-mswin32-60 → 0.7.0-x86-mswin32-60

data/test/ets_copy_bug.rb

@@ -4,7 +4,7 @@ def test( doc2 )
   doc = XML::Document.new('1.0')
   doc.root = XML::Node.new("ccc")
   doc.root['aaa'] = 'aaa'
-  doc.root.child_add(doc2.root) # BUG!
+  doc.root.child_add(doc2.root.copy(true)) # BUG!
   doc.root << doc2.root.copy(true)
   return doc
 end

data/test/ets_copy_bug2.rb

@@ -1,32 +1,21 @@
 require 'libxml'
 
-$FAILS = []
-
-def test( doc, doc2, iter )
-  doc.root = XML::Node.new("ccc")
-  iter.times { |i|
-    doc.root.child_add(doc2.root)
-#    doc.root << doc2.root.copy(true)
-  }
-  return doc
-end
-
-def test2(iter)
+# This will cause a segmentation fault by 
+# freeing a xml_node_object twice.  Haven't
+# figured out why this is happening yet.
+2.times do 
   doc = XML::Document.new('1.0')
-  doc2 = XML::Document.new('1.0')
-  doc2.root = XML::Node.new("aaa")
-  ret = test( doc, doc2, iter )
-  li=ret.find('aaa').length
-  $FAILS << [li,iter] unless li == iter
-end
+  doc.root = XML::Node.new("header")
 
-test2(5)
-1000.times do |i| 
-  test2(i)
-  print "\r#{i}"; $stdout.flush
+  doc2 = XML::Document.new('1.0')
+  doc2.root = XML::Node.new("footer")
+  
+  4000.times do 
+    doc.root << doc2.root.copy(false)
+  end
+  
+  nodes = doc.find('/header/footer')
+  nodes = nil
+  
 end
-
-puts "\n#{$FAILS.length} failures"
-p $FAILS
-
-
+puts 'hi'

data/test/ets_doc_to_s.rb

@@ -1,6 +1,6 @@
 require 'libxml'
 
-1000.times do |count|
+100.times do |count|
 
   xml_doc = XML::Document.new()
   xml_doc.encoding = "UTF-8"

data/test/ets_gpx.rb

@@ -17,7 +17,7 @@ require 'libxml'
   trkseg = XML::Node.new 'trkseg'
   track << trkseg
 
-  1.upto(10000) do |n|
+  1.upto(1000) do |n|
     trkpt = XML::Node.new 'trkpt'
     trkpt['lat'] = n.to_s
     trkpt['lon'] = n.to_s

data/test/ets_node_gc.rb

@@ -13,7 +13,7 @@ save = nil
     doc = XML::Document.new
     doc.root = outer
     # Uncomment the following line and it won't crash
-    # save = doc
+    save = doc
   end
   garbage_collect
 end

data/test/ets_tsr.rb

@@ -1,6 +1,6 @@
 require 'libxml'
 
-1_000_000.times {|n|
+10_000.times {|n|
 j=XML::Node.new2(nil,"happy#{n}")
   10.times {|r|
     j1=XML::Node.new("happy#{r}","farts")

data/test/tc_well_formed.rb

@@ -1,7 +1,7 @@
 require "libxml"
 require 'test/unit'
 
-class TC_WELL_FORMED < Test::Unit::TestCase
+class TestWellFormed < Test::Unit::TestCase
   def test_xml_node_doc_get()
     parser = XML::Parser.new
     parser.string = "<p>I am well formed</p>"

data/test/tc_xml_attributes.rb

@@ -0,0 +1,106 @@
+require "libxml"
+require 'test/unit'
+
+class AttributesTest < Test::Unit::TestCase
+  def setup()
+    xp = XML::Parser.string(<<-EOS)
+    <CityModel
+      xmlns="http://www.opengis.net/examples"
+      xmlns:city="http://www.opengis.net/examples"
+      xmlns:gml="http://www.opengis.net/gml"
+      xmlns:xlink="http://www.w3.org/1999/xlink"
+      xmlns:xsi="http://www.w3.org/2000/10/XMLSchema-instance"
+      xsi:schemaLocation="http://www.opengis.net/examples city.xsd">
+     <cityMember name="Cambridge" 
+                 xlink:type="simple"
+                 xlink:title="Trinity Lane"
+                 xlink:href="http://www.foo.net/cgi-bin/wfs?FeatureID=C10239"
+                 gml:remoteSchema="city.xsd#xpointer(//complexType[@name='RoadType'])"/>
+    </CityModel>
+    EOS
+    
+    @doc = xp.parse
+  end
+  
+  def teardown()
+    @doc = nil
+  end
+  
+  def city_member
+    @doc.find('/city:CityModel/city:cityMember').first
+  end
+
+  def test_attributes
+    attributes = city_member.attributes
+    assert_instance_of(XML::Attributes, attributes)
+    assert_equal(5, attributes.length)
+  end
+  
+  def test_each
+    attributes = city_member.attributes
+    length = attributes.inject(0) do |result, attr|
+      assert_instance_of(XML::Attr, attr)
+      result + 1
+    end
+    assert_equal(5, length)
+  end
+
+  def test_get_attribute
+    attributes = city_member.attributes
+    
+    attr = attributes.get_attribute('name')
+    assert_instance_of(XML::Attr, attr)
+    
+    attr = attributes.get_attribute('does_not_exist')
+    assert_nil(attr)
+    
+    attr = attributes.get_attribute('name')
+    assert_instance_of(XML::Attr, attr)
+    
+    attr = attributes.get_attribute('href')
+    assert_instance_of(XML::Attr, attr)
+    assert_instance_of(XML::NS, attr.ns)
+    assert_equal('xlink', attr.ns.prefix)
+    assert_equal('http://www.w3.org/1999/xlink', attr.ns.href)
+    
+    attr = attributes.get_attribute_ns('http://www.w3.org/1999/xlink', 'href')
+    assert_instance_of(XML::Attr, attr)
+    
+    attr = attributes.get_attribute_ns('http://www.opengis.net/gml', 'remoteSchema')
+    assert_instance_of(XML::Attr, attr)
+    
+    attr = attributes.get_attribute_ns('http://i.dont.exist', 'nor do i')
+    assert_nil(attr)
+  end
+  
+  def test_get_values
+    assert_equal('Cambridge', city_member[:name])
+    assert_equal('http://www.foo.net/cgi-bin/wfs?FeatureID=C10239', city_member[:href])
+    
+    attributes = city_member.attributes
+    assert_equal('Cambridge', attributes[:name])
+    assert_equal('http://www.foo.net/cgi-bin/wfs?FeatureID=C10239', attributes[:href])
+  end
+  
+  def test_set_values
+    city_member[:name] = 'London'
+    assert_equal('London', city_member[:name])
+    
+    city_member[:href] = 'foo'
+    assert_equal('foo', city_member[:href])
+    
+    attributes = city_member.attributes
+    
+    attributes[:name] = 'London'
+    assert_equal('London', attributes[:name])
+    
+    attributes[:href] = 'foo'
+    assert_equal('foo', attributes[:href])
+  end
+  
+  def test_str_sym()
+    attributes = city_member.attributes
+    assert_equal('Cambridge', attributes[:name])
+    assert_equal('Cambridge', attributes['name'])
+  end
+end

data/test/tc_xml_document.rb

@@ -27,25 +27,25 @@ class TC_XML_Document < Test::Unit::TestCase
   def test_ruby_xml_document_compression()
     if XML::Parser::enabled_zlib?
       0.upto(9) do |i|
-	assert_equal(i, @doc.compression = i)
-	assert_equal(i, @doc.compression)
+        assert_equal(i, @doc.compression = i)
+        assert_equal(i, @doc.compression)
       end
 
       9.downto(0) do |i|
-	assert_equal(i, @doc.compression = i)
-	assert_equal(i, @doc.compression)
+  assert_equal(i, @doc.compression = i)
+  assert_equal(i, @doc.compression)
       end
 
       10.upto(20) do |i|
-	# assert_equal(9, @doc.compression = i)
-	assert_equal(i, @doc.compression = i) # This works around a bug in Ruby 1.8
-	assert_equal(9, @doc.compression)
+  # assert_equal(9, @doc.compression = i)
+  assert_equal(i, @doc.compression = i) # This works around a bug in Ruby 1.8
+  assert_equal(9, @doc.compression)
       end
 
       -1.downto(-10) do |i|
-	# assert_equal(0, @doc.compression = i)
-	assert_equal(i, @doc.compression = i) # FIXME This bug should get fixed ASAP
-	assert_equal(0, @doc.compression)
+  # assert_equal(0, @doc.compression = i)
+  assert_equal(i, @doc.compression = i) # FIXME This bug should get fixed ASAP
+  assert_equal(0, @doc.compression)
       end
     end # if ...enabled_zlib?
   end # test_ruby_xml_document_compression()

data/test/tc_xml_document_write3.rb

@@ -62,7 +62,7 @@ class TC_XML_Document_Write3 < Test::Unit::TestCase
     xml << "<rubynet xmlns:xlink=\"http://www.w3.org/1999/xlink\">\n"
     xml << "  <pkg/>\n"
     xml << "</rubynet>\n"
-    @doc['xmlns:xlink'] = "http://www.w3.org/1999/xlink"
+    @doc.root['xmlns:xlink'] = "http://www.w3.org/1999/xlink"
     pkg = @doc.root.child = XML::Node.new('pkg')
     assert_equal(xml, @doc.to_s)
   end

data/test/tc_xml_dtd.rb

@@ -0,0 +1,49 @@
+require "libxml"
+require 'test/unit'
+
+class TestDtd < Test::Unit::TestCase
+  def setup
+    xp = XML::Parser.string(<<-EOS)
+      <root>
+        <head a="ee" id="1">Colorado</head>
+        <descr>Lots of nice mountains</descr>
+      </root>
+    EOS
+    @doc = xp.parse
+  end
+  
+  def teardown
+    @doc = nil
+  end
+  
+  def dtd
+    XML::Dtd.new(<<-EOS)
+      <!ELEMENT root (head, descr)>
+      <!ELEMENT head (#PCDATA)>
+      <!ATTLIST head
+        id NMTOKEN #REQUIRED
+        a CDATA #IMPLIED
+      >
+      <!ELEMENT descr (#PCDATA)>
+    EOS
+  end
+  
+  def test_valid
+    assert(@doc.validate(dtd))
+  end
+  
+  def test_invalid
+    new_node = XML::Node.new('invalid', 'this will mess up validation')
+    @doc.root.child_add(new_node)
+    
+    messages = Hash.new
+    assert(!@doc.validate(dtd) do |message, error|
+      messages[message] = error
+    end)
+
+    expected = {"No declaration for element invalid\n" => true,
+                "Element root content does not follow the DTD, expecting (head , descr), got (head descr invalid)\n" => true}
+      
+    assert_equal(expected, messages)
+  end
+end

data/test/tc_xml_html_parser.rb

@@ -54,10 +54,10 @@ class TC_XML_HTMLParser < Test::Unit::TestCase
     assert_equal 'World', world.content
   end
 
-  def test_libxml_html_parser_parser_context()
+  def test_libxml_html_parser_context()
     doc = @xp.parse
     assert_instance_of(XML::Document, doc)
-    assert_instance_of(XML::Parser::Context, @xp.parser_context)
-	assert @xp.parser_context.html?
+    assert_instance_of(XML::Parser::Context, @xp.context)
+  assert @xp.context.html?
   end
 end # TC_XML_HTMLParser

data/test/tc_xml_node.rb

@@ -1,59 +1,95 @@
 require "libxml"
 require 'test/unit'
 
-class TC_XML_Node < Test::Unit::TestCase
-  def setup()
+class TestNode < Test::Unit::TestCase
+  def setup
     xp = XML::Parser.new()
     str = '<ruby_array uga="booga" foo="bar"><fixnum>one</fixnum><fixnum>two</fixnum></ruby_array>'
     assert_equal(str, xp.string = str)
-    doc = xp.parse
-    assert_instance_of(XML::Document, doc)
-    @root = doc.root
-    assert_instance_of(XML::Node, @root)
-    set = doc.find('/ruby_array/fixnum')
-    assert_instance_of(XML::XPath::Object, set)
-    assert_raise(NoMethodError) {
-      xpt = set.xpath
-    }
-    @nodes = []
-    set.each do |n|
-      @nodes.push(n)
-    end
+    @doc = xp.parse
   end
-
-  def teardown()
-    @nodes = nil
-    @root = nil
+  
+  def teardown
+    @doc = nil
+  end
+  
+  def nodes
+    @doc.find('/ruby_array/fixnum')
   end
 
-  def test_libxml_node_class()
-    for n in @nodes
+  def test_doc_class
+    assert_instance_of(XML::Document, @doc)
+  end
+  
+  def test_root_class
+    assert_instance_of(XML::Node, @doc.root)
+  end
+  
+  def test_node_class
+    for n in nodes
       assert_instance_of(XML::Node, n)
     end
   end
 
-  def test_libxml_node_child_get()
-    assert_instance_of(TrueClass, @root.child?)
-    assert_instance_of(XML::Node, @root.child)
-    assert_equal('fixnum', @root.child.name)
+  def test_find_class
+    set = @doc.find('/ruby_array/fixnum')
+    assert_instance_of(XML::XPath::Object, set)
   end
 
-  def test_libxml_node_doc()
-    for n in @nodes
+  def test_node_child_get
+    assert_instance_of(TrueClass, @doc.root.child?)
+    assert_instance_of(XML::Node, @doc.root.child)
+    assert_equal('fixnum', @doc.root.child.name)
+  end
+
+  def test_node_doc
+    for n in nodes
       assert_instance_of(XML::Document, n.doc) if n.document?
     end
   end
 
-  def test_libxml_node_type_name()
-    assert_equal('element', @nodes[0].node_type_name)
-    assert_equal('element', @nodes[1].node_type_name)
+  def test_node_type_name
+    assert_equal('element', nodes[0].node_type_name)
+    assert_equal('element', nodes[1].node_type_name)
   end
 
-  def test_libxml_node_find()
-    set = @root.find('./fixnum').set
+  def test_node_find
+    set = @doc.root.find('./fixnum').set
     assert_instance_of(XML::Node::Set, set)
     for node in set
       assert_instance_of(XML::Node, node)
     end
   end
-end # TC_XML_Document
+  
+  def test_equality
+    node_a = @doc.find('/ruby_array/fixnum').first
+    node_b = @doc.root.child
+    assert(node_a == node_b)
+    assert(node_a.eql?(node_b))
+    assert(node_a.equal?(node_b))
+    
+    xp2 = XML::Parser.new()
+    xp2.string = '<ruby_array uga="booga" foo="bar"><fixnum>one</fixnum><fixnum>two</fixnum></ruby_array>'
+    doc2 = xp2.parse
+
+    node_a2 = doc2.find('/ruby_array/fixnum').first
+    
+    assert(node_a.to_s == node_a2.to_s)
+    assert(node_a == node_a2)
+    assert(node_a.eql?(node_a2))
+    assert(!node_a.equal?(node_a2))
+  end
+      
+  def test_content()
+    assert_equal('onetwo', @doc.root.content)
+    
+    first = @doc.root.child
+    assert_equal('one', first.content)
+    assert_equal('two', first.next.content)
+  end
+  
+  def test_base
+    doc = XML::Parser.string('<person />').parse
+    assert_nil(doc.root.base)
+  end
+end