franta-hg@89: <?xml version="1.0" encoding="UTF-8"?>
franta-hg@120: <!--
franta-hg@120: Copyright © 2014 František Kučera (frantovo.cz)
franta-hg@120: 
franta-hg@120: This program is free software: you can redistribute it and/or modify
franta-hg@120: it under the terms of the GNU General Public License as published by
franta-hg@120: the Free Software Foundation, either version 3 of the License, or
franta-hg@120: (at your option) any later version.
franta-hg@120: 
franta-hg@120: This program is distributed in the hope that it will be useful,
franta-hg@120: but WITHOUT ANY WARRANTY; without even the implied warranty of
franta-hg@120: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
franta-hg@120: GNU General Public License for more details.
franta-hg@120: 
franta-hg@120: You should have received a copy of the GNU General Public License
franta-hg@120: along with this program.  If not, see <http://www.gnu.org/licenses/>.
franta-hg@120: -->
franta-hg@89: <xsl:stylesheet version="2.0"
franta-hg@89: 	xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
franta-hg@89: 	xmlns:fn="http://www.w3.org/2005/xpath-functions"
franta-hg@89: 	xmlns:h="http://www.w3.org/1999/xhtml">
franta-hg@89: 	<xsl:output method="text" encoding="UTF-8"/>
franta-hg@89: 	<xsl:strip-space elements="*"/>
franta-hg@89: 	
franta-hg@89: 	<xsl:output method="text" encoding="UTF-8"/>
franta-hg@89: 	<xsl:strip-space elements="*"/>
franta-hg@89: 	
franta-hg@89: 	<xsl:variable name="urlBase" select="/h:html/h:head/h:base/@href"/>
franta-hg@91: 
franta-hg@89: 	
franta-hg@89: 	<!-- Celý dokument -->
franta-hg@89: 	<xsl:template match="/">
franta-hg@89: 		<xsl:apply-templates select="h:html/h:body"/>
franta-hg@89: 	</xsl:template>
franta-hg@89: 
franta-hg@91: 
franta-hg@89: 	<xsl:template match="h:h1">
franta-hg@89: 		<xsl:value-of select="text()"/>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@92: 		<xsl:for-each select="1 to string-length(.)">=</xsl:for-each>		
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@89: 	
franta-hg@91: 	
franta-hg@89: 	<xsl:template match="h:h2">
franta-hg@89: 		<xsl:value-of select="text()"/>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:for-each select="1 to string-length(.)">-</xsl:for-each>		
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@89: 	
franta-hg@91: 	
franta-hg@89: 	<xsl:template match="h:h3">
franta-hg@89: 		<xsl:for-each select="1 to 3">#</xsl:for-each>
franta-hg@89: 		<xsl:text> </xsl:text>
franta-hg@89: 		<xsl:value-of select="text()"/>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@91: 	
franta-hg@89: 	
franta-hg@89: 	<xsl:template match="h:h4">
franta-hg@89: 		<xsl:for-each select="1 to 4">#</xsl:for-each>
franta-hg@89: 		<xsl:text> </xsl:text>
franta-hg@89: 		<xsl:value-of select="text()"/>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@91: 	
franta-hg@89: 	
franta-hg@89: 	<xsl:template match="h:h5">
franta-hg@89: 		<xsl:for-each select="1 to 5">#</xsl:for-each>
franta-hg@89: 		<xsl:text> </xsl:text>
franta-hg@89: 		<xsl:value-of select="text()"/>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@89: 	
franta-hg@91: 	
franta-hg@89: 	<xsl:template match="h:h6">
franta-hg@89: 		<xsl:for-each select="1 to 6">#</xsl:for-each>
franta-hg@89: 		<xsl:text> </xsl:text>
franta-hg@89: 		<xsl:value-of select="text()"/>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@89: 
franta-hg@89: 
franta-hg@89: 	<xsl:template match="h:p">
franta-hg@89: 		<xsl:apply-templates/>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@91: 
franta-hg@89: 	
franta-hg@120: 	<!--
franta-hg@120: 		TODO: převzít odsazování z hellDesku?
franta-hg@120: 	-->
franta-hg@90: 	<xsl:template match="h:blockquote/h:p">
franta-hg@90: 		<xsl:text>&gt; </xsl:text>
franta-hg@90: 		<xsl:apply-templates/>
franta-hg@90: 		<xsl:text>&#10;</xsl:text>
franta-hg@90: 		<xsl:text>&#10;</xsl:text>
franta-hg@90: 	</xsl:template>
franta-hg@92: 
franta-hg@97: 	
franta-hg@92: 	<xsl:template match="h:cite[not(matches(., '^(&quot;|„)'))]">
franta-hg@92: 		<xsl:text>„</xsl:text>
franta-hg@92: 		<xsl:apply-templates/>
franta-hg@92: 		<xsl:text>“</xsl:text>
franta-hg@92: 	</xsl:template>	
franta-hg@91: 	
franta-hg@97: 	
franta-hg@89: 	<xsl:template match="h:a">
franta-hg@120: 		<xsl:if test="not(text() = @href)">
franta-hg@120: 			<xsl:text>'</xsl:text>
franta-hg@120: 			<xsl:apply-templates select="node()"/>
franta-hg@120: 			<xsl:text>' </xsl:text>
franta-hg@120: 		</xsl:if>
franta-hg@120: 		<xsl:text>&lt;</xsl:text>
franta-hg@89: 		<xsl:choose>
franta-hg@89: 			<xsl:when test="matches(@href, '^(http:|https:|ftp:)')">
franta-hg@89: 				<xsl:value-of select="@href"/>
franta-hg@89: 			</xsl:when>
franta-hg@89: 			<xsl:when test="matches(@href, '^mailto:')">
franta-hg@89: 				<xsl:value-of select="substring-after(@href, 'mailto:')"/>
franta-hg@89: 			</xsl:when>
franta-hg@89: 			<xsl:otherwise>
franta-hg@89: 				<xsl:choose>
franta-hg@89: 					<xsl:when test="ends-with($urlBase, '/') or starts-with(@href, '/')">
franta-hg@89: 						<xsl:value-of select="concat($urlBase, @href)"/>
franta-hg@89: 					</xsl:when>
franta-hg@89: 					<xsl:otherwise>
franta-hg@89: 						<xsl:value-of select="concat($urlBase, '/', @href)"/>
franta-hg@89: 					</xsl:otherwise>
franta-hg@89: 				</xsl:choose>
franta-hg@89: 			</xsl:otherwise>
franta-hg@89: 		</xsl:choose>	
franta-hg@89: 		<xsl:text>&gt;</xsl:text>
franta-hg@89: 		<xsl:if test="@title and not(matches(@title, '^\s*$'))">
franta-hg@89: 			<xsl:text> (</xsl:text>
franta-hg@89: 			<xsl:value-of select="@title"/>
franta-hg@89: 			<xsl:text>)</xsl:text>
franta-hg@89: 		</xsl:if>
franta-hg@89: 	</xsl:template>
franta-hg@89: 	
franta-hg@91: 	
franta-hg@89: 	<xsl:template match="h:img">
franta-hg@89: 		<xsl:variable name="obrázek">
franta-hg@89: 			<h:a href="{@src}" title="{@title}">Obrázek: <xsl:value-of select="@alt"/></h:a>
franta-hg@89: 		</xsl:variable>
franta-hg@89: 		<xsl:apply-templates select="$obrázek/node()"/>
franta-hg@89: 	</xsl:template>
franta-hg@89: 	
franta-hg@91: 	
franta-hg@89: 	<xsl:template match="h:strong|h:b">
franta-hg@89: 		<xsl:text>**</xsl:text>
franta-hg@89: 		<xsl:apply-templates/>
franta-hg@89: 		<xsl:text>**</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@89: 	
franta-hg@91: 	
franta-hg@89: 	<xsl:template match="h:em|h:i">
franta-hg@89: 		<xsl:text>*</xsl:text>
franta-hg@89: 		<xsl:apply-templates/>
franta-hg@89: 		<xsl:text>*</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@89: 	
franta-hg@91: 	
franta-hg@89: 	<xsl:template match="h:abbr[@title]">
franta-hg@89: 		<xsl:apply-templates/>
franta-hg@89: 		<xsl:text> (</xsl:text>
franta-hg@89: 		<xsl:value-of select="@title"/>
franta-hg@89: 		<xsl:text>)</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@89: 	
franta-hg@91: 	
franta-hg@120: 	<!--
franta-hg@120: 		TODO: převzít odsazování z hellDesku?
franta-hg@120: 	-->
franta-hg@89: 	<xsl:template match="h:pre">
franta-hg@89: 		<xsl:text>--------------------------------</xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:apply-templates/>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:text>--------------------------------</xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@89: 	
franta-hg@91: 	
franta-hg@89: 	<xsl:template match="h:code">
franta-hg@89: 		<xsl:text>`</xsl:text>
franta-hg@89: 		<xsl:apply-templates/>
franta-hg@89: 		<xsl:text>`</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@89: 	
franta-hg@91: 	
franta-hg@89: 	<xsl:template match="h:hr">
franta-hg@89: 		<xsl:text>----------------------------------------------------------------</xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 	</xsl:template>
franta-hg@89: 	
franta-hg@91: 	
franta-hg@110: 	<xsl:template match="h:br">
franta-hg@110: 		<xsl:text>&#10;</xsl:text>
franta-hg@110: 	</xsl:template>	
franta-hg@110: 
franta-hg@110: 
franta-hg@96: 	<xsl:template match="h:ol|h:ul">
franta-hg@95: 		<xsl:variable name="úroveň" select="count(ancestor::h:li)"/>
franta-hg@95: 		<xsl:variable name="odsazení">
franta-hg@96: 			<!-- položky na nejvyšší úrovni odsazené jednou mezerou -->
franta-hg@96: 			<xsl:value-of select="' '"/>
franta-hg@96: 			<xsl:for-each select="2 to $úroveň+1">
franta-hg@96: 				<!-- položky na druhé a vyšší úrovni odsazené vždy dvěma dalšími mezerami -->
franta-hg@95: 				<xsl:value-of select="'  '"/>
franta-hg@95: 			</xsl:for-each>
franta-hg@95: 		</xsl:variable>
franta-hg@95: 		
franta-hg@95: 		<xsl:if test="$úroveň gt 0">
franta-hg@95: 			<xsl:text>&#10;</xsl:text>
franta-hg@95: 		</xsl:if>
franta-hg@95: 		
franta-hg@89: 		<xsl:for-each select="h:li">
franta-hg@96: 			<xsl:if test="parent::h:ol"><xsl:value-of select="concat($odsazení, position(), ') ')"/></xsl:if>
franta-hg@96: 			<xsl:if test="parent::h:ul"><xsl:value-of select="concat($odsazení, '- ')"/></xsl:if>
franta-hg@89: 			<xsl:apply-templates/>
franta-hg@96: 			<xsl:if test="$úroveň = 0 or not(position() = last())">
franta-hg@96: 				<xsl:text>&#10;</xsl:text>
franta-hg@96: 			</xsl:if>
franta-hg@120: 		</xsl:for-each>
franta-hg@96: 		
franta-hg@96: 		<xsl:if test="$úroveň = 0">
franta-hg@89: 			<xsl:text>&#10;</xsl:text>
franta-hg@96: 		</xsl:if>
franta-hg@89: 	</xsl:template>
franta-hg@89: 	
franta-hg@89: 	
franta-hg@89: 	<xsl:template match="text()[not(parent::h:pre)]">
franta-hg@120: 		<xsl:if test="matches(., '^\s') and preceding-sibling::node() and not(preceding-sibling::h:br)">
franta-hg@89: 			<xsl:text> </xsl:text>
franta-hg@89: 		</xsl:if>
franta-hg@89: 		<xsl:value-of select="normalize-space(.)"/>
franta-hg@99: 		<xsl:if test="matches(., '\s$') and following-sibling::node()">
franta-hg@89: 			<xsl:text> </xsl:text>
franta-hg@89: 		</xsl:if>
franta-hg@89: 	</xsl:template>
franta-hg@89: 
franta-hg@89: 	
franta-hg@89: 	<xsl:template match="h:div[@class='wwwLinks']">
franta-hg@91: 		<!-- 
franta-hg@91: 			Dvě pomlčky a mezeru budou e-maliloví klienti považovat za začátek podpisu
franta-hg@91: 			a zobrazí ho šedivým písmem a nebudou ho citovat v odpovědích.
franta-hg@91: 		-->
franta-hg@89: 		<xsl:text>-- </xsl:text>
franta-hg@89: 		<xsl:text>&#10;</xsl:text>
franta-hg@89: 		<xsl:apply-templates/>	
franta-hg@89: 	</xsl:template>	
franta-hg@89: 
franta-hg@89: 
franta-hg@89: </xsl:stylesheet>