libxml-ruby 0.3.6

data/ext/xml/ruby_xml_xpath_context.h

@@ -0,0 +1,24 @@
+/* $Id: ruby_xml_xpath_context.h,v 1.1 2006/02/21 20:40:16 roscopeco Exp $ */
+
+/* Please see the LICENSE file for copyright and distribution information */
+
+#ifndef __RUBY_XML_XPATH_CONTEXT__
+#define __RUBY_XML_XPATH_CONTEXT__
+
+VALUE cXMLXPathContext;
+
+typedef struct ruby_xml_xpath_context {
+  VALUE xd;
+  xmlXPathContextPtr ctxt;
+} ruby_xml_xpath_context;
+
+void ruby_xml_xpath_context_free(ruby_xml_xpath_context *rxxpc);
+VALUE ruby_xml_xpath_context_new(VALUE class, VALUE xd,
+				 xmlXPathContextPtr ctxt);
+VALUE ruby_xml_xpath_context_new2(VALUE xd, xmlXPathContextPtr ctxt);
+VALUE ruby_xml_xpath_context_new3(VALUE xd);
+VALUE ruby_xml_xpath_context_new4(VALUE rnode);
+VALUE ruby_xml_xpath_context_register_namespace(VALUE self, VALUE prefix, VALUE uri);
+void ruby_init_xml_xpath_context(void);
+
+#endif

data/ext/xml/ruby_xml_xpointer.c

@@ -0,0 +1,100 @@
+/* $Id: ruby_xml_xpointer.c,v 1.1 2006/02/21 20:40:16 roscopeco Exp $ */
+
+/* Please see the LICENSE file for copyright and distribution information */
+
+#include "libxml.h"
+#include "ruby_xml_xpointer.h"
+
+VALUE cXMLXPointer;
+VALUE eXMLXPointerInvalidExpression;
+
+VALUE
+ruby_xml_xpointer_point(VALUE class, VALUE rnode, VALUE xptr_str) {
+#ifdef LIBXML_XPTR_ENABLED
+  ruby_xml_node *node;
+  ruby_xml_xpath_context *xxpc;
+  VALUE rxptr_xpth_ctxt, rxxp;
+  xmlXPathObjectPtr xpath;
+
+  Check_Type(xptr_str, T_STRING);
+  if (rb_obj_is_kind_of(rnode, cXMLNode) == Qfalse)
+    rb_raise(rb_eTypeError, "require an XML::Node object");
+
+  Data_Get_Struct(rnode, ruby_xml_node, node);
+
+  rxptr_xpth_ctxt = ruby_xml_xpath_context_new(cXMLXPathContext, node->xd,
+					       xmlXPtrNewContext(node->node->doc, node->node, NULL));
+  if (NIL_P(rxptr_xpth_ctxt))
+    return(Qnil);
+  Data_Get_Struct(rxptr_xpth_ctxt, ruby_xml_xpath_context, xxpc);
+
+  xpath = xmlXPtrEval((xmlChar*)StringValuePtr(xptr_str), xxpc->ctxt);
+  if (xpath == NULL)
+    rb_raise(eXMLXPointerInvalidExpression, "invalid xpointer expression");
+
+  rxxp = ruby_xml_xpath_new(cXMLXPath, node->xd, rxptr_xpth_ctxt, xpath);
+  return(rxxp);
+#else
+  rb_warn("libxml was compiled without XPointer support");
+  return(Qfalse);
+#endif
+}
+
+
+VALUE
+ruby_xml_xpointer_point2(VALUE node, VALUE xptr_str) {
+  return(ruby_xml_xpointer_point(cXMLXPointer, node, xptr_str));
+}
+
+
+/*
+ * call-seq:
+ *    XML::XPointer.range(start_node, end_node) => xpath
+ * 
+ * Create an xpath representing the range between the supplied
+ * start and end node.
+ */
+VALUE
+ruby_xml_xpointer_range(VALUE class, VALUE rstart, VALUE rend) {
+#ifdef LIBXML_XPTR_ENABLED
+  ruby_xml_node *start, *end;
+  VALUE rxxp;
+  xmlXPathObjectPtr xpath;
+
+  if (rb_obj_is_kind_of(rstart, cXMLNode) == Qfalse)
+    rb_raise(rb_eTypeError, "require an XML::Node object as a starting point");
+  if (rb_obj_is_kind_of(rend, cXMLNode) == Qfalse)
+    rb_raise(rb_eTypeError, "require an XML::Node object as an ending point");
+
+  Data_Get_Struct(rstart, ruby_xml_node, start);
+  if (start->node == NULL)
+    return(Qnil);
+
+  Data_Get_Struct(rend, ruby_xml_node, end);
+  if (end->node == NULL)
+    return(Qnil);
+
+  xpath = xmlXPtrNewRangeNodes(start->node, end->node);
+  if (xpath == NULL)
+    rb_fatal("You shouldn't be able to have this happen");
+
+  rxxp = ruby_xml_xpath_new(cXMLXPath, start->xd, Qnil, xpath);
+  return(rxxp);
+#else
+  rb_warn("libxml was compiled without XPointer support");
+  return(Qfalse);
+#endif
+}
+
+// Rdoc needs to know 
+#ifdef RDOC_NEVER_DEFINED
+  mXML = rb_define_module("XML");
+#endif
+
+void
+ruby_init_xml_xpointer(void) {
+  cXMLXPointer = rb_define_class_under(mXML, "XPointer", rb_cObject);
+  eXMLXPointerInvalidExpression = rb_define_class_under(cXMLXPointer, "InvalidExpression", rb_eException);
+
+  rb_define_singleton_method(cXMLXPointer, "range", ruby_xml_xpointer_range, 2);
+}

