<?xml version="1.0" encoding="UTF-8"?>

 <xsl:stylesheet version="2.0"

 	xmlns="http://www.w3.org/1999/xhtml"

 	xmlns:m="https://trac.frantovo.cz/xml-web-generator/wiki/xmlns/makro"

 	xmlns:j="java:cz.frantovo.xmlWebGenerator.Funkce"

 	xmlns:xsl="http://www.w3.org/1999/XSL/Transform"

 	exclude-result-prefixes="m j">

 	<!--

 		Diagramy/grafy

 		**************

 		Můžeme vložit diagram – obrázek.

 		Pro jejich vykreslování se používá Graphviz – diagramy zadáváme v jeho syntaxi.

 		*

 		@orientace „vodorovně“ nebo „svisle“ (výchozí)

 		@nadpis můžeme uvést název diagramu

 		@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;“.  

 		@src zadání diagramu načteme ze souboru (potom je výchozí kompletní = 'ne')

 	-->

 	<xsl:template match="m:diagram">

 		<xsl:call-template name="vložDiagram">

 			<xsl:with-param name="zadání" select="text()"/>

 			<xsl:with-param name="kompletní" select="@kompletní = 'ano'"/>

 		</xsl:call-template>

 	</xsl:template>

 	<xsl:template match="m:diagram[@src]">

 		<xsl:call-template name="vložDiagram">

 			<xsl:with-param name="zadání" select="unparsed-text(concat('../', $vstup, @src))"/>

 			<xsl:with-param name="kompletní" select="not(@kompletní) or @kompletní = 'ano'"/>

 		</xsl:call-template>

 	</xsl:template>

     <xsl:template name="vložDiagram">

 		<xsl:param name="zadání"/>

 		<xsl:param name="kompletní"/>

 		<xsl:variable name="souborDiagramu" select="j:vytvořDiagram($zadání, @orientace = 'vodorovně', $kompletní)"/>

 		<xsl:choose>

 			<xsl:when test="$souborDiagramu">

 				<div class="diagram">

 					<a href="{$souborDiagramu}.svg">

 						<img

 							src="{$souborDiagramu}.svg" 

 							alt="Diagram {(@nadpis, $souborDiagramu)[1]} | pokud nevidíte obrázek, váš prohlížeč stojí za starou bačkoru"

 							title="{@nadpis} (klikněte pro zobrazení samotného diagramu)"/>

 					</a>

 					<!-- 

 						TODO: SVG+PNG:

 						<xsl:variable name="svgDiagramu" select="document(concat($výstup, $souborDiagramu, '.svg'))/svg:svg"/>

 						<object

 						data="{$souborDiagramu}.svg"

 						type="image/svg+xml"

 						style="width: {$svgDiagramu/@width}; height: {$svgDiagramu/@height}">

 						<img src="{$souborDiagramu}.png" alt="Diagram {$souborDiagramu}"/>

 						</object>

 					-->

 					<xsl:if test="@nadpis">

 						<p class="nadpis"><xsl:value-of select="@nadpis"/></p>

 					</xsl:if>

 				</div>

 			</xsl:when>

 			<xsl:otherwise>

 				<xsl:message terminate="yes">Při vytváření diagramu došlo k chybě.</xsl:message>

 			</xsl:otherwise>

 		</xsl:choose>

 	</xsl:template>

 </xsl:stylesheet>