[fn].digest.txt, sha256 of pod source files & pod

1 files changed, 377 insertions, 320 deletions

diff --git a/org/out_src_pod.org b/org/out_src_pod.org
index c6143cb..da2b050 100644
--- a/org/out_src_pod.org
+++ b/org/out_src_pod.org
@@ -31,16 +31,29 @@ template spinePod() {
   <<output_imports>>
   void spinePod(T)(T doc_matters) {
     <<source_pod_init>>
-    <<source_pod_archive_zip>>
     try {
-      <<source_pod_mkdirs>>
-      <<source_pod_archive_prepare_for_zip>>
-      <<source_pod_copy_info>>
-      <<source_pod_zip>>
+      {
+        pod_archive_directory_tree(doc_matters, pths_pod);
+      }
+      auto t = pod_zip_make_ready(doc_matters, pths_pod);
+      static assert(t.length==3);
+      auto zip = t[0];
+      auto fn_pod = t[1];
+      auto _digests = t[2];
+      {
+        zipArchive(doc_matters, fn_pod, zip);
+      } {
+        zipArchiveDigest(doc_matters, fn_pod, _digests);
+      }
     } catch (ErrnoException ex) {
       // Handle error
     }
   }
+  <<source_pod_mkdirs>>
+  <<source_pod_archive_prepare_for_zip_and_get_digests>>
+  <<source_pod_archive_zip>>
+  <<zip_archive>>
+  <<pod_source_files_digests>>
 }
 #+END_SRC
 
@@ -72,8 +85,6 @@ debug(asserts) {
 }
 mixin spineRgxFiles;
 string pwd = doc_matters.env.pwd;
-auto src_path_info = doc_matters.src_path_info;
-auto pth_dr_doc_src = doc_matters.src_path_info;
 auto pths_pod = spinePathsPods!()(doc_matters);
 mixin spineLanguageCodes;
 auto lang = Lang();
@@ -81,377 +92,423 @@ static auto rgx_files = RgxFiles();
 assert (doc_matters.src.filename.match(rgx_files.src_fn));
 #+END_SRC
 
-*** pod zip archive
+** source pod archive, (prepare for zip) :copy:
 
-#+NAME: source_pod_archive_zip
+#+NAME: source_pod_archive_prepare_for_zip_and_get_digests
 #+BEGIN_SRC d