data/ext/xml/ruby_xml_xpointer.h

@@ -0,0 +1,27 @@
+/* $Id: ruby_xml_xpointer.h,v 1.1 2006/02/21 20:40:16 roscopeco Exp $ */
+
+/* Please see the LICENSE file for copyright and distribution information */
+
+#ifndef __RUBY_XML_XPOINTER__
+#define __RUBY_XML_XPOINTER__
+
+extern VALUE cXMLXPointer;
+extern VALUE eXMLXPointerInvalidExpression;
+
+typedef struct ruby_xml_xpointer {
+  VALUE xd;
+  VALUE ctxt;
+  /*
+   * This needs to go into a xpointer data struct:
+   *
+   * xmlLocationSetPtr xptr;
+   *
+   * I also need an xpointer data struct type.
+  */
+} ruby_xml_xpointer;
+
+VALUE ruby_xml_xpointer_point(VALUE class, VALUE node, VALUE xptr_string);
+VALUE ruby_xml_xpointer_point2(VALUE node, VALUE xptr_string);
+void ruby_init_xml_xpointer(void);
+
+#endif

data/ext/xml/ruby_xml_xpointer_context.c

@@ -0,0 +1,22 @@
+/* $Id: ruby_xml_xpointer_context.c,v 1.1 2006/02/21 20:40:16 roscopeco Exp $ */
+
+/* Please see the LICENSE file for copyright and distribution information */
+
+#include "libxml.h"
+#include "ruby_xml_xpointer_context.h"
+
+VALUE cXMLXPointerContext;
+VALUE eXMLXPointehContextInvalidPath;
+VALUE eXMLXPointerContextInvalidPath;
+
+// Rdoc needs to know 
+#ifdef RDOC_NEVER_DEFINED
+  mXML = rb_define_module("XML");
+  cXMLXPointer = rb_define_class_under(mXML, "XPointer", rb_cObject);
+#endif
+
+void
+ruby_init_xml_xpointer_context(void) {
+  cXMLXPointerContext = rb_define_class_under(cXMLXPointer, "Context", cXMLXPathContext);
+  eXMLXPointerContextInvalidPath = rb_define_class_under(cXMLXPointerContext, "InvalidPath", rb_eException);
+}

data/ext/xml/ruby_xml_xpointer_context.h

@@ -0,0 +1,18 @@
+/* $Id: ruby_xml_xpointer_context.h,v 1.1 2006/02/21 20:40:16 roscopeco Exp $ */
+
+/* Please see the LICENSE file for copyright and distribution information */
+
+#ifndef __RUBY_XML_XPOINTER_CONTEXT__
+#define __RUBY_XML_XPOINTER_CONTEXT__
+
+extern VALUE cXMLXPointerContext;
+extern VALUE eXMLXPointerContextInvalidPath;
+
+typedef struct ruby_xml_xpointer_context {
+  VALUE xd;
+  xmlXPathContextPtr ctxt;
+} ruby_xml_xpointer_context;
+
+void ruby_init_xml_xpointer_context(void);
+
+#endif

data/tests/copy_bug.rb

@@ -0,0 +1,21 @@
+#!/usr/bin/ruby -w -I.
+
+require "#{File.dirname(__FILE__)}/../ext/xml/libxml" unless defined?(XML)
+
+def test( doc2 )
+  doc = XML::Document.new('1.0')
+  doc.root = XML::Node.new("ccc")
+  doc.root['aaa'] = 'aaa'
+  #doc.root << doc2.root # BUG!
+  doc.root << doc2.root.copy(true)
+  return doc
+end
+
+def test2
+  doc2 = XML::Document.new('1.0')
+  doc2.root = XML::Node.new("aaa")
+  test( doc2 )
+end
+
+1000.times { |i| puts i.to_s
+                test2 }

