processing info

2 files changed, 36 insertions, 12 deletions

diff --git a/org/doc_reform.org b/org/doc_reform.org
index a38fd26..7d8fee3 100644
--- a/org/doc_reform.org
+++ b/org/doc_reform.org
@@ -78,6 +78,7 @@ import std.algorithm;
 import std.parallelism;
 <<mixin_doc_reform_version>>
 <<mixin_pre_main>>
+string project_name = "DocReform";
 string program_name = "doc-reform";
 /++
 name        "doc_reform"
@@ -752,6 +753,9 @@ auto _opt_action = OptActions();
 #+BEGIN_SRC d
 auto program_info() {
   struct ProgramInfo {
+    string project() {
+      return project_name;
+    }
     string name() {
       return program_name;
     }
@@ -762,6 +766,14 @@ auto program_info() {
       );
       return ver_;
     }
+    string compiler() {
+      string ver_ = format(
+        "%s D:%s, %s %s",
+        __VENDOR__, __VERSION__,
+        bits, os,
+      );
+      return ver_;
+    }
   }
   return ProgramInfo();
 }
@@ -1203,25 +1215,34 @@ struct DocumentMatters {
 #+BEGIN_SRC d
   auto generator_program() {
     struct Prog_ {
-      auto name() {
+      string project_name() {
+        return program_info.project;
+      }
+      string name() {
         return program_info.name;
       }
-      auto ver() {
+      string ver() {
         return program_info.ver;
       }
-      auto name_and_version() {
+      string name_and_version() {
         return format(
           "%s-%s",
-          program_info.name,
-          program_info.ver,
+          name,
+          ver,
         );
       }
-      auto url_home() {
+      string url_home() {
         return "http://sisudoc.org";
       }
-      auto url_git() {
+      string url_git() {
         return "https://git.sisudoc.org/software/sisu";
       }
+      auto compiler() {
+        return program_info.compiler;
+      }
+      auto stime() {
+        return Clock.currTime(UTC()).toSimpleString();
+      }
     }
     return Prog_();
   }
diff --git a/org/output_latex.org b/org/output_latex.org
index eb50c46..2224bf8 100644
--- a/org/output_latex.org
+++ b/org/output_latex.org
@@ -970,7 +970,6 @@ string latex_head(M)(
 #+name: output_latex_head
 #+BEGIN_SRC d
   string _footer(M)(M doc_matters) {
-    writeln("footer: ", doc_matters.conf_make_meta.make.footer);
     string _ft = "\\lfoot[\\textrm{\\thepage}]";
     string _ft_1 = format(q"┃{\tiny \href{%s}{%s}}┃", "http://sisudoc.org", "SiSU",);
     string _ft_2 = format(q"┃
@@ -1233,10 +1232,10 @@ string latex_head(M)(
 #+name: output_latex_head_0_tex
 #+BEGIN_SRC latex
 %%%% Generated by: %s
-%%%% D version: ruby 2.5.3p105 (2018-10-18 revision 65156) [x86_64-linux-gnu]
-%%%% LaTeX output
-%%%% Last Generated on:
-%%%% SiSU http://www.jus.uio.no/sisu
+%%%% D version: %s
+%%%% LaTeX output last Generated on: %s
+%%%% %s %s
+
 #+END_SRC
 
 ***** paper type (a4, letter, ...; ( portrait | landscape ))
@@ -1528,6 +1527,10 @@ string latex_head(M)(
 #+BEGIN_SRC d
 ┃",
   doc_matters.opt.action.debug_do ? "" : doc_matters.generator_program.name_and_version.strip,
+  doc_matters.opt.action.debug_do ? "" : doc_matters.generator_program.compiler.strip,
+  doc_matters.opt.action.debug_do ? "" : doc_matters.generator_program.stime.strip,
+  doc_matters.generator_program.project_name.strip,
+  doc_matters.generator_program.url_home.strip,
   paper.a4_portrait.strip,
   margins.portrait.strip,
   multicol.portrait.strip,