Revision 2398 tmp/org.txm.oriflamms.rcp/groovy/org/txm/macro/oriflamms/prepare/oriflamms-convert-mss-dates-oriflammsxml.xsl

oriflamms-convert-mss-dates-oriflammsxml.xsl (revision 2398)
1 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
  exclude-result-prefixes="tei edate xd txm xi svg math" version="2.0">
2
<xsl:stylesheet
3
	xmlns:edate="http://exslt.org/dates-and-times"
4
	xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
5
	xmlns:tei="http://www.tei-c.org/ns/1.0"
6
	xmlns:xd="http://www.pnp-software.com/XSLTdoc"
7
	xmlns:txm="http://textometrie.org/1.0"
8
	xmlns:xi="http://www.w3.org/2001/XInclude"
9
	xmlns:svg="http://www.w3.org/2000/svg"
10
	xmlns:math="http://www.w3.org/1998/Math/MathML"
11
	exclude-result-prefixes="tei edate xd txm xi svg math" version="2.0">
10 12

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

  
52
  <!-- On supprime les attributs par défaut de la DTD TEI -->
53
  
54
  <xsl:template match="@*">
55
    <xsl:choose>
56
      <xsl:when test="matches(name(.),'^(part|instant|anchored|full)$')"/>
57
      <xsl:otherwise><xsl:copy/></xsl:otherwise>
58
    </xsl:choose>
59
  </xsl:template>
16
	<xd:doc type="stylesheet">
17
		<xd:short>
18
			Cette feuille permet de convertir les transcription des
19
			Chartes de Fontenay au format XML-TEI du projet Oriflamms.
20
		</xd:short>
21
		<xd:detail>
22
			This stylesheet is free software; you can redistribute it and/or
23
			modify it under the terms of the GNU Lesser General Public
24
			License as published by the Free Software Foundation; either
25
			version 3 of the License, or (at your option) any later version.
60 26

  
61
<xsl:template match="@facs">
62
  <xsl:attribute name="facs"><xsl:value-of select="replace(.,'\.tif$','.png','i')"/></xsl:attribute>
63
</xsl:template>
27
			This stylesheet is distributed in the hope that it will be useful,
28
			but WITHOUT ANY WARRANTY; without even the implied warranty of
29
			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
30
			Lesser General Public License for more details.
64 31

  
65
  <xsl:template match="tei:teiHeader">    
66
      <xsl:copy>
67
        <xsl:apply-templates select="@*"/>
68
        <xsl:apply-templates/>
69
      </xsl:copy>    
70
  </xsl:template>
71
    
32
			You should have received a copy of GNU Lesser Public License with
33
			this stylesheet. If not, see http://www.gnu.org/licenses/lgpl.html
34
		</xd:detail>
35
		<xd:author>Alexei Lavrentiev alexei.lavrentev@ens-lyon.fr</xd:author>
36
		<xd:copyright>2015, CNRS / ICAR (Équipe CACTUS)</xd:copyright>
37
	</xd:doc>
72 38

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

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

  
113
  <!-- on supprime l'élément text de niveau 1 et travaille directement sur le niveau 2 (l'élément group intermédiaire disparait)-->
114
  
115
  <xsl:template match="tei:TEI/tei:text">
116
    <xsl:apply-templates select="descendant::tei:text"/>
117
  </xsl:template>
45
	<xsl:variable name="baseMsPattern">
46
		<xsl:value-of
47
			select="concat('^#?',$baseMsSiglum,'| #?',$baseMsSiglum)" />
48
	</xsl:variable>
118 49

  
119
  <xsl:template match="tei:text//tei:text">
120
    
121
    <TEI xmlns="http://www.tei-c.org/ns/1.0">
122
      <teiHeader xmlns="http://www.tei-c.org/ns/1.0">
123
        <fileDesc xmlns="http://www.tei-c.org/ns/1.0">
124
          <titleStmt xmlns="http://www.tei-c.org/ns/1.0">
125
            <title xmlns="http://www.tei-c.org/ns/1.0"><xsl:text>Acte original </xsl:text>
126
              <xsl:value-of select="substring-after(preceding-sibling::comment()[contains(.,'acte original')][1],'acte original ')"/></title>
127
            <author xmlns="http://www.tei-c.org/ns/1.0"><xsl:value-of select="descendant::tei:docAuthor"/></author>
128
          </titleStmt>
129
          <publicationStmt xmlns="http://www.tei-c.org/ns/1.0">
130
            <p xmlns="http://www.tei-c.org/ns/1.0">See the header of the teiCorpus</p>
131
          </publicationStmt>
132
          <!-- les éléments listWit et listBibl sont placés dans sourceDesc -->
133
          <sourceDesc xmlns="http://www.tei-c.org/ns/1.0">
134
            <xsl:copy-of select="descendant::tei:listWit"/>
