paulb@1 | 1 | <?xml version="1.0"?> |
paulb@1 | 2 | <xsl:stylesheet version="1.0" |
paulb@1 | 3 | xmlns:xsl="http://www.w3.org/1999/XSL/Transform" |
paulb@1 | 4 | xmlns:axsl="http://www.w3.org/1999/XSL/TransformAlias" |
paulb@1 | 5 | xmlns:template="http://www.boddie.org.uk/ns/xmltools/template"> |
paulb@1 | 6 | |
paulb@1 | 7 | <xsl:output indent="yes"/> |
paulb@1 | 8 | <xsl:namespace-alias stylesheet-prefix="axsl" result-prefix="xsl"/> |
paulb@1 | 9 | <xsl:variable name="template-expr">http://www.boddie.org.uk/ns/xmltools/template-expr</xsl:variable> |
paulb@1 | 10 | |
paulb@1 | 11 | <!-- Match the document itself. --> |
paulb@1 | 12 | |
paulb@1 | 13 | <xsl:template match="/"> |
paulb@1 | 14 | <axsl:stylesheet version="1.0"> |
paulb@1 | 15 | <axsl:template match="/"> |
paulb@1 | 16 | |
paulb@1 | 17 | <!-- Include the remaining attributes. --> |
paulb@1 | 18 | <xsl:apply-templates select="@*"/> |
paulb@1 | 19 | |
paulb@1 | 20 | <!-- Process the elements. --> |
paulb@1 | 21 | <xsl:apply-templates select="*"/> |
paulb@1 | 22 | |
paulb@1 | 23 | </axsl:template> |
paulb@1 | 24 | </axsl:stylesheet> |
paulb@1 | 25 | </xsl:template> |
paulb@1 | 26 | |
paulb@1 | 27 | |
paulb@1 | 28 | |
paulb@1 | 29 | <!-- Match element references. --> |
paulb@1 | 30 | |
paulb@1 | 31 | <xsl:template match="*[@template:element]"> |
paulb@1 | 32 | <xsl:call-template name="enter-element"> |
paulb@1 | 33 | <xsl:with-param name="other-elements" select="@template:element"/> |
paulb@1 | 34 | </xsl:call-template> |
paulb@1 | 35 | </xsl:template> |
paulb@1 | 36 | |
paulb@1 | 37 | <xsl:template name="enter-element"> |
paulb@1 | 38 | <xsl:param name="other-elements"/> |
paulb@1 | 39 | <xsl:variable name="first-element" select="substring-before($other-elements, ',')"/> |
paulb@1 | 40 | <xsl:variable name="remaining-elements" select="substring-after($other-elements, ',')"/> |
paulb@1 | 41 | <xsl:choose> |
paulb@1 | 42 | <xsl:when test="$first-element = ''"> |
paulb@1 | 43 | <xsl:call-template name="next-element"> |
paulb@1 | 44 | <xsl:with-param name="first-element" select="$other-elements"/> |
paulb@1 | 45 | </xsl:call-template> |
paulb@1 | 46 | </xsl:when> |
paulb@1 | 47 | <xsl:otherwise> |
paulb@1 | 48 | <xsl:call-template name="next-element"> |
paulb@1 | 49 | <xsl:with-param name="first-element" select="$first-element"/> |
paulb@1 | 50 | <xsl:with-param name="remaining-elements" select="$remaining-elements"/> |
paulb@1 | 51 | </xsl:call-template> |
paulb@1 | 52 | </xsl:otherwise> |
paulb@1 | 53 | </xsl:choose> |
paulb@1 | 54 | </xsl:template> |
paulb@1 | 55 | |
paulb@1 | 56 | <xsl:template name="next-element"> |
paulb@1 | 57 | <xsl:param name="first-element"/> |
paulb@1 | 58 | <xsl:param name="remaining-elements"/> |
paulb@1 | 59 | <axsl:for-each select="{$first-element}"> |
paulb@1 | 60 | <xsl:choose> |
paulb@1 | 61 | <xsl:when test="$remaining-elements = ''"> |
paulb@1 | 62 | <xsl:call-template name="special-attributes"/> |
paulb@1 | 63 | </xsl:when> |
paulb@1 | 64 | <xsl:otherwise> |
paulb@1 | 65 | <xsl:call-template name="enter-element"> |
paulb@1 | 66 | <xsl:with-param name="other-elements" select="$remaining-elements"/> |
paulb@1 | 67 | </xsl:call-template> |
paulb@1 | 68 | </xsl:otherwise> |
paulb@1 | 69 | </xsl:choose> |
paulb@1 | 70 | </axsl:for-each> |
paulb@1 | 71 | </xsl:template> |
paulb@1 | 72 | |
paulb@1 | 73 | |
paulb@1 | 74 | |
paulb@1 | 75 | <!-- Match special expression attributes. --> |
paulb@1 | 76 | |
paulb@1 | 77 | <xsl:template match="*[not(@template:element) and (@template:attribute or @template:value or @template:expr)]"> |
paulb@1 | 78 | <xsl:call-template name="special-attributes"/> |
paulb@1 | 79 | </xsl:template> |
paulb@1 | 80 | |
paulb@1 | 81 | <xsl:template name="special-attributes"> |
paulb@1 | 82 | <xsl:choose> |
paulb@1 | 83 | <xsl:when test="@template:effect = 'replace'"> |
paulb@1 | 84 | <xsl:call-template name="special-values"/> |
paulb@1 | 85 | </xsl:when> |
paulb@1 | 86 | <xsl:otherwise> |
paulb@1 | 87 | <xsl:copy> |
paulb@1 | 88 | <xsl:apply-templates select="@*"/> |
paulb@1 | 89 | <xsl:if test="@template:expr and @template:expr-attr"> |
paulb@1 | 90 | <axsl:if test="{@template:expr}"> |
paulb@1 | 91 | <axsl:attribute name="{@template:expr-attr}"><xsl:value-of select="@template:expr-attr"/></axsl:attribute> |
paulb@1 | 92 | </axsl:if> |
paulb@1 | 93 | </xsl:if> |
paulb@1 | 94 | <xsl:call-template name="special-values"/> |
paulb@1 | 95 | </xsl:copy> |
paulb@1 | 96 | </xsl:otherwise> |
paulb@1 | 97 | </xsl:choose> |
paulb@1 | 98 | </xsl:template> |
paulb@1 | 99 | |
paulb@1 | 100 | <xsl:template name="special-values"> |
paulb@1 | 101 | <xsl:choose> |
paulb@1 | 102 | <xsl:when test="@template:attribute"> |
paulb@7 | 103 | <axsl:choose> |
paulb@7 | 104 | <axsl:when test="@{@template:attribute}"> |
paulb@7 | 105 | <axsl:variable name="this-name"><xsl:value-of select="@template:attribute"/></axsl:variable> |
paulb@7 | 106 | <axsl:variable name="this-value" select="@{@template:attribute}"/> |
paulb@7 | 107 | <xsl:call-template name="special-value"/> |
paulb@7 | 108 | </axsl:when> |
paulb@7 | 109 | <axsl:otherwise> |
paulb@7 | 110 | <axsl:variable name="this-name"><xsl:value-of select="@template:attribute"/></axsl:variable> |
paulb@7 | 111 | <axsl:variable name="this-value"></axsl:variable> |
paulb@7 | 112 | <xsl:call-template name="special-value"/> |
paulb@7 | 113 | </axsl:otherwise> |
paulb@7 | 114 | </axsl:choose> |
paulb@1 | 115 | </xsl:when> |
paulb@1 | 116 | <xsl:otherwise> |
paulb@1 | 117 | <xsl:call-template name="special-value"/> |
paulb@1 | 118 | </xsl:otherwise> |
paulb@1 | 119 | </xsl:choose> |
paulb@1 | 120 | </xsl:template> |
paulb@1 | 121 | |
paulb@1 | 122 | <xsl:template name="special-value"> |
paulb@1 | 123 | <xsl:choose> |
paulb@1 | 124 | <xsl:when test="@template:value"> |
paulb@1 | 125 | <axsl:value-of select="{@template:value}"/> |
paulb@1 | 126 | </xsl:when> |
paulb@1 | 127 | <xsl:otherwise> |
paulb@1 | 128 | <xsl:apply-templates select="node()"/> |
paulb@1 | 129 | </xsl:otherwise> |
paulb@1 | 130 | </xsl:choose> |
paulb@1 | 131 | </xsl:template> |
paulb@1 | 132 | |
paulb@1 | 133 | |
paulb@1 | 134 | |
paulb@1 | 135 | <!-- Remove template elements. --> |
paulb@1 | 136 | |
paulb@1 | 137 | <xsl:template match="@template:element|@template:attribute|@template:value|@template:expr|@template:expr-attr|@template:effect"> |
paulb@1 | 138 | </xsl:template> |
paulb@1 | 139 | |
paulb@1 | 140 | |
paulb@1 | 141 | |
paulb@1 | 142 | <!-- Replicate unknown elements. --> |
paulb@1 | 143 | |
paulb@1 | 144 | <xsl:template match="@*|node()"> |
paulb@1 | 145 | <xsl:copy> |
paulb@1 | 146 | <xsl:apply-templates select="@*|node()"/> |
paulb@1 | 147 | </xsl:copy> |
paulb@1 | 148 | </xsl:template> |
paulb@1 | 149 | |
paulb@1 | 150 | </xsl:stylesheet> |