diff options
Diffstat (limited to 'filter/source/xslt/export/spreadsheetml/styles.xsl')
| -rw-r--r-- | filter/source/xslt/export/spreadsheetml/styles.xsl | 695 |
1 files changed, 695 insertions, 0 deletions
diff --git a/filter/source/xslt/export/spreadsheetml/styles.xsl b/filter/source/xslt/export/spreadsheetml/styles.xsl new file mode 100644 index 000000000000..8b8875d0de61 --- /dev/null +++ b/filter/source/xslt/export/spreadsheetml/styles.xsl @@ -0,0 +1,695 @@ +<?xml version="1.0" encoding="UTF-8"?> +<!-- + + DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. + + Copyright 2000, 2010 Oracle and/or its affiliates. + + OpenOffice.org - a multi-platform office productivity suite + + This file is part of OpenOffice.org. + + OpenOffice.org is free software: you can redistribute it and/or modify + it under the terms of the GNU Lesser General Public License version 3 + only, as published by the Free Software Foundation. + + OpenOffice.org is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU Lesser General Public License version 3 for more details + (a copy is included in the LICENSE file that accompanied this code). + + You should have received a copy of the GNU Lesser General Public License + version 3 along with OpenOffice.org. If not, see + <http://www.openoffice.org/license.html> + for a copy of the LGPLv3 License. + +--> +<xsl:stylesheet version="1.0" + xmlns:xsl="http://www.w3.org/1999/XSL/Transform" + xmlns:chart="urn:oasis:names:tc:opendocument:xmlns:chart:1.0" + xmlns:config="urn:oasis:names:tc:opendocument:xmlns:config:1.0" + xmlns:dc="http://purl.org/dc/elements/1.1/" + xmlns:dom="http://www.w3.org/2001/xml-events" + xmlns:dr3d="urn:oasis:names:tc:opendocument:xmlns:dr3d:1.0" + xmlns:draw="urn:oasis:names:tc:opendocument:xmlns:drawing:1.0" + xmlns:fo="urn:oasis:names:tc:opendocument:xmlns:xsl-fo-compatible:1.0" + xmlns:form="urn:oasis:names:tc:opendocument:xmlns:form:1.0" + xmlns:math="http://www.w3.org/1998/Math/MathML" + xmlns:meta="urn:oasis:names:tc:opendocument:xmlns:meta:1.0" + xmlns:number="urn:oasis:names:tc:opendocument:xmlns:datastyle:1.0" + xmlns:office="urn:oasis:names:tc:opendocument:xmlns:office:1.0" + xmlns:ooo="http://openoffice.org/2004/office" + xmlns:oooc="http://openoffice.org/2004/calc" + xmlns:ooow="http://openoffice.org/2004/writer" + xmlns:script="urn:oasis:names:tc:opendocument:xmlns:script:1.0" + xmlns:style="urn:oasis:names:tc:opendocument:xmlns:style:1.0" + xmlns:svg="urn:oasis:names:tc:opendocument:xmlns:svg-compatible:1.0" + xmlns:table="urn:oasis:names:tc:opendocument:xmlns:table:1.0" + xmlns:text="urn:oasis:names:tc:opendocument:xmlns:text:1.0" + xmlns:xlink="http://www.w3.org/1999/xlink" + xmlns:xt="http://www.jclark.com/xt" + xmlns:common="http://exslt.org/common" + xmlns:xalan="http://xml.apache.org/xalan" + xmlns="urn:schemas-microsoft-com:office:spreadsheet" xmlns:c="urn:schemas-microsoft-com:office:component:spreadsheet" xmlns:html="http://www.w3.org/TR/REC-html40" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:ss="urn:schemas-microsoft-com:office:spreadsheet" xmlns:x2="http://schemas.microsoft.com/office/excel/2003/xml" xmlns:x="urn:schemas-microsoft-com:office:excel" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" + exclude-result-prefixes="chart config dc dom dr3d draw fo form math meta number office ooo oooc ooow script style svg table text xlink xt common xalan"> + + <!-- Used in case of 'style:map', conditional formatting, where a style references to another --> + <xsl:key name="styles" match="/*/office:styles/style:style | /*/office:automatic-styles/style:style" use="@style:name" /> + <!-- + Mapping of OOo style:name and style:family to excel ss:ID + Styles form style:style map from style:name to ss:Name + style:parent-style map to ss:Parent + --> + <!-- default styles of the application + <xsl:template match="style:default-style" mode="styles" > + <xsl:call-template name="style:style"> + <xsl:with-param name="styleName" select="'Default'" /> + </xsl:call-template> + </xsl:template> + --> + + <xsl:template match="style:style" mode="styles"> + <xsl:param name="isAutomatic" /> + <xsl:param name="styleName" select="@style:name" /> + <xsl:param name="styleParentName" select="@style:parent-style-name" /> + + <!-- only row styles used by cells are exported, + as usual row style properties are already exported as row attributes --> + <xsl:if test="not(@style:family='table-row') or @style:family='table-row' and key('getCellByStyle', '.')"> + <xsl:element name="Style"> + <xsl:attribute name="ss:ID"> + <!-- neglecting that a style is only unique in conjunction with it's family name --> + <xsl:value-of select="@style:name" /> + </xsl:attribute> + <xsl:choose> + <xsl:when test="not($isAutomatic)"> + <xsl:choose> + <xsl:when test="@style:display-name"> + <xsl:attribute name="ss:Name"><xsl:value-of select="@style:display-name"/></xsl:attribute> + </xsl:when> + <xsl:otherwise> + <xsl:attribute name="ss:Name"><xsl:value-of select="@style:name" /></xsl:attribute> + </xsl:otherwise> + </xsl:choose> + <xsl:choose> + <!-- when a non-allowed parent style is found + (in spreadsheetml no style with ss:Name is able to have a ss:Parent) --> + <xsl:when test="@style:parent-style-name"> + <!-- styles have to be merged (flatting heritance tree) --> + <xsl:variable name="stylePropertiesContainer"> + <xsl:call-template name="merge-all-parent-styles"> + <xsl:with-param name="currentStyle" select="." /> + </xsl:call-template> + </xsl:variable> + <xsl:choose> + <xsl:when test="function-available('xalan:nodeset')"> + <xsl:call-template name="write-style-properties"> + <xsl:with-param name="styleProperties" select="xalan:nodeset($stylePropertiesContainer)/*" /> + </xsl:call-template> + </xsl:when> + <xsl:when test="function-available('common:node-set')"> + <xsl:call-template name="write-style-properties"> + <xsl:with-param name="styleProperties" select="common:node-set($stylePropertiesContainer)/*" /> + </xsl:call-template> + </xsl:when> + <xsl:when test="function-available('xt:node-set')"> + <xsl:call-template name="write-style-properties"> + <xsl:with-param name="styleProperties" select="xt:node-set($stylePropertiesContainer)/*" /> + </xsl:call-template> + </xsl:when> + <xsl:otherwise> + <xsl:message terminate="yes">WARNING: The required node set function was not found!</xsl:message> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <xsl:otherwise> + <xsl:call-template name="write-style-properties" /> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <xsl:otherwise> + <!-- automatic styles are implicit inherting from a style called 'Default', + furthermore nor in spreadsheetml nor in OpenDocument automatic styles are able to inherit from each other --> + <xsl:choose> + <xsl:when test="@style:parent-style-name and not(@style:parent-style-name = 'Default')"> + <xsl:attribute name="ss:Parent"><xsl:value-of select="@style:parent-style-name" /></xsl:attribute> + </xsl:when> + </xsl:choose> + <xsl:call-template name="write-style-properties" /> + </xsl:otherwise> + </xsl:choose> + </xsl:element> + </xsl:if> + </xsl:template> + + <!-- resolving the style inheritance by starting from uppermost parent and + overriding exisiting style properties by new found child properties --> + <xsl:template name="merge-all-parent-styles"> + <xsl:param name="currentStyle" /> + + <xsl:choose> + <!-- in case of a parent, styles have to be merged (flatting heritance tree) --> + <xsl:when test="$currentStyle/@style:parent-style-name"> + <!-- collect parent style properties --> + <xsl:variable name="parentStyleContainer"> + <!-- take a look if the parent style has a parent himself --> + <xsl:call-template name="merge-all-parent-styles" > + <xsl:with-param name="currentStyle" select="key('styles', $currentStyle/@style:parent-style-name)" /> + </xsl:call-template> + </xsl:variable> + <xsl:choose> + <xsl:when test="function-available('xalan:nodeset')"> + <xsl:call-template name="merge-style-properties"> + <xsl:with-param name="childStyleContainer" select="$currentStyle" /> + <xsl:with-param name="parentStyleContainer" select="xalan:nodeset($parentStyleContainer)" /> + </xsl:call-template> + </xsl:when> + <xsl:when test="function-available('common:node-set')"> + <xsl:call-template name="merge-style-properties"> + <xsl:with-param name="childStyleContainer" select="$currentStyle" /> + <xsl:with-param name="parentStyleContainer" select="common:node-set($parentStyleContainer)" /> + </xsl:call-template> + </xsl:when> + <xsl:when test="function-available('xt:node-set')"> + <xsl:call-template name="merge-style-properties"> + <xsl:with-param name="childStyleContainer" select="$currentStyle" /> + <xsl:with-param name="parentStyleContainer" select="xt:node-set($parentStyleContainer)" /> + </xsl:call-template> + </xsl:when> + <xsl:otherwise> + <xsl:message terminate="yes">WARNING: The required node-set function was not found!</xsl:message> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <!-- called for top parents (or styles without parents) --> + <xsl:otherwise> + <xsl:copy-of select="$currentStyle/*"/> + </xsl:otherwise> + </xsl:choose> + </xsl:template> + + <xsl:template name="merge-style-properties"> + <xsl:param name="childStyleContainer" /> + <xsl:param name="parentStyleContainer" /> + + <xsl:choose> + <xsl:when test="$parentStyleContainer/*"> + <xsl:apply-templates select="$parentStyleContainer/*" mode="inheritance"> + <xsl:with-param name="childStyleContainer" select="$childStyleContainer" /> + </xsl:apply-templates> + </xsl:when> + <xsl:otherwise> + <xsl:copy-of select="$childStyleContainer/*"/> + </xsl:otherwise> + </xsl:choose> + </xsl:template> + + <xsl:template match="*" mode="inheritance"> + <xsl:param name="childStyleContainer" /> + + <!-- create an element named equal to the current properties parent element (e.g. style:table-cell-properties) --> + <xsl:element name="{name()}" namespace="urn:oasis:names:tc:opendocument:xmlns:style:1.0"> + <!-- attributes will be automatically replaced --> + <xsl:copy-of select="@*" /> + <xsl:copy-of select="$childStyleContainer/*[name() = name(current() )]/@*"/> + + <!-- elements are not needed yet, will be neglected for simplicity reasons --> + </xsl:element> + </xsl:template> + + <xsl:key match="/*/office:styles/number:date-style | + /*/office:styles/number:time-style | + /*/office:styles/number:number-style | + /*/office:styles/number:percentage-style | + /*/office:styles/number:currency-style | + /*/office:automatic-styles/number:date-style | + /*/office:automatic-styles/number:time-style | + /*/office:automatic-styles/number:number-style | + /*/office:automatic-styles/number:percentage-style | + /*/office:automatic-styles/number:currency-style" name="number-style" use="@style:name" /> + + + <xsl:template name="write-style-properties"> + <xsl:param name="styleProperties" select="key('styles', @style:name)/*" /> + + <xsl:call-template name="Alignment"> + <xsl:with-param name="styleProperties" select="$styleProperties" /> + </xsl:call-template> + <xsl:call-template name="Border"> + <xsl:with-param name="styleProperties" select="$styleProperties" /> + </xsl:call-template> + <xsl:call-template name="Font"> + <xsl:with-param name="styleProperties" select="$styleProperties" /> + <xsl:with-param name="styleParentName" select="@style:parent-style-name" /> + </xsl:call-template> + <xsl:call-template name="Interior"> + <xsl:with-param name="styleProperties" select="$styleProperties" /> + </xsl:call-template> + <xsl:call-template name="NumberFormat"> + <xsl:with-param name="styleProperties" select="$styleProperties" /> + </xsl:call-template> + </xsl:template> + + <!-- context is element 'style:style' --> + <xsl:template name="NumberFormat"> + <xsl:if test="@style:data-style-name"> + <xsl:variable name="numberStyleName" select="@style:data-style-name" /> + <xsl:variable name="numberStyle" select="key('number-style', $numberStyleName)" /> + + <xsl:element name="NumberFormat"> + <xsl:attribute name="ss:Format"> + <xsl:choose> + <xsl:when test="not($numberStyle/node())"> + <!-- Excel2003sp1 issue: 'General' and 'General Number' is not supported --> + <xsl:text>General</xsl:text> + </xsl:when> + <xsl:when test="name($numberStyle) = 'number:number-style'"> + <xsl:choose> + <xsl:when test="$numberStyle/number:scientific-number"> + <xsl:text>Scientific</xsl:text> + </xsl:when> + <!-- Excel2003sp1 issue: 'General Number' not supported --> + <xsl:when test="$numberStyle/number:number/@number:decimal-places and + $numberStyle/number:number/@number:decimal-places='0'"> + <xsl:text>General</xsl:text> + </xsl:when> + <xsl:when test="$numberStyle/number:text"> + <xsl:choose> + <xsl:when test="$numberStyle/number:text = 'No' or $numberStyle/number:text = 'Nein'"> + <xsl:text>Yes/No</xsl:text> + </xsl:when> + <xsl:when test="$numberStyle/number:text = 'False' or $numberStyle/number:text = 'Falsch'"> + <xsl:text>True/False</xsl:text> + </xsl:when> + <xsl:when test="$numberStyle/number:text = 'Off' or $numberStyle/number:text = 'Aus'"> + <xsl:text>On/Off</xsl:text> + </xsl:when> + <!-- Excel2003sp1 issue: currency is saved as 'float' --> + <xsl:when test="$numberStyle/number:currency-symbol"> + <xsl:choose> + <xsl:when test="contains($numberStyle/number:currency-symbol, '€')"> + <xsl:text>Euro Currency</xsl:text> + </xsl:when> + <xsl:otherwise> + <xsl:text>Currency</xsl:text> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <!-- Excel2003sp1 issue: 'Currency' is saved as 'float' --> + <xsl:when test="contains($numberStyle/number:text, '$')"> + <xsl:text>Currency</xsl:text> + </xsl:when> + <!-- OASIS XML adapation --> + <xsl:otherwise> + <xsl:text>General</xsl:text> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <xsl:when test="$numberStyle/number:grouping"> + <xsl:text>Standard</xsl:text> + </xsl:when> + <xsl:otherwise> + <xsl:text>Fixed</xsl:text> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <xsl:when test="name($numberStyle) = 'number:time-style'"> + <xsl:choose> + <xsl:when test="$numberStyle/number:am-pm"> + <xsl:choose> + <xsl:when test="$numberStyle/number:seconds"> + <xsl:text>Long Time</xsl:text> + </xsl:when> + <xsl:otherwise> + <xsl:text>Medium Time</xsl:text> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <xsl:otherwise> + <xsl:text>Short Time</xsl:text> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <xsl:when test="name($numberStyle) = 'number:percentage-style'"> + <xsl:text>Percent</xsl:text> + </xsl:when> + <xsl:when test="name($numberStyle) = 'number:currency-style'"> + <xsl:choose> + <xsl:when test="contains($numberStyle/number:currency-symbol, '€')"> + <xsl:text>Euro Currency</xsl:text> + </xsl:when> + <xsl:otherwise> + <xsl:text>Currency</xsl:text> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <xsl:otherwise> + <xsl:choose> + <xsl:when test="$numberStyle/number:month"> + <xsl:choose> + <xsl:when test="$numberStyle/number:month/@number:textual and + $numberStyle/number:month/@number:textual=true()"> + <xsl:text>Medium Date</xsl:text> + <!-- Excel2003 sp1 issue: No difference between 'Long Date' and 'Medium Date' --> + </xsl:when> + <xsl:when test="$numberStyle/number:hours"> + <xsl:text>General Date</xsl:text> + </xsl:when> + <xsl:when test="$numberStyle/number:year/@number:style and + $numberStyle/number:year/@number:style='long'"> + <xsl:text>Short Date</xsl:text> + </xsl:when> + <!-- OASIS XML adapation --> + <xsl:otherwise> + <xsl:text>Short Date</xsl:text> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <!-- OASIS XML adapation --> + <xsl:otherwise> + <xsl:text>General</xsl:text> + </xsl:otherwise> + </xsl:choose> + </xsl:otherwise> + </xsl:choose> + </xsl:attribute> + </xsl:element> + </xsl:if> + </xsl:template> + + <xsl:template name="Alignment"> + <xsl:param name="styleProperties" /> + + <!-- An empty Alignment element, might overwrite parents setting by + the default attributes --> + <xsl:if test="$styleProperties/@fo:text-align or + $styleProperties/@style:vertical-align or + $styleProperties/@fo:wrap-option or + $styleProperties/@fo:margin-left or + $styleProperties/@style:rotation-angle or + $styleProperties/@style:direction"> + <xsl:element name="Alignment"> + <xsl:if test="$styleProperties/@fo:text-align"> + <xsl:attribute name="ss:Horizontal"> + <xsl:choose> + <xsl:when test="$styleProperties/@fo:text-align = 'center'">Center</xsl:when> + <xsl:when test="$styleProperties/@fo:text-align = 'end'">Right</xsl:when> + <xsl:when test="$styleProperties/@fo:text-align = 'justify'">Justify</xsl:when> + <xsl:otherwise>Left</xsl:otherwise> + </xsl:choose> + </xsl:attribute> + </xsl:if> + <xsl:if test="$styleProperties/@style:vertical-align"> + <xsl:attribute name="ss:Vertical"> + <xsl:choose> + <xsl:when test="$styleProperties/@style:vertical-align = 'top'">Top</xsl:when> + <xsl:when test="$styleProperties/@style:vertical-align = 'bottom'">Bottom</xsl:when> + <xsl:when test="$styleProperties/@style:vertical-align = 'middle'">Center</xsl:when> + <xsl:otherwise>Automatic</xsl:otherwise> + </xsl:choose> + </xsl:attribute> + </xsl:if> + <xsl:if test="$styleProperties/@fo:wrap-option = 'wrap'"> + <xsl:attribute name="ss:WrapText">1</xsl:attribute> + </xsl:if> + <xsl:if test="$styleProperties/@fo:margin-left"> + <xsl:attribute name="ss:Indent"> + <xsl:variable name="margin"> + <xsl:call-template name="convert2pt"> + <xsl:with-param name="value" select="$styleProperties/@fo:margin-left" /> + <xsl:with-param name="rounding-factor" select="1" /> + </xsl:call-template> + </xsl:variable> + <!-- one ss:Indent is equal to 10 points --> + <xsl:value-of select="number($margin) div 10"/> + </xsl:attribute> + </xsl:if> + <!-- Excel is only able to rotate between 90 and -90 degree (inclusive). + Other degrees will be mapped by 180 degrees --> + <xsl:if test="$styleProperties/@style:rotation-angle"> + <xsl:attribute name="ss:Rotate"> + <xsl:choose> + <xsl:when test="$styleProperties/@style:rotation-angle > 90"> + <xsl:choose> + <xsl:when test="$styleProperties/@style:rotation-angle >= 270"> + <xsl:value-of select="$styleProperties/@style:rotation-angle - 360" /> + </xsl:when> + <xsl:otherwise> + <xsl:value-of select="$styleProperties/@style:rotation-angle - 180" /> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <xsl:when test="$styleProperties/@style:rotation-angle < -90"> + <xsl:choose> + <xsl:when test="$styleProperties/@style:rotation-angle <= -270"> + <xsl:value-of select="$styleProperties/@style:rotation-angle + 360" /> + </xsl:when> + <xsl:otherwise> + <xsl:value-of select="$styleProperties/@style:rotation-angle + 180" /> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <xsl:otherwise> + <xsl:value-of select="$styleProperties/@style:rotation-angle" /> + </xsl:otherwise> + </xsl:choose> + </xsl:attribute> + </xsl:if> + <xsl:if test="$styleProperties/@style:direction = 'ttb'"> + <xsl:attribute name="ss:VerticalText">1</xsl:attribute> + </xsl:if> + </xsl:element> + </xsl:if> + </xsl:template> + + + <xsl:template name="Border"> + <xsl:param name="styleProperties" /> + + <!-- An empty border element, might overwrite parents setting by + the default attributes --> + <xsl:if test="$styleProperties/@fo:border or + $styleProperties/@fo:border-bottom or + $styleProperties/@fo:border-left or + $styleProperties/@fo:border-right or + $styleProperties/@fo:border-top"> + <xsl:element name="Borders"> + <xsl:if test="$styleProperties/@fo:border-bottom and not($styleProperties/@fo:border-bottom = 'none')"> + <xsl:element name="Border"> + <xsl:attribute name="ss:Position">Bottom</xsl:attribute> + <xsl:call-template name="border-attributes"> + <xsl:with-param name="border_properties" select="$styleProperties/@fo:border-bottom" /> + </xsl:call-template> + </xsl:element> + </xsl:if> + <xsl:if test="$styleProperties/@fo:border-left and not($styleProperties/@fo:border-left = 'none')"> + <xsl:element name="Border"> + <xsl:attribute name="ss:Position">Left</xsl:attribute> + <xsl:call-template name="border-attributes"> + <xsl:with-param name="border_properties" select="$styleProperties/@fo:border-left" /> + </xsl:call-template> + </xsl:element> + </xsl:if> + <xsl:if test="$styleProperties/@fo:border-right and not($styleProperties/@fo:border-right = 'none')"> + <xsl:element name="Border"> + <xsl:attribute name="ss:Position">Right</xsl:attribute> + <xsl:call-template name="border-attributes"> + <xsl:with-param name="border_properties" select="$styleProperties/@fo:border-right" /> + </xsl:call-template> + </xsl:element> + </xsl:if> + <xsl:if test="$styleProperties/@fo:border-top and not($styleProperties/@fo:border-top = 'none')"> + <xsl:element name="Border"> + <xsl:attribute name="ss:Position">Top</xsl:attribute> + <xsl:call-template name="border-attributes"> + <xsl:with-param name="border_properties" select="$styleProperties/@fo:border-top" /> + </xsl:call-template> + </xsl:element> + </xsl:if> + <!-- write out all table border --> + <xsl:if test="$styleProperties/@fo:border and not($styleProperties/@fo:border = 'none')"> + <xsl:element name="Border"> + <xsl:attribute name="ss:Position">Bottom</xsl:attribute> + <xsl:call-template name="border-attributes"> + <xsl:with-param name="border_properties" select="$styleProperties/@fo:border" /> + </xsl:call-template> + </xsl:element> + <xsl:element name="Border"> + <xsl:attribute name="ss:Position">Left</xsl:attribute> + <xsl:call-template name="border-attributes"> + <xsl:with-param name="border_properties" select="$styleProperties/@fo:border" /> + </xsl:call-template> + </xsl:element> + <xsl:element name="Border"> + <xsl:attribute name="ss:Position">Right</xsl:attribute> + <xsl:call-template name="border-attributes"> + <xsl:with-param name="border_properties" select="$styleProperties/@fo:border" /> + </xsl:call-template> + </xsl:element> + <xsl:element name="Border"> + <xsl:attribute name="ss:Position">Top</xsl:attribute> + <xsl:call-template name="border-attributes"> + <xsl:with-param name="border_properties" select="$styleProperties/@fo:border" /> + </xsl:call-template> + </xsl:element> + </xsl:if> + </xsl:element> + </xsl:if> + </xsl:template> + + + <xsl:template name="border-attributes"> + <xsl:param name="border_properties" /> + + <xsl:variable name="border-width"> + <xsl:call-template name="convert2cm"> + <xsl:with-param name="value" select="substring-before($border_properties, ' ')" /> + </xsl:call-template> + </xsl:variable> + <xsl:variable name="border-style" select="substring-before(substring-after($border_properties, ' '), ' ')" /> + <xsl:variable name="border-color" select="substring-after(substring-after($border_properties, ' '), ' ')" /> +<!-- + <xsl:message>border-width:<xsl:value-of select="$border-width" /></xsl:message> + <xsl:message>border-style:<xsl:value-of select="$border-style" /></xsl:message> + <xsl:message>border-color:<xsl:value-of select="$border-color" /></xsl:message> + --> + + <!-- Dash, Dot, DashDot, DashDotDot, SlantDashDot are not supported yet --> + <xsl:attribute name="ss:LineStyle"> + <xsl:choose> + <xsl:when test="$border-style = 'none'">None</xsl:when> + <xsl:when test="$border-style = 'double'">Double</xsl:when> + <xsl:otherwise>Continuous</xsl:otherwise> + </xsl:choose> + </xsl:attribute> + + <xsl:attribute name="ss:Weight"> + <xsl:choose> + <!-- 0: Hairline --> + <xsl:when test="$border-width <= 0.002">0</xsl:when> + <!-- 1: Thin --> + <xsl:when test="$border-width <= 0.035">1</xsl:when> + <!-- 2: Medium --> + <xsl:when test="$border-width <= 0.088">2</xsl:when> + <!-- 3: Thick --> + <xsl:otherwise>3</xsl:otherwise> + </xsl:choose> + </xsl:attribute> + + <xsl:attribute name="ss:Color"> + <xsl:choose> + <xsl:when test="$border-color"><xsl:value-of select="$border-color" /></xsl:when> + <xsl:otherwise>Automatic</xsl:otherwise> + </xsl:choose> + </xsl:attribute> + </xsl:template> + + + <xsl:template name="Font"> + <xsl:param name="styleProperties" /> + <xsl:param name="styleParentName" /> + + <!-- An empty font element, might overwrite parents setting by + the default attributes --> + <xsl:if test="$styleProperties/@style:font-weight or + $styleProperties/@fo:color or + $styleProperties/@style:font-name or + $styleProperties/@fo:font-style or + $styleProperties/@style:text-outline or + $styleProperties/@style:text-shadow or + $styleProperties/@style:font-size or + $styleProperties/@style:text-line-through-style or + $styleProperties/@style:text-underline-type or + $styleProperties/@style:text-underline-style or + $styleProperties/@style:text-position"> + + + <xsl:element name="Font"> + <xsl:call-template name="getParentBold"> + <xsl:with-param name="styleProperties" select="$styleProperties" /> + <xsl:with-param name="styleParentName" select="$styleParentName" /> + </xsl:call-template> + <xsl:if test="$styleProperties/@fo:color"> + <xsl:attribute name="ss:Color"><xsl:value-of select="$styleProperties/@fo:color" /></xsl:attribute> + </xsl:if> + <xsl:if test="$styleProperties/@style:font-name"> + <xsl:attribute name="ss:FontName"><xsl:value-of select="$styleProperties/@style:font-name" /></xsl:attribute> + </xsl:if> + <xsl:if test="$styleProperties/@fo:font-style = 'italic'"> + <xsl:attribute name="ss:Italic">1</xsl:attribute> + </xsl:if> + <xsl:if test="$styleProperties/@style:text-outline = 'true'"> + <xsl:attribute name="ss:Outline">1</xsl:attribute> + </xsl:if> + <xsl:if test="$styleProperties/@style:text-shadow = 'shadow'"> + <xsl:attribute name="ss:Shadow">1</xsl:attribute> + </xsl:if> + <xsl:if test="$styleProperties/@fo:font-size"> + <xsl:attribute name="ss:Size"> + <xsl:call-template name="convert2pt"> + <xsl:with-param name="value" select="$styleProperties/@fo:font-size" /> + </xsl:call-template> + </xsl:attribute> + </xsl:if> + <xsl:if test="$styleProperties/@style:text-line-through-style and $styleProperties/@style:text-line-through-style != 'none'"> + <xsl:attribute name="ss:StrikeThrough">1</xsl:attribute> + </xsl:if> + <xsl:if test="($styleProperties/@style:text-underline-type and $styleProperties/@style:text-underline-type != 'none') or + ($styleProperties/@style:text-underline-style and $styleProperties/@style:text-underline-style != 'none')"> + <xsl:attribute name="ss:Underline"> + <xsl:choose> + <xsl:when test="$styleProperties/@style:text-underline-type = 'double'">Double</xsl:when> + <xsl:otherwise>Single</xsl:otherwise> + </xsl:choose> + </xsl:attribute> + </xsl:if> + <xsl:if test="$styleProperties/@style:text-position"> + <xsl:attribute name="ss:VerticalAlign"> + <xsl:choose> + <xsl:when test="substring-before($styleProperties/@style:text-position, '% ') > 0">Superscript</xsl:when> + <xsl:otherwise>Subscript</xsl:otherwise> + </xsl:choose> + </xsl:attribute> + </xsl:if> + </xsl:element> + </xsl:if> + </xsl:template> + + <xsl:template name="Interior"> + <xsl:param name="styleProperties" /> + <xsl:if test="$styleProperties/@fo:background-color and not($styleProperties/@fo:background-color = 'transparent')"> + <xsl:element name="Interior"> + <xsl:attribute name="ss:Color"> + <xsl:value-of select="$styleProperties/@fo:background-color" /> + </xsl:attribute> + <!-- Background color (i.e. Interior/ss:Color) not shown without ss:Pattern (or with 'none') + Therefore a default is set --> + <xsl:attribute name="ss:Pattern">Solid</xsl:attribute> + </xsl:element> + </xsl:if> + </xsl:template> + + <!-- Excel issue workaround: <Font ss:Bold="1"> is not inherited --> + <xsl:template name="getParentBold"> + <xsl:param name="styleProperties" /> + <xsl:param name="styleParentName" /> + <xsl:param name="styleName" /> + + <xsl:if test="$styleParentName and $styleParentName != $styleName"> + <xsl:choose> + <xsl:when test="$styleProperties/@fo:font-weight = 'bold'"> + <xsl:attribute name="ss:Bold">1</xsl:attribute> + </xsl:when> + <xsl:otherwise> + <xsl:call-template name="getParentBold"> + <xsl:with-param name="styleProperties" select="key('styles', $styleParentName)/*" /> + <xsl:with-param name="styleParentName" select="key('styles', $styleParentName)/@style:parent-style-name" /> + <xsl:with-param name="styleName" select="$styleParentName" /> + </xsl:call-template> + </xsl:otherwise> + </xsl:choose> + </xsl:if> + </xsl:template> + +</xsl:stylesheet> |