d: po4a, initialize either directly with sst or passed through ao

* creates source language directory with source markup files
  (.sst .ssm .ssi) & the po4a.cfg configuration file, then runs
  po4a to place the markup source under po4a translation
  management
* --po4a-sst uses original sisu markup source as described above
* --po4a-ao passes sisu source markup through document abstraction
  before converting back to a sisu markup source markup equivalent
  of the original document, it does this in an attempt to get more
  uniform output, and put footnotes for example if any in a form
  that is easier to translate
  --po4a-ao -v --trans-en:fr,es en/live-manual.ssm
  --po4a-ao -v --trans-en:fr,es en/live-manual.ssm \
    es/live-manual.ssm
  in the latter example also runs sisu marked up "es" document
  through document abstraction and returns a sisu markup source
  version of the document, and against this gettext is (or can be
  run) to (attempt to) have the source and target languages
  together in the po/es file
* all quite rough, will need to be revisited,
* these for now replace the renamed --po4a-shelf (formerly --po4a)

1 files changed, 27 insertions, 4 deletions

diff --git a/lib/sisu/develop/hub_options.rb b/lib/sisu/develop/hub_options.rb
index c3f31a88..6e22c2ae 100644
--- a/lib/sisu/develop/hub_options.rb
+++ b/lib/sisu/develop/hub_options.rb
@@ -614,7 +614,7 @@ module SiSU_Commandline
           if ch =~/N/ then select_arr << '--digests'
             ch=ch.gsub(/[N]/,'')
           end
-          if ch =~/P/ then select_arr << '--po4a-shelf'
+          if ch =~/P/ then select_arr << '--po4a-sst'
             ch=ch.gsub(/[P]/,'')
           end
           if ch =~/d/ then select_arr << '--sqlite'
@@ -1301,11 +1301,32 @@ module SiSU_Commandline
         =~/"--harvest"/) \
         ? { bool: true, set: :on }
         : { bool: false, set: :na }
+        act[:po4a_sstm]=(select_arr.inspect \
+        =~/"--po4a-ss[tm]"/) \
+        ? { bool: true, set: :on }
+        : { bool: false, set: :na }
+        act[:po4a_sst_ao_sst]=(select_arr.inspect \
+        =~/"--po4a-ao(?:-ss[tm])?"/) \
+        ? { bool: true, set: :on }
+        : { bool: false, set: :na }
         act[:po4a_shelf]=(select_arr.inspect \
         =~/"--po4a-shelf"|"--pot?-shelf"/) \
         ? { bool: true, set: :on }
         : { bool: false, set: :na }
-        if act[:po4a_shelf][:set]==:on
+        if act[:po4a_shelf][:set]==:on \
+        or act[:po4a_sst_ao_sst][:set]==:on \
+        or act[:po4a_sstm][:set]==:on
+          act[:po4a_lang]=if select_arr.inspect \
+          =~/"--(?:trans|init)-([a-z]{2}):((?:(?:[a-z]{2}\b),?)+)/
+            lng_src,lng_trn=$1,$2.split(',')
+            { bool: true, set: :on, src: lng_src, trn: lng_trn }
+          elsif select_arr.inspect \
+          =~/"--trans"/
+            { bool: true, set: :on }
+            { bool: true, set: :on, src: 'en', trn: [] }
+          else
+            { bool: false, set: :na }
+          end
           act[:po4a_lang_trans]=if select_arr.inspect \
           =~/"--trans-([a-z]{2}):((?:(?:[a-z]{2}\b),?)+)/
             lng_src,lng_trn=$1,$2.split(',')
@@ -1450,8 +1471,9 @@ module SiSU_Commandline
         || act[:pdf_p][:set]==:on \
         || act[:pdf_l][:set]==:on \
         || act[:qrcode][:set]==:on \
-        || act[:share_source][:set]==:on \
         || act[:sisupod][:set]==:on \
+        || act[:share_source][:set]==:on \
+        || act[:po4a_sstm][:set]==:on \
         || act[:concordance][:set]==:on \
         || act[:sqlite_discrete][:set]==:on \
         || act[:sqlite_import][:set]==:on \
@@ -1499,8 +1521,9 @@ module SiSU_Commandline
         || act[:pdf_p][:set]==:on \
         || act[:pdf_l][:set]==:on \
         || act[:qrcode][:set]==:on \
-        || act[:share_source][:set]==:on \
         || act[:sisupod][:set]==:on \
+        || act[:share_source][:set]==:on \
+        || act[:po4a_sstm][:set]==:on \
         || act[:concordance][:set]==:on \
         || act[:xml_dom][:set]==:on \
         || act[:xml_sax][:set]==:on \