1# 2014 May 7 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# This file implements regression tests for SQLite library. The 12# focus of this script is testing the FTS3 module. 13# 14 15set testdir [file dirname $argv0] 16source $testdir/tester.tcl 17set testprefix fts3expr4 18 19# If SQLITE_ENABLE_FTS3 is defined, omit this file. 20ifcapable !fts3||!icu { 21 finish_test 22 return 23} 24 25set sqlite_fts3_enable_parentheses 1 26 27proc test_fts3expr {tokenizer expr} { 28 db one {SELECT fts3_exprtest($tokenizer, $expr, 'a', 'b', 'c')} 29} 30 31proc do_icu_expr_test {tn expr res} { 32 uplevel [list do_test $tn [list test_fts3expr icu $expr] [list {*}$res]] 33} 34 35proc do_simple_expr_test {tn expr res} { 36 uplevel [list do_test $tn [list test_fts3expr simple $expr] [list {*}$res]] 37} 38 39#------------------------------------------------------------------------- 40# 41do_icu_expr_test 1.1 "abcd" {PHRASE 3 0 abcd} 42do_icu_expr_test 1.2 " tag " {PHRASE 3 0 tag} 43do_icu_expr_test 1.3 {"x y z"} {PHRASE 3 0 x y z} 44do_icu_expr_test 1.4 {x OR y} {OR {PHRASE 3 0 x} {PHRASE 3 0 y}} 45do_icu_expr_test 1.5 {(x OR y)} {OR {PHRASE 3 0 x} {PHRASE 3 0 y}} 46do_icu_expr_test 1.6 { "(x OR y)" } {PHRASE 3 0 ( x or y )} 47 48# In "col:word", if "col" is not the name of a column, the entire thing 49# is passed to the tokenizer. 50# 51do_icu_expr_test 1.7 {a:word} {PHRASE 0 0 word} 52do_icu_expr_test 1.8 {d:word} {PHRASE 3 0 d:word} 53 54set sqlite_fts3_enable_parentheses 0 55 56do_icu_expr_test 2.1 { 57 f (e NEAR/2 a) 58} {AND {AND {AND {PHRASE 3 0 f} {PHRASE 3 0 (}} {NEAR/2 {PHRASE 3 0 e} {PHRASE 3 0 a}}} {PHRASE 3 0 )}} 59 60#------------------------------------------------------------------------- 61# 62do_simple_expr_test 3.1 {*lOl* *h4h*} { 63 AND {PHRASE 3 0 lol+} {PHRASE 3 0 h4h+} 64} 65 66do_icu_expr_test 3.2 {*lOl* *h4h*} { 67 AND {AND {AND {PHRASE 3 0 *} {PHRASE 3 0 lol+}} {PHRASE 3 0 *}} {PHRASE 3 0 h4h+} 68} 69 70do_simple_expr_test 3.3 { * } { } 71do_simple_expr_test 3.4 { *a } { PHRASE 3 0 a } 72do_simple_expr_test 3.5 { a*b } { AND {PHRASE 3 0 a+} {PHRASE 3 0 b} } 73do_simple_expr_test 3.6 { *a*b } { AND {PHRASE 3 0 a+} {PHRASE 3 0 b} } 74do_simple_expr_test 3.7 { *"abc" } { PHRASE 3 0 abc } 75do_simple_expr_test 3.8 { "abc"* } { PHRASE 3 0 abc } 76do_simple_expr_test 3.8 { "ab*c" } { PHRASE 3 0 ab+ c } 77 78do_icu_expr_test 3.9 { "ab*c" } { PHRASE 3 0 ab+ * c } 79do_icu_expr_test 3.10 { ab*c } { AND {PHRASE 3 0 ab+} {PHRASE 3 0 c}} 80 81finish_test 82