test/fts3defer2.test

   1 # 2010 October 23
   2 #
   3 # The author disclaims copyright to this source code.  In place of
   4 # a legal notice, here is a blessing:
   5 #
   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.
   9 #
  10 #***********************************************************************
  11 #
  12
  13 set testdir [file dirname $argv0]
  14 source $testdir/tester.tcl
  15 source $testdir/malloc_common.tcl
  16 ifcapable !fts3||!fts4_deferred {
  17   finish_test
  18   return
  19 }
  20
  21 set testprefix fts3defer2
  22
  23 proc mit {blob} {
  24   set scan(littleEndian) i*
  25   set scan(bigEndian) I*
  26   binary scan $blob $scan($::tcl_platform(byteOrder)) r
  27   return $r
  28 }
  29 db func mit mit
  30
  31 #-----------------------------------------------------------------------------
  32 # This block of tests - fts3defer2-1.* - test the interaction of deferred NEAR
  33 # expressions and the snippet, offsets and matchinfo functions.
  34 #
  35 do_execsql_test 1.1.1 {
  36   CREATE VIRTUAL TABLE t1 USING fts4;
  37 }
  38 do_execsql_test 1.1.2 "INSERT INTO t1 VALUES('[string repeat {a } 20000]')"
  39 do_execsql_test 1.1.3 "INSERT INTO t1 VALUES('[string repeat {z } 20000]')"
  40 do_execsql_test 1.1.4 {
  41   INSERT INTO t1 VALUES('a b c d e f a x y');
  42   INSERT INTO t1 VALUES('');
  43   INSERT INTO t1 VALUES('');
  44   INSERT INTO t1 VALUES('');
  45   INSERT INTO t1 VALUES('');
  46   INSERT INTO t1 VALUES('');
  47   INSERT INTO t1(t1) VALUES('optimize');
  48 }
  49 sqlite3_db_config db DEFENSIVE 0
  50 do_execsql_test 1.1.4 {
  51   SELECT count(*) FROM t1_segments WHERE length(block)>10000;
  52   UPDATE t1_segments SET block = zeroblob(length(block)) WHERE length(block)>10000;
  53 } {2}
  54
  55 do_execsql_test 1.2.0 {
  56   SELECT content FROM t1 WHERE t1 MATCH 'f (e a)';
  57 } {{a b c d e f a x y}}
  58
  59 do_execsql_test 1.2.1 {
  60   SELECT content FROM t1 WHERE t1 MATCH 'f (e NEAR/2 a)';
  61 } {{a b c d e f a x y}}
  62
  63
  64 do_execsql_test 1.2.2 {
  65   SELECT snippet(t1, '[', ']'), offsets(t1), mit(matchinfo(t1, 'pcxnal'))
  66   FROM t1 WHERE t1 MATCH 'f (e NEAR/2 a)';
  67 } [list                              \
  68    {a b c d [e] [f] [a] x y}         \
  69    {0 1 8 1 0 0 10 1 0 2 12 1}       \
  70    [list 3 1   1 1 1   1 1 1   1 1 1   8 5001 9]
  71 ]
  72
  73 do_execsql_test 1.2.3 {
  74   SELECT snippet(t1, '[', ']'), offsets(t1), mit(matchinfo(t1, 'pcxnal'))
  75   FROM t1 WHERE t1 MATCH 'f (e NEAR/3 a)';
  76 } [list                                 \
  77    {[a] b c d [e] [f] [a] x y}          \
  78    {0 2 0 1 0 1 8 1 0 0 10 1 0 2 12 1}  \
  79    [list 3 1   1 1 1   1 1 1   2 2 1   8 5001 9]
  80 ]
  81
  82 do_execsql_test 1.3.1 { DROP TABLE t1 }
  83
  84 #-----------------------------------------------------------------------------
  85 # Test cases fts3defer2-2.* focus specifically on the matchinfo function.
  86 #
  87 do_execsql_test 2.1.1 "CREATE VIRTUAL TABLE t2 USING fts4"
  88 do_execsql_test 2.1.2 "INSERT INTO t2 VALUES('[string repeat {a } 10000]')"
  89 do_execsql_test 2.1.3 "INSERT INTO t2 VALUES('b [string repeat {z } 10000]')"
  90 do_execsql_test 2.1.4 [string repeat "INSERT INTO t2 VALUES('x');" 50]
  91 do_execsql_test 2.1.5 {
  92   INSERT INTO t2 VALUES('a b c d e f g z');
  93   INSERT INTO t2 VALUES('a b c d e f g');
  94 }
  95 foreach {tn sql} {
  96   1 {}
  97   2 { INSERT INTO t2(t2) VALUES('optimize') }
  98   3 { UPDATE t2_segments SET block = zeroblob(length(block))
  99       WHERE length(block)>10000;
 100   }
 101 } {
 102   sqlite3_db_config db DEFENSIVE 0
 103   execsql $sql
 104
 105   do_execsql_test 2.2.$tn.1 {
 106     SELECT mit(matchinfo(t2, 'pcxnal')) FROM t2 WHERE t2 MATCH 'a b';
 107   } [list                                          \
 108     [list 2 1  1 54 54  1 3 3  54 372 8]        \
 109     [list 2 1  1 54 54  1 3 3  54 372 7]        \
 110   ]
 111
 112   do_execsql_test 2.2.$tn.2 {
 113     SELECT mit(matchinfo(t2, 'x')) FROM t2 WHERE t2 MATCH 'g z';
 114   } [list                                       \
 115     [list 1 2 2  1 54 54]                       \
 116   ]
 117
 118   set sqlite_fts3_enable_parentheses 1
 119   do_execsql_test 2.2.$tn.3 {
 120     SELECT mit(matchinfo(t2, 'x')) FROM t2 WHERE t2 MATCH 'g OR (g z)';
 121   } [list                                       \
 122     [list 1 2 2  1 2 2   1 54 54]               \
 123     [list 1 2 2  1 2 2   0 54 54]               \
 124   ]
 125   set sqlite_fts3_enable_parentheses 0
 126
 127   do_execsql_test 2.2.$tn.4 {
 128     SELECT mit(matchinfo(t2, 'x')) FROM t2 WHERE t2 MATCH 'e "g z"';
 129   } [list                                       \
 130     [list 1 2 2  1 2 2]                         \
 131   ]
 132 }
 133
 134 do_execsql_test 2.3.1 {
 135   CREATE VIRTUAL TABLE t3 USING fts4;
 136   INSERT INTO t3 VALUES('a b c d e f');
 137   INSERT INTO t3 VALUES('x b c d e f');
 138   INSERT INTO t3 VALUES('d e f a b c');
 139   INSERT INTO t3 VALUES('b c d e f');
 140   INSERT INTO t3 VALUES('');
 141   INSERT INTO t3 VALUES('');
 142   INSERT INTO t3 VALUES('');
 143   INSERT INTO t3 VALUES('');
 144   INSERT INTO t3 VALUES('');
 145   INSERT INTO t3 VALUES('');
 146 }
 147 do_execsql_test 2.3.2 "
 148   INSERT INTO t3 VALUES('f e d c b [string repeat {a } 10000]')
 149 "
 150 foreach {tn sql} {
 151   1 {}
 152   2 { INSERT INTO t3(t3) VALUES('optimize') }
 153   3 { UPDATE t3_segments SET block = zeroblob(length(block))
 154       WHERE length(block)>10000;
 155   }
 156 } {
 157   sqlite3_db_config db DEFENSIVE 0
 158   execsql $sql
 159   do_execsql_test 2.4.$tn {
 160     SELECT docid, mit(matchinfo(t3, 'pcxnal')) FROM t3 WHERE t3 MATCH '"a b c"';
 161   } {1 {1 1 1 4 4 11 912 6} 3 {1 1 1 4 4 11 912 6}}
 162 }
 163
 164
 165 finish_test