libxml-ruby 3.2.2-x64-mingw-ucrt

data/ext/libxml/ruby_xml_input_cbg.h

@@ -0,0 +1,20 @@
+#ifndef _INPUT_CBG_
+#define _INPUT_CBG_
+
+void rxml_init_input_callbacks(void);
+
+typedef struct ic_doc_context {
+    char *buffer;
+    char *bpos;
+    int remaining;
+} ic_doc_context;
+
+typedef struct ic_scheme {
+    char *scheme_name;
+    VALUE class;
+    int name_len;
+
+    struct ic_scheme *next_scheme;
+} ic_scheme;
+
+#endif

data/ext/libxml/ruby_xml_io.c

@@ -0,0 +1,47 @@
+/* Please see the LICENSE file for copyright and distribution information */
+
+#include "ruby_libxml.h"
+#include <ruby/io.h>
+
+static ID READ_METHOD;
+static ID WRITE_METHOD;
+
+/* This method is called by libxml when it wants to read
+ more data from a stream. We go with the duck typing
+ solution to support StringIO objects. */
+int rxml_read_callback(void *context, char *buffer, int len)
+{
+  VALUE io = (VALUE) context;
+  VALUE string = rb_funcall(io, READ_METHOD, 1, INT2NUM(len));
+  size_t size;
+
+  if (string == Qnil)
+    return 0;
+
+  size = RSTRING_LEN(string);
+  memcpy(buffer, StringValuePtr(string), size);
+
+  return (int)size;
+}
+
+int rxml_write_callback(VALUE io, const char *buffer, int len)
+{
+    if (rb_io_check_io(io) == Qnil)
+    {
+        // Could be StringIO
+        VALUE written, string;
+        string = rb_external_str_new_with_enc(buffer, strlen(buffer), rb_enc_get(io));
+        written = rb_funcall(io, WRITE_METHOD, 1, string);
+        return NUM2INT(written);
+    }
+    else
+    {
+        return (int)rb_io_bufwrite(io, buffer, (size_t)len);
+    }
+}
+
+void rxml_init_io(void)
+{
+  READ_METHOD = rb_intern("read");
+  WRITE_METHOD = rb_intern("write");
+}

data/ext/libxml/ruby_xml_io.h

@@ -0,0 +1,10 @@
+/* Please see the LICENSE file for copyright and distribution information */
+
+#ifndef __RXML_IO__
+#define __RXML_IO__
+
+int rxml_read_callback(void *context, char *buffer, int len);
+int rxml_write_callback(VALUE io, const char *buffer, int len);
+void rxml_init_io(void);
+
+#endif

data/ext/libxml/ruby_xml_namespace.c

