diff options
author | Hans-Christoph Steiner <hans@eds.org> | 2012-03-30 20:42:12 -0400 |
---|---|---|
committer | Hans-Christoph Steiner <hans@eds.org> | 2012-03-30 20:42:12 -0400 |
commit | 7bb481fda9ecb134804b49c2ce77ca28f7eea583 (patch) | |
tree | 31b520b9914d3e2453968abe375f2c102772c3dc /test/journal3.test |
Imported Upstream version 2.0.3
Diffstat (limited to 'test/journal3.test')
-rw-r--r-- | test/journal3.test | 60 |
1 files changed, 60 insertions, 0 deletions
diff --git a/test/journal3.test b/test/journal3.test new file mode 100644 index 0000000..f1bf89f --- /dev/null +++ b/test/journal3.test @@ -0,0 +1,60 @@ +# 2010 July 15 +# +# 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. +# + +set testdir [file dirname $argv0] +source $testdir/tester.tcl +source $testdir/lock_common.tcl +source $testdir/malloc_common.tcl + +#------------------------------------------------------------------------- +# If a connection is required to create a journal file, it creates it with +# the same file-system permissions as the database file itself. Test this. +# +if {$::tcl_platform(platform) == "unix"} { + + set umask [exec /bin/sh -c umask] + faultsim_delete_and_reopen + do_test journal3-1.1 { execsql { CREATE TABLE tx(y, z) } } {} + + foreach {tn permissions} { + 1 00644 + 2 00666 + 3 00600 + 4 00755 + } { + db close + set effective [format %.5o [expr $permissions & ~$umask]] + do_test journal3-1.2.$tn.1 { + catch { forcedelete test.db-journal } + file attributes test.db -permissions $permissions + file attributes test.db -permissions + } $permissions + do_test journal3-1.2.$tn.2 { file exists test.db-journal } {0} + do_test journal3-1.2.$tn.3 { + sqlite3 db test.db + execsql { + BEGIN; + INSERT INTO tx DEFAULT VALUES; + } + file exists test.db-journal + } {1} + do_test journal3-1.2.$tn.4 { + file attr test.db-journal -perm + } $effective + do_execsql_test journal3-1.2.$tn.5 { ROLLBACK } {} + } + + +} + +finish_test |