Хорошо, лучшее усилие, Scala 2.8. Нам нужно восстановить атрибуты, что означает, что мы должны правильно их разложить. Давайте создадим для этого функцию:
import scala.xml._
case class GenAttr(pre: Option[String],
key: String,
value: Seq[Node],
next: MetaData) {
def toMetaData = Attribute(pre, key, value, next)
}
def decomposeMetaData(m: MetaData): Option[GenAttr] = m match {
case Null => None
case PrefixedAttribute(pre, key, value, next) =>
Some(GenAttr(Some(pre), key, value, next))
case UnprefixedAttribute(key, value, next) =>
Some(GenAttr(None, key, value, next))
}
Далее, давайте разберем связанные атрибуты в последовательность:
def unchainMetaData(m: MetaData): Iterable[GenAttr] =
m flatMap (decomposeMetaData)
На данный момент мы можем легко манипулировать этим списком:
def doubleValues(l: Iterable[GenAttr]) = l map {
case g @ GenAttr(_, _, Text(v), _) if v matches "\\d+" =>
g.copy(value = Text(v.toInt * 2 toString))
case other => other
}
Теперь вернемся снова:
def chainMetaData(l: Iterable[GenAttr]): MetaData = l match {
case Nil => Null
case head :: tail => head.copy(next = chainMetaData(tail)).toMetaData
}
Теперь нам нужно только создать функцию, которая позаботится об этих вещах:
def mapMetaData(m: MetaData)(f: GenAttr => GenAttr): MetaData =
chainMetaData(unchainMetaData(m).map(f))
Так что мы можем использовать это так:
import scala.xml.transform._
val attribs = Set("attr1", "attr2")
val rr = new RewriteRule {
override def transform(n: Node): Seq[Node] = (n match {
case e: Elem =>
e.copy(attributes = mapMetaData(e.attributes) {
case g @ GenAttr(_, key, Text(v), _) if attribs contains key =>
g.copy(value = Text(v.toInt * 2 toString))
case other => other
})
case other => other
}).toSeq
}
val rt = new RuleTransformer(rr)
Что в итоге позволило вам сделать перевод, который вы хотели:
rt.transform(<a><b attr1="100" attr2="50"></b></a>)
Все это можно упростить, если:
- Атрибут фактически определенного префикса, ключа и значения с необязательным префиксом
- Атрибут был последовательностью, а не цепочкой
- Атрибут имел карту, mapKeys, mapValues
- Элем имел карту Атрибут