ruby-xml-smart 0.1.11-i486-linux

data/rbxs_pull.c

@@ -0,0 +1,244 @@
+#include "rbxs_pull.h"
+#include "rbxs_qname.h"
+#include "rbxs_pullattributeset.h"
+
+/* -- */
+//***********************************************************************************
+// GC
+//***********************************************************************************
+void rbxs_pull_free(rbxs_pull *prbxs_pull) {
+  if (prbxs_pull != NULL) {
+    xmlFreeTextReader(prbxs_pull->reader);
+    prbxs_pull->reader = NULL;
+    free(prbxs_pull);
+  }  
+}
+  
+void rbxs_pull_mark(rbxs_pull *prbxs_pull) { }
+
+//***********************************************************************************
+// Methods
+//***********************************************************************************
+/* ++ */
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pull_next(VALUE self)
+{
+  rbxs_pull *prbxs_pull;
+  Data_Get_Struct(self, rbxs_pull, prbxs_pull);
+  if (xmlTextReaderRead(prbxs_pull->reader) >= 1)
+    return self;
+  else
+    return Qnil;
+}  
+    
+/* 
+ * Documentation
+ */
+VALUE rbxs_pull_name(VALUE self)
+{
+  return(rbxs_qname_new(cSmartQName,self,RBXS_PARSER_TYPE_READER));
+}
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pull_base(VALUE self)
+{
+  unsigned char *base_uri;
+  rbxs_pull *prbxs_pull;
+
+  Data_Get_Struct(self, rbxs_pull, prbxs_pull);
+  base_uri = xmlTextReaderBaseUri(prbxs_pull->reader);
+  if (base_uri)
+    return(rb_str_new2((char *)base_uri));
+  else
+    return(Qnil);
+}
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pull_xml_lang(VALUE self)
+{
+  unsigned char *xml_lang;
+  rbxs_pull *prbxs_pull;
+
+  Data_Get_Struct(self, rbxs_pull, prbxs_pull);
+  xml_lang = xmlTextReaderXmlLang(prbxs_pull->reader);
+  if (xml_lang)
+    return(rb_str_new2((char *)xml_lang));
+  else
+    return(Qnil);
+}
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pull_depth(VALUE self)
+{
+  int depth;
+  rbxs_pull *prbxs_pull;
+
+  Data_Get_Struct(self, rbxs_pull, prbxs_pull);
+  depth = xmlTextReaderDepth(prbxs_pull->reader);
+  if (depth >= 0)
+    return(INT2FIX(depth));
+  else
+    return(Qnil);
+}
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pull_attributes(VALUE self)
+{
+  return rbxs_pullattributeset_new(cSmartPullAttributeSet,self);
+}
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pull_emptyp(VALUE self)
+{
+  rbxs_pull *prbxs_pull;
+
+  Data_Get_Struct(self, rbxs_pull, prbxs_pull);  
+  return (xmlTextReaderIsEmptyElement(prbxs_pull->reader) ? Qtrue : Qfalse);
+}
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pull_valuep(VALUE self)
+{
+  rbxs_pull *prbxs_pull;
+
+  Data_Get_Struct(self, rbxs_pull, prbxs_pull);  
+  return (xmlTextReaderHasValue(prbxs_pull->reader) ? Qtrue : Qfalse);
+}
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pull_value(VALUE self)
+{
+  rbxs_pull *prbxs_pull;
+  unsigned char *value;
+
+  Data_Get_Struct(self, rbxs_pull, prbxs_pull);  
+  value = xmlTextReaderValue(prbxs_pull->reader);
+
+  if (value) {
+    VALUE retval = rb_str_new2((char *)value);
+    xmlFree(value);
+    return retval;
+  } else
+    return Qnil;
+}
+
+static VALUE type2symbol[18];
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pull_node_type(VALUE self)
+{
+  rbxs_pull *prbxs_pull;
+  int node_type;
+
+  Data_Get_Struct(self, rbxs_pull, prbxs_pull);  
+  node_type = xmlTextReaderNodeType(prbxs_pull->reader);
+
+  if (node_type < 0)
+    return(Qnil);
+  
+  return ID2SYM(type2symbol[node_type]);
+}
+
+//***********************************************************************************
+// Constructors
+//***********************************************************************************
+VALUE rbxs_pull_new(VALUE class, VALUE what) {
+  rbxs_pull *prbxs_pull;
+  RB_IO_T *fptr;
+
+  prbxs_pull = (rbxs_pull *)malloc(sizeof(rbxs_pull));
+  if (prbxs_pull == NULL )
+    rb_raise(rb_eNoMemError, "No memory left for XML::Smart::Pull struct");
+
+  switch (TYPE(what)) {
+    case T_STRING:
+      prbxs_pull->reader = xmlReaderForMemory(RSTRING_PTR(what),
+                   RSTRING_LEN(what),
+               NULL, NULL, 0);
+      break;
+    case T_FILE:
+      GetOpenFile(what,fptr);
+      prbxs_pull->reader = xmlReaderForFd(RB_IO_T_FD(fptr),NULL,NULL,0);
+      break;
+    default:
+      rb_raise(rb_eArgError, "argument must me String or File");
+  }
+
+  if (prbxs_pull->reader == NULL)
+    rb_raise(rb_eRuntimeError, "Document could not be opend");
+
+  if (rb_block_given_p()) {
+    VALUE self;
+    self = Data_Wrap_Struct(class, rbxs_pull_mark, rbxs_pull_free, prbxs_pull);
+    while (xmlTextReaderRead(prbxs_pull->reader)) {
+      rb_yield(self);
+    }
+    return(Qnil);
+  }
+
+  return(Data_Wrap_Struct(class, rbxs_pull_mark, rbxs_pull_free, prbxs_pull));
+}
+
+//***********************************************************************************
+// Initialize class Pull
+//***********************************************************************************
+#ifdef RDOC__
+  mXML  = rb_define_module( "XML" );
+  cSmart = rb_define_class_under( mXML, "Smart", rb_cObject );
+#endif
+VALUE cSmartPull;
+
+void init_rbxs_pull(void) {
+  cSmartPull = rb_define_class_under( cSmart, "Pull", rb_cObject );
+  
+  type2symbol[XML_READER_TYPE_NONE]                   = rb_intern("none");
+  type2symbol[XML_READER_TYPE_ELEMENT]                = rb_intern("element");
+  type2symbol[XML_READER_TYPE_ATTRIBUTE]              = rb_intern("attribute");
+  type2symbol[XML_READER_TYPE_TEXT]                   = rb_intern("text");
+  type2symbol[XML_READER_TYPE_CDATA]                  = rb_intern("cdata");
+  type2symbol[XML_READER_TYPE_ENTITY_REFERENCE]       = rb_intern("entity_reference");
+  type2symbol[XML_READER_TYPE_ENTITY]                 = rb_intern("entity");
+  type2symbol[XML_READER_TYPE_PROCESSING_INSTRUCTION] = rb_intern("processing_instruction");
+  type2symbol[XML_READER_TYPE_COMMENT]                = rb_intern("comment");
+  type2symbol[XML_READER_TYPE_DOCUMENT]               = rb_intern("document");
+  type2symbol[XML_READER_TYPE_DOCUMENT_TYPE]          = rb_intern("document_type");
+  type2symbol[XML_READER_TYPE_DOCUMENT_FRAGMENT]      = rb_intern("document_fragment");
+  type2symbol[XML_READER_TYPE_NOTATION]               = rb_intern("notation");
+  type2symbol[XML_READER_TYPE_WHITESPACE]             = rb_intern("whitespace");
+  type2symbol[XML_READER_TYPE_SIGNIFICANT_WHITESPACE] = rb_intern("significant_whitespace");
+  type2symbol[XML_READER_TYPE_END_ELEMENT]            = rb_intern("end_element");
+  type2symbol[XML_READER_TYPE_END_ENTITY]             = rb_intern("end_entity");
+  type2symbol[XML_READER_TYPE_XML_DECLARATION]        = rb_intern("xml_declaration");
+  
+  rb_define_method(cSmartPull, "to_s",       rbxs_pull_value,      0);
+  rb_define_method(cSmartPull, "next",       rbxs_pull_next,       0);
+  rb_define_method(cSmartPull, "name",       rbxs_pull_name,       0);
+
+  rb_define_method(cSmartPull, "base",       rbxs_pull_base,       0);
+  rb_define_method(cSmartPull, "depth",      rbxs_pull_depth,      0);
+  rb_define_method(cSmartPull, "attributes", rbxs_pull_attributes, 0);
+  rb_define_method(cSmartPull, "value?",     rbxs_pull_valuep,     0);
+  rb_define_method(cSmartPull, "value",      rbxs_pull_value,      0);
+  rb_define_method(cSmartPull, "empty?",     rbxs_pull_emptyp,     0);
+  rb_define_method(cSmartPull, "lang",       rbxs_pull_xml_lang,   0);
+  rb_define_method(cSmartPull, "node_type",  rbxs_pull_node_type,  0);
+}

