libxml-ruby 0.5.4 → 0.6.0

data/test/tc_xml_sax_parser.rb

@@ -1,94 +1,104 @@
-require 'libxml'
-require 'test/unit'
-
-# TODO this is woefully inadequate
-
-class TC_XML_SaxParser2 < Test::Unit::TestCase
-  class TestCaseCallbacks
-    include XML::SaxParser::Callbacks
-
-    attr_accessor :test
-
-    def initialize
-      @test = Hash.new { |h,k| h[k] = [] }
-      @i = 0
-    end
-
-    def on_start_document
-      @test[:startdoc] << @i+=1
-    end
-
-    def on_start_element(name, attr_hash)
-      @test[:startel] << [@i+=1,name,attr_hash]
-    end
-
-    def on_characters(chars)
-      @test[:chars] << [@i+=1,chars]
-    end
-
-    def on_comment(msg)
-      @test[:comment] << [@i+=1,msg]
-    end
-
-    def on_processing_instruction(target, data)
-      @test[:pinstr] << [@i+=1, target, data]
-    end
-
-    def on_cdata_block(cdata)
-      @test[:cdata] << [@i+=1,cdata]
-    end
-
-    def on_end_element(name)
-      @test[:endel] << [@i+=1,name]
-    end
-
-    def on_end_document
-      @test[:enddoc] << @i+=1
-    end
-  end
-
-  def setup()
-    @xp = XML::SaxParser.new
-  end
-
-  def teardown()
-    @xp = nil
-  end
-
-  def test_string_without_callbacks
-    @xp.string = File.read(File.join(File.dirname(__FILE__), 'model/saxtest.xml'))
-    assert_equal true, @xp.parse
-  end
-
-  def test_file_without_callbacks
-    @xp.filename = File.join(File.dirname(__FILE__), 'model/saxtest.xml')
-    assert_equal true, @xp.parse
-  end
-
-  def test_callbacks_with_string
-    @xp.callbacks = TestCaseCallbacks.new
-    @xp.string = File.read(File.join(File.dirname(__FILE__), 'model/saxtest.xml'))
-    do_test
-  end
-
-  def test_callbacks_with_file
-    @xp.callbacks = TestCaseCallbacks.new
-    @xp.filename = File.join(File.dirname(__FILE__), 'model/saxtest.xml')
-    do_test
-  end
-
-  def do_test
-    @xp.parse
-
-    assert_equal [1], @xp.callbacks.test[:startdoc]
-    assert_equal [[2,'test',{'uga'=>'booga','foo'=>'bar'}],[3,'fixnum',{}],[6,'fixnum',{}]],
-                 @xp.callbacks.test[:startel]
-    assert_equal [[4,'one'],[7,'two'],[9,"\n  "],[11,"\n  "],[13,"\n  "],[15,"\n"]],
-                 @xp.callbacks.test[:chars]
-    assert_equal [[10, ' msg ']], @xp.callbacks.test[:comment]
-    assert_equal [[12, 'custom', 'foo="bar"']], @xp.callbacks.test[:pinstr]
-    assert_equal [[14, 'here it goes']], @xp.callbacks.test[:cdata]
-    assert_equal [[5,'fixnum'],[8,'fixnum'],[16,'test']], @xp.callbacks.test[:endel]
-    assert_equal [17], @xp.callbacks.test[:enddoc]
-  end
-end # TC_XML_Sax_Parser
+require 'libxml'
+require 'test/unit'
+
+# TODO this is woefully inadequate
+
+class TC_XML_SaxParser2 < Test::Unit::TestCase
+  class TestCaseCallbacks
+    include XML::SaxParser::Callbacks
+
+    attr_accessor :test
+
+    def initialize
+      @test = Hash.new { |h,k| h[k] = [] }
+      @i = 0
+    end
+
+    def on_start_document
+      @test[:startdoc] << @i+=1
+    end
+
+    def on_start_element(name, attr_hash)
+      @test[:startel] << [@i+=1,name,attr_hash]
+    end
+
+    def on_characters(chars)
+      @test[:chars] << [@i+=1,chars]
+    end
+
+    def on_comment(msg)
+      @test[:comment] << [@i+=1,msg]
+    end
+
+    def on_processing_instruction(target, data)
+      @test[:pinstr] << [@i+=1, target, data]
+    end
+
+    def on_cdata_block(cdata)
+      @test[:cdata] << [@i+=1,cdata]
+    end
+
+    def on_end_element(name)
+      @test[:endel] << [@i+=1,name]
+    end
+
+    def on_end_document
+      @test[:enddoc] << @i+=1
+    end
+  end
+
+  def setup()
+    @xp = XML::SaxParser.new
+  end
+
+  def teardown()
+    @xp = nil
+  end
+
+  def test_string_without_callbacks
+    @xp.string = File.read(File.join(File.dirname(__FILE__), 'model/saxtest.xml'))
+    assert_equal true, @xp.parse
+  end
+
+  def test_file_without_callbacks
+    @xp.filename = File.join(File.dirname(__FILE__), 'model/saxtest.xml')
+    assert_equal true, @xp.parse
+  end
+
+  def test_callbacks_with_string
+    @xp.callbacks = TestCaseCallbacks.new
+    @xp.string = File.read(File.join(File.dirname(__FILE__), 'model/saxtest.xml'))
+    do_test
+  end
+
+  def test_callbacks_with_file
+    @xp.callbacks = TestCaseCallbacks.new
+    @xp.filename = File.join(File.dirname(__FILE__), 'model/saxtest.xml')
+    do_test
+  end
+
+  def do_test
+    @xp.parse
+    assert_equal [1], @xp.callbacks.test[:startdoc]
+    assert_equal [[2,'test',{'uga'=>'booga','foo'=>'bar'}],[3,'fixnum',{}],[6,'fixnum',{}]],
+                 @xp.callbacks.test[:startel]
+    assert_equal [[4,'one'],[7,'two'],[9,"\n  "],[11,"\n  "],[13,"\n  "],[15,"\n"]],
+                 @xp.callbacks.test[:chars]
+    assert_equal [[10, ' msg ']], @xp.callbacks.test[:comment]
+    assert_equal [[12, 'custom', 'foo="bar"']], @xp.callbacks.test[:pinstr]
+    assert_equal [[14, 'here it goes']], @xp.callbacks.test[:cdata]
+    assert_equal [[5,'fixnum'],[8,'fixnum'],[16,'test']], @xp.callbacks.test[:endel]
+    assert_equal [17], @xp.callbacks.test[:enddoc]
+  end
+  
+  def test_doctype
+    @xp.callbacks = TestCaseCallbacks.new
+    @xp.string = <<-EOS
+      <?xml version="1.0" encoding="UTF-8"?>
+      <!DOCTYPE ONIXmessage SYSTEM "http://www.editeur.org/onix/2.1/short/onix-international.dtd">
+      <ONIXmessage release="2.1">
+      </ONIXmessage>
+    EOS
+    @xp.parse
+  end
+end # TC_XML_Sax_Parser

