v4: param, common independent document @make: header file

* ./_sisu/v4/sisu_document_make
* contains @make: header
* can contain @links: header
  * @links:+ append links
  * @links: default, overwritten if document contains links

1 files changed, 90 insertions, 432 deletions

diff --git a/lib/sisu/v4/param.rb b/lib/sisu/v4/param.rb
index f9607df2..925723f8 100644
--- a/lib/sisu/v4/param.rb
+++ b/lib/sisu/v4/param.rb
@@ -60,6 +60,7 @@ module SiSU_Param
   require 'pstore'
   require_relative 'sysenv'                             # sysenv.rb
     include SiSU_Env
+  require_relative 'param_make'                         # param_make.rb
   require_relative 'param_identify_markup'              # param_identify_markup.rb
   require_relative 'help'                               # help.rb
     include SiSU_Help
@@ -159,6 +160,8 @@ module SiSU_Param
         self
       end
     end
+    class MdMake < SiSU_Param_Make::MdMake
+    end
     class Md
       def initialize(str,opt,env)
         @s,@opt,@env=str,opt,env
@@ -736,349 +739,6 @@ module SiSU_Param
       #  end
       #  self
       #end
-      def make
-        a=@s.split(/\n%\s.+?$|[ ]*\n[ ]*/m)
-        @h=build_hash(a)
-        def headings
-          lv=[]
-          x=@h['headings']
-          x=((x =~/;/) ? (x.split(/;\s*/)) : [ x ])
-          lv[0]=x
-          lv1=x[0] ||='1~ '                                                                                     #some arbitrary changes made
-          lv[1]=/^#{lv1}/
-          lv2=x[1] ||='2~ '
-          lv[2]=/^#{lv2}/
-          lv3=x[2] ||='3~ '
-          lv[3]=/^#{lv3}/
-          lv4=x[3] ||='4~ '
-          lv[4]=/^#{lv4}/
-          lv5=x[4] ||='5~ '
-          lv[5]=/^#{lv5}/
-          lv6=x[5] ||='6~ '
-          lv[6]=/^#{lv6}/
-          lv
-        end
-        def num_top
-          @h['num_top']
-        end
-        def breaks
-          pagebreaks=((@h['breaks'] =~/;/) \
-          ? (@h['breaks'].split(/;\s*/))
-          : [ @h['breaks'] ])
-          page_new,page_break=nil,nil
-          pagebreaks.each do |x|
-            page_new=x[/(:?[\dA-C],?)+/] if x=~/new|clear/
-            page_break=x[/(:?[\dA-C],?)+/] if x =~/break/
-          end
-          { page_new: page_new, page_break: page_break }
-        end
-        def language
-          l=if @h['language'] && (@h['language']=~/\S{2,}/)
-            ((@h['language'] =~/,/) \
-            ? (@h['language'].split(/,\s*/))
-            : [ @h['language'] ])
-          else [ 'en' ]
-          end
-        end
-        def bold
-          m=@h['bold']
-          i=(m=~/\/i$/)? 'i' : ''
-          z=if m
-            x=m.gsub(/^\/(.+?)\/i?/,'\1').
-              gsub(/\((?:\?:)?/,'(?:')                                         # avoid need to escape use of brackets within regex provided
-            rgx='\b(' + x + ')\b'
-            y=((i =~/i/) ? (/#{rgx}/i) : (/#{rgx}/))
-            { str: '\b(?:' + x + ')\b', regx: y, i: i }
-          else nil
-          end
-        end
-        def italics
-          m=@h['italics']
-          i=((m=~/\/i$/) ? 'i' : '')
-          z=if m
-            x=m.gsub(/^\/(.+?)\/i?/,'\1').
-              gsub(/\((?:\?:)?/,'(?:')                                         # avoid need to escape use of brackets within regex provided
-            rgx='\b(' + x + ')\b'
-            y=((i =~/i/) ? (/#{rgx}/i) : (/#{rgx}/))
-            { str: '\b(?:' + x + ')\b', regx: y, i: i }
-          else nil
-          end
-        end
-        def emphasis
-          if @h['emphasis'] =~/bold/                   then 'bold'
-          elsif @h['emphasis'] =~/italics?/            then 'italics'
-          elsif @h['emphasis'] =~/under(?:line|score)/ then 'underscore'
-          else nil
-          end
-        end
-        def substitute
-          m=@h['substitute']
-          z=if m
-            w=m.scan(/\/(.+?)\/(i?,)\s*'(.+?)'(?:\s+|\s*;\s*|$)/)
-            arr_hash=[]
-            matches=''
-            w.each do |x|
-              c=(x[1] =~/[i],/) ? :i : :s
-              matches=matches + x[0].gsub(/([${}])/,'\\\\\1') + '|'
-              arr_hash << {
-                match: x[0].gsub(/([${}])/,'\\\\\1'),
-                replace: x[2],
-                case_s: c
-              }
-            end
-            matches.chop!
-            { match_and_replace: arr_hash, matches: matches }
-          else nil
-          end
-        end
-        def plaintext_wrap
-          if @h['plaintext_wrap'].to_s =~/\d\d+/ \
-          and @h['plaintext_wrap'].to_i > 19 \
-          and @h['plaintext_wrap'].to_i < 201
-            @h['plaintext_wrap'].to_i
-          else nil
-          end
-        end
-        def omit
-          m=@h['omit']
-          @m=m ? (m.split(/,\s+/)) : nil
-          def list
-            @m
-          end
-          self
-        end
-        def ocn?
-          (omit.list.inspect =~/"ocn"/) \
-          ? :off
-          : :na
-        end
-        def toc?
-          (omit.list.inspect =~/"toc"/) \
-          ? :off
-          : :na
-        end
-        def manifest?
-          (omit.list.inspect =~/"manifest"/) \
-          ? :off
-          : :na
-        end
-        def links_to_manifest?
-          (omit.list.inspect =~/"manifest_links"|"links_to_manifest"/) \
-          ? :off
-          : :na
-        end
-        def metadata?
-          (omit.list.inspect =~/"metadata"/) \
-          ? :off
-          : :na
-        end
-        def minitoc?
-          (omit.list.inspect =~/"minitoc"/) \
-          ? :off
-          : :na
-        end
-        def html_minitoc?
-          (omit.list.inspect =~/"html_minitoc"/) \
-          ? :off
-          : :na
-        end
-        def html_top_band?
-          (omit.list.inspect =~/"html_top_band"/) \
-          ? :off
-          : :na
-        end
-        def html_navigation?
-          (omit.list.inspect =~/"html_navigation"/) \
-          ? :off
-          : :na
-        end
-        def html_navigation_bar?
-          (omit.list.inspect =~/"html_navigation_bar"/) \
-          ? :off
-          : :na
-        end
-        def segsubtoc?
-          (omit.list.inspect =~/"segsubtoc"/) \
-          ? :off
-          : :na
-        end
-        def search_form?
-          (omit.list.inspect =~/"search_form"/) \
-          ? :off
-          : :na
-        end
-        def html_search_form?
-          (omit.list.inspect =~/"html_search_form"/) \
-          ? :off
-          : :na
-        end
-        def html_right_pane?
-          (omit.list.inspect =~/"html_right_column"|"html_right_pane"/) \
-          ? :off
-          : :na
-        end
-        def manifest_minitoc?
-          (omit.list.inspect =~/"manifest_minitoc"/) \
-          ? :off
-          : :na
-        end
-        def cover_image?
-          (omit.list.inspect =~/"cover_image"/) \
-          ? :off
-          : :na
-        end
-        def home_button_image?
-          (omit.list.inspect =~/"home_button_image"/) \
-          ? :off
-          : :na
-        end
-        def texpdf_font
-          def main
-            @h['texpdf_font'] \
-            && (@h['texpdf_font']=~/\S{3,}/) \
-            ? @h['texpdf_font']
-            : @env.font.texpdf.main
-          end
-          def sans                                                             # not used
-            @h['texpdf_font_sans'] \
-            && (@h['texpdf_font_sans']=~/\S{3,}/) \
-            ? @h['texpdf_font_sans']
-            : @env.font.texpdf.sans
-          end
-          def serif                                                            # not used
-            @h['texpdf_font_serif'] \
-            && (@h['texpdf_font_serif']=~/\S{3,}/) \
-            ? @h['texpdf_font_serif']
-            : @env.font.texpdf.serif
-          end
-          def mono
-            @h['texpdf_font_mono'] \
-            && (@h['texpdf_font_mono']=~/\S{3,}/) \
-            ? @h['texpdf_font_mono']
-            : @env.font.texpdf.mono
-          end
-          self
-        end
-        def promo
-          @h['promo']
-        end
-        def ad
-          @h['ad']
-        end
-        def manpage
-          manpage={}
-          if @h['manpage']
-            if @h['manpage'] =~/;/m
-              man=@h['manpage'].split(/;/m)
-              man.each do |x|
-                m=(x=~/=/m) ? x.split(/=/m) : nil
-                if m
-                  manpage[m[0].strip] = m[1].split(/ \. /)
-                end
-              end
-            end
-          end
-          if manpage['name']
-            manpage['name']=manpage['name'].join("\n.br\n").
-              gsub(/(-)/m,"\\\\\\1").
-              gsub(/\A/,"\n.br\n.SH NAME\n.br\n")
-          else
-            manpage['name']='man page "name/whatis" information not provided, set in header @man: name=[whatis information]'
-          end
-          if manpage['synopsis']
-            manpage['synopsis']=manpage['synopsis'].join("\n\n.br\n").
-              gsub(/(-)/m,"\\\\\\1").
-              gsub(/\A/,"\n.br\n.SH SYNOPSIS\n.br\n")
-          else
-            manpage['synopsis']=''
-          end
-          unless manpage['section']
-            manpage['section']=1
-          end
-          manpage
-        end
-        def get_image_dimentions(img)
-          imgk=SiSU_Env::SystemCall.new.imagemagick
-          gmgk=SiSU_Env::SystemCall.new.graphicksmagick
-          if imgk or gmgk
-            img_pth=@env.path.image_source_include
-            if imgk
-              imgsys=`identify #{img_pth}/#{img}`.strip                           #system call
-            elsif gmgk
-              imgsys=`gm identify #{img_pth}/#{img}`.strip                        #system call
-            end
-            w,h=/(\d+)x(\d+)/m.match(imgsys)[1,2]
-          else
-            w,h='600','800'
-          end
-          {w: w, h: h}
-        end
-        def home_button_text
-          s=if @h['home_button_text']
-            @h['home_button_text'].split(/\s*;\s*/)
-          else nil
-          end
-          #l,n=Db[:home_button],'make.home_button_text'
-          #validate_length(s,l,n)
-        end
-        def home_button_image
-          s=nil
-          s=if @h['home_button_image']
-            s=@h['home_button_image'].split(/\s*;\s*/)
-            s0=s[0] #if
-            image={}
-            s=if s0 =~/{(\S+\.(?:jpg|png|gif))(?:\s+(\d+x\d+))?\s*}(?:(http:\/\/\S+)|image)/
-              image[:home_button]=$1
-              if $2
-                image[:dimentions]=$2
-                image[:w],image[:h]=/(\d+)x(\d+)/m.match(image[:dimentions])[1,2]
-              else
-                d=get_image_dimentions(image[:home_button])
-                image[:w],image[:h]=d[:w],d[:h]
-                image[:dimentions]="#{d[:w]}x#{d[:h]}"
-              end
-              image[:link]=$3
-              image
-            end
-          else nil
-          end
-        end
-        def cover_image
-          s=nil
-          if @h['cover_image']
-            s=@h['cover_image'].split(/\s*;\s*/)
-            s=s[0] #if
-            image={}
-            if s =~/{(\S+\.(?:jpg|png|gif))(?:\s+(\d+x\d+))?\s+(?:"(.+?)")?\s*}image/
-              image[:cover]=$1
-              if $2
-                image[:dimentions]=$2
-                image[:w],image[:h]=/(\d+)x(\d+)/m.match(image[:dimentions])[1,2]
-              else
-                d=get_image_dimentions(image[:cover])
-                image[:w],image[:h]=d[:w],d[:h]
-                image[:dimentions]="#{d[:w]}x#{d[:h]}"
-              end
-              image[:note]=$3
-            elsif s =~/(\S+\.(?:jpg|png|gif))/
-              image[:cover]=$1
-              d=get_image_dimentions(image[:cover])
-              image[:w],image[:h]=d[:w],d[:h]
-              image[:dimentions]="#{d[:w]}x#{d[:h]}"
-              image[:note]=nil
-            end
-            image
-          else nil
-          end
-        end
-        def footer
-          s=if @h['footer']
-            @h['footer'].split(/\s*;\s*/)
-          else nil
-          end
-        end
-        self
-      end
       def current_publisher
         @s
       end
@@ -1117,9 +777,6 @@ module SiSU_Param
         end
         self
       end
-      def links
-        a=@s.split(/\n%\s.+?$|[ ]*\n[ ]*/m)
-      end
       def notes
         a=@s.split(/\n%\s.+?$|[ ]*\n[ ]*/m)
         @h=build_hash(a)
@@ -1145,9 +802,9 @@ module SiSU_Param
       @doc={ lv: [] }
       @doc[:fns],@doc[:fnb],@doc[:scr_suffix]='','',''
       @@publisher='SiSU scribe'
-      attr_accessor :make,:env,:path,:file,:fn,:fns,:fno,:fnb,:fnn,:fnt,:fnl,:flv,:fnz,:fnstex,:ocn,:sfx_src,:pdf,:file_type,:dir_out,:dir_tex,:dir_lout,:txt_path,:sisu,:sisu_version,:ruby_version,:title,:subtitle,:full_title,:html_title,:subtitle_tex,:creator,:classify,:author_home,:author,:author_title,:author_nationality,:authors,:authorship,:translator,:illustrator,:prepared_by,:digitized_by,:subject,:description,:publisher,:current_publisher,:contributor,:date,:date_created,:date_issued,:date_available,:date_valid,:date_modified,:date_translated,:date_added_to_site,:date_scheme,:date_created_scheme,:date_issued_scheme,:date_available_scheme,:date_valid_scheme,:date_modified_scheme,:type,:format,:identifier,:source,:language,:language_original,:relation,:coverage,:rights,:keywords,:comments,:abstract,:cls_loc,:cls_dewey,:cls_pg,:cls_isbn,:papersize,:papersize_array,:toc,:lv1,:lv2,:lv3,:lv4,:lv5,:lv6,:lvs,:pagenew,:pagebreak,:num_top,:toc_lev_limit,:flag_endnotes,:flag_auto_endnotes,:flag_separate_endnotes,:flag_separate_endnotes_make,:markup,:markup_instruction,:markup_version,:markup_declared,:flag_tables,:vocabulary,:doc_css,:yaml,:lnk,:links,:prefix_a,:prefix_b,:suffix,:information,:contact,:icon,:image,:ad_url,:ad_png,:ad_alt,:ad_began,:flag_promo,:promo,:ad_home,:stmp,:stmpd,:sc_filename,:sc_number,:sc_date,:sc_time,:sc_info,:yamladdr,:locale,:wc_lines,:wc_words,:wc_bytes,:file_encoding,:filesize,:user,:home,:hostname,:pwd,:firstseg,:programs,:author_copymark,:i18n,:lang,:lang_code_insert,:en,:notes,:dgst,:generated,:tags,:tag_array,:concord_make,:seg_names,:seg_autoname_safe,:set_header_title,:set_heading_top,:set_heading_seg,:heading_seg_first,:heading_seg_first_flag,:base_program,:ec,:opt,:sem_tag,:book_idx,:topic_register,:topic_register_array,:original,:writing_focus,:audio,:daisy,:home_button_image,:home_button_links,:footer_links,:cover_image,:man_section
+      attr_accessor :make,:env,:path,:file,:fn,:fns,:fno,:fnb,:fnn,:fnt,:fnl,:flv,:fnz,:fnstex,:ocn,:sfx_src,:pdf,:file_type,:dir_out,:dir_tex,:dir_lout,:txt_path,:sisu,:sisu_version,:ruby_version,:title,:subtitle,:full_title,:html_title,:subtitle_tex,:creator,:classify,:author_home,:author,:author_title,:author_nationality,:authors,:authorship,:translator,:illustrator,:prepared_by,:digitized_by,:subject,:description,:publisher,:current_publisher,:contributor,:date,:date_created,:date_issued,:date_available,:date_valid,:date_modified,:date_translated,:date_added_to_site,:date_scheme,:date_created_scheme,:date_issued_scheme,:date_available_scheme,:date_valid_scheme,:date_modified_scheme,:type,:format,:identifier,:source,:language,:language_original,:relation,:coverage,:rights,:keywords,:comments,:abstract,:cls_loc,:cls_dewey,:cls_pg,:cls_isbn,:papersize,:papersize_array,:toc,:lv1,:lv2,:lv3,:lv4,:lv5,:lv6,:lvs,:pagenew,:pagebreak,:num_top,:bold_match_list,:italics_match_list,:substitution_match_list,:emphasis_set_to,:toc_lev_limit,:flag_endnotes,:flag_auto_endnotes,:flag_separate_endnotes,:flag_separate_endnotes_make,:markup,:markup_instruction,:markup_version,:markup_declared,:flag_tables,:vocabulary,:doc_css,:yaml,:lnk,:links,:prefix_a,:prefix_b,:suffix,:information,:contact,:icon,:image,:ad_url,:ad_png,:ad_alt,:ad_began,:flag_promo,:promo,:ad_home,:stmp,:stmpd,:sc_filename,:sc_number,:sc_date,:sc_time,:sc_info,:yamladdr,:locale,:wc_lines,:wc_words,:wc_bytes,:file_encoding,:filesize,:user,:home,:hostname,:pwd,:firstseg,:programs,:author_copymark,:i18n,:lang,:lang_code_insert,:en,:notes,:dgst,:generated,:tags,:tag_array,:concord_make,:seg_names,:seg_autoname_safe,:set_header_title,:set_heading_top,:set_heading_seg,:heading_seg_first,:heading_seg_first_flag,:base_program,:ec,:opt,:sem_tag,:book_idx,:topic_register,:topic_register_array,:original,:writing_focus,:audio,:daisy,:home_button_image,:home_button_links,:footer_links,:cover_image,:man_section
       def initialize(fns_array,opt)
-        @env=@path,@file=@fn=@fns=@fno=@fnb=@fnn=@fnt=@fnl=@flv=@fnz=@fnstex=@ocn=@sfx_src=@pdf=@file_type=@dir_out=@dir_tex=@dir_lout=@txt_path=@make=@flag_endnotes=@flag_auto_endnotes=@flag_separate_endnotes=@flag_separate_endnotes_make=@sisu=@sisu_version=@ruby_version=@title=@subtitle=@full_title=@html_title=@subtitle_tex=@creator=@classify=@author_home=@author=@author_title=@author_nationality=@translator=@illustrator=@prepared_by=@digitized_by=@subject=@description=@publisher=@current_publisher=@contributor=@date=@date_created=@date_issued=@date_available=@date_valid=@date_modified=@date_translated=@date_added_to_site=@date_scheme=@date_created_scheme=@date_issued_scheme=@date_available_scheme=@date_valid_scheme=@date_modified_scheme=@type=@format=@identifier=@source=@language=@language_original=@relation=@coverage=@rights=@keywords=@comments=@abstract=@cls_loc=@cls_dewey=@cls_pg=@cls_isbn=@papersize=@toc=@lv1=@lv2=@lv3=@lv4=@lv5=@lv6=@pagenew=@pagebreak=@num_top=@toc_lev_limit=@flag_tables=@vocabulary=@doc_css=@yaml=@lnk=@links=@prefix_a=@prefix_b=@suffix=@information=@contact=@icon=@ad_url=@ad_png=@ad_alt=@ad_began=@promo=@ad_home=@stmp=@stmpd=@sc_filename=@sc_number=@sc_date=@sc_time=@sc_info=@yamladdr=@locale=@wc_lines=@wc_words=@wc_bytes=@file_encoding=@filesize=@firstseg=@programs=@author_copymark=@i18n=@lang=@lang_code_insert=@en=@notes=@dgst=@generated=@heading_seg_first=@base_program=@topic_register=@original=@writing_focus=@audio=@home_button_image=@home_button_links=@cover_image=@man_section=nil
+        @env=@path,@file=@fn=@fns=@fno=@fnb=@fnn=@fnt=@fnl=@flv=@fnz=@fnstex=@ocn=@sfx_src=@pdf=@file_type=@dir_out=@dir_tex=@dir_lout=@txt_path=@make=@flag_endnotes=@flag_auto_endnotes=@flag_separate_endnotes=@flag_separate_endnotes_make=@sisu=@sisu_version=@ruby_version=@title=@subtitle=@full_title=@html_title=@subtitle_tex=@creator=@classify=@author_home=@author=@author_title=@author_nationality=@translator=@illustrator=@prepared_by=@digitized_by=@subject=@description=@publisher=@current_publisher=@contributor=@date=@date_created=@date_issued=@date_available=@date_valid=@date_modified=@date_translated=@date_added_to_site=@date_scheme=@date_created_scheme=@date_issued_scheme=@date_available_scheme=@date_valid_scheme=@date_modified_scheme=@type=@format=@identifier=@source=@language=@language_original=@relation=@coverage=@rights=@keywords=@comments=@abstract=@cls_loc=@cls_dewey=@cls_pg=@cls_isbn=@papersize=@toc=@lv1=@lv2=@lv3=@lv4=@lv5=@lv6=@pagenew=@pagebreak=@num_top=@bold_match_list=@italics_match_list=@substitution_match_list=@emphasis_set_to=@toc_lev_limit=@flag_tables=@vocabulary=@doc_css=@yaml=@lnk=@links=@prefix_a=@prefix_b=@suffix=@information=@contact=@icon=@ad_url=@ad_png=@ad_alt=@ad_began=@promo=@ad_home=@stmp=@stmpd=@sc_filename=@sc_number=@sc_date=@sc_time=@sc_info=@yamladdr=@locale=@wc_lines=@wc_words=@wc_bytes=@file_encoding=@filesize=@firstseg=@programs=@author_copymark=@i18n=@lang=@lang_code_insert=@en=@notes=@dgst=@generated=@heading_seg_first=@base_program=@topic_register=@original=@writing_focus=@audio=@home_button_image=@home_button_links=@cover_image=@man_section=nil
         @data,@path,@fns,@fno,@opt=fns_array,opt.pth,opt.fns,opt.fno,opt #@data used as data
         @flag_tables,@set_header_title,@set_heading_top,@set_heading_seg,@heading_seg_first_flag,@flag_promo,@book_idx=false,false,false,false,false,false,false
         @seg_autoname_safe=true
@@ -1158,6 +815,7 @@ module SiSU_Param
         @flv,@lang,@seg_names,@tags,@tag_array,@tag_a,@ec[:image],@ec[:audio],@ec[:multimedia]=Array.new(9){[]}
         @authors,@topic_register_array,@papersize_array=[],[],[]
         @lvs=[nil,0,0,0,0,0,0]
+        @emphasis_set_to='bold'
         @lang_code_insert=if @opt.act[:output_by][:set]==:language
           ''
         elsif @opt.act[:output_by][:set]==:filetype \
@@ -1180,6 +838,32 @@ module SiSU_Param
           end
         ensure
         end
+        @header_make_links_append=:no
+        common_makes=@opt.make_instructions
+        if common_makes[:makeset]
+          @pagenew=common_makes[:pagenew]
+          @pagebreak=common_makes[:pagenew]
+          @toc=common_makes[:toc]
+          @lv1=common_makes[:lv1]
+          @lv2=common_makes[:lv2]
+          @lv3=common_makes[:lv3]
+          @lv4=common_makes[:lv4]
+          @lv5=common_makes[:lv5]
+          @lv6=common_makes[:lv6]
+          @num_top=common_makes[:num_top]
+          @i18n=common_makes[:i18n]
+          @man_section=common_makes[:man_section]
+          @emphasis_set_to=common_makes[:emphasis_set_to]
+          @bold_match_list=common_makes[:bold_match_list]
+          @italics_match_list=common_makes[:italics_match_list]
+          @substitution_match_list=common_makes[:substitution_match_list]
+          @footer_links=common_makes[:footer_links]
+          @home_button_links=common_makes[:home_button_links]
+          @home_button_image=common_makes[:home_button_image]
+          @cover_image=common_makes[:cover_image]
+          @lnk=@links=common_makes[:links]
+          @header_make_links_append=common_makes[:links_append]
+        end
       end
       #protected
       def determine_papersize(l)
@@ -1323,91 +1007,65 @@ module SiSU_Param
             when /^@notes?:\s(.+)\Z/m                                          #% * header metadata - notes
               @notes=SiSU_Param::Parameters::Md.new($1.strip,@opt,@env).notes
             when /^@links:\s+(.+?)\Z/m                                         #% * header metadata - links
-              doc_links=SiSU_Param::Parameters::Md.new($1.strip,@opt,@env).links
-              a_idx=0
-              @links=[]
-              doc_links.each do |doc_link|
-                if doc_link=~/\{.+?\}(?:(?:https?|file|ftp):\/|\.\.)\/\S+(?:\s|$)/
-                  @links[a_idx]={}
-                  @links[a_idx][:say],@links[a_idx][:url]=/\{\s*(.+?)\s*\}((?:(?:https?|file|ftp):\/|\.\.)\/\S+)/im.match(doc_link)[1,2]
-                  a_idx +=1
-                end
+              links=SiSU_Param::Parameters::MdMake.new($1.strip,@opt,@env).make_links.links
+              @lnk=@links=if @header_make_links_append == :yes
+                (links) \
+                  ? (links + @links)
+                  : @links
+              else
+                (links) \
+                  ? (links)
+                  : @links
               end
-              @lnk=@links
             when /^@make:(.+)/m                                                #% * header processing - make
-              @make=SiSU_Param::Parameters::Md.new($1.strip,@opt,@env).make
-              if defined? @make.breaks \
-              and @make.breaks[:page_new]                  #clearpage
-                @pagenew=@make.breaks[:page_new]
-              end
-              if defined? @make.breaks \
-              and @make.breaks[:page_break]                #newpage
-                @pagebreak=@make.breaks[:page_break]
-              end
-              if defined? @make.headings \
-              and @make.headings
-                @toc=@make.headings[0]
-                @lv1=@make.headings[1]
-                @lv2=@make.headings[2]
-                @lv3=@make.headings[3]
-                @lv4=@make.headings[4]
-                @lv5=@make.headings[5]
-                @lv6=@make.headings[6]
-              end
-              if defined? @make.num_top \
-              and @make.num_top
-                @num_top=@make.num_top # remove @num_top
-              end
-              if defined? @make.language \
-              and @make.language[0]
-                @i18n=@make.language
-              end
-              if defined? @make.manpage \
-              and @make.manpage
-                @man_section=(defined? @make.manpage.section) \
-                ? @make.manpage.section
-                : 1
-              end
-              if defined? @make.footer \
-              and @make.footer.is_a?(Array)
-                @footer_links= { left: { say: '', url: '' }, center: { say: '', url: '' } } #already set
-                @footer_links[:left]=if @make.footer[0]=~/\{.+?\}(?:(?:https?|file|ftp):\/|\.\.)\/\S+(?:\s|$)/
-                  say,url=/\{\s*(.+?)\s*\}((?:(?:https?|file|ftp):\/|\.\.)\/\S+)/im.match(@make.footer[0])[1,2]
-                  { say: say, url: url }
-                else
-                  { say: '', url: '' }
-                end
-                @footer_links[:center]=if @make.footer[1]=~/\{.+?\}(?:(?:https?|file|ftp):\/|\.\.)\/\S+(?:\s|$)/
-                  say,url=/\{\s*(.+?)\s*\}((?:(?:https?|file|ftp):\/|\.\.)\/\S+)/im.match(@make.footer[1])[1,2]
-                  { say: say, url: url }
-                else
-                  { say: '', url: '' }
-                end
-                @footer_links
-              else #already set
-                @footer_links= { left: { say: '', url: '' }, center: { say: '', url: '' } }
-              end
-              if defined? @make.home_button_text \
-              and @make.home_button_text.is_a?(Array)
-                a_idx=0
-                @home_button_links=[]
-                @make.home_button_text.each do |doc_link|
-                  if doc_link=~/\{.+?\}(?:(?:https?|file|ftp):\/|\.\.)\/\S+(?:\s|$)/
-                    @home_button_links[a_idx]={}
-                    @home_button_links[a_idx][:say],@home_button_links[a_idx][:url]=/\{\s*(.+?)\s*\}((?:(?:https?|file|ftp):\/|\.\.)\/\S+)/im.match(doc_link)[1,2]
-                    a_idx +=1
-                  end
-                end
-                @home_button_links
-              end
-              if defined? @make.home_button_image \
-              and @make.home_button_image.is_a?(Hash)
-                @home_button_image=@make.home_button_image
-              end
-              if defined? @make.cover_image \
-              and @make.cover_image.is_a?(Hash)
-                @cover_image=@make.cover_image
-              end
+              @make=SiSU_Param::Parameters::MdMake.new($1.strip,@opt,@env).make
+              makes=SiSU_Param_Make::MakeHead.new(@make).make_instruct
+              @pagenew=(makes[:pagenew]) \
+                ? (makes[:pagenew]) \
+                : @pagenew
+              @pagebreak=(makes[:pagebreak]) \
+                ? (makes[:pagebreak]) \
+                : @pagebreak
+              @toc=(makes[:toc]) ? (makes[:toc]) : @toc
+              @lv1=(makes[:lv1]) ? (makes[:lv1]) : @lv1
+              @lv2=(makes[:lv2]) ? (makes[:lv2]) : @lv2
+              @lv3=(makes[:lv3]) ? (makes[:lv3]) : @lv3
+              @lv4=(makes[:lv4]) ? (makes[:lv4]) : @lv4
+              @lv5=(makes[:lv5]) ? (makes[:lv5]) : @lv5
+              @lv6=(makes[:lv6]) ? (makes[:lv6]) : @lv6
+              @num_top=(makes[:num_top]) \
+                ? (makes[:num_top]) \
+                : @num_top
+              @substitution_match_list=(makes[:substitution_match_list]) \
+                ? (makes[:substitution_match_list]) \
+                : @substitution_match_list
+              @bold_match_list=(makes[:bold_match_list]) \
+                ? (makes[:bold_match_list]) \
+                : @bold_match_list
+              @italics_match_list=(makes[:italics_match_list]) \
+                ? (makes[:italics_match_list]) \
+                : @italics_match_list
+              @emphasis_set_to=(makes[:emphasis_set_to]) \
+                ? (makes[:emphasis_set_to]) \
+                : @emphasis_set_to
+              @i18n=(makes[:i18n]) \
+                ? (makes[:i18n]) \
+                : @i18n
+              @man_section=(makes[:man_section]) \
+                ? (makes[:man_section]) \
+                : @man_section
+              @footer_links=(makes[:footer_links]) \
+                ? (makes[:footer_links]) \
+                : @footer_links
+              @home_button_links=(makes[:home_button_links]) \
+                ? (makes[:home_button_links]) \
+                : @home_button_links
+              @home_button_image=(makes[:home_button_image]) \
+                ? (makes[:home_button_image]) \
+                : @home_button_image
+              @cover_image=(makes[:cover_image]) \
+                ? (makes[:cover_image]) \
+                : @cover_image
             end
             @lv1 ||=/^1~/
             @lv2 ||=/^2~/
@@ -1531,7 +1189,7 @@ module SiSU_Param
           if @opt.cmd =~/[VM]/
             SiSU_Screen::Ansi.new(@opt.cmd,'@make:','header absent').warn
           end
-          @make=SiSU_Param::Parameters::Md.new('@make: ',@opt,@env).make
+          @make=SiSU_Param::Parameters::MdMake.new('@make: ',@opt,@env).make
         end
         if @cover_image \
         and @cover_image.is_a?(Hash) \