| OLD | NEW |
| (Empty) |
| 1 # 2007 January 17 | |
| 2 # | |
| 3 # The author disclaims copyright to this source code. | |
| 4 # | |
| 5 #************************************************************************* | |
| 6 # This file implements regression tests for SQLite fts1 library. The | |
| 7 # focus here is testing handling of UPDATE when using UTF-16-encoded | |
| 8 # databases. | |
| 9 # | |
| 10 # $Id: fts1i.test,v 1.2 2007/01/24 03:43:20 drh Exp $ | |
| 11 # | |
| 12 | |
| 13 set testdir [file dirname $argv0] | |
| 14 source $testdir/tester.tcl | |
| 15 | |
| 16 # If SQLITE_ENABLE_FTS1 is defined, omit this file. | |
| 17 ifcapable !fts1 { | |
| 18 finish_test | |
| 19 return | |
| 20 } | |
| 21 | |
| 22 | |
| 23 # Return the UTF-16 representation of the supplied UTF-8 string $str. | |
| 24 # If $nt is true, append two 0x00 bytes as a nul terminator. | |
| 25 # NOTE(shess) Copied from capi3.test. | |
| 26 proc utf16 {str {nt 1}} { | |
| 27 set r [encoding convertto unicode $str] | |
| 28 if {$nt} { | |
| 29 append r "\x00\x00" | |
| 30 } | |
| 31 return $r | |
| 32 } | |
| 33 | |
| 34 db eval { | |
| 35 PRAGMA encoding = "UTF-16le"; | |
| 36 CREATE VIRTUAL TABLE t1 USING fts1(content); | |
| 37 } | |
| 38 | |
| 39 do_test fts1i-1.0 { | |
| 40 execsql {PRAGMA encoding} | |
| 41 } {UTF-16le} | |
| 42 | |
| 43 do_test fts1i-1.1 { | |
| 44 execsql {INSERT INTO t1 (rowid, content) VALUES(1, 'one')} | |
| 45 execsql {SELECT content FROM t1 WHERE rowid = 1} | |
| 46 } {one} | |
| 47 | |
| 48 do_test fts1i-1.2 { | |
| 49 set sql "INSERT INTO t1 (rowid, content) VALUES(2, 'two')" | |
| 50 set STMT [sqlite3_prepare $DB $sql -1 TAIL] | |
| 51 sqlite3_step $STMT | |
| 52 sqlite3_finalize $STMT | |
| 53 execsql {SELECT content FROM t1 WHERE rowid = 2} | |
| 54 } {two} | |
| 55 | |
| 56 do_test fts1i-1.3 { | |
| 57 set sql "INSERT INTO t1 (rowid, content) VALUES(3, 'three')" | |
| 58 set STMT [sqlite3_prepare $DB $sql -1 TAIL] | |
| 59 sqlite3_step $STMT | |
| 60 sqlite3_finalize $STMT | |
| 61 set sql "UPDATE t1 SET content = 'trois' WHERE rowid = 3" | |
| 62 set STMT [sqlite3_prepare $DB $sql -1 TAIL] | |
| 63 sqlite3_step $STMT | |
| 64 sqlite3_finalize $STMT | |
| 65 execsql {SELECT content FROM t1 WHERE rowid = 3} | |
| 66 } {trois} | |
| 67 | |
| 68 do_test fts1i-1.4 { | |
| 69 set sql16 [utf16 {INSERT INTO t1 (rowid, content) VALUES(4, 'four')}] | |
| 70 set STMT [sqlite3_prepare16 $DB $sql16 -1 TAIL] | |
| 71 sqlite3_step $STMT | |
| 72 sqlite3_finalize $STMT | |
| 73 execsql {SELECT content FROM t1 WHERE rowid = 4} | |
| 74 } {four} | |
| 75 | |
| 76 do_test fts1i-1.5 { | |
| 77 set sql16 [utf16 {INSERT INTO t1 (rowid, content) VALUES(5, 'five')}] | |
| 78 set STMT [sqlite3_prepare16 $DB $sql16 -1 TAIL] | |
| 79 sqlite3_step $STMT | |
| 80 sqlite3_finalize $STMT | |
| 81 set sql "UPDATE t1 SET content = 'cinq' WHERE rowid = 5" | |
| 82 set STMT [sqlite3_prepare $DB $sql -1 TAIL] | |
| 83 sqlite3_step $STMT | |
| 84 sqlite3_finalize $STMT | |
| 85 execsql {SELECT content FROM t1 WHERE rowid = 5} | |
| 86 } {cinq} | |
| 87 | |
| 88 finish_test | |
| OLD | NEW |