@@ -0,0 +1,153 @@
+/* Please see the LICENSE file for copyright and distribution information */
+
+#include "ruby_libxml.h"
+#include "ruby_xml_namespace.h"
+
+VALUE cXMLNamespace;
+
+/* Document-class: LibXML::XML::Namespace
+ *
+ * The Namespace class represents an XML namespace.
+ * To add a namespace to a node, create a new instance
+ * of this class.  Note that this does *not* assign the
+ * node to the namespace. To do that see the 
+ * XML::Namespaces#namespace method.
+ *
+ * Usage:
+ *
+ *   node = XML::Node.new('<Envelope>')
+ *   XML::Namespace.new(node, 'soap', 'http://schemas.xmlsoap.org/soap/envelope/')
+ *   assert_equal("<Envelope xmlns:soap=\"http://schemas.xmlsoap.org/soap/envelope/\"/>", node.to_s)
+ *   assert_nil(node.namespaces.namespace)
+ */
+
+/* Namespaces are owned and freed by their nodes.  Thus, its easier for the
+   ruby bindings to not manage attribute memory management. */
+
+static VALUE rxml_namespace_alloc(VALUE klass)
+{
+  return Data_Wrap_Struct(klass, NULL, NULL, NULL);
+}
+
+VALUE rxml_namespace_wrap(xmlNsPtr xns)
+{
+  return Data_Wrap_Struct(cXMLNamespace, NULL, NULL, xns);
+}
+
+
+/*
+ * call-seq:
+ *    initialize(node, "prefix", "href") -> XML::Namespace
+ *
+ * Create a new namespace and adds it to the specified node.
+ * Note this does *not* assign the node to the namespace.
+ * To do that see the XML::Namespaces#namespace method.
+ */
+static VALUE rxml_namespace_initialize(VALUE self, VALUE node, VALUE prefix,
+    VALUE href)
+{
+  xmlNodePtr xnode;
+  xmlChar *xmlPrefix;
+  xmlNsPtr xns;
+
+  Check_Type(node, T_DATA);
+  Data_Get_Struct(node, xmlNode, xnode);
+
+  /* Prefix can be null - that means its the default namespace */
+  xmlPrefix = NIL_P(prefix) ? NULL : (xmlChar *)StringValuePtr(prefix);
+  xns = xmlNewNs(xnode, (xmlChar*) StringValuePtr(href), xmlPrefix);
+
+  if (!xns)
+    rxml_raise(&xmlLastError);
+
+  DATA_PTR(self) = xns;
+  return self;
+}
+
+/*
+ * call-seq:
+ *    ns.href -> "href"
+ *
+ * Usage:
+ *
+ *   doc = XML::Document.string('<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"/>')
+ *   ns = doc.root.namespaces.find_by_href('http://schemas.xmlsoap.org/soap/envelope/')
+ *   assert_equal('http://schemas.xmlsoap.org/soap/envelope/', ns.href)
+ */
+static VALUE rxml_namespace_href_get(VALUE self)
+{
+  xmlNsPtr xns;
+  Data_Get_Struct(self, xmlNs, xns);
+  if (xns->href == NULL)
+    return Qnil;
+  else
+    return rxml_new_cstr( xns->href, NULL);
+}
+
+/*
+ * call-seq:
+ *    ns.node_type -> num
+ *
+ * Obtain this namespace's type identifier.
+ */
+static VALUE rxml_namespace_node_type(VALUE self)
+{
+  xmlNsPtr xns;
+  Data_Get_Struct(self, xmlNs, xns);
+  return INT2NUM(xns->type);
+}
+
+/*
+ * call-seq:
+ *    ns.prefix -> "prefix"
+ *
+ * Obtain the namespace's prefix.
+ *
+ * Usage:
+ *
+ *   doc = XML::Document.string('<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"/>')
+ *   ns = doc.root.namespaces.find_by_href('http://schemas.xmlsoap.org/soap/envelope/')
+ *   assert_equal('soap', ns.prefix)
+ */
+static VALUE rxml_namespace_prefix_get(VALUE self)
+{
+  xmlNsPtr xns;
+  Data_Get_Struct(self, xmlNs, xns);
+  if (xns->prefix == NULL)
+    return Qnil;
+  else
+    return rxml_new_cstr( xns->prefix, NULL);
+}
+
+/*
+ * call-seq:
+ *    ns.next -> XML::Namespace
+ *
+ * Obtain the next namespace.
+ *
+ * Usage:
+ *
+ *   doc = XML::Document.string('<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"/>')
+ *   ns = doc.root.namespaces.find_by_href('http://schemas.xmlsoap.org/soap/envelope/')
+ *   assert_nil(ns.next)
+ */
+static VALUE rxml_namespace_next(VALUE self)
+{
+  xmlNsPtr xns;
+  Data_Get_Struct(self, xmlNs, xns);
+  if (xns == NULL || xns->next == NULL)
+    return (Qnil);
+  else
+    return rxml_namespace_wrap(xns->next);
+}
+
+void rxml_init_namespace(void)
+{
+  cXMLNamespace = rb_define_class_under(mXML, "Namespace", rb_cObject);
+  rb_define_alloc_func(cXMLNamespace, rxml_namespace_alloc);
+  rb_define_method(cXMLNamespace, "initialize", rxml_namespace_initialize, 3);
+  rb_define_method(cXMLNamespace, "href", rxml_namespace_href_get, 0);
+  rb_define_method(cXMLNamespace, "next", rxml_namespace_next, 0);
+  rb_define_method(cXMLNamespace, "node_type", rxml_namespace_node_type, 0);
+  rb_define_method(cXMLNamespace, "prefix", rxml_namespace_prefix_get, 0);
+}

