Statistics
| Revision:

root / tmp / org.txm.core / bin / org / txm / macro / oriflamms / prepare / oriflamms-convert-pontfraud-oriflammsxml.xsl @ 54

History | View | Annotate | Download (8 kB)

1
<?xml version="1.0"?>
2
<xsl:stylesheet xmlns:edate="http://exslt.org/dates-and-times"
3
  xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:tei="http://www.tei-c.org/ns/1.0"
4
  xmlns:xd="http://www.pnp-software.com/XSLTdoc"
5
  xmlns:txm="http://textometrie.org/1.0"
6
  xmlns:xi="http://www.w3.org/2001/XInclude" 
7
  xmlns:svg="http://www.w3.org/2000/svg" 
8
  xmlns:math="http://www.w3.org/1998/Math/MathML"
9
  xmlns:functx="http://www.functx.com"
10
  exclude-result-prefixes="#all" version="2.0">
11

    
12
  <xsl:output method="xml" encoding="utf-8" omit-xml-declaration="no" indent="yes"/>
13
  
14
  <xd:doc type="stylesheet">
15
    <xd:short>
16
      Cette feuille permet de convertir l'édition Pontfraud
17
      au format XML-TEI du projet Oriflamms.
18
    </xd:short>
19
    <xd:detail>
20
      This stylesheet is free software; you can redistribute it and/or
21
      modify it under the terms of the GNU Lesser General Public
22
      License as published by the Free Software Foundation; either
23
      version 3 of the License, or (at your option) any later version.
24
      
25
      This stylesheet is distributed in the hope that it will be useful,
26
      but WITHOUT ANY WARRANTY; without even the implied warranty of
27
      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
28
      Lesser General Public License for more details.
29
      
30
      You should have received a copy of GNU Lesser Public License with
31
      this stylesheet. If not, see http://www.gnu.org/licenses/lgpl.html
32
    </xd:detail>
33
    <xd:author>Alexei Lavrentiev alexei.lavrentev@ens-lyon.fr</xd:author>
34
    <xd:copyright>2015, CNRS / ICAR (Équipe CACTUS)</xd:copyright>
35
  </xd:doc>
36
  
37
  <xsl:strip-space elements="*"/>
38
  
39
  <xsl:param name="baseMsSiglum">A</xsl:param>
40
  
41
  <xsl:variable name="baseMsPattern"><xsl:value-of select="concat('^#?',$baseMsSiglum,'| #?',$baseMsSiglum)"/></xsl:variable>
42
  
43
  <xsl:template match="node()">
44
    <!-- Copy the current node -->
45
    <xsl:copy>
46
      <!-- Including any attributes it has and any child nodes -->
47
      <xsl:apply-templates select="@*|node()"/>
48
    </xsl:copy>
49
  </xsl:template>
50

    
51
  <!-- On supprime les attributs par défaut de la DTD TEI -->
52
  
53
  <xsl:template match="@*">
54
    <xsl:choose>
55
      <xsl:when test="matches(name(.),'^(part|instant|anchored|full)$')"/>
56
      <xsl:otherwise><xsl:copy/></xsl:otherwise>
57
    </xsl:choose>
58
  </xsl:template>
59
  
60
  <xsl:template match="@facs">
61
    <xsl:attribute name="facs">
62
      <xsl:value-of select="replace(.,'\tif$','.png')"/>
63
    </xsl:attribute>
64
  </xsl:template>
65

    
66
  <xsl:template match="tei:teiHeader">    
67
      <xsl:copy>
68
        <xsl:apply-templates select="@*"/>
69
        <xsl:apply-templates/>
70
      </xsl:copy>    
71
  </xsl:template>
72
    
73

    
74
<xsl:template match="tei:revisionDesc">
75
  <xsl:copy>
76
  <xsl:apply-templates select="@*"/>
77
    <change xmlns="http://www.tei-c.org/ns/1.0" when="2007-01-01" who="#DS">Publication du document original</change>
78
    <!-- information récupérée à partir de /TEI/text[1]/front[1]/titlePage[1]/docDate[1] -->
79
    <change xmlns="http://www.tei-c.org/ns/1.0" when="{format-date(current-date(),'[Y]-[M01]-[D01]')}" who="#auto">Conversion automatique au format XML-TEI-Oriflamms</change>
80
  <xsl:apply-templates/>
81
  </xsl:copy>
82
</xsl:template>
83
  
84
  <xsl:template match="tei:encodingDesc">
85
    <xsl:copy>
86
      <xsl:apply-templates select="@*"/>
87
      <xsl:apply-templates/>
88
      <xsl:if test="not(//tei:prefixDef[@ident='ori'])">
89
        <listPrefixDef xmlns="http://www.tei-c.org/ns/1.0">
90
          <prefixDef xmlns="http://www.tei-c.org/ns/1.0" ident="ori" 
91
            matchPattern="([a-z]+)" 
92
            replacementPattern="oriflamms-annotation-scheme.xml#$1">
93
            <p>In the context of this project, private URIs with the prefix
94
              "ori" point to <gi>interp</gi> elements in the project's
95
              oriflamms-annotation-scheme.xml file.
96
            </p>
97
          </prefixDef>
98
        </listPrefixDef>
99
      </xsl:if>
100
    </xsl:copy>
101
  </xsl:template>
