document validation (stub)
[librarian.git] / librarian / formats / pdf / res / wl2tex.xslt
1 <?xml version="1.0" encoding="utf-8"?>
2 <!--
3
4    This file is part of Librarian, licensed under GNU Affero GPLv3 or later.
5    Copyright © Fundacja Nowoczesna Polska. See NOTICE for more information.
6
7 -->
8 <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
9     xmlns:wl="http://wolnelektury.pl/functions"
10     xmlns:dc="http://purl.org/dc/elements/1.1/"
11     xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" >
12
13 <xsl:output encoding="utf-8" indent="yes" version="2.0" />
14
15 <xsl:template match="utwor">
16     <TeXML xmlns="http://getfo.sourceforge.net/texml/ns1">
17         <TeXML escape="0">
18         \documentclass[<xsl:value-of select="wl:get('customization_str')"/>]{wl}
19         \usepackage{style}
20         <xsl:if test="wl:get('has_cover')">
21             \usepackage{makecover}
22         </xsl:if>
23
24         <xsl:choose>
25             <xsl:when test="wl:get('morefloats') = 'new'">
26                 <TeXML escape="0">
27                     \usepackage[maxfloats=64]{morefloats}
28                 </TeXML>
29             </xsl:when>
30             <xsl:when test="wl:get('morefloats') = 'old'">
31                 <TeXML escape="0">
32                     \usepackage{morefloats}
33                 </TeXML>
34             </xsl:when>
35             <xsl:when test="wl:get('morefloats') = 'none'" />
36             <xsl:otherwise>
37                 <TeXML escape="0">
38                     \IfFileExists{morefloats.sty}{
39                         \usepackage{morefloats}
40                     }{}
41                 </TeXML>
42             </xsl:otherwise>
43         </xsl:choose>
44
45         <xsl:apply-templates select="rdf:RDF" mode="titlepage" />
46         <xsl:apply-templates select="powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny" mode='titlepage' />
47
48         <env name="document">
49             <xsl:if test="wl:get('has_cover')">
50                 <cmd name="makecover">
51                     <parm><xsl:value-of select="210 * wl:get('cover', 'width') div wl:get('cover', 'height')" />mm</parm>
52                     <parm>210mm</parm>
53                 </cmd>
54             </xsl:if>
55             <cmd name="maketitle" />
56
57             <cmd name="tytul"><parm>
58               <xsl:choose>
59                 <xsl:when test="(powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny)/nazwa_utworu">
60                     <!-- title in master -->
61                     <xsl:apply-templates select="(powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny)/autor_utworu" mode="title" />
62                     <xsl:apply-templates select="(powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny)/dzielo_nadrzedne" mode="title" />
63                     <xsl:apply-templates select="(powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny)/nazwa_utworu" mode="title" />
64                     <xsl:apply-templates select="(powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny)/podtytul" mode="title" />
65                     <!-- dc in master or not -->
66                     <cmd name="translatorsline" />
67                 </xsl:when>
68                 <xsl:otherwise>
69                     <!-- look for author title in dc -->
70                     <xsl:apply-templates select="rdf:RDF" mode="firstdctitle" />
71                     <xsl:apply-templates select="powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny" mode='firstdctitle' />
72                 </xsl:otherwise>
73               </xsl:choose>
74             </parm></cmd>
75             <xsl:apply-templates select="powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny" />
76             <xsl:apply-templates select="utwor" mode="part" />
77
78             <TeXML escape="0">
79                 \def\coverby{
80                 <TeXML escape="1">
81                 <xsl:if test="wl:get('has_cover') and wl:get('wldoc', 'book_info', 'cover_by')">
82                     <!-- FIXME: should be stylable -->
83                     Okładka na podstawie: 
84                     <xsl:choose>
85                     <xsl:when test="wl:get('wldoc', 'book_info', 'cover_source')">
86                         <cmd name="href"><parm>
87                             <xsl:value-of select="wl:get('wldoc', 'book_info', 'cover_source')" />
88                         </parm><parm>
89                             <xsl:value-of select="wl:get('wldoc', 'book_info', 'cover_by')" />
90                         </parm></cmd>
91                     </xsl:when>
92                     <xsl:otherwise>
93                         <xsl:value-of select="wl:get('wldoc', 'book_info', 'cover_by')" />
94                     </xsl:otherwise>
95                     </xsl:choose>
96                 </xsl:if>
97                 </TeXML>
98                 }
99                 \def\editors{<TeXML escape="1"><xsl:call-template name="editors" /></TeXML>}
100             </TeXML>
101
102             <cmd name="editorialsection" />
103
104         </env>
105         </TeXML>
106     </TeXML>
107 </xsl:template>
108
109 <xsl:template match="utwor" mode="part">
110     <cmd name="tytul"><parm>
111       <xsl:choose>
112         <xsl:when test="(powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny)/nazwa_utworu">
113             <!-- title in master -->
114             <xsl:apply-templates select="(powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny)/nazwa_utworu" mode="title" />
115             <xsl:apply-templates select="(powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny)/podtytul" mode="title" />
116         </xsl:when>
117         <xsl:otherwise>
118             <!-- look for title in dc -->
119             <xsl:apply-templates select="rdf:RDF" mode="dctitle" />
120             <xsl:apply-templates select="powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny" mode='dctitle' />
121         </xsl:otherwise>
122       </xsl:choose>
123     </parm></cmd>
124
125     <xsl:apply-templates select="powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny" />
126     <xsl:apply-templates select="utwor" mode="part" />
127 </xsl:template>
128
129 <!-- =================== -->
130 <!-- = MAIN TITLE PAGE = -->
131 <!-- = (from DC)       = -->
132 <!-- =================== -->
133
134 <xsl:template match="powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny" mode="titlepage">
135     <xsl:apply-templates select="rdf:RDF" mode="titlepage" />
136 </xsl:template>
137
138 <xsl:template match="rdf:RDF" mode="titlepage">
139     <TeXML escape="0">
140         \def\authors{<TeXML escape="1"><xsl:call-template name="authors" /></TeXML>}
141         \author{\authors}
142         \title{<TeXML escape="1"><xsl:apply-templates select=".//dc:title" mode="inline" /></TeXML>}
143         \def\translatorsline{<TeXML escape="1"><xsl:call-template name="translators" /></TeXML>}
144
145         \def\bookurl{<TeXML escape="1"><xsl:value-of select=".//dc:identifier.url" /></TeXML>}
146
147         \def\rightsinfo{<TeXML excape="1">
148             <cmd name="rightsinfostr">
149                 <xsl:if test=".//dc:rights.license">
150                     <opt><xsl:value-of select=".//dc:rights.license" /></opt>
151                 </xsl:if>
152                 <parm><xsl:value-of select=".//dc:rights" /></parm>
153             </cmd>
154         </TeXML>}
155
156         <!-- FIXME: should be stylable -->
157         \def\sourceinfo{<TeXML excape="1">
158             <xsl:if test=".//dc:source">
159                 Tekst opracowany na podstawie: <xsl:apply-templates select=".//dc:source" mode="inline" />
160                 \vspace{.6em}
161             </xsl:if>
162         </TeXML>}
163         \def\description{<TeXML excape="1">
164             <xsl:apply-templates select=".//dc:description" mode="inline" /></TeXML>}
165     </TeXML>
166 </xsl:template>
167
168
169 <!-- ============== -->
170 <!-- = BOOK TITLE = -->
171 <!-- = (from DC)  = -->
172 <!-- ============== -->
173
174 <xsl:template match="powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny" mode="dctitle">
175     <xsl:apply-templates select="rdf:RDF" mode="dctitle" />
176 </xsl:template>
177
178 <xsl:template match="rdf:RDF" mode="dctitle">
179     <cmd name="nazwapodutworu"><parm>
180         <xsl:apply-templates select=".//dc:title/node()" mode="inline" />
181     </parm></cmd>
182 </xsl:template>
183
184 <xsl:template match="powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny" mode="firstdctitle">
185     <xsl:apply-templates select="rdf:RDF" mode="firstdctitle" />
186 </xsl:template>
187
188 <xsl:template match="rdf:RDF" mode="firstdctitle">
189     <cmd name="autorutworu"><parm><cmd name="authors"/></parm></cmd>
190     <cmd name="nazwautworu"><parm>
191         <xsl:apply-templates select=".//dc:title/node()" mode="inline" />
192     </parm></cmd>
193     <cmd name="translatorsline" />
194 </xsl:template>
195
196
197 <!-- ============================================================================== -->
198 <!-- = MASTER TAG                                                                 = -->
199 <!-- = (can contain block tags, paragraph tags, standalone tags and special tags) = -->
200 <!-- ============================================================================== -->
201 <!-- ==================================================================================== -->
202 <!-- = BLOCK TAGS                                                                       = -->
203 <!-- = (can contain other block tags, paragraph tags, standalone tags and special tags) = -->
204 <!-- ==================================================================================== -->
205
206 <xsl:template
207     match="powiesc|opowiadanie|liryka_l|liryka_lp|dramat_wierszowany_l|dramat_wierszowany_lp|dramat_wspolczesny|nota|dedykacja|dlugi_cytat|poezja_cyt|motto">
208     <cmd>
209         <xsl:attribute name="name">
210             <xsl:value-of select="wl:texcommand(name())" />
211         </xsl:attribute>
212         <parm><xsl:apply-templates/></parm>
213     </cmd>
214 </xsl:template>
215
216 <xsl:template match="lista_osob">
217     <cmd name="listaosob">
218         <parm><xsl:apply-templates select="naglowek_listy" /></parm>
219         <parm><xsl:apply-templates select="lista_osoba" /></parm>
220     </cmd>
221 </xsl:template>
222
223 <xsl:template match="kwestia">
224     <cmd name="kwestia">
225         <parm><xsl:apply-templates select="strofa|akap|didaskalia" /></parm>
226     </cmd>
227 </xsl:template>
228
229
230 <!-- ========================================== -->
231 <!-- = PARAGRAPH TAGS                         = -->
232 <!-- = (can contain inline and special tags)  = -->
233 <!-- ========================================== -->
234
235 <!-- only in root -->
236 <xsl:template
237     match="autor_utworu|dzielo_nadrzedne|nazwa_utworu|podtytul"
238     mode="title">
239     <cmd>
240         <xsl:attribute name="name">
241             <xsl:value-of select="wl:texcommand(name())" />
242         </xsl:attribute>
243         <parm><xsl:apply-templates mode="inline"/></parm>
244     </cmd>
245 </xsl:template>
246
247
248 <xsl:template
249     match="naglowek_akt|naglowek_czesc|srodtytul|naglowek_osoba|naglowek_podrozdzial|naglowek_scena|naglowek_rozdzial|miejsce_czas|didaskalia|lista_osoba|akap|akap_dialog|akap_cd|motto_podpis|naglowek_listy">
250     <cmd>
251         <xsl:attribute name="name">
252             <xsl:value-of select="wl:texcommand(name())" />
253         </xsl:attribute>
254         <parm><xsl:apply-templates mode="inline"/></parm>
255     </cmd>
256 </xsl:template>
257
258 <xsl:template match="strofa">
259   <cmd name="strofa"><parm>
260     <xsl:choose>
261         <xsl:when test="count(br) > 0">
262             <xsl:call-template name="verse">
263                 <xsl:with-param name="verse-content" select="br[1]/preceding-sibling::text() | br[1]/preceding-sibling::node()" />
264                 <xsl:with-param name="verse-type" select="br[1]/preceding-sibling::*[name() = 'wers_wciety' or name() = 'wers_akap' or name() = 'wers_cd'][1]" />
265             </xsl:call-template>
266             <xsl:for-each select="br">
267                 <TeXML escape="0">\\{}</TeXML>
268                 <!-- Each BR tag "consumes" text after it -->
269                 <xsl:variable name="lnum" select="count(preceding-sibling::br)" />
270                 <xsl:call-template name="verse">
271                     <xsl:with-param name="verse-content"
272                         select="following-sibling::text()[count(preceding-sibling::br) = $lnum+1] | following-sibling::node()[count(preceding-sibling::br) = $lnum+1]" />
273                     <xsl:with-param name="verse-type" select="following-sibling::*[count(preceding-sibling::br) = $lnum+1 and (name() = 'wers_wciety' or name() = 'wers_akap' or name() = 'wers_cd')][1]" />
274                 </xsl:call-template>
275             </xsl:for-each>
276         </xsl:when>
277         <xsl:otherwise>
278             <xsl:call-template name="verse">
279                 <xsl:with-param name="verse-content" select="text() | node()" />
280                 <xsl:with-param name="verse-type" select="wers_wciety|wers_akap|wers_cd[1]" />
281             </xsl:call-template>
282         </xsl:otherwise>
283     </xsl:choose>
284   </parm></cmd>
285 </xsl:template>
286
287
288 <xsl:template name="verse">
289     <xsl:param name="verse-content" />
290     <xsl:param name="verse-type" />
291
292     <cmd>
293         <xsl:attribute name="name">
294             <xsl:choose>
295                 <xsl:when test="$verse-type != ''">
296                     <xsl:value-of select='wl:texcommand(name($verse-type))' />
297                 </xsl:when>
298                 <xsl:otherwise>wers</xsl:otherwise>
299             </xsl:choose>
300         </xsl:attribute>
301         <xsl:if test="string($verse-content/@typ)">
302             <opt><xsl:value-of select="$verse-content/@typ" />em</opt>
303         </xsl:if>
304         <parm><xsl:apply-templates select="$verse-content" mode="inline"/></parm>
305     </cmd>
306 </xsl:template>
307
308 <!-- ================================================ -->
309 <!-- = INLINE TAGS                                  = -->
310 <!-- = (contain other inline tags and special tags) = -->
311 <!-- ================================================ -->
312
313 <xsl:template mode="inline"
314     match="pa|pe|pr|pt|mat|didask_tekst|slowo_obce|wyroznienie|osoba">
315     <cmd>
316         <xsl:attribute name="name">
317             <xsl:value-of select="wl:texcommand(name())" />
318         </xsl:attribute>
319         <parm><xsl:apply-templates mode="inline"/></parm>
320     </cmd>
321 </xsl:template>
322
323
324
325 <xsl:template match="tytul_dziela" mode="inline">
326     <cmd name="tytuldziela"><parm>
327         <xsl:if test="@typ = '1'">„</xsl:if><xsl:apply-templates mode="inline" /><xsl:if test="@typ = '1'">”</xsl:if>
328     </parm></cmd>
329 </xsl:template>
330
331
332
333 <!-- ============================================== -->
334 <!-- = STANDALONE TAGS                            = -->
335 <!-- = (cannot contain any other tags)            = -->
336 <!-- ============================================== -->
337 <xsl:template
338     match="sekcja_swiatlo|sekcja_asterysk|separator_linia">
339     <cmd>
340         <xsl:attribute name="name">
341             <xsl:value-of select="wl:texcommand(name())" />
342         </xsl:attribute>
343     </cmd>
344 </xsl:template>
345
346
347 <!-- ================ -->
348 <!-- = SPECIAL TAGS = -->
349 <!-- ================ -->
350 <!-- Themes -->
351
352
353 <xsl:template match="begin|end|motyw">
354     <xsl:apply-templates select='.' mode="inline" />
355 </xsl:template>
356
357 <xsl:template match="begin" mode="inline" />
358 <xsl:template match="end" mode="inline" />
359
360 <xsl:template match="motyw" mode="inline">
361     <cmd name="motyw">
362         <xsl:if test="@moved">
363             <opt name="moved"><xsl:value-of select="@moved" /></opt>
364         </xsl:if>
365         <parm><xsl:apply-templates mode="inline" /></parm>
366     </cmd>
367 </xsl:template>
368
369 <xsl:template name="authors">
370     <xsl:for-each select=".//dc:creator_parsed">
371         <xsl:if test="position() != 1">, </xsl:if>
372         <xsl:apply-templates mode="inline" />
373     </xsl:for-each>
374 </xsl:template>
375
376 <xsl:template name="editors">
377     <xsl:if test="@editors">
378         <xsl:text>Opracowanie redakcyjne i przypisy: </xsl:text>
379         <xsl:value-of select="@editors" />
380         <xsl:text>.</xsl:text>
381     </xsl:if>
382 </xsl:template>
383
384 <xsl:template name="translators">
385     <xsl:if test=".//dc:contributor.translator_parsed">
386         <cmd name='translator'><parm>
387             <xsl:for-each select=".//dc:contributor.translator_parsed">
388                 <xsl:if test="position() != 1">, </xsl:if>
389                 <xsl:apply-templates mode="inline" />
390             </xsl:for-each>
391         </parm></cmd>
392     </xsl:if>
393 </xsl:template>
394
395
396 <!-- ============== -->
397 <!-- = ADDED TAGS = -->
398 <!-- ============== -->
399
400
401 <xsl:template match="dywiz" mode="inline">
402     <cmd name="dywiz" />
403 </xsl:template>
404
405 <xsl:template match="nbsp" mode="inline">
406     <spec cat="tilde" />
407 </xsl:template>
408
409 <xsl:template match="alien" mode="inline">
410     <group>
411         <cmd name="alien" />
412         <xsl:apply-templates mode="inline" />
413     </group>
414 </xsl:template>
415
416 <!-- ================ -->
417 <!-- = IGNORED TAGS = -->
418 <!-- ================ -->
419 <xsl:template match="extra|uwaga" />
420 <xsl:template match="extra|uwaga" mode="inline" />
421
422 <xsl:template match="nota_red" />
423
424 <!-- ======== -->
425 <!-- = TEXT = -->
426 <!-- ======== -->
427 <xsl:template match="text()" />
428 <xsl:template match="text()" mode="inline">
429     <xsl:if test="preceding-sibling::node() and wl:starts_white(.)">
430       <xsl:text> </xsl:text>
431     </xsl:if>
432
433     <xsl:value-of select="wl:substitute_entities(wl:strip(.))" />
434
435     <xsl:if test="following-sibling::node() and wl:ends_white(.)">
436       <xsl:text> </xsl:text>
437     </xsl:if>
438 </xsl:template>
439
440
441 </xsl:stylesheet>