diff options
Diffstat (limited to 'third_party/sqlite/test/openv2.test')
-rwxr-xr-x | third_party/sqlite/test/openv2.test | 41 |
1 files changed, 41 insertions, 0 deletions
diff --git a/third_party/sqlite/test/openv2.test b/third_party/sqlite/test/openv2.test new file mode 100755 index 0000000..637edc6 --- /dev/null +++ b/third_party/sqlite/test/openv2.test @@ -0,0 +1,41 @@ +# 2007 Sep 3 +# +# 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. +# +#*********************************************************************** +# +# Tests on the sqlite3_open_v2() interface. +# +# $Id: openv2.test,v 1.1 2007/09/03 15:19:36 drh Exp $ + +set testdir [file dirname $argv0] +source $testdir/tester.tcl + +db close +file delete -force test.db test.db-journal +do_test openv2-1.1 { + set rc [catch {sqlite3 db test.db -create 0} msg] + lappend rc $msg +} {1 {unable to open database file}} +do_test openv2-1.2 { + info commands db +} {} +do_test openv2-1.3 { + sqlite3 db test.db + db eval {CREATE TABLE t1(x)} + db close + sqlite3 db test.db -readonly 1 + db eval {SELECT name FROM sqlite_master} +} {t1} +do_test openv2-1.4 { + catchsql { + INSERT INTO t1 VALUES(123) + } +} {1 {attempt to write a readonly database}} + +finish_test |