vstup/skriptování.xml
author František Kučera <franta-hg@frantovo.cz>
Sun, 01 Jul 2012 19:19:04 +0200
changeset 105 f2e79d6b0ad3
parent 103 aa91d1c6d4c1
child 107 379a2a893fd1
permissions -rw-r--r--
#20 Skriptování: nedělitelné mezery
franta-hg@94
     1
<stránka
franta-hg@94
     2
	xmlns="https://trac.frantovo.cz/xml-web-generator/wiki/xmlns/strana"
franta-hg@94
     3
	xmlns:m="https://trac.frantovo.cz/xml-web-generator/wiki/xmlns/makro">
franta-hg@94
     4
	<nadpis>Skriptování</nadpis>
franta-hg@94
     5
	<perex>Na stránku můžeme vložit výstup skriptů.</perex>
franta-hg@97
     6
	<pořadí>50</pořadí>
franta-hg@94
     7
franta-hg@94
     8
	<text xmlns="http://www.w3.org/1999/xhtml">
franta-hg@94
     9
	
franta-hg@94
    10
		<p>
franta-hg@94
    11
			Na stránkách můžeme používat skripty.
franta-hg@95
    12
			Spouští se při generování a jejich standardní výstup se vloží do stránky.
franta-hg@95
    13
			Třeba doprostřed textu ostavce nebo do jiného elementu.
franta-hg@94
    14
		</p>
franta-hg@94
    15
		<p>
franta-hg@94
    16
			Příklad:
franta-hg@95
    17
			<em>
franta-hg@95
    18
				Tyto stránky byly vygenerované v systému
franta-hg@95
    19
				<span title="tento text pochází ze skriptu"><m:skript jazyk="bash">uname -o</m:skript></span>.
franta-hg@95
    20
			</em>
franta-hg@95
    21
		</p>
franta-hg@95
    22
franta-hg@95
    23
		<p>
franta-hg@103
    24
			Díky skriptování můžeme stránky obohatit o prakticky libovolný obsah – 
franta-hg@103
    25
			jak prostý text, tak i XHTML fragmenty.<m:podČarou>zapíná se pomocí atributu 
franta-hg@103
    26
			<code>výstup="xml"</code> a generátor pak kontroluje správné formátování – 
franta-hg@103
    27
			nestane se vám, že byste omylem vygenerovali stránky s překříženými nebo neuzavřenými značkami.</m:podČarou>
franta-hg@103
    28
		</p>
franta-hg@103
    29
		<p>
franta-hg@103
    30
			Skriptování ale může být nebezpečné, pokud byste spustili generátor na stránkách,
franta-hg@95
    31
			které psal někdo nedůvěryhodný a vložil do nich škodlivý kód.
franta-hg@105
    32
			Kromě toho, ukázková sada stránek by měla být přeložitelná kdekoli a mít minimum závislostí
franta-hg@103
    33
			(ne každý musí mít nainstalovaný Perl nebo Python či další podporované interprety).
franta-hg@105
    34
			Proto je skriptování ve výchozím stavu vypnuté – je potřeba ho povolit v souboru <code>web.conf</code>.
franta-hg@95
    35
		</p>
franta-hg@95
    36
franta-hg@95
    37
		<h2>Podporované jazyky</h2>
franta-hg@95
    38
		<p>
franta-hg@95
    39
			V současnosti jsou podporované tyto jazyky:
franta-hg@94
    40
		</p>
franta-hg@94
    41
		
franta-hg@95
    42
		<table>
franta-hg@95
    43
			<thead>
franta-hg@95
    44
				<tr>
franta-hg@95
    45
					<td>Jazyk</td>
franta-hg@95
    46
					<td>Interpret</td>
franta-hg@95
    47
				</tr>
franta-hg@95
    48
			</thead>
franta-hg@95
    49
			<tbody>
franta-hg@103
    50
				<m:skript jazyk="perl" výstup="xml"><![CDATA[
franta-hg@94
    51
use strict;
franta-hg@103
    52
use warnings;
franta-hg@94
    53
franta-hg@95
    54
open(JAVA, "<", $ENV{"XWG_SKRIPTOVANI_JAVA"}) or die $!;
franta-hg@94
    55
franta-hg@94
    56
while (<JAVA>) {
franta-hg@94
    57
	if (/podporovanýJazyk\.put\("(\w+)",\s*"(.*)"\);/) {
franta-hg@95
    58
		print "<tr><td><code>$1</code></td><td><code>$2</code></td></tr>\n";
franta-hg@94
    59
	}
franta-hg@94
    60
}
franta-hg@95
    61
				]]></m:skript>
franta-hg@95
    62
			</tbody>
franta-hg@95
    63
		</table>
franta-hg@94
    64
franta-hg@94
    65
		<h2>Perl</h2>
franta-hg@94
    66
		<p>Jazyky použité nebo citované na této stránce:</p>
franta-hg@99
    67
		<!--
