So lässt sich ein fehlendes XML-Schema selbst generieren

von Anja Schmoll-Trautmann und Edmond Woychowsky am 18. Oktober 2010 , 18:25 Uhr

Der erste Schritt ist die Erstellung einer Variablen mit einer eindeutigen, durch Komma begrenzten Liste aller Elemente im XML-Dokument. Dies erfolgt mithilfe der Code-Ausschnitte in Liste C. Hier werden die xsl:key-Elemente dazu verwendet, Indexe von Elementen nach Namen und von Attributen nach Namen zu erstellen.

Diese Indexe werden dann in Verbindung mit den Funktionen generate-id() und key() verwendet, um eine Gruppierung nach der Muench’schen Methode durchzuführen und eindeutige Werte sicherzustellen. Mit der Funktion substring() wird das Komma am Ende entfernt.

Liste C

Endeutige Elemente und Attribute

<xsl:key name="keyElement" match="*" use="name(.)" /> 
<xsl:key name="keyAttribute" match="@*" use="name(.)" /> 
. 
. 
. 
<!– complete list of elements –> 
<xsl:variable name="elementList"> 
<xsl:variable name="work"> 
<xsl:apply-templates select="//node()[generate-id(.) = generate-id(key('keyElement',name(.))[1])]"> 
<xsl:sort select="name(.)" data-type="text" order="ascending"/> 
</xsl:apply-templates> 
</xsl:variable> 
<xsl:value-of select="substring($work,1,string-length($work) - 1)"/> 
</xsl:variable> 
<!– complete list of attributes –> 
<xsl:variable name="attributeList"> 
<xsl:variable name="work"> 
<xsl:apply-templates select="//node()/attribute::node()[generate-id(.) = generate-id(key('keyAttribute',name(.))[1])]">

<xsl:sort select="name(.)" data-type="text" order="ascending"/> 
</xsl:apply-templates> 
</xsl:variable> 
<xsl:value-of select="substring($work,1,string-length($work) - 1)"/> 
</xsl:variable> 
. 
. 
. 
<xsl:template match="*|@*"> 
<xsl:value-of select="concat(name(.),’,')"/> 
</xsl:template>

Die durch Komma begrenzte Elementliste wird dann zur Erstellung individueller xs:element-Definitionen verwendet, die in die folgenden möglichen Kategorien fallen können:

Das Element hat keine untergeordneten Elemente oder Attribute.

Das Element hat keine untergeordneten Elemente, aber Attribute.

Das Element hat untergeordnete Elemente, aber keine Attribute.

Das Element hat sowohl untergeordnete Elemente als auch Attribute.

Um festzustellen, ob ein Element entweder untergeordnete Elemente oder Attribute besitzt, ist ein anderer als der oben beschriebene Ansatz erforderlich. Der Grund dafür ist, dass nach spezifischen Elementen und Attributen gesucht wird, nämlich jenen, die mit einem bestimmten Parent-Element verbunden sind. Zuerst wird aus allen untergeordneten Elementen mit Parent-Element, dessen Name mit dem aktuellen Element übereinstimmt, eine sortierte Elementliste erstellt. Duplikate werden ebenso entfernt wie das hängende Komma, und es entsteht eine eindeutige Liste mit untergeordneten Elementen. Das Verfahren ist für Attribute grundlegend dasselbe.

Der Code für die gesamte Prozedur zur Generierung eines W3C-Schemas ist in Liste D enthalten, ein Muster-XML-Dokument befindet sich in Liste E und das Schema in Liste F.

Liste D

XSL zur Erstellung eines W3C-Schemas