data/test/tc_xml_sax_parser2.rb

@@ -0,0 +1,51 @@
+require 'libxml'
+require 'test/unit'
+
+# TODO this is woefully inadequate
+
+class TC_XML_SaxParser2 < Test::Unit::TestCase
+  def setup()
+    @xp = XML::SaxParser.new
+  end
+
+  def teardown()
+    @xp = nil
+  end
+
+  def test_string_without_callbacks
+    @xp.string = File.read(File.join(File.dirname(__FILE__), 'model/saxtest.xml'))
+    assert_equal true, @xp.parse
+  end
+
+  def test_file_without_callbacks
+    @xp.filename = File.join(File.dirname(__FILE__), 'model/saxtest.xml')
+    assert_equal true, @xp.parse
+  end
+
+  def test_callbacks_with_string
+    @xp.callbacks = TestCaseCallbacks.new
+    @xp.string = File.read(File.join(File.dirname(__FILE__), 'model/saxtest.xml'))
+    do_test
+  end
+
+  def test_callbacks_with_file
+    @xp.callbacks = TestCaseCallbacks.new
+    @xp.filename = File.join(File.dirname(__FILE__), 'model/saxtest.xml')
+    do_test
+  end
+
+  def do_test
+    @xp.parse
+
+    assert_equal [1], @xp.callbacks.test[:startdoc]
+    assert_equal [[2,'test',{'uga'=>'booga','foo'=>'bar'}],[3,'fixnum',{}],[6,'fixnum',{}]],
+                 @xp.callbacks.test[:startel]
+    assert_equal [[4,'one'],[7,'two'],[9,"\n  "],[11,"\n  "],[13,"\n  "],[15,"\n"]],
+                 @xp.callbacks.test[:chars]
+    assert_equal [[10, ' msg ']], @xp.callbacks.test[:comment]
+    assert_equal [[12, 'custom', 'foo="bar"']], @xp.callbacks.test[:pinstr]
+    assert_equal [[14, 'here it goes']], @xp.callbacks.test[:cdata]
+    assert_equal [[5,'fixnum'],[8,'fixnum'],[16,'test']], @xp.callbacks.test[:endel]
+    assert_equal [17], @xp.callbacks.test[:enddoc]
+  end
+end # TC_XML_Sax_Parser

