# encoding: utf-8 =begin * Name: SiSU * Description: a framework for document structuring, publishing and search * Author: Ralph Amissah * Copyright: (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013 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: * Git * Ralph Amissah ** Description: css stylesheets =end module SiSU_Style require_relative 'sysenv' # sysenv.rb require_relative 'defaults' # defaults.rb class CSS_HeadInfo def initialize(md,ft='html') @md,@ft=md,ft @env=SiSU_Env::InfoEnv.new('',md) @fn_css ||=SiSU_Env::CSS_Default.new @o_str ||=SiSU_Env::ProcessingSettings.new(md).output_dir_structure css_copy end def stylesheet def css_path SiSU_Env::CSS_Stylesheet.new(@md) end def css_embed_content @css_embed_content ||=SiSU_Style::CSS.new end def css_embed? if @ft=='html' \ && @o_str.dump_or_redirect? true else false end end def css_embed(css) <<-WOK WOK end def css_action style_css=SiSU_Style::CSS.new css=case @ft when 'html' css=css_embed_content.html css_embed(css) when 'xhtml' css_path.xhtml when 'xml_sax' css_path.xml_sax when 'xml_dom' css_path.xml_dom else css_embed_content.html end end def css_head (css_embed?) \ ? css_action : "#{css_path.html}#{css_path.html_seg}" end def css_head_seg (css_embed?) \ ? css_action : css_path.html_seg end def css_head_xml css_action end self end def css_copy if @o_str.dump_or_redirect? css=SiSU_Style::CSS.new if @o_str.dump? css_pth="#{@md.opt.opt_act[:dump][:inst]}/#{@env.path.style}" elsif @o_str.redirect? css_pth="#{@md.opt.opt_act[:redirect][:inst]}/#{@md.fnb}/#{@env.path.style}" end FileUtils::mkdir_p(css_pth) unless FileTest.directory?(css_pth) case @ft when 'html' style=File.new("#{css_pth}/#{@fn_css.html}",'w') style << css.html style.close when 'xhtml' style=File.new("#{css_pth}/#{@fn_css.xhtml}",'w') style << css.xhtml style.close when 'xml_sax' style=File.new("#{css_pth}/#{@fn_css.xml_sax}",'w') style << css.xml_sax style.close when 'xml_dom' style=File.new("#{css_pth}/#{@fn_css.xml_dom}",'w') style << css.xml_dom style.close css_path.xml_dom end end end end class CSS def initialize @vz=SiSU_Viz::Defaults.new end def fonts @vz.font_fonts end def html_tables #stylesheet for css table_pages <