sisu 7.0.0

data/lib/sisu/se_filemap.rb

@@ -0,0 +1,247 @@
+# encoding: utf-8
+=begin
+
+* Name: SiSU
+
+** Description: documents, structuring, processing, publishing, search
+*** system environment, resource control and configuration details
+
+** Author: Ralph Amissah
+  <ralph@amissah.com>
+  <ralph.amissah@gmail.com>
+
+** Copyright: (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
+  2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014, 2015 Ralph Amissah,
+  All Rights Reserved.
+
+** License: GPL 3 or later:
+
+  SiSU, a framework for document structuring, publishing and search
+
+  Copyright (C) Ralph Amissah
+
+  This program is free software: you can redistribute it and/or modify it
+  under the terms of the GNU General Public License as published by the Free
+  Software Foundation, either version 3 of the License, or (at your option)
+  any later version.
+
+  This program is distributed in the hope that it will be useful, but WITHOUT
+  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+  FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
+  more details.
+
+  You should have received a copy of the GNU General Public License along with
+  this program. If not, see <http://www.gnu.org/licenses/>.
+
+  If you have Internet connection, the latest version of the GPL should be
+  available at these locations:
+  <http://www.fsf.org/licensing/licenses/gpl.html>
+  <http://www.gnu.org/licenses/gpl.html>
+
+  <http://www.sisudoc.org/sisu/en/manifest/gpl.fsf.html>
+
+** SiSU uses:
+  * Standard SiSU markup syntax,
+  * Standard SiSU meta-markup syntax, and the
+  * Standard SiSU object citation numbering and system
+
+** Hompages:
+  <http://www.jus.uio.no/sisu>
+  <http://www.sisudoc.org>
+
+** Git
+  <http://git.sisudoc.org/gitweb/?p=code/sisu.git;a=summary>
+  <http://git.sisudoc.org/gitweb/?p=code/sisu.git;a=blob;f=lib/sisu/se_filemap.rb;hb=HEAD>
+
+=end
+module SiSU_File_Map
+  require_relative 'constants'                             # constants.rb
+  require_relative 'utils'                                 # utils.rb
+  require_relative 'se_info_env'                           # se_info_env.rb
+  class FileMap < SiSU_Info_Env::InfoEnv                   # se_info_env.rb
+    attr_accessor :local_sisu_source
+    def initialize(opt='') #watch / REVIEW
+      super()
+      @opt=opt #,opt.fns,opt.selections.str
+      @env=(@opt.fns && !(@opt.fns.empty?) \
+      ? (SiSU_Env::InfoEnv.new(@opt.fns))
+      : (SiSU_Env::InfoEnv.new('dummy.sst')))
+      ft=[]
+      if @opt.act[:ao][:set]==:on
+        @md=SiSU_Param::Parameters.new(@opt).get
+        if @md \
+        and defined? @md.fn \
+        and @md.fn        # used for by_language_code?
+          if @md.opt.act[:html][:set]==:on                 #% --html, -h -H
+            ft << @md.fn[:html]
+          end
+          if @md.opt.act[:concordance][:set]==:on          #% --concordance, -w
+            ft << @md.fn[:concordance]
+          end
+          if @md.opt.act[:manifest][:set]==:on             #% --manifest, -y
+            ft << @md.fn[:manifest]
+          end
+          if @md.opt.act[:txt][:set]==:on                  #% --txt, -t -a
+            ft << @md.fn[:plain]
+          end
+          if @md.opt.act[:txt_textile][:set]==:on          #% --textile
+            ft << @md.fn[:txt_textile]
+          end
+          if @md.opt.act[:txt_asciidoc][:set]==:on         #% --asciidoc
+            ft << @md.fn[:txt_asciidoc]
+          end
+          if @md.opt.act[:txt_markdown][:set]==:on         #% --markdown
+            ft << @md.fn[:txt_markdown]
+          end
+          if @md.opt.act[:txt_rst][:set]==:on              #% --rst, --rest
+            ft << @md.fn[:txt_rst]
+          end
+          if @md.opt.act[:txt_orgmode][:set]==:on          #% --orgmode
+            ft << @md.fn[:txt_orgmode]
+          end
+          if @md.opt.act[:xhtml][:set]==:on                #% --xhtml, -b xhtml
+            ft << @md.fn[:xhtml]
+          end
+          if @md.opt.act[:epub][:set]==:on                 #% --epub, -e
+            ft << @md.fn[:epub]
+          end
+          if @md.opt.act[:manpage][:set]==:on              #% --manpage, -i
+            ft << @md.fn[:manpage]
+          end
+          if @md.opt.act[:hash_digests][:set]==:on         #% --hash-digests, -N digest tree
+            ft << @md.fn[:digest]
+          end
+          if @md.opt.act[:odt][:set]==:on                  #% --odt, -o opendocument
+            ft << @md.fn[:odf]
+          end
+          if @md.opt.act[:pdf][:set]==:on                  #% --pdf-l --pdf, -p latex/ texpdf
+            ft << @md.fn[:pdf_l] << @md.fn[:pdf_p]
+          end
+          if @md.opt.act[:share_source][:set]==:on
+            ft << @md.fns
+          end
+          if @md.opt.act[:sisupod][:set]==:on              #% --sisupod, -S make sisupod
+            ft << @md.fn[:sisupod]
+          end
+          if @md.opt.act[:xml_sax][:set]==:on              #% --xml-sax, -x xml sax type
+            ft << @md.fn[:sax]
+          end
+          if @md.opt.act[:xml_dom][:set]==:on              #% --xml-dom, -X xml dom type
+            ft << @md.fn[:dom]
+          end
+          if @md.opt.act[:xml_docbook_book][:set]==:on     #% --xml-docbook-book
+            ft << @md.fn[:xml_docbook_book]
+          end
+          if @md.opt.act[:xml_fictionbook][:set]==:on      #% --xml-fictionbook
+            ft << @md.fn[:xml_fictionbook]
+          end
+          if @md.opt.act[:xml_scaffold_structure_sisu][:set]==:on          #% --xml-scaffold --xml-scaffold-sisu
+            ft << @md.fn[:xml_scaffold_structure_sisu]
+          end
+          if @md.opt.act[:xml_scaffold_structure_collapse][:set]==:on      #% --xml-scaffold-collapse
+            ft << @md.fn[:xml_scaffold_structure_collapse]
+          end
+          @fnb=@md.fnb
+        else   # still needed where/when dp document param is not parsed
+          if @opt.act[:html][:set]==:on                    #% --html, -h -H
+            ft << '.html' << '.html.??'
+          end
+          if @opt.act[:concordance][:set]==:on             #% --concordance, -w
+            ft << 'concordance.html' << '??.concordance.html' << 'concordance.??.html'
+          end
+          if @opt.act[:manifest][:set]==:on                #% --manifest, -y
+            ft << 'sisu_manifest.html' << '??.sisu_manifest.html' << 'sisu_manifest.??.html'
+          end
+          if @opt.act[:txt][:set]==:on                     #% --txt, -t -a
+            ft << 'plain.txt' << '??.plain.txt' << 'plain.??.txt'
+          end
+          if @opt.act[:txt_textile][:set]==:on             #% --textile
+            ft << 'plain.txt' << '??.plain.txt' << 'plain.??.txt'
+          end
+          if @opt.act[:txt_asciidoc][:set]==:on            #% --asciidoc
+            ft << 'plain.txt' << '??.plain.txt' << 'plain.??.txt'
+          end
+          if @opt.act[:txt_markdown][:set]==:on            #% --markdown
+            ft << 'plain.txt' << '??.plain.txt' << 'plain.??.txt'
+          end
+          if @opt.act[:txt_rst][:set]==:on                 #% --rst, --rest
+            ft << 'plain.txt' << '??.plain.txt' << 'plain.??.txt'
+          end
+          if @opt.act[:txt_orgmode][:set]==:on             #% --orgmode
+            ft << 'plain.txt' << '??.plain.txt' << 'plain.??.txt'
+          end
+          if @opt.act[:xhtml][:set]==:on                   #% --xhtml, -b xhtml
+            ft << 'scroll.xhtml' << '??.scroll.xhtml' << 'scroll.??.xhtml'
+          end
+          if @opt.act[:epub][:set]==:on                    #% --epub, -e
+            ft  << @fnb << '.epub'
+          end
+          if @opt.act[:manpage][:set]==:on                 #% --manpage, -i
+            ft << '.1' << '??.man.1' << 'man.??.1'
+          end
+          if @opt.act[:hash_digests][:set]==:on            #% --hash-digests, -N digest tree
+            ft << 'digest.txt' << '??.digest.txt' << 'digest.??.txt'
+          end
+          if @opt.act[:odt][:set]==:on                     #% --odt, -o opendocument
+            ft << 'opendocument.odt' << '??.opendocument.odt' << 'opendocument.??.odt'
+          end
+          if @opt.act[:pdf][:set]==:on                     #% --pdf-l --pdf, -p latex/ texpdf
+            ft << 'landscape.pdf' << 'portrait.pdf' << '.pdf'
+          end
+          if @opt.act[:share_source][:set]==:on
+            ft << '.sst' << '.ssi' << '.ssm'
+          end
+          if @opt.act[:sisupod][:set]==:on                 #% --sisupod, -S make sisupod
+            ft << '.zip'
+          end
+          if @opt.act[:xml_sax][:set]==:on                 #% --xml-sax, -x xml sax type
+            ft << 'sax.xml' << '??.sax.xml' << 'sax.??.xml'
+          end
+          if @opt.act[:xml_dom][:set]==:on                 #% --xml-dom, -X xml dom type
+            ft << 'dom.xml' << '??.dom.xml' << 'dom.??.xml'
+          end
+          if @opt.act[:xml_docbook_book][:set]==:on        #% --xml-docbook-book
+            ft << 'docbook.xml' << '??.docbook.xml' << 'docbook.??.xml'
+          end
+          if @opt.act[:xml_fictionbook][:set]==:on         #% --xml-fictionbook
+            ft << 'fictionbook.xml' << '??.fictionbook.xml' << 'fictionbook.??.xml'
+          end
+          if @opt.act[:xml_scaffold_structure_sisu][:set]==:on          #% --xml-scaffold --xml-scaffold-sisu
+            ft << 'scaffold.xml' << '??.scaffold.xml' << 'scaffold.??.xml'
+          end
+          if @opt.act[:xml_scaffold_structure_collapse][:set]==:on      #% --xml-scaffold-collapse
+            ft << 'scaffold.xml' << '??.scaffold.xml' << 'scaffold.??.xml'
+          end
+        end
+        ft=ft.uniq
+        filetypes=ft.join(',')
+        @filetypes=if filetypes !~/..+/ then ''   # -r called alone, copy all
+        elsif @opt.selections.str =~/u/            then ''   # -u added, copy all, (used to create remote directory tree see output path), not the usual function of -u
+        elsif filetypes =~/\S+?,\S+/    then '*{' + filetypes + '}' # more than one relevant file type
+        else                                 '*' + filetypes # one relevant file type
+        end
+        @source_path=(@fnb && !(@fnb.empty?) \
+        ? "#{@env.path.output}/#{@fnb}"
+        : @env.path.output)
+        @source_path_epub=(@fnb && !(@fnb.empty?) \
+        ? "#{@env.path.output}/epub"
+        : @env.path.output_epub)
+        @source_path_src=(@fnb && !(@fnb.empty?) \
+        ? "#{@env.path.output}/src"
+        : @env.path.output_src)
+        @source_path_pod=(@fnb && !(@fnb.empty?) \
+        ? "#{@env.path.output}/pod"
+        : @env.path.output_pod)
+        @source_path_harvest=(@fnb && !(@fnb.empty?) \
+        ? "#{@env.path.output}/manifest"
+        : @env.path.output_harvest)
+        @local_sisu_source=(@filetypes =~/\S/) \
+        ? "#{@source_path}/#{@filetypes}"
+        : @source_path
+      end
+      if @opt.act[:rsync][:set]==:on
+      end
+    end
+  end
+end
+__END__

data/lib/sisu/se_get_init.rb

@@ -0,0 +1,238 @@
+# encoding: utf-8
+=begin
+
+* Name: SiSU
+
+** Description: documents, structuring, processing, publishing, search
+*** system environment, resource control and configuration details
+
+** Author: Ralph Amissah
+  <ralph@amissah.com>
+  <ralph.amissah@gmail.com>
+
+** Copyright: (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
+  2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014, 2015 Ralph Amissah,
+  All Rights Reserved.
+
+** License: GPL 3 or later:
+
+  SiSU, a framework for document structuring, publishing and search
+
+  Copyright (C) Ralph Amissah
+
+  This program is free software: you can redistribute it and/or modify it
+  under the terms of the GNU General Public License as published by the Free
+  Software Foundation, either version 3 of the License, or (at your option)
+  any later version.
+
+  This program is distributed in the hope that it will be useful, but WITHOUT
+  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+  FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
+  more details.
+
+  You should have received a copy of the GNU General Public License along with
+  this program. If not, see <http://www.gnu.org/licenses/>.
+
+  If you have Internet connection, the latest version of the GPL should be
+  available at these locations:
+  <http://www.fsf.org/licensing/licenses/gpl.html>
+  <http://www.gnu.org/licenses/gpl.html>
+
+  <http://www.sisudoc.org/sisu/en/manifest/gpl.fsf.html>
+
+** SiSU uses:
+  * Standard SiSU markup syntax,
+  * Standard SiSU meta-markup syntax, and the
+  * Standard SiSU object citation numbering and system
+
+** Hompages:
+  <http://www.jus.uio.no/sisu>
+  <http://www.sisudoc.org>
+
+** Git
+  <http://git.sisudoc.org/gitweb/?p=code/sisu.git;a=summary>
+  <http://git.sisudoc.org/gitweb/?p=code/sisu.git;a=blob;f=lib/sisu/se_get_init.rb;hb=HEAD>
+
+=end
+module SiSU_Get_Init
+  require_relative 'constants'                             # constants.rb
+  require_relative 'utils'                                 # utils.rb
+  require_relative 'se_info_system'                        # se_info_system.rb
+  @@noyaml=false
+  class GetInit < SiSU_Info_Sys_Gen::InfoSystemGen         # se_info_system.rb
+    @@noyaml=false
+    @@rc,@@sisu_doc_makefile,@@sisurc_path,@@tx=nil,nil,nil,nil
+    @@ad={ promo: nil, promo_list: nil, flag_promo: false }
+    @@sdmd=nil
+    attr_accessor :yaml
+    def initialize
+      super()
+        @markup_dir_changed_=if @@sdmd==$sisu_document_markup_directory
+          false
+        else
+          @@sdmd=$sisu_document_markup_directory
+          true
+        end
+    end
+    def tex
+      require_relative 'texpdf_parts'                        # texpdf_parts.rb
+      @@tx ||=SiSU_Parts_TeXpdf::TeX.new
+    end
+    def rc_path_options
+      v=SiSU_Env::InfoVersion.instance.get_version
+      [
+        $sisu_document_markup_directory_base_fixed_path \
+        + '/.sisu/v' \
+        + v.version_major,
+        $sisu_document_markup_directory_base_fixed_path \
+        + '/.sisu',
+        $sisu_document_markup_directory_base_fixed_path \
+        + '/_sisu/v' \
+        + v.version_major,
+        $sisu_document_markup_directory_base_fixed_path \
+        + '/_sisu',
+        @@home \
+        + '/.sisu/v' \
+        + v.version_major,
+        @@home \
+        + '/.sisu', \
+        @@sisu_etc \
+        + '/v' \
+        + v.version_major,
+        @@sisu_etc,
+      ]
+    end
+    def sisu_document_make
+      def makefile_name
+        S_CONF[:header_make]
+      end
+      def makefile
+        rc_path_options.each do |v|
+          if FileTest.exist?("#{v}/#{makefile_name}")
+            @sisu_make_path=v
+            break
+          end
+        end
+        @sisu_make_file_path=@sisu_make_path \
+        ? "#{@sisu_make_path}/#{makefile_name}"
+        : nil
+      end
+      def makefile_read
+        if makefile
+          sisu_doc_makefile=IO.read(makefile, mode: 'r:utf-8')
+          @sisu_doc_makefile=sisu_doc_makefile.split(/\s*\n\s*\n/m)
+        end
+        @sisu_doc_makefile
+      end
+      self
+    end
+    def sisu_yaml
+      def rc
+        if @markup_dir_changed_
+          rc_path_options.each do |v|
+            if @@noyaml \
+            or FileTest.exist?("#{v}/noyaml")
+              STDERR.puts "WARNING - YAML loading switched off, to enable delete the file:\n\t#{v}/noyaml\n\n" unless @@noyaml
+              @@noyaml=true
+              break
+            else
+              f=S_CONF[:rc_yml]
+              p_f="#{v}/#{f}"
+              if FileTest.exist?(p_f)
+                begin
+                  require 'yaml'
+                rescue LoadError
+                  SiSU_Utils::CodeMarker.new(__LINE__,__FILE__,:fuchsia).
+                    error('yaml NOT FOUND (LoadError)')
+                end
+                @@sisurc_path=v
+                @@rc=YAML::load(File::open(p_f))
+                break
+              end
+              unless @@rc
+                f='sisurc.yaml'
+                p_f="#{v}/#{f}"
+                if FileTest.exist?(p_f)
+                  begin
+                    require 'yaml'
+                  rescue LoadError
+                    SiSU_Utils::CodeMarker.new(__LINE__,__FILE__,:fuchsia).
+                      error('yaml NOT FOUND (LoadError)')
+                  end
+                  @@sisurc_path=v
+                  @@rc=YAML::load(File::open(p_f))
+                  break
+                end
+              end
+            end
+          end
+        end
+        @@rc
+      end
+      def rc_path
+        rc
+        @@sisurc_path
+      end
+      self
+    end
+    def ads #WORK AREA
+      tell_no_yaml='WARNING - YAML loading switched off, to enable delete the file:'
+      if @markup_dir_changed_
+        @ad_path=[
+          "#{$sisu_document_markup_directory_base_fixed_path}/.sisu/skin/yml",
+          "#{$sisu_document_markup_directory_base_fixed_path}/_sisu/skin/yml",
+          "#{@@home}/.sisu/skin/yml",
+          "#{@@sisu_etc}/skin/yml",
+        ]
+        @ad_path.each do |v|
+          if @@noyaml \
+          or FileTest.exist?("#{v}/noyaml")
+            puts tell_no_yaml + "\n\t#{v}/noyaml\n" unless @@noyaml
+            @@noyaml=true
+            break
+          else
+            if FileTest.exist?("#{v}/list.yml")
+              unless @@ad[:promo_list]
+                begin
+                  require 'yaml'
+                rescue LoadError
+                  SiSU_Utils::CodeMarker.new(__LINE__,__FILE__,:fuchsia).
+                    error('yaml NOT FOUND (LoadError)')
+                end
+                @@ad[:promo_list] ||= YAML::load(File::open("#{v}/list.yml"))
+              end
+              @@ad[:flag_promo]=true
+              break
+            end
+            @@ad[:flag_promo]=false
+          end
+        end
+        @ad_path.each do |v|
+          if @@noyaml \
+          or FileTest.exist?("#{v}/noyaml")
+            puts tell_no_yaml + "\n\t#{v}/noyaml\n" unless @@noyaml
+            @@noyaml=true
+            break
+          else
+            if FileTest.exist?("#{v}/promo.yml")
+              unless @@ad[:promo]
+                begin
+                  require 'yaml'
+                rescue LoadError
+                  SiSU_Utils::CodeMarker.new(__LINE__,__FILE__,:fuchsia).
+                    error('yaml NOT FOUND (LoadError)')
+                end
+                @@ad[:promo] ||= YAML::load(File::open("#{v}/promo.yml"))
+              end
+              @@ad[:flag_promo]=true
+              break
+            end
+            @@ad[:flag_promo]=false
+          end
+        end
+      end
+      @@ad
+    end
+  end
+end
+__END__