libxml-ruby 3.2.2-x64-mingw-ucrt

data/ext/libxml/ruby_xml_schema_attribute.c

@@ -0,0 +1,109 @@
+#include "ruby_libxml.h"
+#include "ruby_xml_schema_attribute.h"
+#include "ruby_xml_schema_type.h"
+
+VALUE cXMLSchemaAttribute;
+
+static void rxml_schema_attribute_free(xmlSchemaAttributeUsePtr attr)
+{
+  attr = NULL;
+  xmlFree(attr);
+}
+
+VALUE rxml_wrap_schema_attribute(xmlSchemaAttributeUsePtr attr)
+{
+  return Data_Wrap_Struct(cXMLSchemaAttribute, NULL, rxml_schema_attribute_free, attr);
+}
+
+static VALUE rxml_schema_attribute_namespace(VALUE self)
+{
+  xmlSchemaAttributeUsePtr attr;
+  const xmlChar *tns;
+
+  Data_Get_Struct(self, xmlSchemaAttributeUse, attr);
+
+  if (attr == NULL)
+    return Qnil;
+
+  if (attr->type == XML_SCHEMA_EXTRA_ATTR_USE_PROHIB) {
+      tns = ((xmlSchemaAttributeUseProhibPtr) attr)->targetNamespace;
+  } else if (attr->type == XML_SCHEMA_EXTRA_QNAMEREF) {
+      tns = ((xmlSchemaQNameRefPtr) attr)->targetNamespace;
+  } else {
+      tns = ((xmlSchemaAttributePtr) ((xmlSchemaAttributeUsePtr) (attr))->attrDecl)->targetNamespace;
+  }
+
+  QNIL_OR_STRING(tns)
+}
+
+static VALUE rxml_schema_attribute_name(VALUE self)
+{
+  xmlSchemaAttributeUsePtr attr;
+  const xmlChar *name;
+
+  Data_Get_Struct(self, xmlSchemaAttributeUse, attr);
+
+  if (attr == NULL)
+    return Qnil;
+
+  if (attr->type == XML_SCHEMA_EXTRA_ATTR_USE_PROHIB) {
+      name = ((xmlSchemaAttributeUseProhibPtr) attr)->name;
+  } else if (attr->type == XML_SCHEMA_EXTRA_QNAMEREF) {
+      name = ((xmlSchemaQNameRefPtr) attr)->name;
+  } else {
+      xmlSchemaAttributePtr attrDecl = ((xmlSchemaAttributeUsePtr) attr)->attrDecl;
+      name = attrDecl->name;
+  }
+
+  QNIL_OR_STRING(name)
+}
+
+static VALUE rxml_schema_attribute_type(VALUE self)
+{
+  xmlSchemaAttributeUsePtr attr;
+  xmlSchemaTypePtr xtype;
+
+  Data_Get_Struct(self, xmlSchemaAttributeUse, attr);
+
+  xtype = attr->attrDecl->subtypes;
+
+  return rxml_wrap_schema_type((xmlSchemaTypePtr) xtype);
+}
+
+static VALUE rxml_schema_attribute_node(VALUE self)
+{
+  xmlSchemaAttributeUsePtr attr;
+
+  Data_Get_Struct(self, xmlSchemaAttributeUse, attr);
+
+  return rxml_node_wrap(attr->node);
+}
+
+static VALUE rxml_schema_attribute_value(VALUE self)
+{
+  xmlSchemaAttributeUsePtr attr;
+
+  Data_Get_Struct(self, xmlSchemaAttributeUse, attr);
+
+  QNIL_OR_STRING(attr->defValue)
+}
+
+static VALUE rxml_schema_attribute_occurs(VALUE self)
+{
+  xmlSchemaAttributeUsePtr attr;
+
+  Data_Get_Struct(self, xmlSchemaAttributeUse, attr);
+
+  return INT2NUM(attr->occurs);
+}
+
+void rxml_init_schema_attribute(void)
+{
+  cXMLSchemaAttribute = rb_define_class_under(cXMLSchema, "Attribute", rb_cObject);
+  rb_define_method(cXMLSchemaAttribute, "namespace", rxml_schema_attribute_namespace, 0);
+  rb_define_method(cXMLSchemaAttribute, "name", rxml_schema_attribute_name, 0);
+  rb_define_method(cXMLSchemaAttribute, "type", rxml_schema_attribute_type, 0);
+  rb_define_method(cXMLSchemaAttribute, "node", rxml_schema_attribute_node, 0);
+  rb_define_method(cXMLSchemaAttribute, "value", rxml_schema_attribute_value, 0);
+  rb_define_method(cXMLSchemaAttribute, "occurs", rxml_schema_attribute_occurs, 0);
+}

