/ Hex Artifact Content
Login

Artifact f1b473c65d8bb43b5f4e2bdcc3f7fc3ac83fd19c:


0000: 23 20 32 30 31 30 20 4f 63 74 6f 62 65 72 20 32  # 2010 October 2
0010: 30 0a 23 0a 23 20 54 68 65 20 61 75 74 68 6f 72  0.#.# The author
0020: 20 64 69 73 63 6c 61 69 6d 73 20 63 6f 70 79 72   disclaims copyr
0030: 69 67 68 74 20 74 6f 20 74 68 69 73 20 73 6f 75  ight to this sou
0040: 72 63 65 20 63 6f 64 65 2e 20 20 49 6e 20 70 6c  rce code.  In pl
0050: 61 63 65 20 6f 66 0a 23 20 61 20 6c 65 67 61 6c  ace of.# a legal
0060: 20 6e 6f 74 69 63 65 2c 20 68 65 72 65 20 69 73   notice, here is
0070: 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a 23 0a 23   a blessing:.#.#
0080: 20 20 20 20 4d 61 79 20 79 6f 75 20 64 6f 20 67      May you do g
0090: 6f 6f 64 20 61 6e 64 20 6e 6f 74 20 65 76 69 6c  ood and not evil
00a0: 2e 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20 66  ..#    May you f
00b0: 69 6e 64 20 66 6f 72 67 69 76 65 6e 65 73 73 20  ind forgiveness 
00c0: 66 6f 72 20 79 6f 75 72 73 65 6c 66 20 61 6e 64  for yourself and
00d0: 20 66 6f 72 67 69 76 65 20 6f 74 68 65 72 73 2e   forgive others.
00e0: 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20 73 68  .#    May you sh
00f0: 61 72 65 20 66 72 65 65 6c 79 2c 20 6e 65 76 65  are freely, neve
0100: 72 20 74 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68  r taking more th
0110: 61 6e 20 79 6f 75 20 67 69 76 65 2e 0a 23 0a 23  an you give..#.#
0120: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 0a 23 0a 23 0a 0a 73 65 74  *******.#.#..set
0170: 20 74 65 73 74 64 69 72 20 5b 66 69 6c 65 20 64   testdir [file d
0180: 69 72 6e 61 6d 65 20 24 61 72 67 76 30 5d 0a 73  irname $argv0].s
0190: 6f 75 72 63 65 20 24 74 65 73 74 64 69 72 2f 74  ource $testdir/t
01a0: 65 73 74 65 72 2e 74 63 6c 0a 0a 73 71 6c 69 74  ester.tcl..sqlit
01b0: 65 33 20 64 62 20 74 65 73 74 2e 64 62 0a 73 71  e3 db test.db.sq
01c0: 6c 69 74 65 33 5f 64 62 5f 63 6f 6e 66 69 67 5f  lite3_db_config_
01d0: 6c 6f 6f 6b 61 73 69 64 65 20 64 62 20 30 20 30  lookaside db 0 0
01e0: 20 30 0a 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74   0..do_execsql_t
01f0: 65 73 74 20 69 6e 63 72 62 6c 6f 62 33 2d 31 2e  est incrblob3-1.
0200: 31 20 7b 0a 20 20 43 52 45 41 54 45 20 54 41 42  1 {.  CREATE TAB
0210: 4c 45 20 62 6c 6f 62 73 28 6b 20 49 4e 54 45 47  LE blobs(k INTEG
0220: 45 52 20 50 52 49 4d 41 52 59 20 4b 45 59 2c 20  ER PRIMARY KEY, 
0230: 76 20 42 4c 4f 42 29 3b 0a 20 20 49 4e 53 45 52  v BLOB);.  INSER
0240: 54 20 49 4e 54 4f 20 62 6c 6f 62 73 20 56 41 4c  T INTO blobs VAL
0250: 55 45 53 28 31 2c 20 7a 65 72 6f 62 6c 6f 62 28  UES(1, zeroblob(
0260: 31 30 30 29 29 3b 0a 20 20 49 4e 53 45 52 54 20  100));.  INSERT 
0270: 49 4e 54 4f 20 62 6c 6f 62 73 20 56 41 4c 55 45  INTO blobs VALUE
0280: 53 28 32 2c 20 7a 65 72 6f 62 6c 6f 62 28 31 30  S(2, zeroblob(10
0290: 30 29 29 3b 0a 7d 20 7b 7d 0a 0a 23 20 54 65 73  0));.} {}..# Tes
02a0: 74 20 74 68 65 20 73 71 6c 69 74 65 33 5f 62 6c  t the sqlite3_bl
02b0: 6f 62 5f 72 65 6f 70 65 6e 28 29 2f 72 65 61 64  ob_reopen()/read
02c0: 28 29 2f 77 72 69 74 65 28 29 20 66 75 6e 63 74  ()/write() funct
02d0: 69 6f 6e 73 2e 0a 23 0a 64 6f 5f 74 65 73 74 20  ions..#.do_test 
02e0: 69 6e 63 72 62 6c 6f 62 33 2d 31 2e 32 20 7b 0a  incrblob3-1.2 {.
02f0: 20 20 73 65 74 20 3a 3a 62 6c 6f 62 20 5b 64 62    set ::blob [db
0300: 20 69 6e 63 72 62 6c 6f 62 20 62 6c 6f 62 73 20   incrblob blobs 
0310: 76 20 31 5d 0a 20 20 70 75 74 73 20 24 3a 3a 62  v 1].  puts $::b
0320: 6c 6f 62 20 22 68 65 6c 6c 6f 20 77 6f 72 6c 64  lob "hello world
0330: 22 0a 7d 20 7b 7d 0a 0a 64 6f 5f 74 65 73 74 20  ".} {}..do_test 
0340: 69 6e 63 72 62 6c 6f 62 33 2d 31 2e 33 20 7b 0a  incrblob3-1.3 {.
0350: 20 20 73 71 6c 69 74 65 33 5f 62 6c 6f 62 5f 72    sqlite3_blob_r
0360: 65 6f 70 65 6e 20 24 3a 3a 62 6c 6f 62 20 32 0a  eopen $::blob 2.
0370: 20 20 70 75 74 73 20 24 3a 3a 62 6c 6f 62 20 22    puts $::blob "
0380: 77 6f 72 6c 64 20 68 65 6c 6c 6f 22 0a 7d 20 7b  world hello".} {
0390: 7d 0a 0a 64 6f 5f 74 65 73 74 20 69 6e 63 72 62  }..do_test incrb
03a0: 6c 6f 62 33 2d 31 2e 34 20 7b 0a 20 20 73 71 6c  lob3-1.4 {.  sql
03b0: 69 74 65 33 5f 62 6c 6f 62 5f 72 65 6f 70 65 6e  ite3_blob_reopen
03c0: 20 24 3a 3a 62 6c 6f 62 20 31 0a 20 20 67 65 74   $::blob 1.  get
03d0: 73 20 24 3a 3a 62 6c 6f 62 0a 7d 20 7b 68 65 6c  s $::blob.} {hel
03e0: 6c 6f 20 77 6f 72 6c 64 7d 0a 0a 64 6f 5f 74 65  lo world}..do_te
03f0: 73 74 20 69 6e 63 72 62 6c 6f 62 33 2d 31 2e 35  st incrblob3-1.5
0400: 20 7b 0a 20 20 73 71 6c 69 74 65 33 5f 62 6c 6f   {.  sqlite3_blo
0410: 62 5f 72 65 6f 70 65 6e 20 24 3a 3a 62 6c 6f 62  b_reopen $::blob
0420: 20 32 0a 20 20 67 65 74 73 20 24 3a 3a 62 6c 6f   2.  gets $::blo
0430: 62 0a 7d 20 7b 77 6f 72 6c 64 20 68 65 6c 6c 6f  b.} {world hello
0440: 7d 0a 0a 64 6f 5f 74 65 73 74 20 69 6e 63 72 62  }..do_test incrb
0450: 6c 6f 62 33 2d 31 2e 36 20 7b 20 63 6c 6f 73 65  lob3-1.6 { close
0460: 20 24 3a 3a 62 6c 6f 62 20 7d 20 7b 7d 0a 0a 23   $::blob } {}..#
0470: 20 54 65 73 74 20 73 6f 6d 65 20 65 72 72 6f 72   Test some error
0480: 20 63 6f 6e 64 69 74 69 6f 6e 73 2e 0a 23 0a 23   conditions..#.#
0490: 20 20 20 69 6e 63 72 62 6c 6f 62 33 2d 32 2e 31     incrblob3-2.1
04a0: 3a 20 41 74 74 65 6d 70 74 69 6e 67 20 74 6f 20  : Attempting to 
04b0: 72 65 6f 70 65 6e 20 61 20 72 6f 77 20 74 68 61  reopen a row tha
04c0: 74 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 74  t does not exist
04d0: 2e 0a 23 20 20 20 69 6e 63 72 62 6c 6f 62 33 2d  ..#   incrblob3-
04e0: 32 2e 32 3a 20 41 74 74 65 6d 70 74 69 6e 67 20  2.2: Attempting 
04f0: 74 6f 20 72 65 6f 70 65 6e 20 61 20 72 6f 77 20  to reopen a row 
0500: 74 68 61 74 20 64 6f 65 73 20 6e 6f 74 20 63 6f  that does not co
0510: 6e 74 61 69 6e 20 61 20 62 6c 6f 62 0a 23 20 20  ntain a blob.#  
0520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0530: 6f 72 20 74 65 78 74 20 76 61 6c 75 65 2e 0a 23  or text value..#
0540: 0a 64 6f 5f 74 65 73 74 20 69 6e 63 72 62 6c 6f  .do_test incrblo
0550: 62 33 2d 32 2e 31 2e 31 20 7b 0a 20 20 73 65 74  b3-2.1.1 {.  set
0560: 20 3a 3a 62 6c 6f 62 20 5b 64 62 20 69 6e 63 72   ::blob [db incr
0570: 62 6c 6f 62 20 62 6c 6f 62 73 20 76 20 31 5d 0a  blob blobs v 1].
0580: 20 20 6c 69 73 74 20 5b 63 61 74 63 68 20 7b 73    list [catch {s
0590: 71 6c 69 74 65 33 5f 62 6c 6f 62 5f 72 65 6f 70  qlite3_blob_reop
05a0: 65 6e 20 24 3a 3a 62 6c 6f 62 20 33 7d 20 6d 73  en $::blob 3} ms
05b0: 67 5d 20 24 6d 73 67 0a 7d 20 7b 31 20 53 51 4c  g] $msg.} {1 SQL
05c0: 49 54 45 5f 45 52 52 4f 52 7d 0a 64 6f 5f 74 65  ITE_ERROR}.do_te
05d0: 73 74 20 69 6e 63 72 62 6c 6f 62 33 2d 32 2e 31  st incrblob3-2.1
05e0: 2e 32 20 7b 0a 20 20 6c 69 73 74 20 5b 73 71 6c  .2 {.  list [sql
05f0: 69 74 65 33 5f 65 72 72 63 6f 64 65 20 64 62 5d  ite3_errcode db]
0600: 20 5b 73 71 6c 69 74 65 33 5f 65 72 72 6d 73 67   [sqlite3_errmsg
0610: 20 64 62 5d 0a 7d 20 7b 53 51 4c 49 54 45 5f 45   db].} {SQLITE_E
0620: 52 52 4f 52 20 7b 6e 6f 20 73 75 63 68 20 72 6f  RROR {no such ro
0630: 77 69 64 3a 20 33 7d 7d 0a 64 6f 5f 74 65 73 74  wid: 3}}.do_test
0640: 20 69 6e 63 72 62 6c 6f 62 33 2d 32 2e 31 2e 33   incrblob3-2.1.3
0650: 20 7b 0a 20 20 6c 69 73 74 20 5b 63 61 74 63 68   {.  list [catch
0660: 20 7b 73 71 6c 69 74 65 33 5f 62 6c 6f 62 5f 72   {sqlite3_blob_r
0670: 65 6f 70 65 6e 20 24 3a 3a 62 6c 6f 62 20 31 7d  eopen $::blob 1}
0680: 20 6d 73 67 5d 20 24 6d 73 67 0a 7d 20 7b 30 20   msg] $msg.} {0 
0690: 7b 7d 7d 0a 64 6f 5f 74 65 73 74 20 69 6e 63 72  {}}.do_test incr
06a0: 62 6c 6f 62 33 2d 32 2e 31 2e 34 20 7b 20 63 6c  blob3-2.1.4 { cl
06b0: 6f 73 65 20 24 3a 3a 62 6c 6f 62 20 7d 20 7b 7d  ose $::blob } {}
06c0: 0a 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73  ..do_execsql_tes
06d0: 74 20 69 6e 63 72 62 6c 6f 62 33 2d 32 2e 32 2e  t incrblob3-2.2.
06e0: 31 20 7b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54  1 {.  INSERT INT
06f0: 4f 20 62 6c 6f 62 73 20 56 41 4c 55 45 53 28 33  O blobs VALUES(3
0700: 2c 20 34 32 29 3b 0a 20 20 49 4e 53 45 52 54 20  , 42);.  INSERT 
0710: 49 4e 54 4f 20 62 6c 6f 62 73 20 56 41 4c 55 45  INTO blobs VALUE
0720: 53 28 34 2c 20 35 34 2e 34 29 3b 0a 20 20 49 4e  S(4, 54.4);.  IN
0730: 53 45 52 54 20 49 4e 54 4f 20 62 6c 6f 62 73 20  SERT INTO blobs 
0740: 56 41 4c 55 45 53 28 35 2c 20 4e 55 4c 4c 29 3b  VALUES(5, NULL);
0750: 0a 7d 0a 66 6f 72 65 61 63 68 20 7b 74 6e 20 72  .}.foreach {tn r
0760: 6f 77 69 64 20 74 79 70 65 7d 20 7b 0a 20 20 31  owid type} {.  1
0770: 20 33 20 69 6e 74 65 67 65 72 0a 20 20 32 20 34   3 integer.  2 4
0780: 20 72 65 61 6c 0a 20 20 33 20 35 20 6e 75 6c 6c   real.  3 5 null
0790: 0a 7d 20 7b 0a 20 20 64 6f 5f 74 65 73 74 20 69  .} {.  do_test i
07a0: 6e 63 72 62 6c 6f 62 33 2d 32 2e 32 2e 24 74 6e  ncrblob3-2.2.$tn
07b0: 2e 31 20 7b 0a 20 20 20 20 73 65 74 20 3a 3a 62  .1 {.    set ::b
07c0: 6c 6f 62 20 5b 64 62 20 69 6e 63 72 62 6c 6f 62  lob [db incrblob
07d0: 20 62 6c 6f 62 73 20 76 20 31 5d 0a 20 20 20 20   blobs v 1].    
07e0: 6c 69 73 74 20 5b 63 61 74 63 68 20 7b 73 71 6c  list [catch {sql
07f0: 69 74 65 33 5f 62 6c 6f 62 5f 72 65 6f 70 65 6e  ite3_blob_reopen
0800: 20 24 3a 3a 62 6c 6f 62 20 24 72 6f 77 69 64 7d   $::blob $rowid}
0810: 20 6d 73 67 5d 20 24 6d 73 67 0a 20 20 7d 20 7b   msg] $msg.  } {
0820: 31 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 7d 0a  1 SQLITE_ERROR}.
0830: 20 20 64 6f 5f 74 65 73 74 20 69 6e 63 72 62 6c    do_test incrbl
0840: 6f 62 33 2d 32 2e 32 2e 24 74 6e 2e 32 20 7b 0a  ob3-2.2.$tn.2 {.
0850: 20 20 20 20 6c 69 73 74 20 5b 73 71 6c 69 74 65      list [sqlite
0860: 33 5f 65 72 72 63 6f 64 65 20 64 62 5d 20 5b 73  3_errcode db] [s
0870: 71 6c 69 74 65 33 5f 65 72 72 6d 73 67 20 64 62  qlite3_errmsg db
0880: 5d 0a 20 20 7d 20 22 53 51 4c 49 54 45 5f 45 52  ].  } "SQLITE_ER
0890: 52 4f 52 20 7b 63 61 6e 6e 6f 74 20 6f 70 65 6e  ROR {cannot open
08a0: 20 76 61 6c 75 65 20 6f 66 20 74 79 70 65 20 24   value of type $
08b0: 74 79 70 65 7d 22 0a 0a 20 20 64 6f 5f 74 65 73  type}"..  do_tes
08c0: 74 20 69 6e 63 72 62 6c 6f 62 33 2d 32 2e 32 2e  t incrblob3-2.2.
08d0: 24 74 6e 2e 33 20 7b 0a 20 20 20 20 6c 69 73 74  $tn.3 {.    list
08e0: 20 5b 63 61 74 63 68 20 7b 73 71 6c 69 74 65 33   [catch {sqlite3
08f0: 5f 62 6c 6f 62 5f 72 65 6f 70 65 6e 20 24 3a 3a  _blob_reopen $::
0900: 62 6c 6f 62 20 31 7d 20 6d 73 67 5d 20 24 6d 73  blob 1} msg] $ms
0910: 67 0a 20 20 7d 20 7b 30 20 7b 7d 7d 0a 20 20 64  g.  } {0 {}}.  d
0920: 6f 5f 74 65 73 74 20 69 6e 63 72 62 6c 6f 62 33  o_test incrblob3
0930: 2d 32 2e 32 2e 24 74 6e 2e 34 20 7b 0a 20 20 20  -2.2.$tn.4 {.   
0940: 20 6c 69 73 74 20 5b 63 61 74 63 68 20 7b 73 71   list [catch {sq
0950: 6c 69 74 65 33 5f 62 6c 6f 62 5f 72 65 61 64 20  lite3_blob_read 
0960: 24 3a 3a 62 6c 6f 62 20 30 20 31 30 7d 20 6d 73  $::blob 0 10} ms
0970: 67 5d 20 24 6d 73 67 0a 20 20 7d 20 7b 30 20 7b  g] $msg.  } {0 {
0980: 68 65 6c 6c 6f 20 77 6f 72 6c 7d 7d 0a 20 20 64  hello worl}}.  d
0990: 6f 5f 74 65 73 74 20 69 6e 63 72 62 6c 6f 62 33  o_test incrblob3
09a0: 2d 32 2e 32 2e 24 74 6e 2e 35 20 7b 0a 20 20 20  -2.2.$tn.5 {.   
09b0: 20 6c 69 73 74 20 5b 63 61 74 63 68 20 7b 73 71   list [catch {sq
09c0: 6c 69 74 65 33 5f 62 6c 6f 62 5f 77 72 69 74 65  lite3_blob_write
09d0: 20 24 3a 3a 62 6c 6f 62 20 30 20 22 61 62 63 64   $::blob 0 "abcd
09e0: 22 7d 20 6d 73 67 5d 20 24 6d 73 67 0a 20 20 7d  "} msg] $msg.  }
09f0: 20 7b 30 20 7b 7d 7d 0a 20 20 64 6f 5f 74 65 73   {0 {}}.  do_tes
0a00: 74 20 69 6e 63 72 62 6c 6f 62 33 2d 32 2e 32 2e  t incrblob3-2.2.
0a10: 24 74 6e 2e 36 20 7b 0a 20 20 20 20 73 71 6c 69  $tn.6 {.    sqli
0a20: 74 65 33 5f 62 6c 6f 62 5f 62 79 74 65 73 20 24  te3_blob_bytes $
0a30: 3a 3a 62 6c 6f 62 0a 20 20 7d 20 7b 31 30 30 7d  ::blob.  } {100}
0a40: 0a 20 20 64 6f 5f 74 65 73 74 20 69 6e 63 72 62  .  do_test incrb
0a50: 6c 6f 62 33 2d 32 2e 32 2e 24 74 6e 2e 37 20 7b  lob3-2.2.$tn.7 {
0a60: 0a 20 20 20 20 6c 69 73 74 20 5b 63 61 74 63 68  .    list [catch
0a70: 20 7b 73 71 6c 69 74 65 33 5f 62 6c 6f 62 5f 77   {sqlite3_blob_w
0a80: 72 69 74 65 20 24 3a 3a 62 6c 6f 62 20 30 20 22  rite $::blob 0 "
0a90: 68 65 6c 6c 6f 22 7d 20 6d 73 67 5d 20 24 6d 73  hello"} msg] $ms
0aa0: 67 0a 20 20 7d 20 7b 30 20 7b 7d 7d 0a 0a 20 20  g.  } {0 {}}..  
0ab0: 64 6f 5f 74 65 73 74 20 69 6e 63 72 62 6c 6f 62  do_test incrblob
0ac0: 33 2d 32 2e 32 2e 24 74 6e 2e 38 20 7b 20 63 6c  3-2.2.$tn.8 { cl
0ad0: 6f 73 65 20 24 3a 3a 62 6c 6f 62 20 7d 20 7b 7d  ose $::blob } {}
0ae0: 0a 7d 0a 0a 23 20 54 65 73 74 20 74 68 61 74 20  .}..# Test that 
0af0: 70 61 73 73 69 6e 67 20 4e 55 4c 4c 20 74 6f 20  passing NULL to 
0b00: 73 71 6c 69 74 65 33 5f 62 6c 6f 62 5f 58 58 58  sqlite3_blob_XXX
0b10: 28 29 20 41 50 49 73 20 72 65 74 75 72 6e 73 20  () APIs returns 
0b20: 53 51 4c 49 54 45 5f 4d 49 53 55 53 45 2e 0a 23  SQLITE_MISUSE..#
0b30: 0a 23 20 20 20 69 6e 63 72 62 6c 6f 62 33 2d 33  .#   incrblob3-3
0b40: 2e 31 3a 20 73 71 6c 69 74 65 33 5f 62 6c 6f 62  .1: sqlite3_blob
0b50: 5f 72 65 6f 70 65 6e 28 29 0a 23 20 20 20 69 6e  _reopen().#   in
0b60: 63 72 62 6c 6f 62 33 2d 33 2e 32 3a 20 73 71 6c  crblob3-3.2: sql
0b70: 69 74 65 33 5f 62 6c 6f 62 5f 72 65 61 64 28 29  ite3_blob_read()
0b80: 0a 23 20 20 20 69 6e 63 72 62 6c 6f 62 33 2d 33  .#   incrblob3-3
0b90: 2e 33 3a 20 73 71 6c 69 74 65 33 5f 62 6c 6f 62  .3: sqlite3_blob
0ba0: 5f 77 72 69 74 65 28 29 0a 23 20 20 20 69 6e 63  _write().#   inc
0bb0: 72 62 6c 6f 62 33 2d 33 2e 34 3a 20 73 71 6c 69  rblob3-3.4: sqli
0bc0: 74 65 33 5f 62 6c 6f 62 5f 62 79 74 65 73 28 29  te3_blob_bytes()
0bd0: 0a 23 0a 64 6f 5f 74 65 73 74 20 69 6e 63 72 62  .#.do_test incrb
0be0: 6c 6f 62 33 2d 33 2e 31 20 7b 0a 20 20 6c 69 73  lob3-3.1 {.  lis
0bf0: 74 20 5b 63 61 74 63 68 20 7b 73 71 6c 69 74 65  t [catch {sqlite
0c00: 33 5f 62 6c 6f 62 5f 72 65 6f 70 65 6e 20 7b 7d  3_blob_reopen {}
0c10: 20 33 7d 20 6d 73 67 5d 20 24 6d 73 67 0a 7d 20   3} msg] $msg.} 
0c20: 7b 31 20 53 51 4c 49 54 45 5f 4d 49 53 55 53 45  {1 SQLITE_MISUSE
0c30: 7d 0a 0a 64 6f 5f 74 65 73 74 20 69 6e 63 72 62  }..do_test incrb
0c40: 6c 6f 62 33 2d 33 2e 32 20 7b 0a 20 20 6c 69 73  lob3-3.2 {.  lis
0c50: 74 20 5b 63 61 74 63 68 20 7b 73 71 6c 69 74 65  t [catch {sqlite
0c60: 33 5f 62 6c 6f 62 5f 72 65 61 64 20 7b 7d 20 30  3_blob_read {} 0
0c70: 20 31 30 7d 20 6d 73 67 5d 20 24 6d 73 67 0a 7d   10} msg] $msg.}
0c80: 20 7b 31 20 53 51 4c 49 54 45 5f 4d 49 53 55 53   {1 SQLITE_MISUS
0c90: 45 7d 0a 0a 64 6f 5f 74 65 73 74 20 69 6e 63 72  E}..do_test incr
0ca0: 62 6c 6f 62 33 2d 33 2e 33 20 7b 0a 20 20 6c 69  blob3-3.3 {.  li
0cb0: 73 74 20 5b 63 61 74 63 68 20 7b 73 71 6c 69 74  st [catch {sqlit
0cc0: 65 33 5f 62 6c 6f 62 5f 77 72 69 74 65 20 7b 7d  e3_blob_write {}
0cd0: 20 30 20 22 61 62 63 64 22 7d 20 6d 73 67 5d 20   0 "abcd"} msg] 
0ce0: 24 6d 73 67 0a 7d 20 7b 31 20 53 51 4c 49 54 45  $msg.} {1 SQLITE
0cf0: 5f 4d 49 53 55 53 45 7d 0a 0a 64 6f 5f 74 65 73  _MISUSE}..do_tes
0d00: 74 20 69 6e 63 72 62 6c 6f 62 33 2d 33 2e 34 20  t incrblob3-3.4 
0d10: 7b 20 73 71 6c 69 74 65 33 5f 62 6c 6f 62 5f 62  { sqlite3_blob_b
0d20: 79 74 65 73 20 7b 7d 20 7d 20 7b 30 7d 0a 0a 64  ytes {} } {0}..d
0d30: 6f 5f 74 65 73 74 20 69 6e 63 72 62 6c 6f 62 33  o_test incrblob3
0d40: 2d 33 2e 35 20 7b 20 73 71 6c 69 74 65 33 5f 62  -3.5 { sqlite3_b
0d50: 6c 6f 62 5f 63 6c 6f 73 65 20 7b 7d 20 7d 20 7b  lob_close {} } {
0d60: 7d 0a 0a 23 20 54 65 73 74 20 6f 75 74 2d 6f 66  }..# Test out-of
0d70: 2d 72 61 6e 67 65 20 72 65 61 64 69 6e 67 20 61  -range reading a
0d80: 6e 64 20 77 72 69 74 69 6e 67 0a 23 0a 64 6f 5f  nd writing.#.do_
0d90: 74 65 73 74 20 69 6e 63 72 62 6c 6f 62 33 2d 34  test incrblob3-4
0da0: 2e 31 20 7b 0a 20 20 73 65 74 20 3a 3a 62 6c 6f  .1 {.  set ::blo
0db0: 62 20 5b 64 62 20 69 6e 63 72 62 6c 6f 62 20 62  b [db incrblob b
0dc0: 6c 6f 62 73 20 76 20 31 5d 0a 20 20 73 71 6c 69  lobs v 1].  sqli
0dd0: 74 65 33 5f 62 6c 6f 62 5f 62 79 74 65 73 20 24  te3_blob_bytes $
0de0: 3a 3a 62 6c 6f 62 0a 7d 20 7b 31 30 30 7d 0a 64  ::blob.} {100}.d
0df0: 6f 5f 74 65 73 74 20 69 6e 63 72 62 6c 6f 62 33  o_test incrblob3
0e00: 2d 34 2e 32 20 7b 0a 20 20 6c 69 73 74 20 5b 63  -4.2 {.  list [c
0e10: 61 74 63 68 20 7b 20 73 71 6c 69 74 65 33 5f 62  atch { sqlite3_b
0e20: 6c 6f 62 5f 72 65 61 64 20 24 3a 3a 62 6c 6f 62  lob_read $::blob
0e30: 20 2d 31 20 31 30 20 7d 20 6d 73 67 5d 20 24 6d   -1 10 } msg] $m
0e40: 73 67 0a 7d 20 7b 31 20 53 51 4c 49 54 45 5f 45  sg.} {1 SQLITE_E
0e50: 52 52 4f 52 7d 0a 64 6f 5f 74 65 73 74 20 69 6e  RROR}.do_test in
0e60: 63 72 62 6c 6f 62 33 2d 34 2e 33 20 7b 0a 20 20  crblob3-4.3 {.  
0e70: 6c 69 73 74 20 5b 63 61 74 63 68 20 7b 20 73 71  list [catch { sq
0e80: 6c 69 74 65 33 5f 62 6c 6f 62 5f 72 65 61 64 20  lite3_blob_read 
0e90: 24 3a 3a 62 6c 6f 62 20 30 20 2d 31 30 20 7d 20  $::blob 0 -10 } 
0ea0: 6d 73 67 5d 20 24 6d 73 67 0a 7d 20 7b 31 20 53  msg] $msg.} {1 S
0eb0: 51 4c 49 54 45 5f 45 52 52 4f 52 7d 0a 64 6f 5f  QLITE_ERROR}.do_
0ec0: 74 65 73 74 20 69 6e 63 72 62 6c 6f 62 33 2d 34  test incrblob3-4
0ed0: 2e 34 20 7b 0a 20 20 6c 69 73 74 20 5b 63 61 74  .4 {.  list [cat
0ee0: 63 68 20 7b 20 73 71 6c 69 74 65 33 5f 62 6c 6f  ch { sqlite3_blo
0ef0: 62 5f 72 65 61 64 20 24 3a 3a 62 6c 6f 62 20 39  b_read $::blob 9
0f00: 35 20 31 30 20 7d 20 6d 73 67 5d 20 24 6d 73 67  5 10 } msg] $msg
0f10: 0a 7d 20 7b 31 20 53 51 4c 49 54 45 5f 45 52 52  .} {1 SQLITE_ERR
0f20: 4f 52 7d 0a 64 6f 5f 74 65 73 74 20 69 6e 63 72  OR}.do_test incr
0f30: 62 6c 6f 62 33 2d 34 2e 35 20 7b 0a 20 20 6c 69  blob3-4.5 {.  li
0f40: 73 74 20 5b 63 61 74 63 68 20 7b 20 73 71 6c 69  st [catch { sqli
0f50: 74 65 33 5f 62 6c 6f 62 5f 77 72 69 74 65 20 24  te3_blob_write $
0f60: 3a 3a 62 6c 6f 62 20 2d 31 20 22 61 62 63 64 65  ::blob -1 "abcde
0f70: 66 67 68 69 6a 22 20 31 30 20 7d 20 6d 73 67 5d  fghij" 10 } msg]
0f80: 20 24 6d 73 67 0a 7d 20 7b 31 20 53 51 4c 49 54   $msg.} {1 SQLIT
0f90: 45 5f 45 52 52 4f 52 7d 0a 64 6f 5f 74 65 73 74  E_ERROR}.do_test
0fa0: 20 69 6e 63 72 62 6c 6f 62 33 2d 34 2e 36 20 7b   incrblob3-4.6 {
0fb0: 0a 20 20 6c 69 73 74 20 5b 63 61 74 63 68 20 7b  .  list [catch {
0fc0: 20 73 71 6c 69 74 65 33 5f 62 6c 6f 62 5f 77 72   sqlite3_blob_wr
0fd0: 69 74 65 20 24 3a 3a 62 6c 6f 62 20 30 20 22 61  ite $::blob 0 "a
0fe0: 62 63 64 65 66 67 68 69 6a 22 20 2d 31 30 20 7d  bcdefghij" -10 }
0ff0: 20 6d 73 67 5d 20 24 6d 73 67 0a 7d 20 7b 31 20   msg] $msg.} {1 
1000: 53 51 4c 49 54 45 5f 45 52 52 4f 52 7d 0a 64 6f  SQLITE_ERROR}.do
1010: 5f 74 65 73 74 20 69 6e 63 72 62 6c 6f 62 33 2d  _test incrblob3-
1020: 34 2e 37 20 7b 0a 20 20 6c 69 73 74 20 5b 63 61  4.7 {.  list [ca
1030: 74 63 68 20 7b 20 73 71 6c 69 74 65 33 5f 62 6c  tch { sqlite3_bl
1040: 6f 62 5f 77 72 69 74 65 20 24 3a 3a 62 6c 6f 62  ob_write $::blob
1050: 20 39 35 20 22 61 62 63 64 65 66 67 68 69 6a 22   95 "abcdefghij"
1060: 20 7d 20 6d 73 67 5d 20 24 6d 73 67 0a 7d 20 7b   } msg] $msg.} {
1070: 31 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 7d 0a  1 SQLITE_ERROR}.
1080: 0a 64 6f 5f 74 65 73 74 20 69 6e 63 72 62 6c 6f  .do_test incrblo
1090: 62 33 2d 34 2e 38 20 7b 20 63 6c 6f 73 65 20 24  b3-4.8 { close $
10a0: 3a 3a 62 6c 6f 62 20 7d 20 7b 7d 0a 0a 23 20 54  ::blob } {}..# T
10b0: 65 73 74 20 74 68 61 74 20 6d 6f 64 69 66 79 69  est that modifyi
10c0: 6e 67 20 74 68 65 20 72 6f 77 20 61 20 62 6c 6f  ng the row a blo
10d0: 62 20 68 61 6e 64 6c 65 20 70 6f 69 6e 74 73 20  b handle points 
10e0: 74 6f 20 61 62 6f 72 74 73 20 74 68 65 20 62 6c  to aborts the bl
10f0: 6f 62 2e 0a 23 0a 64 6f 5f 74 65 73 74 20 69 6e  ob..#.do_test in
1100: 63 72 62 6c 6f 62 33 2d 35 2e 31 20 7b 0a 20 20  crblob3-5.1 {.  
1110: 73 65 74 20 3a 3a 62 6c 6f 62 20 5b 64 62 20 69  set ::blob [db i
1120: 6e 63 72 62 6c 6f 62 20 62 6c 6f 62 73 20 76 20  ncrblob blobs v 
1130: 31 5d 0a 20 20 73 71 6c 69 74 65 33 5f 62 6c 6f  1].  sqlite3_blo
1140: 62 5f 62 79 74 65 73 20 24 3a 3a 62 6c 6f 62 0a  b_bytes $::blob.
1150: 7d 20 7b 31 30 30 7d 0a 64 6f 5f 74 65 73 74 20  } {100}.do_test 
1160: 69 6e 63 72 62 6c 6f 62 33 2d 35 2e 32 20 7b 0a  incrblob3-5.2 {.
1170: 20 20 65 78 65 63 73 71 6c 20 7b 20 55 50 44 41    execsql { UPDA
1180: 54 45 20 62 6c 6f 62 73 20 53 45 54 20 76 20 3d  TE blobs SET v =
1190: 20 27 31 32 33 34 35 36 37 38 39 30 31 32 33 34   '12345678901234
11a0: 35 36 37 38 39 30 31 32 33 34 35 36 37 38 39 30  5678901234567890
11b0: 27 20 57 48 45 52 45 20 6b 20 3d 20 31 20 7d 0a  ' WHERE k = 1 }.
11c0: 20 20 6c 69 73 74 20 5b 63 61 74 63 68 20 7b 20    list [catch { 
11d0: 73 71 6c 69 74 65 33 5f 62 6c 6f 62 5f 72 65 61  sqlite3_blob_rea
11e0: 64 20 24 3a 3a 62 6c 6f 62 20 30 20 31 30 20 7d  d $::blob 0 10 }
11f0: 20 6d 73 67 5d 20 24 6d 73 67 0a 7d 20 7b 31 20   msg] $msg.} {1 
1200: 53 51 4c 49 54 45 5f 41 42 4f 52 54 7d 0a 0a 23  SQLITE_ABORT}..#
1210: 20 54 65 73 74 20 76 61 72 69 6f 75 73 20 65 72   Test various er
1220: 72 6f 72 73 20 74 68 61 74 20 63 61 6e 20 6f 63  rors that can oc
1230: 63 75 72 20 69 6e 20 73 71 6c 69 74 65 33 5f 62  cur in sqlite3_b
1240: 6c 6f 62 5f 6f 70 65 6e 28 29 3a 0a 23 0a 23 20  lob_open():.#.# 
1250: 20 20 31 2e 20 54 72 79 69 6e 67 20 74 6f 20 6f    1. Trying to o
1260: 70 65 6e 20 61 20 76 69 72 74 75 61 6c 20 74 61  pen a virtual ta
1270: 62 6c 65 20 63 6f 6c 75 6d 6e 2e 0a 23 20 20 20  ble column..#   
1280: 32 2e 20 54 72 79 69 6e 67 20 74 6f 20 6f 70 65  2. Trying to ope
1290: 6e 20 61 20 76 69 65 77 20 63 6f 6c 75 6d 6e 2e  n a view column.
12a0: 0a 23 20 20 20 33 2e 20 54 72 79 69 6e 67 20 74  .#   3. Trying t
12b0: 6f 20 6f 70 65 6e 20 61 20 63 6f 6c 75 6d 6e 20  o open a column 
12c0: 74 68 61 74 20 64 6f 65 73 20 6e 6f 74 20 65 78  that does not ex
12d0: 69 73 74 2e 0a 23 20 20 20 34 2e 20 54 72 79 69  ist..#   4. Tryi
12e0: 6e 67 20 74 6f 20 6f 70 65 6e 20 61 20 72 65 61  ng to open a rea
12f0: 64 2f 77 72 69 74 65 20 68 61 6e 64 6c 65 20 6f  d/write handle o
1300: 6e 20 61 6e 20 69 6e 64 65 78 65 64 20 63 6f 6c  n an indexed col
1310: 75 6d 6e 2e 0a 23 20 20 20 35 2e 20 54 72 79 69  umn..#   5. Tryi
1320: 6e 67 20 74 6f 20 6f 70 65 6e 20 61 20 72 65 61  ng to open a rea
1330: 64 2f 77 72 69 74 65 20 68 61 6e 64 6c 65 20 6f  d/write handle o
1340: 6e 20 74 68 65 20 63 68 69 6c 64 20 6b 65 79 20  n the child key 
1350: 6f 66 20 61 6e 20 46 4b 20 63 6f 6e 73 74 72 61  of an FK constra
1360: 69 6e 74 2e 0a 23 0a 69 66 63 61 70 61 62 6c 65  int..#.ifcapable
1370: 20 66 74 73 33 20 7b 0a 20 20 64 6f 5f 74 65 73   fts3 {.  do_tes
1380: 74 20 69 6e 63 72 62 6c 6f 62 33 2d 36 2e 31 20  t incrblob3-6.1 
1390: 7b 0a 20 20 20 20 65 78 65 63 73 71 6c 20 7b 0a  {.    execsql {.
13a0: 20 20 20 20 20 20 43 52 45 41 54 45 20 56 49 52        CREATE VIR
13b0: 54 55 41 4c 20 54 41 42 4c 45 20 66 74 20 55 53  TUAL TABLE ft US
13c0: 49 4e 47 20 66 74 73 33 3b 0a 20 20 20 20 20 20  ING fts3;.      
13d0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 66 74 20 56  INSERT INTO ft V
13e0: 41 4c 55 45 53 28 27 72 75 6c 65 73 20 74 6f 20  ALUES('rules to 
13f0: 6f 70 65 6e 20 61 20 63 6f 6c 75 6d 6e 20 74 6f  open a column to
1400: 20 77 68 69 63 68 27 29 3b 0a 20 20 20 20 7d 0a   which');.    }.
1410: 0a 20 20 20 20 6c 69 73 74 20 5b 63 61 74 63 68  .    list [catch
1420: 20 7b 20 64 62 20 69 6e 63 72 62 6c 6f 62 20 66   { db incrblob f
1430: 74 20 63 6f 6e 74 65 6e 74 20 31 20 7d 20 6d 73  t content 1 } ms
1440: 67 5d 20 24 6d 73 67 0a 20 20 7d 20 7b 31 20 7b  g] $msg.  } {1 {
1450: 63 61 6e 6e 6f 74 20 6f 70 65 6e 20 76 69 72 74  cannot open virt
1460: 75 61 6c 20 74 61 62 6c 65 3a 20 66 74 7d 7d 0a  ual table: ft}}.
1470: 7d 0a 69 66 63 61 70 61 62 6c 65 20 76 69 65 77  }.ifcapable view
1480: 20 7b 0a 20 20 64 6f 5f 74 65 73 74 20 69 6e 63   {.  do_test inc
1490: 72 62 6c 6f 62 33 2d 36 2e 32 20 7b 0a 20 20 20  rblob3-6.2 {.   
14a0: 20 65 78 65 63 73 71 6c 20 7b 20 43 52 45 41 54   execsql { CREAT
14b0: 45 20 56 49 45 57 20 76 31 20 41 53 20 53 45 4c  E VIEW v1 AS SEL
14c0: 45 43 54 20 2a 20 46 52 4f 4d 20 62 6c 6f 62 73  ECT * FROM blobs
14d0: 20 7d 0a 20 20 20 20 6c 69 73 74 20 5b 63 61 74   }.    list [cat
14e0: 63 68 20 7b 20 64 62 20 69 6e 63 72 62 6c 6f 62  ch { db incrblob
14f0: 20 76 31 20 63 6f 6e 74 65 6e 74 20 31 20 7d 20   v1 content 1 } 
1500: 6d 73 67 5d 20 24 6d 73 67 0a 20 20 7d 20 7b 31  msg] $msg.  } {1
1510: 20 7b 63 61 6e 6e 6f 74 20 6f 70 65 6e 20 76 69   {cannot open vi
1520: 65 77 3a 20 76 31 7d 7d 0a 7d 0a 0a 64 6f 5f 74  ew: v1}}.}..do_t
1530: 65 73 74 20 69 6e 63 72 62 6c 6f 62 33 2d 36 2e  est incrblob3-6.
1540: 33 20 7b 0a 20 20 6c 69 73 74 20 5b 63 61 74 63  3 {.  list [catc
1550: 68 20 7b 20 64 62 20 69 6e 63 72 62 6c 6f 62 20  h { db incrblob 
1560: 62 6c 6f 62 73 20 63 6f 6e 74 65 6e 74 20 31 20  blobs content 1 
1570: 7d 20 6d 73 67 5d 20 24 6d 73 67 0a 7d 20 7b 31  } msg] $msg.} {1
1580: 20 7b 6e 6f 20 73 75 63 68 20 63 6f 6c 75 6d 6e   {no such column
1590: 3a 20 22 63 6f 6e 74 65 6e 74 22 7d 7d 0a 0a 64  : "content"}}..d
15a0: 6f 5f 74 65 73 74 20 69 6e 63 72 62 6c 6f 62 33  o_test incrblob3
15b0: 2d 36 2e 34 2e 31 20 7b 0a 20 20 65 78 65 63 73  -6.4.1 {.  execs
15c0: 71 6c 20 7b 20 0a 20 20 20 20 43 52 45 41 54 45  ql { .    CREATE
15d0: 20 54 41 42 4c 45 20 74 31 28 61 2c 20 62 29 3b   TABLE t1(a, b);
15e0: 0a 20 20 20 20 43 52 45 41 54 45 20 49 4e 44 45  .    CREATE INDE
15f0: 58 20 69 31 20 4f 4e 20 74 31 28 62 29 3b 0a 20  X i1 ON t1(b);. 
1600: 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74     INSERT INTO t
1610: 31 20 56 41 4c 55 45 53 28 7a 65 72 6f 62 6c 6f  1 VALUES(zeroblo
1620: 62 28 31 30 30 29 2c 20 7a 65 72 6f 62 6c 6f 62  b(100), zeroblob
1630: 28 31 30 30 29 29 3b 0a 20 20 7d 0a 20 20 6c 69  (100));.  }.  li
1640: 73 74 20 5b 63 61 74 63 68 20 7b 20 64 62 20 69  st [catch { db i
1650: 6e 63 72 62 6c 6f 62 20 74 31 20 62 20 31 20 7d  ncrblob t1 b 1 }
1660: 20 6d 73 67 5d 20 24 6d 73 67 0a 7d 20 7b 31 20   msg] $msg.} {1 
1670: 7b 63 61 6e 6e 6f 74 20 6f 70 65 6e 20 69 6e 64  {cannot open ind
1680: 65 78 65 64 20 63 6f 6c 75 6d 6e 20 66 6f 72 20  exed column for 
1690: 77 72 69 74 69 6e 67 7d 7d 0a 64 6f 5f 74 65 73  writing}}.do_tes
16a0: 74 20 69 6e 63 72 62 6c 6f 62 33 2d 36 2e 34 2e  t incrblob3-6.4.
16b0: 32 20 7b 0a 20 20 73 65 74 20 3a 3a 62 6c 6f 62  2 {.  set ::blob
16c0: 20 5b 64 62 20 69 6e 63 72 62 6c 6f 62 20 74 31   [db incrblob t1
16d0: 20 61 20 31 5d 0a 20 20 63 6c 6f 73 65 20 24 3a   a 1].  close $:
16e0: 3a 62 6c 6f 62 0a 7d 20 7b 7d 0a 64 6f 5f 74 65  :blob.} {}.do_te
16f0: 73 74 20 69 6e 63 72 62 6c 6f 62 33 2d 36 2e 34  st incrblob3-6.4
1700: 2e 33 20 7b 0a 20 20 73 65 74 20 3a 3a 62 6c 6f  .3 {.  set ::blo
1710: 62 20 5b 64 62 20 69 6e 63 72 62 6c 6f 62 20 2d  b [db incrblob -
1720: 72 65 61 64 6f 6e 6c 79 20 74 31 20 62 20 31 5d  readonly t1 b 1]
1730: 0a 20 20 63 6c 6f 73 65 20 24 3a 3a 62 6c 6f 62  .  close $::blob
1740: 0a 7d 20 7b 7d 0a 0a 64 6f 5f 74 65 73 74 20 69  .} {}..do_test i
1750: 6e 63 72 62 6c 6f 62 33 2d 36 2e 35 2e 31 20 7b  ncrblob3-6.5.1 {
1760: 0a 20 20 65 78 65 63 73 71 6c 20 7b 20 0a 20 20  .  execsql { .  
1770: 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 70    CREATE TABLE p
1780: 31 28 61 20 50 52 49 4d 41 52 59 20 4b 45 59 29  1(a PRIMARY KEY)
1790: 3b 0a 20 20 20 20 43 52 45 41 54 45 20 54 41 42  ;.    CREATE TAB
17a0: 4c 45 20 63 31 28 61 2c 20 62 20 52 45 46 45 52  LE c1(a, b REFER
17b0: 45 4e 43 45 53 20 70 31 29 3b 0a 20 20 20 20 50  ENCES p1);.    P
17c0: 52 41 47 4d 41 20 66 6f 72 65 69 67 6e 5f 6b 65  RAGMA foreign_ke
17d0: 79 73 20 3d 20 31 3b 0a 20 20 20 20 49 4e 53 45  ys = 1;.    INSE
17e0: 52 54 20 49 4e 54 4f 20 70 31 20 56 41 4c 55 45  RT INTO p1 VALUE
17f0: 53 28 7a 65 72 6f 62 6c 6f 62 28 31 30 30 29 29  S(zeroblob(100))
1800: 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54  ;.    INSERT INT
1810: 4f 20 63 31 20 56 41 4c 55 45 53 28 7a 65 72 6f  O c1 VALUES(zero
1820: 62 6c 6f 62 28 31 30 30 29 2c 20 7a 65 72 6f 62  blob(100), zerob
1830: 6c 6f 62 28 31 30 30 29 29 3b 0a 20 20 7d 0a 20  lob(100));.  }. 
1840: 20 6c 69 73 74 20 5b 63 61 74 63 68 20 7b 20 64   list [catch { d
1850: 62 20 69 6e 63 72 62 6c 6f 62 20 63 31 20 62 20  b incrblob c1 b 
1860: 31 20 7d 20 6d 73 67 5d 20 24 6d 73 67 0a 7d 20  1 } msg] $msg.} 
1870: 7b 31 20 7b 63 61 6e 6e 6f 74 20 6f 70 65 6e 20  {1 {cannot open 
1880: 66 6f 72 65 69 67 6e 20 6b 65 79 20 63 6f 6c 75  foreign key colu
1890: 6d 6e 20 66 6f 72 20 77 72 69 74 69 6e 67 7d 7d  mn for writing}}
18a0: 0a 0a 64 6f 5f 74 65 73 74 20 69 6e 63 72 62 6c  ..do_test incrbl
18b0: 6f 62 33 2d 36 2e 35 2e 32 20 7b 0a 20 20 73 65  ob3-6.5.2 {.  se
18c0: 74 20 3a 3a 62 6c 6f 62 20 5b 64 62 20 69 6e 63  t ::blob [db inc
18d0: 72 62 6c 6f 62 20 63 31 20 61 20 31 5d 0a 20 20  rblob c1 a 1].  
18e0: 63 6c 6f 73 65 20 24 3a 3a 62 6c 6f 62 0a 7d 20  close $::blob.} 
18f0: 7b 7d 0a 64 6f 5f 74 65 73 74 20 69 6e 63 72 62  {}.do_test incrb
1900: 6c 6f 62 33 2d 36 2e 35 2e 33 20 7b 0a 20 20 73  lob3-6.5.3 {.  s
1910: 65 74 20 3a 3a 62 6c 6f 62 20 5b 64 62 20 69 6e  et ::blob [db in
1920: 63 72 62 6c 6f 62 20 2d 72 65 61 64 6f 6e 6c 79  crblob -readonly
1930: 20 63 31 20 62 20 31 5d 0a 20 20 63 6c 6f 73 65   c1 b 1].  close
1940: 20 24 3a 3a 62 6c 6f 62 0a 7d 20 7b 7d 0a 64 6f   $::blob.} {}.do
1950: 5f 74 65 73 74 20 69 6e 63 72 62 6c 6f 62 33 2d  _test incrblob3-
1960: 36 2e 35 2e 34 20 7b 0a 20 20 65 78 65 63 73 71  6.5.4 {.  execsq
1970: 6c 20 7b 20 50 52 41 47 4d 41 20 66 6f 72 65 69  l { PRAGMA forei
1980: 67 6e 5f 6b 65 79 73 20 3d 20 30 20 7d 0a 20 20  gn_keys = 0 }.  
1990: 73 65 74 20 3a 3a 62 6c 6f 62 20 5b 64 62 20 69  set ::blob [db i
19a0: 6e 63 72 62 6c 6f 62 20 63 31 20 62 20 31 5d 0a  ncrblob c1 b 1].
19b0: 20 20 63 6c 6f 73 65 20 24 3a 3a 62 6c 6f 62 0a    close $::blob.
19c0: 7d 20 7b 7d 0a 0a 0a 23 20 54 65 73 74 20 74 68  } {}...# Test th
19d0: 61 74 20 73 71 6c 69 74 65 33 5f 62 6c 6f 62 5f  at sqlite3_blob_
19e0: 6f 70 65 6e 28 29 20 68 61 6e 64 6c 65 73 20 74  open() handles t
19f0: 72 61 6e 73 69 65 6e 74 20 61 6e 64 20 70 65 72  ransient and per
1a00: 73 69 73 74 65 6e 74 20 73 63 68 65 6d 61 20 0a  sistent schema .
1a10: 23 20 65 72 72 6f 72 73 20 63 6f 72 72 65 63 74  # errors correct
1a20: 6c 79 2e 0a 23 0a 64 6f 5f 74 65 73 74 20 69 6e  ly..#.do_test in
1a30: 63 72 62 6c 6f 62 33 2d 37 2e 31 20 7b 0a 20 20  crblob3-7.1 {.  
1a40: 73 71 6c 69 74 65 33 20 64 62 32 20 74 65 73 74  sqlite3 db2 test
1a50: 2e 64 62 0a 20 20 73 71 6c 69 74 65 33 5f 64 62  .db.  sqlite3_db
1a60: 5f 63 6f 6e 66 69 67 5f 6c 6f 6f 6b 61 73 69 64  _config_lookasid
1a70: 65 20 64 62 32 20 30 20 30 20 30 0a 20 20 65 78  e db2 0 0 0.  ex
1a80: 65 63 73 71 6c 20 7b 20 43 52 45 41 54 45 20 54  ecsql { CREATE T
1a90: 41 42 4c 45 20 74 32 28 78 29 20 7d 20 64 62 32  ABLE t2(x) } db2
1aa0: 0a 20 20 73 65 74 20 3a 3a 62 6c 6f 62 20 5b 64  .  set ::blob [d
1ab0: 62 20 69 6e 63 72 62 6c 6f 62 20 62 6c 6f 62 73  b incrblob blobs
1ac0: 20 76 20 31 5d 0a 20 20 63 6c 6f 73 65 20 24 3a   v 1].  close $:
1ad0: 3a 62 6c 6f 62 0a 7d 20 7b 7d 0a 64 62 32 20 63  :blob.} {}.db2 c
1ae0: 6c 6f 73 65 0a 0a 74 65 73 74 76 66 73 20 74 76  lose..testvfs tv
1af0: 66 73 20 2d 64 65 66 61 75 6c 74 20 31 0a 74 76  fs -default 1.tv
1b00: 66 73 20 66 69 6c 74 65 72 20 78 41 63 63 65 73  fs filter xAcces
1b10: 73 0a 74 76 66 73 20 73 63 72 69 70 74 20 61 63  s.tvfs script ac
1b20: 63 65 73 73 5f 6d 65 74 68 6f 64 0a 0a 70 72 6f  cess_method..pro
1b30: 63 20 61 63 63 65 73 73 5f 6d 65 74 68 6f 64 20  c access_method 
1b40: 7b 61 72 67 73 7d 20 7b 0a 20 20 73 65 74 20 73  {args} {.  set s
1b50: 63 68 65 6d 61 63 6f 6f 6b 69 65 20 5b 68 65 78  chemacookie [hex
1b60: 69 6f 5f 67 65 74 5f 69 6e 74 20 5b 68 65 78 69  io_get_int [hexi
1b70: 6f 5f 72 65 61 64 20 74 65 73 74 2e 64 62 20 34  o_read test.db 4
1b80: 30 20 34 5d 5d 0a 20 20 69 6e 63 72 20 73 63 68  0 4]].  incr sch
1b90: 65 6d 61 63 6f 6f 6b 69 65 0a 20 20 68 65 78 69  emacookie.  hexi
1ba0: 6f 5f 77 72 69 74 65 20 74 65 73 74 2e 64 62 20  o_write test.db 
1bb0: 34 30 20 5b 68 65 78 69 6f 5f 72 65 6e 64 65 72  40 [hexio_render
1bc0: 5f 69 6e 74 33 32 20 24 73 63 68 65 6d 61 63 6f  _int32 $schemaco
1bd0: 6f 6b 69 65 5d 0a 0a 20 20 73 65 74 20 64 62 76  okie]..  set dbv
1be0: 65 72 73 69 6f 6e 20 5b 68 65 78 69 6f 5f 67 65  ersion [hexio_ge
1bf0: 74 5f 69 6e 74 20 5b 68 65 78 69 6f 5f 72 65 61  t_int [hexio_rea
1c00: 64 20 74 65 73 74 2e 64 62 20 32 34 20 34 5d 5d  d test.db 24 4]]
1c10: 0a 20 20 69 6e 63 72 20 64 62 76 65 72 73 69 6f  .  incr dbversio
1c20: 6e 0a 20 20 68 65 78 69 6f 5f 77 72 69 74 65 20  n.  hexio_write 
1c30: 74 65 73 74 2e 64 62 20 32 34 20 5b 68 65 78 69  test.db 24 [hexi
1c40: 6f 5f 72 65 6e 64 65 72 5f 69 6e 74 33 32 20 24  o_render_int32 $
1c50: 64 62 76 65 72 73 69 6f 6e 5d 0a 0a 20 20 72 65  dbversion]..  re
1c60: 74 75 72 6e 20 22 22 0a 7d 0a 0a 64 6f 5f 74 65  turn "".}..do_te
1c70: 73 74 20 69 6e 63 72 62 6c 6f 62 33 2d 37 2e 32  st incrblob3-7.2
1c80: 20 7b 0a 20 20 73 71 6c 69 74 65 33 20 64 62 20   {.  sqlite3 db 
1c90: 74 65 73 74 2e 64 62 20 0a 20 20 73 71 6c 69 74  test.db .  sqlit
1ca0: 65 33 5f 64 62 5f 63 6f 6e 66 69 67 5f 6c 6f 6f  e3_db_config_loo
1cb0: 6b 61 73 69 64 65 20 64 62 20 30 20 30 20 30 0a  kaside db 0 0 0.
1cc0: 20 20 6c 69 73 74 20 5b 63 61 74 63 68 20 7b 64    list [catch {d
1cd0: 62 20 69 6e 63 72 62 6c 6f 62 20 62 6c 6f 62 73  b incrblob blobs
1ce0: 20 76 20 31 7d 20 6d 73 67 5d 20 24 6d 73 67 0a   v 1} msg] $msg.
1cf0: 7d 20 7b 31 20 7b 64 61 74 61 62 61 73 65 20 73  } {1 {database s
1d00: 63 68 65 6d 61 20 68 61 73 20 63 68 61 6e 67 65  chema has change
1d10: 64 7d 7d 0a 64 62 20 63 6c 6f 73 65 0a 74 76 66  d}}.db close.tvf
1d20: 73 20 64 65 6c 65 74 65 0a 0a 66 69 6e 69 73 68  s delete..finish
1d30: 5f 74 65 73 74 0a                                _test.