AryaWu/sqlite

1# 2021 March 162#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# This file implements regression tests for SQLite library. This12# script focuses on testing internal function sqlite_rename_quotefix().13#14 15 16set testdir [file dirname $argv0]17source $testdir/tester.tcl18set testprefix alterqf19 20# If SQLITE_OMIT_ALTERTABLE is defined, omit this file.21ifcapable !altertable {22  finish_test23  return24}25 26 27sqlite3_test_control SQLITE_TESTCTRL_INTERNAL_FUNCTIONS db28sqlite3_db_config db SQLITE_DBCONFIG_DQS_DDL 129sqlite3_db_config db SQLITE_DBCONFIG_DQS_DML 130 31do_execsql_test 1.0 {32  CREATE TABLE t1(a, b, c);33}34 35foreach {tn before after} {36  1 {CREATE VIEW v1 AS SELECT "a", "b", "notacolumn!", "c" FROM t1}37    {CREATE VIEW v1 AS SELECT "a", "b", 'notacolumn!', "c" FROM t1}38 39  2 {CREATE VIEW v1 AS SELECT "a", "b", "not'a'column!", "c" FROM t1}40    {CREATE VIEW v1 AS SELECT "a", "b", 'not''a''column!', "c" FROM t1}41 42  3 {CREATE VIEW v1 AS SELECT "a", "b", "not""a""column!", "c" FROM t1}43    {CREATE VIEW v1 AS SELECT "a", "b", 'not"a"column!', "c" FROM t1}44 45  4 {CREATE VIEW v1 AS SELECT "val", count("b") FROM t1 GROUP BY "abc"}46    {CREATE VIEW v1 AS SELECT 'val', count("b") FROM t1 GROUP BY 'abc'}47 48  5 {CREATE TABLE xyz(a CHECK (a!="str"), b AS (a||"str"))}49    {CREATE TABLE xyz(a CHECK (a!='str'), b AS (a||'str'))}50 51  6 {CREATE INDEX i1 ON t1(a || "str", "b", "val")}52    {CREATE INDEX i1 ON t1(a || 'str', "b", 'val')}53 54  7 {CREATE TRIGGER tr AFTER INSERT ON t1 BEGIN SELECT "abcd"; END}55    {CREATE TRIGGER tr AFTER INSERT ON t1 BEGIN SELECT 'abcd'; END}56 57  8 {CREATE VIEW v1 AS SELECT "string"'alias' FROM t1}58    {CREATE VIEW v1 AS SELECT 'string' 'alias' FROM t1}59 60  9 {CREATE INDEX i1 ON t1(a) WHERE "b"="bb"}61    {CREATE INDEX i1 ON t1(a) WHERE "b"='bb'}62 63 10 {CREATE TABLE t2(abc, xyz CHECK (xyz != "123"))} 64    {CREATE TABLE t2(abc, xyz CHECK (xyz != '123'))} 65 66 11 {CREATE TRIGGER ott AFTER UPDATE ON t1 BEGIN 67      SELECT max("str", new."a") FROM t1 68          WHERE string_agg("b", ",") OVER (ORDER BY c||"str");69      UPDATE t1 SET c= b + "str";70      DELETE FROM t1 WHERE EXISTS (71        SELECT 1 FROM t1 AS o WHERE o."a" = "o.a" AND t1.b IN("t1.b")72      );73    END;74 } {CREATE TRIGGER ott AFTER UPDATE ON t1 BEGIN 75      SELECT max('str', new."a") FROM t1 76          WHERE string_agg("b", ',') OVER (ORDER BY c||'str');77      UPDATE t1 SET c= b + 'str';78      DELETE FROM t1 WHERE EXISTS (79        SELECT 1 FROM t1 AS o WHERE o."a" = 'o.a' AND t1.b IN('t1.b')80      );81    END;82 }83 84} {85  do_execsql_test 1.$tn {86    SELECT sqlite_rename_quotefix('main', $before)87  } [list $after]88}89 90#-------------------------------------------------------------------------91reset_db92sqlite3_db_config db SQLITE_DBCONFIG_DQS_DDL 193sqlite3_db_config db SQLITE_DBCONFIG_DQS_DML 194do_execsql_test 2.0 {95  CREATE TABLE x1(96      one, two, three, PRIMARY KEY(one), 97      CHECK (three!="xyz"), CHECK (two!="one")98  ) WITHOUT ROWID;99  CREATE INDEX x1i ON x1(one+"two"+"four") WHERE "five";100  CREATE TEMP TRIGGER AFTER INSERT ON x1 BEGIN101    UPDATE x1 SET two=new.three || "new" WHERE one=new.one||"";102  END;103}104 105do_execsql_test 2.1 {106  ALTER TABLE x1 RENAME two TO 'four';107  SELECT sql FROM sqlite_schema;108  SELECT sql FROM sqlite_temp_schema;109} {{CREATE TABLE x1(110      one, "four", three, PRIMARY KEY(one), 111      CHECK (three!='xyz'), CHECK ("four"!="one")112  ) WITHOUT ROWID}113  {CREATE INDEX x1i ON x1(one+"four"+'four') WHERE 'five'}114  {CREATE TRIGGER AFTER INSERT ON x1 BEGIN115    UPDATE x1 SET "four"=new.three || 'new' WHERE one=new.one||'';116  END}117}118 119 120finish_test121