franta-hg@94: <?xml version="1.0" encoding="UTF-8"?>
franta-hg@94: <!--
franta-hg@94: XML Web generátor – program na generování webových stránek
franta-hg@94: Copyright © 2012 František Kučera (frantovo.cz)
franta-hg@94: 
franta-hg@94: This program is free software: you can redistribute it and/or modify
franta-hg@94: 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@94: 
franta-hg@94: This program is distributed in the hope that it will be useful,
franta-hg@94: but WITHOUT ANY WARRANTY; without even the implied warranty of
franta-hg@94: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
franta-hg@94: GNU General Public License for more details.
franta-hg@94: 
franta-hg@94: You should have received a copy of the GNU General Public License
franta-hg@94: along with this program.  If not, see <http://www.gnu.org/licenses/>.
franta-hg@94: -->
franta-hg@94: <xsl:stylesheet version="2.0"
franta-hg@94: 	xmlns="http://www.w3.org/1999/xhtml"
franta-hg@107: 	xmlns:h="http://www.w3.org/1999/xhtml"
franta-hg@94: 	xmlns:m="https://trac.frantovo.cz/xml-web-generator/wiki/xmlns/makro"
franta-hg@94: 	xmlns:j="java:cz.frantovo.xmlWebGenerator.makra.Skriptování"
franta-hg@96: 	xmlns:k="https://trac.frantovo.cz/xml-web-generator/wiki/xmlns/konfigurace"
franta-hg@94: 	xmlns:s="https://trac.frantovo.cz/xml-web-generator/wiki/xmlns/strana"
franta-hg@94: 	xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
franta-hg@96: 	exclude-result-prefixes="m j k s">
franta-hg@94: 
franta-hg@94: 	<!--
franta-hg@94: 		Skriptování
franta-hg@94: 		***********
franta-hg@103: 		Provedeme skript zadaný v těle elementu nebo v souboru a jeho výstup vložíme do stránky.
franta-hg@94: 		*
franta-hg@103: 		@jazyk programovací jazyk, např. bash, perl, php (nepovinné, pokud je vyplněn atribut src)
franta-hg@108: 		@výstup formát výstupu skriptu:
franta-hg@108: 			text – libovolný text, escapujeme (výchozí)
franta-hg@108: 			xhtml – platný XML fragment, přidáme mu výchozí jmenný prostor XHTML a jmenný prostor pro makra
franta-hg@108: 			xml – platný XML dokument – vhodné pro další zpracování v jiných makrech
franta-hg@103: 		@src soubor se skriptem/programem (volitelný parametr – buď zadáme skript do těla elementu, nebo nastavíme tento atribut)
franta-hg@94: 	-->
franta-hg@94: 	<xsl:template match="m:skript">
franta-hg@95: 		
franta-hg@96: 		<xsl:variable name="režim" select="$konfigurace/k:web/k:skriptování/k:režim/text()"/>
franta-hg@96: 		
franta-hg@95: 		<xsl:choose>
franta-hg@96: 			<xsl:when test="$režim = 'povolit'">
franta-hg@113: 				<xsl:variable name="zadáníSkriptu">
franta-hg@113: 					<xsl:apply-templates select="*|text()"/>
franta-hg@113: 				</xsl:variable>
franta-hg@96: 				<xsl:variable name="výstupSkriptu" select="j:interpretuj(
franta-hg@113: 																	$zadáníSkriptu,
franta-hg@103: 																	@src,
franta-hg@96: 																	@jazyk,
franta-hg@96: 																	@výstup,
franta-hg@106: 																	(document-uri(/), resolve-uri('.'))[1],
franta-hg@96: 																	//s:stránka/s:nadpis/text(),
franta-hg@96: 																	//s:stránka/s:perex/text()
franta-hg@96: 																)"/>
franta-hg@108: 				<xsl:choose>
franta-hg@108: 					<xsl:when test="@výstup = 'xml'">
franta-hg@108: 						<!-- XML výstup zpracujeme, jak je: -->
franta-hg@108: 						<xsl:apply-templates select="$výstupSkriptu/*"/>
franta-hg@108: 					</xsl:when>
franta-hg@108: 					<xsl:otherwise>
franta-hg@108: 						<!-- Prostý text a XHTML fragmenty dostáváme zabalené v html/body -->
franta-hg@108: 						<xsl:apply-templates select="$výstupSkriptu/h:html/h:body/node()"/>
franta-hg@108: 					</xsl:otherwise>
franta-hg@108: 				</xsl:choose>
franta-hg@95: 			</xsl:when>
franta-hg@96: 
franta-hg@96: 			<xsl:when test="$režim = 'zakázat'">
franta-hg@96: 				<xsl:message terminate="yes">Stránka obsahuje skripty, ale skripty jsou zakázané → je potřeba je odstranit nebo upravit nastavení ve web.conf.</xsl:message>
franta-hg@96: 			</xsl:when>
franta-hg@96: 			<xsl:when test="$režim = 'ignorovat'">
franta-hg@96: 				<xsl:message>Stránka obsahuje skripty, ale skripty jsou ignorovány – změnu lze provést ve web.conf.</xsl:message>
franta-hg@96: 			</xsl:when>
franta-hg@108: 			<xsl:when test="$režim = 'vložit' and (@výstup = 'xml' or @výstup = 'xhtml')">
franta-hg@96: 				<xsl:message>Není možné jen tak vložit text, který měl mít výstup ve formátu XML – změnu lze provést ve web.conf</xsl:message>
franta-hg@96: 			</xsl:when>
franta-hg@96: 			<xsl:when test="$režim = 'vložit'">
franta-hg@96: 				<span class="vloženýNeinterpretovanýSkript jazyk-{@jazyk}">
franta-hg@96: 					<xsl:value-of select="text()"/>
franta-hg@96: 				</span>
franta-hg@96: 			</xsl:when>
franta-hg@96: 			<xsl:otherwise><!-- varovat = výchozí možnost -->
franta-hg@96: 				<xsl:choose>
franta-hg@108: 					<xsl:when test="@výstup = 'xml' or @výstup = 'xhtml'">
franta-hg@96: 						<xsl:message>Není možné možné vložit varování na místo, kde měl být skript generující XML – změnu lze provést ve web.conf</xsl:message>
franta-hg@96: 					</xsl:when>
franta-hg@96: 					<xsl:otherwise>
franta-hg@96: 						<xsl:text>[VAROVÁNÍ (</xsl:text>
franta-hg@96: 						<xsl:value-of select="@jazyk"/>
franta-hg@96: 						<xsl:text>): skripty jsou vypnuté – lze je zapnout ve web.conf]</xsl:text>
franta-hg@96: 						<xsl:message>Skript se neinterpretuje a vkládáme varování do stránky – změnu lze provést ve web.conf</xsl:message>
franta-hg@96: 					</xsl:otherwise>
franta-hg@96: 				</xsl:choose>
franta-hg@95: 			</xsl:otherwise>
franta-hg@95: 		</xsl:choose>
franta-hg@94: 	</xsl:template>
franta-hg@94: 
franta-hg@94: </xsl:stylesheet>
franta-hg@94: