diff options
Diffstat (limited to 'test/tkt3457.test')
| -rw-r--r-- | test/tkt3457.test | 87 |
1 files changed, 87 insertions, 0 deletions
diff --git a/test/tkt3457.test b/test/tkt3457.test new file mode 100644 index 0000000..7b9a1b3 --- /dev/null +++ b/test/tkt3457.test @@ -0,0 +1,87 @@ +# 2008 October 29 +# +# 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. +# +# $Id: tkt3457.test,v 1.3 2009/06/26 07:12:07 danielk1977 Exp $ + +set testdir [file dirname $argv0] +source $testdir/tester.tcl + +if {$tcl_platform(platform) != "unix"} { + finish_test + return +} + +#----------------------------------------------------------------------- +# To roll back a hot-journal file, the application needs read and write +# permission on the journal file in question. The following tests test +# the outcome of trying to rollback a hot-journal file when this is not +# the case. +# +# tkt3457-1.2: Application has neither read, nor write permission on +# the hot-journal file. Result: SQLITE_CANTOPEN. +# +# tkt3457-1.3: Application has write but not read permission on +# the hot-journal file. Result: SQLITE_CANTOPEN. +# +# tkt3457-1.4: Application has read but not write permission on +# the hot-journal file. Result: SQLITE_CANTOPEN. +# +# tkt3457-1.5: Application has read/write permission on the hot-journal +# file. Result: SQLITE_OK. +# +do_test tkt3457-1.1 { + execsql { + CREATE TABLE t1(a, b, c); + INSERT INTO t1 VALUES(1, 2, 3); + BEGIN; + INSERT INTO t1 VALUES(4, 5, 6); + } + + forcecopy test.db bak.db + forcecopy test.db-journal bak.db-journal + + # Fix the first journal-header in the journal-file. Because the + # journal file has not yet been synced, the 8-byte magic string at the + # start of the first journal-header has not been written by SQLite. + # So write it now. + set fd [open bak.db-journal a+] + fconfigure $fd -encoding binary -translation binary + seek $fd 0 + puts -nonewline $fd "\xd9\xd5\x05\xf9\x20\xa1\x63\xd7" + close $fd + + execsql COMMIT +} {} + +do_test tkt3457-1.2 { + forcecopy bak.db-journal test.db-journal + file attributes test.db-journal -permissions --------- + catchsql { SELECT * FROM t1 } +} {1 {unable to open database file}} +do_test tkt3457-1.3 { + forcecopy bak.db-journal test.db-journal + file attributes test.db-journal -permissions -w--w--w- + catchsql { SELECT * FROM t1 } +} {1 {unable to open database file}} +do_test tkt3457-1.4 { + forcecopy bak.db-journal test.db-journal + file attributes test.db-journal -permissions r--r--r-- + catchsql { SELECT * FROM t1 } +} {1 {unable to open database file}} + +do_test tkt3457-1.5 { + forcecopy bak.db-journal test.db-journal + file attributes test.db-journal -permissions rw-rw-rw- + catchsql { SELECT * FROM t1 } +} {0 {1 2 3 4 5 6}} + +finish_test |