From f5c32101f14aa21c056b57ddce14394b7f1e7c23 Mon Sep 17 00:00:00 2001
From: Ralph Amissah <ralph@amissah.com>
Date: Thu, 2 Feb 2017 12:17:38 -0500
Subject: 0.12.2 ao_summary_and_debugs.org (ao_output_debugs.org moved and
 reorganised)

---
 src/sdp/abstraction_summary.d | 89 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 89 insertions(+)
 create mode 100644 src/sdp/abstraction_summary.d

(limited to 'src/sdp/abstraction_summary.d')

diff --git a/src/sdp/abstraction_summary.d b/src/sdp/abstraction_summary.d
new file mode 100644
index 0000000..d39e020
--- /dev/null
+++ b/src/sdp/abstraction_summary.d
@@ -0,0 +1,89 @@
+template SiSUabstractionSummary() {
+  auto SiSUabstractionSummary(S,T)(
+    auto ref const S         contents,
+    auto ref T               doc_matters,
+  ) {
+    import
+      ao_defaults,
+      ao_rgx;
+    import
+      std.algorithm,
+      std.array,
+      std.container,
+      std.exception,
+      std.getopt,
+      std.stdio,
+      std.file,
+      std.path,
+      std.range,
+      std.regex,
+      std.string,
+      std.traits,
+      std.typecons,
+      std.uni,
+      std.utf,
+      std.conv : to;
+    mixin InternalMarkup;
+    auto markup = InlineMarkup();
+    if (doc_matters.opt_action_bool["verbose"]) {
+      string[string] check = [
+        "last_obj_cite_number" : "NA [debug \"checkdoc\" not run]",
+      ];
+      foreach (k; doc_matters.keys_seq_seg) {
+        foreach (obj; contents[k]) {
+          if (obj.use != "empty") {
+            if (!empty(obj.obj_cite_number)) {
+              check["last_obj_cite_number"] = obj.obj_cite_number;
+            }
+          }
+        }
+      }
+      // auto char_repeat_number = doc_matters.source_filename.length;
+      // char_repeat_number = (char_repeat_number > 33)
+      auto min_repeat_number = 66;
+      auto char_repeat_number = (doc_matters.dochead_meta["title"]["full"].length
+        + doc_matters.dochead_meta["creator"]["author"].length + 4);
+      char_repeat_number = (char_repeat_number > min_repeat_number)
+      ? char_repeat_number
+      : min_repeat_number;
+      // writeln(char_repeat_number);
+      writefln(
+        "%s\n\"%s\", %s\n%s\n%s\n%s%10d\n%s%10d\n%s%10d\n%s%10d\n%s%10d\n%s%10d\n%s%10d\n%s%10d\n(%s: %s)\n%s",
+        markup.repeat_character_by_number_provided("-", char_repeat_number),
+        doc_matters.dochead_meta["title"]["full"],
+        doc_matters.dochead_meta["creator"]["author"],
+        doc_matters.source_filename,
+        markup.repeat_character_by_number_provided("-", char_repeat_number),
+        "length toc array:      ",
+        to!int(contents["toc_seg"].length),
+        "length contents array: ",
+        to!int(contents["body"].length),
+        "last obj_cite_number:  ",
+        to!int(check["last_obj_cite_number"]),
+        "length endnotes:       ",
+        (contents["endnotes"].length > 1)
+        ? (to!int(contents["endnotes"].length))
+        : 0,
+        "length glossary:       ",
+        (contents["glossary"].length > 1)
+        ? (to!int(contents["glossary"].length))
+        : 0,
+        "length biblio:         ",
+        (contents["bibliography"].length > 1)
+        ? (to!int(contents["bibliography"].length))
+        : 0,
+        "length bookindex:      ",
+        (contents["bookindex_seg"].length > 1)
+        ? (to!int(contents["bookindex_seg"].length))
+        : 0,
+        "length blurb:          ",
+        (contents["blurb"].length > 1)
+        ? (to!int(contents["blurb"].length))
+        : 0,
+        __FILE__,
+        __LINE__,
+        markup.repeat_character_by_number_provided("-", min_repeat_number),
+      );
+    }
+  }
+}
-- 
cgit v1.2.3