diff options
| author | drh <drh@noemail.net> | 2007-06-27 00:36:13 +0000 |
|---|---|---|
| committer | drh <drh@noemail.net> | 2007-06-27 00:36:13 +0000 |
| commit | 0e8003dff68c2bcbeee7ddd0e29d830e48286953 (patch) | |
| tree | 0d37f514c706954f10632e20a11e7480bdb375b4 /test | |
| parent | 6d31df30d82f4f71c84d3eb43ebd50dd8e6f2271 (diff) | |
| download | sqlite-0e8003dff68c2bcbeee7ddd0e29d830e48286953.tar.gz sqlite-0e8003dff68c2bcbeee7ddd0e29d830e48286953.zip | |
Set the connection error code when sqlite3_blob_read() or
sqlite3_blob_write() fail. Ticket #2464. (CVS 4137)
FossilOrigin-Name: 3bd990be3cb8a74be9eaa8d5710852be6733cb58
Diffstat (limited to 'test')
| -rw-r--r-- | test/incrblob.test | 17 |
1 files changed, 15 insertions, 2 deletions
diff --git a/test/incrblob.test b/test/incrblob.test index 07ab66e4b..5cd7040e4 100644 --- a/test/incrblob.test +++ b/test/incrblob.test @@ -9,7 +9,7 @@ # #*********************************************************************** # -# $Id: incrblob.test,v 1.11 2007/06/15 15:08:08 danielk1977 Exp $ +# $Id: incrblob.test,v 1.12 2007/06/27 00:36:14 drh Exp $ # set testdir [file dirname $argv0] @@ -558,5 +558,18 @@ do_test incrblob-7.3.3 { read $::b } $::otherdata -finish_test +# Attempt to write on a read-only blob. Make sure the error code +# gets set. Ticket #2464. +# +do_test incrblob-7.4 { + set rc [catch {sqlite3_blob_write $::b 10 HELLO} msg] + lappend rc $msg +} {1 SQLITE_READONLY} +do_test incrblob-7.5 { + sqlite3_errcode db +} {SQLITE_READONLY} +do_test incrblob-7.6 { + sqlite3_errmsg db +} {attempt to write a readonly database} +finish_test |