| Index: third_party/sqlite/src/test/fts4merge3.test
|
| diff --git a/third_party/sqlite/src/test/fts4merge3.test b/third_party/sqlite/src/test/fts4merge3.test
|
| new file mode 100644
|
| index 0000000000000000000000000000000000000000..329b4d2cc4ea97720f5b52079af03654d2c17f59
|
| --- /dev/null
|
| +++ b/third_party/sqlite/src/test/fts4merge3.test
|
| @@ -0,0 +1,105 @@
|
| +# 2012 March 06
|
| +#
|
| +# The author disclaims copyright to this source code. In place of
|
| +# a legal notice, here is a blessing:
|
| +#
|
| +# May you do good and not evil.
|
| +# May you find forgiveness for yourself and forgive others.
|
| +# May you share freely, never taking more than you give.
|
| +#
|
| +#*************************************************************************
|
| +# This file implements regression tests for SQLite library. The
|
| +# focus of this script is testing the incremental merge function.
|
| +#
|
| +
|
| +set testdir [file dirname $argv0]
|
| +source $testdir/tester.tcl
|
| +source $testdir/fts3_common.tcl
|
| +source $testdir/lock_common.tcl
|
| +source $testdir/bc_common.tcl
|
| +
|
| +set ::testprefix fts4merge3
|
| +
|
| +ifcapable !fts3 {
|
| + finish_test
|
| + return
|
| +}
|
| +
|
| +if {"" == [bc_find_binaries backcompat.test]} {
|
| + finish_test
|
| + return
|
| +}
|
| +
|
| +db close
|
| +do_all_bc_test {
|
| +
|
| + sql2 { PRAGMA page_size = 512 }
|
| + if { 0==[catch { sql2 { CREATE VIRTUAL TABLE x USING fts4 } } ] } {
|
| +
|
| + # Build a large database.
|
| + set msg "this takes around 12 seconds"
|
| + do_test "1.1 ($msg)" { fts3_build_db_2 20000 } {}
|
| +
|
| + # Run some queries on it, using the old and new versions.
|
| + do_test 1.2 { sql1 "SELECT docid FROM t2 WHERE t2 MATCH 'abc'" } {1485}
|
| + do_test 1.3 { sql2 "SELECT docid FROM t2 WHERE t2 MATCH 'abc'" } {1485}
|
| +
|
| + do_test 1.4 {
|
| + set x [sql2 "PRAGMA page_count"]
|
| + expr {$x>=1284 && $x<=1286}
|
| + } {1}
|
| + do_test 1.5 { sql2 {
|
| + SELECT level, count(*) FROM t2_segdir GROUP BY level ORDER BY 1
|
| + } } [list 0 15 1 1 2 14 3 4]
|
| +
|
| + # Run some incr-merge operations on the db.
|
| + for {set i 0} {$i<10} {incr i} {
|
| + do_test 1.6.$i.1 { sql1 { INSERT INTO t2(t2) VALUES('merge=2,2') } } {}
|
| + do_test 1.6.$i.2 {
|
| + sql2 "SELECT docid FROM t2 WHERE t2 MATCH 'abc'"
|
| + } {1485}
|
| + }
|
| +
|
| + do_test 1.7 { sql2 {
|
| + SELECT level, count(*) FROM t2_segdir GROUP BY level ORDER BY 1
|
| + } } [list 0 1 2 18 3 5]
|
| +
|
| + # Using the old connection, insert many rows.
|
| + do_test 1.8 {
|
| + for {set i 0} {$i < 1500} {incr i} {
|
| + sql2 "INSERT INTO t2 SELECT content FROM t2 WHERE docid = $i"
|
| + }
|
| + } {}
|
| +
|
| + do_test 1.9 { sql2 {
|
| + SELECT level, count(*) FROM t2_segdir GROUP BY level ORDER BY 1
|
| + } } [list 0 13 1 13 2 5 3 6]
|
| +
|
| + # Run a big incr-merge operation on the db.
|
| + do_test 1.10 { sql1 { INSERT INTO t2(t2) VALUES('merge=2000,2') } } {}
|
| + do_test 1.11 {
|
| + sql2 "SELECT docid FROM t2 WHERE t2 MATCH 'abc'"
|
| + } {1485 21485}
|
| +
|
| + do_test 1.12 {
|
| + for {set i 0} {$i < 1500} {incr i} {
|
| + sql2 "INSERT INTO t2 SELECT content FROM t2 WHERE docid = $i"
|
| + }
|
| + } {}
|
| + do_test 1.13 {
|
| + sql2 "SELECT docid FROM t2 WHERE t2 MATCH 'abc'"
|
| + } {1485 21485 22985}
|
| +
|
| + do_test 1.14 {
|
| + sql2 "INSERT INTO t2(t2) VALUES('optimize')"
|
| + sql2 "SELECT docid FROM t2 WHERE t2 MATCH 'abc'"
|
| + } {1485 21485 22985}
|
| +
|
| + do_test 1.15 { sql2 {
|
| + SELECT level, count(*) FROM t2_segdir GROUP BY level ORDER BY 1
|
| + } } {6 1}
|
| + }
|
| +}
|
| +
|
| +
|
| +finish_test
|
|
|