From 4c06c8554c35887f8f5147783953b2b7e7c2327f Mon Sep 17 00:00:00 2001
From: Titus Wormer <tituswormer@gmail.com>
Date: Wed, 8 Jun 2022 15:52:16 +0200
Subject: .

---
 tests/html_flow.rs | 1058 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 1058 insertions(+)
 create mode 100644 tests/html_flow.rs

(limited to 'tests/html_flow.rs')

diff --git a/tests/html_flow.rs b/tests/html_flow.rs
new file mode 100644
index 0000000..51d1a2a
--- /dev/null
+++ b/tests/html_flow.rs
@@ -0,0 +1,1058 @@
+extern crate micromark;
+use micromark::{micromark, micromark_with_options, CompileOptions};
+
+const DANGER: &CompileOptions = &CompileOptions {
+    allow_dangerous_html: true,
+};
+
+#[test]
+fn html_flow() {
+    assert_eq!(
+        micromark("<!-- asd -->"),
+        "&lt;!-- asd --&gt;",
+        "should support a heading w/ rank 1"
+    );
+
+    assert_eq!(
+        micromark_with_options("<!-- asd -->", DANGER),
+        "<!-- asd -->",
+        "should support a heading w/ rank 1"
+    );
+
+    // To do: extensions.
+    // assert_eq!(
+    //   micromark_with_options("<x>", {extensions: [{disable: {null: ["htmlFlow"]}}]}),
+    //   "<p>&lt;x&gt;</p>",
+    //   "should support turning off html (flow)"
+    // );
+}
+
+#[test]
+fn html_flow_1_raw() {
+    assert_eq!(
+        micromark_with_options(
+            "<pre language=\"haskell\"><code>
+import Text.HTML.TagSoup
+
+main :: IO ()
+main = print $ parseTags tags
+</code></pre>
+okay",
+            DANGER
+        ),
+        "<pre language=\"haskell\"><code>
+import Text.HTML.TagSoup
+
+main :: IO ()
+main = print $ parseTags tags
+</code></pre>
+<p>okay</p>",
+        "should support raw pre tags (type 1)"
+    );
+
+    assert_eq!(
+        micromark_with_options(
+            "<script type=\"text/javascript\">
+// JavaScript example
+
+document.getElementById(\"demo\").innerHTML = \"Hello JavaScript!\";
+</script>
+okay",
+            DANGER
+        ),
+        "<script type=\"text/javascript\">
+// JavaScript example
+
+document.getElementById(\"demo\").innerHTML = \"Hello JavaScript!\";
+</script>
+<p>okay</p>",
+        "should support raw script tags"
+    );
+
+    assert_eq!(
+        micromark_with_options(
+            "<style
+  type=\"text/css\">
+h1 {color:red;}
+
+p {color:blue;}
+</style>
+okay",
+            DANGER
+        ),
+        "<style
+  type=\"text/css\">
+h1 {color:red;}
+
+p {color:blue;}
+</style>
+<p>okay</p>",
+        "should support raw style tags"
+    );
+
+    assert_eq!(
+        micromark_with_options("<style\n  type=\"text/css\">\n\nfoo", DANGER),
+        "<style\n  type=\"text/css\">\n\nfoo",
+        "should support raw tags w/o ending"
+    );
+
+    // To do: phrasing.
+    // assert_eq!(
+    //     micromark_with_options("<style>p{color:red;}</style>\n*foo*", DANGER),
+    //     "<style>p{color:red;}</style>\n<p><em>foo</em></p>",
+    //     "should support raw tags w/ start and end on a single line"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<script>\nfoo\n</script>1. *bar*", DANGER),
+        "<script>\nfoo\n</script>1. *bar*",
+        "should support raw tags w/ more data on ending line"
+    );
+
+    assert_eq!(
+        micromark_with_options("<script", DANGER),
+        "<script",
+        "should support an eof directly after a raw tag name"
+    );
+
+    // To do: paragraphs.
+    // assert_eq!(
+    //     micromark_with_options("</script\nmore", DANGER),
+    //     "<p>&lt;/script\nmore</p>",
+    //     "should not support a raw closing tag"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<script/", DANGER),
+        "<p>&lt;script/</p>",
+        "should not support an eof after a self-closing slash"
+    );
+
+    // To do: phrasing.
+    // assert_eq!(
+    //     micromark_with_options("<script/\n*asd*", DANGER),
+    //     "<p>&lt;script/\n<em>asd</em></p>",
+    //     "should not support a line ending after a self-closing slash"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<script/>", DANGER),
+        "<script/>",
+        "should support an eof after a self-closing tag"
+    );
+
+    assert_eq!(
+        micromark_with_options("<script/>\na", DANGER),
+        "<script/>\na",
+        "should support a line ending after a self-closing tag"
+    );
+
+    // To do: html (text).
+    // assert_eq!(
+    //     micromark_with_options("<script/>a", DANGER),
+    //     "<p><script/>a</p>",
+    //     "should not support other characters after a self-closing tag"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<script>a", DANGER),
+        "<script>a",
+        "should support other characters after a raw opening tag"
+    );
+
+    // Extra.
+    assert_eq!(
+        micromark_with_options("Foo\n<script", DANGER),
+        "<p>Foo</p>\n<script",
+        "should support interrupting paragraphs w/ raw tags"
+    );
+
+    assert_eq!(
+        micromark_with_options("<script>\n  \n  \n</script>", DANGER),
+        "<script>\n  \n  \n</script>",
+        "should support blank lines in raw"
+    );
+
+    // To do: block quote.
+    // assert_eq!(
+    //     micromark_with_options("> <script>\na", DANGER),
+    //     "<blockquote>\n<script>\n</blockquote>\n<p>a</p>",
+    //     "should not support lazyness (1)"
+    // );
+
+    // assert_eq!(
+    //     micromark_with_options("> a\n<script>", DANGER),
+    //     "<blockquote>\n<p>a</p>\n</blockquote>\n<script>",
+    //     "should not support lazyness (2)"
+    // );
+}
+
+#[test]
+fn html_flow_2_comment() {
+    assert_eq!(
+        micromark_with_options("<!-- Foo\n\nbar\n   baz -->\nokay", DANGER),
+        "<!-- Foo\n\nbar\n   baz -->\n<p>okay</p>",
+        "should support comments (type 2)"
+    );
+
+    // To do: phrasing.
+    // assert_eq!(
+    //     micromark_with_options("<!-- foo -->*bar*\n*baz*", DANGER),
+    //     "<!-- foo -->*bar*\n<p><em>baz</em></p>",
+    //     "should support comments w/ start and end on a single line"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<!-asd-->", DANGER),
+        "<p>&lt;!-asd--&gt;</p>",
+        "should not support a single dash to start comments"
+    );
+
+    assert_eq!(
+        micromark_with_options("<!-->", DANGER),
+        "<!-->",
+        "should support comments where the start dashes are the end dashes (1)"
+    );
+
+    assert_eq!(
+        micromark_with_options("<!--->", DANGER),
+        "<!--->",
+        "should support comments where the start dashes are the end dashes (2)"
+    );
+
+    assert_eq!(
+        micromark_with_options("<!---->", DANGER),
+        "<!---->",
+        "should support empty comments"
+    );
+
+    // If the `\"` is encoded, we’re in text. If it remains, we’re in HTML.
+    assert_eq!(
+        micromark_with_options("<!--\n->\n\"", DANGER),
+        "<!--\n->\n\"",
+        "should not end a comment at one dash (`->`)"
+    );
+    assert_eq!(
+        micromark_with_options("<!--\n-->\n\"", DANGER),
+        "<!--\n-->\n<p>&quot;</p>",
+        "should end a comment at two dashes (`-->`)"
+    );
+    assert_eq!(
+        micromark_with_options("<!--\n--->\n\"", DANGER),
+        "<!--\n--->\n<p>&quot;</p>",
+        "should end a comment at three dashes (`--->`)"
+    );
+    assert_eq!(
+        micromark_with_options("<!--\n---->\n\"", DANGER),
+        "<!--\n---->\n<p>&quot;</p>",
+        "should end a comment at four dashes (`---->`)"
+    );
+
+    assert_eq!(
+        micromark_with_options("  <!-- foo -->", DANGER),
+        "  <!-- foo -->",
+        "should support comments w/ indent"
+    );
+
+    assert_eq!(
+        micromark_with_options("    <!-- foo -->", DANGER),
+        "<pre><code>&lt;!-- foo --&gt;\n</code></pre>",
+        "should not support comments w/ a 4 character indent"
+    );
+
+    // Extra.
+    assert_eq!(
+        micromark_with_options("Foo\n<!--", DANGER),
+        "<p>Foo</p>\n<!--",
+        "should support interrupting paragraphs w/ comments"
+    );
+
+    assert_eq!(
+        micromark_with_options("<!--\n  \n  \n-->", DANGER),
+        "<!--\n  \n  \n-->",
+        "should support blank lines in comments"
+    );
+
+    // To do: blockquote.
+    // assert_eq!(
+    //     micromark_with_options("> <!--\na", DANGER),
+    //     "<blockquote>\n<!--\n</blockquote>\n<p>a</p>",
+    //     "should not support lazyness (1)"
+    // );
+
+    // assert_eq!(
+    //     micromark_with_options("> a\n<!--", DANGER),
+    //     "<blockquote>\n<p>a</p>\n</blockquote>\n<!--",
+    //     "should not support lazyness (2)"
+    // );
+}
+
+#[test]
+fn html_flow_3_instruction() {
+    assert_eq!(
+        micromark_with_options("<?php\n\n  echo \">\";\n\n?>\nokay", DANGER),
+        "<?php\n\n  echo \">\";\n\n?>\n<p>okay</p>",
+        "should support instructions (type 3)"
+    );
+
+    assert_eq!(
+        micromark_with_options("<?>", DANGER),
+        "<?>",
+        "should support empty instructions where the `?` is part of both the start and the end"
+    );
+
+    assert_eq!(
+        micromark_with_options("<??>", DANGER),
+        "<??>",
+        "should support empty instructions"
+    );
+
+    // Extra.
+    assert_eq!(
+        micromark_with_options("Foo\n<?", DANGER),
+        "<p>Foo</p>\n<?",
+        "should support interrupting paragraphs w/ instructions"
+    );
+
+    assert_eq!(
+        micromark_with_options("<?\n  \n  \n?>", DANGER),
+        "<?\n  \n  \n?>",
+        "should support blank lines in instructions"
+    );
+
+    // To do: blockquote.
+    // assert_eq!(
+    //     micromark_with_options("> <?\na", DANGER),
+    //     "<blockquote>\n<?\n</blockquote>\n<p>a</p>",
+    //     "should not support lazyness (1)"
+    // );
+
+    // assert_eq!(
+    //     micromark_with_options("> a\n<?", DANGER),
+    //     "<blockquote>\n<p>a</p>\n</blockquote>\n<?",
+    //     "should not support lazyness (2)"
+    // );
+}
+
+#[test]
+fn html_flow_4_declaration() {
+    assert_eq!(
+        micromark_with_options("<!DOCTYPE html>", DANGER),
+        "<!DOCTYPE html>",
+        "should support declarations (type 4)"
+    );
+
+    assert_eq!(
+        micromark_with_options("<!123>", DANGER),
+        "<p>&lt;!123&gt;</p>",
+        "should not support declarations that start w/o an alpha"
+    );
+
+    assert_eq!(
+        micromark_with_options("<!>", DANGER),
+        "<p>&lt;!&gt;</p>",
+        "should not support declarations w/o an identifier"
+    );
+
+    assert_eq!(
+        micromark_with_options("<!a>", DANGER),
+        "<!a>",
+        "should support declarations w/o a single alpha as identifier"
+    );
+
+    // Extra.
+    assert_eq!(
+        micromark_with_options("Foo\n<!d", DANGER),
+        "<p>Foo</p>\n<!d",
+        "should support interrupting paragraphs w/ declarations"
+    );
+
+    // Note about the lower letter:
+    // <https://github.com/commonmark/commonmark-spec/pull/621>
+    assert_eq!(
+        micromark_with_options("<!a\n  \n  \n>", DANGER),
+        "<!a\n  \n  \n>",
+        "should support blank lines in declarations"
+    );
+
+    // To do: blockquote.
+    // assert_eq!(
+    //     micromark_with_options("> <!a\nb", DANGER),
+    //     "<blockquote>\n<!a\n</blockquote>\n<p>b</p>",
+    //     "should not support lazyness (1)"
+    // );
+
+    // assert_eq!(
+    //     micromark_with_options("> a\n<!b", DANGER),
+    //     "<blockquote>\n<p>a</p>\n</blockquote>\n<!b",
+    //     "should not support lazyness (2)"
+    // );
+}
+
+#[test]
+fn html_flow_5_cdata() {
+    assert_eq!(
+    micromark_with_options(
+      "<![CDATA[\nfunction matchwo(a,b)\n{\n  if (a < b && a < 0) then {\n    return 1;\n\n  } else {\n\n    return 0;\n  }\n}\n]]>\nokay",
+      DANGER
+    ),
+    "<![CDATA[\nfunction matchwo(a,b)\n{\n  if (a < b && a < 0) then {\n    return 1;\n\n  } else {\n\n    return 0;\n  }\n}\n]]>\n<p>okay</p>",
+    "should support cdata (type 5)"
+  );
+
+    assert_eq!(
+        micromark_with_options("<![CDATA[]]>", DANGER),
+        "<![CDATA[]]>",
+        "should support empty cdata"
+    );
+
+    assert_eq!(
+        micromark_with_options("<![CDATA]]>", DANGER),
+        "<p>&lt;![CDATA]]&gt;</p>",
+        "should not support cdata w/ a missing `[`"
+    );
+
+    assert_eq!(
+        micromark_with_options("<![CDATA[]]]>", DANGER),
+        "<![CDATA[]]]>",
+        "should support cdata w/ a single `]` as content"
+    );
+
+    // Extra.
+    assert_eq!(
+        micromark_with_options("Foo\n<![CDATA[", DANGER),
+        "<p>Foo</p>\n<![CDATA[",
+        "should support interrupting paragraphs w/ cdata"
+    );
+
+    // Note: cmjs parses this differently.
+    // See: <https://github.com/commonmark/commonmark.js/issues/193>
+    assert_eq!(
+        micromark_with_options("<![cdata[]]>", DANGER),
+        "<p>&lt;![cdata[]]&gt;</p>",
+        "should not support lowercase cdata"
+    );
+
+    assert_eq!(
+        micromark_with_options("<![CDATA[\n  \n  \n]]>", DANGER),
+        "<![CDATA[\n  \n  \n]]>",
+        "should support blank lines in cdata"
+    );
+
+    // To do: blockquote.
+    // assert_eq!(
+    //     micromark_with_options("> <![CDATA[\na", DANGER),
+    //     "<blockquote>\n<![CDATA[\n</blockquote>\n<p>a</p>",
+    //     "should not support lazyness (1)"
+    // );
+
+    // assert_eq!(
+    //     micromark_with_options("> a\n<![CDATA[", DANGER),
+    //     "<blockquote>\n<p>a</p>\n</blockquote>\n<![CDATA[",
+    //     "should not support lazyness (2)"
+    // );
+}
+
+#[test]
+fn html_flow_6_basic() {
+    // To do: phrasing, paragraphs, etc.
+    // assert_eq!(
+    //     micromark_with_options(
+    //         "<table><tr><td>\n<pre>\n**Hello**,\n\n_world_.\n</pre>\n</td></tr></table>",
+    //         DANGER
+    //     ),
+    //     "<table><tr><td>\n<pre>\n**Hello**,\n<p><em>world</em>.\n</pre></p>\n</td></tr></table>",
+    //     "should support html (basic)"
+    // );
+
+    // To do: paragraphs.
+    //     assert_eq!(
+    //         micromark_with_options(
+    //             "<table>
+    //   <tr>
+    //     <td>
+    //            hi
+    //     </td>
+    //   </tr>
+    // </table>
+
+    // okay.",
+    //             DANGER
+    //         ),
+    //         "<table>
+    //   <tr>
+    //     <td>
+    //            hi
+    //     </td>
+    //   </tr>
+    // </table>
+    // <p>okay.</p>",
+    //         "should support html of type 6 (1)"
+    //     );
+
+    assert_eq!(
+        micromark_with_options(" <div>\n  *hello*\n         <foo><a>", DANGER),
+        " <div>\n  *hello*\n         <foo><a>",
+        "should support html of type 6 (2)"
+    );
+
+    assert_eq!(
+        micromark_with_options("</div>\n*foo*", DANGER),
+        "</div>\n*foo*",
+        "should support html starting w/ a closing tag"
+    );
+
+    // To do: phrasing
+    // assert_eq!(
+    //     micromark_with_options("<DIV CLASS=\"foo\">\n\n*Markdown*\n\n</DIV>", DANGER),
+    //     "<DIV CLASS=\"foo\">\n<p><em>Markdown</em></p>\n</DIV>",
+    //     "should support html w/ markdown in between"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<div id=\"foo\"\n  class=\"bar\">\n</div>", DANGER),
+        "<div id=\"foo\"\n  class=\"bar\">\n</div>",
+        "should support html w/ line endings (1)"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div id=\"foo\" class=\"bar\n  baz\">\n</div>", DANGER),
+        "<div id=\"foo\" class=\"bar\n  baz\">\n</div>",
+        "should support html w/ line endings (2)"
+    );
+
+    // To do: phrasing.
+    // assert_eq!(
+    //     micromark_with_options("<div>\n*foo*\n\n*bar*", DANGER),
+    //     "<div>\n*foo*\n<p><em>bar</em></p>",
+    //     "should support an unclosed html element"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<div id=\"foo\"\n*hi*", DANGER),
+        "<div id=\"foo\"\n*hi*",
+        "should support garbage html (1)"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div class\nfoo", DANGER),
+        "<div class\nfoo",
+        "should support garbage html (2)"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div *???-&&&-<---\n*foo*", DANGER),
+        "<div *???-&&&-<---\n*foo*",
+        "should support garbage html (3)"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div><a href=\"bar\">*foo*</a></div>", DANGER),
+        "<div><a href=\"bar\">*foo*</a></div>",
+        "should support other tags in the opening (1)"
+    );
+
+    assert_eq!(
+        micromark_with_options("<table><tr><td>\nfoo\n</td></tr></table>", DANGER),
+        "<table><tr><td>\nfoo\n</td></tr></table>",
+        "should support other tags in the opening (2)"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div></div>\n``` c\nint x = 33;\n```", DANGER),
+        "<div></div>\n``` c\nint x = 33;\n```",
+        "should include everything ’till a blank line"
+    );
+
+    // To do: blockquote.
+    // assert_eq!(
+    //     micromark_with_options("> <div>\n> foo\n\nbar", DANGER),
+    //     "<blockquote>\n<div>\nfoo\n</blockquote>\n<p>bar</p>",
+    //     "should support basic tags w/o ending in containers (1)"
+    // );
+
+    // To do: list.
+    // assert_eq!(
+    //     micromark_with_options("- <div>\n- foo", DANGER),
+    //     "<ul>\n<li>\n<div>\n</li>\n<li>foo</li>\n</ul>",
+    //     "should support basic tags w/o ending in containers (2)"
+    // );
+
+    assert_eq!(
+        micromark_with_options("  <div>", DANGER),
+        "  <div>",
+        "should support basic tags w/ indent"
+    );
+
+    assert_eq!(
+        micromark_with_options("    <div>", DANGER),
+        "<pre><code>&lt;div&gt;\n</code></pre>",
+        "should not support basic tags w/ a 4 character indent"
+    );
+
+    assert_eq!(
+        micromark_with_options("Foo\n<div>\nbar\n</div>", DANGER),
+        "<p>Foo</p>\n<div>\nbar\n</div>",
+        "should support interrupting paragraphs w/ basic tags"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div>\nbar\n</div>\n*foo*", DANGER),
+        "<div>\nbar\n</div>\n*foo*",
+        "should require a blank line to end"
+    );
+
+    // To do: phrasing.
+    // assert_eq!(
+    //     micromark_with_options("<div>\n\n*Emphasized* text.\n\n</div>", DANGER),
+    //     "<div>\n<p><em>Emphasized</em> text.</p>\n</div>",
+    //     "should support interleaving w/ blank lines"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<div>\n*Emphasized* text.\n</div>", DANGER),
+        "<div>\n*Emphasized* text.\n</div>",
+        "should not support interleaving w/o blank lines"
+    );
+
+    assert_eq!(
+        micromark_with_options(
+            "<table>\n\n<tr>\n\n<td>\nHi\n</td>\n\n</tr>\n\n</table>",
+            DANGER
+        ),
+        "<table>\n<tr>\n<td>\nHi\n</td>\n</tr>\n</table>",
+        "should support blank lines between adjacent html"
+    );
+
+    assert_eq!(
+        micromark_with_options(
+            "<table>
+
+  <tr>
+
+    <td>
+      Hi
+    </td>
+
+  </tr>
+
+</table>",
+            DANGER
+        ),
+        "<table>
+  <tr>
+<pre><code>&lt;td&gt;
+  Hi
+&lt;/td&gt;
+</code></pre>
+  </tr>
+</table>",
+        "should not support indented, blank-line delimited, adjacent html"
+    );
+
+    assert_eq!(
+        micromark_with_options("</1>", DANGER),
+        "<p>&lt;/1&gt;</p>",
+        "should not support basic tags w/ an incorrect name start character"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div", DANGER),
+        "<div",
+        "should support an eof directly after a basic tag name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div\n", DANGER),
+        "<div\n",
+        "should support a line ending directly after a tag name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div ", DANGER),
+        "<div ",
+        "should support an eof after a space directly after a tag name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div/", DANGER),
+        "<p>&lt;div/</p>",
+        "should not support an eof directly after a self-closing slash"
+    );
+
+    // To do: phrasing.
+    // assert_eq!(
+    //     micromark_with_options("<div/\n*asd*", DANGER),
+    //     "<p>&lt;div/\n<em>asd</em></p>",
+    //     "should not support a line ending after a self-closing slash"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<div/>", DANGER),
+        "<div/>",
+        "should support an eof after a self-closing tag"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div/>\na", DANGER),
+        "<div/>\na",
+        "should support a line ending after a self-closing tag"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div/>a", DANGER),
+        "<div/>a",
+        "should support another character after a self-closing tag"
+    );
+
+    assert_eq!(
+        micromark_with_options("<div>a", DANGER),
+        "<div>a",
+        "should support another character after a basic opening tag"
+    );
+
+    // Extra.
+    assert_eq!(
+        micromark_with_options("Foo\n<div/>", DANGER),
+        "<p>Foo</p>\n<div/>",
+        "should support interrupting paragraphs w/ self-closing basic tags"
+    );
+
+    // To do: block quote.
+    // assert_eq!(
+    //     micromark_with_options("<div\n  \n  \n>", DANGER),
+    //     "<div\n<blockquote>\n</blockquote>",
+    //     "should not support blank lines in basic"
+    // );
+
+    // assert_eq!(
+    //     micromark_with_options("> <div\na", DANGER),
+    //     "<blockquote>\n<div\n</blockquote>\n<p>a</p>",
+    //     "should not support lazyness (1)"
+    // );
+
+    // assert_eq!(
+    //     micromark_with_options("> a\n<div", DANGER),
+    //     "<blockquote>\n<p>a</p>\n</blockquote>\n<div",
+    //     "should not support lazyness (2)"
+    // );
+}
+
+#[test]
+fn html_flow_7_complete() {
+    // To do: phrasing.
+    // assert_eq!(
+    //     micromark_with_options("<a href=\"foo\">\n*bar*\n</a>", DANGER),
+    //     "<a href=\"foo\">\n*bar*\n</a>",
+    //     "should support complete tags (type 7)"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<Warning>\n*bar*\n</Warning>", DANGER),
+        "<Warning>\n*bar*\n</Warning>",
+        "should support non-html tag names"
+    );
+
+    assert_eq!(
+        micromark_with_options("<i class=\"foo\">\n*bar*\n</i>", DANGER),
+        "<i class=\"foo\">\n*bar*\n</i>",
+        "should support non-“block” html tag names (1)"
+    );
+
+    assert_eq!(
+        micromark_with_options("<del>\n*foo*\n</del>", DANGER),
+        "<del>\n*foo*\n</del>",
+        "should support non-“block” html tag names (2)"
+    );
+
+    assert_eq!(
+        micromark_with_options("</ins>\n*bar*", DANGER),
+        "</ins>\n*bar*",
+        "should support closing tags"
+    );
+
+    // To do: phrasing.
+    // assert_eq!(
+    //     micromark_with_options("<del>\n\n*foo*\n\n</del>", DANGER),
+    //     "<del>\n<p><em>foo</em></p>\n</del>",
+    //     "should support interleaving"
+    // );
+
+    // To do: html (text).
+    // assert_eq!(
+    //     micromark_with_options("<del>*foo*</del>", DANGER),
+    //     "<p><del><em>foo</em></del></p>",
+    //     "should not support interleaving w/o blank lines"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<div>\n  \nasd", DANGER),
+        "<div>\n<p>asd</p>",
+        "should support interleaving w/ whitespace-only blank lines"
+    );
+
+    // To do: interrupting.
+    // assert_eq!(
+    //     micromark_with_options("Foo\n<a href=\"bar\">\nbaz", DANGER),
+    //     "<p>Foo\n<a href=\"bar\">\nbaz</p>",
+    //     "should not support interrupting paragraphs w/ complete tags"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<x", DANGER),
+        "<p>&lt;x</p>",
+        "should not support an eof directly after a tag name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x/", DANGER),
+        "<p>&lt;x/</p>",
+        "should not support an eof directly after a self-closing slash"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x\n", DANGER),
+        "<p>&lt;x</p>\n",
+        "should not support a line ending directly after a tag name"
+    );
+
+    // To do: paragraphs (trailing whitespace).
+    // assert_eq!(
+    //     micromark_with_options("<x ", DANGER),
+    //     "<p>&lt;x</p>",
+    //     "should not support an eof after a space directly after a tag name"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<x/", DANGER),
+        "<p>&lt;x/</p>",
+        "should not support an eof directly after a self-closing slash"
+    );
+
+    // To do: phrasing.
+    // assert_eq!(
+    //     micromark_with_options("<x/\n*asd*", DANGER),
+    //     "<p>&lt;x/\n<em>asd</em></p>",
+    //     "should not support a line ending after a self-closing slash"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<x/>", DANGER),
+        "<x/>",
+        "should support an eof after a self-closing tag"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x/>\na", DANGER),
+        "<x/>\na",
+        "should support a line ending after a self-closing tag"
+    );
+
+    // To do: html (text).
+    // assert_eq!(
+    //     micromark_with_options("<x/>a", DANGER),
+    //     "<p><x/>a</p>",
+    //     "should not support another character after a self-closing tag"
+    // );
+
+    // To do: html (text).
+    // assert_eq!(
+    //     micromark_with_options("<x>a", DANGER),
+    //     "<p><x>a</p>",
+    //     "should not support another character after an opening tag"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<x y>", DANGER),
+        "<x y>",
+        "should support boolean attributes in a complete tag"
+    );
+
+    // To do: html (text).
+    // assert_eq!(
+    //     micromark_with_options("<x\ny>", DANGER),
+    //     "<p><x\ny></p>",
+    //     "should not support a line ending before an attribute name"
+    // );
+
+    // To do: html (text).
+    // assert_eq!(
+    //     micromark_with_options("<x\n  y>", DANGER),
+    //     "<p><x\ny></p>",
+    //     "should not support a line ending w/ whitespace before an attribute name"
+    // );
+
+    assert_eq!(
+    micromark_with_options("<x\n  \ny>", DANGER),
+    "<p>&lt;x</p>\n<p>y&gt;</p>",
+    "should not support a line ending w/ whitespace and another line ending before an attribute name"
+  );
+
+    // To do: html (text).
+    // assert_eq!(
+    //     micromark_with_options("<x y\nz>", DANGER),
+    //     "<p><x y\nz></p>",
+    //     "should not support a line ending between attribute names"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<x y   z>", DANGER),
+        "<x y   z>",
+        "should support whitespace between attribute names"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x:y>", DANGER),
+        "<p>&lt;x:y&gt;</p>",
+        "should not support a colon in a tag name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x_y>", DANGER),
+        "<p>&lt;x_y&gt;</p>",
+        "should not support an underscore in a tag name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x.y>", DANGER),
+        "<p>&lt;x.y&gt;</p>",
+        "should not support a dot in a tag name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x :y>", DANGER),
+        "<x :y>",
+        "should support a colon to start an attribute name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x _y>", DANGER),
+        "<x _y>",
+        "should support an underscore to start an attribute name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x .y>", DANGER),
+        "<p>&lt;x .y&gt;</p>",
+        "should not support a dot to start an attribute name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x y:>", DANGER),
+        "<x y:>",
+        "should support a colon to end an attribute name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x y_>", DANGER),
+        "<x y_>",
+        "should support an underscore to end an attribute name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x y.>", DANGER),
+        "<x y.>",
+        "should support a dot to end an attribute name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x y123>", DANGER),
+        "<x y123>",
+        "should support numbers to end an attribute name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x data->", DANGER),
+        "<x data->",
+        "should support a dash to end an attribute name"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x y=>", DANGER),
+        "<p>&lt;x y=&gt;</p>",
+        "should not upport an initializer w/o a value"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x y==>", DANGER),
+        "<p>&lt;x y==&gt;</p>",
+        "should not support an equals to as an initializer"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x y=z>", DANGER),
+        "<x y=z>",
+        "should support a single character as an unquoted attribute value"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x y=\"\">", DANGER),
+        "<x y=\"\">",
+        "should support an empty double quoted attribute value"
+    );
+
+    assert_eq!(
+        micromark_with_options("<x y=\"\">", DANGER),
+        "<x y=\"\">",
+        "should support an empty single quoted attribute value"
+    );
+
+    // To do: html (text).
+    // assert_eq!(
+    //     micromark_with_options("<x y=\"\n\">", DANGER),
+    //     "<p><x y=\"\n\"></p>",
+    //     "should not support a line ending in a double quoted attribute value"
+    // );
+
+    // To do: html (text).
+    // assert_eq!(
+    //     micromark_with_options("<x y=\"\n\">", DANGER),
+    //     "<p><x y=\"\n\"></p>",
+    //     "should not support a line ending in a single quoted attribute value"
+    // );
+
+    // To do: html (text).
+    // assert_eq!(
+    //     micromark_with_options("<w x=y\nz>", DANGER),
+    //     "<p><w x=y\nz></p>",
+    //     "should not support a line ending in/after an unquoted attribute value"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<w x=y\"z>", DANGER),
+        "<p>&lt;w x=y&quot;z&gt;</p>",
+        "should not support a double quote in/after an unquoted attribute value"
+    );
+
+    // To do: html (text).
+    // assert_eq!(
+    //     micromark_with_options("<w x=y\"z>", DANGER),
+    //     "<p>&lt;w x=y\"z&gt;</p>",
+    //     "should not support a single quote in/after an unquoted attribute value"
+    // );
+
+    assert_eq!(
+        micromark_with_options("<x y=\"\"z>", DANGER),
+        "<p>&lt;x y=&quot;&quot;z&gt;</p>",
+        "should not support an attribute after a double quoted attribute value"
+    );
+
+    // To do: blockquote.
+    // assert_eq!(
+    //     micromark_with_options("<x>\n  \n  \n>", DANGER),
+    //     "<x>\n<blockquote>\n</blockquote>",
+    //     "should not support blank lines in complete"
+    // );
+
+    // assert_eq!(
+    //     micromark_with_options("> <a>\n*bar*", DANGER),
+    //     "<blockquote>\n<a>\n</blockquote>\n<p><em>bar</em></p>",
+    //     "should not support lazyness (1)"
+    // );
+
+    // assert_eq!(
+    //     micromark_with_options("> a\n<a>", DANGER),
+    //     "<blockquote>\n<p>a</p>\n</blockquote>\n<a>",
+    //     "should not support lazyness (2)"
+    // );
+}
-- 
cgit