Definindo tipos de dados algébricos recursivos em XML XSD
-
22-09-2019 - |
Pergunta
Imagine que eu tenho um recursivo Tipo de dados algébricos assim (sintaxe Haskell):
data Expr = Zero
| One
| Add Expr Expr
| Mul Expr Expr
Eu gostaria de representar isso no XML, e gostaria de um esquema XSD para ele.
Eu descobri como alcançar esta sintaxe:
<Expr>
<Add>
<Expr>
<Zero/>
</Expr>
<Expr>
<Mul>
<Expr>
<One/>
</Expr>
<Expr>
<Add>
<Expr>
<One/>
</Expr>
<Expr>
<One/>
</Expr>
</Add>
</Expr>
</Mul>
</Expr>
</Add>
</Expr>
Com este esquema:
<xs:complexType name="Expr">
<xs:choice minOccurs="1" maxOccurs="1">
<xs:element minOccurs="1" maxOccurs="1" name="Zero" type="Zero" />
<xs:element minOccurs="1" maxOccurs="1" name="One" type="One" />
<xs:element minOccurs="1" maxOccurs="1" name="Add" type="Add" />
<xs:element minOccurs="1" maxOccurs="1" name="Mul" type="Mul" />
</xs:choice>
</xs:complexType>
<xs:complexType name="Zero">
<xs:sequence>
</xs:sequence>
</xs:complexType>
<xs:complexType name="One">
<xs:sequence>
</xs:sequence>
</xs:complexType>
<xs:complexType name="Add">
<xs:sequence>
<xs:element minOccurs="2" maxOccurs="2" name="Expr" type="Expr" />
</xs:sequence>
</xs:complexType>
<xs:complexType name="Mul">
<xs:sequence>
<xs:element minOccurs="2" maxOccurs="2" name="Expr" type="Expr" />
</xs:sequence>
</xs:complexType>
Mas o que eu realmente quero é esta sintaxe:
<Add>
<Zero/>
<Mul>
<One/>
<Add>
<One/>
<One/>
</Add>
</Mul>
</Add>
Isso é possível?
Obrigado!
Solução
Use grupos de substituição:
<xs:element name="Expr" abstract="true"/>
<xs:element name="Zero" substitutionGroup="Expr">
<xs:complexType/>
</xs:element>
<xs:element name="One" substitutionGroup="Expr">
<xs:complexType/>
</xs:element>
<xs:element name="Add" substitutionGroup="Expr">
<xs:complexType>
<xs:sequence>
<xs:element minOccurs="2" maxOccurs="2" ref="Expr" />
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="Mul" substitutionGroup="Expr">
<xs:complexType>
<xs:sequence>
<xs:element minOccurs="2" maxOccurs="2" ref="Expr" />
</xs:sequence>
</xs:complexType>
</xs:element>
Licenciado em: CC-BY-SA com atribuição
Não afiliado a StackOverflow