Add tests for sqlite3_blob_bytes().

FossilOrigin-Name: a066a3832a7c6de65c3016e77e49ac00e09db749

manifest

@@ -1,5 +1,5 @@
-C Permit\sread\soperations\sto\scontinue\safter\sa\sROLLBACK\sas\slong\sas\sthe\sschema\ndoes\snot\schange.
-D 2014-11-11T14:59:31.172
+C Add\stests\sfor\ssqlite3_blob_bytes().
+D 2014-11-11T16:11:04.911
 F Makefile.arm-wince-mingw32ce-gcc d6df77f1f48d690bd73162294bbba7f59507c72f
 F Makefile.in a226317fdf3f4c895fb3cfedc355b4d0868ce1fb
 F Makefile.linux-gcc 91d710bdc4998cb015f39edf3cb314ec4f4d7e23
@@ -453,6 +453,7 @@ F test/descidx3.test 09ddbe3f5295f482d2f8b687cf6db8bad7acd9a2
 F test/diskfull.test 106391384780753ea6896b7b4f005d10e9866b6e
 F test/distinct.test 086e70c765f172e8974e9f83b9ac5ca03c154e77
 F test/distinctagg.test 1a6ef9c87a58669438fc771450d7a72577417376
+F test/e_blobbytes.test 9bea1d3e2b20f3010b04abba58f6ba172301f49f
 F test/e_blobclose.test df756753f571bc30e42e3a6cba2807576e49e716
 F test/e_blobopen.test 234f960d90235a9b51ec3ca1e062e8541dd558d8
 F test/e_blobwrite.test 615b405f29feb2cfb5a1f03dab7933258294fa26
@@ -1217,8 +1218,7 @@ F tool/vdbe_profile.tcl 67746953071a9f8f2f668b73fe899074e2c6d8c1
 F tool/warnings-clang.sh f6aa929dc20ef1f856af04a730772f59283631d4
 F tool/warnings.sh 0abfd78ceb09b7f7c27c688c8e3fe93268a13b32
 F tool/win/sqlite.vsix deb315d026cc8400325c5863eef847784a219a2f
-P 5a1eac2419b1462e6f21595a3fff26d9cc49d203 fa6e6a9ae276cad60e9a4abc1bc23cf2809ea786
-R 90c0902351a625ca12308516be116ef0
-T +closed fa6e6a9ae276cad60e9a4abc1bc23cf2809ea786
-U drh
-Z 3e9637efba5697b65ccb54a130a31d2a
+P b5df5ac0529f7b0d1e880a7f4a307e7d77b7fa6c
+R be9d88d05dd4414f44a05008ae6eba4c
+U dan
+Z 2fc1cd52a3184d003db0d33d71426d71

manifest.uuid

@@ -1 +1 @@
-b5df5ac0529f7b0d1e880a7f4a307e7d77b7fa6c
+a066a3832a7c6de65c3016e77e49ac00e09db749

test/e_blobbytes.test

@@ -0,0 +1,76 @@
+# 2014 October 30
+#
+# 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.
+#
+#***********************************************************************
+#
+
+set testdir [file dirname $argv0]
+source $testdir/tester.tcl
+set testprefix e_blobbytes
+
+do_execsql_test 1.0 {
+  CREATE TABLE q1(r INTEGER PRIMARY KEY, s TEXT);
+  WITH d(a, b) AS (
+    SELECT 0, '' 
+      UNION ALL
+    SELECT a+1, b||'.' FROM d WHERE a<10000
+  )
+  INSERT INTO q1 SELECT * FROM d;
+}
+
+
+# EVIDENCE-OF: R-07796-55423 Returns the size in bytes of the BLOB
+# accessible via the successfully opened BLOB handle in its only
+# argument.
+#
+proc check_blob_size {tn rowid bytes} {
+  uplevel [list do_test $tn [subst -nocommands {
+    sqlite3_blob_open db main q1 s $rowid 0 B
+    set res [sqlite3_blob_bytes [set B]]
+    sqlite3_blob_close [set B]
+    set res
+  }] $bytes]
+}
+check_blob_size 1.1 43 43
+check_blob_size 1.2 391 391
+check_blob_size 1.3 6349 6349
+check_blob_size 1.4 2621 2621
+check_blob_size 1.5 7771 7771
+check_blob_size 1.6 7949 7949
+check_blob_size 1.7 4374 4374
+check_blob_size 1.8 2578 2578
+check_blob_size 1.9 7004 7004
+check_blob_size 1.10 2180 2180
+check_blob_size 1.11 3796 3796
+check_blob_size 1.12 7101 7101
+check_blob_size 1.13 7449 7449
+check_blob_size 1.14 7224 7224
+check_blob_size 1.15 3038 3038
+check_blob_size 1.16 1083 1083
+check_blob_size 1.17 5157 5157
+check_blob_size 1.18 6686 6686
+check_blob_size 1.19 6592 6592
+check_blob_size 1.20 0 0
+
+
+# EVIDENCE-OF: R-53088-19343 The incremental blob I/O routines can only
+# read or overwriting existing blob content; they cannot change the size
+# of a blob.
+#
+#   Also demonstrated in other e_blobXXX.test files.
+#
+do_test 2.1 {
+  sqlite3_blob_open db main q1 s 86 1 B
+  list [catch { sqlite3_blob_write $B 86 "1" 1 } msg] $msg
+} {1 SQLITE_ERROR}
+sqlite3_blob_close $B
+
+finish_test
+
+