/ Hex Artifact Content
Login

Artifact 792124852ec61458a2eb527b5091791215e0be95:


0000: 23 20 32 30 30 37 20 4d 61 79 20 30 32 0a 23 0a  # 2007 May 02.#.
0010: 23 20 54 68 65 20 61 75 74 68 6f 72 20 64 69 73  # The author dis
0020: 63 6c 61 69 6d 73 20 63 6f 70 79 72 69 67 68 74  claims copyright
0030: 20 74 6f 20 74 68 69 73 20 73 6f 75 72 63 65 20   to this source 
0040: 63 6f 64 65 2e 20 20 49 6e 20 70 6c 61 63 65 20  code.  In place 
0050: 6f 66 0a 23 20 61 20 6c 65 67 61 6c 20 6e 6f 74  of.# a legal not
0060: 69 63 65 2c 20 68 65 72 65 20 69 73 20 61 20 62  ice, here is a b
0070: 6c 65 73 73 69 6e 67 3a 0a 23 0a 23 20 20 20 20  lessing:.#.#    
0080: 4d 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20  May you do good 
0090: 61 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 23 20  and not evil..# 
00a0: 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20     May you find 
00b0: 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20  forgiveness for 
00c0: 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72  yourself and for
00d0: 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 23 20 20  give others..#  
00e0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20    May you share 
00f0: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61  freely, never ta
0100: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79  king more than y
0110: 6f 75 20 67 69 76 65 2e 0a 23 0a 23 2a 2a 2a 2a  ou 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 0a 23 20 54 68 69 73 20 66 69 6c 65 20  ***.# This file 
0170: 69 6d 70 6c 65 6d 65 6e 74 73 20 72 65 67 72 65  implements regre
0180: 73 73 69 6f 6e 20 74 65 73 74 73 20 66 6f 72 20  ssion tests for 
0190: 53 51 4c 69 74 65 20 6c 69 62 72 61 72 79 2e 20  SQLite library. 
01a0: 20 54 68 65 0a 23 20 66 6f 63 75 73 20 6f 66 20   The.# focus of 
01b0: 74 68 69 73 20 66 69 6c 65 20 69 73 20 74 65 73  this file is tes
01c0: 74 69 6e 67 20 6f 66 20 74 68 65 20 7a 65 72 6f  ting of the zero
01d0: 2d 66 69 6c 6c 65 64 20 62 6c 6f 62 20 66 75 6e  -filled blob fun
01e0: 63 74 69 6f 6e 61 6c 69 74 79 0a 23 20 69 6e 63  ctionality.# inc
01f0: 6c 75 64 69 6e 67 20 74 68 65 20 73 71 6c 69 74  luding the sqlit
0200: 65 33 5f 62 69 6e 64 5f 7a 65 72 6f 62 6c 6f 62  e3_bind_zeroblob
0210: 28 29 2c 20 73 71 6c 69 74 65 33 5f 72 65 73 75  (), sqlite3_resu
0220: 6c 74 5f 7a 65 72 6f 62 6c 6f 62 28 29 2c 0a 23  lt_zeroblob(),.#
0230: 20 61 6e 64 20 74 68 65 20 62 75 69 6c 74 2d 69   and the built-i
0240: 6e 20 7a 65 72 6f 62 6c 6f 62 28 29 20 53 51 4c  n zeroblob() SQL
0250: 20 66 75 6e 63 74 69 6f 6e 2e 0a 23 0a 23 20 24   function..#.# $
0260: 49 64 3a 20 7a 65 72 6f 62 6c 6f 62 2e 74 65 73  Id: zeroblob.tes
0270: 74 2c 76 20 31 2e 31 33 20 32 30 30 38 2f 30 36  t,v 1.13 2008/06
0280: 2f 31 33 20 31 38 3a 32 34 3a 32 38 20 64 72 68  /13 18:24:28 drh
0290: 20 45 78 70 20 24 0a 0a 73 65 74 20 74 65 73 74   Exp $..set test
02a0: 64 69 72 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d  dir [file dirnam
02b0: 65 20 24 61 72 67 76 30 5d 0a 73 6f 75 72 63 65  e $argv0].source
02c0: 20 24 74 65 73 74 64 69 72 2f 74 65 73 74 65 72   $testdir/tester
02d0: 2e 74 63 6c 0a 0a 69 66 63 61 70 61 62 6c 65 20  .tcl..ifcapable 
02e0: 21 69 6e 63 72 62 6c 6f 62 20 7b 0a 20 20 66 69  !incrblob {.  fi
02f0: 6e 69 73 68 5f 74 65 73 74 0a 20 20 72 65 74 75  nish_test.  retu
0300: 72 6e 0a 7d 0a 0a 23 20 57 68 65 6e 20 7a 65 72  rn.}..# When zer
0310: 6f 62 6c 6f 62 28 29 20 69 73 20 75 73 65 64 20  oblob() is used 
0320: 66 6f 72 20 74 68 65 20 6c 61 73 74 20 66 69 65  for the last fie
0330: 6c 64 20 6f 66 20 61 20 63 6f 6c 75 6d 6e 2c 20  ld of a column, 
0340: 74 68 65 6e 20 74 68 65 0a 23 20 63 6f 6e 74 65  then the.# conte
0350: 6e 74 20 6f 66 20 74 68 65 20 7a 65 72 6f 62 6c  nt of the zerobl
0360: 6f 62 20 69 73 20 6e 65 76 65 72 20 69 6e 73 74  ob is never inst
0370: 61 6e 74 69 61 74 65 64 20 6f 6e 20 74 68 65 20  antiated on the 
0380: 56 44 42 45 20 73 74 61 63 6b 2e 0a 23 20 42 75  VDBE stack..# Bu
0390: 74 20 69 74 20 64 6f 65 73 20 67 65 74 20 69 6e  t it does get in
03a0: 73 65 72 74 65 64 20 69 6e 74 6f 20 74 68 65 20  serted into the 
03b0: 64 61 74 61 62 61 73 65 20 63 6f 72 72 65 63 74  database correct
03c0: 6c 79 2e 0a 23 0a 64 62 20 65 76 61 6c 20 7b 50  ly..#.db eval {P
03d0: 52 41 47 4d 41 20 63 61 63 68 65 5f 73 69 7a 65  RAGMA cache_size
03e0: 3d 31 30 7d 0a 73 71 6c 69 74 65 33 5f 6d 65 6d  =10}.sqlite3_mem
03f0: 6f 72 79 5f 68 69 67 68 77 61 74 65 72 20 31 0a  ory_highwater 1.
0400: 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69  unset -nocomplai
0410: 6e 20 6d 65 6d 75 73 65 64 0a 73 65 74 20 6d 65  n memused.set me
0420: 6d 75 73 65 64 20 5b 73 71 6c 69 74 65 33 5f 6d  mused [sqlite3_m
0430: 65 6d 6f 72 79 5f 75 73 65 64 5d 0a 64 6f 5f 74  emory_used].do_t
0440: 65 73 74 20 7a 65 72 6f 62 6c 6f 62 2d 31 2e 31  est zeroblob-1.1
0450: 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20   {.  execsql {. 
0460: 20 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20     CREATE TABLE 
0470: 74 31 28 61 2c 62 2c 63 2c 64 29 3b 0a 20 20 7d  t1(a,b,c,d);.  }
0480: 0a 20 20 73 65 74 20 3a 3a 73 71 6c 69 74 65 33  .  set ::sqlite3
0490: 5f 6d 61 78 5f 62 6c 6f 62 73 69 7a 65 20 30 0a  _max_blobsize 0.
04a0: 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20    execsql {.    
04b0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 56  INSERT INTO t1 V
04c0: 41 4c 55 45 53 28 32 2c 33 2c 34 2c 7a 65 72 6f  ALUES(2,3,4,zero
04d0: 62 6c 6f 62 28 31 30 30 30 30 30 30 29 29 3b 0a  blob(1000000));.
04e0: 20 20 7d 0a 20 20 73 65 74 20 3a 3a 73 71 6c 69    }.  set ::sqli
04f0: 74 65 33 5f 6d 61 78 5f 62 6c 6f 62 73 69 7a 65  te3_max_blobsize
0500: 0a 7d 20 7b 31 30 7d 0a 64 6f 5f 74 65 73 74 20  .} {10}.do_test 
0510: 7a 65 72 6f 62 6c 6f 62 2d 31 2e 31 2e 31 20 7b  zeroblob-1.1.1 {
0520: 0a 20 20 65 78 70 72 20 7b 5b 73 71 6c 69 74 65  .  expr {[sqlite
0530: 33 5f 6d 65 6d 6f 72 79 5f 68 69 67 68 77 61 74  3_memory_highwat
0540: 65 72 5d 3c 24 3a 3a 6d 65 6d 75 73 65 64 2b 32  er]<$::memused+2
0550: 35 30 30 30 7d 0a 7d 20 7b 31 7d 0a 64 6f 5f 74  5000}.} {1}.do_t
0560: 65 73 74 20 7a 65 72 6f 62 6c 6f 62 2d 31 2e 32  est zeroblob-1.2
0570: 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20   {.  execsql {. 
0580: 20 20 20 53 45 4c 45 43 54 20 6c 65 6e 67 74 68     SELECT length
0590: 28 64 29 20 46 52 4f 4d 20 74 31 0a 20 20 7d 0a  (d) FROM t1.  }.
05a0: 7d 20 7b 31 30 30 30 30 30 30 7d 0a 0a 23 20 49  } {1000000}..# I
05b0: 66 20 61 20 6e 6f 6e 2d 4e 55 4c 4c 20 63 6f 6c  f a non-NULL col
05c0: 75 6d 6e 20 66 6f 6c 6c 6f 77 73 20 74 68 65 20  umn follows the 
05d0: 7a 65 72 6f 62 6c 6f 62 2c 20 74 68 65 6e 20 74  zeroblob, then t
05e0: 68 65 20 63 6f 6e 74 65 6e 74 20 6f 66 0a 23 20  he content of.# 
05f0: 74 68 65 20 7a 65 72 6f 62 6c 6f 62 20 6d 75 73  the zeroblob mus
0600: 74 20 62 65 20 69 6e 73 74 61 6e 74 69 61 74 65  t be instantiate
0610: 64 2e 0a 23 0a 64 6f 5f 74 65 73 74 20 7a 65 72  d..#.do_test zer
0620: 6f 62 6c 6f 62 2d 31 2e 33 20 7b 0a 20 20 73 65  oblob-1.3 {.  se
0630: 74 20 3a 3a 73 71 6c 69 74 65 33 5f 6d 61 78 5f  t ::sqlite3_max_
0640: 62 6c 6f 62 73 69 7a 65 20 30 0a 20 20 65 78 65  blobsize 0.  exe
0650: 63 73 71 6c 20 7b 0a 20 20 20 20 49 4e 53 45 52  csql {.    INSER
0660: 54 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53  T INTO t1 VALUES
0670: 28 33 2c 34 2c 7a 65 72 6f 62 6c 6f 62 28 31 30  (3,4,zeroblob(10
0680: 30 30 30 29 2c 35 29 3b 0a 20 20 7d 0a 20 20 73  000),5);.  }.  s
0690: 65 74 20 3a 3a 73 71 6c 69 74 65 33 5f 6d 61 78  et ::sqlite3_max
06a0: 5f 62 6c 6f 62 73 69 7a 65 0a 7d 20 7b 31 30 30  _blobsize.} {100
06b0: 31 30 7d 0a 64 6f 5f 74 65 73 74 20 7a 65 72 6f  10}.do_test zero
06c0: 62 6c 6f 62 2d 31 2e 34 20 7b 0a 20 20 65 78 65  blob-1.4 {.  exe
06d0: 63 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43  csql {.    SELEC
06e0: 54 20 6c 65 6e 67 74 68 28 63 29 2c 20 6c 65 6e  T length(c), len
06f0: 67 74 68 28 64 29 20 46 52 4f 4d 20 74 31 0a 20  gth(d) FROM t1. 
0700: 20 7d 0a 7d 20 7b 31 20 31 30 30 30 30 30 30 20   }.} {1 1000000 
0710: 31 30 30 30 30 20 31 7d 0a 0a 23 20 4d 75 6c 74  10000 1}..# Mult
0720: 69 70 6c 65 20 7a 65 72 6f 62 6c 6f 62 73 20 63  iple zeroblobs c
0730: 61 6e 20 61 70 70 65 61 72 20 61 74 20 74 68 65  an appear at the
0740: 20 65 6e 64 20 6f 66 20 72 65 63 6f 72 64 2e 20   end of record. 
0750: 20 4e 6f 20 69 6e 73 74 61 6e 74 69 61 74 69 6f   No instantiatio
0760: 6e 0a 23 20 6f 66 20 74 68 65 20 62 6c 6f 62 20  n.# of the blob 
0770: 63 6f 6e 74 65 6e 74 20 6f 63 63 75 72 73 20 6f  content occurs o
0780: 6e 20 74 68 65 20 73 74 61 63 6b 2e 0a 23 0a 64  n the stack..#.d
0790: 6f 5f 74 65 73 74 20 7a 65 72 6f 62 6c 6f 62 2d  o_test zeroblob-
07a0: 31 2e 35 20 7b 0a 20 20 73 65 74 20 3a 3a 73 71  1.5 {.  set ::sq
07b0: 6c 69 74 65 33 5f 6d 61 78 5f 62 6c 6f 62 73 69  lite3_max_blobsi
07c0: 7a 65 20 30 0a 20 20 65 78 65 63 73 71 6c 20 7b  ze 0.  execsql {
07d0: 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f  .    INSERT INTO
07e0: 20 74 31 20 56 41 4c 55 45 53 28 34 2c 35 2c 7a   t1 VALUES(4,5,z
07f0: 65 72 6f 62 6c 6f 62 28 31 30 30 30 30 29 2c 7a  eroblob(10000),z
0800: 65 72 6f 62 6c 6f 62 28 31 30 30 30 30 29 29 3b  eroblob(10000));
0810: 0a 20 20 7d 0a 20 20 73 65 74 20 3a 3a 73 71 6c  .  }.  set ::sql
0820: 69 74 65 33 5f 6d 61 78 5f 62 6c 6f 62 73 69 7a  ite3_max_blobsiz
0830: 65 0a 7d 20 7b 31 31 7d 0a 64 6f 5f 74 65 73 74  e.} {11}.do_test
0840: 20 7a 65 72 6f 62 6c 6f 62 2d 31 2e 36 20 7b 0a   zeroblob-1.6 {.
0850: 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20    execsql {.    
0860: 53 45 4c 45 43 54 20 6c 65 6e 67 74 68 28 63 29  SELECT length(c)
0870: 2c 20 6c 65 6e 67 74 68 28 64 29 20 46 52 4f 4d  , length(d) FROM
0880: 20 74 31 0a 20 20 7d 0a 7d 20 7b 31 20 31 30 30   t1.  }.} {1 100
0890: 30 30 30 30 20 31 30 30 30 30 20 31 20 31 30 30  0000 10000 1 100
08a0: 30 30 20 31 30 30 30 30 7d 0a 0a 23 20 4e 55 4c  00 10000}..# NUL
08b0: 4c 73 20 63 61 6e 20 66 6f 6c 6c 6f 77 20 74 68  Ls can follow th
08c0: 65 20 7a 65 72 6f 62 6c 6f 62 28 29 20 6f 72 20  e zeroblob() or 
08d0: 62 65 20 69 6e 74 65 72 6d 69 78 65 64 20 77 69  be intermixed wi
08e0: 74 68 20 7a 65 72 6f 62 6c 6f 62 73 20 61 6e 64  th zeroblobs and
08f0: 0a 23 20 6e 6f 20 69 6e 73 74 61 6e 74 69 61 74  .# no instantiat
0900: 69 6f 6e 20 6f 66 20 74 68 65 20 7a 65 72 6f 62  ion of the zerob
0910: 6c 6f 62 73 20 6f 63 63 75 72 73 20 6f 6e 20 74  lobs occurs on t
0920: 68 65 20 73 74 61 63 6b 2e 0a 23 0a 64 6f 5f 74  he stack..#.do_t
0930: 65 73 74 20 7a 65 72 6f 62 6c 6f 62 2d 31 2e 37  est zeroblob-1.7
0940: 20 7b 0a 20 20 73 65 74 20 3a 3a 73 71 6c 69 74   {.  set ::sqlit
0950: 65 33 5f 6d 61 78 5f 62 6c 6f 62 73 69 7a 65 20  e3_max_blobsize 
0960: 30 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20  0.  execsql {.  
0970: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31    INSERT INTO t1
0980: 20 56 41 4c 55 45 53 28 35 2c 7a 65 72 6f 62 6c   VALUES(5,zerobl
0990: 6f 62 28 31 30 30 30 30 29 2c 4e 55 4c 4c 2c 7a  ob(10000),NULL,z
09a0: 65 72 6f 62 6c 6f 62 28 31 30 30 30 30 29 29 3b  eroblob(10000));
09b0: 0a 20 20 7d 0a 20 20 73 65 74 20 3a 3a 73 71 6c  .  }.  set ::sql
09c0: 69 74 65 33 5f 6d 61 78 5f 62 6c 6f 62 73 69 7a  ite3_max_blobsiz
09d0: 65 0a 7d 20 7b 31 30 7d 0a 64 6f 5f 74 65 73 74  e.} {10}.do_test
09e0: 20 7a 65 72 6f 62 6c 6f 62 2d 31 2e 38 20 7b 0a   zeroblob-1.8 {.
09f0: 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20    execsql {.    
0a00: 53 45 4c 45 43 54 20 6c 65 6e 67 74 68 28 62 29  SELECT length(b)
0a10: 2c 20 6c 65 6e 67 74 68 28 64 29 20 46 52 4f 4d  , length(d) FROM
0a20: 20 74 31 20 57 48 45 52 45 20 61 3d 35 0a 20 20   t1 WHERE a=5.  
0a30: 7d 0a 7d 20 7b 31 30 30 30 30 20 31 30 30 30 30  }.} {10000 10000
0a40: 7d 0a 0a 23 20 43 6f 6d 70 61 72 69 73 6f 6e 73  }..# Comparisons
0a50: 20 61 67 61 69 6e 73 74 20 7a 65 72 6f 62 6c 6f   against zeroblo
0a60: 62 73 20 77 6f 72 6b 2e 0a 23 0a 64 6f 5f 74 65  bs work..#.do_te
0a70: 73 74 20 7a 65 72 6f 62 6c 6f 62 2d 32 2e 31 20  st zeroblob-2.1 
0a80: 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20  {.  execsql {.  
0a90: 20 20 53 45 4c 45 43 54 20 61 20 46 52 4f 4d 20    SELECT a FROM 
0aa0: 74 31 20 57 48 45 52 45 20 62 3d 7a 65 72 6f 62  t1 WHERE b=zerob
0ab0: 6c 6f 62 28 31 30 30 30 30 29 0a 20 20 7d 0a 7d  lob(10000).  }.}
0ac0: 20 7b 35 7d 0a 0a 23 20 43 6f 6d 70 61 72 69 73   {5}..# Comparis
0ad0: 6f 6e 73 20 61 67 61 69 6e 73 74 20 7a 65 72 6f  ons against zero
0ae0: 62 6c 6f 62 73 20 77 6f 72 6b 20 65 76 65 6e 20  blobs work even 
0af0: 77 68 65 6e 20 69 6e 64 65 78 65 64 2e 0a 23 0a  when indexed..#.
0b00: 64 6f 5f 74 65 73 74 20 7a 65 72 6f 62 6c 6f 62  do_test zeroblob
0b10: 2d 32 2e 32 20 7b 0a 20 20 65 78 65 63 73 71 6c  -2.2 {.  execsql
0b20: 20 7b 0a 20 20 20 20 43 52 45 41 54 45 20 49 4e   {.    CREATE IN
0b30: 44 45 58 20 69 31 5f 31 20 4f 4e 20 74 31 28 62  DEX i1_1 ON t1(b
0b40: 29 3b 0a 20 20 20 20 53 45 4c 45 43 54 20 61 20  );.    SELECT a 
0b50: 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20 62 3d  FROM t1 WHERE b=
0b60: 7a 65 72 6f 62 6c 6f 62 28 31 30 30 30 30 29 3b  zeroblob(10000);
0b70: 0a 20 20 7d 0a 7d 20 7b 35 7d 0a 0a 23 20 44 49  .  }.} {5}..# DI
0b80: 53 54 49 4e 43 54 20 77 6f 72 6b 73 20 66 6f 72  STINCT works for
0b90: 20 7a 65 72 6f 62 6c 6f 62 73 0a 23 0a 69 66 63   zeroblobs.#.ifc
0ba0: 61 70 61 62 6c 65 20 62 6c 6f 62 6c 69 74 26 26  apable bloblit&&
0bb0: 73 75 62 71 75 65 72 79 26 26 63 6f 6d 70 6f 75  subquery&&compou
0bc0: 6e 64 20 7b 0a 20 20 64 6f 5f 74 65 73 74 20 7a  nd {.  do_test z
0bd0: 65 72 6f 62 6c 6f 62 2d 33 2e 31 20 7b 0a 20 20  eroblob-3.1 {.  
0be0: 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20    execsql {.    
0bf0: 20 20 53 45 4c 45 43 54 20 63 6f 75 6e 74 28 44    SELECT count(D
0c00: 49 53 54 49 4e 43 54 20 61 29 20 46 52 4f 4d 20  ISTINCT a) FROM 
0c10: 28 0a 20 20 20 20 20 20 20 20 53 45 4c 45 43 54  (.        SELECT
0c20: 20 78 27 30 30 30 30 30 30 30 30 30 30 30 30 30   x'0000000000000
0c30: 30 30 30 30 30 30 30 27 20 41 53 20 61 0a 20 20  0000000' AS a.  
0c40: 20 20 20 20 20 20 55 4e 49 4f 4e 20 41 4c 4c 0a        UNION ALL.
0c50: 20 20 20 20 20 20 20 20 53 45 4c 45 43 54 20 7a          SELECT z
0c60: 65 72 6f 62 6c 6f 62 28 31 30 29 20 41 53 20 61  eroblob(10) AS a
0c70: 0a 20 20 20 20 20 20 29 0a 20 20 20 20 7d 0a 20  .      ).    }. 
0c80: 20 7d 20 7b 31 7d 0a 7d 0a 0a 23 20 43 6f 6e 63   } {1}.}..# Conc
0c90: 61 74 65 6e 74 61 74 69 6f 6e 20 77 6f 72 6b 73  atentation works
0ca0: 20 77 69 74 68 20 7a 65 72 6f 62 6c 6f 62 0a 23   with zeroblob.#
0cb0: 0a 69 66 63 61 70 61 62 6c 65 20 62 6c 6f 62 6c  .ifcapable blobl
0cc0: 69 74 20 7b 0a 20 20 64 6f 5f 74 65 73 74 20 7a  it {.  do_test z
0cd0: 65 72 6f 62 6c 6f 62 2d 34 2e 31 20 7b 0a 20 20  eroblob-4.1 {.  
0ce0: 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20    execsql {.    
0cf0: 20 20 53 45 4c 45 43 54 20 68 65 78 28 7a 65 72    SELECT hex(zer
0d00: 6f 62 6c 6f 62 28 32 29 20 7c 7c 20 78 27 36 31  oblob(2) || x'61
0d10: 27 29 0a 20 20 20 20 7d 0a 20 20 7d 20 7b 30 30  ').    }.  } {00
0d20: 30 30 36 31 7d 0a 7d 0a 0a 23 20 43 68 65 63 6b  0061}.}..# Check
0d30: 20 76 61 72 69 6f 75 73 20 43 41 53 54 28 2e 2e   various CAST(..
0d40: 2e 29 20 6f 70 65 72 61 74 69 6f 6e 73 20 6f 6e  .) operations on
0d50: 20 7a 65 72 6f 62 6c 6f 62 2e 0a 23 0a 64 6f 5f   zeroblob..#.do_
0d60: 74 65 73 74 20 7a 65 72 6f 62 6c 6f 62 2d 35 2e  test zeroblob-5.
0d70: 31 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a  1 {.  execsql {.
0d80: 20 20 20 20 53 45 4c 45 43 54 20 43 41 53 54 20      SELECT CAST 
0d90: 28 7a 65 72 6f 62 6c 6f 62 28 31 30 30 29 20 41  (zeroblob(100) A
0da0: 53 20 52 45 41 4c 29 3b 0a 20 20 7d 0a 7d 20 7b  S REAL);.  }.} {
0db0: 30 2e 30 7d 0a 64 6f 5f 74 65 73 74 20 7a 65 72  0.0}.do_test zer
0dc0: 6f 62 6c 6f 62 2d 35 2e 32 20 7b 0a 20 20 65 78  oblob-5.2 {.  ex
0dd0: 65 63 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45  ecsql {.    SELE
0de0: 43 54 20 43 41 53 54 20 28 7a 65 72 6f 62 6c 6f  CT CAST (zeroblo
0df0: 62 28 31 30 30 29 20 41 53 20 49 4e 54 45 47 45  b(100) AS INTEGE
0e00: 52 29 3b 0a 20 20 7d 0a 7d 20 7b 30 7d 0a 64 6f  R);.  }.} {0}.do
0e10: 5f 74 65 73 74 20 7a 65 72 6f 62 6c 6f 62 2d 35  _test zeroblob-5
0e20: 2e 33 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b  .3 {.  execsql {
0e30: 0a 20 20 20 20 53 45 4c 45 43 54 20 43 41 53 54  .    SELECT CAST
0e40: 20 28 7a 65 72 6f 62 6c 6f 62 28 31 30 30 29 20   (zeroblob(100) 
0e50: 41 53 20 54 45 58 54 29 3b 0a 20 20 7d 0a 7d 20  AS TEXT);.  }.} 
0e60: 7b 7b 7d 7d 0a 64 6f 5f 74 65 73 74 20 7a 65 72  {{}}.do_test zer
0e70: 6f 62 6c 6f 62 2d 35 2e 34 20 7b 0a 20 20 65 78  oblob-5.4 {.  ex
0e80: 65 63 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45  ecsql {.    SELE
0e90: 43 54 20 43 41 53 54 28 7a 65 72 6f 62 6c 6f 62  CT CAST(zeroblob
0ea0: 28 31 30 30 29 20 41 53 20 42 4c 4f 42 29 3b 0a  (100) AS BLOB);.
0eb0: 20 20 7d 0a 7d 20 5b 65 78 65 63 73 71 6c 20 7b    }.} [execsql {
0ec0: 53 45 4c 45 43 54 20 7a 65 72 6f 62 6c 6f 62 28  SELECT zeroblob(
0ed0: 31 30 30 29 7d 5d 0a 20 20 0a 0a 23 20 43 68 65  100)}].  ..# Che
0ee0: 63 6b 20 66 6f 72 20 6d 61 6c 69 63 69 6f 75 73  ck for malicious
0ef0: 20 75 73 65 20 6f 66 20 7a 65 72 6f 62 6c 6f 62   use of zeroblob
0f00: 2e 20 20 4d 61 6b 65 20 73 75 72 65 20 6e 6f 74  .  Make sure not
0f10: 68 69 6e 67 20 63 72 61 73 68 65 73 2e 0a 23 0a  hing crashes..#.
0f20: 64 6f 5f 74 65 73 74 20 7a 65 72 6f 62 6c 6f 62  do_test zeroblob
0f30: 2d 36 2e 31 2e 31 20 7b 20 0a 20 20 65 78 65 63  -6.1.1 { .  exec
0f40: 73 71 6c 20 7b 73 65 6c 65 63 74 20 7a 65 72 6f  sql {select zero
0f50: 62 6c 6f 62 28 2d 31 29 7d 20 0a 7d 20 7b 7b 7d  blob(-1)} .} {{}
0f60: 7d 20 0a 64 6f 5f 74 65 73 74 20 7a 65 72 6f 62  } .do_test zerob
0f70: 6c 6f 62 2d 36 2e 31 2e 32 20 7b 20 0a 20 20 65  lob-6.1.2 { .  e
0f80: 78 65 63 73 71 6c 20 7b 73 65 6c 65 63 74 20 7a  xecsql {select z
0f90: 65 72 6f 62 6c 6f 62 28 2d 31 30 29 7d 20 0a 7d  eroblob(-10)} .}
0fa0: 20 7b 7b 7d 7d 20 0a 64 6f 5f 74 65 73 74 20 7a   {{}} .do_test z
0fb0: 65 72 6f 62 6c 6f 62 2d 36 2e 31 2e 33 20 7b 20  eroblob-6.1.3 { 
0fc0: 0a 20 20 65 78 65 63 73 71 6c 20 7b 73 65 6c 65  .  execsql {sele
0fd0: 63 74 20 7a 65 72 6f 62 6c 6f 62 28 2d 31 30 30  ct zeroblob(-100
0fe0: 29 7d 20 0a 7d 20 7b 7b 7d 7d 20 0a 64 6f 5f 74  )} .} {{}} .do_t
0ff0: 65 73 74 20 7a 65 72 6f 62 6c 6f 62 2d 36 2e 32  est zeroblob-6.2
1000: 20 7b 20 0a 20 20 65 78 65 63 73 71 6c 20 7b 73   { .  execsql {s
1010: 65 6c 65 63 74 20 6c 65 6e 67 74 68 28 7a 65 72  elect length(zer
1020: 6f 62 6c 6f 62 28 2d 31 29 29 7d 20 0a 7d 20 7b  oblob(-1))} .} {
1030: 30 7d 20 0a 64 6f 5f 74 65 73 74 20 7a 65 72 6f  0} .do_test zero
1040: 62 6c 6f 62 2d 36 2e 33 20 7b 20 0a 20 20 65 78  blob-6.3 { .  ex
1050: 65 63 73 71 6c 20 7b 73 65 6c 65 63 74 20 7a 65  ecsql {select ze
1060: 72 6f 62 6c 6f 62 28 2d 31 29 7c 31 7d 20 0a 7d  roblob(-1)|1} .}
1070: 20 7b 31 7d 20 0a 64 6f 5f 74 65 73 74 20 7a 65   {1} .do_test ze
1080: 72 6f 62 6c 6f 62 2d 36 2e 34 20 7b 20 0a 20 20  roblob-6.4 { .  
1090: 63 61 74 63 68 73 71 6c 20 7b 73 65 6c 65 63 74  catchsql {select
10a0: 20 6c 65 6e 67 74 68 28 7a 65 72 6f 62 6c 6f 62   length(zeroblob
10b0: 28 32 31 34 37 34 38 33 36 34 38 29 29 7d 20 0a  (2147483648))} .
10c0: 7d 20 7b 31 20 7b 73 74 72 69 6e 67 20 6f 72 20  } {1 {string or 
10d0: 62 6c 6f 62 20 74 6f 6f 20 62 69 67 7d 7d 20 0a  blob too big}} .
10e0: 64 6f 5f 74 65 73 74 20 7a 65 72 6f 62 6c 6f 62  do_test zeroblob
10f0: 2d 36 2e 35 20 7b 20 0a 20 20 63 61 74 63 68 73  -6.5 { .  catchs
1100: 71 6c 20 7b 73 65 6c 65 63 74 20 7a 65 72 6f 62  ql {select zerob
1110: 6c 6f 62 28 32 31 34 37 34 38 33 36 34 38 29 7d  lob(2147483648)}
1120: 20 0a 7d 20 7b 31 20 7b 73 74 72 69 6e 67 20 6f   .} {1 {string o
1130: 72 20 62 6c 6f 62 20 74 6f 6f 20 62 69 67 7d 7d  r blob too big}}
1140: 0a 64 6f 5f 74 65 73 74 20 7a 65 72 6f 62 6c 6f  .do_test zeroblo
1150: 62 2d 36 2e 36 20 7b 0a 20 20 65 78 65 63 73 71  b-6.6 {.  execsq
1160: 6c 20 7b 73 65 6c 65 63 74 20 68 65 78 28 7a 65  l {select hex(ze
1170: 72 6f 62 6c 6f 62 28 2d 31 29 29 7d 0a 7d 20 7b  roblob(-1))}.} {
1180: 7b 7d 7d 0a 64 6f 5f 74 65 73 74 20 7a 65 72 6f  {}}.do_test zero
1190: 62 6c 6f 62 2d 36 2e 37 20 7b 0a 20 20 65 78 65  blob-6.7 {.  exe
11a0: 63 73 71 6c 20 7b 73 65 6c 65 63 74 20 74 79 70  csql {select typ
11b0: 65 6f 66 28 7a 65 72 6f 62 6c 6f 62 28 2d 31 29  eof(zeroblob(-1)
11c0: 29 7d 0a 7d 20 7b 62 6c 6f 62 7d 0a 0a 23 20 54  )}.} {blob}..# T
11d0: 65 73 74 20 62 69 6e 64 5f 7a 65 72 6f 62 6c 6f  est bind_zeroblo
11e0: 62 28 29 0a 23 0a 73 71 6c 69 74 65 33 5f 6d 65  b().#.sqlite3_me
11f0: 6d 6f 72 79 5f 68 69 67 68 77 61 74 65 72 20 31  mory_highwater 1
1200: 0a 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61  .unset -nocompla
1210: 69 6e 20 6d 65 6d 75 73 65 64 0a 73 65 74 20 6d  in memused.set m
1220: 65 6d 75 73 65 64 20 5b 73 71 6c 69 74 65 33 5f  emused [sqlite3_
1230: 6d 65 6d 6f 72 79 5f 75 73 65 64 5d 0a 64 6f 5f  memory_used].do_
1240: 74 65 73 74 20 7a 65 72 6f 62 6c 6f 62 2d 37 2e  test zeroblob-7.
1250: 31 20 7b 0a 20 20 73 65 74 20 3a 3a 53 54 4d 54  1 {.  set ::STMT
1260: 20 5b 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72   [sqlite3_prepar
1270: 65 20 24 3a 3a 44 42 20 22 53 45 4c 45 43 54 20  e $::DB "SELECT 
1280: 6c 65 6e 67 74 68 28 3f 29 22 20 2d 31 20 44 55  length(?)" -1 DU
1290: 4d 4d 59 5d 0a 20 20 73 65 74 20 3a 3a 73 71 6c  MMY].  set ::sql
12a0: 69 74 65 33 5f 6d 61 78 5f 62 6c 6f 62 73 69 7a  ite3_max_blobsiz
12b0: 65 20 30 0a 20 20 73 71 6c 69 74 65 33 5f 62 69  e 0.  sqlite3_bi
12c0: 6e 64 5f 7a 65 72 6f 62 6c 6f 62 20 24 3a 3a 53  nd_zeroblob $::S
12d0: 54 4d 54 20 31 20 34 35 30 30 30 30 0a 20 20 73  TMT 1 450000.  s
12e0: 71 6c 69 74 65 33 5f 73 74 65 70 20 24 3a 3a 53  qlite3_step $::S
12f0: 54 4d 54 0a 7d 20 7b 53 51 4c 49 54 45 5f 52 4f  TMT.} {SQLITE_RO
1300: 57 7d 0a 64 6f 5f 74 65 73 74 20 7a 65 72 6f 62  W}.do_test zerob
1310: 6c 6f 62 2d 37 2e 32 20 7b 0a 20 20 73 71 6c 69  lob-7.2 {.  sqli
1320: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 20 24  te3_column_int $
1330: 3a 3a 53 54 4d 54 20 30 0a 7d 20 7b 34 35 30 30  ::STMT 0.} {4500
1340: 30 30 7d 0a 64 6f 5f 74 65 73 74 20 7a 65 72 6f  00}.do_test zero
1350: 62 6c 6f 62 2d 37 2e 33 20 7b 0a 20 20 73 71 6c  blob-7.3 {.  sql
1360: 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 20 24 3a  ite3_finalize $:
1370: 3a 53 54 4d 54 0a 7d 20 7b 53 51 4c 49 54 45 5f  :STMT.} {SQLITE_
1380: 4f 4b 7d 0a 64 6f 5f 74 65 73 74 20 7a 65 72 6f  OK}.do_test zero
1390: 62 6c 6f 62 2d 37 2e 34 20 7b 0a 20 20 73 65 74  blob-7.4 {.  set
13a0: 20 3a 3a 73 71 6c 69 74 65 33 5f 6d 61 78 5f 62   ::sqlite3_max_b
13b0: 6c 6f 62 73 69 7a 65 0a 7d 20 7b 30 7d 0a 64 6f  lobsize.} {0}.do
13c0: 5f 74 65 73 74 20 7a 65 72 6f 62 6c 6f 62 2d 37  _test zeroblob-7
13d0: 2e 35 20 7b 0a 20 20 65 78 70 72 20 7b 5b 73 71  .5 {.  expr {[sq
13e0: 6c 69 74 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67  lite3_memory_hig
13f0: 68 77 61 74 65 72 5d 3c 24 3a 3a 6d 65 6d 75 73  hwater]<$::memus
1400: 65 64 2b 31 30 30 30 30 7d 0a 7d 20 7b 31 7d 0a  ed+10000}.} {1}.
1410: 0a 23 20 54 65 73 74 20 74 68 61 74 20 4d 61 6b  .# Test that Mak
1420: 65 52 65 63 6f 72 64 20 63 61 6e 20 68 61 6e 64  eRecord can hand
1430: 6c 65 20 61 20 76 61 6c 75 65 20 77 69 74 68 20  le a value with 
1440: 73 6f 6d 65 20 72 65 61 6c 20 63 6f 6e 74 65 6e  some real conten
1450: 74 0a 23 20 61 6e 64 20 61 20 7a 65 72 6f 2d 62  t.# and a zero-b
1460: 6c 6f 62 20 74 61 69 6c 2e 0a 23 0a 64 6f 5f 74  lob tail..#.do_t
1470: 65 73 74 20 7a 65 72 6f 62 6c 6f 62 2d 38 2e 31  est zeroblob-8.1
1480: 20 7b 0a 20 20 6c 6c 65 6e 67 74 68 20 5b 65 78   {.  llength [ex
1490: 65 63 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45  ecsql {.    SELE
14a0: 43 54 20 27 68 65 6c 6c 6f 27 20 41 53 20 61 2c  CT 'hello' AS a,
14b0: 20 7a 65 72 6f 62 6c 6f 62 28 31 30 29 20 61 73   zeroblob(10) as
14c0: 20 62 20 66 72 6f 6d 20 74 31 20 4f 52 44 45 52   b from t1 ORDER
14d0: 20 42 59 20 61 2c 20 62 3b 0a 20 20 7d 5d 0a 7d   BY a, b;.  }].}
14e0: 20 7b 38 7d 0a 0a 0a 66 69 6e 69 73 68 5f 74 65   {8}...finish_te
14f0: 73 74 0a                                         st.