Merge Chromium + Blink git repositories
[chromium-blink-merge.git] / third_party / sqlite / sqlite-src-3080704 / test / fts3sort.test
blob218bf3e827c91ed7c341cae2303136895d9f7d70
1 # 2011 May 04
3 # The author disclaims copyright to this source code.  In place of
4 # a legal notice, here is a blessing:
6 #    May you do good and not evil.
7 #    May you find forgiveness for yourself and forgive others.
8 #    May you share freely, never taking more than you give.
10 #*************************************************************************
11 # This file implements regression tests for SQLite library.  The
12 # focus of this script is testing the FTS3 module.
15 set testdir [file dirname $argv0]
16 source $testdir/tester.tcl
18 # If SQLITE_ENABLE_FTS3 is defined, omit this file.
19 ifcapable !fts3 {
20   finish_test
21   return
25 proc build_database {nRow param} {
26   db close
27   forcedelete test.db
28   sqlite3 db test.db
30   set vocab [list    aa ab ac   ba bb bc    ca cb cc   da]
31   expr srand(0)
33   execsql "CREATE VIRTUAL TABLE t1 USING fts4($param)"
34   for {set i 0} {$i < $nRow} {incr i} {
35     set v [expr int(rand()*1000000)]
36     set doc [list]
37     for {set div 1} {$div < 1000000} {set div [expr $div*10]} {
38       lappend doc [lindex $vocab [expr ($v/$div) % 10]]
39     }
40     execsql { INSERT INTO t1 VALUES($doc) }
41   }
44 set testprefix fts3sort
46 unset -nocomplain CONTROL
47 foreach {t param} {
48   1     ""
49   2     "order=asc"
50   3     "order=desc"
51 } {
53   set testprefix fts3sort-1.$t
55   set nRow 1000
56   do_test 1.0 {
57     build_database $nRow $param
58     execsql { SELECT count(*) FROM t1 }
59   } $nRow
60   
61   foreach {tn query} {
62   1   "SELECT docid, * FROM t1"
63   2   "SELECT docid, * FROM t1 WHERE t1 MATCH 'aa'"
64   3   "SELECT docid, * FROM t1 WHERE t1 MATCH 'a*'"
65   4   "SELECT docid, quote(matchinfo(t1)) FROM t1 WHERE t1 MATCH 'a*'"
66   5   "SELECT docid, quote(matchinfo(t1,'pcnxals')) FROM t1 WHERE t1 MATCH 'b*'"
67   6   "SELECT docid, * FROM t1 WHERE t1 MATCH 'a* b* c*'"
68   7   "SELECT docid, * FROM t1 WHERE t1 MATCH 'aa OR da'"
69   8   "SELECT docid, * FROM t1 WHERE t1 MATCH 'nosuchtoken'"
70   9   "SELECT docid, snippet(t1) FROM t1 WHERE t1 MATCH 'aa OR da'"
71   10  "SELECT docid, snippet(t1) FROM t1 WHERE t1 MATCH 'aa OR nosuchtoken'"
72   11  "SELECT docid, snippet(t1) FROM t1 WHERE t1 MATCH 'aa NEAR bb'"
73   12  "SELECT docid, snippet(t1) FROM t1 WHERE t1 MATCH '\"aa bb\"'"
74   13  "SELECT docid, content FROM t1 WHERE t1 MATCH 'aa NEAR/2 bb NEAR/3 cc'"
75   14  "SELECT docid, content FROM t1 WHERE t1 MATCH '\"aa bb cc\"'"
76   } {
77   
78     unset -nocomplain A B C D
79     set A_list [list]
80     set B_list [list]
81     set C_list [list]
82     set D_list [list]
83   
84     unset -nocomplain X
85     db eval "$query ORDER BY rowid ASC"  X  { 
86       set A($X(docid)) [array get X] 
87       lappend A_list $X(docid)
88     }
89     unset -nocomplain X
90     db eval "$query ORDER BY rowid DESC" X  { 
91       set B($X(docid)) [array get X] 
92       lappend B_list $X(docid)
93     }
94     unset -nocomplain X
95     db eval "$query ORDER BY docid ASC"  X  { 
96       set C($X(docid)) [array get X] 
97       lappend C_list $X(docid)
98     }
99     unset -nocomplain X
100     db eval "$query ORDER BY docid DESC" X  { 
101       set D($X(docid)) [array get X] 
102       lappend D_list $X(docid)
103     }
104   
105     do_test $tn.1 { set A_list } [lsort -integer -increasing $A_list]
106     do_test $tn.2 { set B_list } [lsort -integer -decreasing $B_list]
107     do_test $tn.3 { set C_list } [lsort -integer -increasing $C_list]
108     do_test $tn.4 { set D_list } [lsort -integer -decreasing $D_list]
109   
110     unset -nocomplain DATA
111     unset -nocomplain X
112     db eval "$query" X  { 
113       set DATA($X(docid)) [array get X] 
114     }
115   
116     do_test $tn.5 { lsort [array get A] } [lsort [array get DATA]]
117     do_test $tn.6 { lsort [array get B] } [lsort [array get DATA]]
118     do_test $tn.7 { lsort [array get C] } [lsort [array get DATA]]
119     do_test $tn.8 { lsort [array get D] } [lsort [array get DATA]]
121     if {[info exists CONTROL($tn)]} {
122       do_test $tn.9 { set CONTROL($tn) } [lsort [array get DATA]]
123     } else {
124       set CONTROL($tn) [lsort [array get DATA]]
125     }
126   }
128 unset -nocomplain CONTROL
130 set testprefix fts3sort
132 #-------------------------------------------------------------------------
133 # Tests for parsing the "order=asc" and "order=desc" directives.
135 foreach {tn param res} {
136   1 "order=asc"             {0 {}}
137   2 "order=desc"            {0 {}}
138   3 "order=dec"             {1 {unrecognized order: dec}}
139   4 "order=xxx, order=asc"  {1 {unrecognized order: xxx}}
140   5 "order=desc, order=asc" {0 {}}
141   6 "order=xxxx, order=asc" {1 {unrecognized order: xxxx}}
142   7 "order=desk"            {1 {unrecognized order: desk}}
143 } {
144   execsql { DROP TABLE IF EXISTS t1 }
145   do_catchsql_test 2.1.$tn "
146     CREATE VIRTUAL TABLE t1 USING fts4(a, b, $param)
147   " $res
150 do_execsql_test 2.2 {
151   BEGIN;
152     CREATE VIRTUAL TABLE t2 USING fts4(order=desc);
153     INSERT INTO t2 VALUES('aa bb');
154     INSERT INTO t2 VALUES('bb cc');
155     INSERT INTO t2 VALUES('cc aa');
156     SELECT docid FROM t2 WHERE t2 MATCH 'aa';
157   END;
158 } {3 1}
159 do_execsql_test 2.3 {
160   SELECT docid FROM t2 WHERE t2 MATCH 'aa';
161 } {3 1}
162 do_execsql_test 2.4 {
163   SELECT docid FROM t2 WHERE t2 MATCH 'aa' ORDER BY content;
164 } {1 3}
166 #-------------------------------------------------------------------------
167 # Test that ticket [56be976859] has been fixed.
169 do_execsql_test 3.1 {
170   CREATE VIRTUAL TABLE t3 USING fts4(x, order=DESC);
171   INSERT INTO t3(docid, x) VALUES(113382409004785664, 'aa');
172   INSERT INTO t3(docid, x) VALUES(1, 'ab');
173   SELECT rowid FROM t3 WHERE x MATCH 'a*' ORDER BY docid DESC;
174 } {113382409004785664 1}
175 do_execsql_test 3.2 {
176   CREATE VIRTUAL TABLE t4 USING fts4(x);
177   INSERT INTO t4(docid, x) VALUES(-113382409004785664, 'aa');
178   INSERT INTO t4(docid, x) VALUES(1, 'ab');
179   SELECT rowid FROM t4 WHERE x MATCH 'a*';
180 } {-113382409004785664 1}
184 finish_test