Master/Tools/tpm2list.xsl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97

<!-- $Id: //depot/Master/Tools/tpm2list.xsl#10 $  $Date: 2004/07/11 $  $Author: rahtz $
     Written by Sebastian Rahtz.  Public domain. -->

<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
  xmlns:exsl="http://exslt.org/common"
  exclude-result-prefixes="exsl" 
  extension-element-prefixes="exsl"  
  xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" 
  xmlns:TPM="http://texlive.dante.de/"  
  version="1.0">

<xsl:output method="xml" omit-xml-declaration="yes"/>

<xsl:strip-space elements="*"/>

<!-- assume the current directory is Master, as Tools/update arranges. -->
<xsl:param name="ROOT">.</xsl:param>

<xsl:variable name="Master">
   <xsl:value-of select="$ROOT"/>/texmf/lists/</xsl:variable>
<xsl:variable name="LISTS">texmf/lists/</xsl:variable>

<xsl:template match="/">
  <xsl:apply-templates select="rdf:RDF/rdf:Description"/>
</xsl:template>

<xsl:template match="rdf:Description">
 <xsl:variable name="File">
 <xsl:value-of select="TPM:Name"/>
 </xsl:variable>
 <xsl:apply-templates select="TPM:BinFiles"/>
 <exsl:document  omit-xml-declaration="yes" method="text" href="{concat($Master,$File)}">
  <xsl:apply-templates select="TPM:Requires"/>
  <xsl:apply-templates select="TPM:DocFiles"/><xsl:text>&#10;</xsl:text>
  <xsl:apply-templates select="TPM:SourceFiles"/><xsl:text>&#10;</xsl:text>
  <xsl:apply-templates select="TPM:RunFiles"/><xsl:text>&#10;</xsl:text>
  <xsl:apply-templates select="TPM:Installation"/>
<xsl:text>&#10;texmf</xsl:text>
 <xsl:value-of select="substring-after($Master,'texmf')"/>
 <xsl:value-of select="TPM:Name"/><xsl:text>&#10;</xsl:text></exsl:document>
<!--
 <xsl:message>Write <xsl:value-of 
 select="concat($Master,//TPM:Name)"/>
 <xsl:text>.</xsl:text>
 <xsl:value-of select="@arch"/></xsl:message>
-->
</xsl:template>

<xsl:template match="TPM:BinFiles">
  <exsl:document method="text" href="{$Master}{//TPM:Name}.{@arch}">
 <xsl:value-of select="translate(normalize-space(.),' ','&#10;')"/>
<xsl:text>&#10;</xsl:text>
<xsl:value-of 
 select="concat($LISTS,//TPM:Name)"/>
 <xsl:text>.</xsl:text>
 <xsl:value-of select="@arch"/>
<xsl:text>&#10;</xsl:text>
</exsl:document>
</xsl:template>

<xsl:template match="TPM:Name" mode="name">
 <xsl:apply-templates/>
</xsl:template>

<xsl:template match="TPM:DocFiles|TPM:SourceFiles|TPM:RunFiles">
 <xsl:value-of select="translate(normalize-space(.),' ','&#10;')"/>
</xsl:template>

<xsl:template match="TPM:Installation">
  <xsl:for-each select="TPM:Execute">
  <xsl:variable name="Function">
  <xsl:choose>
    <xsl:when test="@mode='mixed' and @function='addMap'">
     <xsl:text>addMixedMap</xsl:text>
    </xsl:when>
    <xsl:otherwise>
      <xsl:value-of select="@function"/>
    </xsl:otherwise>
  </xsl:choose>
  </xsl:variable>
    <xsl:text>!</xsl:text>
    <xsl:value-of select="$Function"/>
    <xsl:text> </xsl:text>
    <xsl:value-of select="@parameter"/>
    <xsl:text>&#10;</xsl:text>
  </xsl:for-each>
</xsl:template>

<xsl:template match="TPM:Requires">
<xsl:for-each select="TPM:Package|TPM:TLCore">
<xsl:text>+</xsl:text>
<xsl:value-of select="translate(normalize-space(@name),' ','&#10;')"/>
<xsl:text>&#10;</xsl:text>
</xsl:for-each>
</xsl:template>

</xsl:stylesheet>