void XsdSchemaDebugger::dumpParticle(const XsdParticle::Ptr &particle, int level)
{
QString prefix; prefix.fill(QLatin1Char(' '), level);
qDebug("%s min=%s max=%s", qPrintable(prefix), qPrintable(QString::number(particle->minimumOccurs())),
qPrintable(particle->maximumOccursUnbounded() ? QLatin1String("unbounded") : QString::number(particle->maximumOccurs())));
if (particle->term()->isElement()) {
qDebug("%selement (%s)", qPrintable(prefix), qPrintable(XsdElement::Ptr(particle->term())->displayName(m_namePool)));
} else if (particle->term()->isModelGroup()) {
const XsdModelGroup::Ptr group(particle->term());
if (group->compositor() == XsdModelGroup::SequenceCompositor) {
qDebug("%ssequence", qPrintable(prefix));
} else if (group->compositor() == XsdModelGroup::AllCompositor) {
qDebug("%sall", qPrintable(prefix));
} else if (group->compositor() == XsdModelGroup::ChoiceCompositor) {
qDebug("%schoice", qPrintable(prefix));
}
for (int i = 0; i < group->particles().count(); ++i)
dumpParticle(group->particles().at(i), level + 5);
} else if (particle->term()->isWildcard()) {
XsdWildcard::Ptr wildcard(particle->term());
qDebug("%swildcard (process=%d)", qPrintable(prefix), wildcard->processContents());
}
}
QSet<XsdElement::Ptr> collectAllElements(const XsdSchema::Ptr &schema)
{
QSet<XsdElement::Ptr> elements;
// collect global elements
const XsdElement::List elementList = schema->elements();
for (int i = 0; i < elementList.count(); ++i)
elements.insert(elementList.at(i));
// collect all elements from global groups
const XsdModelGroup::List groupList = schema->elementGroups();
for (int i = 0; i < groupList.count(); ++i) {
const XsdModelGroup::Ptr group(groupList.at(i));
for (int j = 0; j < group->particles().count(); ++j)
elements.unite(collectAllElements(group->particles().at(j)));
}
// collect all elements from complex type definitions
SchemaType::List types;
types << schema->types() << schema->anonymousTypes();
for (int i = 0; i < types.count(); ++i) {
if (types.at(i)->isComplexType() && types.at(i)->isDefinedBySchema()) {
const XsdComplexType::Ptr complexType(types.at(i));
if (complexType->contentType()->particle())
elements.unite(collectAllElements(complexType->contentType()->particle()));
}
}
return elements;
}
bool XsdSchemaChecker::particleEqualsRecursively(const XsdParticle::Ptr &particle, const XsdParticle::Ptr &otherParticle) const
{
// @see http://www.w3.org/TR/xmlschema11-1/#cos-particle-extend
//TODO: find out what 'properties' of a particle should be checked here...
if (particle->minimumOccurs() != otherParticle->minimumOccurs())
return false;
if (particle->maximumOccursUnbounded() != otherParticle->maximumOccursUnbounded())
return false;
if (particle->maximumOccurs() != otherParticle->maximumOccurs())
return false;
const XsdTerm::Ptr term = particle->term();
const XsdTerm::Ptr otherTerm = otherParticle->term();
if (term->isElement() && !(otherTerm->isElement()))
return false;
if (term->isModelGroup() && !(otherTerm->isModelGroup()))
return false;
if (term->isWildcard() && !(otherTerm->isWildcard()))
return false;
if (term->isElement()) {
const XsdElement::Ptr element = term;
const XsdElement::Ptr otherElement = otherTerm;
if (element->name(m_namePool) != otherElement->name(m_namePool))
return false;
if (element->type()->name(m_namePool) != otherElement->type()->name(m_namePool))
return false;
}
if (term->isModelGroup()) {
const XsdModelGroup::Ptr group = term;
const XsdModelGroup::Ptr otherGroup = otherTerm;
if (group->particles().count() != otherGroup->particles().count())
return false;
for (int i = 0; i < group->particles().count(); ++i) {
if (!particleEqualsRecursively(group->particles().at(i), otherGroup->particles().at(i)))
return false;
}
}
if (term->isWildcard()) {
}
return true;
}
static void internalParticleLookupMap(const XsdParticle::Ptr &particle, QHash<XsdTerm::Ptr, XsdParticle::Ptr> &hash)
{
hash.insert(particle->term(), particle);
if (particle->term()->isModelGroup()) {
const XsdModelGroup::Ptr group(particle->term());
const XsdParticle::List particles = group->particles();
for (int i = 0; i < particles.count(); ++i)
internalParticleLookupMap(particles.at(i), hash);
}
}
bool XsdSchemaChecker::isValidParticleExtension(const XsdParticle::Ptr &extension, const XsdParticle::Ptr &base) const
{
// @see http://www.w3.org/TR/xmlschema11-1/#cos-particle-extend
// 1
if (extension == base)
return true;
// 2
if (extension->minimumOccurs() == 1 && extension->maximumOccurs() == 1 && extension->maximumOccursUnbounded() == false) {
if (extension->term()->isModelGroup()) {
const XsdModelGroup::Ptr modelGroup = extension->term();
if (modelGroup->compositor() == XsdModelGroup::SequenceCompositor) {
if (particleEqualsRecursively(modelGroup->particles().first(), base))
return true;
}
}
}
// 3
if (extension->minimumOccurs() == base->minimumOccurs()) { // 3.1
if (extension->term()->isModelGroup() && base->term()->isModelGroup()) {
const XsdModelGroup::Ptr extensionGroup(extension->term());
const XsdModelGroup::Ptr baseGroup(base->term());
if (extensionGroup->compositor() == XsdModelGroup::AllCompositor && baseGroup->compositor() == XsdModelGroup::AllCompositor) {
const XsdParticle::List extensionParticles = extensionGroup->particles();
const XsdParticle::List baseParticles = baseGroup->particles();
for (int i = 0; i < baseParticles.count() && i < extensionParticles.count(); ++i) {
if (baseParticles.at(i) != extensionParticles.at(i))
return false;
}
}
}
}
return false;
}
bool XsdParticleChecker::isUPAConformXsdAll(const XsdParticle::Ptr &particle, const NamePool::Ptr &namePool)
{
/**
* see http://www.w3.org/TR/xmlschema-1/#non-ambig
*/
const XsdModelGroup::Ptr group(particle->term());
const XsdParticle::List particles = group->particles();
const int count = particles.count();
for (int left = 0; left < count; ++left) {
for (int right = left+1; right < count; ++right) {
if (termMatches(particles.at(left)->term(), particles.at(right)->term(), namePool))
return false;
}
}
return true;
}
bool XsdSchemaChecker::elementSequenceAccepted(const XsdModelGroup::Ptr &sequence, const XsdParticle::Ptr &particle) const
{
// @see http://www.w3.org/TR/xmlschema11-1/#cvc-accept
if (particle->term()->isWildcard()) { // 1
const XsdWildcard::Ptr wildcard(particle->term());
// 1.1
if ((unsigned int)sequence->particles().count() < particle->minimumOccurs())
return false;
// 1.2
if (!particle->maximumOccursUnbounded()) {
if ((unsigned int)sequence->particles().count() > particle->maximumOccurs())
return false;
}
// 1.3
const XsdParticle::List particles(sequence->particles());
for (int i = 0; i < particles.count(); ++i) {
if (particles.at(i)->term()->isElement()) {
if (!XsdSchemaHelper::wildcardAllowsExpandedName(XsdElement::Ptr(particles.at(i)->term())->name(m_namePool), wildcard, m_namePool))
return false;
}
}
} else if (particle->term()->isElement()) { // 2
const XsdElement::Ptr element(particle->term());
// 2.1
if ((unsigned int)sequence->particles().count() < particle->minimumOccurs())
return false;
// 2.2
if (!particle->maximumOccursUnbounded()) {
if ((unsigned int)sequence->particles().count() > particle->maximumOccurs())
return false;
}
// 2.3
const XsdParticle::List particles(sequence->particles());
for (int i = 0; i < particles.count(); ++i) {
bool isValid = false;
if (particles.at(i)->term()->isElement()) {
const XsdElement::Ptr seqElement(particles.at(i)->term());
// 2.3.1
if (element->name(m_namePool) == seqElement->name(m_namePool))
isValid = true;
// 2.3.2
if (element->scope() && element->scope()->variety() == XsdElement::Scope::Global) {
if (!(element->disallowedSubstitutions() & NamedSchemaComponent::SubstitutionConstraint)) {
//TODO: continue
}
}
}
}
}
return true;
}