From 26767cc88c0548ad7978021796d0ccc4c9f7ffed Mon Sep 17 00:00:00 2001
From: Ralph Amissah
Date: Sat, 2 Jun 2007 11:27:06 +0100
Subject: 0.53.0, pre-build, see changelog, library naming changed for scm,
placed under v0 (instead of 0.53)
---
lib/sisu/v0/html_format_css.rb | 473 +++++++++++++++++++++++++++++++++++++++++
1 file changed, 473 insertions(+)
create mode 100644 lib/sisu/v0/html_format_css.rb
(limited to 'lib/sisu/v0/html_format_css.rb')
diff --git a/lib/sisu/v0/html_format_css.rb b/lib/sisu/v0/html_format_css.rb
new file mode 100644
index 00000000..641a1258
--- /dev/null
+++ b/lib/sisu/v0/html_format_css.rb
@@ -0,0 +1,473 @@
+=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: html formating, css template
+
+ * 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_type
+ require "#{SiSU_lib}/html_format"
+ require "#{SiSU_lib}/param"
+ include SiSU_Param
+ include SiSU_Viz
+ include SiSU_HTML_Format
+ class Head_toc < SiSU_HTML_Format::Head_toc
+ def initialize(md='')
+ super(md)
+ end
+ def head
+ %{#{doc_type}
+
+
+ #{@md.html_title}
+
+
+#{@rdf.rdftoc}
+#{@rdf.metatag_html}
+#{@css.html}
+
+#{@vz.color_body}
+
+
+
+#{@vz.js_top}}
+ end
+ def concordance
+ if @md.concord_make
+ %{#{@vz.margin_css}
+
+#{@vz.table_close}}
+ else
+ %{#{@vz.margin_css}
+#{@vz.table_close}}
+ end
+ end
+ def metadata
+ %{#{@vz.margin_css}
+
+#{@vz.table_close}}
+ end
+ end
+ class Head_seg < SiSU_HTML_Format::Head_seg
+ def initialize(md='')
+ super(md)
+ end
+ def head
+ %{#{doc_type}
+
+
+ #{@seg_name_html[@seg_name_html_tracker]} -
+ #{@md.html_title}
+
+
+#{@rdf.rdfseg}
+#{@rdf.metatag_html}
+#{@css.html}
+
+#{@vz.color_body}
+
+
+
+#{@vz.js_top}}
+ end
+ def toc_metadata
+ @metalink=%{./#{@md.fn[:meatadata]}}
+ toc_metadata
+ end
+ def title_banner(title,subtitle,creator)
+ %{
+ #{title}
+
+
+ #{subtitle}
+
+
+ #{creator}
+
+
+ copy @
+
+ #{@vz.txt_home}
+
+
}
+ end
+ end
+ class Head_scroll < SiSU_HTML_Format::Head_scroll
+ def initialize(md='')
+ super(md)
+ end
+ def toc_endnote
+ %{#{@vz.margin_css}
+
+#{@vz.table_close}}
+ end
+ end
+ class Format_scroll < SiSU_HTML_Format::Format_text_object
+ def initialize(md='',*txt)
+ super(md,*txt)
+ @vz=SiSU_Env::Get_init.instance.skin
+ end
+ def indent_one_no_paranum
+ %{#{@vz.margin_txt_1}
+#{@paragraph.txt}
+ #@one
+#{@vz.margin_num}
+#{@vz.table_close}}
+ end
+ def indent_two_no_paranum
+ %{#{@vz.margin_txt_1}
+#{@paragraph.txt}
+ #@one
+#{@vz.margin_num}
+#{@vz.table_close}}
+ end
+ def endnote_body
+ %{#{@vz.margin_css}
+
+ #@one
+
+#{@vz.margin_num_css}
+
+#{@vz.table_close}}
+ end
+ def header_normal
+ %{#{@vz.margin_css}
+ <#@tag class="#@class" #{@p_num.id}>#{@p_num.name}
+ #@headname
+ #@parablock
+ #@tag>
+#{@vz.margin_num_css}
+ #{@p_num.ocn_display}
+#{@vz.table_close}}
+ end
+ def heading_body
+ @tag,@class='p','norm'
+ header_normal
+ end
+ def heading_body1
+ @tag,@class='h1','norm'
+ header_normal
+ end
+ def heading_body2
+ @tag,@class='h2','norm'
+ header_normal
+ end
+ def heading_body3
+ @tag,@class='h3','norm'
+ header_normal
+ end
+ def heading_body4
+ @tag,@class='h4','norm'
+ header_normal
+ end
+ def heading_body5
+ @tag,@class='h5','norm'
+ header_normal
+ end
+ def heading_body6
+ @tag,@class='h6','norm'
+ header_normal
+ end
+ end
+ class Format_seg < SiSU_HTML_Format::Format_text_object
+ def initialize(md='',*txt)
+ super(md,*txt)
+ end
+ def navigation_para
+ %{#{@vz.margin_css}
+#{@paragraph.txt}
+ #@one
+
+#{@vz.table_close}}
+ end
+ def navigation_toc_lev1_advert
+ %{#{@banner.home_button}\n
+
+#@one
+#@two
+}
+ end
+ def navigation_toc_lev1
+ %{#{@banner.nav_toc}}
+ end
+ def navigation_toc_lev2 #change bold use css
+ %{
+
+
+ |
+
+
+ #@one
+
+
+#{@vz.table_close}}
+ end
+ def navigation_toc_lev3 #change bold use css
+ %{
+
+
+ |
+
+
+ #@one
+
+
+#{@vz.table_close}}
+ end
+ def navigation_toc_lev4
+ %{
+
+ |
+
+
+ #@one
+
+#{@vz.table_close}}
+ end
+ def navigation_toc_lev5
+ end
+ def navigation_toc_lev6
+ end
+ def endnote_body_seg_tail
+ %{#{@vz.margin_css}
+
+ #@one
+
+#{@vz.margin_num_css}
+#{@vz.table_close}}
+ end
+ def endnote_body_seg_tail_indent
+ %{#{@vz.margin_css}
+
+ #@one
+
+#{@vz.margin_num_css}
+#{@vz.table_close}}
+ end
+ def endnote_seg_body(fn='') #url construction keep within single line... BUG WATCH 200408
+ fn='doc' if fn.empty? #you may wish to reconsider, sends to 'doc' where no segment info
+ %{#{@vz.margin_css}
+
+ #@one#{@md.fnl[:pre]}#{fn}#{@md.fnl[:mid]}#{@md.sfx}#{@md.fnl[:post]}#@two#@three
+
+#{@vz.margin_num_css}
+#{@vz.table_close}}
+ end
+ def title_header
+ %{#{@vz.margin_css}
+ <#@tag class="#@class">
+ #@one
+ #@tag>
+#{@vz.margin_num_css}
+#@two
+#{@vz.table_close}}
+ end
+ def title_header1
+ @tag,@class='h1','banner'
+ title_header
+ end
+ def title_header2
+ @tag,@class='h2','banner'
+ title_header
+ end
+ def title_header3
+ @tag,@class='h3','banner'
+ title_header
+ end
+ def title_header4
+ %{#{@vz.margin_css}
+
+ #@one
+
+#{@vz.margin_num_css}
+#{@vz.table_close}}
+ end
+ def subtoc_lev
+ one=if @one and @one =~/<\/?i>|/mi
+ @one.gsub(/<\/?i>|/mi,'') #removes name markers from subtoc, go directly to substantive text
+ else @one
+ end
+ note=''
+ if one =~/(~[{\[].+?[}\]]~\s*)/m #this is a clumsy fix, revisit and address upstream
+ note=$1
+ note.gsub!(/[\n\s]+/m,' ')
+ one.gsub!(/~[{\[].+?[}\]]~\s*/m,' ')
+ one.gsub!(/ \d+<\/sup> /m,'')
+ end
+ %{<#@tag class="#@class">
+
+ #{one}
+ #{note}
+ #@tag>}
+ end
+ def subtoc_lev5
+ @tag,@class='h5','subtoc'
+ subtoc_lev if @one
+ end
+ def subtoc_lev6
+ @tag,@class='h6','subtoc'
+ subtoc_lev if @one
+ end
+ #% para sisu
+ def header4
+ %{#@format
+#{@vz.margin_css}
+ #{@p_num.name}
+ #@format
+ #@parablock
+
+#{@vz.margin_num_css}
+#{@p_num.ocn_display}
+#{@vz.table_close}}
+ end
+ def header_sub
+ @parablock.gsub!(/~[{\[].+?[}\]]~\s*/m,' ')
+ %{#{@vz.margin_css}
+#{@headname}
+ <#@tag class="#@class" #{@p_num.id}>#{@p_num.name}
+ #{@parablock}
+ #@tag>
+#{@vz.margin_num_css}
+#{@p_num.ocn_display}
+#{@vz.table_close}}
+ end
+ def header5
+ @tag,@class='p','bold'
+ header_sub
+ end
+ def header6
+ @tag,@class='p','bold'
+ header_sub
+ end
+ def navigation_header4
+ %{
+
+
+ #@parablock
+
+#{@vz.table_close}}
+ end
+ def navigation_header5
+ %{
+ #@parablock
+ }
+ end
+ def navigation_header6
+ %{
+ #@parablock
+ }
+ end
+ def navigation_indent1
+ %{#{@vz.margin_txt_00_1}
+#{@paragraph.txt_00}
+ #@parablock
+
+
+#{@vz.margin_num_css}
+#{@vz.table_close}}
+ end
+ def navigation_indent2
+ end
+ def navigation_center
+ "#@parablock"
+ end
+ end
+ class Format_toc < SiSU_HTML_Format::Format_text_object
+ def initialize(md='',*txt)
+ super(md,*txt)
+ end
+ def links_guide
+ #@three distinguishes between _top and external, can be used e.g. for different colour scheme
+ %{
+
+ #@linkname
+
+
+}
+ end
+ def lev
+ %{<#@tag class="#@class">
+ #@one
+ #@tag>
+}
+ end
+ def lev1
+ @tag,@class='h1','toc'
+ lev
+ end
+ def lev2
+ @tag,@class='h2','toc'
+ lev
+ end
+ def lev3
+ @tag,@class='h3','toc'
+ lev
+ end
+ def lev4
+ @tag,@class='h4','toc'
+ lev
+ end
+ def lev5
+ @tag,@class='h5','toc'
+ lev
+ end
+ def lev6
+ @tag,@class='h6','toc'
+ lev
+ end
+ end
+end
+__END__
--
cgit v1.2.3
| | | |