franta-hg@99
    68
			Lepšího výsledku bychom samozřejmě dosáhli pomocí XPath dotazu,
franta-hg@99
    69
			ale toto je příklad na Perl :-)
franta-hg@99
    70
		-->
franta-hg@94
    71
		<pre><m:skript jazyk="perl"><![CDATA[
franta-hg@94
    72
use strict;
franta-hg@103
    73
use warnings;
franta-hg@94
    74
franta-hg@94
    75
open(XML, "<", $ENV{"XWG_STRANKA_SOUBOR"});
franta-hg@94
    76
my %skripty;
franta-hg@94
    77
franta-hg@94
    78
while (<XML>) {
franta-hg@94
    79
	if (/m:skript\s+jazyk="(\w+)"/) {
franta-hg@94
    80
		$skripty{$1}++;
franta-hg@94
    81
	}
franta-hg@94
    82
}
franta-hg@94
    83
franta-hg@94
    84
for(keys(%skripty)) {
franta-hg@94
    85
	print "$skripty{$_}×\t $_\n";
franta-hg@94
    86
}
franta-hg@94
    87
			]]></m:skript></pre>
franta-hg@94
    88
franta-hg@94
    89
			<h2>BASH</h2>
franta-hg@94
    90
		<pre><m:skript jazyk="bash"><![CDATA[
franta-hg@94
    91
echo -n "Právě je: ";
franta-hg@94
    92
date;
franta-hg@94
    93
echo -n "Operační systém: ";
franta-hg@102
    94
uname -o;
franta-hg@94
    95
echo -n "SHA-1 otisk zdrojáku této stránky: ";
franta-hg@100
    96
sha1sum "$XWG_STRANKA_SOUBOR" | cut -f 1 -d " ";
franta-hg@94
    97
			]]></m:skript></pre>
franta-hg@94
    98
franta-hg@94
    99
			<!--
franta-hg@94
   100
			<h2>PHP</h2>
franta-hg@94
   101
			<pre style="max-height: 200px;"><m:skript jazyk="php"><![CDATA[
franta-hg@94
   102
<?php
franta-hg@94
   103
phpinfo();
franta-hg@94
   104
?>
franta-hg@94
   105
			]]></m:skript></pre>
franta-hg@94
   106
			-->
franta-hg@94
   107
franta-hg@94
   108
			<h2>Proměnné prostředí</h2>
franta-hg@94
   109
			<p>
franta-hg@94
   110
				Ve skriptech máme dostupné následující proměnné prostředí:
franta-hg@94
   111
			</p>
franta-hg@94
   112
			
franta-hg@95
   113
			<table>
franta-hg@95
   114
				<thead>
franta-hg@95
   115
					<tr>
franta-hg@95
   116
						<td>Proměnná</td>
franta-hg@95
   117
						<td>Význam</td>
franta-hg@95
   118
					</tr>
franta-hg@95
   119
				</thead>
franta-hg@95
   120
				<tbody>
franta-hg@103
   121
					<!-- Pokud načítáme skript ze souboru, je atribut jazyk nepovinný. -->
franta-hg@103
   122
					<m:skript jazyk="perl" výstup="xml" src="skriptování-proměnné.pl"/>
franta-hg@95
   123
				</tbody>
franta-hg@95
   124
			</table>
franta-hg@94
   125
			
franta-hg@94
   126
			<p>
franta-hg@94
   127
				Kód:
franta-hg@94
   128
			</p>
franta-hg@94
   129
			
franta-hg@94
   130
			<m:pre jazyk="xml"><![CDATA[<m:skript jazyk="bash">
franta-hg@94
   131
echo "URI:    $XWG_STRANKA_URI";
franta-hg@94
   132
echo "Soubor: $XWG_STRANKA_SOUBOR";
franta-hg@94
   133
echo "Nadpis: $XWG_STRANKA_NADPIS";
franta-hg@94
   134
echo "Perex:  $XWG_STRANKA_PEREX";
franta-hg@94
   135
</m:skript>]]></m:pre>
franta-hg@94
   136
			
franta-hg@94
   137
			<p>nám vypíše:</p>
franta-hg@94
   138
			
franta-hg@94
   139
			<pre><m:skript jazyk="bash"><![CDATA[
franta-hg@94
   140
echo "URI:    $XWG_STRANKA_URI" | sed s/\\/home\\/$USER/\\/home\\/xwg/g;
franta-hg@94
   141
echo "Soubor: $XWG_STRANKA_SOUBOR" | sed s/\\/home\\/$USER/\\/home\\/xwg/g;
franta-hg@94
   142
echo "Nadpis: $XWG_STRANKA_NADPIS";
franta-hg@94
   143
echo "Perex:  $XWG_STRANKA_PEREX";
franta-hg@94
   144
		]]></m:skript></pre>
franta-hg@94
   145
franta-hg@94
   146
	</text>
franta-hg@94
   147
franta-hg@94
   148
</stránka>
franta-hg@94
   149