šablona/makra/diagramy.xsl
author František Kučera <franta-hg@frantovo.cz>
Thu, 24 Oct 2019 22:06:44 +0200
changeset 136 d5feb9d8ebc3
parent 111 d59023a42d4b
permissions -rw-r--r--
fix license version: GNU GPLv3
franta-hg@51
     1
<?xml version="1.0" encoding="UTF-8"?>
franta-hg@61
     2
<!--
franta-hg@61
     3
XML Web generátor – program na generování webových stránek
franta-hg@61
     4
Copyright © 2012 František Kučera (frantovo.cz)
franta-hg@61
     5
franta-hg@61
     6
This program is free software: you can redistribute it and/or modify
franta-hg@61
     7
it under the terms of the GNU General Public License as published by
franta-hg@136
     8
the Free Software Foundation, version 3 of the License.
franta-hg@61
     9
franta-hg@61
    10
This program is distributed in the hope that it will be useful,
franta-hg@61
    11
but WITHOUT ANY WARRANTY; without even the implied warranty of
franta-hg@61
    12
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
franta-hg@61
    13
GNU General Public License for more details.
franta-hg@61
    14
franta-hg@61
    15
You should have received a copy of the GNU General Public License
franta-hg@61
    16
along with this program.  If not, see <http://www.gnu.org/licenses/>.
franta-hg@61
    17
-->
franta-hg@51
    18
<xsl:stylesheet version="2.0"
franta-hg@51
    19
	xmlns="http://www.w3.org/1999/xhtml"
franta-hg@51
    20
	xmlns:m="https://trac.frantovo.cz/xml-web-generator/wiki/xmlns/makro"
franta-hg@76
    21
	xmlns:j="java:cz.frantovo.xmlWebGenerator.makra.Diagram"
franta-hg@51
    22
	xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
franta-hg@51
    23
	exclude-result-prefixes="m j">
franta-hg@87
    24
franta-hg@52
    25
	<!--
franta-hg@52
    26
		Diagramy/grafy
franta-hg@52
    27
		**************
franta-hg@52
    28
		Můžeme vložit diagram – obrázek.
franta-hg@52
    29
		Pro jejich vykreslování se používá Graphviz – diagramy zadáváme v jeho syntaxi.
franta-hg@52
    30
		*
franta-hg@52
    31
		@orientace „vodorovně“ nebo „svisle“ (výchozí)
franta-hg@52
    32
		@nadpis můžeme uvést název diagramu
franta-hg@52
    33
		@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
    34
		@src zadání diagramu načteme ze souboru (potom je výchozí kompletní = 'ne')
franta-hg@52
    35
	-->
franta-hg@52
    36
	<xsl:template match="m:diagram">
franta-hg@111
    37
		<xsl:variable name="zadání">
franta-hg@111
    38
			<xsl:apply-templates select="*|text()"/>
franta-hg@111
    39
		</xsl:variable>
franta-hg@52
    40
		<xsl:call-template name="vložDiagram">
franta-hg@111
    41
			<xsl:with-param name="zadání" select="$zadání"/>
franta-hg@52
    42
			<xsl:with-param name="kompletní" select="@kompletní = 'ano'"/>
franta-hg@52
    43
		</xsl:call-template>
franta-hg@52
    44
	</xsl:template>
franta-hg@52
    45
	
franta-hg@52
    46
	<xsl:template match="m:diagram[@src]">
franta-hg@52
    47
		<xsl:call-template name="vložDiagram">
franta-hg@71
    48
			<xsl:with-param name="zadání" select="m:načti-textový-soubor(@src)"/>
franta-hg@52
    49
			<xsl:with-param name="kompletní" select="not(@kompletní) or @kompletní = 'ano'"/>
franta-hg@52
    50
		</xsl:call-template>
franta-hg@52
    51
	</xsl:template>
franta-hg@87
    52
franta-hg@87
    53
	<xsl:template name="vložDiagram">
franta-hg@52
    54
		<xsl:param name="zadání"/>
franta-hg@52
    55
		<xsl:param name="kompletní"/>
franta-hg@67
    56
		<xsl:variable name="souborDiagramu" select="j:vytvořDiagram(
franta-hg@67
    57
															$zadání, 
franta-hg@67
    58
															@orientace = 'vodorovně', 
franta-hg@67
    59
															$kompletní,
franta-hg@67
    60
															tokenize(base-uri(), '/')[last()],
franta-hg@67
    61
															@src
franta-hg@67
    62
															)"/>
franta-hg@52
    63
		<xsl:choose>
franta-hg@51
    64
			<xsl:when test="$souborDiagramu">
franta-hg@51
    65
				<div class="diagram">
franta-hg@67
    66
					<a href="{encode-for-uri($souborDiagramu)}.svg">
franta-hg@51
    67
						<img
franta-hg@67
    68
							src="{encode-for-uri($souborDiagramu)}.svg" 
franta-hg@55
    69
							alt="Diagram {(@nadpis, $souborDiagramu)[1]} | pokud nevidíte obrázek, váš prohlížeč stojí za starou bačkoru"
franta-hg@51
    70
							title="{@nadpis} (klikněte pro zobrazení samotného diagramu)"/>
franta-hg@51
    71
					</a>
franta-hg@51
    72
					<!-- 
franta-hg@51
    73
						TODO: SVG+PNG:
franta-hg@51
    74
						<xsl:variable name="svgDiagramu" select="document(concat($výstup, $souborDiagramu, '.svg'))/svg:svg"/>
franta-hg@51
    75
						<object
franta-hg@52
    76
						data="{$souborDiagramu}.svg"
franta-hg@52
    77
						type="image/svg+xml"
franta-hg@52
    78
						style="width: {$svgDiagramu/@width}; height: {$svgDiagramu/@height}">
franta-hg@52
    79
						<img src="{$souborDiagramu}.png" alt="Diagram {$souborDiagramu}"/>
franta-hg@51
    80
						</object>
franta-hg@51
    81
					-->
franta-hg@51
    82
					<xsl:if test="@nadpis">
franta-hg@51
    83
						<p class="nadpis"><xsl:value-of select="@nadpis"/></p>
franta-hg@51
    84
					</xsl:if>
franta-hg@51
    85
				</div>
franta-hg@51
    86
			</xsl:when>
franta-hg@51
    87
			<xsl:otherwise>
franta-hg@51
    88
				<xsl:message terminate="yes">Při vytváření diagramu došlo k chybě.</xsl:message>
franta-hg@51
    89
			</xsl:otherwise>
franta-hg@52
    90
		</xsl:choose>
franta-hg@52
    91
	</xsl:template>
franta-hg@51
    92
franta-hg@51
    93
</xsl:stylesheet>
franta-hg@87
    94