aboutsummaryrefslogtreecommitdiffhomepage
path: root/org/doc_reform.org
diff options
context:
space:
mode:
Diffstat (limited to 'org/doc_reform.org')
-rw-r--r--org/doc_reform.org855
1 files changed, 16 insertions, 839 deletions
diff --git a/org/doc_reform.org b/org/doc_reform.org
index 4d39e53..798d680 100644
--- a/org/doc_reform.org
+++ b/org/doc_reform.org
@@ -124,6 +124,16 @@ void main(string[] args) {
if (_opt_action.harvest_authors) {
DocReformMetaDocHarvestsAuthors!()(hvst.harvests, _opt_action);
}
+ if (!(_opt_action.quiet)) {
+ import doc_reform.output.paths_output;
+ auto out_pth = DocReformPathsHTML!()(_opt_action.output_dir_set, "");
+ if (_opt_action.harvest_authors) {
+ writeln("- ", out_pth.harvest("authors.html"));
+ }
+ if (_opt_action.harvest_topics) {
+ writeln("- ", out_pth.harvest("topics.html"));
+ }
+ }
}
}
#+END_SRC
@@ -1184,6 +1194,12 @@ if ((_opt_action.debug_do)
) {
writeln("step4 commence → (doc_matters)");
}
+#+END_SRC
+
+**** DocumentMatters struct {
+
+#+NAME: doc_reform_each_file_do_document_matters
+#+BEGIN_SRC d
struct DocumentMatters {
#+END_SRC
@@ -1397,845 +1413,6 @@ struct DocumentMattersAbridged {
}
#+END_SRC
-* 3. document abstraction _summary_ :module:doc_reform:metadoc_summary:
-** 0. module template metadoc summary
-- document summary from abstraction
-
-#+BEGIN_SRC d :tangle "../src/doc_reform/meta/metadoc_summary.d"
-module doc_reform.meta.metadoc_summary;
-template DocReformMetaDocSummary() {
- void DocReformMetaDocSummary(S,T)(
- const S doc_abstraction,
- T doc_matters,
- ) {
- <<metadoc_summary_imports>>
- mixin InternalMarkup;
- <<metadoc_summary_initialize>>
- if (doc_matters.opt.action.verbose) {
- <<meta_metadoc_summary_document>>
- }
- }
-}
-#+END_SRC
-
-** init
-*** imports
-
-#+name: metadoc_summary_imports
-#+BEGIN_SRC d
-import
- doc_reform.meta.defaults,
- doc_reform.meta.rgx;
-import
- std.array,
- std.exception,
- std.regex,
- std.stdio,
- std.string,
- std.traits,
- std.typecons,
- std.uni,
- std.utf,
- std.conv : to;
-#+END_SRC
-
-*** initialize :report:
-
-#+name: metadoc_summary_initialize
-#+BEGIN_SRC d
-auto markup = InlineMarkup();
-#+END_SRC
-
-** (last ocn)
-
-#+name: meta_metadoc_summary_document
-#+BEGIN_SRC d
-string[string] check = [
- "last_object_number" : "NA [debug \"checkdoc\" not run]",
- "last_object_number_body" : "0",
- "last_object_number_book_index" : "0",
-];
-foreach (k; doc_matters.has.keys_seq.seg) {
- foreach (obj; doc_abstraction[k]) {
- if (obj.metainfo.is_of_part != "empty") {
- if (!empty(obj.metainfo.object_number)) {
- if (k == "body") {
- check["last_object_number_body"] = obj.metainfo.object_number;
- }
- if (!(obj.metainfo.object_number.empty)) {
- check["last_object_number"] = obj.metainfo.object_number;
- }
- }
- if (k == "bookindex") {
- if (obj.metainfo.object_number_type == 2) {
- check["last_object_number_book_index"] = obj.metainfo.object_number_book_index;
- }
- }
- }
- }
-}
-#+END_SRC
-
-** document summary
-
-#+name: meta_metadoc_summary_document
-#+BEGIN_SRC d
-auto min_repeat_number = 66;
-auto char_repeat_number = (doc_matters.conf_make_meta.meta.title_full.length
- + doc_matters.conf_make_meta.meta.creator_author.length + 4);
-char_repeat_number = (char_repeat_number > min_repeat_number)
-? char_repeat_number
-: min_repeat_number;
-writefln(
- "%s\n\"%s\", %s\n%s\n%s\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%30-s%10-d\n%s",
- markup.repeat_character_by_number_provided("-", char_repeat_number),
- doc_matters.conf_make_meta.meta.title_full,
- doc_matters.conf_make_meta.meta.creator_author,
- doc_matters.src.filename,
- markup.repeat_character_by_number_provided("-", char_repeat_number),
- "- toc arr length:",
- to!int(doc_abstraction["toc"].length),
- "- doc_abstraction arr length:",
- to!int(doc_abstraction["body"].length),
- " doc body last obj on.#:",
- to!int(check["last_object_number_body"]),
- " - number of tables:",
- doc_matters.has.tables,
- " - number of codeblocks:",
- doc_matters.has.codeblocks,
- " - number of poems:",
- doc_matters.has.poems,
- " - number of blocks:",
- doc_matters.has.blocks,
- " - number of groups:",
- doc_matters.has.groups,
- " - number of images:",
- doc_matters.has.images,
- "- endnotes length:", // subtract headings
- (doc_abstraction["endnotes"].length > 2)
- ? (to!int(doc_abstraction["endnotes"].length - 2))
- : 0,
- "- glossary length:",
- (doc_abstraction["glossary"].length > 1)
- ? (to!int(doc_abstraction["glossary"].length))
- : 0,
- "- biblio length:",
- (doc_abstraction["bibliography"].length > 1)
- ? (to!int(doc_abstraction["bibliography"].length))
- : 0,
- "- bookindex length:",
- (doc_abstraction["bookindex"].length > 1)
- ? (to!int(doc_abstraction["bookindex"].length))
- : 0,
- " book idx last obj on.#:",
- to!int(check["last_object_number_book_index"]),
- "- blurb length:",
- (doc_abstraction["blurb"].length > 1)
- ? (to!int(doc_abstraction["blurb"].length))
- : 0,
- "* last obj on.#:",
- to!int(check["last_object_number"]),
- "number of segments:",
- (doc_matters.has.segnames_lv4.length > 1)
- ? (to!int(doc_matters.has.segnames_lv4.length))
- : 0,
- markup.repeat_character_by_number_provided("-", min_repeat_number),
-);
-#+END_SRC
-
-** 0. module template metadoc harvest
-
-#+BEGIN_SRC d :tangle "../src/doc_reform/meta/metadoc_harvest.d"
-module doc_reform.meta.metadoc_harvest;
-template DocReformMetaDocHarvest() {
- auto DocReformMetaDocHarvest(T,H)(
- T doc_matters,
- H hvst,
- ) {
- <<metadoc_harvest_imports>>
- mixin InternalMarkup;
- <<metadoc_harvest_initialize>>
- <<meta_metadoc_harvest>>
- }
-}
-#+END_SRC
-
-** init
-*** imports
-
-#+name: metadoc_harvest_imports
-#+BEGIN_SRC d
-import
- doc_reform.meta.defaults,
- doc_reform.meta.rgx;
-import
- std.array,
- std.exception,
- std.regex,
- std.stdio,
- std.string,
- std.traits,
- std.typecons,
- std.uni,
- std.utf,
- std.conv : to;
-#+END_SRC
-
-*** initialize :report:
-
-#+name: metadoc_harvest_initialize
-#+BEGIN_SRC d
-auto markup = InlineMarkup();
-#+END_SRC
-
-** harvest summary
-
-#+name: meta_metadoc_harvest_summary
-#+BEGIN_SRC d
-auto min_repeat_number = 66;
-auto char_repeat_number = (doc_matters.conf_make_meta.meta.title_full.length
- + doc_matters.conf_make_meta.meta.creator_author.length + 4);
-char_repeat_number = (char_repeat_number > min_repeat_number)
-? char_repeat_number
-: min_repeat_number;
-writefln(
- "%s\n\"%s\", %s\n%s\n%s\n%s",
- markup.repeat_character_by_number_provided("-", char_repeat_number),
- doc_matters.conf_make_meta.meta.title_full,
- doc_matters.conf_make_meta.meta.creator_author,
- doc_matters.src.filename,
- doc_matters.conf_make_meta.meta.classify_topic_register_arr,
- markup.repeat_character_by_number_provided("-", char_repeat_number),
-);
-#+END_SRC
-
-** return harvest
-
-#+name: meta_metadoc_harvest
-#+BEGIN_SRC d
-import doc_reform.output.paths_output;
-auto pth_html = DocReformPathsHTML!()(doc_matters.output_path, doc_matters.src.language);
-hvst.harvest.title = doc_matters.conf_make_meta.meta.title_full;
-hvst.harvest.author = doc_matters.conf_make_meta.meta.creator_author;
-hvst.harvest.author_surname = doc_matters.conf_make_meta.meta.creator_author_surname;
-hvst.harvest.author_surname_fn = doc_matters.conf_make_meta.meta.creator_author_surname_fn;
-hvst.harvest.author_arr = doc_matters.conf_make_meta.meta.creator_author_arr;
-hvst.harvest.language_original = doc_matters.conf_make_meta.meta.original_language;
-hvst.harvest.language = doc_matters.src.language;
-hvst.harvest.uid = doc_matters.src.doc_uid;
-hvst.harvest.date_published = doc_matters.conf_make_meta.meta.date_published;
-hvst.harvest.topic_register_arr = doc_matters.conf_make_meta.meta.classify_topic_register_arr;
-hvst.harvest.path_html_scroll = pth_html.fn_scroll(doc_matters.src.filename);
-hvst.harvest.path_html_seg = pth_html.fn_seg(doc_matters.src.filename, "toc");
-return hvst.harvest;
-#+END_SRC
-
-** 0. module template metadoc harvest topics
-*** 0. module template metadoc harvest topics template
-
-#+BEGIN_SRC d :tangle "../src/doc_reform/meta/metadoc_harvests_topics.d"
-module doc_reform.meta.metadoc_harvests_topics;
- import
- std.algorithm,
- std.array,
- std.exception,
- std.regex,
- std.stdio,
- std.string,
- std.conv : to;
- import
- doc_reform.meta.defaults,
- doc_reform.meta.rgx;
- mixin DocReformHarvest;
- mixin InternalMarkup;
- mixin DocReformRgxInit;
-template DocReformMetaDocHarvestsTopics() {
- auto mkup = InlineMarkup();
- void DocReformMetaDocHarvestsTopics(H,O)(
- H hvst,
- O _opt_action,
- ) {
- <<harvested_topics>>
-<<harvested_topics_html_head_1>>
-<<harvested_html_head>>
-<<harvested_topics_html_head_2>>
- <<harvested_topics_html>>
- topics
-<<harvested_html_bottom>>
- <<harvested_topics_html_write>>
- }
-}
-#+END_SRC
-
-*** order topic register
-
-#+NAME: harvested_topics
-#+BEGIN_SRC d
-auto min_repeat_number = 42;
-string[] _document_topic_register;
-string[] _topic_register;
-string[] _sub_topic_register;
-string[] topics = [];
-string _auth = "";
-foreach(k, doc_harvest; hvst.harvests) {
- _topic_register = [];
- foreach(topic; doc_harvest.topic_register_arr.sort) {
- _sub_topic_register = [];
- string _spaces;
- string[] subject_tree = topic.split(mkup.sep);
- switch (subject_tree.length) {
- case 1:
- hvst.subject_trees[subject_tree[0]]["_a"]["_a"]["_a"] ~= doc_harvest;
- break;
- case 2:
- hvst.subject_trees[subject_tree[0]][subject_tree[1]]["_a"]["_a"] ~= doc_harvest;
- break;
- case 3:
- hvst.subject_trees[subject_tree[0]][subject_tree[1]][subject_tree[2]]["_a"] ~= doc_harvest;
- break;
- case 4:
- hvst.subject_trees[subject_tree[0]][subject_tree[1]][subject_tree[2]][subject_tree[3]] ~= doc_harvest;
- break;
- default:
- break;
- }
- _topic_register ~= _sub_topic_register.join("\n");
- }
- auto char_repeat_number = (doc_harvest.title.length
- + doc_harvest.author.length + 16);
- char_repeat_number = (char_repeat_number > min_repeat_number)
- ? char_repeat_number
- : min_repeat_number;
- _document_topic_register ~= format(
- "\"%s\", %s%s\n%s",
- doc_harvest.title,
- doc_harvest.author,
- (doc_harvest.date_published.length > 0) ? " (" ~ doc_harvest.date_published ~ ")" : "",
- _topic_register.sort!("toUpper(a) < toUpper(b)", SwapStrategy.unstable).release.join("\n"),
- );
-}
-#+END_SRC
-
-*** harvested topics html head
-
-#+NAME: harvested_topics_html_head_1
-#+BEGIN_SRC d
- topics ~= format(q"┃<!DOCTYPE html>
-<html>
-<head>
-<meta charset="utf-8">
-<title>Metadata Harvest - Topics</title>
-#+END_SRC
-
-*** harvested topics html head
-
-#+NAME: harvested_topics_html_head_2
-#+BEGIN_SRC d
-</head>
-<body lang="en" xml:lang="en">
-<a name="top" id="top"></a>
-<a name="up" id="up"></a>
-<a name="start" id="start"></a>
-<h1>Metadata Harvest - Topics (output organised by language &amp; filetype)</h1>
-<p>[<a href="../../index.html">&nbsp;HOME&nbsp;</a>] also see <a href="authors.html">Metadata Harvest - Authors</a></p>
-<p><a href="#A">A</a>,&nbsp;<a href="#B">B</a>,&nbsp;<a href="#C">C</a>,&nbsp;<a href="#D">D</a>,&nbsp;<a href="#E">E</a>,&nbsp;<a href="#F">F</a>,&nbsp;<a href="#G">G</a>,&nbsp;<a href="#H">H</a>,&nbsp;<a href="#I">I</a>,&nbsp;<a href="#J">J</a>,&nbsp;<a href="#K">K</a>,&nbsp;<a href="#L">L</a>,&nbsp;<a href="#M">M</a>,&nbsp;<a href="#N">N</a>,&nbsp;<a href="#O">O</a>,&nbsp;<a href="#P">P</a>,&nbsp;<a href="#Q">Q</a>,&nbsp;<a href="#R">R</a>,&nbsp;<a href="#S">S</a>,&nbsp;<a href="#T">T</a>,&nbsp;<a href="#U">U</a>,&nbsp;<a href="#V">V</a>,&nbsp;<a href="#W">W</a>,&nbsp;<a href="#X">X</a>,&nbsp;<a href="#Y">Y</a>,&nbsp;<a href="#Z">Z</a>,&nbsp;
-<p></p>
-<hr />
-<p class="tiny"><a href="../../en/manifest/topics.html">English</a>&nbsp;&nbsp;&nbsp;</p>
-<hr />
-┃") ~ "\n";
-#+END_SRC
-
-*** harvested topics html
-
-#+NAME: harvested_topics_html
-#+BEGIN_SRC d
-char _prev_k = "_".to!char;
-int _kn;
-foreach(k0;
- hvst.subject_trees.keys
- .sort!("toUpper(a) < toUpper(b)", SwapStrategy.unstable)
-) {
- if (k0.toUpper.to!(char[])[0] != _prev_k) {
- topics ~= format(q"┃<p class="letter"><a name="%s">%s</a></p><p class="book_index_lev1"><a name="a"></a></p>┃",
- k0.toUpper.to!(char[])[0],
- k0.toUpper.to!(char[])[0],
- );
- _prev_k = k0.toUpper.to!(char[])[0];
- }
- if (k0 != "_a") {
- topics ~= format(q"┃<p class="lev0"><a name="%s">%s</a></p>┃",
- k0, k0,) ~ "\n";
- if (_opt_action.very_verbose) {
- writeln("", k0);
- }
- if ("_a" in hvst.subject_trees[k0]) {
- foreach (t_a_;
- hvst.subject_trees[k0]["_a"]["_a"]["_a"]
- .multiSort!("toUpper(a.title) < toUpper(b.title)", "a.author < b.author", SwapStrategy.unstable)
- ) {
- _auth = [];
- if (t_a_.author_arr.length < 2) {
- _auth = format(q"┃ <a href="authors.html#%s">%s</a>┃",
- t_a_.author_surname,
- t_a_.author,
- );
- } else {
- foreach (a; t_a_.author_arr) {
- _auth ~= format(q"┃ <a href="authors.html#%s">%s</a>,┃",
- t_a_.author_surname,
- a,
- );
- }
- }
- topics ~= format(q"┃<p class="work"><a href="%s">"%s"</a> -%s┃",
- "url",
- t_a_.title,
- _auth,
- ) ~ "\n";
- if (_opt_action.very_verbose) {
- writeln("- ", t_a_.title, " - ", t_a_.author);
- }
- }
- }
- foreach(k1;
- hvst.subject_trees[k0].keys
- .sort!("toUpper(a) < toUpper(b)", SwapStrategy.unstable)
- ) {
- if (k1 != "_a") {
- topics ~= format(q"┃<p class="lev1"><a name="%s">%s</a></p>┃",
- k1, k1,) ~ "\n";
- if (_opt_action.very_verbose) {
- writeln(" ", k1);
- }
- if ("_a" in hvst.subject_trees[k0][k1]) {
- foreach (t_a_;
- hvst.subject_trees[k0][k1]["_a"]["_a"]
- .multiSort!("toUpper(a.title) < toUpper(b.title)", "a.author < b.author", SwapStrategy.unstable)
- ) {
- _auth = [];
- if (t_a_.author_arr.length < 2) {
- _auth = format(q"┃ <a href="authors.html#%s">%s</a>┃",
- t_a_.author_surname,
- t_a_.author,
- );
- } else {
- foreach (a; t_a_.author_arr) {
- _auth ~= format(q"┃ <a href="authors.html#%s">%s</a>,┃",
- t_a_.author_surname,
- a,
- );
- }
- }
- topics ~= format(q"┃<p class="work"><a href="%s">%s</a> -%s┃",
- "url",
- t_a_.title,
- _auth,
- ) ~ "\n";
- if (_opt_action.very_verbose) {
- writeln(" - ", t_a_.title, " - ", t_a_.author);
- }
- }
- }
- }
- foreach(k2;
- hvst.subject_trees[k0][k1].keys
- .sort!("toUpper(a) < toUpper(b)", SwapStrategy.unstable)
- ) {
- if (k2 != "_a") {
- topics ~= format(q"┃<p class="lev2"><a name="%s">%s</a></p>┃",
- k2, k2,) ~ "\n";
- if (_opt_action.very_verbose) {
- writeln(" ", k2);
- }
- if ("_a" in hvst.subject_trees[k0][k1][k2]) {
- foreach (t_a_;
- hvst.subject_trees[k0][k1][k2]["_a"]
- .multiSort!("toUpper(a.title) < toUpper(b.title)", "a.author < b.author", SwapStrategy.unstable)
- ) {
- _auth = [];
- if (t_a_.author_arr.length < 2) {
- _auth = format(q"┃ <a href="authors.html#%s">%s</a>┃",
- t_a_.author_surname,
- t_a_.author,
- );
- } else {
- foreach (a; t_a_.author_arr) {
- _auth ~= format(q"┃ <a href="authors.html#%s">%s</a>,┃",
- t_a_.author_surname,
- a,
- );
- }
- }
- topics ~= format(q"┃<p class="work"><a href="%s">%s</a> -%s┃",
- "url",
- t_a_.title,
- _auth,
- ) ~ "\n";
- if (_opt_action.very_verbose) {
- writeln(" - ", t_a_.title, " - ", t_a_.author);
- }
- }
- }
- }
- foreach(k3;
- hvst.subject_trees[k0][k1][k2].keys
- .sort!("toUpper(a) < toUpper(b)", SwapStrategy.unstable)
- ) {
- if (k3 != "_a") {
- topics ~= format(q"┃<p class="lev3"><a name="%s">%s</a></p>┃",
- k3, k3,) ~ "\n";
- if (_opt_action.very_verbose) {
- writeln(" ", k3);
- }
- {
- foreach (t_a_;
- hvst.subject_trees[k0][k1][k2][k3]
- .multiSort!("toUpper(a.title) < toUpper(b.title)", "a.author < b.author", SwapStrategy.unstable)
- ) {
- _auth = [];
- if (t_a_.author_arr.length < 2) {
- _auth = format(q"┃<a href="authors.html#%s">%s</a>┃",
- t_a_.author_surname,
- t_a_.author,
- );
- } else {
- foreach (a; t_a_.author_arr) {
- _auth ~= format(q"┃ <a href="authors.html#%s">%s</a>,┃",
- t_a_.author_surname,
- a,
- );
- }
- }
- topics ~= format(q"┃ <p class="work"><a href="%s">%s</a> -%s┃",
- "url",
- t_a_.title,
- _auth,
- ) ~ "\n";
- if (_opt_action.very_verbose) {
- writeln(" - ", t_a_.title, " - ", t_a_.author);
- }
- }
- }
- }
- }
- }
- }
- }
-}
-#+END_SRC
-
-*** harvested topics write
-
-#+NAME: harvested_topics_html_write
-#+BEGIN_SRC d
-try {
- auto f = File("topics.html", "w");
- foreach (o; topics) {
- f.writeln(o);
- }
-} catch (ErrnoException ex) {
- // Handle error
-}
-#+END_SRC
-
-** 0. module template metadoc harvests authors
-*** 0. module template metadoc harvest authors
-
-#+BEGIN_SRC d :tangle "../src/doc_reform/meta/metadoc_harvests_authors.d"
-module doc_reform.meta.metadoc_harvests_authors;
- import
- std.algorithm,
- std.array,
- std.exception,
- std.regex,
- std.stdio,
- std.string,
- std.conv : to;
- import
- doc_reform.meta.defaults,
- doc_reform.meta.rgx;
- mixin DocReformHarvest;
- mixin InternalMarkup;
- mixin DocReformRgxInit;
-template DocReformMetaDocHarvestsAuthors() {
- auto mkup = InlineMarkup();
- void DocReformMetaDocHarvestsAuthors(H,O)(
- H harvests,
- O _opt_action,
- ) {
-<<harvested_authors_html_head_1>>
-<<harvested_html_head>>
-<<harvested_authors_html_head_2>>
- authors
-<<harvested_html_bottom>>
- <<harvested_authors_html_write>>
- }
-}
-#+END_SRC
-
-*** harvested authors html head
-
-#+NAME: harvested_authors_html_head_1
-#+BEGIN_SRC d
- string[] authors = [];
- authors ~= format(q"┃
-<!DOCTYPE html>
-<html>
-<head>
-<meta charset="utf-8">
-<title>Metadata Harvest - Authors</title>
-#+END_SRC
-
-*** harvested authors html head
-
-#+NAME: harvested_authors_html_head_2
-#+BEGIN_SRC d
-</head>
-<body lang="en" xml:lang="en">
-<a name="top" id="top"></a>
-<a name="up" id="up"></a>
-<a name="start" id="start"></a>
-<h1>Metadata Harvest - Authors (output organised by language &amp; filetype)</h1>
-<p>[<a href="../../index.html">&nbsp;HOME&nbsp;</a>] also see <a href="topics.html">Metadata Harvest - Topics</a></p>
-<p></p>
-<hr />
-<p class="tiny"><a href="../../en/manifest/authors.html">English</a>&nbsp;&nbsp;&nbsp;</p>
-<hr />
-<p><a href="#A">A</a>,&nbsp;<a href="#B">B</a>,&nbsp;<a href="#C">C</a>,&nbsp;<a href="#D">D</a>,&nbsp;<a href="#E">E</a>,&nbsp;<a href="#F">F</a>,&nbsp;<a href="#G">G</a>,&nbsp;<a href="#H">H</a>,&nbsp;<a href="#I">I</a>,&nbsp;<a href="#J">J</a>,&nbsp;<a href="#K">K</a>,&nbsp;<a href="#L">L</a>,&nbsp;<a href="#M">M</a>,&nbsp;<a href="#N">N</a>,&nbsp;<a href="#O">O</a>,&nbsp;<a href="#P">P</a>,&nbsp;<a href="#Q">Q</a>,&nbsp;<a href="#R">R</a>,&nbsp;<a href="#S">S</a>,&nbsp;<a href="#T">T</a>,&nbsp;<a href="#U">U</a>,&nbsp;<a href="#V">V</a>,&nbsp;<a href="#W">W</a>,&nbsp;<a href="#X">X</a>,&nbsp;<a href="#Y">Y</a>,&nbsp;<a href="#Z">Z</a>,&nbsp;
-┃") ~ "\n";
- string[string] _au;
- string[] _auth_date_title;
- string[] _author_date_title;
- string _prev_auth = "";
- char _prev_k = "_".to!char;
- foreach(doc_harvest;
- harvests
- .multiSort!(
- "toUpper(a.author_surname_fn) < toUpper(b.author_surname_fn)",
- "a.date_published < b.date_published",
- "a.title < b.title",
- SwapStrategy.unstable
- )
- ) {
- if (doc_harvest.author_surname_fn != _prev_auth) {
- _au[doc_harvest.author_surname_fn]
- = format(q"┃<p class="author"><a name="%s">%s</a></p> <p class="publication">%s "<a href="%s">%s</a>" [%s]</p>┃",
- doc_harvest.author_surname,
- doc_harvest.author_surname_fn,
- (doc_harvest.date_published.length > 0)
- ? doc_harvest.date_published : "",
- "url",
- doc_harvest.title,
- doc_harvest.language,
- );
- _prev_auth = doc_harvest.author_surname_fn;
- } else {
- _au[doc_harvest.author_surname_fn]
- ~= format(q"┃<p class="publication">%s "<a href="%s">%s</a>" [%s]</p>┃",
- (doc_harvest.date_published.length > 0)
- ? doc_harvest.date_published : "",
- "url",
- doc_harvest.title,
- doc_harvest.language,
- );
- }
- _author_date_title ~= format(q"┃%s %s "%s" [%s]┃",
- doc_harvest.author_surname_fn,
- (doc_harvest.date_published.length > 0)
- ? "(" ~ doc_harvest.date_published ~ ")" : "",
- doc_harvest.title,
- doc_harvest.language,
- );
- }
- foreach (k; _au.keys.sort) {
- if (k.toUpper.to!(char[])[0] != _prev_k) {
- authors ~= format(q"┃<p class="letter"><a name="%s">%s</a></p><p class="book_index_lev1"><a name="a"></a></p>┃",
- k.toUpper.to!(char[])[0],
- k.toUpper.to!(char[])[0],
- );
- _prev_k = k.toUpper.to!(char[])[0];
- }
- authors ~= _au[k];
- }
-#+END_SRC
-
-*** harvested authors write
-
-#+NAME: harvested_authors_html_write
-#+BEGIN_SRC d
-try {
- auto f = File("authors.html", "w");
- foreach (o; authors) {
- f.writeln(o);
- }
-} catch (ErrnoException ex) {
- // Handle error
-}
-if (_opt_action.verbose
- || _opt_action.very_verbose
-) {
- foreach(_adt; _author_date_title.sort) {
- writeln(_adt);
- }
-}
-#+END_SRC
-
-** harvested authors & topics shared html
-*** harvested html head
-
-#+NAME: harvested_html_head
-#+BEGIN_SRC d
-<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
-<meta name="dc.title" content= "metadata harvest, Authors & Topics - information Structuring Universe, Structured information Serialised Units" />
-<meta name="dc.subject" content= "document structuring, ebook, publishing, PDF, LaTeX, XML, ODF, SQL, postgresql, sqlite, electronic book, electronic publishing, electronic document, electronic citation, data structure, citation systems, granular search, digital library" />
-<meta name="generator" content="doc_reform" />
-<link rel="generator" href="http://sisudoc.org" />
-<link href="../../_sisu/css/harvest.css" rel="stylesheet">
-<style TYPE="text/css">
-/* DocReform harvest css default stylesheet */
- body {
- color: black;
- background: #ffffff;
- background-color: #ffffff;
- }
- a:link {
- color: #003399;
- text-decoration: none;
- }
- a:visited {
- color: #003399;
- text-decoration: none;
- }
- a:hover {
- color: #000000;
- background-color: #f9f9aa;
- }
- a:hover img {
- background-color: #ffffff;
- }
- a:active {
- color: #003399;
- text-decoration: underline;
- }
-
- .norm, .bold {
- line-height: 150%%;
- margin-left: 1em;
- margin-right: 2em;
- margin-top: 10px;
- margin-bottom: 0px;
- text-indent: 0mm;
- }
- p, h0, h1, h2, h3, h4, h5, h6, h7 {
- display: block;
- font-family: verdana, arial, georgia, tahoma, sans-serif, helvetica, times, roman;
- font-size: 100%%;
- font-weight: normal;
- line-height: 150%%;
- /* text-align: justify; */
- margin-left: 1em;
- text-indent: 0mm;
- margin-top: 2px;
- margin-bottom: 2px;
- margin-right: 6px;
- text-align: left;
- }
- h1 {
- font-size: 120%%;
- font-weight: bold;
- color: white;
- background: #000088;
- margin-left: 0em;
- }
- p.work {
- font-size: 80%%;
- margin-left: 5em;
- margin-top: 0px;
- margin-bottom: 0px;
- margin-right: 6px;
- text-align: left;
- }
- p.author {
- font-size: 100%%;
- margin-left: 2em;
- margin-top: 0px;
- margin-bottom: 0px;
- margin-right: 6px;
- text-align: left;
- }
- p.publication {
- font-size: 80%%;
- margin-left: 4em;
- margin-top: 0px;
- margin-bottom: 0px;
- margin-right: 6px;
- text-align: left;
- }
- p.letter {
- font-weight: bold;
- font-size: 60%%;
- margin-left: 1em;
- margin-top: 0px;
- margin-bottom: 0px;
- margin-right: 6px;
- text-align: left;
- color: white;
- background: #880000;
- }
- p.lev0 {
- font-size: 120%%;
- margin-left: 1em;
- color: white;
- background: #000000;
- }
-
- p.lev1 {
- font-size: 110%%;
- margin-left: 2em;
- color: white;
- background: #444444;
- }
- p.lev2 {
- font-size: 100%%;
- margin-left: 3em;
- background: #888888;
- }
- p.lev3 {
- font-size: 90%%;
- margin-left: 4em;
- background: #bbbbbb;
- }
- p.lev4 {
- font-size: 80%%;
- margin-left: 5em;
- background: #eeeeee;
- }
- p.lev5 {
- font-size: 80%%;
- margin-left: 6em;
- }
-</style>
-<link rel="shortcut icon" href="../_sisu/image/rb7.ico" />
-#+END_SRC
-
-*** harvested html bottom
-
-#+NAME: harvested_html_bottom
-#+BEGIN_SRC d
- ~= format(q"┃
-<hr />
-<a name="bottom" id="bottom"></a>
-<a name="down" id="down"></a>
-<a name="end" id="end"></a>
-<a name="finish" id="finish"></a>
-<a name="stop" id="stop"></a>
-<a name="credits"></a>
-</body>
-</html>
-┃") ~ "\n";
-#+END_SRC
-
* __END__
dev notes