1
|
<?xml version="1.0"?>
|
2
|
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
|
3
|
xmlns:exsl="http://exslt.org/common"
|
4
|
xmlns:set="http://exslt.org/sets"
|
5
|
exclude-result-prefixes="exsl set"
|
6
|
version="1.0">
|
7
|
|
8
|
<!-- ********************************************************************
|
9
|
$Id: html-rtf.xsl 8345 2009-03-16 06:44:07Z bobstayton $
|
10
|
********************************************************************
|
11
|
|
12
|
This file is part of the XSL DocBook Stylesheet distribution.
|
13
|
See ../README or http://docbook.sf.net/release/xsl/current/ for
|
14
|
copyright and other information.
|
15
|
|
16
|
******************************************************************** -->
|
17
|
|
18
|
<!-- ==================================================================== -->
|
19
|
|
20
|
<!-- This module contains templates that match against HTML nodes. It is used
|
21
|
to post-process result tree fragments for some sorts of cleanup.
|
22
|
These templates can only ever be fired by a processor that supports
|
23
|
exslt:node-set(). -->
|
24
|
|
25
|
<!-- ==================================================================== -->
|
26
|
|
27
|
<!-- insert.html.p mode templates insert a particular RTF at the beginning
|
28
|
of the first paragraph in the primary RTF. -->
|
29
|
|
30
|
<xsl:template match="/" mode="insert.html.p">
|
31
|
<xsl:param name="mark" select="'?'"/>
|
32
|
<xsl:apply-templates mode="insert.html.p">
|
33
|
<xsl:with-param name="mark" select="$mark"/>
|
34
|
</xsl:apply-templates>
|
35
|
</xsl:template>
|
36
|
|
37
|
<xsl:template match="*" mode="insert.html.p">
|
38
|
<xsl:param name="mark" select="'?'"/>
|
39
|
<xsl:copy>
|
40
|
<xsl:copy-of select="@*"/>
|
41
|
<xsl:apply-templates mode="insert.html.p">
|
42
|
<xsl:with-param name="mark" select="$mark"/>
|
43
|
</xsl:apply-templates>
|
44
|
</xsl:copy>
|
45
|
</xsl:template>
|
46
|
|
47
|
<xsl:template xmlns:html="http://www.w3.org/1999/xhtml"
|
48
|
match="html:p|p" mode="insert.html.p">
|
49
|
<xsl:param name="mark" select="'?'"/>
|
50
|
<xsl:copy>
|
51
|
<xsl:copy-of select="@*"/>
|
52
|
<xsl:if test="not(preceding::p|preceding::html:p)">
|
53
|
<xsl:copy-of select="$mark"/>
|
54
|
</xsl:if>
|
55
|
<xsl:apply-templates mode="insert.html.p">
|
56
|
<xsl:with-param name="mark" select="$mark"/>
|
57
|
</xsl:apply-templates>
|
58
|
</xsl:copy>
|
59
|
</xsl:template>
|
60
|
|
61
|
<xsl:template match="text()|processing-instruction()|comment()" mode="insert.html.p">
|
62
|
<xsl:param name="mark" select="'?'"/>
|
63
|
<xsl:copy/>
|
64
|
</xsl:template>
|
65
|
|
66
|
<!-- ==================================================================== -->
|
67
|
|
68
|
<!-- insert.html.text mode templates insert a particular RTF at the beginning
|
69
|
of the first text-node in the primary RTF. -->
|
70
|
|
71
|
<xsl:template match="/" mode="insert.html.text">
|
72
|
<xsl:param name="mark" select="'?'"/>
|
73
|
<xsl:apply-templates mode="insert.html.text">
|
74
|
<xsl:with-param name="mark" select="$mark"/>
|
75
|
</xsl:apply-templates>
|
76
|
</xsl:template>
|
77
|
|
78
|
<xsl:template match="*" mode="insert.html.text">
|
79
|
<xsl:param name="mark" select="'?'"/>
|
80
|
<xsl:copy>
|
81
|
<xsl:copy-of select="@*"/>
|
82
|
<xsl:apply-templates mode="insert.html.text">
|
83
|
<xsl:with-param name="mark" select="$mark"/>
|
84
|
</xsl:apply-templates>
|
85
|
</xsl:copy>
|
86
|
</xsl:template>
|
87
|
|
88
|
<xsl:template match="text()|processing-instruction()|comment()" mode="insert.html.text">
|
89
|
<xsl:param name="mark" select="'?'"/>
|
90
|
|
91
|
<xsl:if test="not(preceding::text())">
|
92
|
<xsl:copy-of select="$mark"/>
|
93
|
</xsl:if>
|
94
|
|
95
|
<xsl:copy/>
|
96
|
</xsl:template>
|
97
|
|
98
|
<xsl:template match="processing-instruction()|comment()" mode="insert.html.text">
|
99
|
<xsl:param name="mark" select="'?'"/>
|
100
|
<xsl:copy/>
|
101
|
</xsl:template>
|
102
|
|
103
|
<!-- ==================================================================== -->
|
104
|
|
105
|
<!-- unwrap.p mode templates remove blocks from HTML p elements (and
|
106
|
other places where blocks aren't allowed) -->
|
107
|
|
108
|
<xsl:template name="unwrap.p">
|
109
|
<xsl:param name="p"/>
|
110
|
<xsl:choose>
|
111
|
<xsl:when test="$exsl.node.set.available != 0
|
112
|
and function-available('set:leading')
|
113
|
and function-available('set:trailing')">
|
114
|
<xsl:apply-templates select="exsl:node-set($p)" mode="unwrap.p"/>
|
115
|
</xsl:when>
|
116
|
<xsl:otherwise>
|
117
|
<xsl:copy-of select="$p"/>
|
118
|
</xsl:otherwise>
|
119
|
</xsl:choose>
|
120
|
</xsl:template>
|
121
|
|
122
|
<xsl:template xmlns:html="http://www.w3.org/1999/xhtml"
|
123
|
match="html:p|p" mode="unwrap.p">
|
124
|
<!-- xmlns:html is necessary for the xhtml stylesheet case -->
|
125
|
<xsl:variable name="blocks" xmlns:html="http://www.w3.org/1999/xhtml"
|
126
|
select="address|blockquote|div|hr|h1|h2|h3|h4|h5|h6
|
127
|
|layer|p|pre|table|dl|menu|ol|ul|form
|
128
|
|html:address|html:blockquote|html:div|html:hr
|
129
|
|html:h1|html:h2|html:h3|html:h4|html:h5|html:h6
|
130
|
|html:layer|html:p|html:pre|html:table|html:dl
|
131
|
|html:menu|html:ol|html:ul|html:form"/>
|
132
|
<xsl:choose>
|
133
|
<xsl:when test="$blocks">
|
134
|
<xsl:call-template name="unwrap.p.nodes">
|
135
|
<xsl:with-param name="wrap" select="."/>
|
136
|
<xsl:with-param name="first" select="1"/>
|
137
|
<xsl:with-param name="nodes" select="node()"/>
|
138
|
<xsl:with-param name="blocks" select="$blocks"/>
|
139
|
</xsl:call-template>
|
140
|
</xsl:when>
|
141
|
<xsl:otherwise>
|
142
|
<xsl:copy>
|
143
|
<xsl:copy-of select="@*"/>
|
144
|
<xsl:apply-templates mode="unwrap.p"/>
|
145
|
</xsl:copy>
|
146
|
</xsl:otherwise>
|
147
|
</xsl:choose>
|
148
|
</xsl:template>
|
149
|
|
150
|
<xsl:template match="*" mode="unwrap.p">
|
151
|
<xsl:copy>
|
152
|
<xsl:copy-of select="@*"/>
|
153
|
<xsl:apply-templates mode="unwrap.p"/>
|
154
|
</xsl:copy>
|
155
|
</xsl:template>
|
156
|
|
157
|
<xsl:template match="text()|processing-instruction()|comment()" mode="unwrap.p">
|
158
|
<xsl:copy/>
|
159
|
</xsl:template>
|
160
|
|
161
|
<xsl:template name="unwrap.p.nodes">
|
162
|
<xsl:param name="wrap" select="."/>
|
163
|
<xsl:param name="first" select="0"/>
|
164
|
<xsl:param name="nodes"/>
|
165
|
<xsl:param name="blocks"/>
|
166
|
<xsl:variable name="block" select="$blocks[1]"/>
|
167
|
|
168
|
<!-- This template should never get called if these functions aren't available -->
|
169
|
<!-- but this test is still necessary so that processors don't choke on the -->
|
170
|
<!-- function calls if they don't support the set: functions -->
|
171
|
<xsl:if test="function-available('set:leading')
|
172
|
and function-available('set:trailing')">
|
173
|
<xsl:choose>
|
174
|
<xsl:when test="$blocks">
|
175
|
<xsl:variable name="leading" select="set:leading($nodes,$block)"/>
|
176
|
<xsl:variable name="trailing" select="set:trailing($nodes,$block)"/>
|
177
|
|
178
|
<xsl:if test="(($wrap/@id or $wrap/@xml:id)
|
179
|
and $first = 1) or $leading">
|
180
|
<xsl:element name="{local-name($wrap)}" namespace="{namespace-uri($wrap)}">
|
181
|
<xsl:for-each select="$wrap/@*">
|
182
|
<xsl:if test="$first != 0 or local-name(.) != 'id'">
|
183
|
<xsl:copy/>
|
184
|
</xsl:if>
|
185
|
</xsl:for-each>
|
186
|
<xsl:apply-templates select="$leading" mode="unwrap.p"/>
|
187
|
</xsl:element>
|
188
|
</xsl:if>
|
189
|
|
190
|
<xsl:apply-templates select="$block" mode="unwrap.p"/>
|
191
|
|
192
|
<xsl:if test="$trailing">
|
193
|
<xsl:call-template name="unwrap.p.nodes">
|
194
|
<xsl:with-param name="wrap" select="$wrap"/>
|
195
|
<xsl:with-param name="nodes" select="$trailing"/>
|
196
|
<xsl:with-param name="blocks" select="$blocks[position() > 1]"/>
|
197
|
</xsl:call-template>
|
198
|
</xsl:if>
|
199
|
</xsl:when>
|
200
|
|
201
|
<xsl:otherwise>
|
202
|
<xsl:if test="(($wrap/@id or $wrap/@xml:id) and $first = 1) or $nodes">
|
203
|
<xsl:element name="{local-name($wrap)}" namespace="{namespace-uri($wrap)}">
|
204
|
<xsl:for-each select="$wrap/@*">
|
205
|
<xsl:if test="$first != 0 or local-name(.) != 'id'">
|
206
|
<xsl:copy/>
|
207
|
</xsl:if>
|
208
|
</xsl:for-each>
|
209
|
<xsl:apply-templates select="$nodes" mode="unwrap.p"/>
|
210
|
</xsl:element>
|
211
|
</xsl:if>
|
212
|
</xsl:otherwise>
|
213
|
</xsl:choose>
|
214
|
</xsl:if>
|
215
|
</xsl:template>
|
216
|
|
217
|
<!-- ==================================================================== -->
|
218
|
<!-- make.verbatim.mode replaces spaces and newlines -->
|
219
|
|
220
|
<xsl:template match="/" mode="make.verbatim.mode">
|
221
|
<xsl:apply-templates mode="make.verbatim.mode"/>
|
222
|
</xsl:template>
|
223
|
|
224
|
<xsl:template match="*" mode="make.verbatim.mode">
|
225
|
<xsl:copy>
|
226
|
<xsl:copy-of select="@*"/>
|
227
|
<xsl:apply-templates mode="make.verbatim.mode"/>
|
228
|
</xsl:copy>
|
229
|
</xsl:template>
|
230
|
|
231
|
<xsl:template match="processing-instruction()|comment()" mode="make.verbatim.mode">
|
232
|
<xsl:copy/>
|
233
|
</xsl:template>
|
234
|
|
235
|
<xsl:template match="text()" mode="make.verbatim.mode">
|
236
|
<xsl:variable name="text" select="translate(., ' ', ' ')"/>
|
237
|
|
238
|
<xsl:choose>
|
239
|
<xsl:when test="not(contains($text, '
'))">
|
240
|
<xsl:value-of select="$text"/>
|
241
|
</xsl:when>
|
242
|
|
243
|
<xsl:otherwise>
|
244
|
<xsl:variable name="len" select="string-length($text)"/>
|
245
|
|
246
|
<xsl:choose>
|
247
|
<xsl:when test="$len = 1">
|
248
|
<br/><xsl:text>
</xsl:text>
|
249
|
</xsl:when>
|
250
|
|
251
|
<xsl:otherwise>
|
252
|
<xsl:variable name="half" select="$len div 2"/>
|
253
|
<xsl:call-template name="make-verbatim-recursive">
|
254
|
<xsl:with-param name="text" select="substring($text, 1, $half)"/>
|
255
|
</xsl:call-template>
|
256
|
<xsl:call-template name="make-verbatim-recursive">
|
257
|
<xsl:with-param name="text"
|
258
|
select="substring($text, ($half + 1), $len)"/>
|
259
|
</xsl:call-template>
|
260
|
</xsl:otherwise>
|
261
|
</xsl:choose>
|
262
|
</xsl:otherwise>
|
263
|
</xsl:choose>
|
264
|
</xsl:template>
|
265
|
|
266
|
<xsl:template name="make-verbatim-recursive">
|
267
|
<xsl:param name="text" select="''"/>
|
268
|
|
269
|
<xsl:choose>
|
270
|
<xsl:when test="not(contains($text, '
'))">
|
271
|
<xsl:value-of select="$text"/>
|
272
|
</xsl:when>
|
273
|
|
274
|
<xsl:otherwise>
|
275
|
<xsl:variable name="len" select="string-length($text)"/>
|
276
|
|
277
|
<xsl:choose>
|
278
|
<xsl:when test="$len = 1">
|
279
|
<br/><xsl:text>
</xsl:text>
|
280
|
</xsl:when>
|
281
|
|
282
|
<xsl:otherwise>
|
283
|
<xsl:variable name="half" select="$len div 2"/>
|
284
|
<xsl:call-template name="make-verbatim-recursive">
|
285
|
<xsl:with-param name="text" select="substring($text, 1, $half)"/>
|
286
|
</xsl:call-template>
|
287
|
<xsl:call-template name="make-verbatim-recursive">
|
288
|
<xsl:with-param name="text"
|
289
|
select="substring($text, ($half + 1), $len)"/>
|
290
|
</xsl:call-template>
|
291
|
</xsl:otherwise>
|
292
|
</xsl:choose>
|
293
|
</xsl:otherwise>
|
294
|
</xsl:choose>
|
295
|
</xsl:template>
|
296
|
|
297
|
<!-- ==================================================================== -->
|
298
|
|
299
|
<!-- remove.empty.div mode templates remove empty blocks -->
|
300
|
|
301
|
<xsl:template name="remove.empty.div">
|
302
|
<xsl:param name="div"/>
|
303
|
<xsl:choose>
|
304
|
<xsl:when test="$exsl.node.set.available != 0">
|
305
|
<xsl:apply-templates select="exsl:node-set($div)" mode="remove.empty.div"/>
|
306
|
</xsl:when>
|
307
|
<xsl:otherwise>
|
308
|
<xsl:copy-of select="$div"/>
|
309
|
</xsl:otherwise>
|
310
|
</xsl:choose>
|
311
|
</xsl:template>
|
312
|
|
313
|
<xsl:template xmlns:html="http://www.w3.org/1999/xhtml"
|
314
|
match="html:p|p|html:div|div" mode="remove.empty.div">
|
315
|
<xsl:if test="node()">
|
316
|
<xsl:copy>
|
317
|
<xsl:copy-of select="@*"/>
|
318
|
<xsl:apply-templates mode="remove.empty.div"/>
|
319
|
</xsl:copy>
|
320
|
</xsl:if>
|
321
|
</xsl:template>
|
322
|
|
323
|
<xsl:template match="*" mode="remove.empty.div">
|
324
|
<xsl:copy>
|
325
|
<xsl:copy-of select="@*"/>
|
326
|
<xsl:apply-templates mode="remove.empty.div"/>
|
327
|
</xsl:copy>
|
328
|
</xsl:template>
|
329
|
|
330
|
<xsl:template match="text()|processing-instruction()|comment()" mode="remove.empty.div">
|
331
|
<xsl:copy/>
|
332
|
</xsl:template>
|
333
|
|
334
|
<!-- ==================================================================== -->
|
335
|
|
336
|
</xsl:stylesheet>
|