aboutsummaryrefslogtreecommitdiffhomepage
path: root/misc/util/d/tools/markup_conversion
diff options
context:
space:
mode:
Diffstat (limited to 'misc/util/d/tools/markup_conversion')
-rw-r--r--misc/util/d/tools/markup_conversion/README1
-rwxr-xr-xmisc/util/d/tools/markup_conversion/endnotes_inline_from_binary.d123
-rw-r--r--misc/util/d/tools/markup_conversion/markup_changes.d136
-rwxr-xr-xmisc/util/d/tools/markup_conversion/markup_changes_header_and_content.d244
-rwxr-xr-xmisc/util/d/tools/markup_conversion/markup_conversion_from_sisu_ruby_to_sisu_spine.d367
5 files changed, 0 insertions, 871 deletions
diff --git a/misc/util/d/tools/markup_conversion/README b/misc/util/d/tools/markup_conversion/README
deleted file mode 100644
index 8b13789..0000000
--- a/misc/util/d/tools/markup_conversion/README
+++ /dev/null
@@ -1 +0,0 @@
-
diff --git a/misc/util/d/tools/markup_conversion/endnotes_inline_from_binary.d b/misc/util/d/tools/markup_conversion/endnotes_inline_from_binary.d
deleted file mode 100755
index b084052..0000000
--- a/misc/util/d/tools/markup_conversion/endnotes_inline_from_binary.d
+++ /dev/null
@@ -1,123 +0,0 @@
-#!/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;
- }
- }
- }
- }
-}
diff --git a/misc/util/d/tools/markup_conversion/markup_changes.d b/misc/util/d/tools/markup_conversion/markup_changes.d
deleted file mode 100644
index 4274f78..0000000
--- a/misc/util/d/tools/markup_conversion/markup_changes.d
+++ /dev/null
@@ -1,136 +0,0 @@
-#!/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[string] type = [
- "curly_code" : 0,
- "tic_code" : 0,
- ];
- foreach (paragraph; paragraphs) { /+ loop to gather binary endnotes +/
- if ( !( type["curly_code"] == 1 || type["tic_code"] == 1)
- && paragraph.match(rgx_endnote)
- ) {
- endnotes ~= replaceAll!(m => m[1])
- (paragraph, rgx_endnote);
- } else {
- if ( type["curly_code"] == 1 || type["tic_code"] == 1
- || paragraph.matchFirst(block_curly_code_open)
- || paragraph.matchFirst(block_tic_code_open)
- ) { /+ code blocks identified, no munging +/
- if ( type["curly_code"] == 1
- && paragraph.matchFirst(block_curly_code_close)
- ) {
- type["curly_code"] = 0;
- } else if (type["tic_code"] == 1
- && paragraph.matchFirst(block_tic_close)
- ) {
- type["tic_code"] = 0;
- } else if (paragraph.matchFirst(block_curly_code_open)) {
- type["curly_code"] = 1;
- } else if (paragraph.matchFirst(block_tic_code_open)) {
- type["tic_code"] = 1;
- }
- contents ~= paragraph;
- } else { /+ regular content, not a code block +/
- if (auto m = paragraph.matchAll(rgx_endnote_ref)) {
- foreach (n; m) {
- endnote_ref_count++; // endnote_refs ~= (n.captures[1]);
- }
- }
- paragraph = replaceAll!(m => " \\\\ " )
- (paragraph, regex(r"\s*<(?:/\s*|:)?br>\s*")); // (paragraph, regex(r"(<br>)"));
- contents ~= paragraph;
- }
- }
- }
- {
- import std.outbuffer;
- auto buffer = new OutBuffer();
- if (endnotes.length == endnote_ref_count) {
- // writeln("endnote ref count: ", endnote_ref_count);
- // writeln("number of binary endnotes: ", endnotes.length);
- int endnote_count = -1;
- foreach (content; contents) { /+ loop to inline endnotes +/
- content = replaceAll!(m => "~{ " ~ endnotes[++endnote_count] ~ " }~" ~ m["tail"] )
- (content, rgx_endnote_ref); // endnote_ref cannot occur in a code block or else fail
- 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 {
- foreach (content; contents) { /+ loop to inline endnotes +/
- buffer.write(content ~ "\n\n");
- }
- }
- }
- } 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;
- }
- }
- }
- }
-}
diff --git a/misc/util/d/tools/markup_conversion/markup_changes_header_and_content.d b/misc/util/d/tools/markup_conversion/markup_changes_header_and_content.d
deleted file mode 100755
index 86792ff..0000000
--- a/misc/util/d/tools/markup_conversion/markup_changes_header_and_content.d
+++ /dev/null
@@ -1,244 +0,0 @@
-#!/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 std.range;
-import core.stdc.errno;
-import std.regex;
-import std.format;
-import std.conv;
-void main(string[] args) {
- static heading_a = ctRegex!(`^:?[A][~] `, "m");
- 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");
- char[][] header0Content1(in string src_text) { // cast(char[])
- /+ split string on _first_ match of "^:?A~\s" into [header, content] array/tuple +/
- char[][] header_and_content;
- auto m = (cast(char[]) src_text).matchFirst(heading_a);
- header_and_content ~= m.pre;
- header_and_content ~= m.hit ~ m.post;
- assert(header_and_content.length == 2,
- "document markup is broken, header body split == "
- ~ header_and_content.length.to!string
- ~ "; (header / body array split should == 2 (split is on level A~))"
- );
- return header_and_content;
- }
- foreach(arg; args[1..$]) {
- if (
- !(arg.match(regex(r"--\w+")))
- && arg.match(regex(r"\w+?\.ss[itm]"))
- ) {
- writeln(arg);
- string filename = arg;
- try {
- string[] munged_header, munged_contents, munged_endnotes, endnote_refs;
- string text = filename.readText;
- char[][] hc = header0Content1(text);
- char[] src_header = hc[0];
- string[] headers = src_header.to!string.split("\n\n");
- char[] src_txt = hc[1];
- string[] paragraphs = src_txt.to!string.split("\n\n");
- int endnote_ref_count = 0;
- int[string] type = [
- "curly_code" : 0,
- "tic_code" : 0,
- ];
- string _tmp_header;
- foreach (h_; headers) { /+ loop to inline endnotes +/
- _tmp_header = "";
- if (h_.match(regex(r"^[@\[]?title[:\]]?"))) { // title
- if (auto m = h_.match(regex(r"^@title:(?:\s+(?P<c>.+)|$)"))) { // sisu bespoke markup
- if (m.captures["c"].length == 0) {
- _tmp_header ~= "title:";
- } else {
- _tmp_header ~= "title:\n main: " ~ "\"" ~ m.captures["c"] ~ "\"";
- }
- } else if (auto m = h_.match(regex(r"^title\s*=\s*(?P<c>.+)"))) { // toml?
- if (m.captures["c"].length == 0) {
- _tmp_header ~= "title:";
- } else {
- _tmp_header ~= "title:\n main: " ~ "\"" ~ m.captures["c"] ~ "\"";
- }
- } else if (auto m = h_.match(regex(r"^\[title\]"))) { // toml markup
- _tmp_header ~= "title:";
- } else if (auto m = h_.match(regex(r"^title(?:\s+(?P<c>.+)|\s+\\$)"))) { // sdlang markup
- if (m.captures["c"].length == 0) {
- _tmp_header ~= "title:";
- } else {
- _tmp_header ~= "title:\n main: " ~ "\"" ~ m.captures["c"] ~ "\"";
- }
- }
- if (h_.match(regex(r"^\s*[:]?(?:main)[:= ]?", "m"))) {
- if (auto m = h_.match(regex(r"^\s+(?P<h>:main):(?:\s+(?P<c>.+)|$)", "m"))) { // sisu bespoke markup
- _tmp_header ~= " main: " ~ "\"" ~ m.captures["c"] ~ "\"";
- } else if (auto m = h_.match(regex(r"^\s*(?P<h>main)\s*=\s*(?P<c>.+)", "m"))) { // toml?
- _tmp_header ~= " main: " ~ m.captures["c"];
- } else if (auto m = h_.match(regex(r"^\s+(?P<h>main)(?:\s*\s*(?P<c>.+)|$)", "m"))) { // toml markup
- _tmp_header ~= " main: " ~ "\"" ~ m.captures["c"] ~ "\"";
- } else if (auto m = h_.match(regex(r"^\s+(?P<h>main)(?:\s+(?P<c>.+)|\s+\\$)", "m"))) { // sdlang markup
- _tmp_header ~= " main: " ~ "\"" ~ m.captures["c"] ~ "\"";
- }
- }
- if (h_.match(regex(r"^\s*[:]?(?:sub(title)?)[:= ]?", "m"))) {
- if (auto m = h_.match(regex(r"^\s+:sub(?:title)?:(?:\s+(?P<c>.+)|$)", "m"))) { // sisu bespoke markup
- _tmp_header ~= " subtitle: " ~ "\"" ~ m.captures["c"] ~ "\"";
- } else if (auto m = h_.match(regex(r"^\s*sub(?:title)?\s*=\s*(?P<c>.+)$", "m"))) { // toml?
- _tmp_header ~= " subtitle: " ~ m.captures["c"];
- } else if (auto m = h_.match(regex(r"^\s+(?:title)?(?:\s*\s*(?P<c>.+)|$)", "m"))) { // toml markup
- _tmp_header ~= " subtitle: " ~ "\"" ~ m.captures["c"] ~ "\"";
- } else if (auto m = h_.match(regex(r"^\s+(?:title)?(?:\s+(?P<c>.+)|\s+\\$)", "m"))) { // sdlang markup
- _tmp_header ~= " subtitle: " ~ "\"" ~ m.captures["c"] ~ "\"";
- }
- }
- }
- if (h_.match(regex(r"^[@\[]?rights[:\]]?"))) { // rights
- if (auto m = h_.match(regex(r"^@rights:[ ]+(?P<c>.+)$"))) { // sisu bespoke markup
- _tmp_header ~= "rights: \n copyright: \"" ~ m.captures["c"] ~ "\"";
- } else if (auto m = h_.match(regex(r"^@rights:"))) { // sisu bespoke markup
- _tmp_header ~= "rights:";
- } else if (auto m = h_.match(regex(r"^\[rights\]", "m"))) { // toml markup
- _tmp_header ~= "rights:";
- } else if (auto m = h_.match(regex(r"^rights:"))) { // sdlang markup
- _tmp_header ~= "rights:";
- }
- if (h_.match(regex(r"^\s*[:]?copyright[:= ]?", "m"))) {
- if (auto m = h_.match(regex(r"^\s+:copyright:(?:\s+(?P<c>.+)|$)", "m"))) { // sisu bespoke markup
- _tmp_header ~= " copyright: " ~ "\"" ~ m.captures["c"] ~ "\"";
- } else if (auto m = h_.match(regex(r"^\s*copyright\s*=\s*(?P<c>.+)", "m"))) { // toml?
- _tmp_header ~= " copyright: " ~ m.captures["c"];
- } else if (auto m = h_.match(regex(r"^\s+<h>copyright(?:\s*\s*(?P<c>.+)|$)", "m"))) { // toml markup
- _tmp_header ~= " copyright: " ~ "\"" ~ m.captures["c"] ~ "\"";
- } else if (auto m = h_.match(regex(r"^\s+copyright(?:\s+(?P<c>.+)|\s+\\$)", "m"))) { // sdlang markup
- _tmp_header ~= " copyright: " ~ "\"" ~ m.captures["c"] ~ "\"";
- }
- }
- if (h_.match(regex(r"^\s*[:]?licen[cs]e[:= ]?", "m"))) {
- if (auto m = h_.match(regex(r"^\s+:licen[cs]e:(?:\s+(?P<c>.+)|$)", "m"))) { // sisu bespoke markup
- _tmp_header ~= " license: " ~ "\"" ~ m.captures["c"] ~ "\"";
- } else if (auto m = h_.match(regex(r"^\s*licen[cs]e\s*=\s*(?P<c>.+)$", "m"))) { // toml?
- _tmp_header ~= " license: " ~ m.captures["c"];
- } else if (auto m = h_.match(regex(r"^\s+licen[cs]e(?:\s*\s*(?P<c>.+)|$)", "m"))) { // toml markup
- _tmp_header ~= " license: " ~ "\"" ~ m.captures["c"] ~ "\"";
- } else if (auto m = h_.match(regex(r"^\s+licen[cs]e(?:\s+(?P<c>.+)|\s+\\$)", "m"))) { // sdlang markup
- _tmp_header ~= " license: " ~ "\"" ~ m.captures["c"] ~ "\"";
- }
- }
- }
- if (_tmp_header.length > 0) {
- munged_header ~= _tmp_header;
- } else {
- munged_header ~= h_;
- }
- }
- writeln(munged_header);
- foreach (paragraph; paragraphs) { /+ loop to gather binary endnotes +/
- if ( !( type["curly_code"] == 1 || type["tic_code"] == 1)
- && paragraph.match(rgx_endnote)
- ) {
- munged_endnotes ~= replaceAll!(m => m[1])
- (paragraph, rgx_endnote);
- } else {
- if ( type["curly_code"] == 1 || type["tic_code"] == 1
- || paragraph.matchFirst(block_curly_code_open)
- || paragraph.matchFirst(block_tic_code_open)
- ) { /+ code blocks identified, no munging +/
- if ( type["curly_code"] == 1
- && paragraph.matchFirst(block_curly_code_close)
- ) {
- type["curly_code"] = 0;
- } else if (type["tic_code"] == 1
- && paragraph.matchFirst(block_tic_close)
- ) {
- type["tic_code"] = 0;
- } else if (paragraph.matchFirst(block_curly_code_open)) {
- type["curly_code"] = 1;
- } else if (paragraph.matchFirst(block_tic_code_open)) {
- type["tic_code"] = 1;
- }
- munged_contents ~= paragraph;
- } else { /+ regular content, not a code block +/
- if (auto m = paragraph.matchAll(rgx_endnote_ref)) {
- foreach (n; m) {
- endnote_ref_count++; // endnote_refs ~= (n.captures[1]);
- }
- }
- paragraph = replaceAll!(m => " \\\\ " )
- (paragraph, regex(r"\s*<(?:/\s*|:)?br>\s*")); // (paragraph, regex(r"(<br>)"));
- munged_contents ~= paragraph;
- }
- }
- }
- {
- import std.outbuffer;
- auto buffer = new OutBuffer();
- foreach (header; munged_header) { /+ loop to inline endnotes +/
- buffer.write(header ~ "\n\n");
- }
- if (munged_endnotes.length == endnote_ref_count) {
- int endnote_count = -1;
- foreach (content; munged_contents) { /+ loop to inline endnotes +/
- content = replaceAll!(m => "~{ " ~ munged_endnotes[++endnote_count] ~ " }~" ~ m["tail"] )
- (content, rgx_endnote_ref); // endnote_ref cannot occur in a code block or else fail
- 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 {
- foreach (content; munged_contents) { /+ loop to inline endnotes +/
- buffer.write(content ~ "\n\n");
- }
- }
- }
- } 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;
- }
- }
- }
- }
-}
diff --git a/misc/util/d/tools/markup_conversion/markup_conversion_from_sisu_ruby_to_sisu_spine.d b/misc/util/d/tools/markup_conversion/markup_conversion_from_sisu_ruby_to_sisu_spine.d
deleted file mode 100755
index 0ec541d..0000000
--- a/misc/util/d/tools/markup_conversion/markup_conversion_from_sisu_ruby_to_sisu_spine.d
+++ /dev/null
@@ -1,367 +0,0 @@
-#!/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, join;
-import std.exception;
-// import std.range;
-import core.stdc.errno;
-import std.regex;
-import std.format;
-import std.conv;
-void main(string[] args) {
- static heading_a = ctRegex!(`^:?[A][~] `, "m");
- 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");
- char[][] header0Content1(in string src_text) { // cast(char[])
- /+ split string on _first_ match of "^:?A~\s" into [header, content] array/tuple +/
- char[][] header_and_content;
- auto m = (cast(char[]) src_text).matchFirst(heading_a);
- header_and_content ~= m.pre;
- header_and_content ~= m.hit ~ m.post;
- assert(header_and_content.length == 2,
- "document markup is broken, header body split == "
- ~ header_and_content.length.to!string
- ~ "; (header / body array split should == 2 (split is on level A~))"
- );
- return header_and_content;
- }
- string format_body_string(string s) {
- string o;
- o = s
- .replaceAll(regex("^<(?:/[ ]*)?br>[ ]*"), " \\\\ ")
- .replaceAll(regex("[ ]*<(?:/[ ]*)?br>$"), " \\\\")
- .replaceAll(regex("[ ]*<(?:/[ ]*)?br>[ ]*"), " \\\\ ");
- return o;
- }
- string format_header_string(string s) {
- string o;
- o = s
- .replaceAll(regex("\""), "\\\"")
- .replaceAll(regex("[ ]*<(?:/[ ]*)?br>$"), " \\\\")
- .replaceAll(regex("[ ]*<(?:/[ ]*)?br>[ ]*"), " \\\\ ");
- return o;
- }
- string format_main_header(string hm, string hs = "", string c = "") {
- string o;
- if (c.length == 0) {
- o ~= hm ~ ":\n";
- } else {
- o ~= hm ~ ":\n"
- ~ " " ~ hs ~ ": "
- ~ "\"" ~ format_header_string(c) ~ "\"\n";
- }
- return o;
- }
- string format_sub_header(string hs, string c) {
- string o;
- o ~= " " ~ hs ~ ": "
- ~ "\"" ~ format_header_string(c) ~ "\"\n";
- return o;
- }
- foreach(arg; args[1..$]) {
- if (
- !(arg.match(regex(r"--\w+")))
- && arg.match(regex(r"\w+?\.ss[itm]"))
- ) {
- writeln(arg);
- string filename = arg;
- try {
- string[] munged_header, munged_contents, munged_endnotes, endnote_refs;
- char[][] hc;
- char[] src_header;
- string[] headers;
- char[] src_txt;
- string[] paragraphs;
- enum codeBlock { off, curly, tic, }
- string _tmp_header;
- int endnote_ref_count = 0;
- int code_block_status = codeBlock.off;
- string text = filename.readText;
- if (arg.match(regex(r"\w+?\.ss[tm]"))) {
- hc = header0Content1(text);
- src_header = hc[0];
- headers = src_header.to!string.split("\n\n");
- src_txt = hc[1];
- paragraphs = src_txt.to!string.split("\n\n");
- } else if (arg.match(regex(r"\w+?\.ssi"))) {
- headers = [];
- paragraphs = text.split("\n\n");
- }
- if (headers.length > 0) {
- headers[0] = headers[0].replaceFirst(regex(r"^%\s+SiSU.+", "i"), "# SiSU 8.0 spine (auto-conversion)");
- foreach (h_; headers) {
- _tmp_header = "";
- if (auto m = h_.match(regex(r"^%\s*", "m"))) {
- h_ = h_.replaceAll(regex(r"^%\s*", "m"), "# ") ~ "\n";
- }
- if (h_.match(regex(r"^@title:|@subtitle"))) {
- if (auto m = h_.match(regex(r"^@(?P<h>title):(?:[ ]+(?P<c>.+)|\n)"))) {
- _tmp_header ~= format_main_header(m.captures["h"], "main", m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^@(?P<h>subtitle):(?:[ ]+(?P<c>.+)|$)"))) {
- if (m.captures["c"].length == 0) {
- } else {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>main):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:sub(?:title)?:(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header("subtitle", m.captures["c"]);
- }
- } else if (h_.match(regex(r"^@creator:|@author:"))) {
- if (auto m = h_.match(regex(r"^(?:@creator:|@author:)(?:[ ]+(?P<c>.+)|\n)"))) {
- _tmp_header ~= format_main_header("creator", "author", m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>author):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- } else if (h_.match(regex(r"^@rights:"))) {
- if (auto m = h_.match(regex(r"^@(?P<h>rights):(?:[ ]+(?P<c>.+)|\n)"))) {
- _tmp_header ~= format_main_header(m.captures["h"], "copyright", m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>copyright):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:licen[cs]e:(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header("license", m.captures["c"]);
- }
- } else if (h_.match(regex(r"^@date:|@date\."))) {
- if (auto m = h_.match(regex(r"^@(?P<h>date):(?:[ ]+(?P<c>.+)|\n)"))) {
- _tmp_header ~= format_main_header(m.captures["h"], "published", m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>published):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>available):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>modified):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>created):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>issued):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>valid):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^@date\.(?P<h>available):[ ]+(?P<c>.+)$"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^@date\.(?P<h>modified):[ ]+(?P<c>.+)$"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^@date\.(?P<h>created):[ ]+(?P<c>.+)$"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^@date\.(?P<h>issued):[ ]+(?P<c>.+)$"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^@date\.(?P<h>valid):[ ]+(?P<c>.+)$"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- } else if (h_.match(regex(r"^@classify:"))) {
- if (auto m = h_.match(regex(r"^@classify:"))) {
- _tmp_header ~= "classify:\n";
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>topic_register):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:type:(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= "# type: " ~ "\"" ~ m.captures["c"] ~ "\"\n";
- }
- } else if (h_.match(regex(r"^(?:@identifier:|@identify:)"))) {
- if (auto m = h_.match(regex(r"^(?:@identifier:|@idenfify)"))) {
- _tmp_header ~= "identify:\n";
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>oclc):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>isbn):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>dewey):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- } else if (h_.match(regex(r"^@publisher:"))) {
- if (auto m = h_.match(regex(r"^@publisher:[ ]+(?P<c>.+)$"))) {
- _tmp_header ~= "publisher: " ~ "\"" ~ m.captures["c"] ~ "\"\n";
- }
- } else if (h_.match(regex(r"^@make:"))) {
- // writeln(h_);
- if (auto m = h_.match(regex(r"^@make:"))) {
- _tmp_header ~= "make:\n";
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>breaks):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>num_top):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>headings):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>italics):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>bold):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>emphasis):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>substitute):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>texpdf_font):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>home_button_text):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>home_button_image):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>cover_image):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- if (auto m = h_.match(regex(r"^\s+:(?P<h>footer):(?:[ ]+(?P<c>.+)|$)", "m"))) {
- _tmp_header ~= format_sub_header(m.captures["h"], m.captures["c"]);
- }
- // writeln(_tmp_header);
- } else if (h_.match(regex(r"^@\w+:"))) {
- _tmp_header ~= "# " ~ h_.split("\n").join("\n# ") ~ "\n";
- } else if (h_.match(regex(r"^\s+:\w+:", "m"))) {
- if (auto m = h_.match(regex(r"^(?P<g>\s+:\w+:.*)"))) {
- _tmp_header ~= "# " ~ m.captures["g"] ~ "\n";
- }
- }
- if (h_.match(regex(r"^#", "m"))) {
- if (auto m = h_.match(regex(r"^(?P<g>#.*)", "m"))) {
- _tmp_header ~= m.captures["g"] ~ "\n";
- }
- }
- if (_tmp_header.length > 0) {
- munged_header ~= _tmp_header.split("\n\n");
- } else if (h_.length > 0) {
- writeln("munging required: ", h_);
- h_ = h_.replaceAll((regex(r"\n\n\n+", "m")), "\n\n");
- munged_header ~= h_;
- }
- }
- // writeln(munged_header.join("\n"));
- }
- foreach (paragraph; paragraphs) { /+ loop to gather binary endnotes +/
- if (code_block_status == codeBlock.off
- && paragraph.match(rgx_endnote)
- ) {
- munged_endnotes ~= replaceAll!(m => m[1])
- (paragraph, rgx_endnote);
- } else {
- if ( code_block_status != codeBlock.off
- || paragraph.matchFirst(block_curly_code_open)
- || paragraph.matchFirst(block_tic_code_open)
- ) { /+ code blocks identified, no munging +/
- 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 (paragraph.matchFirst(block_curly_code_open)) {
- code_block_status = codeBlock.curly;
- } else if (paragraph.matchFirst(block_tic_code_open)) {
- code_block_status = codeBlock.tic;
- }
- munged_contents ~= paragraph;
- } else { /+ regular content, not a code block +/
- if (auto m = paragraph.matchAll(rgx_endnote_ref)) {
- foreach (n; m) {
- endnote_ref_count++; // endnote_refs ~= (n.captures[1]);
- }
- }
- paragraph = format_body_string(paragraph);
- // paragraph = replaceAll!(m => " \\\\ " )
- // (paragraph, regex(r"\s*<(?:/\s*|:)?br>\s*")); // (paragraph, regex(r"(<br>)"));
- munged_contents ~= paragraph;
- }
- }
- }
- {
- import std.outbuffer;
- auto buffer = new OutBuffer();
- if (munged_header.length > 0) {
- foreach (header; munged_header) { /+ loop to inline endnotes +/
- buffer.write(header ~ "\n");
- }
- }
- if (munged_endnotes.length == endnote_ref_count) {
- int endnote_count = -1;
- foreach (k, content; munged_contents) { /+ loop to inline endnotes +/
- content = replaceAll!(m => "~{ " ~ munged_endnotes[++endnote_count] ~ " }~" ~ m["tail"] )
- (content, rgx_endnote_ref); // endnote_ref cannot occur in a code block or else fail
- buffer.write(content ~ ((k == munged_contents.length - 1) ? "" : "\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 {
- foreach (content; munged_contents) { /+ loop to inline endnotes +/
- buffer.write(content ~ "\n\n");
- }
- }
- }
- } 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;
- }
- }
- }
- }
-}
generated by cgit v1.2.3 (git 2.25.1) at 2025-10-31 23:50:34 +0000