nokogiri-backport 1.11.0

data/ext/nokogiri/html_document.c

@@ -0,0 +1,171 @@
+#include <html_document.h>
+
+static ID id_encoding_found;
+static ID id_to_s;
+
+/*
+ * call-seq:
+ *  new
+ *
+ * Create a new document
+ */
+static VALUE
+rb_html_document_s_new(int argc, VALUE *argv, VALUE klass)
+{
+  VALUE uri, external_id, rest, rb_doc;
+  htmlDocPtr doc;
+
+  rb_scan_args(argc, argv, "0*", &rest);
+  uri = rb_ary_entry(rest, (long)0);
+  external_id = rb_ary_entry(rest, (long)1);
+
+  doc = htmlNewDoc(
+          RTEST(uri) ? (const xmlChar *)StringValueCStr(uri) : NULL,
+          RTEST(external_id) ? (const xmlChar *)StringValueCStr(external_id) : NULL
+        );
+  rb_doc = Nokogiri_wrap_xml_document(klass, doc);
+  rb_obj_call_init(rb_doc, argc, argv);
+  return rb_doc ;
+}
+
+/*
+ * call-seq:
+ *  read_io(io, url, encoding, options)
+ *
+ * Read the HTML document from +io+ with given +url+, +encoding+,
+ * and +options+.  See Nokogiri::HTML.parse
+ */
+static VALUE
+rb_html_document_s_read_io(VALUE klass, VALUE rb_io, VALUE rb_url, VALUE rb_encoding, VALUE rb_options)
+{
+  VALUE rb_doc;
+  VALUE rb_error_list = rb_ary_new();
+  htmlDocPtr c_doc;
+  const char *c_url = NIL_P(rb_url) ? NULL : StringValueCStr(rb_url);
+  const char *c_encoding = NIL_P(rb_encoding) ? NULL : StringValueCStr(rb_encoding);
+  int options = NUM2INT(rb_options);
+
+  xmlSetStructuredErrorFunc((void *)rb_error_list, Nokogiri_error_array_pusher);
+
+  c_doc = htmlReadIO(io_read_callback, io_close_callback, (void *)rb_io, c_url, c_encoding, options);
+
+  xmlSetStructuredErrorFunc(NULL, NULL);
+
+  /*
+   * If EncodingFound has occurred in EncodingReader, make sure to do
+   * a cleanup and propagate the error.
+   */
+  if (rb_respond_to(rb_io, id_encoding_found)) {
+    VALUE encoding_found = rb_funcall(rb_io, id_encoding_found, 0);
+    if (!NIL_P(encoding_found)) {
+      xmlFreeDoc(c_doc);
+      rb_exc_raise(encoding_found);
+    }
+  }
+
+  if ((c_doc == NULL) || (!(options & XML_PARSE_RECOVER) && (RARRAY_LEN(rb_error_list) > 0))) {
+    VALUE rb_error ;
+
+    xmlFreeDoc(c_doc);
+
+    rb_error = rb_ary_entry(rb_error_list, 0);
+    if (rb_error == Qnil) {
+      rb_raise(rb_eRuntimeError, "Could not parse document");
+    } else {
+      VALUE exception_message = rb_funcall(rb_error, id_to_s, 0);
+      exception_message = rb_str_concat(rb_str_new2("Parser without recover option encountered error or warning: "),
+                                        exception_message);
+      rb_exc_raise(rb_class_new_instance(1, &exception_message, cNokogiriXmlSyntaxError));
+    }
+
+    return Qnil;
+  }
+
+  rb_doc = Nokogiri_wrap_xml_document(klass, c_doc);
+  rb_iv_set(rb_doc, "@errors", rb_error_list);
+  return rb_doc;
+}
+
+/*
+ * call-seq:
+ *  read_memory(string, url, encoding, options)
+ *
+ * Read the HTML document contained in +string+ with given +url+, +encoding+,
+ * and +options+.  See Nokogiri::HTML.parse
+ */
+static VALUE
+rb_html_document_s_read_memory(VALUE klass, VALUE rb_html, VALUE rb_url, VALUE rb_encoding, VALUE rb_options)
+{
+  VALUE rb_doc;
+  VALUE rb_error_list = rb_ary_new();
+  htmlDocPtr c_doc;
+  const char *c_buffer = StringValuePtr(rb_html);
+  const char *c_url = NIL_P(rb_url) ? NULL : StringValueCStr(rb_url);
+  const char *c_encoding = NIL_P(rb_encoding) ? NULL : StringValueCStr(rb_encoding);
+  int html_len = (int)RSTRING_LEN(rb_html);
+  int options = NUM2INT(rb_options);
+
+  xmlSetStructuredErrorFunc((void *)rb_error_list, Nokogiri_error_array_pusher);
+
+  c_doc = htmlReadMemory(c_buffer, html_len, c_url, c_encoding, options);
+
+  xmlSetStructuredErrorFunc(NULL, NULL);
+
+  if ((c_doc == NULL) || (!(options & XML_PARSE_RECOVER) && (RARRAY_LEN(rb_error_list) > 0))) {
+    VALUE rb_error ;
+
+    xmlFreeDoc(c_doc);
+
+    rb_error = rb_ary_entry(rb_error_list, 0);
+    if (rb_error == Qnil) {
+      rb_raise(rb_eRuntimeError, "Could not parse document");
+    } else {
+      VALUE exception_message = rb_funcall(rb_error, id_to_s, 0);
+      exception_message = rb_str_concat(rb_str_new2("Parser without recover option encountered error or warning: "),
+                                        exception_message);
+      rb_exc_raise(rb_class_new_instance(1, &exception_message, cNokogiriXmlSyntaxError));
+    }
+
+    return Qnil;
+  }
+
+  rb_doc = Nokogiri_wrap_xml_document(klass, c_doc);
+  rb_iv_set(rb_doc, "@errors", rb_error_list);
+  return rb_doc;
+}
+
+/*
+ * call-seq:
+ *  type
+ *
+ * The type for this document
+ */
+static VALUE
+rb_html_document_type(VALUE self)
+{
+  htmlDocPtr doc;
+  Data_Get_Struct(self, xmlDoc, doc);
+  return INT2NUM((long)doc->type);
+}
+
+VALUE cNokogiriHtmlDocument ;
+
+void
+init_html_document()
+{
+  VALUE nokogiri = rb_define_module("Nokogiri");
+  VALUE nokogiri_xml = rb_define_module_under(nokogiri, "XML");
+  VALUE nokogiri_xml_node = rb_define_class_under(nokogiri_xml, "Node", rb_cObject);
+  VALUE nokogiri_xml_document = rb_define_class_under(nokogiri_xml, "Document", nokogiri_xml_node);
+  VALUE nokogiri_html = rb_define_module_under(nokogiri, "HTML");
+  cNokogiriHtmlDocument = rb_define_class_under(nokogiri_html, "Document", nokogiri_xml_document);
+
+  rb_define_singleton_method(cNokogiriHtmlDocument, "read_memory", rb_html_document_s_read_memory, 4);
+  rb_define_singleton_method(cNokogiriHtmlDocument, "read_io", rb_html_document_s_read_io, 4);
+  rb_define_singleton_method(cNokogiriHtmlDocument, "new", rb_html_document_s_new, -1);
+
+  rb_define_method(cNokogiriHtmlDocument, "type", rb_html_document_type, 0);
+
+  id_encoding_found = rb_intern("encoding_found");
+  id_to_s = rb_intern("to_s");
+}

