0.16.0 sisudoc (src/sisudoc sisudoc spine)

- src/sisudoc (replaces src/doc_reform)
- sisudoc spine (used more)

1 files changed, 609 insertions, 0 deletions

diff --git a/src/sisudoc/io_out/metadata.d b/src/sisudoc/io_out/metadata.d
new file mode 100644
index 0000000..0210212
--- /dev/null
+++ b/src/sisudoc/io_out/metadata.d
@@ -0,0 +1,609 @@
+/+
+- Name: SisuDoc Spine, Doc Reform [a part of]
+  - Description: documents, structuring, processing, publishing, search
+    - static content generator
+
+  - Author: Ralph Amissah
+    [ralph.amissah@gmail.com]
+
+  - Copyright: (C) 2015 - 2024 Ralph Amissah, All Rights Reserved.
+
+  - License: AGPL 3 or later:
+
+    Spine (SiSU), a framework for document structuring, publishing and
+    search
+
+    Copyright (C) Ralph Amissah
+
+    This program is free software: you can redistribute it and/or modify it
+    under the terms of the GNU AFERO General Public License as published by the
+    Free Software Foundation, either version 3 of the License, or (at your
+    option) any later version.
+
+    This program is distributed in the hope that it will be useful, but WITHOUT
+    ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+    FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
+    more details.
+
+    You should have received a copy of the GNU General Public License along with
+    this program. If not, see [https://www.gnu.org/licenses/].
+
+    If you have Internet connection, the latest version of the AGPL should be
+    available at these locations:
+    [https://www.fsf.org/licensing/licenses/agpl.html]
+    [https://www.gnu.org/licenses/agpl.html]
+
+  - Spine (by Doc Reform, related to SiSU) uses standard:
+    - docReform markup syntax
+      - standard SiSU markup syntax with modified headers and minor modifications
+    - docReform object numbering
+      - standard SiSU object citation numbering & system
+
+  - Homepages:
+    [https://www.sisudoc.org]
+    [https://www.doc-reform.org]
+
+  - Git
+    [https://git.sisudoc.org/]
+
++/
+module sisudoc.io_out.metadata;
+@safe:
+template outputMetadata() {
+  void outputMetadata(T)( T  doc_matters) {
+    string inline_search_form(M)(
+      M  doc_matters,
+    ) {
+      string o;
+      string _form;
+      if (doc_matters.opt.action.html_link_search) {
+        o = format(q"┃
+        <div class="flex-menu-option">
+          <!-- SiSU Spine Search -->
+          <form action="%s" target="_top" method="POST" accept-charset="UTF-8" id="searchtxt">
+          &nbsp;&nbsp;<font size="2">%s&nbsp;
+          <input type="text" name="sf" size="24" maxlength="255">%s
+          <input type="hidden" name="sml" value="1000">
+          <input type="hidden" name="ec" value="on">
+          <input type="hidden" name="url" value="on">
+          <input type="hidden" name="rt" value="txt">
+          <button type="submit" form="searchtxt" name="fn" value="%s">&nbsp;• ⚏&nbsp;</button>
+          </font></form>
+          <!-- SiSU Spine Search -->
+        </div>
+    <div class="flex-menu-option">
+    <!-- SiSU Spine Search -->
+    <form action="%s" target="_top" method="POST" accept-charset="UTF-8" id="search">
+    <font size="2">
+    <input type="text" name="sf" size="24" maxlength="255">%s
+    <input type="hidden" name="sml" value="1000">
+    <input type="hidden" name="ec" value="on">
+    <input type="hidden" name="url" value="on">
+    <button type="submit" form="search" name="fn" value="%s">• ፨</button>
+    <button type="submit" form="search">㏈ ፨</button>
+    </font></form>
+    <!-- SiSU Spine Search -->
+    </div>┃",
+        doc_matters.conf_make_meta.conf.w_srv_cgi_action,
+        (doc_matters.conf_make_meta.conf.w_srv_db_sqlite_filename.empty)
+          ? ""
+          : "\n    <a href=\""
+            ~ doc_matters.conf_make_meta.conf.w_srv_cgi_action
+            ~ "\">&#x1f50e;&nbsp;</a>",
+        (doc_matters.conf_make_meta.conf.w_srv_db_sqlite_filename.empty)
+          ? ""
+          : "\n    <input type=\"hidden\" name=\"db\" value=\""
+            ~ doc_matters.conf_make_meta.conf.w_srv_db_sqlite_filename
+            ~ "\">",
+        doc_matters.src.filename_base,
+        doc_matters.conf_make_meta.conf.w_srv_cgi_action,
+        (doc_matters.conf_make_meta.conf.w_srv_db_sqlite_filename.empty)
+          ? ""
+          : "\n    <input type=\"hidden\" name=\"db\" value=\""
+            ~ doc_matters.conf_make_meta.conf.w_srv_db_sqlite_filename
+            ~ "\">",
+        doc_matters.src.filename_base,
+        );
+      } else {
+        o = "";
+      }
+      return o;
+    }
+    import
+      std.file,
+      std.format;
+    import sisudoc.io_out;
+    mixin InternalMarkup;
+    string[] metadata_;
+string theme_dark_0 = format(q"┃
+  body {
+    color                    : #CCCCCC;
+    background               : #000000;
+    background-color         : #000000;
+  }
+  a:link {
+    color                    : #FFFFFF;
+    text-decoration          : none;
+  }
+  a:visited {
+    color                    : #999999;
+    text-decoration          : none;
+  }
+  a:hover {
+    color                    : #000000;
+    background-color         : #555555;
+  }
+  a:hover img {
+    background-color         : #000000;
+  }
+  a:active {
+    color                    : #888888;
+    text-decoration          : underline;
+  }
+  a.lnkicon:link {
+    text-decoration          : none;
+  }
+  a.lnkicon:visited {
+    text-decoration          : none;
+  }
+  a.lnkicon:hover {
+    font-size                : 160%%;
+  }
+  a:hover img {
+    background-color         : #FFFFFF;
+  }
+  input {
+    color                    : #FFFFFF;
+    background-color         : #777777;
+  }
+┃");
+string theme_light_0 = format(q"┃
+  body {
+    color                    : #000000;
+    background               : #FFFFFF;
+    background-color         : #FFFFFF;
+  }
+  a:link {
+    color                    : #003399;
+    text-decoration          : none;
+  }
+  a:visited {
+    color                    : #003399;
+    text-decoration          : none;
+  }
+  a:hover {
+    color                    : #000000;
+    background-color         : #f9f9aa;
+  }
+  a:hover img {
+    background-color         : #FFFFFF;
+  }
+  a:active {
+    color                    : #003399;
+    text-decoration          : underline;
+  }
+  a.lnkicon:link {
+    text-decoration          : none;
+  }
+  a.lnkicon:visited {
+    text-decoration          : none;
+  }
+  a.lnkicon:hover {
+    font-size                : 160%%;
+  }
+  a:hover img {
+    background-color         : #FFFFFF;
+  }
+  input {
+    color                    : #000000;
+    background-color         : #FFFFFF;
+  }
+┃");
+string theme_dark_1 = format(q"┃
+  h1 {
+    color                    : #FFFFFF;
+    background               : #000000;
+  }
+  p.letter {
+    color                    : #FFFFFF;
+    background               : #333333;
+  }
+┃");
+string theme_light_1 = format(q"┃
+  h1 {
+    color                    : #FFFFFF;
+    background               : #1A3A7A;
+  }
+  p.letter {
+    color                    : #FFFFFF;
+    background               : #1A3A7A;
+  }
+┃");
+      metadata_ ~= format(q"┃<!DOCTYPE html>
+<html>
+<head>
+<meta charset="utf-8">
+<title>⌘ Curated metadata - Topics</title>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
+<meta name="dc.title" content= "metadata curate, Authors & Topics - information Structuring Universe, Structured information Serialised Units" />
+<meta name="dc.subject" content= "document structuring, ebook, publishing, PDF, LaTeX, XML, ODF, SQL, postgresql, sqlite, electronic book, electronic publishing, electronic document, electronic citation, data structure, citation systems, granular search, digital library" />
+<meta name="generator" content="spine" />
+<link rel="generator" href="https://sisudoc.org" />
+<link href="./css/curate.css" rel="stylesheet">
+<style TYPE="text/css">
+/* spine curate css default stylesheet */%s
+  .norm, .bold {
+    line-height              : 150%%;
+    margin-left              : 1em;
+    margin-right             : 2em;
+    margin-top               : 10px;
+    margin-bottom            : 0px;
+    text-indent              : 0mm;
+  }
+  p, h0, h1, h2, h3, h4, h5, h6, h7 {
+    display                  : block;
+    font-family              : verdana, arial, georgia, tahoma, sans-serif, helvetica, times, roman;
+    font-size                : 100%%;
+    font-weight              : normal;
+    line-height              : 150%%;
+    /* text-align            : justify; */
+    margin-left              : 1em;
+    text-indent              : 0mm;
+    margin-top               : 2px;
+    margin-bottom            : 2px;
+    margin-right             : 6px;
+    text-align               : left;
+  }
+  h0, h1, h2, h3, h4, h5, h6, h7 { text-shadow: .2em .2em .3em #999999; }
+  h1 {
+    font-size                : 120%%;
+    font-weight              : bold;
+    color                    : #FFFFFF;
+    background               : #000088;
+    margin-left              : 0em;
+  }
+  p.work {
+    font-size                : 80%%;
+    margin-left              : 5em;
+    margin-top               : 0px;
+    margin-bottom            : 0px;
+    margin-right             : 6px;
+    text-align               : left;
+  }
+  p.author {
+    font-size                : 100%%;
+    margin-left              : 2em;
+    margin-top               : 0px;
+    margin-bottom            : 0px;
+    margin-right             : 6px;
+    text-align               : left;
+  }
+  p.publication {
+    font-size                : 80%%;
+    margin-left              : 4em;
+    margin-top               : 0px;
+    margin-bottom            : 0px;
+    margin-right             : 6px;
+    text-align               : left;
+  }
+  p.letter {
+    font-weight              : bold;
+    font-size                : 60%%;
+    margin-left              : 1em;
+    margin-top               : 0px;
+    margin-bottom            : 0px;
+    margin-right             : 6px;
+    text-align               : left;
+  }
+  p.icons, .icons_center {
+    font-size                : 100%%;
+    margin-top               : 0px;
+    margin-bottom            : 0px;
+    margin-right             : 6px;
+  }
+  p.icons {
+    text-align               : left;
+  }
+  p.lev0 {
+    font-size                : 120%%;
+    margin-left              : 1em;
+  }
+  p.lev1 {
+    font-size                : 110%%;
+    margin-left              : 2em;
+  }
+  p.lev2 {
+    font-size                : 100%%;
+    margin-left              : 3em;
+  }
+  p.lev3 {
+    font-size                : 90%%;
+    margin-left              : 4em;
+  }
+  p.lev4 {
+    font-size                : 80%%;
+    margin-left              : 5em;
+  }
+  p.lev5 {
+    font-size                : 80%%;
+    margin-left              : 6em;
+  }%s
+  /* flex */
+  .flex-menu-bar {
+    display                  : -webkit-flex;
+    display                  : flex;
+    -webkit-flex-wrap        : wrap;
+    -webkit-align-items      : center;
+    align-items              : center;
+    width                    : 100%%;
+    margin-left              : 0%%;
+    margin-right             : 2%%;
+    background-color         : inherited;
+  }
+  .flex-menu-option {
+    background-color         : inherited;
+    margin-right             : 4px;
+  }
+  .flex-list {
+    display                  : -webkit-flex;
+    display                  : flex;
+    -webkit-align-items      : center;
+    display                  : block;
+    align-items              : center;
+    width                    : 100%%;
+    background-color         : inherited;
+  }
+  .flex-list-item {
+    background-color         : inherited;
+    margin                   : 4px;
+  }
+</style>
+<link rel="shortcut icon" href="../_sisu/image/rb7.ico" />
+</head>
+┃",
+  doc_matters.opt.action.css_theme_default ? theme_light_0 : theme_dark_0,
+  doc_matters.opt.action.css_theme_default ? theme_light_1 : theme_dark_1,
+) ~ "\n";
+    void metadata_write_output(M)(M doc_matters, string[] metadata_) {
+      auto pth_html = spinePathsHTML!()(doc_matters.output_path, doc_matters.src.language);
+      try {
+        if (!exists(pth_html.base)) {
+          pth_html.base.mkdirRecurse;
+        }
+        {
+          auto f = File(pth_html.fn_scroll("metadata." ~ doc_matters.src.filename), "w");
+          foreach (o; metadata_) {
+            f.writeln(o);
+          }
+        }
+        if (!exists(pth_html.base ~ "/index.html")) {
+          import sisudoc.io_out.html_snippet;
+          mixin htmlSnippet;
+          auto f = File(pth_html.base ~"/index.html", "w");
+          f.writeln(format_html_blank_page_guide_home(
+            "../../css/html_scroll.css",
+            (doc_matters.opt.action.webserver_url_doc_root.length > 0)
+              ? doc_matters.opt.action.webserver_url_doc_root
+              : doc_matters.conf_make_meta.conf.w_srv_data_root_url,
+            "../../index.html",
+          ));
+        }
+      } catch (ErrnoException ex) {
+        // Handle error
+      }
+      if (doc_matters.opt.action.vox_gt0) {
+        writeln(" ", pth_html.fn_scroll("metadata." ~ doc_matters.src.filename));
+      }
+    }
+    static auto mkup = InlineMarkup();
+    import sisudoc.io_out.html_snippet;
+    mixin htmlSnippet;
+    if (doc_matters.opt.action.debug_do) {
+      writeln(doc_matters.src.filename_base);
+      writeln("Title:       ", doc_matters.conf_make_meta.meta.title_full);
+      writeln("  Author:    ", doc_matters.conf_make_meta.meta.creator_author);
+      writeln("  Published: ", doc_matters.conf_make_meta.meta.date_published);
+      writeln("  Copyright: ", doc_matters.conf_make_meta.meta.rights_copyright);
+      writeln("  License:   ", special_characters_text(doc_matters.conf_make_meta.meta.rights_license));
+      if (doc_matters.conf_make_meta.meta.classify_topic_register_arr.length > 0) {
+        foreach (topic; doc_matters.conf_make_meta.meta.classify_topic_register_arr.sort!("toUpper(a) < toUpper(b)", SwapStrategy.unstable)) {
+          string[] subject_tree = topic.split(mkup.sep);
+          if (subject_tree.length > 0) { writeln("  ",         subject_tree[0]); }
+          if (subject_tree.length > 1) { writeln("    ",       subject_tree[1]); }
+          if (subject_tree.length > 2) { writeln("      ",     subject_tree[2]); }
+          if (subject_tree.length > 3) { writeln("        ",   subject_tree[3]); }
+          if (subject_tree.length > 4) { writeln("          ", subject_tree[4]); }
+        }
+      }
+    }
+    auto pth_html = spinePathsHTML!()(doc_matters.output_path, doc_matters.src.language);
+    auto pth_epub = spinePathsEPUB!()(doc_matters.output_path, doc_matters.src.language);
+    auto pth_pdf  = spinePathsPDF!()(doc_matters);
+    auto pth_pod =  spinePathsPods!()(doc_matters);
+    metadata_ ~= format(q"┃<body lang="en" xml:lang="en">
+    <a name="top" id="top"></a>
+    <a name="up" id="up"></a>
+    <a name="start" id="start"></a>
+    ┃");
+    metadata_ ~= "<div class=\"flex-menu-bar\"><div class=\"flex-menu-option\">";
+    if (doc_matters.opt.action.html_link_curate) {
+      metadata_ ~= format(q"┃<p class="icons">[<a href="%s" class="lnkicon">&nbsp;<b>⟰</b>&nbsp;HOME&nbsp;</a>&nbsp;|&nbsp;<a href="../../index.html" class="lnkicon">&nbsp;≅&nbsp;Collection&nbsp;</a>]&nbsp;&nbsp;[
+       <a href="../../authors.html" class="lnkicon">&nbsp;&#x1F58B;&nbsp;Authors&nbsp;</a> |
+       <a href="../../topics.html" class="lnkicon">&nbsp;⌘&nbsp;Topics&nbsp;</a>]</p>
+    ┃",
+    (doc_matters.opt.action.webserver_url_doc_root.length > 0)
+      ? doc_matters.opt.action.webserver_url_doc_root
+      : doc_matters.conf_make_meta.conf.w_srv_data_root_url
+      , // HOME index.html equivalent _cfg.www_url_doc_root,
+    );
+    } else {
+      metadata_ ~= format(q"┃<p class="icons">[<a href="../../../index.html" class="lnkicon">&nbsp;≅&nbsp;<b>HOME</b>&nbsp;</a>&nbsp;<a href="../../index.html" class="lnkicon">&nbsp;≅&nbsp;Collection&nbsp;</a>]
+    ┃");
+    }
+    metadata_ ~= "</div>" ~ inline_search_form(doc_matters) ~ "</div><hr />";
+    if (!(doc_matters.conf_make_meta.meta.title_full.empty)) {
+      metadata_ ~= "<p class=\"lev0\">Title: <b><a href=\"" ~ doc_matters.src.filename_base ~ "/toc.html\">" ~ doc_matters.conf_make_meta.meta.title_full       ~ "</a></b></p>";
+    } else if (doc_matters.opt.action.debug_do || doc_matters.opt.action.vox_gt2) {
+      writeln("ERROR no Title information provided in document header ", doc_matters.src.filename_base);
+    }
+    if (!(doc_matters.conf_make_meta.meta.creator_author.empty)) {
+      if (doc_matters.opt.action.html_link_curate) {
+        metadata_ ~= "<p class=\"lev1\">Author: <b><a href=\"../../authors.html#" ~ doc_matters.conf_make_meta.meta.creator_author_surname.translate([' ' : "_"]) ~ "\">"
+                                                   ~ doc_matters.conf_make_meta.meta.creator_author   ~ "</a></b></p>";
+      } else {
+        metadata_ ~= "<p class=\"lev1\">Author: <b>"
+                                                   ~ doc_matters.conf_make_meta.meta.creator_author   ~ "</b></p>";
+      }
+    } else if (doc_matters.opt.action.debug_do || doc_matters.opt.action.vox_gt2) {
+      writeln("ERROR no Author information provided in document header ", doc_matters.src.filename_base);
+    }
+    metadata_ ~= "<p class=\"lev1\">Published: "   ~ doc_matters.conf_make_meta.meta.date_published   ~ "</p>";
+    if (!(doc_matters.conf_make_meta.meta.rights_copyright.empty)) {
+      metadata_ ~= "<p class=\"lev1\">Copyright: "   ~ special_characters_text(doc_matters.conf_make_meta.meta.rights_copyright) ~ "</p>";
+    } else if (doc_matters.opt.action.debug_do || doc_matters.opt.action.vox_gt2) {
+      writeln("WARNING no Copyright information provided in document header ", doc_matters.src.filename_base);
+    }
+    if (!(doc_matters.conf_make_meta.meta.rights_license.empty)) {
+      metadata_ ~= "<p class=\"lev1\">License:   "   ~ special_characters_text(doc_matters.conf_make_meta.meta.rights_license) ~ "</p>";
+    } else if (doc_matters.opt.action.debug_do || doc_matters.opt.action.vox_gt2) {
+      writeln("WARNING no License information provided in document header ", doc_matters.src.filename_base);
+    }
+    if (!(doc_matters.conf_make_meta.meta.notes_summary.empty)) {
+      metadata_ ~= "<hr /><p class=\"lev0\">Summary:</p><p class=\"lev1\">"   ~ special_characters_text(doc_matters.conf_make_meta.meta.notes_summary) ~ "</p>";
+    } else if (doc_matters.opt.action.debug_do) {
+      writeln("WARNING no summary of text provided in document header ", doc_matters.src.filename_base);
+    }
+    metadata_ ~= "<hr /><p class=\"lev1\">source: "      ~ doc_matters.src.filename_base ~ "</p>";
+    if (doc_matters.opt.action.html_link_markup_source) {
+      metadata_ ~= "<p class=\"lev1\">●&nbsp;&nbsp;markup source:&nbsp;&nbsp;the&nbsppod&nbsp[<a href=\"../../" ~ pth_pod.internal_base ~ "/" ~ doc_matters.src.filename_base ~ ".zip\" class=\"lnkicon\">"
+                   ~ "&nbsp;🫛&nbsp;zipped&nbsp;</a>|&nbsp;"
+                   ~ "<a href=\"../../" ~ pth_pod.internal_base ~ "/" ~ doc_matters.src.filename_base ~ "/\" class=\"lnkicon\">"
+                   ~ "&nbsp;🫛&nbsp;tree&nbsp;</a>]&nbsp;";
+    }
+    metadata_ ~= "<p class=\"lev1\">●&nbsp;&nbsp;outputs:&nbsp;&nbsp;[&nbsp;html:&nbsp;<a href=\""    ~ doc_matters.src.filename_base ~ ".html\" class=\"lnkicon\">"
+                 ~ "&nbsp;▤&nbsp;scroll&nbsp;</a>&nbsp;"
+                 ~ "|<a href=\""    ~ doc_matters.src.filename_base ~ "/toc.html\" class=\"lnkicon\">"
+                 ~ "&nbsp;※&nbsp;seg&nbsp;</a>]&nbsp;&nbsp;&nbsp;"
+                 ~ "[<a href=\"../../" ~ pth_epub.internal_base ~ "/" ~ doc_matters.src.filename_base ~ "." ~ doc_matters.src.language ~ ".epub\" class=\"lnkicon\">"
+                 ~ "&nbsp;◆&nbsp;epub&nbsp;</a>]&nbsp;&nbsp;&nbsp;";
+    if ((doc_matters.opt.action.html_link_pdf) || (doc_matters.opt.action.html_link_pdf_a4)) {
+      metadata_ ~=  "[&nbsp;pdf:&nbsp;<a href=\"../../pdf/"
+                 ~ doc_matters.src.filename_base
+                 ~ "." ~ doc_matters.src.language ~ ".a4.portrait.pdf\" class=\"lnkicon\">"
+                 ~ "&nbsp;□&nbsp;a4&nbsp;</a>&nbsp"
+                 ~ "|<a href=\"../../pdf/"
+                 ~ doc_matters.src.filename_base
+                 ~ "." ~ doc_matters.src.language ~ ".letter.portrait.pdf\" class=\"lnkicon\">"
+                 ~ "&nbsp;□&nbsp;U.S.&nbsp;letter&nbsp;</a>]&nbsp";
+    } else if (doc_matters.opt.action.html_link_pdf_a4) {
+      metadata_ ~=  "[<a href=\"../../pdf/"
+                 ~ doc_matters.src.filename_base
+                 ~ "." ~ doc_matters.src.language ~ ".a4.portrait.pdf\" class=\"lnkicon\">"
+                 ~ "&nbsp;□&nbsp;pdf&nbsp;(a4)&nbsp;</a>]&nbsp";
+    } else if (doc_matters.opt.action.html_link_pdf_letter) {
+      metadata_ ~=  "[<a href=\"../../pdf/"
+                 ~ doc_matters.src.filename_base
+                 ~ "." ~ doc_matters.src.language ~ ".letter.portrait.pdf\" class=\"lnkicon\">"
+                 ~ "&nbsp;□&nbsp;pdf&nbsp;(U.S.&nbsp;letter)&nbsp;</a>]&nbsp";
+    }
+    metadata_ ~=  "</p>";
+    if (doc_matters.conf_make_meta.meta.classify_topic_register_arr.length > 0) {
+      metadata_ ~= "<hr /><p class=\"lev0\">Topics:</p>";
+      string[] _top = ["", "", "", "", ""];
+      foreach (topic; doc_matters.conf_make_meta.meta.classify_topic_register_arr.sort!("toUpper(a) < toUpper(b)", SwapStrategy.unstable)) {
+        string[] subject_tree = topic.split(mkup.sep);
+        if (subject_tree.length > 0) {
+          if (subject_tree[0] != _top[0]) {
+            _top[0] = subject_tree[0];
+            if (doc_matters.opt.action.html_link_curate) {
+              metadata_ ~=
+                "<p class=\"lev1\"><a href=\"../../topics.html#"
+                  ~ subject_tree[0].translate([' ' : "_"]) ~ "\">"
+                  ~ subject_tree[0]
+                  ~ "</a></p>";
+            } else {
+              metadata_ ~=
+                "<p class=\"lev1\">"  ~ subject_tree[0] ~ "</p>";
+            }
+          }
+          if (subject_tree.length > 1) {
+            if (subject_tree[1] != _top[1]) {
+              _top[1] = subject_tree[1];
+              _top[2] = ""; _top[3] = ""; _top[4] = "";
+              if (doc_matters.opt.action.html_link_curate) {
+                metadata_ ~=
+                  "<p class=\"lev2\"><a href=\"../../topics.html#"
+                    ~ subject_tree[0].translate([' ' : "_"]) ~ "."
+                    ~ subject_tree[1].translate([' ' : "_"]) ~ "\">"
+                    ~ subject_tree[1]
+                    ~ "</a></p>";
+              } else {
+                metadata_ ~=
+                  "<p class=\"lev2\">"  ~ subject_tree[1] ~ "</p>";
+              }
+            }
+            if (subject_tree.length > 2) {
+              if (subject_tree[2] != _top[2]) {
+                _top[2] = subject_tree[2];
+                _top[3] = ""; _top[4] = "";
+                if (doc_matters.opt.action.html_link_curate) {
+                  metadata_ ~=
+                    "<p class=\"lev3\"><a href=\"../../topics.html#"
+                      ~ subject_tree[0].translate([' ' : "_"]) ~ "."
+                      ~ subject_tree[1].translate([' ' : "_"]) ~ "."
+                      ~ subject_tree[2].translate([' ' : "_"]) ~ "\">"
+                      ~ subject_tree[2]
+                      ~ "</a></p>";
+                } else {
+                  metadata_ ~=
+                    "<p class=\"lev3\">"  ~ subject_tree[2] ~ "</p>";
+                }
+              }
+              if (subject_tree.length > 3) {
+                if (subject_tree[3] != _top[3]) {
+                  _top[3] = subject_tree[3];
+                  _top[4] = "";
+                  if (doc_matters.opt.action.html_link_curate) {
+                    metadata_ ~=
+                      "<p class=\"lev4\"><a href=\"../../topics.html#"
+                        ~ subject_tree[0].translate([' ' : "_"]) ~ "."
+                        ~ subject_tree[1].translate([' ' : "_"]) ~ "."
+                        ~ subject_tree[2].translate([' ' : "_"]) ~ "."
+                        ~ subject_tree[3].translate([' ' : "_"]) ~ "\">"
+                        ~ subject_tree[3]
+                        ~ "</a></p>";
+                  } else {
+                    metadata_ ~=
+                      "<p class=\"lev4\">"  ~ subject_tree[3] ~ "</p>";
+                  }
+                }
+                if (subject_tree.length > 4) {
+                  if (subject_tree[4] != _top[4]) {
+                    _top[4] = subject_tree[4];
+                    if (doc_matters.opt.action.html_link_curate) {
+                      metadata_ ~=
+                        "<p class=\"lev5\"><a href=\"../../topics.html#"
+                          ~ subject_tree[0].translate([' ' : "_"]) ~ "."
+                          ~ subject_tree[1].translate([' ' : "_"]) ~ "."
+                          ~ subject_tree[2].translate([' ' : "_"]) ~ "."
+                          ~ subject_tree[3].translate([' ' : "_"]) ~ "."
+                          ~ subject_tree[4].translate([' ' : "_"]) ~ "\">"
+                          ~ subject_tree[4]
+                          ~ "</a></p>";
+                    } else {
+                      metadata_ ~=
+                        "<p class=\"lev5\">"  ~ subject_tree[4] ~ "</p>";
+                    }
+                  }
+                }
+              }
+            }
+          }
+        }
+      }
+    } else if (doc_matters.opt.action.debug_do) {
+      writeln("WARNING no topic_register classification of text provided in document header ", doc_matters.src.filename_base);
+    }
+    metadata_write_output(doc_matters, metadata_);
+  }
+}