data/rbxs_pull.h

@@ -0,0 +1,17 @@
+/* Please see the COPYING file for copyright and distribution information */
+
+#ifndef __RBXS_PULL_H__
+#define __RBXS_PULL_H__
+
+#include "rbxs.h"
+
+RUBY_EXTERN VALUE cSmartPull;
+
+typedef struct rbxs_pull {
+  xmlTextReaderPtr reader;
+} rbxs_pull;
+
+RUBY_EXTERN VALUE rbxs_pull_new(VALUE class, VALUE what);
+RUBY_EXTERN void  init_rbxs_pull(void);
+  
+#endif

data/rbxs_pullattribute.c

@@ -0,0 +1,124 @@
+#include "rbxs_pullattribute.h"
+#include "rbxs_pullattributeset.h"
+#include "rbxs_qname.h"
+#include "rbxs_pull.h"
+
+/* -- */
+//***********************************************************************************
+// GC
+//***********************************************************************************
+void rbxs_pullattribute_free(rbxs_pullattribute *prbxs_pullattribute) {
+  if (prbxs_pullattribute != NULL) {
+    free(prbxs_pullattribute);
+  }  
+}
+  
+void rbxs_pullattribute_mark(rbxs_pullattribute *prbxs_pullattribute) { 
+  if (prbxs_pullattribute == NULL) return;
+  if (!NIL_P(prbxs_pullattribute->node)) rb_gc_mark(prbxs_pullattribute->node);
+}
+
+//***********************************************************************************
+// Methods
+//***********************************************************************************
+/* ++ */
+void searchPosition(xmlTextReaderPtr reader, VALUE which)
+{
+  int position,length;
+
+  switch (TYPE(which)) {
+    case T_STRING:
+      if (!xmlTextReaderMoveToAttribute(reader,(unsigned char *)StringValuePtr(which))) {
+        xmlTextReaderMoveToElement(reader);
+        rb_raise(rb_eRuntimeError, "attribute could not be found");
+      }  
+      break;
+    case T_FIXNUM:
+      position = NUM2INT(which);
+      length   = xmlTextReaderAttributeCount(reader);
+       if (position < 0)
+         position = length + position; 
+       if ((position >= 0) && (position < length)) { 
+         if (!xmlTextReaderMoveToAttributeNo(reader,position)) {
+           xmlTextReaderMoveToElement(reader);
+           rb_raise(rb_eRuntimeError, "weird things occured");
+         }  
+       } else 
+         rb_raise(rb_eRuntimeError, "index out of range");
+      break;
+    default:
+      rb_raise(rb_eArgError, "argument must me String or a Fixnum");
+  }    
+}
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pullattribute_name(VALUE self)
+{
+  rbxs_pullattribute *prbxs_pullattribute;
+  rbxs_pull *prbxs_pull;
+
+  Data_Get_Struct(self, rbxs_pullattribute, prbxs_pullattribute);
+  Data_Get_Struct(prbxs_pullattribute->node, rbxs_pull, prbxs_pull);
+
+  searchPosition(prbxs_pull->reader,prbxs_pullattribute->which);
+  return(rbxs_qname_new(cSmartQName,prbxs_pullattribute->node,RBXS_PARSER_TYPE_READER));
+}  
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pullattribute_value(VALUE self)
+{
+  rbxs_pullattribute *prbxs_pullattribute;
+  rbxs_pull *prbxs_pull;
+  unsigned char *value;
+
+  Data_Get_Struct(self, rbxs_pullattribute, prbxs_pullattribute);
+  Data_Get_Struct(prbxs_pullattribute->node, rbxs_pull, prbxs_pull);
+
+  searchPosition(prbxs_pull->reader,prbxs_pullattribute->which);
+
+  value = xmlTextReaderValue(prbxs_pull->reader);
+  if (value) {
+    VALUE retval = rb_str_new2((char *)value);
+    xmlFree(value);
+    return retval;
+  } else
+    return Qnil;
+  return Qnil;
+}
+
+//***********************************************************************************
+// Constructors
+//***********************************************************************************
+VALUE rbxs_pullattribute_new(VALUE class, VALUE node, VALUE which) {
+  rbxs_pullattribute *prbxs_pullattribute;
+
+  prbxs_pullattribute = (rbxs_pullattribute *)malloc(sizeof(rbxs_pullattribute));
+  if (prbxs_pullattribute == NULL )
+    rb_raise(rb_eNoMemError, "No memory left for XML::Smart::Pull::AttributeSet::Attribute struct");
+
+  prbxs_pullattribute->node = node;
+  prbxs_pullattribute->which = which;
+
+  return(Data_Wrap_Struct(class, rbxs_pullattribute_mark, rbxs_pullattribute_free, prbxs_pullattribute));
+}
+
+//***********************************************************************************
+// Initialize class Node
+//***********************************************************************************
+#ifdef RDOC__
+  mXML  = rb_define_module( "XML" );
+  cSmart = rb_define_class_under( mXML, "Smart", rb_cObject );
+  cSmartPull = rb_define_class_under( cSmart, "Pull", rb_cObject );
+  cSmartPullAttributeSet = rb_define_class_under( cSmartPull, "AttributeSet", rb_cObject );
+#endif
+VALUE cSmartPullAttribute;
+void init_rbxs_pullattribute(void) {
+  cSmartPullAttribute = rb_define_class_under( cSmartPullAttributeSet, "Attribute", rb_cObject );
+
+  rb_define_method(cSmartPullAttribute, "name",  rbxs_pullattribute_name,  0);
+  rb_define_method(cSmartPullAttribute, "value", rbxs_pullattribute_value, 0);
+}

data/rbxs_pullattribute.h

@@ -0,0 +1,18 @@
+/* Please see the COPYING file for copyright and distribution information */
+
+#ifndef __RBXS_PULLATTRIBUTE_H__
+#define __RBXS_PULLATTRIBUTE_H__
+
+#include "rbxs.h"
+
+RUBY_EXTERN VALUE cSmartPullAttribute;
+
+typedef struct rbxs_pullattribute {
+  VALUE node;
+  VALUE which;
+} rbxs_pullattribute;
+
+RUBY_EXTERN VALUE rbxs_pullattribute_new(VALUE class, VALUE node, VALUE which);
+RUBY_EXTERN void  init_rbxs_pullattribute(void);
+  
+#endif

data/rbxs_pullattributeset.c

@@ -0,0 +1,156 @@
+#include "rbxs_pullattributeset.h"
+#include "rbxs_pullattribute.h"
+#include "rbxs_qname.h"
+#include "rbxs_pull.h"
+
+/* -- */
+//***********************************************************************************
+// GC
+//***********************************************************************************
+void rbxs_pullattributeset_free(rbxs_pullattributeset *prbxs_pullattributeset)
+{
+  if (prbxs_pullattributeset != NULL) {
+    free(prbxs_pullattributeset);
+  }  
+}
+  
+void rbxs_pullattributeset_mark(rbxs_pullattributeset *prbxs_pullattributeset)
+{ 
+  if (prbxs_pullattributeset == NULL) return;
+  if (!NIL_P(prbxs_pullattributeset->node)) rb_gc_mark(prbxs_pullattributeset->node);
+}
+
+//***********************************************************************************
+// Methods
+//***********************************************************************************
+/* ++ */
+
+/* 
+ * call-seq:
+ *    include? => (true|false)
+ *
+ * Documentation
+ */
+VALUE rbxs_pullattributeset_include(VALUE self, VALUE which)
+{
+  rbxs_pullattributeset *prbxs_pullattributeset;
+  rbxs_pull *prbxs_pull;
+  Data_Get_Struct(self, rbxs_pullattributeset, prbxs_pullattributeset);
+  Data_Get_Struct(prbxs_pullattributeset->node, rbxs_pull, prbxs_pull);
+
+  Check_Type(which, T_STRING);
+
+  if (xmlTextReaderMoveToAttribute(prbxs_pull->reader,(unsigned char *)StringValuePtr(which)))
+    return(Qtrue);
+  else
+    return(Qfalse);
+}  
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pullattributeset_empty(VALUE self)
+{
+  rbxs_pullattributeset *prbxs_pullattributeset;
+  rbxs_pull *prbxs_pull;
+  Data_Get_Struct(self, rbxs_pullattributeset, prbxs_pullattributeset);
+  Data_Get_Struct(prbxs_pullattributeset->node, rbxs_pull, prbxs_pull);
+  return(xmlTextReaderHasAttributes(prbxs_pull->reader) ? Qfalse : Qtrue);
+}
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pullattributeset_length(VALUE self)
+{
+  rbxs_pullattributeset *prbxs_pullattributeset;
+  rbxs_pull *prbxs_pull;
+  Data_Get_Struct(self, rbxs_pullattributeset, prbxs_pullattributeset);
+  Data_Get_Struct(prbxs_pullattributeset->node, rbxs_pull, prbxs_pull);
+  return(NUM2INT(xmlTextReaderAttributeCount(prbxs_pull->reader)));
+}
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pullattributeset_each(VALUE self)
+{
+  rbxs_pullattributeset *prbxs_pullattributeset;
+  rbxs_pull *prbxs_pull;
+  Data_Get_Struct(self, rbxs_pullattributeset, prbxs_pullattributeset);
+  Data_Get_Struct(prbxs_pullattributeset->node, rbxs_pull, prbxs_pull);
+  while (xmlTextReaderMoveToNextAttribute(prbxs_pull->reader)) {
+    xmlChar *ret;
+    VALUE val;
+    ret = xmlTextReaderValue(prbxs_pull->reader);
+    val = rb_str_new2((char *)ret);
+    xmlFree(ret);
+    rb_yield_values(2,rbxs_qname_new(cSmartQName,prbxs_pullattributeset->node,RBXS_PARSER_TYPE_READER),val);
+  }  
+  xmlTextReaderMoveToElement(prbxs_pull->reader);
+  return(self);
+}
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pullattributeset_get(VALUE self, VALUE which)
+{
+  rbxs_pullattributeset *prbxs_pullattributeset;
+  Data_Get_Struct(self, rbxs_pullattributeset, prbxs_pullattributeset);
+  return(rbxs_pullattribute_new(cSmartPullAttribute,prbxs_pullattributeset->node,which));
+}
+  
+/* 
+ * Documentation
+ */
+VALUE rbxs_pullattributeset_first(VALUE self)
+{
+  return rbxs_pullattributeset_get(self,INT2NUM(0)); 
+}  
+
+/* 
+ * Documentation
+ */
+VALUE rbxs_pullattributeset_last(VALUE self)
+{
+  return rbxs_pullattributeset_get(self,INT2NUM(-1));
+}  
+
+//***********************************************************************************
+// Constructors
+//***********************************************************************************
+VALUE rbxs_pullattributeset_new(VALUE class, VALUE node) {
+  rbxs_pullattributeset *prbxs_pullattributeset;
+
+  prbxs_pullattributeset = (rbxs_pullattributeset *)malloc(sizeof(rbxs_pullattributeset));
+  if (prbxs_pullattributeset == NULL )
+    rb_raise(rb_eNoMemError, "No memory left for XML::Smart::Pull::AttributeSet struct");
+
+  prbxs_pullattributeset->node = node;
+
+  return(Data_Wrap_Struct(class, rbxs_pullattributeset_mark, rbxs_pullattributeset_free, prbxs_pullattributeset));
+}
+
+//***********************************************************************************
+// Initialize class Node
+//***********************************************************************************
+#ifdef RDOC__
+  mXML  = rb_define_module( "XML" );
+  cSmart = rb_define_class_under( mXML, "Smart", rb_cObject );
+  cSmartPull = rb_define_class_under( cSmart, "Pull", rb_cObject );
+#endif
+VALUE cSmartPullAttributeSet;
+
+void init_rbxs_pullattributeset(void) {
+  cSmartPullAttributeSet = rb_define_class_under( cSmartPull, "AttributeSet", rb_cObject );
+  rb_include_module(cSmartPullAttributeSet, rb_mEnumerable);
+
+  rb_define_method(cSmartPullAttributeSet, "length",   rbxs_pullattributeset_length,  0);
+  rb_define_method(cSmartPullAttributeSet, "empty?",   rbxs_pullattributeset_empty,   0);
+  rb_define_method(cSmartPullAttributeSet, "each",     rbxs_pullattributeset_each,    0);
+  rb_define_method(cSmartPullAttributeSet, "[]",       rbxs_pullattributeset_get,     1);
+  rb_define_method(cSmartPullAttributeSet, "first",    rbxs_pullattributeset_first,   0);
+  rb_define_method(cSmartPullAttributeSet, "last",     rbxs_pullattributeset_last,    0);
+  rb_define_method(cSmartPullAttributeSet, "include?", rbxs_pullattributeset_include, 1);
+}

data/rbxs_pullattributeset.h

@@ -0,0 +1,17 @@
+/* Please see the COPYING file for copyright and distribution information */
+
+#ifndef __RBXS_PULLATTRIBUTESET_H__
+#define __RBXS_PULLATTRIBUTESET_H__
+
+#include "rbxs.h"
+
+RUBY_EXTERN VALUE cSmartPullAttributeSet;
+
+typedef struct rbxs_pullattributeset {
+  VALUE node;
+} rbxs_pullattributeset;
+
+RUBY_EXTERN VALUE rbxs_pullattributeset_new(VALUE class, VALUE node);
+RUBY_EXTERN void  init_rbxs_pullattributeset(void);
+  
+#endif