data/ext/libxml/ruby_xml_schema_attribute.h

@@ -0,0 +1,15 @@
+#ifndef __RXML_SCHEMA_ATTRIBUTE__
+#define __RXML_SCHEMA_ATTRIBUTE__
+
+#include "ruby_xml_schema.h"
+#include <libxml/schemasInternals.h>
+#include <libxml/xmlschemas.h>
+#include <libxml/xmlschemastypes.h>
+
+extern VALUE cXMLSchemaAttribute;
+
+
+void rxml_init_schema_attribute(void);
+VALUE rxml_wrap_schema_attribute(xmlSchemaAttributeUsePtr attr);
+
+#endif

data/ext/libxml/ruby_xml_schema_element.c

@@ -0,0 +1,95 @@
+#include "ruby_libxml.h"
+#include "ruby_xml_schema_element.h"
+#include "ruby_xml_schema_type.h"
+
+VALUE cXMLSchemaElement;
+
+static void rxml_schema_element_free(xmlSchemaElementPtr xschema_element)
+{
+  xschema_element = NULL;
+  xmlFree(xschema_element);
+}
+
+VALUE rxml_wrap_schema_element(xmlSchemaElementPtr xelement)
+{
+  return Data_Wrap_Struct(cXMLSchemaElement, NULL, rxml_schema_element_free, xelement);
+}
+
+static VALUE rxml_schema_element_namespace(VALUE self)
+{
+  xmlSchemaElementPtr xelem;
+
+  Data_Get_Struct(self, xmlSchemaElement, xelem);
+
+  QNIL_OR_STRING(xelem->targetNamespace)
+}
+
+static VALUE rxml_schema_element_name(VALUE self)
+{
+  xmlSchemaElementPtr xelem;
+
+  Data_Get_Struct(self, xmlSchemaElement, xelem);
+
+
+  QNIL_OR_STRING(xelem->name)
+}
+
+static VALUE rxml_schema_element_type(VALUE self)
+{
+  xmlSchemaElementPtr xelem;
+  xmlSchemaTypePtr xtype;
+
+  Data_Get_Struct(self, xmlSchemaElement, xelem);
+
+  xtype = xelem->subtypes;
+
+  return rxml_wrap_schema_type((xmlSchemaTypePtr) xtype);
+}
+
+static VALUE rxml_schema_element_node(VALUE self)
+{
+  xmlSchemaElementPtr xelem;
+
+  Data_Get_Struct(self, xmlSchemaElement, xelem);
+
+  return rxml_node_wrap(xelem->node);
+}
+
+static VALUE rxml_schema_element_value(VALUE self)
+{
+  xmlSchemaElementPtr xelem;
+
+  Data_Get_Struct(self, xmlSchemaElement, xelem);
+
+  QNIL_OR_STRING(xelem->value)
+}
+
+static VALUE rxml_schema_element_annot(VALUE self)
+{
+	VALUE result = Qnil;
+	xmlSchemaElementPtr xelem;
+
+	Data_Get_Struct(self, xmlSchemaElement, xelem);
+
+	if (xelem != NULL && xelem->annot != NULL && xelem->annot->content != NULL)
+	{
+		xmlChar *content = xmlNodeGetContent(xelem->annot->content);
+		if (content)
+		{
+			result = rxml_new_cstr(content, NULL);
+			xmlFree(content);
+		}
+	}
+	return result;
+}
+
+void rxml_init_schema_element(void)
+{
+  cXMLSchemaElement = rb_define_class_under(cXMLSchema, "Element", rb_cObject);
+  rb_define_method(cXMLSchemaElement, "namespace", rxml_schema_element_namespace, 0);
+  rb_define_method(cXMLSchemaElement, "name", rxml_schema_element_name, 0);
+  rb_define_method(cXMLSchemaElement, "type", rxml_schema_element_type, 0);
+  rb_define_method(cXMLSchemaElement, "node", rxml_schema_element_node, 0);
+  rb_define_method(cXMLSchemaElement, "value", rxml_schema_element_value, 0);
+  rb_define_method(cXMLSchemaElement, "annotation", rxml_schema_element_annot, 0);
+}