data/ext/libxml/ruby_xml_namespace.h

@@ -0,0 +1,10 @@
+/* Please see the LICENSE file for copyright and distribution information */
+
+#ifndef __RXML_NAMESPACE__
+#define __RXML_NAMESPACE__
+
+extern VALUE cXMLNamespace;
+
+void rxml_init_namespace(void);
+VALUE rxml_namespace_wrap(xmlNsPtr xns);
+#endif

data/ext/libxml/ruby_xml_namespaces.c

@@ -0,0 +1,293 @@
+/* Please see the LICENSE file for copyright and distribution information */
+
+#include "ruby_libxml.h"
+#include "ruby_xml_namespaces.h"
+
+VALUE cXMLNamespaces;
+
+/* Document-class: LibXML::XML::Namespaces
+ *
+ * The XML::Namespaces class is used to access information about
+ * a node's namespaces.  For each node, libxml maintains:
+ *
+ * * The node's namespace (#namespace)
+ * * Which namespaces are defined on the node (#definnitions)
+ * * Which namespaces are in scope for the node (#each)
+ *
+ * Let's look at an example:
+ *
+ *   <soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"
+ *                  xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+ *     <soap:Body>
+ *       <order xmlns="http://mynamespace.com"/>
+ *     </soap:Body>
+ *   </soap>
+ *
+ * The Envelope node is in the soap namespace.  It contains
+ * two namespace definitions, one for soap and one for xsd.
+ * 
+ * The Body node is also in the soap namespace and does not
+ * contain any namespaces.  However, the soap and xsd namespaces
+ * are both in context.
+ *
+ * The order node is in its default namespace and contains
+ * one namespace definition (http://mynamespace.com).  There
+ * are three namespaces in context soap, xsd and the 
+ * default namespace.
+*/
+
+static VALUE rxml_namespaces_alloc(VALUE klass)
+{
+  return Data_Wrap_Struct(klass, NULL, NULL, NULL);
+}
+
+/*
+ * call-seq:
+ *    initialize(XML::Node) -> XML::Namespaces
+ *
+ * Creates a new namespaces object.  Generally you
+ * do not call this method directly, but instead
+ * access a namespaces object via XML::Node#namespaces.
+ *
+ * Usage:
+ *
+ *   doc = XML::Document.string('<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"/>')
+ *   namespaces = new XML::Namespaces(doc.root)
+ */
+static VALUE rxml_namespaces_initialize(VALUE self, VALUE node)
+{
+  xmlNodePtr xnode;
+
+  Check_Type(node, T_DATA);
+  Data_Get_Struct(node, xmlNode, xnode);
+
+  DATA_PTR(self) = xnode;
+  return self;
+}
+
+/*
+ * call-seq:
+ *    namespaces.definitions -> [XML::Namespace, XML::Namespace]
+ *
+ * Returns an array of XML::Namespace objects that are 
+ * defined on this node.
+ *
+ * Usage:
+ *
+ *   doc = XML::Document.string('<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"/>')
+ *   defs = doc.root.namespaces.definitions
+ */
+static VALUE rxml_namespaces_definitions(VALUE self)
+{
+  xmlNodePtr xnode;
+  xmlNsPtr xns;
+  VALUE arr;
+
+  Data_Get_Struct(self, xmlNode, xnode);
+
+  arr = rb_ary_new();
+  xns = xnode->nsDef;
+
+  while (xns)
+  {
+    VALUE anamespace = rxml_namespace_wrap(xns);
+    rb_ary_push(arr, anamespace);
+    xns = xns->next;
+  }
+
+  return arr;
+}
+
+/*
+ * call-seq:
+ *    namespaces.each {|XML::Namespace|}
+ *
+ * Iterates over the namespace objects that are
+ * in context for this node.
+ *
+ * Usage:
+ *
+ *   doc = XML::Document.string('<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"/>')
+ *   doc.root.namespaces.each do |ns|
+ *     ..
+ *   end
+ */
+static VALUE rxml_namespaces_each(VALUE self)
+{
+  xmlNodePtr xnode;
+  xmlNsPtr *nsList, *xns;
+
+  Data_Get_Struct(self, xmlNode, xnode);
+
+  nsList = xmlGetNsList(xnode->doc, xnode);
+
+  if (nsList == NULL)
+    return (Qnil);
+
+  for (xns = nsList; *xns != NULL; xns++)
+  {
+    VALUE ns = rxml_namespace_wrap(*xns);
+    rb_yield(ns);
+  }
+  xmlFree(nsList);
+
+  return Qnil;
+}
+
+/*
+ * call-seq:
+ *    namespaces.find_by_href(href) -> XML::Namespace
+ *
+ * Searches for a namespace that has the specified href.
+ * The search starts at the current node and works upward
+ * through the node's parents.  If a namespace is found,
+ * then an XML::Namespace instance is returned, otherwise nil
+ * is returned.
+ *
+ * Usage:
+ *
+ *   doc = XML::Document.string('<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"/>')
+ *   ns = doc.root.namespaces.find_by_href('http://schemas.xmlsoap.org/soap/envelope/')
+ *   assert_equal('soap', ns.prefix)
+ *   assert_equal('http://schemas.xmlsoap.org/soap/envelope/', ns.href)
+ */
+static VALUE rxml_namespaces_find_by_href(VALUE self, VALUE href)
+{
+  xmlNodePtr xnode;
+  xmlNsPtr xns;
+
+  Check_Type(href, T_STRING);
+  Data_Get_Struct(self, xmlNode, xnode);
+
+  xns = xmlSearchNsByHref(xnode->doc, xnode, (xmlChar*) StringValuePtr(href));
+  if (xns)
+    return rxml_namespace_wrap(xns);
+  else
+    return Qnil;
+}
+
+/*
+ * call-seq:
+ *    namespaces.find_by_prefix(prefix=nil) -> XML::Namespace
+ *
+ * Searches for a namespace that has the specified prefix.
+ * The search starts at the current node and works upward
+ * through the node's parents.  If a namespace is found,
+ * then an XML::Namespace instance is returned, otherwise nil
+ * is returned.
+ *
+ * Usage:
+ *
+ *   doc = XML::Document.string('<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"/>')
+ *   ns = doc.root.namespaces.find_by_prefix('soap')
+ *   assert_equal('soap', ns.prefix)
+ *   assert_equal('http://schemas.xmlsoap.org/soap/envelope/', ns.href)
+ */
+static VALUE rxml_namespaces_find_by_prefix(VALUE self, VALUE prefix)
+{
+  xmlNodePtr xnode;
+  xmlNsPtr xns;
+  xmlChar* xprefix = NULL;
+
+  
+  if (!NIL_P(prefix))
+  {
+    Check_Type(prefix, T_STRING);
+    xprefix = (xmlChar*) StringValuePtr(prefix);
+  }
+
+  Data_Get_Struct(self, xmlNode, xnode);
+  
+  xns = xmlSearchNs(xnode->doc, xnode, xprefix);
+  if (xns)
+    return rxml_namespace_wrap(xns);
+  else
+    return Qnil;
+}
+
+/*
+ * call-seq:
+ *    namespaces.namespace -> XML::Namespace
+ *
+ * Returns the current node's namespace.
+ *
+ * Usage:
+ *
+ *   doc = XML::Document.string('<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"/>')
+ *   ns = doc.root.namespaces.namespace
+ *   assert_equal('soap', ns.prefix)
+ *   assert_equal('http://schemas.xmlsoap.org/soap/envelope/', ns.href)
+ */
+static VALUE rxml_namespaces_namespace_get(VALUE self)
+{
+  xmlNodePtr xnode;
+  Data_Get_Struct(self, xmlNode, xnode);
+
+  if (xnode->ns)
+    return rxml_namespace_wrap(xnode->ns);
+  else
+    return Qnil;
+}
+
+/*
+ * call-seq:
+ *    namespaces.namespace = XML::Namespace
+ *
+ * Sets the current node's namespace.  
+ *
+ * Basic usage:
+ *
+ *   # Create a node
+ *   node = XML::Node.new('Envelope')
+ *   
+ *   # Define the soap namespace - this does *not* put the node in the namespace
+ *   ns = XML::Namespace.new(node, 'soap', 'http://schemas.xmlsoap.org/soap/envelope/')
+ *   assert_equal("<Envelope xmlns:soap=\"http://schemas.xmlsoap.org/soap/envelope/\"/>", node.to_s)
+ *
+ *   # Now put the node in the soap namespace, not how the string representation changes
+ *   node.namespaces.namespace = ns
+ *   assert_equal("<soap:Envelope xmlns:soap=\"http://schemas.xmlsoap.org/soap/envelope/\"/>", node.to_s)
+ */
+static VALUE rxml_namespaces_namespace_set(VALUE self, VALUE ns)
+{
+  xmlNodePtr xnode;
+  xmlNsPtr xns;
+
+  Data_Get_Struct(self, xmlNode, xnode);
+
+  Check_Type(ns, T_DATA);
+  Data_Get_Struct(ns, xmlNs, xns);
+
+  xmlSetNs(xnode, xns);
+  return self;
+}
+
+/*
+ * call-seq:
+ *    namespaces.node -> XML::Node
+ *
+ * Returns the current node.
+ */
+static VALUE rxml_namespaces_node_get(VALUE self)
+{
+  xmlNodePtr xnode;
+  Data_Get_Struct(self, xmlNode, xnode);
+  return rxml_node_wrap(xnode);
+}
+
+void rxml_init_namespaces(void)
+{
+  cXMLNamespaces = rb_define_class_under(mXML, "Namespaces", rb_cObject);
+  rb_include_module(cXMLNamespaces, rb_mEnumerable);
+
+  rb_define_alloc_func(cXMLNamespaces, rxml_namespaces_alloc);
+  rb_define_method(cXMLNamespaces, "initialize", rxml_namespaces_initialize, 1);
+
+  rb_define_method(cXMLNamespaces, "definitions", rxml_namespaces_definitions, 0);
+  rb_define_method(cXMLNamespaces, "each", rxml_namespaces_each, 0);
+  rb_define_method(cXMLNamespaces, "find_by_href", rxml_namespaces_find_by_href, 1);
+  rb_define_method(cXMLNamespaces, "find_by_prefix", rxml_namespaces_find_by_prefix, 1);
+  rb_define_method(cXMLNamespaces, "namespace", rxml_namespaces_namespace_get, 0);
+  rb_define_method(cXMLNamespaces, "namespace=", rxml_namespaces_namespace_set, 1);
+  rb_define_method(cXMLNamespaces, "node", rxml_namespaces_node_get, 0);
+}

data/ext/libxml/ruby_xml_namespaces.h

@@ -0,0 +1,9 @@
+/* Please see the LICENSE file for copyright and distribution information */
+
+#ifndef __RXML_NAMESPACES__
+#define __RXML_NAMESPACES__
+
+extern VALUE cXMLNamespaces;
+
+void rxml_init_namespaces(void);
+#endif