135
            <xsl:copy-of select="descendant::tei:listBibl[1]"></xsl:copy-of>
136
          </sourceDesc>
137
        </fileDesc>
138
        <profileDesc xmlns="http://www.tei-c.org/ns/1.0">
139
          <!-- docDate devient profileDesc/creation/date[@type='documentCreation'] -->
140
          <creation xmlns="http://www.tei-c.org/ns/1.0"><xsl:apply-templates select="descendant::tei:docDate"/></creation>
141
          <!-- argument devient profileDesc/abstract -->
142
          <xsl:apply-templates select="descendant::tei:argument"/>
143
        </profileDesc>
144
      </teiHeader>
145
      <text xmlns="http://www.tei-c.org/ns/1.0">
146
          <xsl:apply-templates/>
147
      </text>
148
    </TEI>
149
  </xsl:template>
150
  
151
  <!-- on supprime listWit du corps du texte (cf. l'entête) -->
152
  <xsl:template match="tei:listWit"/>
50
	<xsl:template match="*|comment()">
51
		<!-- Copy the current node -->
52
		<xsl:copy>
53
			<!-- Including any attributes it has and any child nodes -->
54
			<xsl:apply-templates select="@*|node()" />
55
		</xsl:copy>
56
	</xsl:template>
153 57

  
154
<!-- on supprime les entêtes et pied de pages (non alignables) -->
155
  
156
  <xsl:template match="tei:fw">
157
    <xsl:comment>fw : <xsl:copy-of select="."/></xsl:comment>
158
  </xsl:template>
58
	<xsl:template match="processing-instruction()" />
159 59

  
160
  <!-- on ajoute un attribut pour faciliter l'identification des segments à ne pas aligner -->
161
  
162
  <xsl:template match="tei:choice/tei:expan|tei:choice/tei:corr|tei:supplied|tei:note">
163
    <xsl:copy>
164
      <xsl:apply-templates select="@*"/>
165
      <xsl:attribute name="ana">ori:align-no</xsl:attribute>
166
      <xsl:apply-templates/>
167
    </xsl:copy>
168
  </xsl:template>
169
  
60
	<!-- On supprime les attributs par défaut de la DTD TEI -->
170 61

  
171
<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='no']]">
172
  <xsl:choose>
173
    <!-- patch d'espace blanc devant les sauts de ligne à l'intérieur de mots -->
174
    <xsl:when test="matches(.,'\s+$')"><xsl:value-of select="replace(.,'\s+$','')"/></xsl:when>
175
    <xsl:otherwise><xsl:copy/></xsl:otherwise>
176
  </xsl:choose>
177
</xsl:template>
62
	<xsl:template match="@*">
63
		<xsl:choose>
64
			<xsl:when
65
				test="matches(name(.),'^(part|instant|anchored|full)$')" />
66
			<xsl:otherwise>
67
				<xsl:copy />
68
			</xsl:otherwise>
69
		</xsl:choose>
70
	</xsl:template>
178 71

  
72
	<xsl:template match="@facs">
73
		<xsl:attribute name="facs"><xsl:value-of
74
			select="replace(.,'\.tif$','.png','i')" /></xsl:attribute>
75
	</xsl:template>
76

  
77
	<xsl:template match="tei:teiHeader">
78
		<xsl:copy>
79
			<xsl:apply-templates select="@*" />
80
			<xsl:apply-templates />
81
		</xsl:copy>
82
	</xsl:template>
83

  
84

  
85
	<xsl:template match="tei:revisionDesc">
86
		<xsl:copy>
87
			<xsl:apply-templates select="@*" />
88
			<change xmlns="http://www.tei-c.org/ns/1.0" when="2007-01-01"
89
				who="#DS">Publication du document original</change>
90
			<!-- information récupérée à partir de /TEI/text[1]/front[1]/titlePage[1]/docDate[1] -->
91
			<change xmlns="http://www.tei-c.org/ns/1.0"
92
				when="{format-date(current-date(),'[Y]-[M01]-[D01]')}" who="#auto">Conversion
93
				automatique au format XML-TEI-Oriflamms</change>
94
			<xsl:apply-templates />
95
		</xsl:copy>
96
	</xsl:template>
97

  
98
	<xsl:template match="tei:encodingDesc">
99
		<xsl:copy>
100
			<xsl:apply-templates select="@*" />
101
			<xsl:apply-templates />
102
			<xsl:if test="not(//tei:prefixDef[@ident='ori'])">
103
				<listPrefixDef xmlns="http://www.tei-c.org/ns/1.0">
104
					<prefixDef xmlns="http://www.tei-c.org/ns/1.0"
105
						ident="ori" matchPattern="([a-z]+)"
106
						replacementPattern="oriflamms-annotation-scheme.xml#$1">
107
						<p>
108
							In the context of this project, private URIs with the prefix
109
							"ori" point to
