test/alterqf.test

   1 # 2021 March 16
   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 # This file implements regression tests for SQLite library. This
  12 # script focuses on testing internal function sqlite_rename_quotefix().
  13 #
  14
  15
  16 set testdir [file dirname $argv0]
  17 source $testdir/tester.tcl
  18 set testprefix alterqf
  19
  20 # If SQLITE_OMIT_ALTERTABLE is defined, omit this file.
  21 ifcapable !altertable {
  22   finish_test
  23   return
  24 }
  25
  26
  27 sqlite3_test_control SQLITE_TESTCTRL_INTERNAL_FUNCTIONS db
  28 sqlite3_db_config db SQLITE_DBCONFIG_DQS_DDL 1
  29 sqlite3_db_config db SQLITE_DBCONFIG_DQS_DML 1
  30
  31 do_execsql_test 1.0 {
  32   CREATE TABLE t1(a, b, c);
  33 }
  34
  35 foreach {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 #-------------------------------------------------------------------------
  91 reset_db
  92 sqlite3_db_config db SQLITE_DBCONFIG_DQS_DDL 1
  93 sqlite3_db_config db SQLITE_DBCONFIG_DQS_DML 1
  94 do_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 BEGIN
 101     UPDATE x1 SET two=new.three || "new" WHERE one=new.one||"";
 102   END;
 103 }
 104
 105 do_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 BEGIN
 115     UPDATE x1 SET "four"=new.three || 'new' WHERE one=new.one||'';
 116   END}
 117 }
 118
 119
 120 finish_test