/trunk/test/schema2.test |
@@ -0,0 +1,340 @@ |
# 2006 November 08 |
# |
# 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 file tests the various conditions under which an SQLITE_SCHEMA |
# error should be returned. This is a copy of schema.test that |
# has been altered to use sqlite3_prepare_v2 instead of sqlite3_prepare |
# |
# $Id: schema2.test,v 1.4 2009/02/04 17:40:58 drh Exp $ |
|
#--------------------------------------------------------------------- |
# When any of the following types of SQL statements or actions are |
# executed, all pre-compiled statements are invalidated. An attempt |
# to execute an invalidated statement always returns SQLITE_SCHEMA. |
# |
# CREATE/DROP TABLE...................................schema2-1.* |
# CREATE/DROP VIEW....................................schema2-2.* |
# CREATE/DROP TRIGGER.................................schema2-3.* |
# CREATE/DROP INDEX...................................schema2-4.* |
# DETACH..............................................schema2-5.* |
# Deleting a user-function............................schema2-6.* |
# Deleting a collation sequence.......................schema2-7.* |
# Setting or changing the authorization function......schema2-8.* |
# |
# Test cases schema2-9.* and schema2-10.* test some specific bugs |
# that came up during development. |
# |
# Test cases schema2-11.* test that it is impossible to delete or |
# change a collation sequence or user-function while SQL statements |
# are executing. Adding new collations or functions is allowed. |
# |
|
set testdir [file dirname $argv0] |
source $testdir/tester.tcl |
|
do_test schema2-1.1 { |
set ::STMT [sqlite3_prepare_v2 $::DB {SELECT * FROM sqlite_master} -1 TAIL] |
execsql { |
CREATE TABLE abc(a, b, c); |
} |
sqlite3_step $::STMT |
} {SQLITE_ROW} |
do_test schema2-1.2 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
do_test schema2-1.3 { |
set ::STMT [sqlite3_prepare_v2 $::DB {SELECT * FROM sqlite_master} -1 TAIL] |
execsql { |
DROP TABLE abc; |
} |
sqlite3_step $::STMT |
} {SQLITE_DONE} |
do_test schema2-1.4 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
|
|
ifcapable view { |
do_test schema2-2.1 { |
set ::STMT [sqlite3_prepare_v2 $::DB {SELECT * FROM sqlite_master} -1 TAIL] |
execsql { |
CREATE VIEW v1 AS SELECT * FROM sqlite_master; |
} |
sqlite3_step $::STMT |
} {SQLITE_ROW} |
do_test schema2-2.2 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
do_test schema2-2.3 { |
set ::STMT [sqlite3_prepare_v2 $::DB {SELECT * FROM sqlite_master} -1 TAIL] |
execsql { |
DROP VIEW v1; |
} |
sqlite3_step $::STMT |
} {SQLITE_DONE} |
do_test schema2-2.4 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
} |
|
ifcapable trigger { |
do_test schema2-3.1 { |
execsql { |
CREATE TABLE abc(a, b, c); |
} |
set ::STMT [sqlite3_prepare_v2 $::DB {SELECT * FROM sqlite_master} -1 TAIL] |
execsql { |
CREATE TRIGGER abc_trig AFTER INSERT ON abc BEGIN |
SELECT 1, 2, 3; |
END; |
} |
sqlite3_step $::STMT |
} {SQLITE_ROW} |
do_test schema2-3.2 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
do_test schema2-3.3 { |
set ::STMT [sqlite3_prepare_v2 $::DB {SELECT * FROM sqlite_master} -1 TAIL] |
execsql { |
DROP TRIGGER abc_trig; |
} |
sqlite3_step $::STMT |
} {SQLITE_ROW} |
do_test schema2-3.4 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
} |
|
do_test schema2-4.1 { |
catchsql { |
CREATE TABLE abc(a, b, c); |
} |
set ::STMT [sqlite3_prepare_v2 $::DB {SELECT * FROM sqlite_master} -1 TAIL] |
execsql { |
CREATE INDEX abc_index ON abc(a); |
} |
sqlite3_step $::STMT |
} {SQLITE_ROW} |
do_test schema2-4.2 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
do_test schema2-4.3 { |
set ::STMT [sqlite3_prepare_v2 $::DB {SELECT * FROM sqlite_master} -1 TAIL] |
execsql { |
DROP INDEX abc_index; |
} |
sqlite3_step $::STMT |
} {SQLITE_ROW} |
do_test schema2-4.4 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
|
#--------------------------------------------------------------------- |
# Tests 5.1 to 5.4 check that prepared statements are invalidated when |
# a database is DETACHed (but not when one is ATTACHed). |
# |
ifcapable attach { |
do_test schema2-5.1 { |
set sql {SELECT * FROM abc;} |
set ::STMT [sqlite3_prepare_v2 $::DB $sql -1 TAIL] |
execsql { |
ATTACH 'test2.db' AS aux; |
} |
sqlite3_step $::STMT |
} {SQLITE_DONE} |
do_test schema2-5.2 { |
sqlite3_reset $::STMT |
} {SQLITE_OK} |
do_test schema2-5.3 { |
execsql { |
DETACH aux; |
} |
sqlite3_step $::STMT |
} {SQLITE_DONE} |
do_test schema2-5.4 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
} |
|
#--------------------------------------------------------------------- |
# Tests 6.* check that prepared statements are invalidated when |
# a user-function is deleted (but not when one is added). |
do_test schema2-6.1 { |
set sql {SELECT * FROM abc;} |
set ::STMT [sqlite3_prepare_v2 $::DB $sql -1 TAIL] |
db function hello_function {} |
sqlite3_step $::STMT |
} {SQLITE_DONE} |
do_test schema2-6.2 { |
sqlite3_reset $::STMT |
} {SQLITE_OK} |
do_test schema2-6.3 { |
sqlite_delete_function $::DB hello_function |
sqlite3_step $::STMT |
} {SQLITE_DONE} |
do_test schema2-6.4 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
|
#--------------------------------------------------------------------- |
# Tests 7.* check that prepared statements are invalidated when |
# a collation sequence is deleted (but not when one is added). |
# |
ifcapable utf16 { |
do_test schema2-7.1 { |
set sql {SELECT * FROM abc;} |
set ::STMT [sqlite3_prepare_v2 $::DB $sql -1 TAIL] |
add_test_collate $::DB 1 1 1 |
sqlite3_step $::STMT |
} {SQLITE_DONE} |
do_test schema2-7.2 { |
sqlite3_reset $::STMT |
} {SQLITE_OK} |
do_test schema2-7.3 { |
add_test_collate $::DB 0 0 0 |
sqlite3_step $::STMT |
} {SQLITE_DONE} |
do_test schema2-7.4 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
} |
|
#--------------------------------------------------------------------- |
# Tests 8.1 and 8.2 check that prepared statements are invalidated when |
# the authorization function is set. |
# |
ifcapable auth { |
do_test schema2-8.1 { |
set ::STMT [sqlite3_prepare_v2 $::DB {SELECT * FROM sqlite_master} -1 TAIL] |
db auth {} |
sqlite3_step $::STMT |
} {SQLITE_ROW} |
do_test schema2-8.3 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
} |
|
#--------------------------------------------------------------------- |
# schema2-9.1: Test that if a table is dropped by one database connection, |
# other database connections are aware of the schema change. |
# schema2-9.2: Test that if a view is dropped by one database connection, |
# other database connections are aware of the schema change. |
# |
do_test schema2-9.1 { |
sqlite3 db2 test.db |
execsql { |
DROP TABLE abc; |
} db2 |
db2 close |
catchsql { |
SELECT * FROM abc; |
} |
} {1 {no such table: abc}} |
execsql { |
CREATE TABLE abc(a, b, c); |
} |
ifcapable view { |
do_test schema2-9.2 { |
execsql { |
CREATE VIEW abcview AS SELECT * FROM abc; |
} |
sqlite3 db2 test.db |
execsql { |
DROP VIEW abcview; |
} db2 |
db2 close |
catchsql { |
SELECT * FROM abcview; |
} |
} {1 {no such table: abcview}} |
} |
|
#--------------------------------------------------------------------- |
# Test that if a CREATE TABLE statement fails because there are other |
# btree cursors open on the same database file it does not corrupt |
# the sqlite_master table. |
# |
# 2007-05-02: These tests have been overcome by events. Open btree |
# cursors no longer block CREATE TABLE. But there is no reason not |
# to keep the tests in the test suite. |
# |
do_test schema2-10.1 { |
execsql { |
INSERT INTO abc VALUES(1, 2, 3); |
} |
set sql {SELECT * FROM abc} |
set ::STMT [sqlite3_prepare_v2 $::DB $sql -1 TAIL] |
sqlite3_step $::STMT |
} {SQLITE_ROW} |
do_test schema2-10.2 { |
catchsql { |
CREATE TABLE t2(a, b, c); |
} |
} {0 {}} |
do_test schema2-10.3 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
do_test schema2-10.4 { |
sqlite3 db2 test.db |
execsql { |
SELECT * FROM abc |
} db2 |
} {1 2 3} |
do_test schema2-10.5 { |
db2 close |
} {} |
|
#--------------------------------------------------------------------- |
# Attempting to delete or replace a user-function or collation sequence |
# while there are active statements returns an SQLITE_BUSY error. |
# |
# schema2-11.1 - 11.4: User function. |
# schema2-11.5 - 11.8: Collation sequence. |
# |
do_test schema2-11.1 { |
db function tstfunc {} |
set sql {SELECT * FROM abc} |
set ::STMT [sqlite3_prepare_v2 $::DB $sql -1 TAIL] |
sqlite3_step $::STMT |
} {SQLITE_ROW} |
do_test schema2-11.2 { |
sqlite_delete_function $::DB tstfunc |
} {SQLITE_BUSY} |
do_test schema2-11.3 { |
set rc [catch { |
db function tstfunc {} |
} msg] |
list $rc $msg |
} {1 {unable to delete/modify user-function due to active statements}} |
do_test schema2-11.4 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
do_test schema2-11.5 { |
db collate tstcollate {} |
set sql {SELECT * FROM abc} |
set ::STMT [sqlite3_prepare_v2 $::DB $sql -1 TAIL] |
sqlite3_step $::STMT |
} {SQLITE_ROW} |
do_test schema2-11.6 { |
sqlite_delete_collation $::DB tstcollate |
} {SQLITE_BUSY} |
do_test schema2-11.7 { |
set rc [catch { |
db collate tstcollate {} |
} msg] |
list $rc $msg |
} {1 {unable to delete/modify collation sequence due to active statements}} |
do_test schema2-11.8 { |
sqlite3_finalize $::STMT |
} {SQLITE_OK} |
|
finish_test |