franta-hg@51: <?xml version="1.0" encoding="UTF-8"?>
franta-hg@61: <!--
franta-hg@61: XML Web generátor – program na generování webových stránek
franta-hg@61: Copyright © 2012 František Kučera (frantovo.cz)
franta-hg@61: 
franta-hg@61: This program is free software: you can redistribute it and/or modify
franta-hg@61: it under the terms of the GNU General Public License as published by
franta-hg@136: the Free Software Foundation, version 3 of the License.
franta-hg@61: 
franta-hg@61: This program is distributed in the hope that it will be useful,
franta-hg@61: but WITHOUT ANY WARRANTY; without even the implied warranty of
franta-hg@61: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
franta-hg@61: GNU General Public License for more details.
franta-hg@61: 
franta-hg@61: You should have received a copy of the GNU General Public License
franta-hg@61: along with this program.  If not, see <http://www.gnu.org/licenses/>.
franta-hg@61: -->
franta-hg@51: <xsl:stylesheet version="2.0"
franta-hg@51: 	xmlns="http://www.w3.org/1999/xhtml"
franta-hg@51: 	xmlns:m="https://trac.frantovo.cz/xml-web-generator/wiki/xmlns/makro"
franta-hg@76: 	xmlns:j="java:cz.frantovo.xmlWebGenerator.makra.Diagram"
franta-hg@51: 	xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
franta-hg@51: 	exclude-result-prefixes="m j">
franta-hg@87: 
franta-hg@52: 	<!--
franta-hg@52: 		Diagramy/grafy
franta-hg@52: 		**************
franta-hg@52: 		Můžeme vložit diagram – obrázek.
franta-hg@52: 		Pro jejich vykreslování se používá Graphviz – diagramy zadáváme v jeho syntaxi.
franta-hg@52: 		*
franta-hg@52: 		@orientace „vodorovně“ nebo „svisle“ (výchozí)
franta-hg@52: 		@nadpis můžeme uvést název diagramu
franta-hg@52: 		@kompletní „ano“ → předpokládáme kompletní zdroják v GraphViz syntaxi (pak nemá smysl uvádět orientaci). Výchozí je však „ne“ → uživatel zadává jen „vnitřek“ grafu – např. „A -> B; B -> C;“.  
franta-hg@52: 		@src zadání diagramu načteme ze souboru (potom je výchozí kompletní = 'ne')
franta-hg@52: 	-->
franta-hg@52: 	<xsl:template match="m:diagram">
franta-hg@111: 		<xsl:variable name="zadání">
franta-hg@111: 			<xsl:apply-templates select="*|text()"/>
franta-hg@111: 		</xsl:variable>
franta-hg@52: 		<xsl:call-template name="vložDiagram">
franta-hg@111: 			<xsl:with-param name="zadání" select="$zadání"/>
franta-hg@52: 			<xsl:with-param name="kompletní" select="@kompletní = 'ano'"/>
franta-hg@52: 		</xsl:call-template>
franta-hg@52: 	</xsl:template>
franta-hg@52: 	
franta-hg@52: 	<xsl:template match="m:diagram[@src]">
franta-hg@52: 		<xsl:call-template name="vložDiagram">
franta-hg@71: 			<xsl:with-param name="zadání" select="m:načti-textový-soubor(@src)"/>
franta-hg@52: 			<xsl:with-param name="kompletní" select="not(@kompletní) or @kompletní = 'ano'"/>
franta-hg@52: 		</xsl:call-template>
franta-hg@52: 	</xsl:template>
franta-hg@87: 
franta-hg@87: 	<xsl:template name="vložDiagram">
franta-hg@52: 		<xsl:param name="zadání"/>
franta-hg@52: 		<xsl:param name="kompletní"/>
franta-hg@67: 		<xsl:variable name="souborDiagramu" select="j:vytvořDiagram(
franta-hg@67: 															$zadání, 
franta-hg@67: 															@orientace = 'vodorovně', 
franta-hg@67: 															$kompletní,
franta-hg@67: 															tokenize(base-uri(), '/')[last()],
franta-hg@67: 															@src
franta-hg@67: 															)"/>
franta-hg@52: 		<xsl:choose>
franta-hg@51: 			<xsl:when test="$souborDiagramu">
franta-hg@51: 				<div class="diagram">
franta-hg@67: 					<a href="{encode-for-uri($souborDiagramu)}.svg">
franta-hg@51: 						<img
franta-hg@67: 							src="{encode-for-uri($souborDiagramu)}.svg" 
franta-hg@55: 							alt="Diagram {(@nadpis, $souborDiagramu)[1]} | pokud nevidíte obrázek, váš prohlížeč stojí za starou bačkoru"
franta-hg@51: 							title="{@nadpis} (klikněte pro zobrazení samotného diagramu)"/>
franta-hg@51: 					</a>
franta-hg@51: 					<!-- 
franta-hg@51: 						TODO: SVG+PNG:
franta-hg@51: 						<xsl:variable name="svgDiagramu" select="document(concat($výstup, $souborDiagramu, '.svg'))/svg:svg"/>
franta-hg@51: 						<object
franta-hg@52: 						data="{$souborDiagramu}.svg"
franta-hg@52: 						type="image/svg+xml"
franta-hg@52: 						style="width: {$svgDiagramu/@width}; height: {$svgDiagramu/@height}">
franta-hg@52: 						<img src="{$souborDiagramu}.png" alt="Diagram {$souborDiagramu}"/>
franta-hg@51: 						</object>
franta-hg@51: 					-->
franta-hg@51: 					<xsl:if test="@nadpis">
franta-hg@51: 						<p class="nadpis"><xsl:value-of select="@nadpis"/></p>
franta-hg@51: 					</xsl:if>
franta-hg@51: 				</div>
franta-hg@51: 			</xsl:when>
franta-hg@51: 			<xsl:otherwise>
franta-hg@51: 				<xsl:message terminate="yes">Při vytváření diagramu došlo k chybě.</xsl:message>
franta-hg@51: 			</xsl:otherwise>
franta-hg@52: 		</xsl:choose>
franta-hg@52: 	</xsl:template>
franta-hg@51: 
franta-hg@51: </xsl:stylesheet>
franta-hg@87: