CoolFace
Modelpublic

AryaWu/sqlite

sourceHugging Faceupdated 9mo agoView on Hugging Face
0likes
sqldiff1.test89 linesDownload Raw Back to test
1# 2015-05-112#3# The author disclaims copyright to this source code.  In place of4# 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# Quick tests for the sqldiff tool13#14set testdir [file dirname $argv0]15source $testdir/tester.tcl16 17set PROG [test_find_sqldiff]18 19db close20forcedelete test.db test2.db21sqlite3 db test.db22 23do_test sqldiff-1.0 {24  db eval {25    CREATE TABLE t1(a INTEGER PRIMARY KEY, b);26    CREATE TABLE t2(a INT PRIMARY KEY, b) WITHOUT ROWID;27    WITH RECURSIVE c(x) AS (VALUES(1) UNION ALL SELECT x+1 FROM c WHERE x<100)28    INSERT INTO t1(a,b) SELECT x, printf('abc-%d-xyz',x) FROM c;29    INSERT INTO t2(a,b) SELECT a, b FROM t1;30  }31  db backup test2.db32  db eval {33    ATTACH 'test2.db' AS x2;34    DELETE FROM x2.t1 WHERE a=49;35    DELETE FROM x2.t2 WHERE a=48;36    INSERT INTO x2.t1(a,b) VALUES(1234,'hello');37    INSERT INTO x2.t2(a,b) VALUES(50.5,'xyzzy');38    INSERT INTO x2.t2(a,b) VALUES(51.5,'');39    INSERT INTO x2.t2(a,b) VALUES(52.5,''||X'0d0a');40    INSERT INTO x2.t2(a,b) VALUES(53.5,'one'||X'0a0d');41    INSERT INTO x2.t2(a,b) VALUES(54.5,'one'||X'0a'||'two');42    CREATE TABLE x2.t3(a,b,c);43    INSERT INTO x2.t3 VALUES(111,222,333);44    CREATE TABLE main.t4(x,y,z);45    INSERT INTO t4 SELECT * FROM t3;46  }47  set line "exec $PROG test.db test2.db"48  unset -nocomplain ::MSG49  catch {eval $line} ::MSG50} {0}51do_test sqldiff-1.1 {52  set ::MSG53} {DELETE FROM t1 WHERE a=49;54INSERT INTO t1(a,b) VALUES(1234,'hello');55DELETE FROM t2 WHERE a=48;56INSERT INTO t2(a,b) VALUES(50.5,'xyzzy');57INSERT INTO t2(a,b) VALUES(51.5,'');58INSERT INTO t2(a,b) VALUES(52.5,''||X'0d0a');59INSERT INTO t2(a,b) VALUES(53.5,'one'||X'0a0d');60INSERT INTO t2(a,b) VALUES(54.5,'one'||X'0a'61||'two');62CREATE TABLE t3(a,b,c);63INSERT INTO t3(rowid,a,b,c) VALUES(1,111,222,333);64DROP TABLE t4;}65 66db close67forcedelete test.db test2.db68sqlite3 db test.db69 70do_test sqldiff-2.0 {71  db eval {72    CREATE TABLE t1(a INTEGER PRIMARY KEY);73  }74  db close75  sqlite3 db test2.db76  db eval {77    CREATE TABLE t1(a INTEGER PRIMARY KEY, b);78  }79  db close80  set line "exec $PROG test.db test2.db"81  unset -nocomplain ::MSG82  catch {eval $line} ::MSG83} {0}84do_test sqldiff-2.1 {85  set ::MSG86} {ALTER TABLE t1 ADD COLUMN b;}87 88finish_test89