163331b1aSdan# 2017-07-15 263331b1aSdan# 363331b1aSdan# The author disclaims copyright to this source code. In place of 463331b1aSdan# a legal notice, here is a blessing: 563331b1aSdan# 663331b1aSdan# May you do good and not evil. 763331b1aSdan# May you find forgiveness for yourself and forgive others. 863331b1aSdan# May you share freely, never taking more than you give. 963331b1aSdan# 1063331b1aSdan#*********************************************************************** 1163331b1aSdan# This file implements regression tests for SQLite library. The 1263331b1aSdan# focus of this file is the "swarmvtab" extension 1363331b1aSdan# 1463331b1aSdan 1563331b1aSdanset testdir [file dirname $argv0] 1663331b1aSdansource $testdir/tester.tcl 1763331b1aSdanset testprefix swarmvtab 1863331b1aSdan 1963331b1aSdanifcapable !vtab { 2063331b1aSdan finish_test 2163331b1aSdan return 2263331b1aSdan} 2363331b1aSdan 2463331b1aSdanload_static_extension db unionvtab 2563331b1aSdan 26*a64d1fbcSdanset nFile $sqlite_open_file_count 27*a64d1fbcSdan 2863331b1aSdando_execsql_test 1.0 { 2963331b1aSdan CREATE TABLE t0(a INTEGER PRIMARY KEY, b TEXT); 3063331b1aSdan WITH s(i) AS ( SELECT 1 UNION ALL SELECT i+1 FROM s WHERE i<400) 3163331b1aSdan INSERT INTO t0 SELECT i, hex(randomblob(50)) FROM s; 3263331b1aSdan 3363331b1aSdan CREATE TABLE dir(f, t, imin, imax); 3463331b1aSdan} 3563331b1aSdan 3663331b1aSdando_test 1.1 { 3763331b1aSdan for {set i 0} {$i < 40} {incr i} { 3863331b1aSdan set iMin [expr $i*10 + 1] 3963331b1aSdan set iMax [expr $iMin+9] 4063331b1aSdan 4163331b1aSdan forcedelete "test.db$i" 4263331b1aSdan execsql [subst { 4363331b1aSdan ATTACH 'test.db$i' AS aux; 4463331b1aSdan CREATE TABLE aux.t$i (a INTEGER PRIMARY KEY, b TEXT); 4563331b1aSdan INSERT INTO aux.t$i SELECT * FROM t0 WHERE a BETWEEN $iMin AND $iMax; 4663331b1aSdan DETACH aux; 4763331b1aSdan INSERT INTO dir VALUES('test.db$i', 't$i', $iMin, $iMax); 4863331b1aSdan }] 4963331b1aSdan } 5063331b1aSdan 5163331b1aSdan execsql { 5263331b1aSdan CREATE VIRTUAL TABLE temp.s1 USING swarmvtab('SELECT * FROM dir'); 5363331b1aSdan } 54*a64d1fbcSdan} {} 5563331b1aSdan 5663331b1aSdando_execsql_test 1.2 { 5763331b1aSdan DROP TABLE s1; 58*a64d1fbcSdan} {} 5963331b1aSdan 6063331b1aSdando_execsql_test 1.3 { 6163331b1aSdan CREATE VIRTUAL TABLE temp.s1 USING swarmvtab('SELECT * FROM dir'); 6263331b1aSdan SELECT count(*) FROM s1 WHERE rowid<50; 6363331b1aSdan} {49} 6463331b1aSdan 6563331b1aSdanproc do_compare_test {tn where} { 6663331b1aSdan set sql [subst { 6763331b1aSdan SELECT ( 6863331b1aSdan SELECT group_concat(a || ',' || b, ',') FROM t0 WHERE $where 69*a64d1fbcSdan ) IS ( 7063331b1aSdan SELECT group_concat(a || ',' || b, ',') FROM s1 WHERE $where 7163331b1aSdan ) 7263331b1aSdan }] 7363331b1aSdan 7463331b1aSdan uplevel [list do_execsql_test $tn $sql 1] 7563331b1aSdan} 7663331b1aSdan 7763331b1aSdando_compare_test 1.4 "rowid = 55" 7863331b1aSdando_compare_test 1.5 "rowid BETWEEN 20 AND 100" 7963331b1aSdando_compare_test 1.6 "rowid > 350" 8063331b1aSdando_compare_test 1.7 "rowid >= 350" 81*a64d1fbcSdando_compare_test 1.8 "rowid >= 200" 82*a64d1fbcSdando_compare_test 1.9 "1" 83*a64d1fbcSdando_compare_test 1.10 "rowid = 700" 84*a64d1fbcSdando_compare_test 1.11 "rowid = -1" 85*a64d1fbcSdando_compare_test 1.12 "rowid = 0" 8663331b1aSdan 87*a64d1fbcSdando_test 1.x { 88*a64d1fbcSdan set sqlite_open_file_count 89*a64d1fbcSdan} [expr $nFile+9] 90*a64d1fbcSdan 91*a64d1fbcSdando_test 1.y { db close } {} 9263331b1aSdan 9363331b1aSdan 9463331b1aSdanfinish_test 9563331b1aSdan 96