data/test/tc_xml_xinclude.rb

@@ -1,30 +1,30 @@
-require "libxml"
-require 'test/unit'
-
-class TC_XML_XInclude < Test::Unit::TestCase
-  def setup()
-    @doc = XML::Document.file('test/model/xinclude.xml')
-    assert_instance_of(XML::Document, @doc)
-  end
-
-  def teardown()
-    @doc = nil
-  end
-
-  def test_ruby_xml_xinclude()
-    xinclude_doc =  "<?xml version=\"1.0\"?>\n<document xmlns:xi=\"http://www.w3.org/2001/XInclude\">\n"
-    xinclude_doc << "  <p>This libxml2 binding has the following project information:\n   <code>"
-    msg = ''
-    File.open('test/model/rubynet_project') do |f|
-      for line in f
-        msg << line
-      end
-    end
-    xinclude_doc << msg << "</code></p>\n</document>\n"
-
-    ret = @doc.xinclude
-    assert_equal(1, ret)
-    assert_equal(xinclude_doc, @doc.to_s)
-  end
-end
-
+require "libxml"
+require 'test/unit'
+
+class TC_XML_XInclude < Test::Unit::TestCase
+  def setup()
+    @doc = XML::Document.file('model/xinclude.xml')
+    assert_instance_of(XML::Document, @doc)
+  end
+
+  def teardown()
+    @doc = nil
+  end
+
+  def test_ruby_xml_xinclude()
+    xinclude_doc =  "<?xml version=\"1.0\"?>\n<document xmlns:xi=\"http://www.w3.org/2001/XInclude\">\n"
+    xinclude_doc << "  <p>This libxml2 binding has the following project information:\n   <code>"
+    msg = ''
+    File.open('model/rubynet_project') do |f|
+      for line in f
+        msg << line
+      end
+    end
+    xinclude_doc << msg << "</code></p>\n</document>\n"
+
+    ret = @doc.xinclude
+    assert_equal(1, ret)
+    assert_equal(xinclude_doc, @doc.to_s)
+  end
+end
+

data/test/tc_xml_xpath.rb

@@ -1,38 +1,38 @@
-require "libxml"
-require "test/unit"
-
-class TC_XML_XPath < 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)
-    @xpt = doc.find('/ruby_array/fixnum')
-    assert_instance_of(XML::XPath::Object, @xpt)
-  end
-
-  def teardown()
-    @xpt = nil
-  end
-
-  def test_libxml_xpath_set()
-    set = @xpt.set
-    assert_instance_of(XML::Node::Set, set)
-  end
-
-  def test_ary()
-    assert_equal(2,@xpt.length)
-    assert_equal("one",@xpt.first.content)
-    assert_equal("one",@xpt[0].content)
-    assert_equal("two",@xpt[1].content)
-    assert_equal("two",@xpt[-1].content)
-    assert_equal(nil,@xpt[-3])
-    assert_equal(nil,@xpt[2])
-
-    @xpt.inject(%w(one two).reverse) {|m,v|
-      assert_equal(m.pop,v.content)
-      m
-    }
-  end
-end # TC_XML_Document
+require "libxml"
+require "test/unit"
+
+class TC_XML_XPath < 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)
+    @xpt = doc.find('/ruby_array/fixnum')
+    assert_instance_of(XML::XPath::Object, @xpt)
+  end
+
+  def teardown()
+    @xpt = nil
+  end
+
+  def test_libxml_xpath_set()
+    set = @xpt.set
+    assert_instance_of(XML::Node::Set, set)
+  end
+
+  def test_ary()
+    assert_equal(2,@xpt.length)
+    assert_equal("one",@xpt.first.content)
+    assert_equal("one",@xpt[0].content)
+    assert_equal("two",@xpt[1].content)
+    assert_equal("two",@xpt[-1].content)
+    assert_equal(nil,@xpt[-3])
+    assert_equal(nil,@xpt[2])
+
+    @xpt.inject(%w(one two).reverse) {|m,v|
+      assert_equal(m.pop,v.content)
+      m
+    }
+  end
+end # TC_XML_Document

