diff options
Diffstat (limited to 'org/output_xmls.org')
| -rw-r--r-- | org/output_xmls.org | 3095 |
1 files changed, 0 insertions, 3095 deletions
diff --git a/org/output_xmls.org b/org/output_xmls.org deleted file mode 100644 index ea1af4a..0000000 --- a/org/output_xmls.org +++ /dev/null @@ -1,3095 +0,0 @@ --*- 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, "&") - .replaceAll(rgx.xhtml_quotation, """) - .replaceAll(rgx.xhtml_less_than, "<") - .replaceAll(rgx.xhtml_greater_than, ">") - .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"> - [ document manifest ] - </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\"> <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\"> <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], - "\"> <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\"> <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], - "\"> <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\"> <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) ? ("●  " ~ _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__ |