root/šablona/makra/skriptování.xsl @ 113:18bf0044f5ab

Revision 113:18bf0044f5ab, 4.4 KB (checked in by František Kučera <franta-hg@…>, 12 years ago)

#20 Skriptování: uvnitř zadání skriptu lze používat jiná makra (interpretují se před provedením skriptu).

Line 
1<?xml version="1.0" encoding="UTF-8"?>
2<!--
3XML Web generátor – program na generování webových stránek
4Copyright © 2012 František Kučera (frantovo.cz)
5
6This program is free software: you can redistribute it and/or modify
7it under the terms of the GNU General Public License as published by
8the Free Software Foundation, either version 3 of the License, or
9(at your option) any later version.
10
11This program is distributed in the hope that it will be useful,
12but WITHOUT ANY WARRANTY; without even the implied warranty of
13MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14GNU General Public License for more details.
15
16You should have received a copy of the GNU General Public License
17along with this program.  If not, see <http://www.gnu.org/licenses/>.
18-->
19<xsl:stylesheet version="2.0"
20        xmlns="http://www.w3.org/1999/xhtml"
21        xmlns:h="http://www.w3.org/1999/xhtml"
22        xmlns:m="https://trac.frantovo.cz/xml-web-generator/wiki/xmlns/makro"
23        xmlns:j="java:cz.frantovo.xmlWebGenerator.makra.Skriptování"
24        xmlns:k="https://trac.frantovo.cz/xml-web-generator/wiki/xmlns/konfigurace"
25        xmlns:s="https://trac.frantovo.cz/xml-web-generator/wiki/xmlns/strana"
26        xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
27        exclude-result-prefixes="m j k s">
28
29        <!--
30                Skriptování
31                ***********
32                Provedeme skript zadaný v těle elementu nebo v souboru a jeho výstup vložíme do stránky.
33                *
34                @jazyk programovací jazyk, např. bash, perl, php (nepovinné, pokud je vyplněn atribut src)
35                @výstup formát výstupu skriptu:
36                        text – libovolný text, escapujeme (výchozí)
37                        xhtml – platný XML fragment, přidáme mu výchozí jmenný prostor XHTML a jmenný prostor pro makra
38                        xml – platný XML dokument – vhodné pro další zpracování v jiných makrech
39                @src soubor se skriptem/programem (volitelný parametr – buď zadáme skript do těla elementu, nebo nastavíme tento atribut)
40        -->
41        <xsl:template match="m:skript">
42               
43                <xsl:variable name="režim" select="$konfigurace/k:web/k:skriptování/k:režim/text()"/>
44               
45                <xsl:choose>
46                        <xsl:when test="$režim = 'povolit'">
47                                <xsl:variable name="zadáníSkriptu">
48                                        <xsl:apply-templates select="*|text()"/>
49                                </xsl:variable>
50                                <xsl:variable name="výstupSkriptu" select="j:interpretuj(
51                                                                                                                                        $zadáníSkriptu,
52                                                                                                                                        @src,
53                                                                                                                                        @jazyk,
54                                                                                                                                        @výstup,
55                                                                                                                                        (document-uri(/), resolve-uri('.'))[1],
56                                                                                                                                        //s:stránka/s:nadpis/text(),
57                                                                                                                                        //s:stránka/s:perex/text()
58                                                                                                                                )"/>
59                                <xsl:choose>
60                                        <xsl:when test="@výstup = 'xml'">
61                                                <!-- XML výstup zpracujeme, jak je: -->
62                                                <xsl:apply-templates select="$výstupSkriptu/*"/>
63                                        </xsl:when>
64                                        <xsl:otherwise>
65                                                <!-- Prostý text a XHTML fragmenty dostáváme zabalené v html/body -->
66                                                <xsl:apply-templates select="$výstupSkriptu/h:html/h:body/node()"/>
67                                        </xsl:otherwise>
68                                </xsl:choose>
69                        </xsl:when>
70
71                        <xsl:when test="$režim = 'zakázat'">
72                                <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>
73                        </xsl:when>
74                        <xsl:when test="$režim = 'ignorovat'">
75                                <xsl:message>Stránka obsahuje skripty, ale skripty jsou ignorovány – změnu lze provést ve web.conf.</xsl:message>
76                        </xsl:when>
77                        <xsl:when test="$režim = 'vložit' and (@výstup = 'xml' or @výstup = 'xhtml')">
78                                <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>
79                        </xsl:when>
80                        <xsl:when test="$režim = 'vložit'">
81                                <span class="vloženýNeinterpretovanýSkript jazyk-{@jazyk}">
82                                        <xsl:value-of select="text()"/>
83                                </span>
84                        </xsl:when>
85                        <xsl:otherwise><!-- varovat = výchozí možnost -->
86                                <xsl:choose>
87                                        <xsl:when test="@výstup = 'xml' or @výstup = 'xhtml'">
88                                                <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>
89                                        </xsl:when>
90                                        <xsl:otherwise>
91                                                <xsl:text>[VAROVÁNÍ (</xsl:text>
92                                                <xsl:value-of select="@jazyk"/>
93                                                <xsl:text>): skripty jsou vypnuté – lze je zapnout ve web.conf]</xsl:text>
94                                                <xsl:message>Skript se neinterpretuje a vkládáme varování do stránky – změnu lze provést ve web.conf</xsl:message>
95                                        </xsl:otherwise>
96                                </xsl:choose>
97                        </xsl:otherwise>
98                </xsl:choose>
99        </xsl:template>
100
101</xsl:stylesheet>
102
Note: See TracBrowser for help on using the browser.