data/ext/nokogiri/html_document.h

@@ -0,0 +1,10 @@
+#ifndef NOKOGIRI_HTML_DOCUMENT
+#define NOKOGIRI_HTML_DOCUMENT
+
+#include <nokogiri.h>
+
+void init_html_document();
+
+extern VALUE cNokogiriHtmlDocument ;
+
+#endif

data/ext/nokogiri/html_element_description.c

@@ -0,0 +1,279 @@
+#include <html_element_description.h>
+
+/*
+ * call-seq:
+ *  required_attributes
+ *
+ * A list of required attributes for this element
+ */
+static VALUE required_attributes(VALUE self)
+{
+  const htmlElemDesc * description;
+  VALUE list;
+  int i;
+
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  list = rb_ary_new();
+
+  if(NULL == description->attrs_req) return list;
+
+  for(i = 0; description->attrs_depr[i]; i++) {
+    rb_ary_push(list, NOKOGIRI_STR_NEW2(description->attrs_req[i]));
+  }
+
+  return list;
+}
+
+/*
+ * call-seq:
+ *  deprecated_attributes
+ *
+ * A list of deprecated attributes for this element
+ */
+static VALUE deprecated_attributes(VALUE self)
+{
+  const htmlElemDesc * description;
+  VALUE list;
+  int i;
+
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  list = rb_ary_new();
+
+  if(NULL == description->attrs_depr) return list;
+
+  for(i = 0; description->attrs_depr[i]; i++) {
+    rb_ary_push(list, NOKOGIRI_STR_NEW2(description->attrs_depr[i]));
+  }
+
+  return list;
+}
+
+/*
+ * call-seq:
+ *  optional_attributes
+ *
+ * A list of optional attributes for this element
+ */
+static VALUE optional_attributes(VALUE self)
+{
+  const htmlElemDesc * description;
+  VALUE list;
+  int i;
+
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  list = rb_ary_new();
+
+  if(NULL == description->attrs_opt) return list;
+
+  for(i = 0; description->attrs_opt[i]; i++) {
+    rb_ary_push(list, NOKOGIRI_STR_NEW2(description->attrs_opt[i]));
+  }
+
+  return list;
+}
+
+/*
+ * call-seq:
+ *  default_sub_element
+ *
+ * The default sub element for this element
+ */
+static VALUE default_sub_element(VALUE self)
+{
+  const htmlElemDesc * description;
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  if (description->defaultsubelt)
+    return NOKOGIRI_STR_NEW2(description->defaultsubelt);
+
+  return Qnil;
+}
+
+/*
+ * call-seq:
+ *  sub_elements
+ *
+ * A list of allowed sub elements for this element.
+ */
+static VALUE sub_elements(VALUE self)
+{
+  const htmlElemDesc * description;
+  VALUE list;
+  int i;
+
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  list = rb_ary_new();
+
+  if(NULL == description->subelts) return list;
+
+  for(i = 0; description->subelts[i]; i++) {
+    rb_ary_push(list, NOKOGIRI_STR_NEW2(description->subelts[i]));
+  }
+
+  return list;
+}
+
+/*
+ * call-seq:
+ *  description
+ *
+ * The description for this element
+ */
+static VALUE description(VALUE self)
+{
+  const htmlElemDesc * description;
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  return NOKOGIRI_STR_NEW2(description->desc);
+}
+
+/*
+ * call-seq:
+ *  inline?
+ *
+ * Is this element an inline element?
+ */
+static VALUE inline_eh(VALUE self)
+{
+  const htmlElemDesc * description;
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  if(description->isinline) return Qtrue;
+  return Qfalse;
+}
+
+/*
+ * call-seq:
+ *  deprecated?
+ *
+ * Is this element deprecated?
+ */
+static VALUE deprecated_eh(VALUE self)
+{
+  const htmlElemDesc * description;
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  if(description->depr) return Qtrue;
+  return Qfalse;
+}
+
+/*
+ * call-seq:
+ *  empty?
+ *
+ * Is this an empty element?
+ */
+static VALUE empty_eh(VALUE self)
+{
+  const htmlElemDesc * description;
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  if(description->empty) return Qtrue;
+  return Qfalse;
+}
+
+/*
+ * call-seq:
+ *  save_end_tag?
+ *
+ * Should the end tag be saved?
+ */
+static VALUE save_end_tag_eh(VALUE self)
+{
+  const htmlElemDesc * description;
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  if(description->saveEndTag) return Qtrue;
+  return Qfalse;
+}
+
+/*
+ * call-seq:
+ *  implied_end_tag?
+ *
+ * Can the end tag be implied for this tag?
+ */
+static VALUE implied_end_tag_eh(VALUE self)
+{
+  const htmlElemDesc * description;
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  if(description->endTag) return Qtrue;
+  return Qfalse;
+}
+
+/*
+ * call-seq:
+ *  implied_start_tag?
+ *
+ * Can the start tag be implied for this tag?
+ */
+static VALUE implied_start_tag_eh(VALUE self)
+{
+  const htmlElemDesc * description;
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  if(description->startTag) return Qtrue;
+  return Qfalse;
+}
+
+/*
+ * call-seq:
+ *  name
+ *
+ * Get the tag name for this ElemementDescription
+ */
+static VALUE name(VALUE self)
+{
+  const htmlElemDesc * description;
+  Data_Get_Struct(self, htmlElemDesc, description);
+
+  if(NULL == description->name) return Qnil;
+  return NOKOGIRI_STR_NEW2(description->name);
+}
+
+/*
+ * call-seq:
+ *  [](tag_name)
+ *
+ * Get ElemementDescription for +tag_name+
+ */
+static VALUE get_description(VALUE klass, VALUE tag_name)
+{
+  const htmlElemDesc * description = htmlTagLookup(
+      (const xmlChar *)StringValueCStr(tag_name)
+  );
+
+  if(NULL == description) return Qnil;
+  return Data_Wrap_Struct(klass, 0, 0, (void *)(uintptr_t)description);
+}
+
+VALUE cNokogiriHtmlElementDescription ;
+void init_html_element_description()
+{
+  VALUE nokogiri = rb_define_module("Nokogiri");
+  VALUE html     = rb_define_module_under(nokogiri, "HTML");
+  VALUE klass    = rb_define_class_under(html, "ElementDescription",rb_cObject);
+
+  cNokogiriHtmlElementDescription = klass;
+
+  rb_define_singleton_method(klass, "[]", get_description, 1);
+
+  rb_define_method(klass, "name", name, 0);
+  rb_define_method(klass, "implied_start_tag?", implied_start_tag_eh, 0);
+  rb_define_method(klass, "implied_end_tag?", implied_end_tag_eh, 0);
+  rb_define_method(klass, "save_end_tag?", save_end_tag_eh, 0);
+  rb_define_method(klass, "empty?", empty_eh, 0);
+  rb_define_method(klass, "deprecated?", deprecated_eh, 0);
+  rb_define_method(klass, "inline?", inline_eh, 0);
+  rb_define_method(klass, "description", description, 0);
+  rb_define_method(klass, "sub_elements", sub_elements, 0);
+  rb_define_method(klass, "default_sub_element", default_sub_element, 0);
+  rb_define_method(klass, "optional_attributes", optional_attributes, 0);
+  rb_define_method(klass, "deprecated_attributes", deprecated_attributes, 0);
+  rb_define_method(klass, "required_attributes", required_attributes, 0);
+}

