# encoding: utf-8
=begin
* Name: SiSU
* Description: a framework for document structuring, publishing and search
* Author: Ralph Amissah
* Copyright: (C) 1997 - 2012, 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 .
If you have Internet connection, the latest version of the GPL should be
available at these locations:
* SiSU uses:
* Standard SiSU markup syntax,
* Standard SiSU meta-markup syntax, and the
* Standard SiSU object citation numbering and system
* Hompages:
* Download:
* Ralph Amissah
** Description: system environment, resource control and configuration details
=end
module SiSU_Insertions
class Insertions
def initialize(md,data)
@md,@data=md,data
end
def output_filetypes_in_cmd(cmd_shortcut,lnk=nil) #make list of file types in shortcut command (as configured), e.g. when sisu -3 is used
cf_defaults=SiSU_Env::Info_processing_flag.new
cmd_list=case cmd_shortcut.inspect
when /0/; cf_defaults.cf_0
when /1/; cf_defaults.cf_1
when /2/; cf_defaults.cf_2
when /3/; cf_defaults.cf_3
when /4/; cf_defaults.cf_4
when /5/; cf_defaults.cf_5
end
file_type_names={}
file_type_names[:gen],file_type_names[:src]=[],[]
file_type_names[:gen] <<= if cmd_list =~ /y/; "~^ { document manifest }#{lnk[:manifest]}"
end
file_type_names[:gen] <<= if cmd_list =~ /h/; [" { html, segmented text }#{lnk[:html_toc]}"," { html, scroll, document in one }#{lnk[:html_doc]}"]
end
file_type_names[:gen] <<= if cmd_list =~ /e/; [" { epub }#{lnk[:epub]}"]
end
file_type_names[:gen] <<= if cmd_list =~ /p/; [" { pdf, landscape }#{lnk[:pdf_landscape]}"," { pdf, portrait }#{lnk[:pdf_portrait]}"]
end
file_type_names[:gen] <<= if cmd_list =~ /o/; " { odf:odt, open document text }#{lnk[:odt]}"
end
file_type_names[:gen] <<= if cmd_list =~ /b/; " { xhtml scroll }#{lnk[:xhtml]}"
end
file_type_names[:gen] <<= if cmd_list =~ /x/; " { xml, sax }#{lnk[:xml_sax]}"
end
file_type_names[:gen] <<= if cmd_list =~ /X/; " { xml, dom }#{lnk[:xml_dom]}"
end
file_type_names[:gen] <<= if cmd_list =~ /a/; " { plain text utf-8 }#{lnk[:txt]}"
end
file_type_names[:gen] <<= if cmd_list =~ /g/; 'wiki.txt'
end
file_type_names[:gen] <<= if cmd_list =~ /w/; " { concordance }#{lnk[:html_concordance]}"
end
file_type_names[:gen] <<= if cmd_list =~ /N/; " { dcc, document content certificate (digests) }#{lnk[:digest]}"
end
file_type_names[:src] <<= if source and cmd_shortcut =~ /s/; " { markup source text }#{lnk[:source]}"
end
file_type_names[:src] <<= if cmd_shortcut =~ /S/; " { markup source (zipped) pod }#{lnk[:sisupod]}"
end
file_type_names[:gen]=file_type_names[:gen].flatten
file_type_names[:src]=file_type_names[:src].flatten
file_type_names
end
def by_language(linked_doc,lng,src=nil)
@linked_doc,@lng,@src=linked_doc,lng,src
@base_path="#{@md.file.output_path.base.url}/#{@lng}"
def manifest
"#{@base_path}/manifest/#{@linked_doc}.html"
end
def html_toc
"#{@base_path}/html/#{@linked_doc}.html"
end
def html_doc
"#{@base_path}/html/#{@linked_doc}.html"
end
def html_concordance
"#{@base_path}/html/#{@linked_doc}.html"
end
def epub
"#{@base_path}/epub/#{@linked_doc}.epub"
end
def pdf_landscape
"#{@base_path}/pdf/#{@linked_doc}.pdf"
end
def pdf_portrait
"#{@base_path}/pdf/#{@linked_doc}.pdf"
end
def odt
"#{@base_path}/odt/#{@linked_doc}.odt"
end
def xhtml
"#{@base_path}/xhtml/#{@linked_doc}.xhtml"
end
def xml_sax
"#{@base_path}/xml/#{@linked_doc}.xml"
end
def xml_dom
"#{@base_path}/xml/#{@linked_doc}.xml"
end
def txt
"#{@base_path}/txt/#{@linked_doc}.txt"
end
def digest
"#{@base_path}/digest/#{@linked_doc}.txt"
end
def source
"#{@base_path}/src/#{@src}"
end
def sisupod
"#{@base_path}/pod/#{@src}.zip"
end
self
end
def by_filetype(linked_doc,lng,src=nil)
@linked_doc,@lng,@src=linked_doc,lng,src
@base_path="#{@md.file.output_path.base.url}"
def manifest
"#{@base_path}/manifest/#{@linked_doc}.#{@lng}.html"
end
def html_toc
"#{@base_path}/html/#{@linked_doc}.#{@lng}.html"
end
def html_doc
"#{@base_path}/html/#{@linked_doc}.#{@lng}.html"
end
def html_concordance
"#{@base_path}/html/#{@linked_doc}.#{@lng}.html"
end
def epub
"#{@base_path}/epub/#{@linked_doc}.#{@lng}.epub"
end
def pdf_landscape
"#{@base_path}/pdf/#{@linked_doc}.#{@lng}.pdf"
end
def pdf_portrait
"#{@base_path}/pdf/#{@linked_doc}.#{@lng}.pdf"
end
def odt
"#{@base_path}/odt/#{@linked_doc}.#{@lng}.odt"
end
def xhtml
"#{@base_path}/xhtml/#{@linked_doc}.#{@lng}.xhtml"
end
def xml_sax
"#{@base_path}/xml_sax/#{@linked_doc}.#{@lng}.xml"
end
def xml_dom
"#{@base_path}/xml_dom/#{@linked_doc}.#{@lng}.xml"
end
def txt
"#{@base_path}/txt/#{@linked_doc}.#{@lng}.txt"
end
def digest
"#{@base_path}/digest/#{@linked_doc}.#{@lng}.txt"
end
def source
"#{@base_path}/src/#{@src}"
end
def sisupod
"#{@base_path}/pod/#{@src}.zip"
end
self
end
def by_filename(linked_doc,lng,src=nil)
@linked_doc,@lng,@src=linked_doc,lng,src
@base_path="#{@md.file.output_path.base.url}/#{@linked_doc}"
def manifest
"#{@base_path}/sisu_manifest.#{@lng}.html"
end
def html_toc
"#{@base_path}/toc.#{@lng}.html"
end
def html_doc
"#{@base_path}/scroll.#{@lng}.html"
end
def html_concordance
"#{@base_path}/concordance.#{@lng}.html"
end
def epub
"#{@base_path}/epub/#{@linked_doc}.#{@lng}.epub"
end
def pdf_landscape
"#{@base_path}/landscape.#{@lng}.a4.pdf"
end
def pdf_portrait
"#{@base_path}/portrait.#{@lng}.a4.pdf"
end
def odt
"#{@base_path}/opendocument.#{@lng}.odt"
end
def xhtml
"#{@base_path}/scroll.#{@lng}.xhtml"
end
def xml_sax
"#{@base_path}/scroll.#{@lng}.sax.xml"
end
def xml_dom
"#{@base_path}/scroll.#{@lng}.dom.xml"
end
def txt
"#{@base_path}/plain.#{@lng}.txt"
end
def digest
"#{@base_path}/digest.#{@lng}.txt"
end
def source
"#{@base_path}/#{@src}"
end
def sisupod
"#{@base_path}/#{@src}.zip"
end
self
end
def expand_insertions?
data=@data
tuned_file,tuned_file_tmp=[],[]
codeblock_=false
data.each do |para|
codeblock_=if para =~/^code\{/
true
elsif para =~/^\}code/
false
else codeblock_
end
if para !~/^%+\s/ \
and not codeblock_ \
and para =~/\{(?:~\^\s+)?(.+?)\s\[(?:\d(?:[sS]*))\]\}(?:\.\.\/\S+?\/|\S+?\.ss[tm]\b)/
txt,cmd,source,linked_doc,note,manifest=nil,nil,nil,nil,nil,nil
@u=SiSU_Env::Info_env.new.url
pre=txt=cmd=source=linked_doc=note=''
if defined? @u.remote
if /(?