33 : Copyright (C) 2001 The eXist-db Authors
44 :
55 : info@exist-db.org
6- : http://exist-db.org
6+ : http://www. exist-db.org
77 :
88 : This library is free software; you can redistribute it and/or
99 : modify it under the terms of the GNU Lesser General Public
@@ -23,7 +23,7 @@ xquery version "3.1";
2323
2424(:~
2525 : XQSuite tests for queries on different indexes on different collection contexts.
26- : Attribute context ft:query and util:index-keys (qname/path, @ vs attribute axis).
26+ : Attribute context ft:query and util:index-keys (qname/path, @att vs attribute axis).
2727 : Refactored from FT_AttTest_complex.xml (TestSet).
2828 :
2929 : @author Ron Van den Branden
@@ -32,7 +32,9 @@ module namespace ftac="http://exist-db.org/xquery/lucene/ft-attr-context/test";
3232
3333declare namespace test="http://exist-db.org/xquery/xqsuite" ;
3434
35- (:~ Collection config: p, @att1 , //@att2 Lucene + range. :)
35+ (:~
36+ : Collection config: p, @att1 , //@att2 Lucene + range.
37+ :)
3638declare variable $ftac:XCONF as element (collection) :=
3739 <collection xmlns = "http://exist-db.org/collection-config/1.0" >
3840 <index xmlns:xs = "http://www.w3.org/2001/XMLSchema" >
@@ -49,7 +51,9 @@ declare variable $ftac:XCONF as element(collection) :=
4951 </index>
5052 </collection>;
5153
52- (:~ Test document: p with att1, att2. :)
54+ (:~
55+ : Test document: p with att1, att2.
56+ :)
5357declare variable $ftac:XML as document-node () :=
5458 document {
5559 <p att1 = "val1" att2 = "val2" >this is a test document </p>
@@ -63,105 +67,139 @@ declare %private function ftac:term-callback($term as xs:string, $data as xs:int
6367 <term>{ $term }</term>
6468};
6569
66- (:~ setUp: create collection, config, store doc, reindex. :)
70+ (:~
71+ : setUp: create collection, config, store doc, reindex.
72+ :)
6773declare
6874 %test:setUp
6975function ftac:setUp () {
70- ( xmldb:create-collection ("/db" , $ftac:COLLECTION_NAME),
76+ ( xmldb:create-collection ("/db/system" , "config" ),
77+ xmldb:create-collection ("/db/system/config" , "db" ),
78+ xmldb:create-collection ("/db" , $ftac:COLLECTION_NAME),
7179 xmldb:create-collection ("/db/system/config/db" , $ftac:COLLECTION_NAME),
7280 xmldb:store ("/db/system/config/db/" || $ftac:COLLECTION_NAME, "collection.xconf" , $ftac:XCONF),
7381 xmldb:store ($ftac:COLLECTION, "test.xml" , $ftac:XML),
7482 xmldb:reindex ($ftac:COLLECTION) )
7583};
7684
77- (:~ tearDown: remove data and config collections. :)
85+ (:~
86+ : tearDown: remove data and config collections.
87+ :)
7888declare
7989 %test:tearDown
8090function ftac:tearDown () {
8191 xmldb:remove ($ftac:COLLECTION),
8292 xmldb:remove ("/db/system/config/db/" || $ftac:COLLECTION_NAME)
8393};
8494
85- (:~ [query] lucene FT index (qname), attribute context (@) :)
95+ (:~
96+ : [query] lucene FT index (qname), attribute context @att
97+ :)
8698declare %test:assertEquals("val1" ) function ftac:query-qname-attr-at () {
8799 collection ($ftac:COLLECTION)//p/@att1[ft:query (., 'val1' )]/string ()
88100};
89101
90- (:~ [query] lucene FT index (path), attribute context (@) :)
102+ (:~
103+ : [query] lucene FT index (path), attribute context @att
104+ :)
91105declare %test:assertEquals("val2" ) function ftac:query-path-attr-at () {
92106 collection ($ftac:COLLECTION)//p/@att2[ft:query (., 'val2' )]/string ()
93107};
94108
95- (:~ [query] lucene FT index (qname), attribute context attribute axis :)
109+ (:~
110+ : [query] lucene FT index (qname), attribute context attribute axis
111+ :)
96112declare %test:assertEquals("val1" ) function ftac:query-qname-attr-attribute-axis () {
97113 collection ($ftac:COLLECTION)//p/attribute::att1[ft:query (., 'val1' )]/string ()
98114};
99115
100- (:~ [query] lucene FT index (path), attribute context attribute axis :)
116+ (:~
117+ : [query] lucene FT index (path), attribute context attribute axis
118+ :)
101119declare %test:assertEquals("val2" ) function ftac:query-path-attr-attribute-axis () {
102120 collection ($ftac:COLLECTION)//p/attribute::att2[ft:query (., 'val2' )]/string ()
103121};
104122
105- (:~ [query] lucene FT index (qname), element context :)
123+ (:~
124+ : [query] lucene FT index (qname), element context
125+ :)
106126declare %test:assertTrue function ftac:query-qname-element-context () {
107127 let $result := collection ($ftac:COLLECTION)//p[ft:query (@att1, 'val1' )]
108128 return deep-equal ($result, collection ($ftac:COLLECTION)//p)
109129};
110130
111- (:~ [query] lucene FT index (path), element context :)
131+ (:~
132+ : [query] lucene FT index (path), element context
133+ :)
112134declare %test:assertTrue function ftac:query-path-element-context () {
113135 let $result := collection ($ftac:COLLECTION)//p[ft:query (@att2, 'val2' )]
114136 return deep-equal ($result, collection ($ftac:COLLECTION)//p)
115137};
116138
117- (:~ [query] lucene FT index (qname), attribute context inside predicate :)
139+ (:~
140+ : [query] lucene FT index (qname), attribute context inside predicate
141+ :)
118142declare %test:assertTrue function ftac:query-qname-attr-in-predicate () {
119143 let $result := collection ($ftac:COLLECTION)/*[descendant-or-self::p/@att1[ft:query (., 'val1' )]]
120144 return deep-equal ($result, collection ($ftac:COLLECTION)//p)
121145};
122146
123- (:~ [query] lucene FT index (path), attribute context inside predicate :)
147+ (:~
148+ : [query] lucene FT index (path), attribute context inside predicate
149+ :)
124150declare %test:assertTrue function ftac:query-path-attr-in-predicate () {
125151 let $result := collection ($ftac:COLLECTION)/*[descendant-or-self::p/@att2[ft:query (., 'val2' )]]
126152 return deep-equal ($result, collection ($ftac:COLLECTION)//p)
127153};
128154
129- (:~ [index] lucene FT index (qname), attribute context (@) :)
155+ (:~
156+ : [index] lucene FT index (qname), attribute context @att
157+ :)
130158declare %test:assertTrue function ftac:index-qname-attr-at () {
131159 let $a := collection ($ftac:COLLECTION)//p/@att1
132160 let $result := util:index-keys ($a, '' , util:function (xs:QName ('ftac:term-callback' ), 2 ), 100 , 'lucene-index' )
133161 return deep-equal ($result, <term>val1</term>)
134162};
135163
136- (:~ [index] lucene FT index (path), attribute context (@) :)
164+ (:~
165+ : [index] lucene FT index (path), attribute context @att
166+ :)
137167declare %test:assertTrue function ftac:index-path-attr-at () {
138168 let $a := collection ($ftac:COLLECTION)//p/@att2
139169 let $result := util:index-keys ($a, '' , util:function (xs:QName ('ftac:term-callback' ), 2 ), 100 , 'lucene-index' )
140170 return deep-equal ($result, <term>val2</term>)
141171};
142172
143- (:~ [index] lucene FT index (qname), attribute context attribute axis :)
173+ (:~
174+ : [index] lucene FT index (qname), attribute context attribute axis
175+ :)
144176declare %test:assertTrue function ftac:index-qname-attr-attribute-axis () {
145177 let $a := collection ($ftac:COLLECTION)//p/attribute::att1
146178 let $result := util:index-keys ($a, '' , util:function (xs:QName ('ftac:term-callback' ), 2 ), 100 , 'lucene-index' )
147179 return deep-equal ($result, <term>val1</term>)
148180};
149181
150- (:~ [index] lucene FT index (path), attribute context attribute axis :)
182+ (:~
183+ : [index] lucene FT index (path), attribute context attribute axis
184+ :)
151185declare %test:assertTrue function ftac:index-path-attr-attribute-axis () {
152186 let $a := collection ($ftac:COLLECTION)//p/attribute::att2
153187 let $result := util:index-keys ($a, '' , util:function (xs:QName ('ftac:term-callback' ), 2 ), 100 , 'lucene-index' )
154188 return deep-equal ($result, <term>val2</term>)
155189};
156190
157- (:~ [index] lucene FT index (qname), element context :)
191+ (:~
192+ : [index] lucene FT index (qname), element context
193+ :)
158194declare %test:assertTrue function ftac:index-qname-element-context () {
159195 let $a := collection ($ftac:COLLECTION)//p
160196 let $result := util:index-keys ($a/@att1, '' , util:function (xs:QName ('ftac:term-callback' ), 2 ), 100 , 'lucene-index' )
161197 return deep-equal ($result, <term>val1</term>)
162198};
163199
164- (:~ [index] lucene FT index (path), element context :)
200+ (:~
201+ : [index] lucene FT index (path), element context
202+ :)
165203declare %test:assertTrue function ftac:index-path-element-context () {
166204 let $a := collection ($ftac:COLLECTION)//p
167205 let $result := util:index-keys ($a/@att2, '' , util:function (xs:QName ('ftac:term-callback' ), 2 ), 100 , 'lucene-index' )
0 commit comments