-@system auto pod_archive(Z)(
-  string _source_type,
-  string _data_in,
-  string _pth_out,
-  Z zip
-) {
-  auto zip_arc_member_file = new ArchiveMember();
-  zip_arc_member_file.name = _pth_out;
-  auto zip_data = new OutBuffer();
-  switch (_source_type) {
-  case "file_path_bin":
-    zip_data.write(cast(char[]) ((_data_in).read));
-    goto default;
-  case "file_path_text":
-    zip_data.write((_data_in).readText);
-    goto default;
-  case "string":
-    zip_data.write(_data_in);
-    goto default;
-  default:
-    zip_arc_member_file.expandedData = zip_data.toBytes();
-    zip.addMember(zip_arc_member_file);
-  }
-  return zip;
-}
-#+END_SRC
-
-** mkdir :mkdir:
-
-#+NAME: source_pod_mkdirs
-#+BEGIN_SRC d
-/+ create directory structure +/
-if (!exists(pths_pod.pod_dir_())) {
-  // used both by pod zipped (& pod filesystem (unzipped) which makes its own recursive dirs)
-  pths_pod.pod_dir_().mkdirRecurse;
-}
-if (doc_matters.opt.action.source_or_pod) {
-  if (doc_matters.opt.action.vox_gt0) {
-    writeln(" ", pths_pod.fn_pod_filelist(doc_matters.src.filename).filesystem_open_zpod);
-  }
-  if (!exists(pths_pod.text_root(doc_matters.src.filename).filesystem_open_zpod)) {
-    pths_pod.text_root(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
+auto pod_zip_make_ready(M,P)(M doc_matters, P pths_pod) {
+  auto pth_dr_doc_src = doc_matters.src_path_info;
+  if (doc_matters.opt.action.debug_do_pod
+  && doc_matters.opt.action.vox_gt1) {
+    writeln(__LINE__, ": ",
+      doc_matters.src.filename, " -> ",
+      pths_pod.fn_doc(doc_matters.src.filename, doc_matters.src.language).filesystem_open_zpod
+    );
   }
-  if (!exists(pths_pod.conf_root(doc_matters.src.filename).filesystem_open_zpod)) {
-    pths_pod.conf_root(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
-  }
-  if (!exists(pths_pod.media_root(doc_matters.src.filename).filesystem_open_zpod)) {
-    pths_pod.media_root(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
-  }
-  if (!exists(pths_pod.css(doc_matters.src.filename).filesystem_open_zpod)) {
-    pths_pod.css(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
-  }
-  if (!exists(pths_pod.image_root(doc_matters.src.filename).filesystem_open_zpod)) {
-    pths_pod.image_root(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
-  }
-  if (!exists(pths_pod.doc_lng(doc_matters.src.filename, doc_matters.src.language).filesystem_open_zpod)) {
-    pths_pod.doc_lng(doc_matters.src.filename, doc_matters.src.language).filesystem_open_zpod.mkdirRecurse;
-  }
-}
-if (!exists(pths_pod.pod_dir_() ~ "/index.html")) {
-  import sisudoc.io_out.html_snippet;
-  mixin htmlSnippet;
-  auto f = File(pths_pod.pod_dir_() ~"/index.html", "w");
-  f.writeln(format_html_blank_page_guide_home(
-    "../../css/html_scroll.css",
-    (doc_matters.opt.action.webserver_url_doc_root.length > 0)
-      ? doc_matters.opt.action.webserver_url_doc_root
-      : doc_matters.conf_make_meta.conf.w_srv_data_root_url,
-    "../../index.html",
-  ));
-}
-#+END_SRC
-
-** copy :copy:
-
-#+NAME: source_pod_archive_prepare_for_zip
-#+BEGIN_SRC d
-if (doc_matters.opt.action.debug_do_pod
-&& doc_matters.opt.action.vox_gt1) {
-  writeln(__LINE__, ": ",
-    doc_matters.src.filename, " -> ",
-    pths_pod.fn_doc(doc_matters.src.filename, doc_matters.src.language).filesystem_open_zpod
-  );
-}
-auto zip = new ZipArchive();
-auto fn_pod = pths_pod.pod_filename(doc_matters.src.filename).zpod;
-{ /+ bundle images +/
-  foreach (image; doc_matters.srcs.image_list) {
-    debug(podimages) {
-      writeln(
-        pth_dr_doc_src.image_root.to!string, "/", image, " -> ",
-        pths_pod.image_root(doc_matters.src.filename).zpod, "/", image
-      );
+  auto zip = new ZipArchive(); // needed
+  auto fn_pod = pths_pod.pod_filename(doc_matters.src.filename).zpod;
+  string[string][string] _digests;
+  { // bundle images - get digest
+    foreach (image; doc_matters.srcs.image_list) {
+      debug(podimages) {
+        writeln(
+          pth_dr_doc_src.image_root.to!string, "/", image, " -> ",
+          pths_pod.image_root(doc_matters.src.filename).zpod, "/", image
+        );
+      }
+      auto fn_src_in = doc_matters.src.image_dir_path ~ "/" ~ image;
+      auto fn_src_out_pod_zip_base
+        = pths_pod.image_root(doc_matters.src.filename).zpod.to!string
+        ~ "/" ~ image;
+      auto fn_src_out_filesystem
+        = pths_pod.image_root(doc_matters.src.filename).filesystem_open_zpod.to!string
+        ~ "/" ~ image;
+      if (exists(fn_src_in)) {
+        debug(io) { writeln("(io debug) src out found: ", fn_src_in); }
+        { // take DIGEST write to pod file digests.txt
+          auto data = (cast(byte[]) (fn_src_in).read);
+          _digests["shared"]["images"] ~= data.sha256Of.toHexString ~ "::" ~ data.length.to!string ~ " - " ~ image ~ "\n";
+          // writeln(data.sha256Of.toHexString, "::", data.length, " - ", image);
+        }
+        if (doc_matters.opt.action.source_or_pod) {
+          fn_src_in.copy(fn_src_out_filesystem);
+        }
+        if (doc_matters.opt.action.pod) {
+          zip = pod_archive("file_path_bin", fn_src_in, fn_src_out_pod_zip_base, zip);
+        }
+      } else {
+        if (doc_matters.opt.action.debug_do_pod
+        && doc_matters.opt.action.vox_gt1) {
+          writeln("WARNING (io) src out NOT found (image): ", fn_src_in);
+        }
+      }
     }
-    auto fn_src_in = doc_matters.src.image_dir_path ~ "/" ~ image;
+  } { // bundle dr_document_make
+    auto fn_src_in = ((doc_matters.src.is_pod)
+      ? doc_matters.src.conf_dir_path
+      : pth_dr_doc_src.conf_root).to!string
+      ~ "/" ~ "dr_document_make";
     auto fn_src_out_pod_zip_base
-      = pths_pod.image_root(doc_matters.src.filename).zpod.to!string
-      ~ "/" ~ image;
+      = pths_pod.conf_root(doc_matters.src.filename).zpod.to!string ~ "/" ~ "dr_document_make";
     auto fn_src_out_filesystem
-      = pths_pod.image_root(doc_matters.src.filename).filesystem_open_zpod.to!string
-      ~ "/" ~ image;
+      = pths_pod.conf_root(doc_matters.src.filename).filesystem_open_zpod.to!string
+      ~ "/" ~ "dr_document_make";
     if (exists(fn_src_in)) {
-      debug(io) {
-        writeln("(io debug) src out found: ", fn_src_in);
-      }
+      debug(io) { writeln("(io debug) src out found: ", fn_src_in); }
       if (doc_matters.opt.action.source_or_pod) {
         fn_src_in.copy(fn_src_out_filesystem);
       }
       if (doc_matters.opt.action.pod) {
-        zip = pod_archive("file_path_bin", fn_src_in, fn_src_out_pod_zip_base, zip);
+        zip = pod_archive("file_path_text", fn_src_in, fn_src_out_pod_zip_base, zip);
       }
     } else {
       if (doc_matters.opt.action.debug_do_pod
       && doc_matters.opt.action.vox_gt1) {
-        writeln("WARNING (io) src out NOT found (image): ", fn_src_in);
+        writeln("WARNING (io) src out NOT found (document make): ", fn_src_in);
       }
     }
-  }
-} { /+ bundle dr_document_make +/
-  auto fn_src_in = ((doc_matters.src.is_pod)
-    ? doc_matters.src.conf_dir_path
-    : pth_dr_doc_src.conf_root).to!string
-    ~ "/" ~ "dr_document_make";
-  auto fn_src_out_pod_zip_base
-    = pths_pod.conf_root(doc_matters.src.filename).zpod.to!string ~ "/" ~ "dr_document_make";
-  auto fn_src_out_filesystem
-    = pths_pod.conf_root(doc_matters.src.filename).filesystem_open_zpod.to!string
-    ~ "/" ~ "dr_document_make";
-  if (exists(fn_src_in)) {
-    debug(io) {
-      writeln("(io debug) src out found: ", fn_src_in);
-    }
-    if (doc_matters.opt.action.source_or_pod) {
-      fn_src_in.copy(fn_src_out_filesystem);
-    }
-    if (doc_matters.opt.action.pod) {
-      zip = pod_archive("file_path_text", fn_src_in, fn_src_out_pod_zip_base, zip);
-    }
-  } else {
-    if (doc_matters.opt.action.debug_do_pod
-    && doc_matters.opt.action.vox_gt1) {
-      writeln("WARNING (io) src out NOT found (document make): ", fn_src_in);
-    }
-  }
-} { /+ pod manifest +/
-  auto fn_src_in = doc_matters.src.file_with_absolute_path.to!string;
-  auto fn_src_out_pod_zip_base
-    = pths_pod.pod_manifest(doc_matters.src.filename).zpod.to!string;
-  auto fn_src_out_filesystem
-    = pths_pod.pod_manifest(doc_matters.src.filename).filesystem_open_zpod.to!string; // needed without root path
-  auto fn_src_out_inside_pod
-    = pths_pod.pod_manifest(doc_matters.src.filename).zpod.to!string; // needed without root path
-  string[] filelist_src_out_pod_arr;
-  string[] filelist_src_zpod_arr;
-  if (exists(fn_src_in)) {
-    debug(io) {
-      writeln("(io debug) src in found: ", fn_src_in);
-    }
-    filelist_src_out_pod_arr ~= fn_src_out_pod_zip_base;
-    filelist_src_zpod_arr ~= fn_src_out_inside_pod;
-    {
-      import dyaml;
-      auto pod_filelist_yaml_string
-        = File(pths_pod.fn_pod_filelist(doc_matters.src.filename).filesystem_open_zpod, "w");
-      Node _pmy;
-      string _pm = "doc:\n  filename: " ~ doc_matters.src.filename ~ "\n  language: " ~ doc_matters.pod.manifest_list_of_languages.to!string ~ "\n";
-      if (doc_matters.opt.action.debug_do_pod
-      && doc_matters.opt.action.vox_gt1) {
-        try {
-          _pmy = Loader.fromString(_pm).load();
-        } catch (ErrnoException ex) {
-        } catch (Throwable) {
-          writeln("ERROR failed to read config file content, not parsed as yaml");
+  } { // pod manifest
+    auto fn_src_in = doc_matters.src.file_with_absolute_path.to!string;
+    auto fn_src_out_pod_zip_base
+      = pths_pod.pod_manifest(doc_matters.src.filename).zpod.to!string;
+    auto fn_src_out_filesystem
+      = pths_pod.pod_manifest(doc_matters.src.filename).filesystem_open_zpod.to!string; // needed without root path
+    auto fn_src_out_inside_pod
+      = pths_pod.pod_manifest(doc_matters.src.filename).zpod.to!string; // needed without root path
+    string[] filelist_src_out_pod_arr;
+    string[] filelist_src_zpod_arr;
+    if (exists(fn_src_in)) {
+      debug(io) { writeln("(io debug) src in found: ", fn_src_in); }
+      filelist_src_out_pod_arr ~= fn_src_out_pod_zip_base;
+      filelist_src_zpod_arr ~= fn_src_out_inside_pod;
+      {
+        import dyaml;
+        auto pod_filelist_yaml_string
+          = File(pths_pod.fn_pod_filelist(doc_matters.src.filename).filesystem_open_zpod, "w");
+        Node _pmy;
+        string _pm = "doc:\n  filename: " ~ doc_matters.src.filename ~ "\n  language: " ~ doc_matters.pod.manifest_list_of_languages.to!string ~ "\n";
+        if (doc_matters.opt.action.debug_do_pod
+        && doc_matters.opt.action.vox_gt1) {
+          try {
+            _pmy = Loader.fromString(_pm).load();
+          } catch (ErrnoException ex) {
+          } catch (Throwable) {
+            writeln("ERROR failed to read config file content, not parsed as yaml");
+          }
+          writeln("pod filename:  ", _pmy["doc"]["filename"].get!string);
+          writeln("pod languages: ", doc_matters.pod.manifest_list_of_languages.to!string);
+          writeln("pod languages: ", doc_matters.src.language);
+          // foreach(string _l; _pmy["doc"]["language"]) {
+          //   writeln("language:      ", _l);
+          // }
+        }
+        if (doc_matters.opt.action.source_or_pod) {
+          pod_filelist_yaml_string.writeln(_pm);
         }
-        writeln("pod filename:  ", _pmy["doc"]["filename"].get!string);
-        writeln("pod languages: ", doc_matters.pod.manifest_list_of_languages.to!string);
-        writeln("pod languages: ", doc_matters.src.language);
-        // foreach(string _l; _pmy["doc"]["language"]) {
-        //   writeln("language:      ", _l);
-        // }
+        if (doc_matters.opt.action.pod) {
+          zip = pod_archive("string", _pm, fn_src_out_pod_zip_base, zip);
+        }
+      }
+    }
+  } { // bundle primary file (.ssm/.sst) - get digest
+    auto fn_src_in = doc_matters.src.file_with_absolute_path.to!string;
+    auto fn_src_out_pod_zip_base
+      = pths_pod.fn_doc(doc_matters.src.filename, doc_matters.src.language).zpod.to!string;
+    auto fn_src_out_filesystem
+      = pths_pod.fn_doc(doc_matters.src.filename, doc_matters.src.language).filesystem_open_zpod.to!string; // needed without root path:
+    auto fn_src_out_inside_pod
+      = pths_pod.fn_doc(doc_matters.src.filename, doc_matters.src.language).zpod.to!string; // needed without root path:
+    string[] filelist_src_out_pod_arr;
+    string[] filelist_src_zpod_arr;
+    if (exists(fn_src_in)) { // what of language?
+      debug(io) { writeln("(io debug) src in found: ", fn_src_in); }
+      { // take DIGEST write to pod file digests.txt
+        auto data = (cast(byte[]) (fn_src_in).read);
+        _digests["en"]["sst"] ~= data.sha256Of.toHexString ~ "::" ~ data.length.to!string ~ " - " ~ doc_matters.src.filename; // FIX language issue
+        // writeln(data.sha256Of.toHexString, "::", data.length, " - ", doc_matters.src.filename);
       }
+      filelist_src_out_pod_arr ~= fn_src_out_pod_zip_base;
+      filelist_src_zpod_arr ~= fn_src_out_inside_pod;
+      string _pod_to_markup_file = doc_matters.src.pod_name ~ "/" ~ "media/text/" ~ doc_matters.src.language ~ "/" ~ doc_matters.src.filename;
       if (doc_matters.opt.action.source_or_pod) {
-        pod_filelist_yaml_string.writeln(_pm);
+        fn_src_in.copy(fn_src_out_filesystem);
       }
       if (doc_matters.opt.action.pod) {
-        zip = pod_archive("string", _pm, fn_src_out_pod_zip_base, zip);
-      }
-    }
-  }
-} { /+ bundle primary file (.ssm/.sst) +/
-  auto fn_src_in = doc_matters.src.file_with_absolute_path.to!string;
-  auto fn_src_out_pod_zip_base
-    = pths_pod.fn_doc(doc_matters.src.filename, doc_matters.src.language).zpod.to!string;
-  auto fn_src_out_filesystem
-    = pths_pod.fn_doc(doc_matters.src.filename, doc_matters.src.language).filesystem_open_zpod.to!string; // needed without root path:
-  auto fn_src_out_inside_pod
-    = pths_pod.fn_doc(doc_matters.src.filename, doc_matters.src.language).zpod.to!string; // needed without root path:
-  string[] filelist_src_out_pod_arr;
-  string[] filelist_src_zpod_arr;
-  if (exists(fn_src_in)) {
-    debug(io) {
-      writeln("(io debug) src in found: ", fn_src_in);
-    }
-    filelist_src_out_pod_arr ~= fn_src_out_pod_zip_base;
-    filelist_src_zpod_arr ~= fn_src_out_inside_pod;
-    string _pod_to_markup_file = doc_matters.src.pod_name ~ "/" ~ "media/text/" ~ doc_matters.src.language ~ "/" ~ doc_matters.src.filename;
-    if (doc_matters.opt.action.source_or_pod) {
-      fn_src_in.copy(fn_src_out_filesystem);
-    }
-    if (doc_matters.opt.action.pod) {
-      auto _rgx = regex(r"(?P<path_to_pod>\S+?)(?P<podname>[a-z_-]+)/(?P<from_root>media/text/)(?P<language>\S+?)/(?P<filename>\S+?\.ss[mt])");
-      if (auto _x = fn_src_in.match(_rgx)){
-        if (doc_matters.src.lng == doc_matters.pod.manifest_list_of_languages[$-1]) {
-          string _path_to_pod = _x.captures["path_to_pod"];
-          string _podname = _x.captures["podname"];
-          string _root_to_lang = _x.captures["from_root"];
-          string _language = _x.captures["language"];
-          string _filename = _x.captures["filename"];
-          foreach (_lang; doc_matters.pod.manifest_list_of_languages) {
-            string _pth_mkup_src_in = _path_to_pod ~ _podname ~ "/" ~ _root_to_lang ~ _lang ~ "/" ~ _filename;
-            string _pth_mkup_src_out = "pod/" ~ _root_to_lang ~ _lang ~ "/" ~ _filename;
-            zip = pod_archive("file_path_text", _pth_mkup_src_in, _pth_mkup_src_out, zip);
+        auto _rgx = regex(r"(?P<path_to_pod>\S+?)(?P<podname>[a-z_-]+)/(?P<from_root>media/text/)(?P<language>\S+?)/(?P<filename>\S+?\.ss[mt])");
+        if (auto _x = fn_src_in.match(_rgx)){
+          if (doc_matters.src.lng == doc_matters.pod.manifest_list_of_languages[$-1]) {
+            string _path_to_pod = _x.captures["path_to_pod"];
+            string _podname = _x.captures["podname"];
+            string _root_to_lang = _x.captures["from_root"];
+            string _language = _x.captures["language"];
+            string _filename = _x.captures["filename"];
+            foreach (_lang; doc_matters.pod.manifest_list_of_languages) {
+              string _pth_mkup_src_in = _path_to_pod ~ _podname ~ "/" ~ _root_to_lang ~ _lang ~ "/" ~ _filename;
+              string _pth_mkup_src_out = "pod/" ~ _root_to_lang ~ _lang ~ "/" ~ _filename;
+              zip = pod_archive("file_path_text", _pth_mkup_src_in, _pth_mkup_src_out, zip);
+            }
           }
+        } else {
+          zip = pod_archive("file_path_text", fn_src_in, fn_src_out_pod_zip_base, zip);
         }
-      } else {
-        zip = pod_archive("file_path_text", fn_src_in, fn_src_out_pod_zip_base, zip);
       }
-    }
-  } else {
-    if (doc_matters.opt.action.debug_do_pod
-    && doc_matters.opt.action.vox_gt1) {
-      writeln("WARNING (io) src in NOT found (markup source): ", fn_src_in);
-    }
-  }
-} { /+ bundle insert files (.ssi) +/
-  if (doc_matters.srcs.file_insert_list.length > 0) {
-    auto _rgx = regex(r"(?P<path_to_pod>\S+?)(?P<podname>[a-z_-]+)/(?P<from_root>media/text/)(?P<language>\S+?)/(?P<filename>\S+?\.ss[i])");
-    foreach (insert_file; doc_matters.srcs.file_insert_list) {
-      debug(pod) {
-        writeln(
-          insert_file, " -> ",
-          pths_pod.fn_doc_insert(
-            doc_matters.src.filename,
-            insert_file,
-            doc_matters.src.language,
-          ).zpod
-        );
+    } else {
+      if (doc_matters.opt.action.debug_do_pod
+      && doc_matters.opt.action.vox_gt1) {
+        writeln("WARNING (io) src in NOT found (markup source): ", fn_src_in);
       }
-      if (auto _x = insert_file.match(_rgx)){
-        if (doc_matters.src.lng == doc_matters.pod.manifest_list_of_languages[$-1]) {
-          string _path_to_pod = _x.captures["path_to_pod"];
-          string _podname = _x.captures["podname"];
-          string _root_to_lang = _x.captures["from_root"];
-          string _language = _x.captures["language"];
-          string _filename = _x.captures["filename"];
-          foreach (_lang; doc_matters.pod.manifest_list_of_languages) {
-            string _pth_mkup_src_in = _path_to_pod ~ _podname ~ "/" ~ _root_to_lang ~ _lang ~ "/" ~ _filename;
-            string _pth_mkup_src_out = "pod/" ~ _root_to_lang ~ _lang ~ "/" ~ _filename;
-            if (exists(_pth_mkup_src_in)) {
-              if (doc_matters.opt.action.source_or_pod) {
-                auto fn_src_out_filesystem // you need to change language sources
-                  = pths_pod.fn_doc_insert(
-                    doc_matters.src.filename, // doc_matters.src.filename
-                    _pth_mkup_src_in, // insert_file
-                    _lang,
-                  ).filesystem_open_zpod.to!string;
-                _pth_mkup_src_in.copy(fn_src_out_filesystem); // check why here, thought dealt with elsewhere
-              }
-              if (doc_matters.opt.action.pod) {
-                 zip = pod_archive("file_path_text", _pth_mkup_src_in, _pth_mkup_src_out, zip);
+    }
+  } { // bundle insert files (.ssi) - get digest
+    if (doc_matters.srcs.file_insert_list.length > 0) {
+      auto _rgx = regex(r"(?P<path_to_pod>\S+?)(?P<podname>[a-z_-]+)/(?P<from_root>media/text/)(?P<language>\S+?)/(?P<filename>\S+?\.ss[i])");
+      foreach (insert_file; doc_matters.srcs.file_insert_list) {
+        debug(pod) {
+          writeln(
+            insert_file, " -> ",
+            pths_pod.fn_doc_insert(
+              doc_matters.src.filename,
+              insert_file,
+              doc_matters.src.language,
+            ).zpod
+          );
+        }
+        if (auto _x = insert_file.match(_rgx)){
+          if (doc_matters.src.lng == doc_matters.pod.manifest_list_of_languages[$-1]) {
+            string _path_to_pod = _x.captures["path_to_pod"];
+            string _podname = _x.captures["podname"];
+            string _root_to_lang = _x.captures["from_root"];
+            string _language = _x.captures["language"];
+            string _filename = _x.captures["filename"];
+            foreach (_lang; doc_matters.pod.manifest_list_of_languages) {
+              string _pth_mkup_src_in = _path_to_pod ~ _podname ~ "/" ~ _root_to_lang ~ _lang ~ "/" ~ _filename;
+              { // take DIGEST write to pod file digests.txt
+                auto data = (cast(byte[]) (_pth_mkup_src_in).read);
+                _digests[_language]["ssi"] ~= data.sha256Of.toHexString ~ "::" ~ data.length.to!string ~ " - " ~ _filename ~ " - [" ~ _lang ~ "]" ~ "\n";
+                // writeln(data.sha256Of.toHexString, "::", data.length, " - ", _filename, " - [", _lang, "]");
               }
-            } else {
-              if (doc_matters.opt.action.debug_do_pod
-              && doc_matters.opt.action.vox_gt1) {
-                writeln("WARNING (io) src out NOT found (insert file): ", _pth_mkup_src_in);
+              string _pth_mkup_src_out = "pod/" ~ _root_to_lang ~ _lang ~ "/" ~ _filename;
+              if (exists(_pth_mkup_src_in)) {
+                if (doc_matters.opt.action.source_or_pod) {
+                  auto fn_src_out_filesystem // you need to change language sources
+                    = pths_pod.fn_doc_insert(
+                      doc_matters.src.filename, // doc_matters.src.filename
+                      _pth_mkup_src_in, // insert_file
+                      _lang,
+                    ).filesystem_open_zpod.to!string;
+                  _pth_mkup_src_in.copy(fn_src_out_filesystem); // check why here, thought dealt with elsewhere
+                }
+                if (doc_matters.opt.action.pod) {
+                   zip = pod_archive("file_path_text", _pth_mkup_src_in, _pth_mkup_src_out, zip);
+                }
+              } else {
+                if (doc_matters.opt.action.debug_do_pod
+                && doc_matters.opt.action.vox_gt1) {
+                  writeln("WARNING (io) src out NOT found (insert file): ", _pth_mkup_src_in);
+                }
               }
             }
           }
-        }
-      } else {
-        auto fn_src_in = insert_file;
-        auto fn_src_out_pod_zip_base
-          = pths_pod.fn_doc_insert(
-            doc_matters.src.filename,
-            insert_file,
-            doc_matters.src.language,
-          ).zpod.to!string;
-        auto fn_src_out_filesystem
-          = pths_pod.fn_doc_insert(
-            doc_matters.src.filename,
-            insert_file,
-            doc_matters.src.language,
-          ).filesystem_open_zpod.to!string;
-        if (exists(fn_src_in)) {
-          debug(io) {
-            writeln("(io debug) src out found: ", fn_src_in);
-          }
-          if (doc_matters.opt.action.source_or_pod) {
-            fn_src_in.copy(fn_src_out_filesystem);
-          }
-          if (doc_matters.opt.action.pod) {
-            zip = pod_archive("file_path_text", fn_src_in, fn_src_out_pod_zip_base, zip);
-          }
         } else {
-          if (doc_matters.opt.action.debug_do_pod
-          && doc_matters.opt.action.vox_gt1) {
-            writeln("WARNING (io) src out NOT found (insert file): ", fn_src_in);
+          auto fn_src_in = insert_file;
+          { // take DIGEST write to pod file digests.txt // FIX likely bug insert_file includes path, not what you wish to write
+            auto data = (cast(byte[]) (fn_src_in).read);
+            _digests["en"]["ssi"] ~= data.sha256Of.toHexString ~ "::" ~ data.length.to!string ~ " - " ~ insert_file ~ "\n";
+            // writeln(data.sha256Of.toHexString, "::", data.length, " - ", insert_file);
+          }
+          auto fn_src_out_pod_zip_base
+            = pths_pod.fn_doc_insert(
+              doc_matters.src.filename,
+              insert_file,
+              doc_matters.src.language,
+            ).zpod.to!string;
+          auto fn_src_out_filesystem
+            = pths_pod.fn_doc_insert(
+              doc_matters.src.filename,
+              insert_file,
+              doc_matters.src.language,
+            ).filesystem_open_zpod.to!string;
+          if (exists(fn_src_in)) {
+            debug(io) { writeln("(io debug) src out found: ", fn_src_in); }
+            if (doc_matters.opt.action.source_or_pod) {
+              fn_src_in.copy(fn_src_out_filesystem);
+            }
+            if (doc_matters.opt.action.pod) {
+              zip = pod_archive("file_path_text", fn_src_in, fn_src_out_pod_zip_base, zip);
+            }
+          } else {
+            if (doc_matters.opt.action.debug_do_pod
+            && doc_matters.opt.action.vox_gt1) {
+              writeln("WARNING (io) src out NOT found (insert file): ", fn_src_in);
+            }
           }
         }
       }
     }
   }
-} {
+  auto t = tuple(zip, fn_pod, _digests);
+  return t;
+}
+#+END_SRC
+
+** mkdir :mkdir:
+
+#+NAME: source_pod_mkdirs
+#+BEGIN_SRC d
+void pod_archive_directory_tree(M,P)(M doc_matters, P pths_pod) { // create directory structure
+  if (!exists(pths_pod.pod_dir_())) {
+    // used both by pod zipped (& pod filesystem (unzipped) which makes its own recursive dirs)
+    pths_pod.pod_dir_().mkdirRecurse;
+  }
+  if (doc_matters.opt.action.source_or_pod) {
+    if (doc_matters.opt.action.vox_gt0) {
+      writeln(" ", pths_pod.fn_pod_filelist(doc_matters.src.filename).filesystem_open_zpod);
+    }
+    if (!exists(pths_pod.text_root(doc_matters.src.filename).filesystem_open_zpod)) {
+      pths_pod.text_root(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
+    }
+    if (!exists(pths_pod.conf_root(doc_matters.src.filename).filesystem_open_zpod)) {
+      pths_pod.conf_root(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
+    }
+    if (!exists(pths_pod.media_root(doc_matters.src.filename).filesystem_open_zpod)) {
+      pths_pod.media_root(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
+    }
+    if (!exists(pths_pod.css(doc_matters.src.filename).filesystem_open_zpod)) {
+      pths_pod.css(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
+    }
+    if (!exists(pths_pod.image_root(doc_matters.src.filename).filesystem_open_zpod)) {
+      pths_pod.image_root(doc_matters.src.filename).filesystem_open_zpod.mkdirRecurse;
+    }
+    if (!exists(pths_pod.doc_lng(doc_matters.src.filename, doc_matters.src.language).filesystem_open_zpod)) {
+      pths_pod.doc_lng(doc_matters.src.filename, doc_matters.src.language).filesystem_open_zpod.mkdirRecurse;
+    }
+  }
+  if (!exists(pths_pod.pod_dir_() ~ "/index.html")) {
+    import sisudoc.io_out.html_snippet;
+    mixin htmlSnippet;
+    auto f = File(pths_pod.pod_dir_() ~"/index.html", "w");
+    f.writeln(format_html_blank_page_guide_home(
+      "../../css/html_scroll.css",
+      (doc_matters.opt.action.webserver_url_doc_root.length > 0)
+        ? doc_matters.opt.action.webserver_url_doc_root
+        : doc_matters.conf_make_meta.conf.w_srv_data_root_url,
+      "../../index.html",
+    ));
+  }
+}
+#+END_SRC
+
+** pod zip archive
+
+#+NAME: source_pod_archive_zip
+#+BEGIN_SRC d
+@system auto pod_archive(Z)(
+  string _source_type,
+  string _data_in,
+  string _pth_out,
+  Z zip
+) {
+  auto zip_arc_member_file = new ArchiveMember();
+  zip_arc_member_file.name = _pth_out;
+  auto zip_data = new OutBuffer();
+  switch (_source_type) {
+  case "file_path_bin":
+    zip_data.write(cast(char[]) ((_data_in).read));
+    goto default;
+  case "file_path_text":
+    zip_data.write((_data_in).readText);
+    goto default;
+  case "string":
+    zip_data.write(_data_in);
+    goto default;
+  default:
+    zip_arc_member_file.expandedData = zip_data.toBytes();
+    zip.addMember(zip_arc_member_file);
+  }
+  return zip;
+}
+#+END_SRC
+
+** zip archive
+
+#+NAME: zip_archive
+#+BEGIN_SRC d
+void zipArchive(M,F,Z)(M doc_matters, F fn_pod, Z zip) {
   auto fn_src_in = doc_matters.src.filename;
   if (doc_matters.opt.action.pod) {
     if (exists(doc_matters.src.file_with_absolute_path)) {
-      createZipFile!()(fn_pod, zip.build());
-    } else {
-      writeln("WARNING check missing source file(s): ", doc_matters.opt.action.pod);
-    }
-    if (!(exists(fn_pod))) {
-      writeln("WARNING failed to create pod zip archive: ", fn_pod);
-    }
+      try {
+        createZipFile!()(fn_pod, zip.build());
+      } catch (ErrnoException ex) {
+        // Handle errors
+      }
+    } else { writeln("WARNING check missing source file(s): ", doc_matters.opt.action.pod); }
+    if (!(exists(fn_pod))) { writeln("WARNING failed to create pod zip archive: ", fn_pod); }
   }
 }
 #+END_SRC
 
 ** sha256 of pod.zip, zip debug, read zip archive
 
-#+NAME: source_pod_copy_info
+#+NAME: pod_source_files_digests
 #+BEGIN_SRC d
-if (exists(fn_pod)) {
+void zipArchiveDigest(M,F,D)(M doc_matters, F fn_pod, D _digests) {
+  import sisudoc.io_out.paths_output;
+  auto pths_pod = spinePathsPods!()(doc_matters);
   try {
-    if (doc_matters.opt.action.vox_gt0
-    && doc_matters.opt.action.pod) {
-      auto data = (cast(byte[]) (fn_pod).read);
-      if (doc_matters.opt.action.vox_gt1) {
-        writeln(doc_matters.src.filename, " > ", doc_matters.src.filename_base, ".zip");
-      }
-      if (doc_matters.opt.action.pod) {
-        writeln(data.sha256Of.toHexString, "::", data.length, " - ", doc_matters.src.filename_base, ".zip");
-      }
+    if (!exists(pths_pod.pod_dir_())) {
+      // used both by pod zipped (& pod filesystem (unzipped) which makes its own recursive dirs)
+      pths_pod.pod_dir_().mkdirRecurse;
     }
-    if (doc_matters.opt.action.debug_do_pod) {
+  } catch (ErrnoException ex) {
+    // Handle error
+  }
+  try {
+    writeln(pths_pod.pod_dir_(), "/", doc_matters.src.filename_base, ".digests.txt");
+    string _digest_fn = pths_pod.pod_dir_() ~ "/" ~ doc_matters.src.filename_base ~ ".digests.txt";
+    writeln(_digest_fn);
+    auto f = File(_digest_fn, "w");
+    if (exists(fn_pod)) {
       try {
-        auto zipped = new ZipArchive((fn_pod).read);
-        foreach (filename, member; zipped.directory) {
-          auto data = zipped.expand(member);
-          writeln(data.sha256Of.toHexString, "::", data.length, " . ", filename);
+        if (doc_matters.opt.action.vox_gt0
+        && doc_matters.opt.action.pod) {
+          auto data = (cast(byte[]) (fn_pod).read);
+          if (doc_matters.opt.action.vox_gt1) {
+            writeln(doc_matters.src.filename, " > ", doc_matters.src.filename_base, ".zip");
+          }
+          if (doc_matters.opt.action.pod) {
+            auto _zip_digest = (data.sha256Of.toHexString ~ "::" ~ data.length.to!string ~ " - " ~ doc_matters.src.filename_base ~ ".zip");
+            writeln(_zip_digest);
+            f.writeln(_zip_digest);
+          }
         }
-      } catch (ZipException ex) {
+      } catch (ErrnoException ex) {
         // Handle errors
       }
     }
+    foreach (_lang; doc_matters.pod.manifest_list_of_languages) {
+      if (_lang in _digests) {
+        if (("sst" in _digests[_lang]) && (_digests[_lang]["sst"].length > 0)) {
+          writeln(_digests[_lang]["sst"]);
+          f.writeln(_digests[_lang]["sst"]);
+        }
+        if (("ssi" in _digests[_lang]) && (_digests[_lang]["ssi"].length > 0)) {
+          writeln(_digests[_lang]["ssi"]);
+          f.writeln(_digests[_lang]["ssi"]);
+        }
+      }
+    }
+    if ("shared" in _digests) {
+      if (("images" in _digests["shared"]) && (_digests["shared"]["images"].length > 0)) {
+        writeln(_digests["shared"]["images"]);
+        f.writeln(_digests["shared"]["images"]);
+      }
+    }
   } catch (ErrnoException ex) {
-    // Handle errors
+    // Handle error
   }
 }
 #+END_SRC
 
-** source pod zip UNUSED
-
-#+NAME: source_pod_zip
-#+BEGIN_SRC d
-// source pod zip
-#+END_SRC
-
 * document header including copyright & license
 
 #+NAME: doc_header_including_copyright_and_license