Bug 16522: (follow-up) MARC display templates and get_marc_host fixes
[koha.git] / koha-tmpl / intranet-tmpl / prog / en / xslt / UNIMARCslimUtils.xsl
1 <?xml version='1.0'?>
2
3 <!DOCTYPE stylesheet>
4
5 <xsl:stylesheet version="1.0"
6   xmlns:marc="http://www.loc.gov/MARC21/slim"
7   xmlns:items="http://www.koha-community.org/items"
8   xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
9   xmlns:str="http://exslt.org/strings"
10   exclude-result-prefixes="marc items str">
11
12   <xsl:template name="datafield">
13     <xsl:param name="tag"/>
14     <xsl:param name="ind1"><xsl:text> </xsl:text></xsl:param>
15     <xsl:param name="ind2"><xsl:text> </xsl:text></xsl:param>
16     <xsl:param name="subfields"/>
17     <xsl:element name="datafield">
18       <xsl:attribute name="tag">
19         <xsl:value-of select="$tag"/>
20       </xsl:attribute>
21       <xsl:attribute name="ind1">
22         <xsl:value-of select="$ind1"/>
23       </xsl:attribute>
24       <xsl:attribute name="ind2">
25        <xsl:value-of select="$ind2"/>
26          </xsl:attribute>
27        <xsl:copy-of select="$subfields"/>
28     </xsl:element>
29   </xsl:template>
30
31   <xsl:template name="tag_210-214">
32     <xsl:choose>
33       <xsl:when test="marc:datafield[@tag=210] and marc:datafield[@tag=214]">
34         <xsl:call-template name="tag_214" />
35       </xsl:when>
36       <xsl:when test="marc:datafield[@tag=214]">
37         <xsl:call-template name="tag_214" />
38       </xsl:when>
39       <xsl:when test="marc:datafield[@tag=210]">
40         <xsl:call-template name="tag_210" />
41       </xsl:when>
42     </xsl:choose>
43   </xsl:template>
44
45   <xsl:template name="tag_210">
46     <span class="results_summary publication">
47       <span class="label">Publication: </span>
48       <xsl:for-each select="marc:datafield[@tag=210]">
49         <xsl:if test="not(position() = 1)">
50           <br/>
51         </xsl:if>
52         <span class="value">
53           <xsl:call-template name="addClassRtl" />
54           <xsl:for-each select="marc:subfield[@code='a' or @code='b' or @code='c' or @code='d' or @code='g']">
55             <xsl:choose>
56               <xsl:when test="@code='a'">
57                 <xsl:value-of select="."/>
58                 <xsl:if test="position() != last()">
59                   <xsl:text> : </xsl:text>
60                 </xsl:if>
61               </xsl:when>
62               <xsl:when test="@code='b'">
63                 <xsl:value-of select="."/>
64                 <xsl:if test="position() != last()">
65                   <xsl:text>, </xsl:text>
66                 </xsl:if>
67               </xsl:when>
68               <xsl:when test="@code='c' or @code='g'">
69                 <a>
70                   <xsl:attribute name="href">/cgi-bin/koha/catalogue/search.pl?q=pb:<xsl:value-of select="str:encode-uri(., true())"/></xsl:attribute>
71                   <xsl:attribute name="title">Search for publisher</xsl:attribute>
72                   <xsl:value-of select="."/>
73                 </a>
74                 <xsl:if test="position() != last()">
75                   <xsl:text>, </xsl:text>
76                 </xsl:if>
77               </xsl:when>
78               <xsl:when test="@code='d'">
79                 <xsl:value-of select="."/>
80                 <xsl:if test="position() != last()">
81                   <xsl:text>, </xsl:text>
82                 </xsl:if>
83               </xsl:when>
84             </xsl:choose>
85           </xsl:for-each>
86         </span>
87       </xsl:for-each>
88     </span>
89   </xsl:template>
90
91   <xsl:template name="tag_214">
92     <xsl:for-each select="marc:datafield[@tag=214]">
93       <xsl:sort select="@ind2" data-type="number" />
94       <span class="results_summary publication">
95         <span class="label">
96           <xsl:choose>
97             <xsl:when test="@ind2=1">Production: </xsl:when>
98             <xsl:when test="@ind2=2">Distribution: </xsl:when>
99             <xsl:when test="@ind2=3">Manufacture: </xsl:when>
100             <xsl:when test="@ind2=4">
101               <xsl:choose>
102                 <xsl:when test="substring(marc:subfield[@code='d'],1,1)='C'">Copyright date: </xsl:when>
103                 <xsl:when test="substring(marc:subfield[@code='d'],1,1)='P'">Protection date: </xsl:when>
104                 <xsl:otherwise>Copyright date / protection date: </xsl:otherwise>
105               </xsl:choose>
106             </xsl:when>
107             <xsl:otherwise>Publication: </xsl:otherwise>
108           </xsl:choose>
109         </span>
110         <span>
111           <xsl:call-template name="addClassRtl" />
112           <xsl:for-each select="marc:subfield">
113             <xsl:choose>
114               <xsl:when test="@code='a'">
115                 <xsl:value-of select="."/>
116                 <xsl:if test="position() != last()">
117                   <xsl:text> : </xsl:text>
118                 </xsl:if>
119               </xsl:when>
120               <xsl:when test="@code='b'">
121                 <xsl:value-of select="."/>
122                 <xsl:if test="position() != last()">
123                   <xsl:text>, </xsl:text>
124                 </xsl:if>
125               </xsl:when>
126               <xsl:when test="@code='c'">
127                 <a>
128                   <xsl:attribute name="href">/cgi-bin/koha/catalogue/search.pl?q=pb:<xsl:value-of select="str:encode-uri(., true())"/></xsl:attribute>
129                   <xsl:attribute name="title">Search for publisher</xsl:attribute>
130                   <xsl:value-of select="."/>
131                 </a>
132               </xsl:when>
133               <xsl:when test="@code='d'">
134                 <xsl:if test="not(position()=1)">
135                   <xsl:text>, </xsl:text>
136                 </xsl:if>
137                 <xsl:choose>
138                   <xsl:when test="substring(.,1,1)='C'">
139                     <xsl:value-of select="substring(.,2)"/>
140                   </xsl:when>
141                   <xsl:when test="substring(.,1,1)='P'">
142                     <xsl:value-of select="substring(.,2)"/>
143                   </xsl:when>
144                   <xsl:otherwise>
145                     <xsl:value-of select="."/>
146                   </xsl:otherwise>
147                 </xsl:choose>
148               </xsl:when>
149             </xsl:choose>
150           </xsl:for-each>
151         </span>
152       </span>
153     </xsl:for-each>
154     <xsl:call-template name="tag_214_r" />
155     <xsl:call-template name="tag_214_s" />
156   </xsl:template>
157
158   <xsl:template name="tag_214_s">
159     <xsl:if test="marc:datafield[@tag=214]/marc:subfield[@code='s']">
160       <span class="results_summary tag_214_s">
161         <span class="label">Printing and/or Publishing Information Transcribed as Found in the Colophon: </span>
162         <xsl:for-each select="marc:datafield[@tag=214]/marc:subfield[@code='s']">
163           <xsl:value-of select="."/>
164           <xsl:choose>
165             <xsl:when test="position()=last()">
166               <xsl:text>.</xsl:text>
167             </xsl:when>
168             <xsl:otherwise>
169               <xsl:text>, </xsl:text>
170             </xsl:otherwise>
171           </xsl:choose>
172         </xsl:for-each>
173       </span>
174     </xsl:if>
175   </xsl:template>
176
177   <xsl:template name="tag_214_r">
178     <xsl:if test="marc:datafield[@tag=214]/marc:subfield[@code='r']">
179       <span class="results_summary tag_214_r">
180         <span class="label">Printing and/or Publishing Information Transcribed as Found in the Main Source of Information: </span>
181         <xsl:for-each select="marc:datafield[@tag=214]/marc:subfield[@code='r']">
182           <xsl:value-of select="."/>
183           <xsl:choose>
184             <xsl:when test="position()=last()">
185               <xsl:text>.</xsl:text>
186             </xsl:when>
187             <xsl:otherwise>
188               <xsl:text>, </xsl:text>
189             </xsl:otherwise>
190           </xsl:choose>
191         </xsl:for-each>
192       </span>
193     </xsl:if>
194   </xsl:template>
195
196   <xsl:template name="tag_215">
197     <xsl:for-each select="marc:datafield[@tag=215]">
198       <span class="results_summary description">
199         <span class="label">Description: </span>
200         <xsl:if test="marc:subfield[@code='a']">
201           <xsl:value-of select="marc:subfield[@code='a']"/>
202         </xsl:if>
203         <xsl:if test="marc:subfield[@code='c']"> :
204           <xsl:value-of select="marc:subfield[@code='c']"/>
205         </xsl:if>
206         <xsl:if test="marc:subfield[@code='d']"> ;
207           <xsl:value-of select="marc:subfield[@code='d']"/>
208         </xsl:if>
209         <xsl:if test="marc:subfield[@code='e']"> +
210           <xsl:value-of select="marc:subfield[@code='e']"/>
211         </xsl:if>
212       </span>
213     </xsl:for-each>
214   </xsl:template>
215
216         <xsl:template name="tag_4xx">
217     <xsl:for-each select="marc:datafield[@tag=464 or @tag=461]">
218       <span class="results_summary linked_with">
219         <span class="label">Linked with: </span>
220         <span class="value">
221           <xsl:call-template name="addClassRtl" />
222           <xsl:if test="marc:subfield[@code='t']">
223             <xsl:value-of select="marc:subfield[@code='t']"/>
224           </xsl:if>
225           <xsl:if test="marc:subfield[@code='e']"> :
226             <xsl:value-of select="marc:subfield[@code='e']"/>
227           </xsl:if>
228           <xsl:if test="marc:subfield[@code='f']"> /
229             <xsl:value-of select="marc:subfield[@code='f']"/>
230           </xsl:if>
231           <xsl:if test="marc:subfield[@code='v']">,
232             <xsl:value-of select="marc:subfield[@code='v']"/>
233           </xsl:if>
234         </span>
235       </span>
236     </xsl:for-each>
237   </xsl:template>
238
239         <xsl:template name="subfieldSelect">
240                 <xsl:param name="codes"/>
241                 <xsl:param name="delimeter"><xsl:text> </xsl:text></xsl:param>
242                 <xsl:param name="subdivCodes"/>
243                 <xsl:param name="subdivDelimiter"/>
244     <xsl:param name="urlencode"/>
245                 <xsl:variable name="str">
246                         <xsl:for-each select="marc:subfield">
247                                 <xsl:if test="contains($codes, @code)">
248                     <xsl:if test="contains($subdivCodes, @code)">
249                         <xsl:value-of select="$subdivDelimiter"/>
250                     </xsl:if>
251                                         <xsl:value-of select="text()"/><xsl:value-of select="$delimeter"/>
252                                 </xsl:if>
253                         </xsl:for-each>
254                 </xsl:variable>
255     <xsl:choose>
256       <xsl:when test="$urlencode=1">
257         <xsl:value-of select="str:encode-uri(substring($str,1,string-length($str)-string-length($delimeter)), true())"/>
258       </xsl:when>
259       <xsl:otherwise>
260         <xsl:value-of select="substring($str,1,string-length($str)-string-length($delimeter))"/>
261       </xsl:otherwise>
262     </xsl:choose>
263         </xsl:template>
264
265         <xsl:template name="buildSpaces">
266                 <xsl:param name="spaces"/>
267                 <xsl:param name="char"><xsl:text> </xsl:text></xsl:param>
268                 <xsl:if test="$spaces>0">
269                         <xsl:value-of select="$char"/>
270                         <xsl:call-template name="buildSpaces">
271                                 <xsl:with-param name="spaces" select="$spaces - 1"/>
272                                 <xsl:with-param name="char" select="$char"/>
273                         </xsl:call-template>
274                 </xsl:if>
275         </xsl:template>
276
277   <xsl:template name="buildBiblioDefaultViewURL">
278       <xsl:param name="IntranetBiblioDefaultView"/>
279       <xsl:choose>
280           <xsl:when test="$IntranetBiblioDefaultView='normal'">
281               <xsl:text>/cgi-bin/koha/catalogue/detail.pl?biblionumber=</xsl:text>
282           </xsl:when>
283           <xsl:when test="$IntranetBiblioDefaultView='isbd'">
284               <xsl:text>/cgi-bin/koha/catalogue/ISBDdetail.pl?biblionumber=</xsl:text>
285           </xsl:when>
286           <xsl:when test="$IntranetBiblioDefaultView='labeled_marc'">
287               <xsl:text>/cgi-bin/koha/catalogue/labeledMARCdetail.pl?biblionumber=</xsl:text>
288           </xsl:when>
289           <xsl:when test="$IntranetBiblioDefaultView='marc'">
290               <xsl:text>/cgi-bin/koha/catalogue/MARCdetail.pl?biblionumber=</xsl:text>
291           </xsl:when>
292           <xsl:otherwise>
293               <xsl:text>/cgi-bin/koha/catalogue/detail.pl?biblionumber=</xsl:text>
294           </xsl:otherwise>
295       </xsl:choose>
296   </xsl:template>
297
298         <xsl:template name="chopSpecialCharacters">
299         <xsl:param name="title" />
300         <xsl:variable name="ntitle"
301              select="translate($title, '&#x0098;&#x009C;&#xC29C;&#xC29B;&#xC298;&#xC288;&#xC289;','')"/>
302         <xsl:value-of select="$ntitle" />
303     </xsl:template>
304
305
306         <xsl:template name="chopPunctuation">
307                 <xsl:param name="chopString"/>
308                 <xsl:variable name="length" select="string-length($chopString)"/>
309                 <xsl:choose>
310                         <xsl:when test="$length=0"/>
311                         <xsl:when test="contains('.:,;/ ', substring($chopString,$length,1))">
312                                 <xsl:call-template name="chopPunctuation">
313                                         <xsl:with-param name="chopString" select="substring($chopString,1,$length - 1)"/>
314                                 </xsl:call-template>
315                         </xsl:when>
316                         <xsl:when test="not($chopString)"/>
317                         <xsl:otherwise><xsl:value-of select="$chopString"/></xsl:otherwise>
318                 </xsl:choose>
319     <xsl:text> </xsl:text>
320         </xsl:template>
321
322         <xsl:template name="addClassRtl">
323     <xsl:variable name="lang" select="marc:subfield[@code='7']" />
324     <xsl:if test="$lang = 'ha' or $lang = 'Hebrew' or $lang = 'fa' or $lang = 'Arabe'">
325       <xsl:attribute name="class">rtl</xsl:attribute>
326     </xsl:if>
327   </xsl:template>
328
329   <xsl:template name="tag_title">
330     <xsl:param name="tag" />
331     <xsl:param name="label" />
332     <xsl:param name="spanclass" />
333     <xsl:if test="marc:datafield[@tag=$tag]">
334       <span class="results_summary {$spanclass}">
335         <span class="label">
336           <xsl:value-of select="$label"/>
337           <xsl:text>: </xsl:text>
338         </span>
339         <xsl:for-each select="marc:datafield[@tag=$tag]">
340           <xsl:value-of select="marc:subfield[@code='a']" />
341           <xsl:if test="marc:subfield[@code='d']">
342             <xsl:text> : </xsl:text>
343             <xsl:value-of select="marc:subfield[@code='e']"/>
344           </xsl:if>
345           <xsl:if test="marc:subfield[@code='e']">
346             <xsl:for-each select="marc:subfield[@code='e']">
347               <xsl:text> </xsl:text>
348               <xsl:value-of select="."/>
349             </xsl:for-each>
350           </xsl:if>
351           <xsl:if test="marc:subfield[@code='f']">
352             <xsl:text> / </xsl:text>
353             <xsl:value-of select="marc:subfield[@code='f']"/>
354           </xsl:if>
355           <xsl:if test="marc:subfield[@code='h']">
356             <xsl:text>, </xsl:text>
357             <xsl:value-of select="marc:subfield[@code='h']"/>
358           </xsl:if>
359           <xsl:if test="marc:subfield[@code='i']">
360             <xsl:text>, </xsl:text>
361             <xsl:value-of select="marc:subfield[@code='i']"/>
362           </xsl:if>
363           <xsl:if test="marc:subfield[@code='v']">
364             <xsl:text>, </xsl:text>
365             <xsl:value-of select="marc:subfield[@code='v']"/>
366           </xsl:if>
367           <xsl:if test="marc:subfield[@code='x']">
368             <xsl:text>, </xsl:text>
369             <xsl:value-of select="marc:subfield[@code='x']"/>
370           </xsl:if>
371           <xsl:if test="marc:subfield[@code='z']">
372             <xsl:text>, </xsl:text>
373             <xsl:value-of select="marc:subfield[@code='z']"/>
374           </xsl:if>
375         </xsl:for-each>
376       </span>
377     </xsl:if>
378   </xsl:template>
379
380   <xsl:template name="tag_subject">
381     <xsl:param name="tag" />
382     <xsl:param name="label" />
383     <xsl:param name="spanclass"/>
384     <xsl:if test="marc:datafield[@tag=$tag]">
385       <span class="results_summary subjects {$spanclass}">
386         <span class="label">
387           <xsl:value-of select="$label"/>
388           <xsl:text>: </xsl:text>
389         </span>
390         <xsl:for-each select="marc:datafield[@tag=$tag]">
391           <a>
392             <xsl:choose>
393               <xsl:when test="marc:subfield[@code=9]">
394                 <xsl:attribute name="href">/cgi-bin/koha/catalogue/search.pl?q=an:<xsl:value-of select="str:encode-uri(marc:subfield[@code=9], true())"/></xsl:attribute>
395               </xsl:when>
396               <xsl:otherwise>
397                 <xsl:attribute name="href">/cgi-bin/koha/catalogue/search.pl?q=su:<xsl:value-of select="str:encode-uri(marc:subfield[@code='a'], true())"/></xsl:attribute>
398               </xsl:otherwise>
399             </xsl:choose>
400             <xsl:call-template name="chopPunctuation">
401               <xsl:with-param name="chopString">
402                 <xsl:call-template name="subfieldSelect">
403                     <xsl:with-param name="codes">abcdjptvxyz</xsl:with-param>
404                     <xsl:with-param name="subdivCodes">jpxyz</xsl:with-param>
405                     <xsl:with-param name="subdivDelimiter">-- </xsl:with-param>
406                 </xsl:call-template>
407               </xsl:with-param>
408             </xsl:call-template>
409           </a>
410           <xsl:if test="not (position()=last())">
411             <xsl:text> | </xsl:text>
412           </xsl:if>
413         </xsl:for-each>
414       </span>
415     </xsl:if>
416   </xsl:template>
417
418   <xsl:template name="tag_7xx">
419     <xsl:param name="tag" />
420     <xsl:param name="label" />
421     <xsl:param name="spanclass" />
422     <xsl:if test="marc:datafield[@tag=$tag]">
423       <span class="results_summary author {$spanclass}">
424         <span class="label">
425           <xsl:value-of select="$label" />
426           <xsl:text>: </xsl:text>
427         </span>
428         <span class="value">
429           <xsl:for-each select="marc:datafield[@tag=$tag]">
430             <xsl:call-template name="addClassRtl" />
431             <a>
432               <xsl:choose>
433                 <xsl:when test="marc:subfield[@code=9]">
434                   <xsl:attribute name="href">
435                     <xsl:text>/cgi-bin/koha/catalogue/search.pl?q=an:</xsl:text>
436                     <xsl:value-of select="str:encode-uri(marc:subfield[@code=9], true())"/>
437                   </xsl:attribute>
438                 </xsl:when>
439                 <xsl:otherwise>
440                     <xsl:attribute name="href">
441                       <xsl:text>/cgi-bin/koha/catalogue/search.pl?q=au:</xsl:text>
442                       <xsl:value-of select="str:encode-uri(marc:subfield[@code='a'], true())"/>
443                       <xsl:text>%20</xsl:text>
444                       <xsl:value-of select="str:encode-uri(marc:subfield[@code='b'], true())"/>
445                   </xsl:attribute>
446                 </xsl:otherwise>
447               </xsl:choose>
448               <xsl:if test="marc:subfield[@code='a']">
449                 <xsl:value-of select="marc:subfield[@code='a']"/>
450               </xsl:if>
451               <xsl:if test="marc:subfield[@code='b']">
452                 <xsl:text>, </xsl:text>
453                 <xsl:value-of select="marc:subfield[@code='b']"/>
454               </xsl:if>
455               <xsl:if test="marc:subfield[@code='c']">
456                 <xsl:text>, </xsl:text>
457                 <xsl:value-of select="marc:subfield[@code='c']"/>
458               </xsl:if>
459               <xsl:if test="marc:subfield[@code='d']">
460                 <xsl:text> </xsl:text>
461                 <xsl:value-of select="marc:subfield[@code='d']"/>
462               </xsl:if>
463               <xsl:if test="marc:subfield[@code='f']">
464                 <span dir="ltr">
465                 <xsl:text> (</xsl:text>
466                 <xsl:value-of select="marc:subfield[@code='f']"/>
467                 <xsl:text>)</xsl:text>
468                 </span>
469               </xsl:if>
470               <xsl:if test="marc:subfield[@code='g']">
471                 <xsl:text> </xsl:text>
472                 <xsl:value-of select="marc:subfield[@code='g']"/>
473               </xsl:if>
474               <xsl:if test="marc:subfield[@code='p']">
475                 <xsl:text> </xsl:text>
476                 <xsl:value-of select="marc:subfield[@code='p']"/>
477               </xsl:if>
478             </a>
479             <xsl:if test="not (position() = last())">
480               <xsl:text> ; </xsl:text>
481             </xsl:if>
482           </xsl:for-each>
483         </span>
484       </span>
485     </xsl:if>
486   </xsl:template>
487
488 </xsl:stylesheet>