=begin * Name: SiSU information Structuring Universe - Structured information, Serialized Units * Author: Ralph Amissah * http://www.jus.uio.no/sisu * http://www.jus.uio.no/sisu/SiSU/download.html * Description: base formatting template for html generation * Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007 Ralph Amissah * License: GPL 2 or later Summary of GPL 2 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 2 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, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA If you have Internet connection, the latest version of the GPL should be available at these locations: http://www.fsf.org/licenses/gpl.html http://www.gnu.org/copyleft/gpl.html http://www.jus.uio.no/sisu/gpl2.fsf SiSU was first released to the public on January 4th 2005 SiSU uses: * Standard SiSU markup syntax, * Standard SiSU meta-markup syntax, and the * Standard SiSU object citation numbering and system © Ralph Amissah 1997, current 2007. All Rights Reserved. * Ralph Amissah: ralph@amissah.com ralph.amissah@gmail.com =end module SiSU_HTML_Format require SiSU_lib + '/param' include SiSU_Param include SiSU_Viz class Paragraph_number def initialize(md,paranum) @md=md @paranum=paranum[/(\d+)/m,1] @paranum ||='' @paranum='' if @md.mod.inspect =~/--no-ocn/ end def ocn_display ocn_class=if @md.mod.inspect =~/--no-ocn/; 'ocn_off' else 'ocn' end @paranum.gsub(/^(\d+|)$/, %{
\\1
}) end def name %{} end def id #w3c? "tidy" complains about numbers as identifiers ! annoying %{id="o#@paranum"} end def goto %{} end end class Paragraph_id_ocn #used by table version #work area 2003w48 attr_accessor :paranum,:font,:p_num def initialize(md,paranum) @paranum,@vz,@p_num=paranum,SiSU_Env::Get_init.instance.skin,SiSU_HTML_Format::Paragraph_number.new(md,paranum) #font end def txt %{#{@p_num.name}
}
end
def txt_00
%{ #{@p_num.name}
}
end
def font_citation
%{}
end
def endnote
%{ #{@p_num.name}
}
end
def table
%{ #{@p_num.name}
}
end
def tiny
%{ #{@p_num.name}
}
end
def small
%{ #{@p_num.name}
} # keep but not used?
end
def font_tiny
%{}
end
def font_small
%{}
end
def header_
%{ #{@p_num.name}
}
end
end
class Head_information
include SiSU_Viz
include SiSU_HTML_Format
include SiSU_Env
attr_reader :md,:sfx,:pdf,:rdf,:vz
def initialize(md='')
@md=md
@sfx,@pdf=@md.sfx,@md.pdf
@rdf=SiSU_XML_tags::RDF.new(md)
# DublinCore 1 - title
@vz=SiSU_Env::Get_init.instance.skin
@css=SiSU_Env::CSS_stylesheet.new(md)
@seg_name_html=(SiSU_HTML::Source::Seg.new.seg_name_html || [])
@seg_name_html_tracker=(SiSU_HTML::Source::Seg.new.seg_name_html_tracker || [])
case @md.file_type
when /php/; @index='index' # @index="index.php"
else @index='index'
end
@metalink='#metadata'
@tocband_scroll,@tocband_segtoc=nil,nil
end
def doc_type
%{
\n}
end
def toc_head_escript #embedded script in this case PHP
# %{ PHP or other embedded script for object persistence may go HERE PHP or other embedded script for object persistence may go HERE
#{@vz.banner_band} | #{pdf}
#{@vz.table_close}
}
end
def seg_head_navigation_band(type='')
if type=~/pdf/
@tocband_segtoc=make_scroll_seg_pdf
end
firstseg=%{
#{@vz.png_nav_nxt}
} if @md.firstseg =~/\S+/
%{
#{@vz.nav_txt_toc_link}
|
}
%{
#{rights} } end def prefix_b %{
|