data/ext/nokogiri/html_element_description.h

@@ -0,0 +1,10 @@
+#ifndef NOKOGIRI_HTML_ELEMENT_DESCRIPTION
+#define NOKOGIRI_HTML_ELEMENT_DESCRIPTION
+
+#include <nokogiri.h>
+
+void init_html_element_description();
+
+extern VALUE cNokogiriHtmlElementDescription ;
+
+#endif

data/ext/nokogiri/html_entity_lookup.c

@@ -0,0 +1,32 @@
+#include <html_entity_lookup.h>
+
+/*
+ * call-seq:
+ *  get(key)
+ *
+ * Get the HTML::EntityDescription for +key+
+ */
+static VALUE get(VALUE self, VALUE key)
+{
+  const htmlEntityDesc * desc =
+    htmlEntityLookup((const xmlChar *)StringValueCStr(key));
+  VALUE klass, args[3];
+
+  if(NULL == desc) return Qnil;
+  klass = rb_const_get(mNokogiriHtml, rb_intern("EntityDescription"));
+
+  args[0] = INT2NUM((long)desc->value);
+  args[1] = NOKOGIRI_STR_NEW2(desc->name);
+  args[2] = NOKOGIRI_STR_NEW2(desc->desc);
+
+  return rb_class_new_instance(3, args, klass);
+}
+
+void init_html_entity_lookup()
+{
+  VALUE nokogiri = rb_define_module("Nokogiri");
+  VALUE html = rb_define_module_under(nokogiri, "HTML");
+  VALUE klass = rb_define_class_under(html, "EntityLookup", rb_cObject);
+
+  rb_define_method(klass, "get", get, 1);
+}

