xquery/trunk/XQuery__XQueryDocumentProviderTestResource.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Tue, 08 Apr 2008 19:47:42 +0000
changeset 0 5057afe1ec87
child 232 9d8fd28b99b0
permissions -rw-r--r--
Initial import from CVS

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

"{ NameSpace: XQuery }"

TestResource subclass:#XQueryDocumentProviderTestResource
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'XQuery-Tests'
!


!XQueryDocumentProviderTestResource class methodsFor:'defaults'!

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'!

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'!

bookstoreDOM
    ^ self class bookstoreDOM

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

documentAdaptorsFor:aStringOrURI 
    aStringOrURI = 'file:///bookstore.xml' ifTrue:[
        ^ Array with:(XMLv2::XPathDocumentAdaptorFactory 
                    documentAdaptorFor:self bookstoreDOM)
    ].
    aStringOrURI = 'file:///namespaces.xml' ifTrue:[
        ^ Array with:(XMLv2::XPathDocumentAdaptorFactory 
                    documentAdaptorFor:self namespacesDOM)
    ].
    self error:'Unknown document URI'.

    "Created: / 20-09-2007 / 10:31:15 / janfrog"
    "Modified: / 24-10-2007 / 16:07:29 / janfrog"
!

namespacesDOM
    ^ self class namespacesDOM

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

!XQueryDocumentProviderTestResource class methodsFor:'documentation'!

version
    ^ '$Header: /opt/data/cvs/stx/goodies/xmlsuite/xquery/XQuery__XQueryDocumentProviderTestResource.st,v 1.3 2007-10-24 14:12:14 vranyj1 Exp $'
! !