aboutsummaryrefslogtreecommitdiffhomepage
path: root/org/out_xmls.org
diff options
context:
space:
mode:
authorRalph Amissah <ralph.amissah@gmail.com>2019-11-15 20:38:38 -0500
committerRalph Amissah <ralph.amissah@gmail.com>2019-11-19 16:55:31 -0500
commit8b04ed5fd9118f0defb2f4cd1f80bafce49650b4 (patch)
treebdbd5247e50cea077e5d600e9c6ae8580f6ec1f4 /org/out_xmls.org
parent0.9.0 spine (doc-reform renamed) (diff)
org renaming
Diffstat (limited to 'org/out_xmls.org')
-rw-r--r--org/out_xmls.org3095
1 files changed, 3095 insertions, 0 deletions
diff --git a/org/out_xmls.org b/org/out_xmls.org
new file mode 100644
index 0000000..ea1af4a
--- /dev/null
+++ b/org/out_xmls.org
@@ -0,0 +1,3095 @@
+-*- mode: org -*-
+#+TITLE: spine (doc_reform) output xmls
+#+DESCRIPTION: documents - structuring, publishing in multiple formats & search
+#+FILETAGS: :spine:output:xml:
+#+AUTHOR: Ralph Amissah
+#+EMAIL: [[mailto:ralph.amissah@gmail.com][ralph.amissah@gmail.com]]
+#+COPYRIGHT: Copyright (C) 2015 - 2019 Ralph Amissah
+#+LANGUAGE: en
+#+STARTUP: indent content hideblocks hidestars
+#+OPTIONS: H:3 num:nil toc:t \n:nil @:t ::t |:t ^:nil _:nil -:t f:t *:t <:t
+#+OPTIONS: TeX:t LaTeX:t skip:nil d:nil todo:t pri:nil tags:not-in-toc
+#+OPTIONS: author:nil email:nil creator:nil timestamp:nil
+#+PROPERTY: header-args :padline no :exports code :cache no :noweb yes
+#+EXPORT_SELECT_TAGS: export
+#+EXPORT_EXCLUDE_TAGS: noexport
+#+TAGS: assert(a) class(c) debug(d) mixin(m) spine(s) tangle(T) template(t) WEB(W) noexport(n)
+
+- [[./spine.org][spine]] [[./][org/]]
+- [[./output_hub.org][output_hub]]
+
+* xml offspring (xhtml html epub)
+** format xhtml objects :format:
+*** _module template_ :module:
+
+#+BEGIN_SRC d :tangle "../src/doc_reform/output/xmls.d"
+module doc_reform.output.xmls;
+template outputXHTMLs() {
+ <<output_imports>>
+ mixin DocReformOutputRgxInit;
+ struct outputXHTMLs {
+ static auto rgx = Rgx();
+ <<xhtml_format_objects>>
+ <<xhtml_format_objects_code>>
+ }
+}
+#+END_SRC
+
+*** output imports
+
+#+name: output_imports
+#+BEGIN_SRC d
+import doc_reform.output;
+import
+ std.digest.sha,
+ std.file,
+ std.outbuffer,
+ std.uri,
+ std.zip,
+ std.conv : to;
+import
+ doc_reform.output.create_zip_file,
+ doc_reform.output.xmls,
+ doc_reform.output.xmls_css;
+#+END_SRC
+
+*** misc
+**** div delimiter
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string div_delimit(
+ string part,
+ return ref string previous_part
+){
+ string delimit = "";
+ string delimit_ = "";
+ if (part != previous_part) {
+ switch (part) {
+ case "head":
+ delimit_ ~= "\n<div class=\"doc_title\">\n" ;
+ break;
+ case "toc":
+ delimit_ ~= "\n<div class=\"doc_toc\">\n" ;
+ break;
+ case "bookindex":
+ delimit_ ~= "\n<div class=\"doc_bookindex\">\n" ;
+ break;
+ default:
+ delimit_ ~= "\n<div class=\"doc_" ~ part ~ "\">\n" ;
+ break;
+ }
+ if (previous_part.length > 0) {
+ delimit ~= "\n</div>";
+ }
+ previous_part = part;
+ delimit ~= delimit_;
+ }
+ // you also need to close the last div, introduce a footer?
+ return delimit;
+}
+#+END_SRC
+
+**** special characters text
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string special_characters_text(string _txt){
+ _txt = _txt
+ .replaceAll(rgx.xhtml_ampersand, "&#38;")
+ .replaceAll(rgx.xhtml_quotation, "&#34;")
+ .replaceAll(rgx.xhtml_less_than, "&#60;")
+ .replaceAll(rgx.xhtml_greater_than, "&#62;")
+ .replaceAll(rgx.nbsp_char, " ");
+ return _txt;
+}
+#+END_SRC
+
+**** special characters
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string special_characters(O)(
+ const O obj,
+){
+ string _txt = special_characters_text(obj.text);
+ if (!(obj.metainfo.is_a == "code")) {
+ _txt = (_txt)
+ .replaceAll(rgx.xhtml_line_break, "<br />");
+ }
+ return _txt;
+}
+#+END_SRC
+
+**** font_face
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string font_face(string _txt){
+ _txt = _txt
+ .replaceAll(rgx.inline_emphasis, ("<em>$1</em>"))
+ .replaceAll(rgx.inline_bold, ("<b>$1</b>"))
+ .replaceAll(rgx.inline_underscore, ("<u>$1</u>"))
+ .replaceAll(rgx.inline_italics, ("<i>$1</i>"))
+ .replaceAll(rgx.inline_superscript, ("<sup>$1</sup>"))
+ .replaceAll(rgx.inline_subscript, ("<sub>$1</sub>"))
+ .replaceAll(rgx.inline_strike, ("<del>$1</del>"))
+ .replaceAll(rgx.inline_insert, ("<ins>$1</ins>"))
+ .replaceAll(rgx.inline_mono, ("<tt>$1</tt>"))
+ .replaceAll(rgx.inline_cite, ("<cite>$1</cite>"));
+ return _txt;
+}
+#+END_SRC
+
+**** anchor tags
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string _xhtml_anchor_tags(O)(O obj) {
+ const(string[]) anchor_tags = obj.tags.anchor_tags;
+ string tags="";
+ if (anchor_tags.length > 0) {
+ foreach (tag; anchor_tags) {
+ if (!(tag.empty)) {
+ tags ~= "<a name=\"" ~ tag ~ "\"></a>";
+ }
+ }
+ }
+ return tags;
+}
+#+END_SRC
+
+**** doc head & tails
+***** metadata
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string header_metadata(M)(
+ M doc_matters,
+) {
+ string _publisher="Publisher"; // TODO
+ string o;
+ o = format(q"┃<!-- DocReform header metadata -->
+<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
+<meta name="dc.title" content="%s" />
+<meta name="dc.author" content="%s" />
+<meta name="dc.publisher" content="%s" />
+<meta name="dc.date" content="%s" />
+<meta name="dc.date.created" content="%s" />
+<meta name="dc.date.issued" content="%syear" />
+<meta name="dc.date.available" content="%syear" />
+<meta name="dc.date.valid" content="%syear" />
+<meta name="dc.date.modified" content="%syear" />
+<meta name="dc.language" content="%s" />
+<meta name="dc.rights" content="%s" />
+<meta name="generator" content="%s" />
+<link rel="generator" href="%s" />
+<!-- DocReform header metadata -->┃",
+ doc_matters.conf_make_meta.meta.title_full,
+ doc_matters.conf_make_meta.meta.creator_author,
+ _publisher,
+ doc_matters.conf_make_meta.meta.date_published,
+ doc_matters.conf_make_meta.meta.date_created,
+ doc_matters.conf_make_meta.meta.date_issued,
+ doc_matters.conf_make_meta.meta.date_available,
+ doc_matters.conf_make_meta.meta.date_valid,
+ doc_matters.conf_make_meta.meta.date_modified,
+ doc_matters.src.language,
+ doc_matters.conf_make_meta.meta.rights_copyright,
+ doc_matters.opt.action.debug_do ? "" : doc_matters.generator_program.name_and_version,
+ doc_matters.generator_program.url_home,
+ );
+ return o;
+}
+#+END_SRC
+
+***** site info button
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string site_info_button(M)(
+ M doc_matters,
+) {
+ string _locations;
+ if (doc_matters.conf_make_meta.make.home_button_text.length > 0) {
+ _locations = (doc_matters.conf_make_meta.make.home_button_text)
+ .replaceAll(
+ rgx.inline_link,
+ ("<p class=\"tiny_left\"><a href=\"$2\">$1</a></p>"))
+ .replaceAll(
+ rgx.br_line, "")
+ .replaceAll(
+ rgx.br_nl, "");
+ } else {
+ _locations = "<p class=\"tiny_left\"><a href=\"http://www.doc-reform.org\">spine</a></p>\n<p class=\"tiny_left\"><a href=\"http://git.sisudoc.org/software/spine/\">sources / git</a></p>\n<p class=\"tiny_left\"><a href=\"http://www.sisudoc.org\">www.sisudoc.org</a></p>";
+ }
+ string o;
+ o = format(q"┃<div class="flex-menu-option">
+ %s
+ </div>┃",
+ _locations,
+ );
+ return o;
+}
+#+END_SRC
+
+***** search form
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string inline_search_form(M)(
+ M doc_matters,
+) {
+ string _action="http://www.sisudoc.org/cgi-bin/search.cgi";
+ string _db="DocReform.7a.manual";
+ string o;
+ string _form;
+ if (doc_matters.opt.action.workon) {
+ _form = format(q"┃
+<a name="search"></a>
+<form method="get" action="%s" target="_top">
+<font size="2">
+<input type="text" name="s1" size="24" maxlength="255" />
+<input type="hidden" name="db" value="%s" />
+<input type="hidden" name="ltd" value="1000" />
+<input type="hidden" name="off" value="0" />
+<input type="hidden" name="doc" value="live-manual" /><br />
+<input type="submit" name="search" value="search doc" />
+<input type="submit" name="search" value="search db" />
+</font></form>
+ ┃",
+ _action,
+ _db,
+ );
+ } else {
+ _form = format(q"┃%s┃",
+ "",
+ );
+ }
+ o = format(q"┃<div class="flex-menu-option">%s
+ </div>┃",
+ _form,
+ );
+ return o;
+}
+#+END_SRC
+
+***** html head & head banner
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string html_head(M)(
+ M doc_matters,
+ string type,
+) {
+string _manifest = "";
+if (doc_matters.opt.action.workon) {
+ _manifest = format(q"┃
+ <a href="../../manifest/sisu.en.html" target="_top">
+ <font face="verdana, arial, georgia, tahoma, sans-serif, helvetica, times, roman" size="2">
+ [&nbsp;document&nbsp;manifest&nbsp;]
+ </font>
+ </a>
+ ┃",
+ );
+}
+ string o;
+ o = format(q"┃<!DOCTYPE html>
+<html>
+<head>
+ <meta charset="utf-8" />
+ <title>
+ %s%s
+ </title>
+ <!-- metadata -->
+ %s
+ <!-- metadata -->
+ <link rel="generator" href="http://www.sisudoc.org/" />
+ <link rel="shortcut icon" href="%s" />
+ <link href="%s" rel="stylesheet" />
+</head>
+<body lang="%s">
+<a name="top" id="top"></a>
+<div class='delimit headband'>
+ <div class="flex-menu-bar">
+ %s
+ <div class="flex-menu-option">
+ %s
+ </div>
+ %s%s┃",
+ doc_matters.conf_make_meta.meta.title_full,
+ (doc_matters.conf_make_meta.meta.creator_author.empty) ? ""
+ : ", " ~ doc_matters.conf_make_meta.meta.creator_author,
+ header_metadata(doc_matters),
+ ((type == "seg") ? "../../../" : "../../") ~ "image/rb7.ico",
+ ((type == "seg")
+ ? "../../../css/html_seg.css"
+ : "../../css/html_scroll.css"),
+ doc_matters.src.language,
+ site_info_button(doc_matters),
+ _manifest,
+ inline_search_form(doc_matters),
+ ((type == "seg") ? "" : "\n</div>"),
+ );
+ return o;
+}
+#+END_SRC
+
+***** epub seg head
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string epub3_seg_head(M)(
+ M doc_matters,
+) {
+ string html_base = format(q"┃<!DOCTYPE html>
+<html>┃",
+);
+ string html_simple = format(q"┃<!DOCTYPE html>
+<html
+ xmlns="http://www.w3.org/1999/xhtml"
+ xmlns:epub="http://www.idpf.org/2007/ops"
+ lang="%s" xml:lang="%s">┃",
+ doc_matters.src.language,
+ doc_matters.src.language,
+ );
+ string html_strict = format(q"┃<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
+ "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml"
+ xmlns:epub="http://www.idpf.org/2007/ops"
+ lang="%s" xml:lang="%s">┃",
+ doc_matters.src.language,
+ doc_matters.src.language,
+ );
+ string o;
+ o = format(q"┃%s
+<head>
+ <title>
+ %s%s
+ </title>
+ <meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
+ <meta name="dc.title" content="%s" />
+ <meta name="dc.author" content="%s" />
+ <meta name="dc.publisher" content="FIX" />
+ <meta name="dc.date" content="%s" />
+ <meta name="dc.date.created" content="%s" />
+ <meta name="dc.date.issued" content="%s" />
+ <meta name="dc.date.available" content="%s" />
+ <meta name="dc.date.valid" content="%s" />
+ <meta name="dc.date.modified" content="%s" />
+ <meta name="dc.language" content="%s" />
+ <meta name="dc.rights" content="%s" />
+ <meta name="generator" content="%s" />
+ <link rel="generator" href="%s" />
+ <link rel="shortcut icon" href="../_dr/image/d.ico" />
+ <link rel="stylesheet" href="css/epub.css" type="text/css" id="main-css" />
+</head>
+<body lang="%s">
+<a name="top" id="top"></a>┃",
+ html_simple,
+ doc_matters.conf_make_meta.meta.title_full,
+ (doc_matters.conf_make_meta.meta.creator_author.empty) ? ""
+ : ", " ~ doc_matters.conf_make_meta.meta.creator_author,
+ doc_matters.conf_make_meta.meta.title_full,
+ (doc_matters.conf_make_meta.meta.creator_author.empty) ? ""
+ : ", " ~ doc_matters.conf_make_meta.meta.creator_author,
+ doc_matters.conf_make_meta.meta.date_published,
+ doc_matters.conf_make_meta.meta.date_created,
+ doc_matters.conf_make_meta.meta.date_issued,
+ doc_matters.conf_make_meta.meta.date_available,
+ doc_matters.conf_make_meta.meta.date_valid,
+ doc_matters.conf_make_meta.meta.date_modified,
+ doc_matters.src.language,
+ doc_matters.conf_make_meta.meta.rights_copyright,
+ doc_matters.generator_program.name_and_version,
+ doc_matters.generator_program.url_home,
+ doc_matters.src.language,
+ );
+ return o;
+}
+#+END_SRC
+
+***** xhtml tail
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string tail() {
+ string o;
+ o = format(q"┃
+ <a name="bottom" id="bottom"></a>
+ <a name="end" id="end"></a>
+</body>
+</html>┃");
+ return o;
+}
+#+END_SRC
+
+*** inline markup
+**** images
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string inline_images(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+ string _xml_type = "seg",
+) {
+ string _img_pth;
+ if (_xml_type == "epub") {
+ _img_pth = "image/";
+ } else if (_xml_type == "scroll") {
+ _img_pth = "../../image/";
+ } else if (_xml_type == "seg") {
+ _img_pth = "../../../image/";
+ }
+ if (_txt.match(rgx.inline_image)) {
+ _txt = _txt
+ .replaceAll(rgx.inline_image,
+ ("$1<img src=\""
+ ~ _img_pth
+ ~ "$3\" width=\"$4\" height=\"$5\" naturalsizeflag=\"0\" align=\"bottom\" border=\"0\" /> $6"))
+ .replaceAll(
+ rgx.inline_link_empty,
+ ("$1"));
+ }
+ return _txt;
+}
+#+END_SRC
+
+**** links
+***** scroll, seg, epub
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string inline_links(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+ string _xml_type = "seg",
+) {
+ string seg_lvs;
+ if (obj.has.inline_links) {
+ if (obj.metainfo.is_a != "code") {
+ _txt = replaceAll!(m =>
+ m[1] ~ "┤"
+ ~ (replaceAll!(n =>
+ n["type"] ~ n["path"] ~ (n["file"].encodeComponent)
+ )((obj.stow.link[m["num"].to!ulong]).to!string, rgx.uri_identify_components))
+ ~ "├"
+ )(_txt, rgx.inline_link_number_only);
+ }
+ if ((_txt.match(rgx.mark_internal_site_lnk))
+ && (_xml_type == "scroll")) { // conditions reversed to avoid: gdc compiled program run segfault
+ _txt = _txt.replaceAll(
+ rgx.inline_seg_link,
+ "$1");
+ }
+ if (_xml_type == "seg" || _xml_type == "epub") {
+ seg_lvs = (_xml_type == "epub") ? "seg_lv1_to_4" : "seg_lv4";
+ foreach (m; _txt.match(rgx.inline_link_hash)) {
+ if (m.captures[3] in doc_matters.has.tag_associations) {
+ if (
+ m.captures[3]
+ == doc_matters.has.tag_associations[(m.captures[3])][seg_lvs]
+ ) {
+ _txt = _txt.replaceFirst(
+ rgx.inline_link_hash,
+ "┥$1┝┤$3" ~ _suffix ~ "├"
+ );
+ } else {
+ _txt = _txt.replaceFirst(
+ rgx.inline_link_hash,
+ "┥$1┝┤"
+ ~ doc_matters.has.tag_associations[(m.captures[3])][seg_lvs]
+ ~ _suffix ~ "#" ~ "$3"
+ ~ "├"
+ );
+ }
+ } else {
+ if (!(doc_matters.opt.action.quiet)) {
+ writeln(
+ "WARNING on internal document links, anchor to link <<"
+ ~ m.captures[3]
+ ~ ">> not found in document, "
+ ~ "anchor: " ~ m.captures[3]
+ ~ " document: " ~ doc_matters.src.filename
+ );
+ }
+ }
+ }
+ }
+ _txt = _txt
+ .replaceAll(
+ rgx.inline_link_fn_suffix,
+ ("$1" ~ _suffix))
+ .replaceAll(
+ rgx.inline_link,
+ ("<a href=\"$2\">$1</a>"))
+ .replaceAll(
+ rgx.mark_internal_site_lnk,
+ "");
+ }
+ debug(markup_links) {
+ if (_txt.match(rgx.inline_link)) {
+ writeln(__LINE__,
+ " (missed) markup link identified (",
+ obj.has.inline_links,
+ "): ", obj.metainfo.is_a, ": ",
+ obj.text
+ );
+ }
+ }
+ debug(markup) {
+ if (_txt.match(rgx.inline_link)) {
+ writeln(__LINE__,
+ " (missed) markup link identified (",
+ obj.has.inline_links,
+ "): ", obj.metainfo.is_a, ": ",
+ obj.text
+ );
+ }
+ }
+ return _txt;
+}
+#+END_SRC
+
+**** notes
+***** scroll
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string inline_notes_scroll(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+) {
+ if (obj.has.inline_notes_reg) {
+ _txt = font_face(_txt);
+ _txt = _txt.replaceAll(
+ rgx.inline_notes_al_regular_number_note,
+ ("<a href=\"#note_$1\"><note id=\"noteref_$1\">&#160;<sup>$1</sup> </note></a>")
+ );
+ }
+ if (obj.has.inline_notes_star) {
+ _txt = font_face(_txt);
+ _txt = _txt.replaceAll(
+ rgx.inline_notes_al_special_char_note,
+ ("<a href=\"#note_$1\"><note id=\"noteref_$1\">&#160;<sup>$1</sup> </note></a>")
+ );
+ }
+ debug(markup_endnotes) {
+ if (_txt.match(rgx.inline_notes_al_regular_number_note)) {
+ writeln(__LINE__, " (missed) markup endnote: ", obj.metainfo.is_a, ": ", obj.text);
+ }
+ }
+ debug(markup) {
+ if (_txt.match(rgx.inline_notes_al_regular_number_note)) {
+ writeln(__LINE__, " (missed) markup endnote: ", obj.metainfo.is_a, ": ", obj.text);
+ }
+ }
+ return _txt;
+}
+#+END_SRC
+
+***** seg
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+auto inline_notes_seg(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+) {
+ string[] _endnotes;
+ if (obj.has.inline_notes_star) {
+ _txt = font_face(_txt);
+ /+ need markup for text, and separated footnote +/
+ foreach(m; _txt.matchAll(rgx.inline_notes_al_special_char_note)) {
+ _endnotes ~= format(
+ "%s%s%s%s\n %s%s%s%s%s\n %s\n%s",
+ "<p class=\"endnote\">",
+ "<a href=\"#noteref_",
+ m.captures[1],
+ "\">",
+ "<note id=\"note_",
+ m.captures[1],
+ "\">&#160;<sup>",
+ m.captures[1],
+ ".</sup></note></a>",
+ m.captures[2],
+ "</p>"
+ );
+ }
+ _txt = _txt.replaceAll(
+ rgx.inline_notes_al_special_char_note,
+ ("<a href=\"#note_$1\"><note id=\"noteref_$1\">&#160;<sup>$1</sup> </note></a>")
+ );
+ }
+ if (obj.has.inline_notes_reg) {
+ _txt = font_face(_txt);
+ /+ need markup for text, and separated footnote +/
+ foreach(m; _txt.matchAll(rgx.inline_notes_al_regular_number_note)) {
+ _endnotes ~= format(
+ "%s%s%s%s\n %s%s%s%s%s\n %s\n%s",
+ "<p class=\"endnote\">",
+ "<a href=\"#noteref_",
+ m.captures[1],
+ "\">",
+ "<note id=\"note_",
+ m.captures[1],
+ "\">&#160;<sup>",
+ m.captures[1],
+ ".</sup></note></a>",
+ m.captures[2],
+ "</p>"
+ );
+ }
+ _txt = _txt.replaceAll(
+ rgx.inline_notes_al_regular_number_note,
+ ("<a href=\"#note_$1\"><note id=\"noteref_$1\">&#160;<sup>$1</sup> </note></a>")
+ );
+ } else if (_txt.match(rgx.inline_notes_al_regular_number_note)) {
+ debug(markup) {
+ writeln(__LINE__, " endnote: ", obj.metainfo.is_a, ": ", obj.text);
+ }
+ }
+ auto t = tuple(
+ _txt,
+ _endnotes,
+ );
+ return t;
+}
+#+END_SRC
+
+**** inline markup
+***** scroll
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string inline_markup_scroll(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+) {
+ if (obj.metainfo.dummy_heading
+ && (obj.metainfo.is_a == "toc" || obj.metainfo.is_a == "heading")) {
+ _txt = "";
+ } else {
+ _txt = inline_images(_txt, obj, doc_matters, _suffix, "scroll");
+ _txt = inline_links(_txt, obj, doc_matters, _suffix, "scroll");
+ _txt = inline_notes_scroll(_txt, obj, doc_matters);
+ }
+ return _txt;
+}
+#+END_SRC
+
+***** seg
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+auto inline_markup_seg(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+ string _xml_type = "seg",
+) {
+ if (obj.metainfo.dummy_heading
+ && ((_xml_type == "epub"
+ && (obj.metainfo.is_a == "toc" || obj.metainfo.is_a == "heading"))
+ || obj.metainfo.is_a == "heading")
+ ) {
+ _txt = "";
+ } else {
+ _txt = inline_images(_txt, obj, doc_matters, _suffix, _xml_type); // TODO
+ _txt = inline_links(_txt, obj, doc_matters, _suffix, _xml_type); // TODO
+ }
+ auto t = inline_notes_seg(_txt, obj, doc_matters);
+ return t;
+}
+#+END_SRC
+
+*** toc
+**** subtoc
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string lev4_heading_subtoc(O,M)(
+ const O obj,
+ M doc_matters,
+) {
+ char[] lev4_subtoc;
+ lev4_subtoc ~= " <div class=\"nav\">\n";
+ foreach (subtoc; obj.tags.lev4_subtoc) {
+ if (auto m = subtoc.match(rgx.inline_link_subtoc)) {
+ auto indent = (m.captures[1].to!int - 3).to!string; // css assumptions based on use of em for left margin & indent
+ auto text = m.captures[2].to!string;
+ text = font_face(text);
+ auto link = m.captures[3].to!string;
+ lev4_subtoc ~= subtoc.replaceFirst(rgx.inline_link_subtoc,
+ format(q"┃ <p class="minitoc" indent="h%si%s">
+ ۰ <a href="%s">%s</a>
+ </p>
+┃",
+ indent,
+ indent,
+ link,
+ text,
+ ));
+ }
+ }
+ lev4_subtoc ~= " </div>\n";
+ return lev4_subtoc.to!string;
+}
+#+END_SRC
+
+**** navigation pre next svg
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+auto nav_pre_next_svg(O,M)(
+ const O obj,
+ M doc_matters,
+) {
+ string prev, next, toc;
+ if (obj.tags.segment_anchor_tag_epub == "toc") {
+ toc = "";
+ prev = "";
+ } else {
+ toc = format(q"┃<a href="toc.html" target="_top">
+ <div class="toc-button menu">
+ <svg viewbox="0 0 100 100">
+ <path d="M4,10h24c1.104,0,2-0.896,2-2s-0.896-2-2-2H4C2.896,6,2,6.896,2,8S2.896,10,4,10z M28,14H4c-1.104,0-2,0.896-2,2 s0.896,2,2,2h24c1.104,0,2-0.896,2-2S29.104,14,28,14z M28,22H4c-1.104,0-2,0.896-2,2s0.896,2,2,2h24c1.104,0,2-0.896,2-2 S29.104,22,28,22z"/>
+ </svg>
+ </div>
+ </a>┃",
+ );
+ }
+ if (obj.tags.segname_prev == "") {
+ prev = "";
+ } else {
+ prev = format(q"┃<a href="%s.html" target="_top">
+ <div class="prev-next-button previous">
+ <svg viewbox="0 0 100 100">
+ <path class="arrow" d="M 50,0 L 60,10 L 20,50 L 60,90 L 50,100 L 0,50 Z" transform=" translate(15,0)">
+ </svg>
+ </div>
+ </a>┃",
+ obj.tags.segname_prev,
+ );
+ }
+ if (obj.tags.segname_next == "") {
+ next = "";
+ } else {
+ next = format(q"┃<a href="%s.html" target="_top">
+ <div class="prev-next-button next">
+ <svg viewbox="0 0 100 100">
+ <path class="arrow" d="M 50,0 L 60,10 L 20,50 L 60,90 L 50,100 L 0,50 Z "transform="translate(85,100) rotate(180) ">
+ </svg>
+ </div>
+ </a>┃",
+ obj.tags.segname_next,
+ );
+ }
+ string _toc_pre_next = format(q"┃ <div class="flex-menu-option">
+ <div class="nav-bar">
+ %s
+ %s
+ %s
+ </div>
+ </div>
+ </div>
+</div>┃",
+ toc,
+ prev,
+ next,
+ );
+ string _pre_next = format(q"┃ <div class="flex-menu-option">
+ <div class="nav-bar">
+ %s
+ %s
+ </div>
+ </div>
+ </div>
+</div>┃",
+ prev,
+ next,
+ );
+ struct bar {
+ string toc_pre_next() {
+ return _toc_pre_next;
+ }
+ string pre_next() {
+ return _pre_next;
+ }
+ }
+ return bar();
+}
+#+END_SRC
+
+*** heading
+**** heading
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string heading(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _xml_type = "html",
+) {
+ assert(obj.metainfo.is_of_part == "body" || "frontmatter" || "backmatter");
+ assert(obj.metainfo.is_of_section == "body" || "toc" || "endnotes" || "glossary" || "bibliography" || "bookindex" || "blurb");
+ assert(obj.metainfo.is_of_type == "para");
+ assert(obj.metainfo.is_a == "heading");
+ string tags = _xhtml_anchor_tags(obj);
+ string heading_lev_anchor_tag;
+ string _horizontal_rule = "<hr />";
+ if ((_xml_type != "html")
+ || (obj.metainfo.heading_lev_markup == 0 || obj.metainfo.heading_lev_markup > 4)) {
+ _horizontal_rule = "";
+ }
+ _txt = font_face(_txt);
+ string o;
+ heading_lev_anchor_tag = (obj.tags.heading_lev_anchor_tag.empty)
+ ? ""
+ : "<a name=\"" ~ obj.tags.heading_lev_anchor_tag ~ "\"></a>";
+ if (_txt.empty) {
+ o = format(q"┃%s
+ ┃",
+ _horizontal_rule,
+ );
+ } else if (!(obj.metainfo.identifier.empty)) {
+ o = format(q"┃%s
+ <div class="substance">
+ <label class="ocn"><a href="#%s" class="lnkocn">%s</a></label>
+ <h%s class="%s" id="%s"><a name="%s"></a>%s%s
+ %s
+ </h%s>
+ </div>┃",
+ _horizontal_rule,
+ obj.metainfo.identifier,
+ (doc_matters.opt.action.ocn_off) ? "" : ((obj.metainfo.object_number.empty) ? "" : obj.metainfo.identifier),
+ obj.metainfo.heading_lev_markup,
+ obj.metainfo.is_a,
+ obj.metainfo.identifier,
+ obj.metainfo.identifier,
+ tags,
+ heading_lev_anchor_tag,
+ _txt,
+ obj.metainfo.heading_lev_markup,
+ );
+ } else {
+ o = format(q"┃%s
+ <div class="substance">
+ <h%s class="%s">%s%s
+ %s
+ </h%s>
+ </div>┃",
+ _horizontal_rule,
+ obj.metainfo.heading_lev_markup,
+ obj.metainfo.is_a,
+ tags,
+ heading_lev_anchor_tag,
+ _txt,
+ obj.metainfo.heading_lev_markup,
+ );
+ }
+ return o;
+}
+#+END_SRC
+
+**** scroll
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string heading_scroll(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+) {
+ _txt = inline_markup_scroll(_txt, obj, doc_matters, _suffix);
+ string o = heading(_txt, obj, doc_matters);
+ return o;
+}
+#+END_SRC
+
+**** seg
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+auto heading_seg(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+ string _xml_type = "html",
+) {
+ auto t = inline_markup_seg(_txt, obj, doc_matters, _suffix, _xml_type);
+ _txt = t[0];
+ string[] _endnotes = t[1];
+ string o = heading(_txt, obj, doc_matters, _xml_type);
+ auto u = tuple(
+ o,
+ _endnotes,
+ );
+ return u;
+}
+#+END_SRC
+
+*** para
+**** para
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string para(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+) {
+ assert(obj.metainfo.is_of_part == "body" || "frontmatter" || "backmatter");
+ assert(obj.metainfo.is_of_section == "body" || "toc" || "endnotes" || "glossary" || "bibliography" || "bookindex" || "blurb");
+ assert(obj.metainfo.is_of_type == "para");
+ assert(obj.metainfo.is_a == "para" || "toc" || "endnotes" || "glossary" || "bibliography" || "bookindex" || "blurb");
+ string tags = _xhtml_anchor_tags(obj);
+ _txt = font_face(_txt);
+ string o;
+ _txt = (obj.attrib.bullet) ? ("●&#160;&#160;" ~ _txt) : _txt;
+ _txt = _txt.replaceFirst(rgx.inline_link_anchor,
+ "<a name=\"$1\"></a>");
+ if (!(obj.metainfo.identifier.empty)) {
+ o = format(q"┃ <div class="substance">
+ <label class="ocn"><a href="#%s" class="lnkocn">%s</a></label>
+ <p class="%s" indent="h%si%s" id="%s">%s
+ %s
+ </p>
+</div>┃",
+ obj.metainfo.identifier,
+ (doc_matters.opt.action.ocn_off) ? "" : ((obj.metainfo.object_number.empty) ? "" : obj.metainfo.identifier),
+ obj.metainfo.is_a,
+ obj.attrib.indent_hang,
+ obj.attrib.indent_base,
+ obj.metainfo.identifier,
+ tags,
+ _txt
+ );
+ } else {
+ o = format(q"┃ <div class="substance">
+ <p class="%s" indent="h%si%s">%s
+ %s
+ </p>
+</div>┃",
+ obj.metainfo.is_a,
+ obj.attrib.indent_hang,
+ obj.attrib.indent_base,
+ tags,
+ _txt
+ );
+ }
+ return o;
+}
+#+END_SRC
+
+**** scroll
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string para_scroll(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+) {
+ if (obj.metainfo.is_a == "toc" && _txt.match(rgx.inline_link_toc_to_backmatter)) {
+ _txt = _txt.replaceAll(rgx.inline_link_toc_to_backmatter, "┤#section_$1├");
+ }
+ _txt = inline_markup_scroll(_txt, obj, doc_matters, _suffix);
+ string o = para(_txt, obj, doc_matters);
+ return o;
+}
+#+END_SRC
+
+**** seg
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+auto para_seg(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+ string _xml_type = "html",
+) {
+ auto t = inline_markup_seg(_txt, obj, doc_matters, _suffix, _xml_type);
+ _txt = t[0].to!string;
+ string[] _endnotes = t[1];
+ string o = para(_txt, obj, doc_matters);
+ auto u = tuple(
+ o,
+ _endnotes,
+ );
+ return u;
+}
+#+END_SRC
+
+*** quote
+**** quote
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string quote(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+) {
+ assert(obj.metainfo.is_of_part == "body");
+ assert(obj.metainfo.is_of_section == "body" || "glossary" || "bibliography" || "bookindex" || "blurb");
+ assert(obj.metainfo.is_of_type == "block");
+ assert(obj.metainfo.is_a == "quote");
+ _txt = font_face(_txt);
+ string o;
+ if (!(obj.metainfo.identifier.empty)) {
+ o = format(q"┃ <div class="substance">
+ <label class="ocn"><a href="#%s" class="lnkocn">%s</a></label>
+ <p class="%s" id="%s">
+ %s
+ </p>
+</div>┃",
+ obj.metainfo.identifier,
+ (doc_matters.opt.action.ocn_off) ? "" : ((obj.metainfo.object_number.empty) ? "" : obj.metainfo.identifier),
+ obj.metainfo.is_a,
+ obj.metainfo.identifier,
+ _txt
+ );
+ } else {
+ o = format(q"┃ <div class="substance">
+ <p class="%s">
+ %s
+ </p>
+</div>┃",
+ obj.metainfo.is_a,
+ _txt
+ );
+ }
+ return o;
+}
+#+END_SRC
+
+**** scroll
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string quote_scroll(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+) {
+ _txt = inline_markup_scroll(_txt, obj, doc_matters, _suffix);
+ string o = quote(_txt, obj, doc_matters);
+ return o;
+}
+#+END_SRC
+
+**** seg
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+auto quote_seg(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+ string _xml_type = "html",
+) {
+ auto t = inline_markup_seg(_txt, obj, doc_matters, _suffix, _xml_type);
+ _txt = t[0].to!string;
+ string[] _endnotes = t[1];
+ string o = quote(_txt, obj, doc_matters);
+ auto u = tuple(
+ o,
+ _endnotes,
+ );
+ return u;
+}
+#+END_SRC
+
+*** group
+**** group
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string group(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+) {
+ assert(obj.metainfo.is_of_part == "body");
+ assert(obj.metainfo.is_of_section == "body" || "glossary" || "bibliography" || "bookindex" || "blurb");
+ assert(obj.metainfo.is_of_type == "block");
+ assert(obj.metainfo.is_a == "group");
+ _txt = font_face(_txt);
+ string o;
+ if (!(obj.metainfo.identifier.empty)) {
+ o = format(q"┃ <div class="substance">
+ <label class="ocn"><a href="#%s" class="lnkocn">%s</a></label>
+ <p class="%s" id="%s">
+ %s
+ </p>
+</div>┃",
+ obj.metainfo.identifier,
+ (doc_matters.opt.action.ocn_off) ? "" : ((obj.metainfo.object_number.empty) ? "" : obj.metainfo.identifier),
+ obj.metainfo.is_a,
+ obj.metainfo.identifier,
+ _txt
+ );
+ } else {
+ o = format(q"┃ <div class="substance">
+ <p class="%s">
+ %s
+ </p>
+</div>┃",
+ obj.metainfo.is_a,
+ _txt
+ );
+ }
+ return o;
+}
+#+END_SRC
+
+**** scroll
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string group_scroll(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+ string _xml_type = "html",
+) {
+ _txt = inline_markup_scroll(_txt, obj, doc_matters, _suffix);
+ string o = group(_txt, obj, doc_matters);
+ return o;
+}
+#+END_SRC
+
+**** seg
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+auto group_seg(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+ string _xml_type = "html",
+) {
+ auto t = inline_markup_seg(_txt, obj, doc_matters, _suffix, _xml_type);
+ _txt = t[0].to!string;
+ string[] _endnotes = t[1];
+ string o = group(_txt, obj, doc_matters);
+ auto u = tuple(
+ o,
+ _endnotes,
+ );
+ return u;
+}
+#+END_SRC
+
+*** block
+**** block
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string block(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+) {
+ assert(obj.metainfo.is_of_part == "body");
+ assert(obj.metainfo.is_of_section == "body" || "glossary" || "bibliography" || "bookindex" || "blurb");
+ assert(obj.metainfo.is_of_type == "block");
+ assert(obj.metainfo.is_a == "block");
+ _txt = font_face(_txt);
+ string o;
+ if (!(obj.metainfo.identifier.empty)) {
+ o = format(q"┃ <div class="substance">
+ <label class="ocn"><a href="#%s" class="lnkocn">%s</a></label>
+ <p class="%s" id="%s">%s</p>
+</div>┃",
+ obj.metainfo.identifier,
+ (doc_matters.opt.action.ocn_off) ? "" : ((obj.metainfo.object_number.empty) ? "" : obj.metainfo.identifier),
+ obj.metainfo.is_a,
+ obj.metainfo.identifier,
+ _txt.stripRight
+ );
+ } else {
+ o = format(q"┃ <div class="substance">
+ <p class="%s">%s</p>
+</div>┃",
+ obj.metainfo.is_a,
+ _txt.stripRight
+ );
+ }
+ return o;
+}
+#+END_SRC
+
+**** scroll
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string block_scroll(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+ string _xml_type = "html",
+) {
+ _txt = inline_markup_scroll(_txt, obj, doc_matters, _suffix);
+ string o = block(_txt, obj, doc_matters);
+ return o;
+}
+#+END_SRC
+
+**** seg
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+auto block_seg(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+ string _xml_type = "html",
+) {
+ auto t = inline_markup_seg(_txt, obj, doc_matters, _suffix, _xml_type);
+ _txt = t[0].to!string;
+ string[] _endnotes = t[1];
+ string o = block(_txt, obj, doc_matters);
+ auto u = tuple(
+ o,
+ _endnotes,
+ );
+ return u;
+}
+#+END_SRC
+
+*** poem verse
+**** verse
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string verse(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+) {
+ assert(obj.metainfo.is_of_part == "body");
+ assert(obj.metainfo.is_of_section == "body" || "glossary" || "bibliography" || "bookindex" || "blurb");
+ assert(obj.metainfo.is_of_type == "block");
+ assert(obj.metainfo.is_a == "verse");
+ _txt = font_face(_txt);
+ string o;
+ if (!(obj.metainfo.identifier.empty)) {
+ o = format(q"┃ <div class="substance">
+ <label class="ocn"><a href="#%s" class="lnkocn">%s</a></label>
+ <p class="%s" id="%s">%s</p>
+ </div>┃",
+ obj.metainfo.identifier,
+ (doc_matters.opt.action.ocn_off) ? "" : ((obj.metainfo.object_number.empty) ? "" : obj.metainfo.identifier),
+ obj.metainfo.is_a,
+ obj.metainfo.identifier,
+ _txt
+ );
+ } else {
+ o = format(q"┃ <div class="substance">
+ <p class="%s">%s</p>
+ </div>┃",
+ obj.metainfo.is_a,
+ _txt
+ );
+ }
+ return o;
+}
+#+END_SRC
+
+**** scroll
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string verse_scroll(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+ string _xml_type = "html",
+) {
+ _txt = inline_markup_scroll(_txt, obj, doc_matters, _suffix);
+ string o = verse(_txt, obj, doc_matters);
+ return o;
+}
+#+END_SRC
+
+**** seg
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+auto verse_seg(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+ string _suffix = ".html",
+ string _xml_type = "html",
+) {
+ auto t = inline_markup_seg(_txt, obj, doc_matters, _suffix, _xml_type);
+ _txt = t[0].to!string;
+ string[] _endnotes = t[1];
+ string o = verse(_txt, obj, doc_matters);
+ auto u = tuple(
+ o,
+ _endnotes,
+ );
+ return u;
+}
+#+END_SRC
+
+*** code
+
+#+name: xhtml_format_objects_code
+#+BEGIN_SRC d
+string code(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+) {
+ assert(obj.metainfo.is_of_part == "body");
+ assert(obj.metainfo.is_of_section == "body");
+ assert(obj.metainfo.is_of_type == "block");
+ assert(obj.metainfo.is_a == "code");
+ string o;
+ string codelines(string _txt) {
+ string _codelines;
+ if (obj.code_block.linenumbers) {
+ string[] _block_lines = (_txt).split(rgx.br_newlines_linebreaks);
+ _codelines = " <pre class=\"codeline\">\n";
+ foreach (k, _line; _block_lines) {
+ if (k == 1) {
+ _codelines ~= format(q"┃ <span class="tr first-row"><span class="th"></span><codeline>%s</codeline></span>
+┃",
+ _line,
+ );
+ } else {
+ _codelines ~= format(q"┃ <span class="tr"><span class="th"></span><codeline>%s</codeline></span>
+┃",
+ _line,
+ );
+ }
+ }
+ _codelines ~= " </pre>";
+ } else {
+ _codelines = " <pre class=\"codeline\">\n";
+ _codelines ~= _txt;
+ _codelines ~= " </pre>";
+ }
+ return _codelines;
+ }
+ if (!(obj.metainfo.identifier.empty)) {
+ o = format(q"┃ <div class="substance">
+ <label class="ocn"><a href="#%s" class="lnkocn">%s</a></label>
+ <p class="%s" id="%s">%s</p>
+</div>┃",
+ obj.metainfo.identifier,
+ (doc_matters.opt.action.ocn_off) ? "" : ((obj.metainfo.object_number.empty) ? "" : obj.metainfo.identifier),
+ obj.metainfo.is_a,
+ obj.metainfo.identifier,
+ codelines(_txt)
+ );
+ } else {
+ o = format(q"┃ <div class="substance">
+ <p class="%s">%s</p>
+</div>┃",
+ obj.metainfo.is_a,
+ codelines(_txt)
+ );
+ }
+ return o;
+}
+#+END_SRC
+
+*** table
+**** TODO tablarize
+
+align="left|right|center"
+<td align="right">$100</td>
+
+"style=\"text-align:right\""
+"style=\"text-align:left\""
+
+"style=\"text-align:" ~ "right\""
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+auto tablarize(O)(
+ string _txt,
+ const O obj,
+) {
+ string[] _table_rows = (_txt).split(rgx.table_delimiter_row);
+ string[] _table_cols;
+ string _table;
+ string _tablenote;
+ foreach(row_idx, row; _table_rows) {
+ _table_cols = row.split(rgx.table_delimiter_col);
+ _table ~= "<tr>";
+ foreach(col_idx, cell; _table_cols) {
+ if ((_table_cols.length == 1)
+ && (_table_rows.length <= row_idx+2)) {
+ _tablenote ~= cell;
+ } else {
+ string _col_is = (row_idx == 0 && obj.table.heading) ? "th" : "td";
+ string _align = ("style=\"text-align:"
+ ~ ((obj.table.column_aligns[col_idx] == "l")
+ ? "left\"" : "right\""));
+ _table ~= "<" ~ _col_is ~ " width=\"" ~ obj.table.column_widths[col_idx].to!string ~ "%\" " ~ _align ~ ">";
+ _table ~= cell;
+ _table ~= "</" ~ _col_is ~ ">";
+ }
+ }
+ _table ~= "</tr>";
+ }
+ auto t = tuple(
+ _table,
+ _tablenote,
+ );
+ return t;
+}
+#+END_SRC
+
+**** table
+
+#+name: xhtml_format_objects
+#+BEGIN_SRC d
+string table(O,M)(
+ string _txt,
+ const O obj,
+ M doc_matters,
+) {
+ assert(obj.metainfo.is_of_part == "body");
+ assert(obj.metainfo.is_of_section == "body");
+ assert(obj.metainfo.is_of_type == "block");
+ assert(obj.metainfo.is_a == "table");
+ string tags = _xhtml_anchor_tags(obj);
+ _txt = font_face(_txt);
+ auto t = tablarize(_txt, obj);
+ _txt = t[0];
+ string _note = t[1];
+ string o;
+ o = format(q"┃ <div class="substance">
+ <label class="ocn"><a href="#%s" class="lnkocn">%s</a></label>
+ <p class="%s" id="%s">%s
+ <table summary="normal text css" width="95%%" border="0" bgcolor="white" cellpadding="2" align="center">
+ %s
+ </table>
+ %s
+ </p>
+</div>┃",
+ obj.metainfo.object_number,
+ (doc_matters.opt.action.ocn_off) ? "" : ((obj.metainfo.object_number.empty) ? "" : obj.metainfo.identifier),
+ obj.metainfo.is_a,
+ obj.metainfo.object_number,
+ tags,
+ _txt,
+ _note
+ );
+ return o;
+}
+#+END_SRC
+
+* _html_ [#A] :html:
+** _module template_ :module:
+
+#+BEGIN_SRC d :tangle "../src/doc_reform/output/html.d"
+module doc_reform.output.html;
+template outputHTML() {
+ <<output_imports>>
+ mixin outputXHTMLs;
+ <<output_html_scroll>>
+ <<output_html_seg>>
+ <<output_html_css>>
+ <<copy_html_images>>
+}
+#+END_SRC
+
+** scroll :scroll:
+*** ↻ loop & switch (sections & objects) format html output
+
+#+name: output_html_scroll
+#+BEGIN_SRC d
+void scroll(D,M)(
+ const D doc_abstraction,
+ M doc_matters,
+) {
+ mixin DocReformOutputRgxInit;
+ auto xhtml_format = outputXHTMLs();
+ auto rgx = Rgx();
+ string[] doc_html;
+ string[] doc;
+ string suffix = ".html";
+ string previous_part = "";
+ string delimit = "";
+#+END_SRC
+
+**** ↻ the loops & outer switch (sections & objects) format output
+
+#+name: output_html_scroll
+#+BEGIN_SRC d
+ foreach (part; doc_matters.has.keys_seq.scroll) {
+ foreach (obj; doc_abstraction[part]) {
+ delimit = xhtml_format.div_delimit(part, previous_part);
+ string _txt = xhtml_format.special_characters(obj);
+ switch (obj.metainfo.is_of_part) {
+#+END_SRC
+
+***** frontmatter
+
+#+name: output_html_scroll
+#+BEGIN_SRC d
+ case "frontmatter": assert(part == "head" || "toc");
+ switch (obj.metainfo.is_of_type) {
+ case "para":
+ switch (obj.metainfo.is_a) {
+ case "heading":
+ doc_html ~= delimit ~ xhtml_format.heading_scroll(_txt, obj, doc_matters, suffix);
+ break;
+ case "toc":
+ doc_html ~= xhtml_format.para_scroll(_txt, obj, doc_matters, suffix);
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_of_type);
+ }
+ }
+ break;
+ }
+ break;
+#+END_SRC
+
+***** body
+
+#+name: output_html_scroll
+#+BEGIN_SRC d
+ case "body": assert(part == "body" || "head");
+ switch (obj.metainfo.is_of_type) {
+ case "para":
+ switch (obj.metainfo.is_a) {
+ case "heading":
+ doc_html ~= delimit ~ xhtml_format.heading_scroll(_txt, obj, doc_matters, suffix);
+ break;
+ case "para":
+ doc_html ~= xhtml_format.para_scroll(_txt, obj, doc_matters, suffix);
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+ case "block":
+ switch (obj.metainfo.is_a) {
+ case "quote":
+ doc_html ~= xhtml_format.quote_scroll(_txt, obj, doc_matters);
+ break;
+ case "group":
+ doc_html ~= xhtml_format.group_scroll(_txt, obj, doc_matters);
+ break;
+ case "block":
+ doc_html ~= xhtml_format.block_scroll(_txt, obj, doc_matters);
+ break;
+ case "poem":
+ break;
+ case "verse":
+ doc_html ~= xhtml_format.verse_scroll(_txt, obj, doc_matters, suffix);
+ break;
+ case "code":
+ doc_html ~= xhtml_format.code(_txt, obj, doc_matters);
+ break;
+ case "table":
+ doc_html ~= xhtml_format.table(_txt, obj, doc_matters);
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_of_type);
+ }
+ }
+ break;
+ }
+ break;
+#+END_SRC
+
+***** backmatter
+
+#+name: output_html_scroll
+#+BEGIN_SRC d
+ case "backmatter":
+ assert(part == "endnotes" || "glossary" || "bibliography" || "bookindex" || "blurb" || "tail");
+ switch (obj.metainfo.is_of_type) {
+ case "para":
+ switch (obj.metainfo.is_a) {
+ case "heading":
+ doc_html ~= delimit ~ xhtml_format.heading_scroll(_txt, obj, doc_matters, suffix);
+ break;
+ case "endnote": assert(part == "endnotes");
+ doc_html ~= xhtml_format.para_scroll(_txt, obj, doc_matters, suffix);
+ break;
+ case "glossary": assert(part == "glossary");
+ doc_html ~= xhtml_format.para_scroll(_txt, obj, doc_matters, suffix);
+ break;
+ case "bibliography": assert(part == "bibliography");
+ doc_html ~= xhtml_format.para_scroll(_txt, obj, doc_matters, suffix);
+ break;
+ case "bookindex": assert(part == "bookindex");
+ doc_html ~= xhtml_format.para_scroll(_txt, obj, doc_matters, suffix);
+ break;
+ case "blurb": assert(part == "blurb");
+ doc_html ~= xhtml_format.para_scroll(_txt, obj, doc_matters, suffix);
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_of_type);
+ }
+ }
+ break;
+ }
+ break;
+ case "comment":
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_of_part);
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ writeln(__FILE__, ":", __LINE__, ": ", obj.text);
+ }
+ }
+ break;
+#+END_SRC
+
+***** closings & post loop
+
+#+name: output_html_scroll
+#+BEGIN_SRC d
+ }
+ }
+ }
+ doc = xhtml_format.html_head(doc_matters, "scroll") ~ doc_html ~ xhtml_format.tail;
+ scroll_write_output(doc, doc_matters);
+}
+#+END_SRC
+
+*** write output file
+
+#+name: output_html_scroll
+#+BEGIN_SRC d
+void scroll_write_output(D,M)(
+ D doc,
+ M doc_matters,
+) {
+ debug(asserts) {
+ static assert(is(typeof(doc) == string[]));
+ }
+ auto pth_html = DocReformPathsHTML!()(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(doc_matters.src.filename), "w");
+ foreach (o; doc) {
+ f.writeln(o);
+ }
+ } catch (ErrnoException ex) {
+ // Handle error
+ }
+ if (!(doc_matters.opt.action.quiet)) {
+ writeln(" ", pth_html.fn_scroll(doc_matters.src.filename));
+ }
+}
+#+END_SRC
+
+** seg :seg:
+*** ↻ loop & switch (sections & objects) format html output
+
+#+name: output_html_seg
+#+BEGIN_SRC d
+void seg(D,M)(
+ const D doc_abstraction,
+ M doc_matters,
+) {
+ mixin DocReformOutputRgxInit;
+ auto rgx = Rgx();
+ auto xhtml_format = outputXHTMLs();
+ string[][string] doc_html;
+ string[][string] doc_html_endnotes;
+ string[] doc;
+ string segment_filename;
+ string[] top_level_headings = ["","","",""];
+ string previous_seg_filename = "";
+ string suffix = ".html";
+ string previous_part = "";
+ string delimit = "";
+#+END_SRC
+
+**** ↻ the loop (sections & objects) format output
+
+#+name: output_html_seg
+#+BEGIN_SRC d
+ foreach (part; doc_matters.has.keys_seq.seg) {
+ foreach (obj; doc_abstraction[part]) {
+ delimit = xhtml_format.div_delimit(part, previous_part);
+ string _txt = xhtml_format.special_characters(obj);
+#+END_SRC
+
+***** all headings
+
+#+name: output_html_seg
+#+BEGIN_SRC d
+ if (obj.metainfo.is_a == "heading") {
+ assert(part == "head" || "toc" || "body" || "endnotes" || "glossary" || "bibliography" || "bookindex" || "blurb" || "tail");
+ switch (obj.metainfo.heading_lev_markup) {
+ case 0: .. case 3:
+ /+ fill buffer, and replace with new levels from 1 to 3 +/
+ switch (obj.metainfo.heading_lev_markup) {
+ case 0:
+ top_level_headings[0] = "";
+ top_level_headings[1] = "";
+ top_level_headings[2] = "";
+ top_level_headings[3] = "";
+ goto default;
+ case 1:
+ top_level_headings[1] = "";
+ top_level_headings[2] = "";
+ top_level_headings[3] = "";
+ goto default;
+ case 2:
+ top_level_headings[2] = "";
+ top_level_headings[3] = "";
+ goto default;
+ case 3:
+ top_level_headings[3] = "";
+ goto default;
+ default:
+ auto t = xhtml_format.heading_seg(_txt, obj, doc_matters, suffix, "seg");
+ top_level_headings[obj.metainfo.heading_lev_markup] = t[0];
+ break;
+ }
+ break;
+ case 4:
+ segment_filename = obj.tags.segment_anchor_tag_epub;
+ doc_html[segment_filename] ~= xhtml_format.html_head(doc_matters, "seg");
+ auto navigation_bar = xhtml_format.nav_pre_next_svg(obj, doc_matters);
+ doc_html[segment_filename] ~= navigation_bar.toc_pre_next;
+ previous_seg_filename = segment_filename;
+ foreach (top_level_heading; top_level_headings) {
+ doc_html[segment_filename] ~= top_level_heading;
+ }
+ auto t = xhtml_format.heading_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0].to!string;
+ doc_html[segment_filename] ~= xhtml_format.lev4_heading_subtoc(obj, doc_matters);
+ doc_html_endnotes[segment_filename] ~= t[1];
+ break;
+ case 5: .. case 7:
+ auto t = xhtml_format.heading_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0].to!string;
+ doc_html_endnotes[segment_filename] ~= t[1];
+ break;
+ case 8: .. case 9:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a, ": ", obj.metainfo.heading_lev_markup);
+ writeln(__FILE__, ":", __LINE__, ": ", obj.text);
+ }
+ }
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a, ": ", obj.metainfo.heading_lev_markup);
+ }
+ }
+ break;
+ }
+#+END_SRC
+
+***** non-heading
+
+#+name: output_html_seg
+#+BEGIN_SRC d
+ } else {
+ assert(part == "head" || "toc" || "body" || "endnotes" || "glossary" || "bibliography" || "bookindex" || "blurb" || "tail");
+ switch (obj.metainfo.is_of_part) {
+#+END_SRC
+
+****** frontmatter
+
+#+name: output_html_seg
+#+BEGIN_SRC d
+ case "frontmatter": assert(part == "head" || "toc");
+ switch (obj.metainfo.is_of_type) {
+ case "para":
+ switch (obj.metainfo.is_a) {
+ case "toc":
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0].to!string;
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+#+END_SRC
+
+****** body
+
+#+name: output_html_seg
+#+BEGIN_SRC d
+ case "body": assert(part == "body");
+ switch (obj.metainfo.is_of_type) {
+ case "para":
+ switch (obj.metainfo.is_a) {
+ case "para":
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0].to!string;
+ doc_html_endnotes[segment_filename] ~= t[1];
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+ case "block":
+ switch (obj.metainfo.is_a) {
+ case "quote":
+ auto t = xhtml_format.quote_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0].to!string;
+ doc_html_endnotes[segment_filename] ~= t[1];
+ break;
+ case "group":
+ auto t = xhtml_format.group_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0].to!string;
+ doc_html_endnotes[segment_filename] ~= t[1];
+ break;
+ case "block":
+ auto t = xhtml_format.block_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0].to!string;
+ doc_html_endnotes[segment_filename] ~= t[1];
+ break;
+ case "poem":
+ break;
+ case "verse":
+ auto t = xhtml_format.verse_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0].to!string;
+ doc_html_endnotes[segment_filename] ~= t[1];
+ break;
+ case "code":
+ doc_html[segment_filename] ~= xhtml_format.code(_txt, obj, doc_matters);
+ break;
+ case "table":
+ doc_html[segment_filename] ~= xhtml_format.table(_txt, obj, doc_matters);
+ doc_html_endnotes[segment_filename] ~= "";
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_of_type);
+ }
+ }
+ break;
+ }
+ break;
+#+END_SRC
+
+****** backmatter
+
+#+name: output_html_seg
+#+BEGIN_SRC d
+ case "backmatter":
+ assert(part == "endnotes" || "glossary" || "bibliography" || "bookindex" || "blurb" || "tail");
+ switch (obj.metainfo.is_of_type) {
+ case "para":
+ switch (obj.metainfo.is_a) {
+ case "endnote": assert(part == "endnotes");
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0];
+ break;
+ case "glossary": assert(part == "glossary");
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0];
+ doc_html_endnotes[segment_filename] ~= t[1];
+ break;
+ case "bibliography": assert(part == "bibliography");
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0];
+ doc_html_endnotes[segment_filename] ~= t[1];
+ break;
+ case "bookindex": assert(part == "bookindex");
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0];
+ doc_html_endnotes[segment_filename] ~= t[1];
+ break;
+ case "blurb": assert(part == "blurb");
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "seg");
+ doc_html[segment_filename] ~= t[0];
+ doc_html_endnotes[segment_filename] ~= t[1];
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_of_type);
+ }
+ }
+ break;
+ }
+ break;
+ case "comment":
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_of_part);
+ }
+ }
+ break;
+ }
+#+END_SRC
+
+***** closings & post loop
+
+#+name: output_html_seg
+#+BEGIN_SRC d
+ }
+ }
+ }
+ seg_write_output(doc_html, doc_html_endnotes, doc_matters);
+}
+#+END_SRC
+
+*** write output files
+
+#+name: output_html_seg
+#+BEGIN_SRC d
+void seg_write_output(D,E,M)(
+ D doc_html,
+ E doc_html_endnotes,
+ M doc_matters,
+) {
+ debug(asserts) {
+ static assert(is(typeof(doc_html) == string[][string]));
+ }
+ mixin DocReformOutputRgxInit;
+ auto rgx = Rgx();
+ auto pth_html = DocReformPathsHTML!()(doc_matters.output_path, doc_matters.src.language);
+ auto xhtml_format = outputXHTMLs();
+ auto m = doc_matters.src.filename.matchFirst(rgx.src_fn);
+ try {
+ if (!exists(pth_html.seg(doc_matters.src.filename))) {
+ pth_html.seg(doc_matters.src.filename).mkdirRecurse;
+ }
+ foreach (seg_filename; doc_matters.has.segnames_lv4) {
+ auto f = File(pth_html.fn_seg(doc_matters.src.filename, seg_filename), "w");
+ foreach (docseg; doc_html[seg_filename]) {
+ f.writeln(docseg);
+ }
+ foreach (docseg; doc_html_endnotes[seg_filename]) {
+ f.writeln(docseg);
+ }
+ f.writeln(xhtml_format.tail);
+ }
+ } catch (ErrnoException ex) {
+ // handle error
+ }
+ if (!(doc_matters.opt.action.quiet)) {
+ writeln(" ", pth_html.fn_seg(doc_matters.src.filename, "toc"));
+ }
+}
+#+END_SRC
+
+** css :css:
+
+#+name: output_html_css
+#+BEGIN_SRC d
+void css(M)(M doc_matters) {
+ auto css = DocReformCss(doc_matters);
+ auto pth_html = DocReformPathsHTML!()(doc_matters.output_path, doc_matters.src.language);
+ try {
+ if (!exists(pth_html.css)) {
+ (pth_html.css).mkdirRecurse;
+ }
+ auto f = File(pth_html.fn_seg_css, "w");
+ f.writeln(css.html_seg);
+ f = File(pth_html.fn_scroll_css, "w");
+ f.writeln(css.html_scroll);
+ } catch (ErrnoException ex) {
+ // Handle error
+ }
+}
+#+END_SRC
+
+** images :images:
+
+#+name: copy_html_images
+#+BEGIN_SRC d
+void images_cp(M)(
+ M doc_matters,
+) {
+ { /+ (copy html images) +/
+
+ auto pth_html = DocReformPathsHTML!()(doc_matters.output_path, doc_matters.src.language);
+ if (!exists(pth_html.image)) {
+ pth_html.image.mkdirRecurse;
+ }
+ foreach (image; doc_matters.srcs.image_list) {
+ auto fn_src_in = doc_matters.src.image_dir_path ~ "/" ~ image;
+ auto fn_src_out = pth_html.image ~ "/" ~ image;
+ debug(images_html) {
+ writeln(fn_src_in, " -> ", fn_src_out);
+ }
+ if (exists(fn_src_in)) {
+ fn_src_in.copy(fn_src_out);
+ } else {
+ if (!(doc_matters.opt.action.quiet)) {
+ writeln("WARNING image not found: ", fn_src_in);
+ }
+ }
+ }
+ }
+}
+#+END_SRC
+
+* _epub_ [#B] :epub:
+
+|-----------------------+--------------------------+---------------------------+----------------------------------|
+| function | filename | module | variable |
+|-----------------------+--------------------------+---------------------------+----------------------------------|
+| identify doc filetype | mimetype | epub3_mimetypes | mimetypes |
+|-----------------------+--------------------------+---------------------------+----------------------------------|
+| identify doc root | META-INF/container.xml | epub3_container_xml | meta_inf_container_xml |
+|-----------------------+--------------------------+---------------------------+----------------------------------|
+| doc manifest | OEBPS/content.opf | epub3_oebps_content | oebps_content_opf |
+|-----------------------+--------------------------+---------------------------+----------------------------------|
+| doc navigation | OEBPS/toc_nav.xhtml | epub3_oebps_toc_nav_xhtml | oebps_toc_nav_xhtml |
+| | OEBPS/toc.ncx | epub2_oebps_toc_ncx | oebps_toc_ncx |
+|-----------------------+--------------------------+---------------------------+----------------------------------|
+| doc contents | OEBPS/[files ... ].xhtml | outputEPub3 | doc_epub3[seg_filename] |
+| | | | doc_epub3_endnotes[seg_filename] |
+|-----------------------+--------------------------+---------------------------+----------------------------------|
+
+** _module template_ :module:
+
+#+BEGIN_SRC d :tangle "../src/doc_reform/output/epub3.d"
+module doc_reform.output.epub3;
+template outputEPub3() {
+ <<output_imports>>
+ mixin InternalMarkup;
+ mixin outputXHTMLs;
+ <<output_epub3_fixed>>
+ <<output_epub3_constructs>>
+ <<output_epub3_xhtml>>
+ <<output_epub3_xhtml_seg>>
+ <<output_epub3_css>>
+}
+#+END_SRC
+
+** special (epub) files :format:
+*** static
+**** _identify doc filetype_ (mimetype) [static]
+
+- mimetype file indicating that zip file contains an EPUB
+
+#+name: output_epub3_fixed
+#+BEGIN_SRC d
+string epub3_mimetypes() {
+ string o;
+ o = format(q"┃application/epub+zip┃") ~ "\n";
+ return o;
+}
+#+END_SRC
+
+**** _identify doc root_ (META-INF/container.xml) [static] rootfile: contains document root path
+
+- identifies the root package document (so systems can find it), [unchanged from epub2]
+
+#+name: output_epub3_fixed
+#+BEGIN_SRC d
+string epub3_container_xml() {
+ string o;
+ o = format(q"┃<?xml version='1.0' encoding='utf-8'?>┃") ~ "\n";
+ o ~= format(q"┃<container version="1.0"
+xmlns="urn:oasis:names:tc:opendocument:xmlns:container">
+<rootfiles>
+ <rootfile full-path="OEBPS/content.opf"
+ media-type="application/oebps-package+xml" />
+</rootfiles>┃") ~ "\n</container>\n";
+ return o;
+}
+#+END_SRC
+
+*** constructs (in dir: OEBPS)
+**** TODO _doc manifest_ (OEBPS/content.opf) manifest, register content: files, images etc.
+
+- manifest, listing all resources
+- provides the default reading order
+- identifies the navigation document
+
+#+name: output_epub3_constructs
+#+BEGIN_SRC d
+string epub3_oebps_content(D,M,P)(D doc_abstraction, M doc_matters, P parts) {
+ auto xhtml_format = outputXHTMLs();
+ auto pth_epub3 = DocReformPathsEPUB!()(doc_matters.output_path, doc_matters.src.language);
+ string _uuid = "18275d951861c77f78acd05672c9906924c59f18a2e0ba06dad95959693e9bd8"; // TODO sort uuid in doc_matters!
+ string content = format(q"┃ <?xml version='1.0' encoding='utf-8'?>
+<package xmlns="http://www.idpf.org/2007/opf" version="2.0" unique-identifier="EPB-UUID">
+ <metadata
+ xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+ xmlns:dcterms="http://purl.org/dc/terms/"
+ xmlns:dc="http://purl.org/dc/elements/1.1/"
+ unique-identifier="urn:uuid:%s" version="2.0">
+ <!-- <dc:title id="title">%s</dc:title> -->
+ <dc:title id="title">%s</dc:title>
+ <meta refines="#title" property="title-type">main</meta>
+ <dc:title id="subtitle">%s</dc:title>
+ <meta refines="#subtitle" property="title-type">subtitle</meta>
+ <dc:creator file-as="%s" id="aut">%s</dc:creator>
+ <dc:language>%s</dc:language>
+ <dc:date id="published">%s</dc:date>
+ <dc:rights>Copyright: %s</dc:rights>
+ <dc:identifier scheme="URI">%s</dc:identifier>
+ <dc:identifier id="bookid">urn:uuid:%s</dc:identifier>
+ <!-- <dc:identifier id="EPB-UUID">urn:uuid:%s</dc:identifier> -->
+ </metadata>
+ <manifest>
+ <!-- NCX epub2 navigation -->
+ <item id="ncx" href="toc.ncx" media-type="application/x-dtbncx+xml" />
+ <!-- CSS Style Sheets -->
+ <link rel="stylesheet" href="%s" type="text/css" id="main-css" />
+ <!-- nav epub3 navigation -->
+ <item id="nav" href="toc_nav.xhtml" media-type="application/xhtml+xml" properties="nav" />
+┃",
+ _uuid,
+ xhtml_format.special_characters_text(doc_matters.conf_make_meta.meta.title_full),
+ xhtml_format.special_characters_text(doc_matters.conf_make_meta.meta.title_main),
+ (doc_matters.conf_make_meta.meta.title_sub.empty)
+ ? "" : xhtml_format.special_characters_text(doc_matters.conf_make_meta.meta.title_sub),
+ (doc_matters.conf_make_meta.meta.creator_author.empty)
+ ? "" : xhtml_format.special_characters_text(doc_matters.conf_make_meta.meta.creator_author),
+ (doc_matters.conf_make_meta.meta.creator_author.empty)
+ ? "" : xhtml_format.special_characters_text(doc_matters.conf_make_meta.meta.creator_author),
+ doc_matters.src.language, // language, fix (needed in dochead metadata)
+ (doc_matters.conf_make_meta.meta.date_published.empty)
+ ? "" : xhtml_format.special_characters_text(doc_matters.conf_make_meta.meta.date_published),
+ (doc_matters.conf_make_meta.meta.rights_copyright.empty)
+ ? "" : xhtml_format.special_characters_text(doc_matters.conf_make_meta.meta.rights_copyright),
+ _uuid,
+ _uuid,
+ _uuid,
+ (pth_epub3.fn_oebps_css).chompPrefix("OEBPS/"),
+ );
+ content ~= " " ~ "<!-- Content Documents -->" ~ "\n ";
+ content ~= parts["manifest_documents"];
+ // TODO sort jpg & png
+ content ~= " " ~ "<!-- Images -->" ~ "\n ";
+ foreach (image; doc_matters.srcs.image_list) {
+ content ~= format(q"┃ <item id="%s" href="%s/%s" media-type="image/%s" />
+┃",
+ image.baseName.stripExtension,
+ (pth_epub3.doc_oebps_image).chompPrefix("OEBPS/"),
+ image,
+ image.extension.chompPrefix("."),
+ );
+ }
+ content ~= " " ~ "</manifest>" ~ "\n ";
+ content ~= " " ~ "<spine toc=\"ncx\">" ~ "\n ";
+ content ~= parts["spine"];
+ content ~= " " ~ "</spine>" ~ "\n ";
+ content ~= " " ~ "<guide>" ~ "\n ";
+ content ~= parts["guide"];
+ content ~= " " ~ "</guide>" ~ "\n ";
+ content ~= "" ~ "</package>";
+ debug(epubmanifest) {
+ foreach (part; doc_matters.has.keys_seq.seg) { // TODO
+ foreach (obj; doc_abstraction[part]) {
+ if (obj.metainfo.is_a == "heading") {
+ if (obj.metainfo.heading_lev_markup == 4) {
+ writefln(
+ "%s~ [%s.xhtml] %s",
+ obj.marked_up_level,
+ obj.tags.segment_anchor_tag_epub,
+ obj.text
+ );
+ } else if (obj.metainfo.heading_lev_markup > 4) {
+ writefln(
+ "%s~ [%s.xhtml#%s] %s",
+ obj.marked_up_level,
+ obj.tags.segment_anchor_tag_epub,
+ obj.metainfo.object_number,
+ obj.text
+ );
+ }
+ }
+ }
+ }
+ }
+ return content;
+}
+#+END_SRC
+
+**** _doc navigation epub3_ (OEBPS/toc_nav.xhtml) epub3 navigable toc using Dom structure
+
+- toc_nav.xhtml declared as nav file in content.opf (epub3 navigation document)
+
+#+name: output_epub3_constructs
+#+BEGIN_SRC d
+string epub3_oebps_toc_nav_xhtml(D,I)(D doc_abstraction, I doc_matters) {
+ enum DomTags { none, open, close, close_and_open, open_still, }
+ auto markup = InlineMarkup();
+ auto rgx = Rgx();
+ string toc =format("<html xmlns=\"http://www.w3.org/1999/xhtml\"
+ xmlns:epub=\"http://www.idpf.org/2007/ops\">
+<head>
+ <title>%s</title>
+</head>
+<body>
+ <section epub:type=\"frontmatter toc\">
+ <header>
+ <h1>Contents</h1>
+ </header>
+ <nav epub:type=\"toc\" id=\"toc\">\n",
+ doc_matters.conf_make_meta.meta.title_full,
+ );
+ foreach (sect; doc_matters.has.keys_seq.seg) {
+ foreach (obj; doc_abstraction[sect]) {
+ if (obj.metainfo.is_a == "heading") {
+ string _txt = obj.text.replaceAll(rgx.inline_notes_al_gen, "").strip;
+ foreach_reverse (n; 0 .. 7) {
+ string k = n.to!string;
+ switch (obj.metainfo.dom_structure_collapsed_tags_status[n]) {
+ case DomTags.close :
+ toc ~= markup.indent_by_spaces_provided((n + 1), " ") ~ "</li>" ~ "\n";
+ toc ~= markup.indent_by_spaces_provided(n, " ") ~ "</ol>" ~ "\n";
+ break;
+ case DomTags.close_and_open :
+ toc ~= markup.indent_by_spaces_provided((n + 1), " ") ~ "</li>" ~ "\n";
+ if (obj.metainfo.heading_lev_markup < 4) {
+ toc ~= markup.indent_by_spaces_provided((n + 1), " ") ~ "<li>" ~ "\n"
+ ~ markup.indent_by_spaces_provided((n + 2), " ")
+ ~ "<a href=\"" ~ obj.tags.segment_anchor_tag_epub ~ ".xhtml" ~ "\">"
+ ~ _txt
+ ~ "</a>" ~ "\n";
+ } else {
+ string hashtag =(obj.metainfo.heading_lev_markup == 4)
+ ? ""
+ : ("#" ~ obj.metainfo.ocn.to!string);
+ toc ~= markup.indent_by_spaces_provided((n + 1), " ") ~ "<li>" ~ "\n"
+ ~ markup.indent_by_spaces_provided((n + 2), " ")
+ ~ "<a href=\"" ~ obj.tags.segment_anchor_tag_epub ~ ".xhtml" ~ hashtag ~ "\">"
+ ~ _txt
+ ~ "</a>" ~ "\n";
+ }
+ break;
+ case DomTags.open :
+ toc ~= markup.indent_by_spaces_provided(n, " ") ~ "<ol>" ~ "\n";
+ if (obj.metainfo.heading_lev_markup < 4) {
+ toc ~= markup.indent_by_spaces_provided((n + 1), " ") ~ "<li>" ~ "\n"
+ ~ markup.indent_by_spaces_provided((n + 2), " ")
+ ~ "<a href=\"" ~ obj.tags.segment_anchor_tag_epub ~ ".xhtml" ~ "\">"
+ ~ _txt
+ ~ "</a>" ~ "\n";
+ } else {
+ string hashtag =(obj.metainfo.heading_lev_markup == 4)
+ ? ""
+ : ("#" ~ obj.metainfo.ocn.to!string);
+ toc ~= markup.indent_by_spaces_provided((n + 1), " ") ~ "<li>" ~ "\n"
+ ~ markup.indent_by_spaces_provided((n + 2), " ")
+ ~ "<a href=\"" ~ obj.tags.segment_anchor_tag_epub ~ ".xhtml" ~ hashtag ~ "\">"
+ ~ _txt
+ ~ "</a>" ~ "\n";
+ }
+ break;
+ default :
+ break;
+ }
+ }
+ }
+ }
+ }
+ toc ~="</nav>
+ </section>
+ </body>
+</html>\n";
+ return toc;
+}
+#+END_SRC
+
+**** TODO _doc navigation epub2_ (OEBPS/toc.ncx) navigable toc using Dom structure
+
+- toc.ncx (epub2 navigation document)
+ - (replaced in epub3 by a declared xhtml nav file, in our case toc_nav.xhtml)
+
+#+name: output_epub3_constructs
+#+BEGIN_SRC d
+string epub2_oebps_toc_ncx(D,I)(D doc_abstraction, I doc_matters) {
+ int counter = 0;
+ string _uuid = "18275d951861c77f78acd05672c9906924c59f18a2e0ba06dad95959693e9bd8"; // TODO shared elsewhere
+ auto markup = InlineMarkup();
+ auto rgx = Rgx();
+ enum DomTags { none, open, close, close_and_open, open_still, }
+ string toc = format(q"┃<?xml version='1.0' encoding='utf-8'?>
+<ncx xmlns="http://www.daisy.org/z3986/2005/ncx/" version="2005-1">
+<head>
+ <!-- four required metadata items (for all NCX documents,
+ (including the relaxed constraints of OPS 2.0) -->
+ <title>%s%s</title>
+ <link rel="stylesheet" href="css/epub.css" type="text/css" id="main-css" />
+ <meta name="dtb:uid" content="urn:uuid:%s" />
+ <!-- <meta name="epub-creator" content="DocReform http://www.jus.uio.no/sisu (this copy)" /> -->
+ <meta name="dtb:depth" content="%s" />
+ <meta name="dtb:totalPageCount" content="0" />
+ <meta name="dtb:maxPageNumber" content="0" />
+</head>
+<docTitle>
+ <text>%s</text>
+</docTitle>
+<docAuthor>
+ <text>%s</text>
+</docAuthor>
+<navMap>┃",
+ doc_matters.conf_make_meta.meta.title_full, // title
+ (doc_matters.conf_make_meta.meta.creator_author.empty) ? ""
+ : " by " ~ doc_matters.conf_make_meta.meta.creator_author, // author
+ _uuid, // uuid
+ "3", // content depth
+ doc_matters.conf_make_meta.meta.title_full, // title
+ (doc_matters.conf_make_meta.meta.creator_author.empty) ? ""
+ : doc_matters.conf_make_meta.meta.creator_author, // author
+ );
+ foreach (sect; doc_matters.has.keys_seq.seg) {
+ foreach (obj; doc_abstraction[sect]) {
+ if (obj.metainfo.is_a == "heading") {
+ string _txt = obj.text.replaceAll(rgx.inline_notes_al_gen, "").strip;
+ string hashtag =(obj.metainfo.heading_lev_markup <= 4) ? "" : ("#" ~ obj.metainfo.ocn.to!string);
+ foreach_reverse (k; 0 .. 7) {
+ switch (obj.metainfo.dom_structure_markedup_tags_status[k]) {
+ case DomTags.close :
+ toc ~= "\n </navPoint>";
+ break;
+ case DomTags.close_and_open :
+ ++counter;
+ toc ~= "\n </navPoint>";
+ toc ~= format(q"┃
+ <navPoint class="chapter" id="navpoint" playOrder="%s">
+ <navLabel>
+ <text>%s</text>
+ </navLabel>
+ <content src="%s.xhtml%s" />┃",
+ counter,
+ _txt,
+ obj.tags.segment_anchor_tag_epub,
+ hashtag,
+ );
+ break;
+ case DomTags.open :
+ ++counter;
+ toc ~= format(q"┃
+ <navPoint class="chapter" id="navpoint" playOrder="%s">
+ <navLabel>
+ <text>%s</text>
+ </navLabel>
+ <content src="%s.xhtml%s" />┃",
+ counter,
+ _txt,
+ obj.tags.segment_anchor_tag_epub,
+ hashtag,
+ );
+ break;
+ default :
+ break;
+ }
+ }
+ }
+ }
+ }
+ toc ~= format(q"┃
+ </navPoint>
+ </navPoint>
+ </navPoint>
+ </navMap>
+</ncx>┃");
+ return toc;
+}
+#+END_SRC
+
+** the document contents :seg:
+*** ↻ loop & switch (sections & objects) format epub3 xhtml output
+
+#+name: output_epub3_xhtml_seg
+#+BEGIN_SRC d
+void outputEPub3(D,I)(
+ const D doc_abstraction,
+ I doc_matters,
+) {
+ mixin DocReformOutputRgxInit;
+ auto xhtml_format = outputXHTMLs();
+ auto rgx = Rgx();
+ string[] doc;
+ string segment_filename;
+ string[] top_level_headings = ["","","",""];
+ string[string] oepbs_content_parts;
+ string suffix = ".xhtml";
+ struct writeOut { /+ epub specific documents +/
+ /+ fixed output +/
+ string mimetypes;
+ string meta_inf_container_xml;
+ string oebps_toc_ncx;
+ string oebps_toc_nav_xhtml;
+ /+ variable output +/
+ string oebps_content_opf;
+ string[][string] doc_epub3;
+ string[][string] doc_epub3_endnotes;
+ string[] doc_parts;
+ }
+ auto epubWrite = writeOut();
+#+END_SRC
+
+**** ↻ the loop (sections & objects) format output
+
+#+name: output_epub3_xhtml_seg
+#+BEGIN_SRC d
+ foreach (part; doc_matters.has.keys_seq.seg) {
+ foreach (obj; doc_abstraction[part]) {
+ string _txt = xhtml_format.special_characters(obj);
+#+END_SRC
+
+***** all headings
+
+#+name: output_epub3_xhtml_seg
+#+BEGIN_SRC d
+ if (obj.metainfo.is_a == "heading") {
+ assert(part == "head" || "toc" || "body" || "endnotes" || "glossary" || "bibliography" || "bookindex" || "blurb" || "tail");
+ switch (obj.metainfo.heading_lev_markup) {
+ case 0: .. case 3:
+ /+ fill buffer, and replace with new levels from 1 to 3 +/
+ switch (obj.metainfo.heading_lev_markup) {
+ case 0:
+ top_level_headings[0] = "";
+ top_level_headings[1] = "";
+ top_level_headings[2] = "";
+ top_level_headings[3] = "";
+ goto default;
+ case 1:
+ top_level_headings[1] = "";
+ top_level_headings[2] = "";
+ top_level_headings[3] = "";
+ goto default;
+ case 2:
+ top_level_headings[2] = "";
+ top_level_headings[3] = "";
+ goto default;
+ case 3:
+ top_level_headings[3] = "";
+ goto default;
+ default:
+ epubWrite.doc_parts ~= obj.tags.segment_anchor_tag_epub;
+ epubWrite.doc_epub3[obj.tags.segment_anchor_tag_epub] ~= xhtml_format.epub3_seg_head(doc_matters);
+ auto t = xhtml_format.heading_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[obj.tags.segment_anchor_tag_epub] ~= t[0];
+ epubWrite.doc_epub3_endnotes[obj.tags.segment_anchor_tag_epub] ~= t[1];
+ break;
+ }
+ break;
+ case 4:
+ segment_filename = obj.tags.segment_anchor_tag_epub;
+ epubWrite.doc_epub3[segment_filename] ~= xhtml_format.epub3_seg_head(doc_matters);
+ auto t = xhtml_format.heading_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0];
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= t[1];
+ break;
+ case 5: .. case 7:
+ auto t = xhtml_format.heading_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0];
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= t[1];
+ break;
+ case 8: .. case 9:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a, ": ", obj.metainfo.heading_lev_markup);
+ writeln(__FILE__, ":", __LINE__, ": ", obj.text);
+ }
+ }
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a, ": ", obj.metainfo.heading_lev_markup);
+ }
+ }
+ break;
+ }
+#+END_SRC
+
+***** non-heading
+
+#+name: output_epub3_xhtml_seg
+#+BEGIN_SRC d
+ } else {
+ assert(part == "head" || "toc" || "body" || "endnotes" || "glossary" || "bibliography" || "bookindex" || "blurb" || "tail");
+ switch (obj.metainfo.is_of_part) {
+#+END_SRC
+
+****** frontmatter
+
+#+name: output_epub3_xhtml_seg
+#+BEGIN_SRC d
+ case "frontmatter": assert(part == "head" || "toc");
+ switch (obj.metainfo.is_of_type) {
+ case "para":
+ switch (obj.metainfo.is_a) {
+ case "toc":
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0];
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= t[1];
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_of_type);
+ }
+ }
+ break;
+ }
+ break;
+#+END_SRC
+
+****** body
+
+#+name: output_epub3_xhtml_seg
+#+BEGIN_SRC d
+ case "body": assert(part == "body");
+ switch (obj.metainfo.is_of_type) {
+ case "para":
+ switch (obj.metainfo.is_a) {
+ case "para":
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0];
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= t[1];
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+ case "block":
+ switch (obj.metainfo.is_a) {
+ case "quote":
+ auto t = xhtml_format.quote_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0].to!string;
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= t[1];
+ break;
+ case "group":
+ auto t = xhtml_format.group_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0].to!string;
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= t[1];
+ break;
+ case "block":
+ auto t = xhtml_format.block_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0].to!string;
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= t[1];
+ break;
+ case "poem":
+ break;
+ case "verse":
+ auto t = xhtml_format.verse_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0].to!string;
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= t[1];
+ break;
+ case "code":
+ epubWrite.doc_epub3[segment_filename] ~= xhtml_format.code(_txt, obj, doc_matters);
+ break;
+ case "table":
+ epubWrite.doc_epub3[segment_filename] ~= xhtml_format.table(_txt, obj, doc_matters);
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= "";
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_of_type);
+ }
+ }
+ break;
+ }
+ break;
+#+END_SRC
+
+****** backmatter
+
+#+name: output_epub3_xhtml_seg
+#+BEGIN_SRC d
+ case "backmatter":
+ assert(part == "endnotes" || "glossary" || "bibliography" || "bookindex" || "blurb" || "tail");
+ switch (obj.metainfo.is_of_type) {
+ case "para":
+ switch (obj.metainfo.is_a) {
+ case "endnote": assert(part == "endnotes");
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0];
+ break;
+ case "glossary": assert(part == "glossary");
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0];
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= t[1];
+ break;
+ case "bibliography": assert(part == "bibliography");
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0];
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= t[1];
+ break;
+ case "bookindex": assert(part == "bookindex");
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0];
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= t[1];
+ break;
+ case "blurb": assert(part == "blurb");
+ auto t = xhtml_format.para_seg(_txt, obj, doc_matters, suffix, "epub");
+ epubWrite.doc_epub3[segment_filename] ~= t[0];
+ epubWrite.doc_epub3_endnotes[segment_filename] ~= t[1];
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_a);
+ }
+ }
+ break;
+ }
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_of_type);
+ }
+ }
+ break;
+ }
+ break;
+ case "comment":
+ break;
+ default:
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do
+ && doc_matters.opt.action.verbose) {
+ writeln(__FILE__, ":", __LINE__, ": ", obj.metainfo.is_of_part);
+ }
+ }
+ break;
+ }
+ }
+ if (obj.metainfo.is_a == "heading") {
+ assert(obj.text.length > 0);
+ if (obj.metainfo.heading_lev_markup <= 4) {
+ oepbs_content_parts["manifest_documents"] ~=
+ format(q"┃ <item id="%s.xhtml" href="%s.xhtml" media-type="application/xhtml+xml" />
+┃",
+ obj.tags.segment_anchor_tag_epub,
+ obj.tags.segment_anchor_tag_epub,
+ );
+ oepbs_content_parts["spine"] ~=
+ format(q"┃ <itemref idref="%s.xhtml" linear="yes" />
+┃",
+ obj.tags.segment_anchor_tag_epub,
+ );
+ oepbs_content_parts["guide"] ~=
+ format(q"┃ <reference type="%s" href="%s" />
+┃",
+ obj.tags.segment_anchor_tag_epub,
+ obj.tags.segment_anchor_tag_epub,
+ );
+ } else if (obj.metainfo.heading_lev_markup > 4) {
+ oepbs_content_parts["manifest_documents"] ~=
+ format(q"┃ <item id="%s.xhtml#%s" href="%s.xhtml#%s" media-type="application/xhtml+xml" />
+┃",
+ obj.tags.segment_anchor_tag_epub,
+ obj.metainfo.object_number,
+ obj.tags.segment_anchor_tag_epub,
+ obj.metainfo.object_number,
+ );
+ oepbs_content_parts["spine"] ~=
+ format(q"┃ <itemref idref="%s.xhtml#%s" linear="yes" />
+┃",
+ obj.tags.segment_anchor_tag_epub,
+ obj.metainfo.object_number,
+ );
+ oepbs_content_parts["guide"] ~=
+ format(q"┃ <reference type="%s#%s" href="%s#%s" />
+┃",
+ obj.tags.segment_anchor_tag_epub,
+ obj.metainfo.object_number,
+ obj.tags.segment_anchor_tag_epub,
+ obj.metainfo.object_number,
+ );
+ }
+#+END_SRC
+
+***** closings & post loop
+
+#+name: output_epub3_xhtml_seg
+#+BEGIN_SRC d
+ }
+ }
+ }
+ /+ epub specific documents +/
+ epubWrite.mimetypes = epub3_mimetypes;
+ epubWrite.meta_inf_container_xml = epub3_container_xml;
+ epubWrite.oebps_toc_ncx = doc_abstraction.epub2_oebps_toc_ncx(doc_matters);
+ epubWrite.oebps_toc_nav_xhtml = doc_abstraction.epub3_oebps_toc_nav_xhtml(doc_matters);
+ epubWrite.oebps_content_opf = doc_abstraction.epub3_oebps_content(doc_matters, oepbs_content_parts);
+ epubWrite.epub3_write_output_files(doc_matters);
+}
+#+END_SRC
+
+** write output files :write:zip:
+
+#+name: output_epub3_xhtml_seg
+#+BEGIN_SRC d
+void epub3_write_output_files(W,M)(
+ W epub_write,
+ M doc_matters,
+) {
+ debug(asserts) {
+ static assert(is(typeof(epub_write.doc_epub3) == string[][string]));
+ static assert(is(typeof(epub_write.mimetypes) == string));
+ static assert(is(typeof(epub_write.meta_inf_container_xml) == string));
+ static assert(is(typeof(epub_write.oebps_toc_nav_xhtml) == string));
+ static assert(is(typeof(epub_write.oebps_toc_ncx) == string));
+ static assert(is(typeof(epub_write.oebps_content_opf) == string));
+ }
+ static auto rgx = Rgx();
+ auto pth_epub3 = DocReformPathsEPUB!()(doc_matters.output_path, doc_matters.src.language);
+ auto xhtml_format = outputXHTMLs();
+ /+ zip file +/
+ auto fn_epub = pth_epub3.epub_file(doc_matters.src.filename);
+ auto zip = new ZipArchive(); // ZipArchive zip = new ZipArchive();
+ /+ zip archive member files +/
+ void EPUBzip()(string contents, string fn) {
+ auto zip_arc_member_file = new ArchiveMember();
+ zip_arc_member_file.name = fn;
+ auto zip_data = new OutBuffer();
+ (doc_matters.opt.action.debug_do)
+ ? zip_data.write(contents.dup)
+ : zip_data.write(contents.dup
+ .replaceAll(rgx.spaces_line_start, "")
+ .replaceAll(rgx.newline, " ")
+ .strip
+ );
+ zip_arc_member_file.expandedData = zip_data.toBytes();
+ zip.addMember(zip_arc_member_file);
+ createZipFile!()(fn_epub, zip.build());
+ }
+ try {
+ if (!exists(pth_epub3.base)) {
+ pth_epub3.base.mkdirRecurse;
+ }
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do) {
+ if (!exists(pth_epub3.dbg_doc_meta_inf(doc_matters.src.filename))) {
+ pth_epub3.dbg_doc_meta_inf(doc_matters.src.filename).mkdirRecurse;
+ }
+ if (!exists(pth_epub3.dbg_doc_oebps_css(doc_matters.src.filename))) {
+ pth_epub3.dbg_doc_oebps_css(doc_matters.src.filename).mkdirRecurse;
+ }
+ if (!exists(pth_epub3.dbg_doc_oebps_image(doc_matters.src.filename))) {
+ pth_epub3.dbg_doc_oebps_image(doc_matters.src.filename).mkdirRecurse;
+ }
+ }
+ }
+ { /+ OEBPS/[segments].xhtml (the document contents) +/
+ foreach (seg_filename; doc_matters.has.segnames_lv_0_to_4) {
+ string fn = pth_epub3.fn_oebps_content_xhtml(seg_filename);
+ auto zip_arc_member_file = new ArchiveMember();
+ zip_arc_member_file.name = fn;
+ auto zip_data = new OutBuffer();
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do) {
+ string fn_dbg = pth_epub3.dbg_fn_oebps_content_xhtml(doc_matters.src.filename, seg_filename);
+ auto f = File(fn_dbg, "w");
+ foreach (docseg; epub_write.doc_epub3[seg_filename]) {
+ f.writeln(docseg);
+ }
+ foreach (docseg; epub_write.doc_epub3_endnotes[seg_filename]) {
+ f.writeln(docseg);
+ }
+ f.writeln(xhtml_format.tail);
+ }
+ }
+ foreach (docseg; epub_write.doc_epub3[seg_filename]) {
+ zip_data.write(docseg.dup);
+ }
+ foreach (docseg; epub_write.doc_epub3_endnotes[seg_filename]) {
+ zip_data.write(docseg.dup);
+ }
+ zip_data.write(xhtml_format.tail.dup);
+ zip_arc_member_file.expandedData = zip_data.toBytes();
+ zip.addMember(zip_arc_member_file);
+ /+ create the zip file +/
+ createZipFile!()(fn_epub, zip.build());
+ }
+ }
+ string fn;
+ string fn_dbg;
+ File f;
+ { /+ mimetypes (identify zip file type) +/
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do) {
+ fn_dbg = pth_epub3.dbg_fn_mimetypes(doc_matters.src.filename);
+ File(fn_dbg, "w").writeln(epub_write.mimetypes);
+ }
+ }
+ fn = pth_epub3.fn_mimetypes;
+ EPUBzip(epub_write.mimetypes, fn);
+ }
+ { /+ META-INF/container.xml (identify doc root) +/
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do) {
+ fn_dbg = pth_epub3.dbg_fn_dmi_container_xml(doc_matters.src.filename);
+ File(fn_dbg, "w").writeln(epub_write.meta_inf_container_xml);
+ }
+ }
+ fn = pth_epub3.fn_dmi_container_xml;
+ EPUBzip(epub_write.meta_inf_container_xml, fn);
+ }
+ { /+ OEBPS/toc_nav.xhtml (navigation toc epub3) +/
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do) {
+ fn_dbg = pth_epub3.dbg_fn_oebps_toc_nav_xhtml(doc_matters.src.filename);
+ File(fn_dbg, "w").writeln(epub_write.oebps_toc_nav_xhtml);
+ }
+ }
+ fn = pth_epub3.fn_oebps_toc_nav_xhtml;
+ EPUBzip(epub_write.oebps_toc_nav_xhtml, fn);
+ }
+ { /+ OEBPS/toc.ncx (navigation toc epub2) +/
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do) {
+ fn_dbg = pth_epub3.dbg_fn_oebps_toc_ncx(doc_matters.src.filename);
+ File(fn_dbg, "w").writeln(epub_write.oebps_toc_ncx);
+ }
+ }
+ fn = pth_epub3.fn_oebps_toc_ncx;
+ EPUBzip(epub_write.oebps_toc_ncx, fn);
+ }
+ { /+ OEBPS/content.opf (doc manifest) +/
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do) {
+ fn_dbg = pth_epub3.dbg_fn_oebps_content_opf(doc_matters.src.filename);
+ File(fn_dbg, "w").writeln(epub_write.oebps_content_opf);
+ }
+ }
+ fn = pth_epub3.fn_oebps_content_opf;
+ EPUBzip(epub_write.oebps_content_opf, fn);
+ }
+ { /+ OEBPS/_dr/image (images) +/
+ foreach (image; doc_matters.srcs.image_list) {
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do) {
+ if (doc_matters.opt.action.very_verbose) {
+ writeln(
+ doc_matters.src.image_dir_path, "/", image, " -> ",
+ pth_epub3.dbg_doc_oebps_image(doc_matters.src.filename), "/", image
+ );
+ }
+ if (exists(doc_matters.src.image_dir_path ~ "/" ~ image)) {
+ (doc_matters.src.image_dir_path ~ "/" ~ image)
+ .copy((pth_epub3.dbg_doc_oebps_image(doc_matters.src.filename)) ~ "/" ~ image);
+ }
+ }
+ }
+ auto fn_src = doc_matters.src.image_dir_path ~ "/" ~ image;
+ auto fn_out = pth_epub3.doc_oebps_image ~ "/" ~ image;
+ if (exists(fn_src)) {
+ {
+ auto zip_arc_member_file = new ArchiveMember();
+ zip_arc_member_file.name = fn_out;
+ auto zip_data = new OutBuffer();
+ zip_data.write(cast(char[]) ((fn_src).read));
+ zip_arc_member_file.expandedData = zip_data.toBytes();
+ zip.addMember(zip_arc_member_file);
+ createZipFile!()(fn_epub, zip.build());
+ }
+ }
+ }
+ }
+ { /+ OEBPS/epub.css +/
+ auto css = DocReformCss(doc_matters);
+ { /+ debug +/
+ if (doc_matters.opt.action.debug_do) {
+ fn_dbg = pth_epub3.dbg_fn_oebps_css(doc_matters.src.filename);
+ File(fn_dbg, "w").writeln(css.epub);
+ }
+ }
+ fn = pth_epub3.fn_oebps_css;
+ auto zip_arc_member_file = new ArchiveMember();
+ zip_arc_member_file.name = fn;
+ auto zip_data = new OutBuffer();
+ zip_data.write(css.epub.dup);
+ zip_arc_member_file.expandedData = zip_data.toBytes();
+ zip.addMember(zip_arc_member_file);
+ createZipFile!()(fn_epub, zip.build());
+ }
+ } catch (ErrnoException ex) {
+ // Handle error
+ }
+ if (!(doc_matters.opt.action.quiet)) {
+ writeln(" ", fn_epub);
+ }
+#+END_SRC
+
+** zip debug, read zip archive :zip:
+
+#+name: output_epub3_xhtml_seg
+#+BEGIN_SRC d
+ debug(epub_archive) {
+ if (exists(fn_epub)) {
+ try {
+ auto zipped = new ZipArchive((fn_epub).read);
+ foreach (filename, member; zipped.directory) {
+ auto data = zipped.expand(member);
+ writeln(filename, " length ", data.length);
+ }
+ } catch (ZipException ex) {
+ // Handle errors
+ }
+ }
+ }
+}
+#+END_SRC
+
+* __END__