我在XSLT中使用xsl:key结构构建了一个节点集。我想找到这个节点集中所有节点的最低共同祖先(LCA) - 任何想法?
我知道Kaysian相交和XPath的交叉函数,但这些似乎只是为了找到一对元素的LCA:我事先并不知道每个节点集中有多少项。
我想知道是否有一个使用'every'和'intersect'表达式组合的解决方案,但我还没有想到一个!
提前致谢, 汤姆
答案 0 :(得分:1)
我尝试了以下内容:
<xsl:stylesheet
xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
xmlns:xs="http://www.w3.org/2001/XMLSchema"
xmlns:mf="http://example.com/mf"
exclude-result-prefixes="xs mf"
version="2.0">
<xsl:output method="html" indent="yes"/>
<xsl:function name="mf:lca" as="node()?">
<xsl:param name="nodes" as="node()*"/>
<xsl:variable name="all-ancestors" select="$nodes/ancestor::node()"/>
<xsl:sequence
select="$all-ancestors[every $n in $nodes satisfies exists($n/ancestor::node() intersect .)][last()]"/>
</xsl:function>
<xsl:template match="/">
<xsl:sequence select="mf:lca(//foo)"/>
</xsl:template>
</xsl:stylesheet>
使用样本进行测试
<root>
<anc1>
<anc2>
<foo/>
<bar>
<foo/>
</bar>
<bar>
<baz>
<foo/>
</baz>
</bar>
</anc2>
</anc1>
</root>
我得到anc2
元素,但我没有使用更复杂的设置进行测试,现在没有时间。也许您可以尝试使用示例数据并报告您是否获得了所需的结果。
答案 1 :(得分:1)
以下是自下而上的方法:
<xsl:function name="my:lca" as="node()?">
<xsl:param name="pSet" as="node()*"/>
<xsl:sequence select=
"if(not($pSet))
then ()
else
if(not($pSet[2]))
then $pSet[1]
else
if($pSet intersect $pSet/ancestor::node())
then
my:lca($pSet[not($pSet intersect ancestor::node())])
else
my:lca($pSet/..)
"/>
</xsl:function>
测试:
<xsl:stylesheet version="2.0"
xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
xmlns:my="my:my">
<xsl:output omit-xml-declaration="yes" indent="yes"/>
<xsl:variable name="vSet1" select=
"//*[self::A.1.1 or self::A.2.1]"/>
<xsl:variable name="vSet2" select=
"//*[self::B.2.2.1 or self::B.1]"/>
<xsl:variable name="vSet3" select=
"$vSet1 | //B.2.2.2"/>
<xsl:template match="/">
<!---->
<xsl:sequence select="my:lca($vSet1)/name()"/>
=========
<xsl:sequence select="my:lca($vSet2)/name()"/>
=========
<xsl:sequence select="my:lca($vSet3)/name()"/>
</xsl:template>
<xsl:function name="my:lca" as="node()?">
<xsl:param name="pSet" as="node()*"/>
<xsl:sequence select=
"if(not($pSet))
then ()
else
if(not($pSet[2]))
then $pSet[1]
else
if($pSet intersect $pSet/ancestor::node())
then
my:lca($pSet[not($pSet intersect ancestor::node())])
else
my:lca($pSet/..)
"/>
</xsl:function>
</xsl:stylesheet>
将此转换应用于以下XML文档:
<t>
<A>
<A.1>
<A.1.1/>
<A.1.2/>
</A.1>
<A.2>
<A.2.1/>
</A.2>
<A.3/>
</A>
<B>
<B.1/>
<B.2>
<B.2.1/>
<B.2.2>
<B.2.2.1/>
<B.2.2.2/>
</B.2.2>
</B.2>
</B>
</t>
为所有三种情况生成所需的正确结果:
A
=========
B
=========
t
更新:我认为这可能是最有效的算法。
这个想法是节点集的LCA与该节点集的两个节点的LCA相同:“最左边”和“最右边”。这是正确的证据留给读者练习:)
这是一个完整的XSLT 2.0实现:
<xsl:stylesheet version="2.0"
xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
xmlns:my="my:my">
<xsl:output omit-xml-declaration="yes" indent="yes"/>
<xsl:variable name="vSet1" select=
"//*[self::A.1.1 or self::A.2.1]"/>
<xsl:variable name="vSet2" select=
"//*[self::B.2.2.1 or self::B.1]"/>
<xsl:variable name="vSet3" select=
"$vSet1 | //B.2.2.2"/>
<xsl:template match="/">
<xsl:sequence select="my:lca($vSet1)/name()"/>
=========
<xsl:sequence select="my:lca($vSet2)/name()"/>
=========
<xsl:sequence select="my:lca($vSet3)/name()"/>
</xsl:template>
<xsl:function name="my:lca" as="node()?">
<xsl:param name="pSet" as="node()*"/>
<xsl:sequence select=
"if(not($pSet))
then ()
else
if(not($pSet[2]))
then $pSet[1]
else
for $n1 in $pSet[1],
$n2 in $pSet[last()]
return my:lca2nodes($n1, $n2)
"/>
</xsl:function>
<xsl:function name="my:lca2nodes" as="node()?">
<xsl:param name="pN1" as="node()"/>
<xsl:param name="pN2" as="node()"/>
<xsl:variable name="n1" select=
"($pN1 | $pN2)
[count(ancestor-or-self::node())
eq
min(($pN1 | $pN2)/count(ancestor-or-self::node()))
]
[1]"/>
<xsl:variable name="n2" select="($pN1 | $pN2) except $n1"/>
<xsl:sequence select=
"$n1/ancestor-or-self::node()
[exists(. intersect $n2/ancestor-or-self::node())]
[1]"/>
</xsl:function>
</xsl:stylesheet>
在同一个XML文档(上面)上执行此转换时,会产生相同的正确结果,但速度要快得多 - 特别是如果节点集的大小很大:
A
=========
B
=========
t
答案 2 :(得分:0)
Martin的解决方案可行,但我认为在某些情况下它可能会非常昂贵,并且会消除重复数据。我倾向于使用找到两个节点的LCA的方法,然后在LCA(x,y,z)= LCA(LCA(x,y),z)的理论上递归地使用它[理论]我让读者去证明......]。
现在通过查看序列x / ancestor-or-self :: node()和y / ancestor-or-self :: node(),可以找到LCA(x,y),将两个序列截断为较短的长度,然后找到两者中的最后一个节点:在XQuery表示法中:
( let $ax := $x/ancestor-or-self::node()
let $ay := $y/ancestor-or-self::node()
let $len := min((count($ax), count($ay))
for $i in reverse($len to 1)
where $ax[$i] is $ay[$i]
return $ax[$i]
)[1]