gitlab.com/CoiaPrant/sqlite3@v1.19.1/testdata/tcl/alterqf.test (about)

     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 group_concat("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 group_concat("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