<?xml version="1.0″ encoding="UTF-8″?>
<xsl:stylesheet version="1.0″ xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:msxsl="urn:schemas-microsoft-com:xslt"> 
<xsl:key name="keyElement" match="*" use="name(.)" /> 
<xsl:key name="keyAttribute" match="@*" use="name(.)" /> 
<xsl:template match="/"> 
<!– complete list of elements –> 
<xsl:variable name="elementList"> 
<xsl:variable name="work"> 
<xsl:apply-templates select="//node()[generate-id(.) = generate-id(key('keyElement',name(.))[1])]"> 
<xsl:sort select="name(.)" data-type="text" order="ascending"/> 
</xsl:apply-templates> 
</xsl:variable> 
<xsl:value-of select="substring($work,1,string-length($work) - 1)"/> 
</xsl:variable> 
<!– complete list of attributes –> 
<xsl:variable name="attributeList"> 
<xsl:variable name="work"> 
<xsl:apply-templates select="//node()/attribute::node()[generate-id(.) = generate-id(key('keyAttribute',name(.))[1])]"> 
<xsl:sort select="name(.)" data-type="text" order="ascending"/> 
</xsl:apply-templates> 
</xsl:variable> 
<xsl:value-of select="substring($work,1,string-length($work) - 1)"/> 
</xsl:variable> 
<xsl:element name="xs:schema"> 
<xsl:attribute name="version">1.0</xsl:attribute> 
<xsl:attribute name="elementFormDefault">qualified</xsl:attribute> 
<xsl:element name="xs:annotation"> 
<xsl:element name="xs:appinfo"> 
<xsl:text>Schema auto-generated.</xsl:text> 
</xsl:element> 
</xsl:element> 
<xsl:element name="xs:annotation"> 
<xsl:element name="xs:appinfo"> 
<xsl:text>Elements</xsl:text> 
</xsl:element> 
</xsl:element> 
<xsl:call-template name="element"> 
<xsl:with-param name="elementList" select="$elementList"/> 
</xsl:call-template> 
<xsl:element name="xs:annotation"> 
<xsl:element name="xs:appinfo"> 
<xsl:text>Attributes</xsl:text> 
</xsl:element> 
</xsl:element> 
<xsl:call-template name="attribute"> 
<xsl:with-param name="attributeList" select="$attributeList"/> 
</xsl:call-template> 
</xsl:element> 
</xsl:template> 
<!– Build element/attribute name list –> 
<xsl:template match="*|@*"> 
<xsl:value-of select="concat(name(.),’,')"/> 
</xsl:template> 
<!– Ignore stray text –> 
<xsl:template match="text()"/> 
<!– Define elements –> 
<xsl:template name="element"> 
<xsl:param name="elementList"/> 
<!– element name –> 
<xsl:variable name="element"> 
<xsl:call-template name="entry"> 
<xsl:with-param name="list" select="$elementList"/> 
</xsl:call-template> 
</xsl:variable> 
<!– local list of child elements –> 
<xsl:variable name="childElementList"> 
<xsl:variable name="work"> 
<xsl:apply-templates select="//node()[name(.) = $element]/child::node()"> 
<xsl:sort select="name(.)" data-type="text" order="ascending"/> 
</xsl:apply-templates> 
</xsl:variable> 
<xsl:variable name="unique"> 
<xsl:call-template name="uniqueList"> 
<xsl:with-param name="list" select="substring($work,1,string-length($work) - 1)"/> 
</xsl:call-template> 
</xsl:variable> 
<xsl:value-of select="substring($unique,1,string-length($work) - 1)"/> 
</xsl:variable> 
<!– local list of child attributes –> 
<xsl:variable name="childAttributeList"> 
<xsl:variable name="work"> 
<xsl:apply-templates select="//node()[name(.) = $element]/attribute::node()"> 
<xsl:sort select="name(.)" data-type="text" order="ascending"/> 
</xsl:apply-templates> 
</xsl:variable> 
<xsl:variable name="unique"> 
<xsl:call-template name="uniqueList"> 
<xsl:with-param name="list" select="substring($work,1,string-length($work) - 1)"/> 
</xsl:call-template> 
</xsl:variable> 
<xsl:value-of select="substring($unique,1,string-length($work) - 1)"/> 
</xsl:variable> 
<xsl:element name="xs:element"> 
<xsl:attribute name="name"> 
<xsl:value-of select="$element"/> 
</xsl:attribute> 
<xsl:choose> 
<xsl:when test="not(boolean(//node()[name(.) = $element]/*))"> 
<xsl:choose> 
<xsl:when test="string-length($childAttributeList) != 0″> 
<xsl:element name="xs:complexType"> 
<xsl:element name="xs:simpleContent"> 
<xsl:element name="xs:extension"> 
<xsl:attribute name="base">xs:string</xsl:attribute> 
<xsl:call-template name="attributeRef"> 
<xsl:with-param name="attributeList" select="$childAttributeList"/> 
</xsl:call-template> 
</xsl:element> 
</xsl:element> 
</xsl:element> 
</xsl:when> 
<xsl:otherwise> 
<xsl:attribute name="type">xs:string</xsl:attribute> 
</xsl:otherwise> 
</xsl:choose> 
</xsl:when> 
<xsl:otherwise> 
<xsl:element name="xs:complexType"> 
<xsl:element name="xs:choice"> 
<xsl:attribute name="minOccurs">0</xsl:attribute> 
<xsl:attribute name="maxOccurs">unbounded</xsl:attribute> 
<xsl:call-template name="choice"> 
<xsl:with-param name="elementList" select="$childElementList"/> 
</xsl:call-template> 
</xsl:element> 
<xsl:call-template name="attributeRef"> 
<xsl:with-param name="attributeList" select="$childAttributeList"/> 
</xsl:call-template> 
</xsl:element> 
</xsl:otherwise> 
</xsl:choose> 
</xsl:element> 
<xsl:if test="contains($elementList,’,')"> 
<xsl:call-template name="element"> 
<xsl:with-param name="elementList" select="substring-after($elementList,’,')"/> 
</xsl:call-template> 
</xsl:if> 
</xsl:template> 
<!– Create attribute reference –> 
<xsl:template name="attributeRef"> 
<xsl:param name="attributeList"/> 
<xsl:variable name="attribute"> 
<xsl:call-template name="entry"> 
<xsl:with-param name="list" select="$attributeList"/> 
</xsl:call-template> 
</xsl:variable> 
<xsl:if test="normalize-space($attribute) != ""> 
<xsl:element name="xs:attribute"> 
<xsl:attribute name="ref"> 
<xsl:value-of select="$attribute"/> 
</xsl:attribute> 
</xsl:element> 
</xsl:if> 
<xsl:if test="contains($attributeList,’,')"> 
<xsl:call-template name="attributeRef"> 
<xsl:with-param name="attributeList" select="substring-after($attributeList,’,')"/> 
</xsl:call-template> 
</xsl:if> 
</xsl:template> 
<!– Define attributes –> 
<xsl:template name="attribute"> 
<xsl:param name="attributeList"/> 
<xsl:variable name="attribute"> 
<xsl:call-template name="entry"> 
<xsl:with-param name="list" select="$attributeList"/> 
</xsl:call-template> 
</xsl:variable> 
<xsl:if test="normalize-space($attribute) != ""> 
<xsl:element name="xs:attribute"> 
<xsl:attribute name="name"> 
<xsl:value-of select="$attribute"/> 
</xsl:attribute> 
<xsl:attribute name="type">xs:string</xsl:attribute> 
</xsl:element> 
</xsl:if> 
<xsl:if test="contains($attributeList,’,')"> 
<xsl:call-template name="attribute"> 
<xsl:with-param name="attributeList" select="substring-after($attributeList,’,')"/> 
</xsl:call-template> 
</xsl:if> 
</xsl:template> 
<!– Create schema choice element –> 
<xsl:template name="choice"> 
<xsl:param name="elementList"/> 
<xsl:variable name="element"> 
<xsl:call-template name="entry"> 
<xsl:with-param name="list" select="$elementList"/> 
</xsl:call-template> 
</xsl:variable> 
<xsl:if test="normalize-space($element) != ""> 
<xsl:element name="xs:element"> 
<xsl:attribute name="ref"> 
<xsl:value-of select="$element"/> 
</xsl:attribute> 
<xsl:attribute name="minOccurs">0</xsl:attribute> 
</xsl:element> 
</xsl:if> 
<xsl:if test="contains($elementList,’,')"> 
<xsl:call-template name="choice"> 
<xsl:with-param name="elementList" select="substring-after($elementList,’,')"/> 
</xsl:call-template> 
</xsl:if> 
</xsl:template
<!– Build list of unique entries (requires pre-sorted list) –> 
<xsl:template name="uniqueList"> 
<xsl:param name="list"/> 
<xsl:param name="lastEntry" select="""/> 
<xsl:variable name="currentEntry"> 
<xsl:call-template name="entry"> 
<xsl:with-param name="list" select="$list"/> 
</xsl:call-template> 
</xsl:variable> 
<xsl:if test="$currentEntry != $lastEntry and string-length(normalize-space($currentEntry)) != 0″> 
<xsl:value-of select="concat($currentEntry,’,')"/> 
</xsl:if> 
<xsl:if test="contains($list,’,')"> 
<xsl:call-template name="uniqueList"> 
<xsl:with-param name="list" select="substring-after($list,’,')"/> 
<xsl:with-param name="lastEntry" select="$currentEntry"/> 
</xsl:call-template> 
</xsl:if> 
</xsl:template> 
<!– Obtain current element/attribute name –> 
<xsl:template name="entry"> 
<xsl:param name="list"/> 
<xsl:choose> 
<xsl:when test="contains($list,’,')"> 
<xsl:value-of select="substring-before($list,’,')"/> 
</xsl:when> 
<xsl:otherwise> 
<xsl:value-of select="$list"/> 
</xsl:otherwise> 
</xsl:choose> 
</xsl:template> 
</xsl:stylesheet>

Liste E

Muster-XML-Dokument

Liste F

Schema

<?xml version="1.0″ encoding="UTF-16″?>
<xs:schema version="1.0″ elementFormDefault="qualified" xmlns:xs="http://www.w3.org/2001/XMLSchema"> 
<xs:annotation> 
<xs:appinfo>Schema auto-generated.</xs:appinfo> 
</xs:annotation> 
<xs:annotation> 
<xs:appinfo>Elements</xs:appinfo> 
</xs:annotation> 
<xs:element name="four" type="xs:string"/> 
<xs:element name="one"> 
<xs:complexType> 
<xs:choice minOccurs="0″ maxOccurs="unbounded"> 
<xs:element ref="two" minOccurs="0″/> 
</xs:choice> 
</xs:complexType> 
</xs:element> 
<xs:element name="threeA"> 
<xs:complexType> 
<xs:simpleContent> 
<xs:extension base="xs:string"> 
<xs:attribute ref="c"/> 
</xs:extension> 
</xs:simpleContent> 
</xs:complexType> 
</xs:element> 
<xs:element name="threeB"> 
<xs:complexType> 
<xs:choice minOccurs="0″ maxOccurs="unbounded"> 
<xs:element ref="four" minOccurs="0″/> 
</xs:choice> 
</xs:complexType> 
</xs:element> 
<xs:element name="threeC"> 
<xs:complexType> 
<xs:simpleContent> 
<xs:extension base="xs:string"> 
<xs:attribute ref="a"/> 
<xs:attribute ref="d"/> 
</xs:extension> 
</xs:simpleContent> 
</xs:complexType> 
</xs:element> 
<xs:element name="two"> 
<xs:complexType> 
<xs:choice minOccurs="0″ maxOccurs="unbounded"> 
<xs:element ref="threeA" minOccurs="0″/> 
<xs:element ref="threeB" minOccurs="0″/> 
<xs:element ref="threeC" minOccurs="0″/> 
</xs:choice> 
<xs:attribute ref="a"/> 
<xs:attribute ref="b"/> 
<xs:attribute ref="c"/> 
</xs:complexType> 
</xs:element> 
<xs:annotation> 
<xs:appinfo>Attributes</xs:appinfo> 
</xs:annotation> 
<xs:attribute name="a" type="xs:string"/> 
<xs:attribute name="b" type="xs:string"/> 
<xs:attribute name="c" type="xs:string"/> 
<xs:attribute name="d" type="xs:string"/> 
</xs:schema>

Es dauert etwa einen Tag diesen Code zu schreiben, aber wenn man bedenkt, wie aufwändig es ist, ein Schema per Hand zu schreiben, ist es die Mühe wert. Das resultierende Schema ist zwar nicht sonderlich angepasst (jeder Datentyp ist xs:string und minOccurs ist immer 0), doch es geht in jedem Fall sehr viel schneller, ein bestehendes Schema anzupassen als ein neues zu schreiben.

Inhalt

So lässt sich ein fehlendes XML-Schema selbst generieren

Neueste Kommentare

Noch keine Kommentare zu So lässt sich ein fehlendes XML-Schema selbst generieren

Vielen Dank für Ihren Kommentar.
Ihr Kommentar wurde gespeichert und wartet auf Moderation.

Schreibe einen Kommentar Antworten abbrechen

Neueste Kommentare

Noch keine Kommentare zu So lässt sich ein fehlendes XML-Schema selbst generieren

Vielen Dank für Ihren Kommentar.Ihr Kommentar wurde gespeichert und wartet auf Moderation.

Schreibe einen Kommentar Antworten abbrechen

Vielen Dank für Ihren Kommentar.
Ihr Kommentar wurde gespeichert und wartet auf Moderation.