data/test/tc_xml_xpath2.rb

@@ -0,0 +1,14 @@
+require "libxml"
+require "test/unit"
+require "tempfile"
+
+class TC_XML_XPath2 < Test::Unit::TestCase
+  def test_custom_xpath_function
+    xml = Tempfile.new("xxx")
+    xml.puts("<a/>")
+    xml.close
+
+    doc = XML::Document.file(xml.path)
+    assert_nil(doc.find("//*[name(.)=normalize_space(' a ')]"))
+  end
+end 

data/test/tc_xml_xpointer.rb

@@ -1,78 +1,78 @@
-require "libxml"
-require "test/unit"
-
-class TC_XML_XPointer < Test::Unit::TestCase
-  def setup()
-    xp = XML::Parser.new()
-    str = '<!DOCTYPE ra [<!ELEMENT ra (foo+)><!ATTLIST ra id ID #IMPLIED><!ELEMENT foo (#PCDATA)><!ATTLIST foo id ID #IMPLIED>]><ra id="start"><foo id="one">one</foo><foo id="two">two</foo><foo id="three">three</foo></ra>'
-    assert_equal(str, xp.string = str)
-    @doc = xp.parse
-    assert_instance_of(XML::Document, @doc)
-    @root = @doc.root
-    assert_instance_of(XML::Node, @root)
-  end
-
-  def teardown()
-    @doc = nil
-    @root = nil
-    @xptr = nil
-  end
-
-  def test_libxml_xpointer_id()
-    @xptr = @root.pointer('xpointer(id("two"))')
-    assert_instance_of(XML::XPath::Object, @xptr)
-    set = @xptr.set
-    assert_instance_of(XML::Node::Set, set)
-    for n in set
-      # It seems from the spec that the pointer should
-      # be the whole node, rather than just the ID attr.
-
-      # assert_equal('two', n.to_s)
-
-      assert_instance_of(XML::Node, n)
-      assert_equal('two', n['id'])
-    end
-
-    # FIXME: Not sure at all about this kind of range
-    if ENV['NOTWORKING']
-      @xptr = @root.pointer('xpointer(id("two")) xpointer(id("three"))')
-      assert_instance_of(XML::XPath, @xptr)
-      assert_instance_of(XML::Node::Set, @xptr.set)
-      assert_equal(2, @xptr.set.length)
-      for n in @xptr.set
-        assert_match(/two|three/, n.to_s)
-      end
-    end
-  end
-
-  # FIXME: There is a bug in these ranges...
-  if ENV['NOTWORKING']
-    def test_libxml_xpointer_range()
-      nstart = nend = nil
-      @xptr = @root.pointer('xpointer(id("one"))').set
-      @xptr.each{|n| nstart = n}
-      assert_instance_of(XML::Node, nstart)
-      @xptr = @root.pointer('xpointer(id("three"))').set
-      @xptr.each{|n| nend = n}
-      assert_instance_of(XML::Node, nend)
-      range = XML::XPointer.range(nstart, nend)
-      assert_instance_of(XML::XPath, range)
-      assert_instance_of(XML::Node::Set, range.set)
-
-      for n in range.set
-        assert_match(/one|two|three/, n.to_s)
-      end
-      assert_equal(3, range.set.length)
-    end
-  end
-
-#  def test_libxml_xpointer_start_point()
-#    @xptr = @root.pointer('xpointer(start-point("one"))')
-#    assert_instance_of(XML::XPath, @xptr)
-#    set = @xptr.set
-#    assert_instance_of(XML::Node::Set, set)
-#    for n in set
-#      assert_match(/one|two|three/, n.to_s)
-#    end
-#  end
-end
+require "libxml"
+require "test/unit"
+
+class TC_XML_XPointer < Test::Unit::TestCase
+  def setup()
+    xp = XML::Parser.new()
+    str = '<!DOCTYPE ra [<!ELEMENT ra (foo+)><!ATTLIST ra id ID #IMPLIED><!ELEMENT foo (#PCDATA)><!ATTLIST foo id ID #IMPLIED>]><ra id="start"><foo id="one">one</foo><foo id="two">two</foo><foo id="three">three</foo></ra>'
+    assert_equal(str, xp.string = str)
+    @doc = xp.parse
+    assert_instance_of(XML::Document, @doc)
+    @root = @doc.root
+    assert_instance_of(XML::Node, @root)
+  end
+
+  def teardown()
+    @doc = nil
+    @root = nil
+    @xptr = nil
+  end
+
+  def test_libxml_xpointer_id()
+    @xptr = @root.pointer('xpointer(id("two"))')
+    assert_instance_of(XML::XPath::Object, @xptr)
+    set = @xptr.set
+    assert_instance_of(XML::Node::Set, set)
+    for n in set
+      # It seems from the spec that the pointer should
+      # be the whole node, rather than just the ID attr.
+
+      # assert_equal('two', n.to_s)
+
+      assert_instance_of(XML::Node, n)
+      assert_equal('two', n['id'])
+    end
+
+    # FIXME: Not sure at all about this kind of range
+    if ENV['NOTWORKING']
+      @xptr = @root.pointer('xpointer(id("two")) xpointer(id("three"))')
+      assert_instance_of(XML::XPath, @xptr)
+      assert_instance_of(XML::Node::Set, @xptr.set)
+      assert_equal(2, @xptr.set.length)
+      for n in @xptr.set
+        assert_match(/two|three/, n.to_s)
+      end
+    end
+  end
+
+  # FIXME: There is a bug in these ranges...
+  if ENV['NOTWORKING']
+    def test_libxml_xpointer_range()
+      nstart = nend = nil
+      @xptr = @root.pointer('xpointer(id("one"))').set
+      @xptr.each{|n| nstart = n}
+      assert_instance_of(XML::Node, nstart)
+      @xptr = @root.pointer('xpointer(id("three"))').set
+      @xptr.each{|n| nend = n}
+      assert_instance_of(XML::Node, nend)
+      range = XML::XPointer.range(nstart, nend)
+      assert_instance_of(XML::XPath, range)
+      assert_instance_of(XML::Node::Set, range.set)
+
+      for n in range.set
+        assert_match(/one|two|three/, n.to_s)
+      end
+      assert_equal(3, range.set.length)
+    end
+  end
+
+#  def test_libxml_xpointer_start_point()
+#    @xptr = @root.pointer('xpointer(start-point("one"))')
+#    assert_instance_of(XML::XPath, @xptr)
+#    set = @xptr.set
+#    assert_instance_of(XML::Node::Set, set)
+#    for n in set
+#      assert_match(/one|two|three/, n.to_s)
+#    end
+#  end
+end