data/tests/dtd-test.rb

@@ -0,0 +1,24 @@
+require "#{File.dirname(__FILE__)}/../ext/xml/libxml" unless defined?(XML)
+
+xp = XML::Parser.new
+xp.string = '<?xml version="1.0" encoding="utf-8"?>
+<root><head a="ee" id="1">ass<buzz/></head><descr>really big ass</descr></root>'
+
+doc = xp.parse
+
+dtd = XML::Dtd.new('
+<!ELEMENT root (head, descr)>
+<!ELEMENT head (#PCDATA)>
+<!ATTLIST head
+  id NMTOKEN #REQUIRED
+  a CDATA #IMPLIED
+>
+<!ELEMENT descr (#PCDATA)>
+')
+
+if doc.validate(dtd) { |message, error| puts "#{error ? 'error' : 'warning'} : #{message}" } 
+  puts "validation passed"
+else
+  puts "validation failed"
+end
+

data/tests/model/rubynet.xml

@@ -0,0 +1,78 @@
+<rubynet xmlns:xlink="http://www.w3.org/1999/xlink">
+  <pkg version="1.0">
+    <meta>
+      <pkgname>REXML</pkgname>
+      <authors>
+        <author>
+          <name>Aaron Malone</name>
+          <email>aaron@munge.net</email>
+          <irc_network>irc.opentprojects.org</irc_network>
+          <irc_channel>#ruby-lang</irc_channel>
+          <irc_handle>AAmalone</irc_handle>
+        </author>
+      </authors>
+      <maintainers>
+        <maintainer>
+          <name>Tools Team</name>
+          <email>tools@gentoo.org</email>
+          <irc_network>irc.opentprojects.org</irc_network>
+          <irc_channel>#ruby-lang</irc_channel>
+          <irc_handle>TinyT</irc_handle>
+        </maintainer>
+      </maintainers>
+      <categories>
+
+        <!-- For pieces of data that are repeated constnatly, could we
+	use XLink to centralize some of these definitions?  If we move
+	stuff around on rubynet.org, we don't want to have to do a
+	search/replace: just update the entity, IMHO. -->
+
+        <major_category xlink:type="simple" xlink:href="http://www.rubynet.org/category/xml/">XML</major_category>
+        <minor_category xlink:type="simple" xlink:href="http://www.rubynet.org/category/text%20processing/">Text Processing</minor_category>
+        <minor_category xlink:type="simple" xlink:href="http://www.rubynet.org/category/storage/">Storage</minor_category>
+      </categories>
+      <version>
+        <major_version>1</major_version>
+        <minor_version>2</minor_version>
+        <micro_version>3</micro_version>
+      </version>
+      <copyright>1999-2002 Gentoo Technologies,Inc.</copyright>
+      <license>Ruby</license>
+      <status>Stable</status>
+      <full_name>Ruby Electric XML</full_name>
+      <description>Pure Ruby parser, blah blah. Based of Electrice XML</description>
+      <homepage xlink:type="simple" xlink:href="http://www.germane-software.com/~ser/Software/rexml/">REXML Home</homepage>
+      <download xlink:type="simple" xlink:href="http://www.germane-software.com/~ser/Software/rexml/rexml-1.2.3.bz2/">REXML Download</download>
+    </meta>
+    <dependencies>
+      <dependency name="ruby" uri="http://www.rubynet.org/packages/ruby/">
+        <required_version restriction="no-lower-than">
+          <version>
+            <major_version>1</major_version>
+            <minor_version>6</minor_version>
+            <micro_version>0</micro_version>
+          </version>
+        </required_version>
+      </dependency>
+    </dependencies>
+    <files>
+      <file>
+        <filename>uga.rb</filename>
+	<mode>0444</mode>
+	<content encoding="xml">... the file here</content>
+      </file>
+      <file>
+        <filename>booga.h</filename>
+	<mode>0444</mode>
+	<content encoding="xml">... the file here</content>
+      </file>
+      <file>
+        <filename>foo.so</filename>
+	<mode>0555</mode>
+	<!-- Encode routine: str.to_a.pack('m')
+	     Decode routine: str.unpack('m')    -->
+	<content encoding="mime64">Li4uIHRoZSBmaWxlIGhlcmU=\n</content>
+      </file>
+    </files>
+  </pkg>
+</rubynet>

data/tests/model/rubynet_project

@@ -0,0 +1,13 @@
+# $Id: rubynet_project,v 1.1 2005/12/19 19:53:07 roscopeco Exp $
+
+copyright:	2001-2003, rubynet.org
+description:	Ruby bindings for the libxml2 library.  The API for this
+		module is hopefully similar to REXML, which is based on
+		the Electric XML library (some java lib???).
+download:	http://www.rubynet.org/modules/xml/libxml/
+full_name:	libxml
+homepage:	http://www.rubynet.org/modules/xml/libxml/
+license:	BSD style license
+pkgname:	libxml
+rubynet_url:	http://www.rubynet.org/modules/xml/libxml/
+status:		stable

data/tests/model/xinclude.xml

@@ -0,0 +1,5 @@
+<?xml version="1.0"?>
+<document xmlns:xi="http://www.w3.org/2001/XInclude">
+  <p>This libxml2 binding has the following project information:
+   <code><xi:include href="rubynet_project" parse="text"/></code></p>
+</document>

data/tests/runner.rb

@@ -0,0 +1,13 @@
+#!/usr/bin/env ruby
+#
+# Allsuite for Eclipse and GEM.
+
+ALL_TESTS = true
+TESTS = File.expand_path(File.dirname(__FILE__))
+HOME = File.expand_path(File.join(TESTS,'../ext/xml'))
+
+#$LOAD_PATH.unshift(HOME)
+require "#{HOME}/libxml"
+
+glob = File.join(TESTS, ENV['TESTS'] || 'tc_*.rb')
+Dir[glob].each { |fn| require fn }

data/tests/schema-test.rb

@@ -0,0 +1,74 @@
+require "#{File.dirname(__FILE__)}/../ext/xml/libxml" unless defined?(XML)
+
+xp = XML::Parser.new
+xp.string = '<?xml version="1.0" encoding="utf-8"?>
+
+<shiporder orderid="889923"
+xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+xsi:noNamespaceSchemaLocation="shiporder.xsd">
+ <orderperson>John Smith</orderperson>
+ <shipto>
+  <name>Ola Nordmann</name>
+  <address>Langgt 23</address>
+  <city>4000 Stavanger</city>
+  <country>Norway</country>
+ </shipto>
+ <item>
+  <title>Empire Burlesque</title>
+  <note>Special Edition</note>
+  <quantity>1</quantity>
+  <price>10.90</price>
+ </item>
+ <item>
+  <title>Hide your heart</title>
+  <quantity>1</quantity>
+  <price>9.90</price>
+ </item>
+</shiporder>
+'
+
+doc = xp.parse
+
+schema = XML::Schema.from_string('<?xml version="1.0" encoding="ISO-8859-1" ?>
+<xs:schema xmlns:xs="http://www.w3.org/2001/XMLSchema">
+
+<xs:element name="shiporder">
+ <xs:complexType>
+  <xs:sequence>
+   <xs:element name="orderperson" type="xs:string"/>
+   <xs:element name="shipto">
+    <xs:complexType>
+     <xs:sequence>
+      <xs:element name="name" type="xs:string"/>
+      <xs:element name="address" type="xs:string"/>
+      <xs:element name="city" type="xs:string"/>
+      <xs:element name="country" type="xs:string"/>
+     </xs:sequence>
+    </xs:complexType>
+   </xs:element>
+   <xs:element name="item" maxOccurs="unbounded">
+    <xs:complexType>
+     <xs:sequence>
+      <xs:element name="title" type="xs:string"/>
+      <xs:element name="note" type="xs:string" minOccurs="0"/>
+      <xs:element name="quantity" type="xs:positiveInteger"/>
+      <xs:element name="price" type="xs:decimal"/>
+     </xs:sequence>
+    </xs:complexType>
+   </xs:element>
+  </xs:sequence>
+  <xs:attribute name="orderid" type="xs:string" use="required"/>
+ </xs:complexType>
+</xs:element>
+
+</xs:schema>
+')
+
+p schema
+
+if doc.validate_schema(schema) { |message, error| puts "#{error ? 'error' : 'warning'} : #{message}" } 
+  puts "validation passed"
+else
+  puts "validation failed"
+end
+

data/tests/tc_xml_document.rb

@@ -0,0 +1,51 @@
+# $Id: tc_xml_document.rb,v 1.2 2006/02/21 20:40:16 roscopeco Exp $
+require 'test/unit'
+require "#{File.dirname(__FILE__)}/../ext/xml/libxml" unless defined?(XML)
+
+class TC_XML_Document < Test::Unit::TestCase
+  def setup()
+    xp = XML::Parser.new()
+    assert_instance_of(XML::Parser, xp)
+    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)
+  end
+
+  def teardown()
+    @doc = nil
+  end
+
+  def test_libxml_document_find()
+    set = @doc.find('/ruby_array/fixnum')
+    assert_instance_of(XML::Node::Set, set)
+    xpt = set.xpath
+    assert_instance_of(XML::XPath, xpt)
+  end
+
+  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)
+      end
+
+      9.downto(0) do |i|
+	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)
+      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)
+      end
+    end # if ...enabled_zlib?
+  end # test_ruby_xml_document_compression()
+end # TC_XML_Document