database/sqlite
1
0
Fork 0
mirror of https://github.com/sqlite/sqlite.git synced 2026-01-06 08:01:16 +03:00
Code Activity

Further coverage tests for the session module.

Browse Source 
FossilOrigin-Name: 69a01c708bf044eacf21a8951fe9e7d9fb4332c5
This commit is contained in:
dan
2011-04-18 07:36:27 +00:00
parent 6734007d75
commit 80fe2d9310
5 changed files with 254 additions and 169 deletions
Download Patch File Download Diff File Expand all files Collapse all files

51
ext/session/sessionfault.test
View File

@@ -20,6 +20,8 @@ source $testdir/tester.tcl
set testprefix sessionfault
if 1 {
forcedelete test.db2
sqlite3 db2 test.db2
do_common_sql {
@@ -362,7 +364,7 @@ do_faultsim_test 8.2 -faults oom* -body {
}
faultsim_delete_and_reopen
do_test 9.prep {
do_test 9.1.prep {
execsql {
PRAGMA encoding = 'utf16';
CREATE TABLE t1(a PRIMARY KEY, b);
@@ -370,7 +372,8 @@ do_test 9.prep {
} {}
faultsim_save_and_close
do_faultsim_test 9 -faults oom-transient -prep {
set answers [list {0 {}} {1 SQLITE_NOMEM} {1 {callback requested query abort}}]
do_faultsim_test 9.1 -faults oom-transient -prep {
catch { unset ::c }
faultsim_restore_and_reopen
sqlite3session S db main
@@ -383,9 +386,48 @@ do_faultsim_test 9 -faults oom-transient -prep {
set {} {}
} -test {
S delete
faultsim_test_result {0 {}} {1 SQLITE_NOMEM} {1 {callback requested query abort}}
eval faultsim_test_result $::answers
if {[info exists ::c]} {
set expected "{INSERT t1 0 X. {} {t abcdefghijklmnopqrstuv t ABCDEFGHIJKLMNOPQRSTUV}}"
set expected [normalize_list {
{INSERT t1 0 X. {} {t abcdefghijklmnopqrstuv t ABCDEFGHIJKLMNOPQRSTUV}}
}]
if { [changeset_to_list $::c] != $expected } {
error "changeset mismatch"
}
}
}
}
faultsim_delete_and_reopen
do_test 9.2.prep {
execsql {
PRAGMA encoding = 'utf16';
CREATE TABLE t1(a PRIMARY KEY, b);
INSERT INTO t1 VALUES('abcdefghij', 'ABCDEFGHIJKLMNOPQRSTUV');
}
} {}
faultsim_save_and_close
set answers [list {0 {}} {1 SQLITE_NOMEM} {1 {callback requested query abort}}]
do_faultsim_test 9.2 -faults oom-transient -prep {
catch { unset ::c }
faultsim_restore_and_reopen
sqlite3session S db main
S attach *
} -body {
execsql {
UPDATE t1 SET b = 'xyz';
}
set ::c [S changeset]
set {} {}
} -test {
S delete
eval faultsim_test_result $::answers
if {[info exists ::c]} {
set expected [normalize_list {
{UPDATE t1 0 X. {t abcdefghij t ABCDEFGHIJKLMNOPQRSTUV} {{} {} t xyz}}
}]
if { [changeset_to_list $::c] != $expected } {
error "changeset mismatch"
}
@@ -393,4 +435,5 @@ do_faultsim_test 9 -faults oom-transient -prep {
}
finish_test