102

    
103
<!-- On restructure le document pour avoir un TEI par charte -->
104
  
105
  <!-- TEI devient teiCorpus -->
106
  
107
  <xsl:template match="tei:TEI">
108
    <xsl:element name="teiCorpus" xmlns="http://www.tei-c.org/ns/1.0">
109
      <xsl:apply-templates select="@*"/>
110
      <xsl:apply-templates/>
111
    </xsl:element>
112
  </xsl:template>
113

    
114
  <!-- on supprime l'élément text de niveau 1 et travaille directement sur le niveau 2 (l'élément group intermédiaire disparait)-->
115
  
116
  <xsl:template match="tei:TEI/tei:text">
117
    <xsl:apply-templates select="descendant::tei:text"/>
118
  </xsl:template>
119

    
120
  <xsl:template match="tei:text//tei:text">
121
    
122
    <TEI xmlns="http://www.tei-c.org/ns/1.0">
123
      <teiHeader xmlns="http://www.tei-c.org/ns/1.0">
124
        <fileDesc xmlns="http://www.tei-c.org/ns/1.0">
125
          <titleStmt xmlns="http://www.tei-c.org/ns/1.0">
126
            <title xmlns="http://www.tei-c.org/ns/1.0"><xsl:text>Acte original </xsl:text>
127
              <xsl:value-of select="substring-after(preceding-sibling::comment()[contains(.,'acte original')][1],'acte original ')"/></title>
128
            <author xmlns="http://www.tei-c.org/ns/1.0"><xsl:value-of select="descendant::tei:docAuthor"/></author>
129
          </titleStmt>
130
          <publicationStmt xmlns="http://www.tei-c.org/ns/1.0">
131
            <p xmlns="http://www.tei-c.org/ns/1.0">See the header of the teiCorpus</p>
132
          </publicationStmt>
133
          <!-- les éléments listWit et listBibl sont placés dans sourceDesc -->
134
          <sourceDesc xmlns="http://www.tei-c.org/ns/1.0">
135
            <xsl:copy-of select="descendant::tei:listWit"/>
136
            <xsl:copy-of select="descendant::tei:listBibl[1]"></xsl:copy-of>
137
          </sourceDesc>
138
        </fileDesc>
139
        <profileDesc xmlns="http://www.tei-c.org/ns/1.0">
140
          <!-- docDate devient profileDesc/creation/date[@type='documentCreation'] -->
141
          <creation xmlns="http://www.tei-c.org/ns/1.0"><xsl:apply-templates select="descendant::tei:docDate"/></creation>
142
          <!-- argument devient profileDesc/abstract -->
143
          <xsl:apply-templates select="descendant::tei:argument"/>
144
        </profileDesc>
145
      </teiHeader>
146
      <text xmlns="http://www.tei-c.org/ns/1.0">
147
        <body xmlns="http://www.tei-c.org/ns/1.0">
148
          <xsl:apply-templates select="descendant::tei:div1"/>
149
        </body>
150
      </text>
151
    </TEI>
152
  </xsl:template>
153
  
154
  <xsl:template match="tei:docDate[ancestor::tei:group]">
155
    <date type="documentCreation" xmlns="http://www.tei-c.org/ns/1.0">
156
      <xsl:apply-templates select="@*"/>
157
      <xsl:apply-templates/>
158
    </date>
159
  </xsl:template>
160
  
161
  <xsl:template match="tei:argument">
162
    <abstract xmlns="http://www.tei-c.org/ns/1.0"><xsl:apply-templates/></abstract>
163
  </xsl:template>
164

    
165

    
166
  <xsl:template match="tei:div1[@type='translation']|tei:note">
167
    <xsl:copy>
168
      <xsl:apply-templates select="@*"/>
169
      <xsl:attribute name="ana">ori:align-no</xsl:attribute>
170
      <xsl:apply-templates/>
171
    </xsl:copy>
172
  </xsl:template>
173

    
174

    
175
  <!-- on ajoute un attribut pour faciliter l'identification des segments à ne pas aligner -->
176
  
177
  <xsl:template match="tei:choice/tei:expan|tei:choice/tei:corr">
178
    <xsl:copy>
179
      <xsl:apply-templates select="@*"/>
180
      <xsl:attribute name="ana">ori:align-no</xsl:attribute>
181
      <xsl:apply-templates/>
182
    </xsl:copy>
183
  </xsl:template>
184
  
185
  <xsl:template match="tei:rdg[not(matches(@wit,$baseMsPattern))]">
186
    <xsl:copy>
187
      <xsl:apply-templates select="@*"/>
188
      <xsl:attribute name="ana">ori:align-no</xsl:attribute>
189
      <xsl:apply-templates/>
190
    </xsl:copy>
191
  </xsl:template>
192

    
193
<xsl:template match="text()[following-sibling::*[1][self::tei:milestone or self::tei:pb or self::tei:cb or self::tei:lb] and following-sibling::tei:lb[1][@break]]">
194
  <xsl:choose>
195
    <!-- patch d'espace blanc devant les sauts de ligne à l'intérieur de mots -->
196
    <xsl:when test="matches(.,'\s+$')"><xsl:value-of select="replace(.,'\s+$','')"/></xsl:when>
197
    <xsl:otherwise><xsl:copy/></xsl:otherwise>
198
  </xsl:choose>
199
</xsl:template>
200

    
201
</xsl:stylesheet>