data/ext/libxml/ruby_xml_schema_element.h

@@ -0,0 +1,14 @@
+#ifndef __RXML_SCHEMA_ELEMENT__
+#define __RXML_SCHEMA_ELEMENT__
+
+#include "ruby_xml_schema.h"
+#include <libxml/schemasInternals.h>
+#include <libxml/xmlschemas.h>
+#include <libxml/xmlschemastypes.h>
+
+extern VALUE cXMLSchemaElement;
+
+VALUE rxml_wrap_schema_element(xmlSchemaElementPtr xelement);
+void rxml_init_schema_element(void);
+
+#endif

data/ext/libxml/ruby_xml_schema_facet.c

@@ -0,0 +1,52 @@
+#include "ruby_libxml.h"
+#include "ruby_xml_schema_facet.h"
+
+VALUE cXMLSchemaFacet;
+
+static void rxml_schema_facet_free(xmlSchemaFacetPtr xschema_type)
+{
+  xschema_type = NULL;
+  xmlFree(xschema_type);
+}
+
+/* START FACET*/
+
+static VALUE rxml_schema_facet_node(VALUE self)
+{
+  xmlSchemaFacetPtr facet;
+
+  Data_Get_Struct(self, xmlSchemaFacet, facet);
+
+  return rxml_node_wrap(facet->node);
+}
+
+static VALUE rxml_schema_facet_value(VALUE self)
+{
+  xmlSchemaFacetPtr facet;
+
+  Data_Get_Struct(self, xmlSchemaFacet, facet);
+
+  QNIL_OR_STRING(facet->value)
+}
+
+static VALUE rxml_schema_facet_kind(VALUE self)
+{
+  xmlSchemaFacetPtr facet;
+
+  Data_Get_Struct(self, xmlSchemaFacet, facet);
+
+  return INT2NUM(facet->type);
+}
+
+VALUE rxml_wrap_schema_facet(xmlSchemaFacetPtr facet)
+{
+  return Data_Wrap_Struct(cXMLSchemaFacet, NULL, rxml_schema_facet_free, facet);
+}
+
+void rxml_init_schema_facet(void)
+{
+  cXMLSchemaFacet = rb_define_class_under(cXMLSchema, "Facet", rb_cObject);
+  rb_define_method(cXMLSchemaFacet, "value", rxml_schema_facet_value, 0);
+  rb_define_method(cXMLSchemaFacet, "node", rxml_schema_facet_node, 0);
+  rb_define_method(cXMLSchemaFacet, "kind", rxml_schema_facet_kind, 0);
+}

data/ext/libxml/ruby_xml_schema_facet.h

@@ -0,0 +1,13 @@
+#ifndef __RXML_SCHEMA_FACET__
+#define __RXML_SCHEMA_FACET__
+
+#include <libxml/schemasInternals.h>
+#include <libxml/xmlschemas.h>
+#include <libxml/xmlschemastypes.h>
+
+extern VALUE cXMLSchemaFacet;
+
+VALUE rxml_wrap_schema_facet(xmlSchemaFacetPtr facet);
+void rxml_init_schema_facet(void);
+
+#endif

data/ext/libxml/ruby_xml_schema_type.c

