From 4d5ee2ead874c7a436faa8754eb99215927ea94d Mon Sep 17 00:00:00 2001
From: Ralph Amissah <ralph.amissah@gmail.com>
Date: Sun, 27 Jun 2021 16:59:44 -0400
Subject: dir rename ./sundry (from ./misc)

---
 .../endnotes_inline_from_binary.d                  | 123 +++++++++++++++++++++
 1 file changed, 123 insertions(+)
 create mode 100755 sundry/misc/util/d/tools/markup_conversion/endnotes_inline_from_binary.d

(limited to 'sundry/misc/util/d/tools/markup_conversion/endnotes_inline_from_binary.d')

diff --git a/sundry/misc/util/d/tools/markup_conversion/endnotes_inline_from_binary.d b/sundry/misc/util/d/tools/markup_conversion/endnotes_inline_from_binary.d
new file mode 100755
index 0000000..b084052
--- /dev/null
+++ b/sundry/misc/util/d/tools/markup_conversion/endnotes_inline_from_binary.d
@@ -0,0 +1,123 @@
+#!/usr/bin/env rdmd
+/+
+  - read in file .sst .ssi .ssm
+  - loop twice
+    - first
+      - check for and skip code blocks
+      - use unique code marker for endnote markers in text and give an endnote
+        number ★1, increment
+      - extract all endnotes in array
+    - second
+      - check that the footnote marker number count matches the number of notes
+        in the array
+        - if they match either:
+            - substitute each endnote marker with the array footnote[number-1]
+            - substitute each endnote marker with footnote
+              as inlined footnote markup (footnote number not needed)
+        - if they do not match exit
+  - check whether changes have been made
+    - if so write file with inline footnotes in sub-directory converted_output_/
+      using the same name as the original file
+    - else, exit
++/
+import std.stdio;
+import std.file;
+import std.array : split;
+import std.exception;
+import core.stdc.errno;
+import std.regex;
+import std.format;
+import std.conv;
+void main(string[] args) {
+  static comment                 = ctRegex!(`^%+ `);
+  static block_tic_code_open     = ctRegex!("^`{3} code(?:[.](?P<syntax>[a-z][0-9a-z#+_]+))?(?:[(](?P<attrib>[ a-zA-Z0-9;:,]*)[)])?");
+  static block_tic_close         = ctRegex!("^(`{3})$","m");
+  static block_curly_code_open   = ctRegex!(`^(?:code(?:[.](?P<syntax>[a-z][0-9a-z_]+))?(?:[(](?P<attrib>[ a-zA-Z0-9;:,]*)[)])?[{][ ]*$)`);
+  static block_curly_code_close  = ctRegex!(`^([}]code)`);
+  auto rgx_endnote_ref           = ctRegex!(`([~]\^)(?P<tail>[)\]]? |$)`, "gm");
+  auto rgx_endnote               = ctRegex!(`^\^~\s+(.+|\n)`, "gm");
+  foreach(arg; args[1..$]) {
+    if (
+      !(arg.match(regex(r"--\w+")))
+      && arg.match(regex(r"\w+?\.ss[itm]"))
+    ) {
+      writeln(arg);
+      string filename                  = arg;
+      try {
+        string[] contents, endnotes, endnote_refs;
+        string text                    = filename.readText;
+        string[] paragraphs            = text.split("\n\n");
+        int endnote_ref_count          = 0;
+        int code_block_status          = 0;
+        enum codeBlock { off, curly, tic, }
+        foreach (paragraph; paragraphs) { /+ loop to gather binary endnotes +/
+          if (code_block_status == codeBlock.off
+            && paragraph.match(rgx_endnote)
+          ) {
+            endnotes ~= replaceAll!(m => m[1])
+              (paragraph, rgx_endnote);
+          } else {
+            if ((code_block_status == codeBlock.curly
+                && paragraph.matchFirst(block_curly_code_close))
+              || ((code_block_status == codeBlock.tic
+                && paragraph.matchFirst(block_tic_close))
+            ) {
+              code_block_status = codeBlock.off;
+            } else if ( type["curly_code"] == 1 || type["tic_code"] == 1) {
+              // skip, prevent search for endnotes
+            } else if (paragraph.matchFirst(block_curly_code_open)) {
+              code_block_status = codeBlock.curly;
+            } else if (paragraph.matchFirst(block_tic_code_open)) {
+              code_block_status = codeBlock.tic;
+            } else if (auto m = paragraph.matchAll(rgx_endnote_ref)) {
+              foreach (n; m) {
+                endnote_ref_count++; // endnote_refs ~= (n.captures[1]);
+              }
+            }
+            contents ~= paragraph;
+          }
+        }
+        if (endnotes.length == endnote_ref_count) {
+          import std.outbuffer;
+          writeln("endnote ref count:         ", endnote_ref_count);
+          writeln("number of binary endnotes: ", endnotes.length);
+          int endnote_count = -1;
+          auto buffer = new OutBuffer();
+          foreach (content; contents) { /+ loop to inline endnotes +/
+            content = replaceAll!(m => "~{ " ~ endnotes[++endnote_count] ~ " }~" ~ m["tail"] )
+              (content, rgx_endnote_ref);
+            buffer.write(content ~ "\n\n");
+          }
+          if (buffer) {
+            try {
+              string dir_out = "converted_output_";
+              string path_and_file_out = dir_out ~ "/" ~ filename;
+              dir_out.mkdirRecurse;
+              auto f = File(path_and_file_out, "w");
+              f.write(buffer);
+              writeln("wrote: ", path_and_file_out);
+            } catch (FileException ex) {
+              writeln("did not write file");
+              // Handle errors
+            }
+          }
+        } else {
+          writeln("ERROR binary endnote mismatch, check markup,\nmisatch in the number of endnotes & endnote references!");
+          writeln("  number of endnotes:     ", endnotes.length);
+          writeln("  number of endnote refs: ", endnote_ref_count); // endnote_refs.length,
+        }
+        // assert(endnotes.length == endnote_ref_count);
+      } catch (ErrnoException ex) {
+        switch(ex.errno) {
+          case EPERM:
+          case EACCES: // Permission denied
+            break;
+          case ENOENT: // File does not exist
+            break;
+          default:     // Handle other errors
+            break;
+        }
+      }
+    }
+  }
+}
-- 
cgit v1.2.3