modernc.org/cc@v1.0.1/v2/testdata/_sqlite/ext/fts5/test/fts5bigpl.test (about) 1 # 2015 April 21 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 # This test is focused on really large position lists. Those that require 13 # 4 or 5 byte position-list size varints. Because of the amount of memory 14 # required, these tests only run on 64-bit platforms. 15 # 16 17 source [file join [file dirname [info script]] fts5_common.tcl] 18 set testprefix fts5bigpl 19 20 # If SQLITE_ENABLE_FTS5 is defined, omit this file. 21 ifcapable !fts5 { 22 finish_test 23 return 24 } 25 26 if { $tcl_platform(wordSize)<8 } { 27 finish_test 28 return 29 } 30 31 do_execsql_test 1.0 { CREATE VIRTUAL TABLE t1 USING fts5(x) } 32 33 do_test 1.1 { 34 foreach t {a b c d e f g h i j} { 35 set doc [string repeat "$t " 1200000] 36 execsql { INSERT INTO t1 VALUES($doc) } 37 } 38 execsql { INSERT INTO t1(t1) VALUES('integrity-check') } 39 } {} 40 41 do_test 1.2 { 42 execsql { DELETE FROM t1 } 43 foreach t {"a b" "b a" "c d" "d c"} { 44 set doc [string repeat "$t " 600000] 45 execsql { INSERT INTO t1 VALUES($doc) } 46 } 47 execsql { INSERT INTO t1(t1) VALUES('integrity-check') } 48 } {} 49 50 51 # 5-byte varint. This test takes 30 seconds or so on a 2014 workstation. 52 # The generated database is roughly 635MiB. 53 # 54 do_test 2.1...slow { 55 execsql { DELETE FROM t1 } 56 foreach t {a} { 57 set doc [string repeat "$t " 150000000] 58 execsql { INSERT INTO t1 VALUES($doc) } 59 } 60 execsql { INSERT INTO t1(t1) VALUES('integrity-check') } 61 } {} 62 63 finish_test