@@ -0,0 +1,232 @@
+#include "ruby_libxml.h"
+#include "ruby_xml_schema_type.h"
+#include "ruby_xml_schema_element.h"
+#include "ruby_xml_schema_attribute.h"
+#include "ruby_xml_schema_facet.h"
+
+#define UNBOUNDED 1 << 30
+#define FREE_AND_NULL(str) if ((str) != NULL) { xmlFree((xmlChar *) (str)); str = NULL; }
+
+VALUE cXMLSchemaType;
+
+static void rxml_schema_type_free(xmlSchemaTypePtr xschema_type)
+{
+  xschema_type = NULL;
+  xmlFree(xschema_type);
+}
+
+VALUE rxml_wrap_schema_type(xmlSchemaTypePtr xtype)
+{
+  return Data_Wrap_Struct(cXMLSchemaType, NULL, rxml_schema_type_free, xtype);
+}
+
+static VALUE rxml_schema_type_namespace(VALUE self)
+{
+  xmlSchemaTypePtr xtype;
+
+  Data_Get_Struct(self, xmlSchemaType, xtype);
+
+  QNIL_OR_STRING(xtype->targetNamespace)
+}
+
+static VALUE rxml_schema_type_name(VALUE self)
+{
+  xmlSchemaTypePtr xtype;
+
+  Data_Get_Struct(self, xmlSchemaType, xtype);
+
+  QNIL_OR_STRING(xtype->name)
+}
+
+static VALUE rxml_schema_type_base(VALUE self)
+{
+  xmlSchemaTypePtr xtype;
+
+  Data_Get_Struct(self, xmlSchemaType, xtype);
+
+  return Data_Wrap_Struct(cXMLSchemaType, NULL, rxml_schema_type_free, xtype->baseType);
+}
+
+static VALUE rxml_schema_type_facets(VALUE self)
+{
+  xmlSchemaTypePtr xtype;
+  xmlSchemaFacetPtr xfacet;
+  VALUE result = rb_ary_new();
+  VALUE facet;
+
+  Data_Get_Struct(self, xmlSchemaType, xtype);
+
+  xfacet = xtype->facets;
+
+  while (xfacet != NULL)
+  {
+    facet = rxml_wrap_schema_facet((xmlSchemaFacetPtr)xfacet);
+    rb_ary_push(result, facet);
+    xfacet = xfacet->next;
+  }
+
+  return result;
+}
+
+static VALUE rxml_schema_type_node(VALUE self)
+{
+  xmlSchemaTypePtr xtype;
+
+  Data_Get_Struct(self, xmlSchemaType, xtype);
+
+  if(xtype->node != NULL)
+    return rxml_node_wrap(xtype->node);
+  else
+    return Qnil;
+}
+
+static VALUE rxml_schema_type_kind(VALUE self)
+{
+  xmlSchemaTypePtr xtype;
+
+  Data_Get_Struct(self, xmlSchemaType, xtype);
+
+  return INT2NUM(xtype->type);
+}
+
+static VALUE rxml_schema_type_annot(VALUE self)
+{
+  VALUE result = Qnil;
+  xmlSchemaTypePtr xtype;
+
+  Data_Get_Struct(self, xmlSchemaType, xtype);
+
+  if(xtype != NULL && xtype->annot != NULL && xtype->annot->content != NULL)
+  {
+    xmlChar *content = xmlNodeGetContent(xtype->annot->content);
+	if (content)
+	{
+	  result = rxml_new_cstr(content, NULL);
+	  xmlFree(content);
+    }
+  }
+  return result;
+}
+
+static void rxmlSchemaCollectElements(xmlSchemaParticlePtr xparticle, VALUE hash)
+{
+  VALUE element;
+  xmlSchemaTreeItemPtr xterm;
+
+  if (xparticle == NULL)
+    return;
+
+  xterm = xparticle->children;
+
+  if (xterm != NULL)
+  {
+    switch (xterm->type)
+	{
+      case XML_SCHEMA_TYPE_ELEMENT:
+        element = rxml_wrap_schema_element((xmlSchemaElementPtr)xterm);
+        rb_iv_set(element, "@min", INT2NUM(xparticle->minOccurs));
+
+        if (xparticle->maxOccurs >= UNBOUNDED)
+          rb_iv_set(element, "@max", rb_const_get(rb_path2class("Float"), rb_intern("INFINITY")));
+        else
+          rb_iv_set(element, "@max", INT2NUM(xparticle->maxOccurs));
+
+        if (xparticle->annot != NULL)
+        {
+          xmlChar *content = xmlNodeGetContent(xparticle->annot->content);
+
+          if (content != NULL)
+          {
+            rb_iv_set(element, "@annotation", rb_str_new2((const char *) content));
+            xmlFree(content);
+          }
+        }
+
+        rb_hash_aset(hash, rb_str_new2((const char *) ((xmlSchemaElementPtr)xterm)->name), element);
+        break;
+
+      case XML_SCHEMA_TYPE_SEQUENCE:
+        break;
+
+      case XML_SCHEMA_TYPE_CHOICE:
+        break;
+
+      case XML_SCHEMA_TYPE_ALL:
+        break;
+
+      case XML_SCHEMA_TYPE_ANY:
+        break;
+
+      default:
+        return;
+    }
+  }
+
+  if (xterm &&
+      ((xterm->type == XML_SCHEMA_TYPE_SEQUENCE) || (xterm->type == XML_SCHEMA_TYPE_CHOICE) || (xterm->type == XML_SCHEMA_TYPE_ALL)) &&
+      (xterm->children != NULL))
+  {
+    rxmlSchemaCollectElements((xmlSchemaParticlePtr)xterm->children, hash);
+  }
+
+  if (xparticle->next != NULL)
+  {
+	rxmlSchemaCollectElements((xmlSchemaParticlePtr)xparticle->next, hash);
+  }
+}
+
+static VALUE rxml_schema_type_elements(VALUE self)
+{
+  VALUE result = rb_hash_new();
+  xmlSchemaTypePtr xtype;
+
+  Data_Get_Struct(self, xmlSchemaType, xtype);
+  rxmlSchemaCollectElements((xmlSchemaParticlePtr) xtype->subtypes, result);
+
+  return result;
+}
+
+static VALUE rxml_schema_type_attributes(VALUE self)
+{
+  VALUE result = rb_ary_new();
+  xmlSchemaTypePtr xtype;
+  xmlSchemaAttributeUsePtr xuse;
+  xmlSchemaItemListPtr xuses;
+  int i;
+
+  Data_Get_Struct(self, xmlSchemaType, xtype);
+  xuses = xtype->attrUses;
+
+  if (xuses != NULL)
+  {
+    for (i = 0; i < xuses->nbItems; i++)
+	{
+      xuse = (xmlSchemaAttributeUsePtr)xuses->items[i];
+      rb_ary_push(result, rxml_wrap_schema_attribute(xuse));
+    }
+  }
+
+  return result;
+}
+
+void rxml_init_schema_type(void)
+{
+  /* Add in infinity support for ruby 1.8.7 */
+  #if !defined(RUBY_VM) && defined(INFINITY)
+  ID infinityId = rb_intern("INFINITY");
+  if (rb_const_defined(rb_cFloat, infinityId) == Qfalse)
+    rb_define_const(rb_cFloat, "INFINITY", rb_float_new(INFINITY));
+  #endif
+
+  cXMLSchemaType = rb_define_class_under(cXMLSchema, "Type", rb_cObject);
+
+  rb_define_method(cXMLSchemaType, "namespace", rxml_schema_type_namespace, 0);
+  rb_define_method(cXMLSchemaType, "name", rxml_schema_type_name, 0);
+  rb_define_method(cXMLSchemaType, "elements", rxml_schema_type_elements, 0);
+  rb_define_method(cXMLSchemaType, "attributes", rxml_schema_type_attributes, 0);
+  rb_define_method(cXMLSchemaType, "base", rxml_schema_type_base, 0);
+  rb_define_method(cXMLSchemaType, "kind", rxml_schema_type_kind, 0);
+  rb_define_method(cXMLSchemaType, "node", rxml_schema_type_node, 0);
+  rb_define_method(cXMLSchemaType, "facets", rxml_schema_type_facets, 0);
+  rb_define_method(cXMLSchemaType, "annotation", rxml_schema_type_annot, 0);
+}

data/ext/libxml/ruby_xml_schema_type.h

@@ -0,0 +1,9 @@
+#ifndef __RXML_SCHEMA_TYPE__
+#define __RXML_SCHEMA_TYPE__
+
+extern VALUE cXMLSchemaType;
+
+VALUE rxml_wrap_schema_type(xmlSchemaTypePtr xtype);
+void rxml_init_schema_type(void);
+
+#endif

data/ext/libxml/ruby_xml_version.h

@@ -0,0 +1,9 @@
+/* Don't nuke this block!  It is used for automatically updating the
+ * versions below. VERSION = string formatting, VERNUM = numbered
+ * version for inline testing: increment both or none at all.*/
+#define RUBY_LIBXML_VERSION  "3.2.2"
+#define RUBY_LIBXML_VERNUM   321
+#define RUBY_LIBXML_VER_MAJ   3
+#define RUBY_LIBXML_VER_MIN   2
+#define RUBY_LIBXML_VER_MIC   2
+#define RUBY_LIBXML_VER_PATCH 0