"{ Package: 'stx:goodies/xmlsuite/xquery' }"

"{ NameSpace: XQuery }"

TestResource subclass:#XQueryDocumentProviderTestResource

	instanceVariableNames:''

	classVariableNames:''

	poolDictionaries:''

	category:'XQuery-Tests'

!

!XQueryDocumentProviderTestResource class methodsFor:'defaults'!

attributesXML

    ^'<?xml version="1.0" encoding="ISO-8859-1"?>

<root>

    <a attr="1"> a </a>

    <a attr="2"> b </a>

</root>'

    "Created: / 30-04-2009 / 19:03:48 / Jan Kurs <kursj1@fel.cvut.cz>"

!

bookstoreXML

    ^'<bookstore><book><title lang="eng" withPictures="yes">Harry Potter</title><price>29.99</price><parentalAdvisory>50+</parentalAdvisory><description></description></book><book><title lang="eng">Learning XML</title><price>39.95</price></book><book><title>1984</title><price>19.84</price></book></bookstore>'

    "Created: / 06-04-2007 / 17:17:09 / janfrog"

!

namespacesXML

    ^'<root>

        <a   xmlns="urn:ns:nsA" />

        <b:b xmlns:b="urn:ns:nsB" />

        <c xmlns:d="urn:ns:nsD" d:d="attvalue" />

      </root>'

    "Created: / 06-04-2007 / 17:17:13 / janfrog"

! !

!XQueryDocumentProviderTestResource class methodsFor:'document provider mimicry'!

attributesDOM

    ^ (XMLv2::Parser forDOM3 processDocumentString:self attributesXML)

    "Created: / 30-04-2009 / 19:03:48 / Jan Kurs <kursj1@fel.cvut.cz>"

!

bookstoreDOM

    ^ (XMLv2::Parser forDOM3 processDocumentString:self bookstoreXML)

    "Created: / 24-10-2007 / 16:07:39 / janfrog"

!

namespacesDOM

    ^ (XMLv2::Parser forDOM3 processDocumentString:self namespacesXML)

    "Created: / 24-10-2007 / 16:07:39 / janfrog"

! !

!XQueryDocumentProviderTestResource methodsFor:'document provider mimicry'!

attributesDOM

    ^ self class attributesDOM

    "Created: / 30-04-2009 / 19:01:29 / Jan Kurs <kursj1@fel.cvut.cz>"

!

bookstoreDOM

    ^ self class bookstoreDOM

    "Created: / 24-10-2007 / 16:07:39 / janfrog"

!

documentAdaptorsFor:aStringOrURI 

    aStringOrURI = 'file:///bookstore.xml' ifTrue:[

        ^ Array with:(XQuery::XDMAdaptorFactory 

                    documentAdaptorFor:self bookstoreDOM)

    ].

    aStringOrURI = 'file:///namespaces.xml' ifTrue:[

        ^ Array with:(XQuery::XDMAdaptorFactory 

                    documentAdaptorFor:self namespacesDOM)

    ].

    aStringOrURI = 'file:///attributes.xml' ifTrue:[

        ^ Array with:(XQuery::XDMAdaptorFactory 

                    documentAdaptorFor:self attributesDOM)

    ].

    self error:'Unknown document URI'.

    "Created: / 20-09-2007 / 10:31:15 / janfrog"

    "Modified: / 24-10-2007 / 16:07:29 / janfrog"

    "Modified: / 28-01-2010 / 10:51:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"

!

namespacesDOM

    ^ self class namespacesDOM

    "Created: / 24-10-2007 / 16:07:39 / janfrog"

! !

!XQueryDocumentProviderTestResource class methodsFor:'documentation'!

version_SVN

    ^ '$Id$'

! !