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
17 set testprefix fts3rank
19 # If SQLITE_ENABLE_FTS3 is defined, omit this file.
25 install_fts3_rank_function db
27 CREATE VIRTUAL TABLE t1 USING fts3(a, b);
28 INSERT INTO t1 VALUES('one two', 'one');
29 INSERT INTO t1 VALUES('one two', 'three');
30 INSERT INTO t1 VALUES('one two', 'two');
34 SELECT * FROM t1 WHERE t1 MATCH 'one'
35 ORDER BY rank(matchinfo(t1), 1.0, 1.0) DESC, rowid
43 SELECT * FROM t1 WHERE t1 MATCH 'two'
44 ORDER BY rank(matchinfo(t1), 1.0, 1.0) DESC, rowid
51 do_catchsql_test 1.3 {
52 SELECT * FROM t1 ORDER BY rank(matchinfo(t1), 1.0, 1.0) DESC, rowid
53 } {1 {invalid matchinfo blob passed to function rank()}}
55 do_catchsql_test 1.4 {
56 SELECT * FROM t1 ORDER BY rank(x'0000000000000000') DESC, rowid
57 } {0 {{one two} one {one two} three {one two} two}}
59 if {$tcl_platform(byteOrder)=="littleEndian"} {
60 do_catchsql_test 1.5le {
61 SELECT * FROM t1 ORDER BY rank(x'0100000001000000') DESC, rowid
62 } {1 {invalid matchinfo blob passed to function rank()}}
64 do_catchsql_test 1.5be {
65 SELECT * FROM t1 ORDER BY rank(x'0000000100000001') DESC, rowid
66 } {1 {invalid matchinfo blob passed to function rank()}}