110
							<gi>interp</gi>
111
							elements in the project's
112
							oriflamms-annotation-scheme.xml file.
113
						</p>
114
					</prefixDef>
115
				</listPrefixDef>
116
			</xsl:if>
117
		</xsl:copy>
118
	</xsl:template>
119

  
120
	<!-- On restructure le document pour avoir un TEI par charte -->
121

  
122
	<!-- TEI devient teiCorpus -->
123

  
124
	<xsl:template match="tei:TEI">
125
		<xsl:element name="teiCorpus"
126
			xmlns="http://www.tei-c.org/ns/1.0">
127
			<xsl:apply-templates select="@*" />
128
			<xsl:apply-templates />
129
		</xsl:element>
130
	</xsl:template>
131

  
132
	<!-- on supprime l'élément text de niveau 1 et travaille directement sur 
133
		le niveau 2 (l'élément group intermédiaire disparait) -->
134

  
135
	<xsl:template match="tei:TEI/tei:text">
136
		<xsl:apply-templates select="descendant::tei:text" />
137
	</xsl:template>
138

  
139
	<xsl:template match="tei:text//tei:text">
140

  
141
		<TEI xmlns="http://www.tei-c.org/ns/1.0">
142
			<teiHeader xmlns="http://www.tei-c.org/ns/1.0">
143
				<fileDesc xmlns="http://www.tei-c.org/ns/1.0">
144
					<titleStmt xmlns="http://www.tei-c.org/ns/1.0">
145
						<title xmlns="http://www.tei-c.org/ns/1.0">
146
							<xsl:text>Acte original </xsl:text>
147
							<xsl:value-of
148
								select="substring-after(preceding-sibling::comment()[contains(.,'acte original')][1],'acte original ')" />
149
						</title>
150
						<author xmlns="http://www.tei-c.org/ns/1.0">
151
							<xsl:value-of select="descendant::tei:docAuthor" />
152
						</author>
153
					</titleStmt>
154
					<publicationStmt
155
						xmlns="http://www.tei-c.org/ns/1.0">
156
						<p xmlns="http://www.tei-c.org/ns/1.0">See the header of the teiCorpus</p>
157
					</publicationStmt>
158
					<!-- les éléments listWit et listBibl sont placés dans sourceDesc -->
159
					<sourceDesc xmlns="http://www.tei-c.org/ns/1.0">
160
						<xsl:copy-of select="descendant::tei:listWit" />
161
						<xsl:copy-of select="descendant::tei:listBibl[1]"></xsl:copy-of>
162
					</sourceDesc>
163
				</fileDesc>
164
				<profileDesc xmlns="http://www.tei-c.org/ns/1.0">
165
					<!-- docDate devient profileDesc/creation/date[@type='documentCreation'] -->
166
					<creation xmlns="http://www.tei-c.org/ns/1.0">
167
						<xsl:apply-templates
168
							select="descendant::tei:docDate" />
169
					</creation>
170
					<!-- argument devient profileDesc/abstract -->
171
					<xsl:apply-templates
172
						select="descendant::tei:argument" />
173
				</profileDesc>
174
			</teiHeader>
175
			<text xmlns="http://www.tei-c.org/ns/1.0">
176
				<xsl:apply-templates />
177
			</text>
178
		</TEI>
179
	</xsl:template>
180

  
181
	<!-- on supprime listWit du corps du texte (cf. l'entête) -->
182
	<xsl:template match="tei:listWit" />
183

  
184
	<!-- on supprime les entêtes et pied de pages (non alignables) -->
185

  
186
	<xsl:template match="tei:fw">
187
		<xsl:comment>
188
			fw :
189
			<xsl:copy-of select="." />
190
		</xsl:comment>
191
	</xsl:template>
192

  
193
	<!-- on ajoute un attribut pour faciliter l'identification des segments 
194
		à ne pas aligner -->
195

  
196
	<xsl:template
197
		match="tei:choice/tei:expan|tei:choice/tei:corr|tei:supplied|tei:note">
198
		<xsl:copy>
199
			<xsl:apply-templates select="@*" />
200
			<xsl:attribute name="ana">ori:align-no</xsl:attribute>
201
			<xsl:apply-templates />
202
		</xsl:copy>
203
	</xsl:template>
204

  
205

  
206
	<xsl:template
207
		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='no']]">
208
		<xsl:choose>
209
			<!-- patch d'espace blanc devant les sauts de ligne à l'intérieur de mots -->
210
			<xsl:when test="matches(.,'\s+$')">
211
				<xsl:value-of select="replace(.,'\s+$','')" />
212
			</xsl:when>
213
			<xsl:otherwise>
214
				<xsl:copy />
215
			</xsl:otherwise>
216
		</xsl:choose>
217
	</xsl:template>
218

  
179 219
</xsl:stylesheet>

Also available in: Unified diff