Text.XML.HaXml.Schema.Parse

Documentation

type XsdParser a = Parser (Content Posn) a

We need a Parser monad for reading from a sequence of generic XML Contents into specific datatypes that model the structure of XSD descriptions. This is a specialisation of the polyparse combinators, fixing the input token type.

(|||) :: (a -> Bool) -> (a -> Bool) -> a -> Bool

Lift boolean or over predicates.

xsd :: Name -> QName

Qualify an ordinary name with the XSD namespace.

xsdTag :: String -> Content Posn -> Bool

Predicate for comparing against an XSD-qualified name. (Also accepts unqualified names, but this is probably a bit too lax. Doing it right would require checking to see whether the current schema module's default namespace is XSD or not.)

posnElementWith :: (Content Posn -> Bool) -> [String] -> XsdParser (Posn, Element Posn)

Get the next content element, checking that it matches some criterion given by the predicate. (Skips over comments and whitespace, rejects text and refs. Also returns position of element.) The list of strings argument is for error reporting - it usually represents a list of expected tags.

xsdElement :: Name -> XsdParser (Element Posn)

Get the next content element, checking that it has the required tag belonging to the XSD namespace.

anyElement :: XsdParser (Element Posn)

Get the next content element, whatever it is.

allChildren :: XsdParser a -> XsdParser a

Grab and parse any and all children of the next element.

interiorWith :: (Content Posn -> Bool) -> XsdParser a -> Element Posn -> XsdParser a

Run an XsdParser on the child contents of the given element (i.e. not in the current monadic content sequence), filtering the children before parsing, and checking that the contents are exhausted, before returning the calculated value within the current parser context.

attribute :: QName -> TextParser a -> Element Posn -> XsdParser a

Check for the presence (and value) of an attribute in the given element. Absence results in failure.

namespaceAttrs :: Element Posn -> XsdParser [Namespace]

Grab any attributes that declare a locally-used prefix for a specific namespace.

matchNamespace :: String -> Attribute -> Bool

Predicate for whether an attribute belongs to a given namespace.

tidy :: t -> Result x a -> Result t a

Tidy up the parsing context.

targetPrefix :: Maybe TargetNamespace -> [Namespace] -> Maybe String

Given a URI for a targetNamespace, and a list of Namespaces, tell me the prefix corresponding to the targetNamespace.

lookupBy :: (a -> Bool) -> [a] -> Maybe a

An auxiliary you might expect to find in Data.List

qual :: Maybe TargetNamespace -> [Namespace] -> String -> String -> QName

Turn a qualified attribute value (two strings) into a qualified name (QName), but excluding the case where the namespace prefix corresponds to the targetNamespace of the current schema document.

schema :: Parser (Content Posn) Schema

Parse a Schema declaration

annotation :: XsdParser Annotation

Parse a (possibly missing) xsd:annotation element.

definiteAnnotation :: XsdParser Annotation

Parse a definitely-occurring xsd:annotation element.

qform :: TextParser QForm

Parse a FormDefault attribute.

final :: TextParser Final

Parse a Final or Block attribute.

block :: TextParser Block

schemaItem :: (String -> String -> QName) -> XsdParser SchemaItem

Parse a schema item (just under the toplevel xsd:schema)

include :: XsdParser SchemaItem

Parse an xsd:include.

import_ :: XsdParser SchemaItem

Parse an xsd:import.

redefine :: (String -> String -> QName) -> XsdParser SchemaItem

Parse a xsd:redefine.

simpleType :: (String -> String -> QName) -> XsdParser SimpleType

Parse a xsd:simpleType decl.

aFacet :: XsdParser Facet

facet :: String -> FacetType -> XsdParser Facet

complexType :: (String -> String -> QName) -> XsdParser ComplexType

Parse a xsd:complexType decl.

complexItem :: (String -> String -> QName) -> XsdParser ComplexItem

Parse the alternative contents of a xsd:complexType decl.

particle :: (String -> String -> QName) -> XsdParser Particle

Parse a particle decl.

particleAttrs :: (String -> String -> QName) -> XsdParser ParticleAttrs

Parse a particle decl with optional attributes.

choiceOrSeq :: (String -> String -> QName) -> XsdParser ChoiceOrSeq

Parse an xsd:all, xsd:choice, or xsd:sequence decl.

group_ :: (String -> String -> QName) -> XsdParser Group

Parse a xsd:group decl.

elementEtc :: (String -> String -> QName) -> XsdParser ElementEtc

Parse an xsd:element, xsd:group, xsd:all, xsd:choice, xsd:sequence or xsd:any.

any_ :: XsdParser Any

Parse an xsd:any.

anyAttr :: XsdParser AnyAttr

Parse an xsd:anyAttribute.

attributeGroup :: (String -> String -> QName) -> XsdParser AttrGroup

Parse an xsd:attributegroup.

elementDecl :: (String -> String -> QName) -> XsdParser ElementDecl

Parse an xsd:element decl.

nameAndType :: (String -> String -> QName) -> Element Posn -> XsdParser NameAndType

Parse name and type attributes.

attributeDecl :: (String -> String -> QName) -> XsdParser AttributeDecl

Parse an xsd:attribute decl.

occurs :: Element Posn -> XsdParser Occurs

Parse an occurrence range from attributes of given element.

uniqueKeyOrKeyRef :: (String -> String -> QName) -> XsdParser UniqueKeyOrKeyRef

Parse a xsd:unique, xsd:key, or xsd:keyref.

unique :: XsdParser Unique

Parse a xsd:unique.

key :: XsdParser Key

Parse a xsd:key.

keyRef :: (String -> String -> QName) -> XsdParser KeyRef

Parse a xsd:keyref.

selector :: XsdParser Selector

Parse a xsd:selector.

field_ :: XsdParser Field

Parse a xsd:field.

uri :: TextParser String

Text parser for a URI (very simple, non-validating, probably incorrect).

string :: TextParser String

Text parser for an arbitrary string consisting of possibly multiple tokens.

space :: TextParser String

bool :: TextParser Bool

Parse a textual boolean, i.e. "true", "false", "0", or "1"

use :: TextParser Use

Parse a "use" attribute value, i.e. "required", "optional", or "prohibited"

processContents :: TextParser ProcessContents

Parse a "processContents" attribute, i.e. "skip", "lax", or "strict".

qname :: (String -> String -> QName) -> TextParser QName

Parse an attribute value that should be a QName.

name :: TextParser Name

Parse an attribute value that should be a simple Name.