fde3043200
FossilOrigin-Name: 13fbde28173332522a7ad307c1aad2b83c9aa1fe737583afa2b29f6da4de6370
121 lines
3.8 KiB
Plaintext
121 lines
3.8 KiB
Plaintext
# 2021 March 16
|
|
#
|
|
# The author disclaims copyright to this source code. In place of
|
|
# a legal notice, here is a blessing:
|
|
#
|
|
# May you do good and not evil.
|
|
# May you find forgiveness for yourself and forgive others.
|
|
# May you share freely, never taking more than you give.
|
|
#
|
|
#***********************************************************************
|
|
# This file implements regression tests for SQLite library. This
|
|
# script focuses on testing internal function sqlite_rename_quotefix().
|
|
#
|
|
|
|
|
|
set testdir [file dirname $argv0]
|
|
source $testdir/tester.tcl
|
|
set testprefix alterqf
|
|
|
|
# If SQLITE_OMIT_ALTERTABLE is defined, omit this file.
|
|
ifcapable !altertable {
|
|
finish_test
|
|
return
|
|
}
|
|
|
|
|
|
sqlite3_test_control SQLITE_TESTCTRL_INTERNAL_FUNCTIONS db
|
|
sqlite3_db_config db SQLITE_DBCONFIG_DQS_DDL 1
|
|
sqlite3_db_config db SQLITE_DBCONFIG_DQS_DML 1
|
|
|
|
do_execsql_test 1.0 {
|
|
CREATE TABLE t1(a, b, c);
|
|
}
|
|
|
|
foreach {tn before after} {
|
|
1 {CREATE VIEW v1 AS SELECT "a", "b", "notacolumn!", "c" FROM t1}
|
|
{CREATE VIEW v1 AS SELECT "a", "b", 'notacolumn!', "c" FROM t1}
|
|
|
|
2 {CREATE VIEW v1 AS SELECT "a", "b", "not'a'column!", "c" FROM t1}
|
|
{CREATE VIEW v1 AS SELECT "a", "b", 'not''a''column!', "c" FROM t1}
|
|
|
|
3 {CREATE VIEW v1 AS SELECT "a", "b", "not""a""column!", "c" FROM t1}
|
|
{CREATE VIEW v1 AS SELECT "a", "b", 'not"a"column!', "c" FROM t1}
|
|
|
|
4 {CREATE VIEW v1 AS SELECT "val", count("b") FROM t1 GROUP BY "abc"}
|
|
{CREATE VIEW v1 AS SELECT 'val', count("b") FROM t1 GROUP BY 'abc'}
|
|
|
|
5 {CREATE TABLE xyz(a CHECK (a!="str"), b AS (a||"str"))}
|
|
{CREATE TABLE xyz(a CHECK (a!='str'), b AS (a||'str'))}
|
|
|
|
6 {CREATE INDEX i1 ON t1(a || "str", "b", "val")}
|
|
{CREATE INDEX i1 ON t1(a || 'str', "b", 'val')}
|
|
|
|
7 {CREATE TRIGGER tr AFTER INSERT ON t1 BEGIN SELECT "abcd"; END}
|
|
{CREATE TRIGGER tr AFTER INSERT ON t1 BEGIN SELECT 'abcd'; END}
|
|
|
|
8 {CREATE VIEW v1 AS SELECT "string"'alias' FROM t1}
|
|
{CREATE VIEW v1 AS SELECT 'string' 'alias' FROM t1}
|
|
|
|
9 {CREATE INDEX i1 ON t1(a) WHERE "b"="bb"}
|
|
{CREATE INDEX i1 ON t1(a) WHERE "b"='bb'}
|
|
|
|
10 {CREATE TABLE t2(abc, xyz CHECK (xyz != "123"))}
|
|
{CREATE TABLE t2(abc, xyz CHECK (xyz != '123'))}
|
|
|
|
11 {CREATE TRIGGER ott AFTER UPDATE ON t1 BEGIN
|
|
SELECT max("str", new."a") FROM t1
|
|
WHERE group_concat("b", ",") OVER (ORDER BY c||"str");
|
|
UPDATE t1 SET c= b + "str";
|
|
DELETE FROM t1 WHERE EXISTS (
|
|
SELECT 1 FROM t1 AS o WHERE o."a" = "o.a" AND t1.b IN("t1.b")
|
|
);
|
|
END;
|
|
} {CREATE TRIGGER ott AFTER UPDATE ON t1 BEGIN
|
|
SELECT max('str', new."a") FROM t1
|
|
WHERE group_concat("b", ',') OVER (ORDER BY c||'str');
|
|
UPDATE t1 SET c= b + 'str';
|
|
DELETE FROM t1 WHERE EXISTS (
|
|
SELECT 1 FROM t1 AS o WHERE o."a" = 'o.a' AND t1.b IN('t1.b')
|
|
);
|
|
END;
|
|
}
|
|
|
|
} {
|
|
do_execsql_test 1.$tn {
|
|
SELECT sqlite_rename_quotefix('main', $before)
|
|
} [list $after]
|
|
}
|
|
|
|
#-------------------------------------------------------------------------
|
|
reset_db
|
|
sqlite3_db_config db SQLITE_DBCONFIG_DQS_DDL 1
|
|
sqlite3_db_config db SQLITE_DBCONFIG_DQS_DML 1
|
|
do_execsql_test 2.0 {
|
|
CREATE TABLE x1(
|
|
one, two, three, PRIMARY KEY(one),
|
|
CHECK (three!="xyz"), CHECK (two!="one")
|
|
) WITHOUT ROWID;
|
|
CREATE INDEX x1i ON x1(one+"two"+"four") WHERE "five";
|
|
CREATE TEMP TRIGGER AFTER INSERT ON x1 BEGIN
|
|
UPDATE x1 SET two=new.three || "new" WHERE one=new.one||"";
|
|
END;
|
|
}
|
|
|
|
do_execsql_test 2.1 {
|
|
ALTER TABLE x1 RENAME two TO 'four';
|
|
SELECT sql FROM sqlite_schema;
|
|
SELECT sql FROM sqlite_temp_schema;
|
|
} {{CREATE TABLE x1(
|
|
one, "four", three, PRIMARY KEY(one),
|
|
CHECK (three!='xyz'), CHECK ("four"!="one")
|
|
) WITHOUT ROWID}
|
|
{CREATE INDEX x1i ON x1(one+"four"+'four') WHERE 'five'}
|
|
{CREATE TRIGGER AFTER INSERT ON x1 BEGIN
|
|
UPDATE x1 SET "four"=new.three || 'new' WHERE one=new.one||'';
|
|
END}
|
|
}
|
|
|
|
|
|
finish_test
|