data/vc/libxml.sln

@@ -0,0 +1,20 @@
+
+Microsoft Visual Studio Solution File, Format Version 9.00
+# Visual Studio 2005
+Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "libxml", "libxml.vcproj", "{6DCFD1E6-224E-479C-BBD9-B6931DFCD02C}"
+EndProject
+Global
+	GlobalSection(SolutionConfigurationPlatforms) = preSolution
+		Debug|Win32 = Debug|Win32
+		Release|Win32 = Release|Win32
+	EndGlobalSection
+	GlobalSection(ProjectConfigurationPlatforms) = postSolution
+		{6DCFD1E6-224E-479C-BBD9-B6931DFCD02C}.Debug|Win32.ActiveCfg = Debug|Win32
+		{6DCFD1E6-224E-479C-BBD9-B6931DFCD02C}.Debug|Win32.Build.0 = Debug|Win32
+		{6DCFD1E6-224E-479C-BBD9-B6931DFCD02C}.Release|Win32.ActiveCfg = Release|Win32
+		{6DCFD1E6-224E-479C-BBD9-B6931DFCD02C}.Release|Win32.Build.0 = Release|Win32
+	EndGlobalSection
+	GlobalSection(SolutionProperties) = preSolution
+		HideSolutionNode = FALSE
+	EndGlobalSection
+EndGlobal