data/ext/nokogiri/html_entity_lookup.h

@@ -0,0 +1,8 @@
+#ifndef NOKOGIRI_HTML_ENTITY_LOOKUP
+#define NOKOGIRI_HTML_ENTITY_LOOKUP
+
+#include <nokogiri.h>
+
+void init_html_entity_lookup();
+
+#endif

data/ext/nokogiri/html_sax_parser_context.c

@@ -0,0 +1,116 @@
+#include <html_sax_parser_context.h>
+
+VALUE cNokogiriHtmlSaxParserContext ;
+
+static void deallocate(xmlParserCtxtPtr ctxt)
+{
+  NOKOGIRI_DEBUG_START(ctxt);
+
+  ctxt->sax = NULL;
+
+  htmlFreeParserCtxt(ctxt);
+
+  NOKOGIRI_DEBUG_END(ctxt);
+}
+
+static VALUE
+parse_memory(VALUE klass, VALUE data, VALUE encoding)
+{
+    htmlParserCtxtPtr ctxt;
+
+    if (NIL_P(data))
+	rb_raise(rb_eArgError, "data cannot be nil");
+    if (!(int)RSTRING_LEN(data))
+	rb_raise(rb_eRuntimeError, "data cannot be empty");
+
+    ctxt = htmlCreateMemoryParserCtxt(StringValuePtr(data),
+				      (int)RSTRING_LEN(data));
+    if (ctxt->sax) {
+	xmlFree(ctxt->sax);
+	ctxt->sax = NULL;
+    }
+
+    if (RTEST(encoding)) {
+	xmlCharEncodingHandlerPtr enc = xmlFindCharEncodingHandler(StringValueCStr(encoding));
+	if (enc != NULL) {
+	    xmlSwitchToEncoding(ctxt, enc);
+	    if (ctxt->errNo == XML_ERR_UNSUPPORTED_ENCODING) {
+		rb_raise(rb_eRuntimeError, "Unsupported encoding %s",
+			 StringValueCStr(encoding));
+	    }
+	}
+    }
+
+    return Data_Wrap_Struct(klass, NULL, deallocate, ctxt);
+}
+
+static VALUE parse_file(VALUE klass, VALUE filename, VALUE encoding)
+{
+  htmlParserCtxtPtr ctxt = htmlCreateFileParserCtxt(
+      StringValueCStr(filename),
+      StringValueCStr(encoding)
+  );
+  return Data_Wrap_Struct(klass, NULL, deallocate, ctxt);
+}
+
+static VALUE
+parse_doc(VALUE ctxt_val)
+{
+    htmlParserCtxtPtr ctxt = (htmlParserCtxtPtr)ctxt_val;
+    htmlParseDocument(ctxt);
+    return Qnil;
+}
+
+static VALUE
+parse_doc_finalize(VALUE ctxt_val)
+{
+    htmlParserCtxtPtr ctxt = (htmlParserCtxtPtr)ctxt_val;
+
+    if (ctxt->myDoc)
+	xmlFreeDoc(ctxt->myDoc);
+
+    NOKOGIRI_SAX_TUPLE_DESTROY(ctxt->userData);
+    return Qnil;
+}
+
+static VALUE
+parse_with(VALUE self, VALUE sax_handler)
+{
+    htmlParserCtxtPtr ctxt;
+    htmlSAXHandlerPtr sax;
+
+    if (!rb_obj_is_kind_of(sax_handler, cNokogiriXmlSaxParser))
+	rb_raise(rb_eArgError, "argument must be a Nokogiri::XML::SAX::Parser");
+
+    Data_Get_Struct(self, htmlParserCtxt, ctxt);
+    Data_Get_Struct(sax_handler, htmlSAXHandler, sax);
+
+    /* Free the sax handler since we'll assign our own */
+    if (ctxt->sax && ctxt->sax != (xmlSAXHandlerPtr)&xmlDefaultSAXHandler)
+	xmlFree(ctxt->sax);
+
+    ctxt->sax = sax;
+    ctxt->userData = (void *)NOKOGIRI_SAX_TUPLE_NEW(ctxt, sax_handler);
+
+    rb_ensure(parse_doc, (VALUE)ctxt, parse_doc_finalize, (VALUE)ctxt);
+
+    return self;
+}
+
+void init_html_sax_parser_context()
+{
+  VALUE nokogiri  = rb_define_module("Nokogiri");
+  VALUE xml       = rb_define_module_under(nokogiri, "XML");
+  VALUE html      = rb_define_module_under(nokogiri, "HTML");
+  VALUE sax       = rb_define_module_under(xml, "SAX");
+  VALUE hsax      = rb_define_module_under(html, "SAX");
+  VALUE pc        = rb_define_class_under(sax, "ParserContext", rb_cObject);
+  VALUE klass     = rb_define_class_under(hsax, "ParserContext", pc);
+
+  cNokogiriHtmlSaxParserContext = klass;
+
+  rb_define_singleton_method(klass, "memory", parse_memory, 2);
+  rb_define_singleton_method(klass, "file", parse_file, 2);
+
+  rb_define_method(klass, "parse_with", parse_with, 1);
+}

data/ext/nokogiri/html_sax_parser_context.h

@@ -0,0 +1,11 @@
+#ifndef NOKOGIRI_HTML_SAX_PARSER_CONTEXT
+#define NOKOGIRI_HTML_SAX_PARSER_CONTEXT
+
+#include <nokogiri.h>
+
+extern VALUE cNokogiriHtmlSaxParserContext;
+
+void init_html_sax_parser_context();
+
+#endif
+