/ Hex Artifact Content
Login

Artifact aa74f4e5db51c8e54a1d9de9fa65d01d1eb20b59:


0000: 23 20 32 30 30 32 20 4e 6f 76 65 6d 62 65 72 20  # 2002 November 
0010: 33 30 0a 23 0a 23 20 54 68 65 20 61 75 74 68 6f  30.#.# The autho
0020: 72 20 64 69 73 63 6c 61 69 6d 73 20 63 6f 70 79  r disclaims copy
0030: 72 69 67 68 74 20 74 6f 20 74 68 69 73 20 73 6f  right to this so
0040: 75 72 63 65 20 63 6f 64 65 2e 20 20 49 6e 20 70  urce code.  In p
0050: 6c 61 63 65 20 6f 66 0a 23 20 61 20 6c 65 67 61  lace of.# a lega
0060: 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72 65 20 69  l notice, here i
0070: 73 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a 23 0a  s a blessing:.#.
0080: 23 20 20 20 20 4d 61 79 20 79 6f 75 20 64 6f 20  #    May you do 
0090: 67 6f 6f 64 20 61 6e 64 20 6e 6f 74 20 65 76 69  good and not evi
00a0: 6c 2e 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20  l..#    May you 
00b0: 66 69 6e 64 20 66 6f 72 67 69 76 65 6e 65 73 73  find forgiveness
00c0: 20 66 6f 72 20 79 6f 75 72 73 65 6c 66 20 61 6e   for yourself an
00d0: 64 20 66 6f 72 67 69 76 65 20 6f 74 68 65 72 73  d forgive others
00e0: 2e 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20 73  ..#    May you s
00f0: 68 61 72 65 20 66 72 65 65 6c 79 2c 20 6e 65 76  hare freely, nev
0100: 65 72 20 74 61 6b 69 6e 67 20 6d 6f 72 65 20 74  er taking more t
0110: 68 61 6e 20 79 6f 75 20 67 69 76 65 2e 0a 23 0a  han you give..#.
0120: 23 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 2a 0a 23 20 54 68 69 73 20  ********.# This 
0170: 66 69 6c 65 20 69 6d 70 6c 65 6d 65 6e 74 73 20  file implements 
0180: 72 65 67 72 65 73 73 69 6f 6e 20 74 65 73 74 73  regression tests
0190: 20 66 6f 72 20 53 51 4c 69 74 65 20 6c 69 62 72   for SQLite libr
01a0: 61 72 79 2e 20 20 54 68 65 0a 23 20 66 6f 63 75  ary.  The.# focu
01b0: 73 20 6f 66 20 74 68 69 73 20 73 63 72 69 70 74  s of this script
01c0: 20 74 65 73 74 69 6e 67 20 74 68 65 20 61 62 69   testing the abi
01d0: 6c 69 74 79 20 6f 66 20 53 51 4c 69 74 65 20 74  lity of SQLite t
01e0: 6f 20 68 61 6e 64 6c 65 20 64 61 74 61 62 61 73  o handle databas
01f0: 65 0a 23 20 66 69 6c 65 73 20 6c 61 72 67 65 72  e.# files larger
0200: 20 74 68 61 6e 20 34 47 42 2e 0a 23 0a 23 20 24   than 4GB..#.# $
0210: 49 64 3a 20 62 69 67 66 69 6c 65 2e 74 65 73 74  Id: bigfile.test
0220: 2c 76 20 31 2e 31 32 20 32 30 30 39 2f 30 33 2f  ,v 1.12 2009/03/
0230: 30 35 20 30 34 3a 32 37 3a 30 38 20 73 68 61 6e  05 04:27:08 shan
0240: 65 20 45 78 70 20 24 0a 23 0a 0a 69 66 20 7b 5b  e Exp $.#..if {[
0250: 66 69 6c 65 20 65 78 69 73 74 73 20 73 6b 69 70  file exists skip
0260: 2d 62 69 67 2d 66 69 6c 65 5d 7d 20 72 65 74 75  -big-file]} retu
0270: 72 6e 0a 69 66 20 7b 24 74 63 6c 5f 70 6c 61 74  rn.if {$tcl_plat
0280: 66 6f 72 6d 28 6f 73 29 3d 3d 22 44 61 72 77 69  form(os)=="Darwi
0290: 6e 22 7d 20 72 65 74 75 72 6e 0a 0a 73 65 74 20  n"} return..set 
02a0: 74 65 73 74 64 69 72 20 5b 66 69 6c 65 20 64 69  testdir [file di
02b0: 72 6e 61 6d 65 20 24 61 72 67 76 30 5d 0a 73 6f  rname $argv0].so
02c0: 75 72 63 65 20 24 74 65 73 74 64 69 72 2f 74 65  urce $testdir/te
02d0: 73 74 65 72 2e 74 63 6c 0a 0a 23 20 44 6f 20 6e  ster.tcl..# Do n
02e0: 6f 74 20 75 73 65 20 61 20 63 6f 64 65 63 20 66  ot use a codec f
02f0: 6f 72 20 74 68 69 73 20 66 69 6c 65 2c 20 61 73  or this file, as
0300: 20 74 68 65 20 64 61 74 61 62 61 73 65 20 69 73   the database is
0310: 20 6d 61 6e 69 70 75 6c 61 74 65 64 20 75 73 69   manipulated usi
0320: 6e 67 0a 23 20 65 78 74 65 72 6e 61 6c 20 6d 65  ng.# external me
0330: 74 68 6f 64 73 20 28 74 68 65 20 5b 66 61 6b 65  thods (the [fake
0340: 5f 62 69 67 5f 66 69 6c 65 5d 20 61 6e 64 20 5b  _big_file] and [
0350: 68 65 78 69 6f 5f 77 72 69 74 65 5d 20 63 6f 6d  hexio_write] com
0360: 6d 61 6e 64 73 29 2e 0a 23 0a 64 6f 5f 6e 6f 74  mands)..#.do_not
0370: 5f 75 73 65 5f 63 6f 64 65 63 0a 0a 23 20 49 66  _use_codec..# If
0380: 20 53 51 4c 49 54 45 5f 44 49 53 41 42 4c 45 5f   SQLITE_DISABLE_
0390: 4c 46 53 20 69 73 20 64 65 66 69 6e 65 64 2c 20  LFS is defined, 
03a0: 6f 6d 69 74 20 74 68 69 73 20 66 69 6c 65 2e 0a  omit this file..
03b0: 69 66 63 61 70 61 62 6c 65 20 21 6c 66 73 20 7b  ifcapable !lfs {
03c0: 0a 20 20 66 69 6e 69 73 68 5f 74 65 73 74 0a 20  .  finish_test. 
03d0: 20 72 65 74 75 72 6e 0a 7d 0a 0a 23 20 54 68 65   return.}..# The
03e0: 73 65 20 74 65 73 74 73 20 6f 6e 6c 79 20 77 6f  se tests only wo
03f0: 72 6b 20 66 6f 72 20 54 63 6c 20 76 65 72 73 69  rk for Tcl versi
0400: 6f 6e 20 38 2e 34 20 61 6e 64 20 6c 61 74 65 72  on 8.4 and later
0410: 2e 20 20 50 72 69 6f 72 20 74 6f 20 38 2e 34 2c  .  Prior to 8.4,
0420: 0a 23 20 54 63 6c 20 77 61 73 20 75 6e 61 62 6c  .# Tcl was unabl
0430: 65 20 74 6f 20 68 61 6e 64 6c 65 20 6c 61 72 67  e to handle larg
0440: 65 20 66 69 6c 65 73 2e 0a 23 0a 73 63 61 6e 20  e files..#.scan 
0450: 24 3a 3a 74 63 6c 5f 76 65 72 73 69 6f 6e 20 25  $::tcl_version %
0460: 66 20 76 78 0a 69 66 20 7b 24 76 78 3c 38 2e 34  f vx.if {$vx<8.4
0470: 7d 20 72 65 74 75 72 6e 0a 0a 23 20 4d 61 63 20  } return..# Mac 
0480: 4f 53 20 58 20 64 6f 65 73 20 6e 6f 74 20 68 61  OS X does not ha
0490: 6e 64 6c 65 20 6c 61 72 67 65 20 66 69 6c 65 73  ndle large files
04a0: 20 65 66 66 69 63 69 65 6e 74 6c 79 2e 20 20 53   efficiently.  S
04b0: 6f 20 73 6b 69 70 20 74 68 69 73 20 74 65 73 74  o skip this test
04c0: 0a 23 20 6f 6e 20 74 68 61 74 20 70 6c 61 74 66  .# on that platf
04d0: 6f 72 6d 2e 0a 69 66 20 7b 24 74 63 6c 5f 70 6c  orm..if {$tcl_pl
04e0: 61 74 66 6f 72 6d 28 6f 73 29 3d 3d 22 44 61 72  atform(os)=="Dar
04f0: 77 69 6e 22 7d 20 72 65 74 75 72 6e 0a 0a 23 20  win"} return..# 
0500: 54 68 69 73 20 69 73 20 74 68 65 20 6d 64 35 20  This is the md5 
0510: 63 68 65 63 6b 73 75 6d 20 6f 66 20 61 6c 6c 20  checksum of all 
0520: 74 68 65 20 64 61 74 61 20 69 6e 20 74 61 62 6c  the data in tabl
0530: 65 20 74 31 20 61 73 20 63 72 65 61 74 65 64 0a  e t1 as created.
0540: 23 20 62 79 20 74 68 65 20 66 69 72 73 74 20 74  # by the first t
0550: 65 73 74 2e 20 20 57 65 20 77 69 6c 6c 20 75 73  est.  We will us
0560: 65 20 74 68 69 73 20 6e 75 6d 62 65 72 20 74 6f  e this number to
0570: 20 6d 61 6b 65 20 73 75 72 65 20 74 68 61 74 20   make sure that 
0580: 64 61 74 61 0a 23 20 6e 65 76 65 72 20 63 68 61  data.# never cha
0590: 6e 67 65 73 2e 0a 23 0a 73 65 74 20 4d 41 47 49  nges..#.set MAGI
05a0: 43 5f 53 55 4d 20 7b 35 39 33 66 31 65 66 63 66  C_SUM {593f1efcf
05b0: 64 62 65 36 39 38 63 32 38 62 34 62 31 62 36 39  dbe698c28b4b1b69
05c0: 33 66 37 65 34 63 66 7d 0a 0a 64 6f 5f 74 65 73  3f7e4cf}..do_tes
05d0: 74 20 62 69 67 66 69 6c 65 2d 31 2e 31 20 7b 0a  t bigfile-1.1 {.
05e0: 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20    execsql {.    
05f0: 42 45 47 49 4e 3b 0a 20 20 20 20 43 52 45 41 54  BEGIN;.    CREAT
0600: 45 20 54 41 42 4c 45 20 74 31 28 78 29 3b 0a 20  E TABLE t1(x);. 
0610: 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74     INSERT INTO t
0620: 31 20 56 41 4c 55 45 53 28 27 61 62 63 64 65 66  1 VALUES('abcdef
0630: 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74 75 76  ghijklmnopqrstuv
0640: 77 78 79 7a 27 29 3b 0a 20 20 20 20 49 4e 53 45  wxyz');.    INSE
0650: 52 54 20 49 4e 54 4f 20 74 31 20 53 45 4c 45 43  RT INTO t1 SELEC
0660: 54 20 72 6f 77 69 64 20 7c 7c 20 27 20 27 20 7c  T rowid || ' ' |
0670: 7c 20 78 20 46 52 4f 4d 20 74 31 3b 0a 20 20 20  | x FROM t1;.   
0680: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20   INSERT INTO t1 
0690: 53 45 4c 45 43 54 20 72 6f 77 69 64 20 7c 7c 20  SELECT rowid || 
06a0: 27 20 27 20 7c 7c 20 78 20 46 52 4f 4d 20 74 31  ' ' || x FROM t1
06b0: 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54  ;.    INSERT INT
06c0: 4f 20 74 31 20 53 45 4c 45 43 54 20 72 6f 77 69  O t1 SELECT rowi
06d0: 64 20 7c 7c 20 27 20 27 20 7c 7c 20 78 20 46 52  d || ' ' || x FR
06e0: 4f 4d 20 74 31 3b 0a 20 20 20 20 49 4e 53 45 52  OM t1;.    INSER
06f0: 54 20 49 4e 54 4f 20 74 31 20 53 45 4c 45 43 54  T INTO t1 SELECT
0700: 20 72 6f 77 69 64 20 7c 7c 20 27 20 27 20 7c 7c   rowid || ' ' ||
0710: 20 78 20 46 52 4f 4d 20 74 31 3b 0a 20 20 20 20   x FROM t1;.    
0720: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53  INSERT INTO t1 S
0730: 45 4c 45 43 54 20 72 6f 77 69 64 20 7c 7c 20 27  ELECT rowid || '
0740: 20 27 20 7c 7c 20 78 20 46 52 4f 4d 20 74 31 3b   ' || x FROM t1;
0750: 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f  .    INSERT INTO
0760: 20 74 31 20 53 45 4c 45 43 54 20 72 6f 77 69 64   t1 SELECT rowid
0770: 20 7c 7c 20 27 20 27 20 7c 7c 20 78 20 46 52 4f   || ' ' || x FRO
0780: 4d 20 74 31 3b 0a 20 20 20 20 49 4e 53 45 52 54  M t1;.    INSERT
0790: 20 49 4e 54 4f 20 74 31 20 53 45 4c 45 43 54 20   INTO t1 SELECT 
07a0: 72 6f 77 69 64 20 7c 7c 20 27 20 27 20 7c 7c 20  rowid || ' ' || 
07b0: 78 20 46 52 4f 4d 20 74 31 3b 0a 20 20 20 20 43  x FROM t1;.    C
07c0: 4f 4d 4d 49 54 3b 0a 20 20 7d 0a 20 20 65 78 65  OMMIT;.  }.  exe
07d0: 63 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43  csql {.    SELEC
07e0: 54 20 6d 64 35 73 75 6d 28 78 29 20 46 52 4f 4d  T md5sum(x) FROM
07f0: 20 74 31 3b 0a 20 20 7d 0a 7d 20 24 3a 3a 4d 41   t1;.  }.} $::MA
0800: 47 49 43 5f 53 55 4d 0a 0a 23 20 54 72 79 20 74  GIC_SUM..# Try t
0810: 6f 20 63 72 65 61 74 65 20 61 20 6c 61 72 67 65  o create a large
0820: 20 66 69 6c 65 20 2d 20 61 20 66 69 6c 65 20 74   file - a file t
0830: 68 61 74 20 69 73 20 6c 61 72 67 65 72 20 74 68  hat is larger th
0840: 61 6e 20 32 5e 33 32 20 62 79 74 65 73 2e 0a 23  an 2^32 bytes..#
0850: 20 49 66 20 74 68 69 73 20 66 61 69 6c 73 2c 20   If this fails, 
0860: 69 74 20 6d 65 61 6e 73 20 74 68 61 74 20 74 68  it means that th
0870: 65 20 73 79 73 74 65 6d 20 62 65 69 6e 67 20 74  e system being t
0880: 65 73 74 65 64 20 64 6f 65 73 20 6e 6f 74 20 73  ested does not s
0890: 75 70 70 6f 72 74 0a 23 20 6c 61 72 67 65 20 66  upport.# large f
08a0: 69 6c 65 73 2e 20 20 53 6f 20 73 6b 69 70 20 61  iles.  So skip a
08b0: 6c 6c 20 6f 66 20 74 68 65 20 72 65 6d 61 69 6e  ll of the remain
08c0: 69 6e 67 20 74 65 73 74 73 20 69 6e 20 74 68 69  ing tests in thi
08d0: 73 20 66 69 6c 65 2e 0a 23 0a 64 62 20 63 6c 6f  s file..#.db clo
08e0: 73 65 0a 69 66 20 7b 5b 63 61 74 63 68 20 7b 66  se.if {[catch {f
08f0: 61 6b 65 5f 62 69 67 5f 66 69 6c 65 20 34 30 39  ake_big_file 409
0900: 36 20 5b 67 65 74 5f 70 77 64 5d 2f 74 65 73 74  6 [get_pwd]/test
0910: 2e 64 62 7d 20 6d 73 67 5d 7d 20 7b 0a 20 20 70  .db} msg]} {.  p
0920: 75 74 73 20 22 2a 2a 2a 2a 20 55 6e 61 62 6c 65  uts "**** Unable
0930: 20 74 6f 20 63 72 65 61 74 65 20 61 20 66 69 6c   to create a fil
0940: 65 20 6c 61 72 67 65 72 20 74 68 61 6e 20 34 30  e larger than 40
0950: 39 36 20 4d 42 2e 20 2a 2a 2a 2a 2a 22 0a 20 20  96 MB. *****".  
0960: 66 69 6e 69 73 68 5f 74 65 73 74 0a 20 20 72 65  finish_test.  re
0970: 74 75 72 6e 0a 7d 0a 68 65 78 69 6f 5f 77 72 69  turn.}.hexio_wri
0980: 74 65 20 74 65 73 74 2e 64 62 20 32 38 20 30 30  te test.db 28 00
0990: 30 30 30 30 30 30 0a 0a 64 6f 5f 74 65 73 74 20  000000..do_test 
09a0: 62 69 67 66 69 6c 65 2d 31 2e 32 20 7b 0a 20 20  bigfile-1.2 {.  
09b0: 73 71 6c 69 74 65 33 20 64 62 20 74 65 73 74 2e  sqlite3 db test.
09c0: 64 62 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20  db.  execsql {. 
09d0: 20 20 20 53 45 4c 45 43 54 20 6d 64 35 73 75 6d     SELECT md5sum
09e0: 28 78 29 20 46 52 4f 4d 20 74 31 3b 0a 20 20 7d  (x) FROM t1;.  }
09f0: 0a 7d 20 24 3a 3a 4d 41 47 49 43 5f 53 55 4d 0a  .} $::MAGIC_SUM.
0a00: 0a 23 20 54 68 65 20 70 72 65 76 69 6f 75 73 20  .# The previous 
0a10: 74 65 73 74 20 6d 61 79 20 66 61 69 6c 20 6f 6e  test may fail on
0a20: 20 73 6f 6d 65 20 73 79 73 74 65 6d 73 20 62 65   some systems be
0a30: 63 61 75 73 65 20 74 68 65 79 20 61 72 65 20 75  cause they are u
0a40: 6e 61 62 6c 65 0a 23 20 74 6f 20 68 61 6e 64 6c  nable.# to handl
0a50: 65 20 6c 61 72 67 65 20 66 69 6c 65 73 2e 20 20  e large files.  
0a60: 49 66 20 74 68 61 74 20 69 73 20 73 6f 2c 20 74  If that is so, t
0a70: 68 65 6e 20 73 6b 69 70 20 61 6c 6c 20 6f 66 20  hen skip all of 
0a80: 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 0a 23 20  the following.# 
0a90: 74 65 73 74 73 2e 20 20 57 65 20 77 69 6c 6c 20  tests.  We will 
0aa0: 6b 6e 6f 77 20 74 68 65 20 61 62 6f 76 65 20 74  know the above t
0ab0: 65 73 74 20 66 61 69 6c 65 64 20 62 65 63 61 75  est failed becau
0ac0: 73 65 20 74 68 65 20 22 64 62 22 20 63 6f 6d 6d  se the "db" comm
0ad0: 61 6e 64 0a 23 20 64 6f 65 73 20 6e 6f 74 20 65  and.# does not e
0ae0: 78 69 73 74 2e 0a 23 0a 69 66 20 7b 5b 6c 6c 65  xist..#.if {[lle
0af0: 6e 67 74 68 20 5b 69 6e 66 6f 20 63 6f 6d 6d 61  ngth [info comma
0b00: 6e 64 20 64 62 5d 5d 3c 3d 30 7d 20 7b 0a 20 20  nd db]]<=0} {.  
0b10: 70 75 74 73 20 22 2a 2a 2a 2a 20 4c 61 72 67 65  puts "**** Large
0b20: 20 66 69 6c 65 20 73 75 70 70 6f 72 74 20 61 70   file support ap
0b30: 70 65 61 72 73 20 74 6f 20 62 65 20 62 72 6f 6b  pears to be brok
0b40: 65 6e 2e 20 2a 2a 2a 2a 2a 22 0a 20 20 66 69 6e  en. *****".  fin
0b50: 69 73 68 5f 74 65 73 74 0a 20 20 72 65 74 75 72  ish_test.  retur
0b60: 6e 0a 7d 0a 0a 64 6f 5f 74 65 73 74 20 62 69 67  n.}..do_test big
0b70: 66 69 6c 65 2d 31 2e 33 20 7b 0a 20 20 65 78 65  file-1.3 {.  exe
0b80: 63 73 71 6c 20 7b 0a 20 20 20 20 43 52 45 41 54  csql {.    CREAT
0b90: 45 20 54 41 42 4c 45 20 74 32 20 41 53 20 53 45  E TABLE t2 AS SE
0ba0: 4c 45 43 54 20 2a 20 46 52 4f 4d 20 74 31 3b 0a  LECT * FROM t1;.
0bb0: 20 20 20 20 53 45 4c 45 43 54 20 6d 64 35 73 75      SELECT md5su
0bc0: 6d 28 78 29 20 46 52 4f 4d 20 74 32 3b 0a 20 20  m(x) FROM t2;.  
0bd0: 7d 0a 7d 20 24 3a 3a 4d 41 47 49 43 5f 53 55 4d  }.} $::MAGIC_SUM
0be0: 0a 64 6f 5f 74 65 73 74 20 62 69 67 66 69 6c 65  .do_test bigfile
0bf0: 2d 31 2e 34 20 7b 0a 20 20 64 62 20 63 6c 6f 73  -1.4 {.  db clos
0c00: 65 0a 20 20 73 71 6c 69 74 65 33 20 64 62 20 74  e.  sqlite3 db t
0c10: 65 73 74 2e 64 62 0a 20 20 65 78 65 63 73 71 6c  est.db.  execsql
0c20: 20 7b 0a 20 20 20 20 53 45 4c 45 43 54 20 6d 64   {.    SELECT md
0c30: 35 73 75 6d 28 78 29 20 46 52 4f 4d 20 74 31 3b  5sum(x) FROM t1;
0c40: 0a 20 20 7d 0a 7d 20 24 3a 3a 4d 41 47 49 43 5f  .  }.} $::MAGIC_
0c50: 53 55 4d 0a 0a 64 62 20 63 6c 6f 73 65 0a 69 66  SUM..db close.if
0c60: 20 7b 5b 63 61 74 63 68 20 7b 66 61 6b 65 5f 62   {[catch {fake_b
0c70: 69 67 5f 66 69 6c 65 20 38 31 39 32 20 5b 67 65  ig_file 8192 [ge
0c80: 74 5f 70 77 64 5d 2f 74 65 73 74 2e 64 62 7d 5d  t_pwd]/test.db}]
0c90: 7d 20 7b 0a 20 20 70 75 74 73 20 22 2a 2a 2a 2a  } {.  puts "****
0ca0: 20 55 6e 61 62 6c 65 20 74 6f 20 63 72 65 61 74   Unable to creat
0cb0: 65 20 61 20 66 69 6c 65 20 6c 61 72 67 65 72 20  e a file larger 
0cc0: 74 68 61 6e 20 38 31 39 32 20 4d 42 2e 20 2a 2a  than 8192 MB. **
0cd0: 2a 2a 2a 22 0a 20 20 66 69 6e 69 73 68 5f 74 65  ***".  finish_te
0ce0: 73 74 0a 20 20 72 65 74 75 72 6e 0a 7d 0a 68 65  st.  return.}.he
0cf0: 78 69 6f 5f 77 72 69 74 65 20 74 65 73 74 2e 64  xio_write test.d
0d00: 62 20 32 38 20 30 30 30 30 30 30 30 30 0a 0a 64  b 28 00000000..d
0d10: 6f 5f 74 65 73 74 20 62 69 67 66 69 6c 65 2d 31  o_test bigfile-1
0d20: 2e 35 20 7b 0a 20 20 73 71 6c 69 74 65 33 20 64  .5 {.  sqlite3 d
0d30: 62 20 74 65 73 74 2e 64 62 0a 20 20 65 78 65 63  b test.db.  exec
0d40: 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43 54  sql {.    SELECT
0d50: 20 6d 64 35 73 75 6d 28 78 29 20 46 52 4f 4d 20   md5sum(x) FROM 
0d60: 74 31 3b 0a 20 20 7d 0a 7d 20 24 3a 3a 4d 41 47  t1;.  }.} $::MAG
0d70: 49 43 5f 53 55 4d 0a 64 6f 5f 74 65 73 74 20 62  IC_SUM.do_test b
0d80: 69 67 66 69 6c 65 2d 31 2e 36 20 7b 0a 20 20 73  igfile-1.6 {.  s
0d90: 71 6c 69 74 65 33 20 64 62 20 74 65 73 74 2e 64  qlite3 db test.d
0da0: 62 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20  b.  execsql {.  
0db0: 20 20 53 45 4c 45 43 54 20 6d 64 35 73 75 6d 28    SELECT md5sum(
0dc0: 78 29 20 46 52 4f 4d 20 74 32 3b 0a 20 20 7d 0a  x) FROM t2;.  }.
0dd0: 7d 20 24 3a 3a 4d 41 47 49 43 5f 53 55 4d 0a 64  } $::MAGIC_SUM.d
0de0: 6f 5f 74 65 73 74 20 62 69 67 66 69 6c 65 2d 31  o_test bigfile-1
0df0: 2e 37 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b  .7 {.  execsql {
0e00: 0a 20 20 20 20 43 52 45 41 54 45 20 54 41 42 4c  .    CREATE TABL
0e10: 45 20 74 33 20 41 53 20 53 45 4c 45 43 54 20 2a  E t3 AS SELECT *
0e20: 20 46 52 4f 4d 20 74 31 3b 0a 20 20 20 20 53 45   FROM t1;.    SE
0e30: 4c 45 43 54 20 6d 64 35 73 75 6d 28 78 29 20 46  LECT md5sum(x) F
0e40: 52 4f 4d 20 74 33 3b 0a 20 20 7d 0a 7d 20 24 3a  ROM t3;.  }.} $:
0e50: 3a 4d 41 47 49 43 5f 53 55 4d 0a 64 6f 5f 74 65  :MAGIC_SUM.do_te
0e60: 73 74 20 62 69 67 66 69 6c 65 2d 31 2e 38 20 7b  st bigfile-1.8 {
0e70: 0a 20 20 64 62 20 63 6c 6f 73 65 0a 20 20 73 71  .  db close.  sq
0e80: 6c 69 74 65 33 20 64 62 20 74 65 73 74 2e 64 62  lite3 db test.db
0e90: 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20  .  execsql {.   
0ea0: 20 53 45 4c 45 43 54 20 6d 64 35 73 75 6d 28 78   SELECT md5sum(x
0eb0: 29 20 46 52 4f 4d 20 74 31 3b 0a 20 20 7d 0a 7d  ) FROM t1;.  }.}
0ec0: 20 24 3a 3a 4d 41 47 49 43 5f 53 55 4d 0a 64 6f   $::MAGIC_SUM.do
0ed0: 5f 74 65 73 74 20 62 69 67 66 69 6c 65 2d 31 2e  _test bigfile-1.
0ee0: 39 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a  9 {.  execsql {.
0ef0: 20 20 20 20 53 45 4c 45 43 54 20 6d 64 35 73 75      SELECT md5su
0f00: 6d 28 78 29 20 46 52 4f 4d 20 74 32 3b 0a 20 20  m(x) FROM t2;.  
0f10: 7d 0a 7d 20 24 3a 3a 4d 41 47 49 43 5f 53 55 4d  }.} $::MAGIC_SUM
0f20: 0a 0a 64 62 20 63 6c 6f 73 65 0a 69 66 20 7b 5b  ..db close.if {[
0f30: 63 61 74 63 68 20 7b 66 61 6b 65 5f 62 69 67 5f  catch {fake_big_
0f40: 66 69 6c 65 20 31 36 33 38 34 20 5b 67 65 74 5f  file 16384 [get_
0f50: 70 77 64 5d 2f 74 65 73 74 2e 64 62 7d 5d 7d 20  pwd]/test.db}]} 
0f60: 7b 0a 20 20 70 75 74 73 20 22 2a 2a 2a 2a 20 55  {.  puts "**** U
0f70: 6e 61 62 6c 65 20 74 6f 20 63 72 65 61 74 65 20  nable to create 
0f80: 61 20 66 69 6c 65 20 6c 61 72 67 65 72 20 74 68  a file larger th
0f90: 61 6e 20 31 36 33 38 34 20 4d 42 2e 20 2a 2a 2a  an 16384 MB. ***
0fa0: 2a 2a 22 0a 20 20 66 69 6e 69 73 68 5f 74 65 73  **".  finish_tes
0fb0: 74 0a 20 20 72 65 74 75 72 6e 0a 7d 0a 68 65 78  t.  return.}.hex
0fc0: 69 6f 5f 77 72 69 74 65 20 74 65 73 74 2e 64 62  io_write test.db
0fd0: 20 32 38 20 30 30 30 30 30 30 30 30 0a 0a 64 6f   28 00000000..do
0fe0: 5f 74 65 73 74 20 62 69 67 66 69 6c 65 2d 31 2e  _test bigfile-1.
0ff0: 31 30 20 7b 0a 20 20 73 71 6c 69 74 65 33 20 64  10 {.  sqlite3 d
1000: 62 20 74 65 73 74 2e 64 62 0a 20 20 65 78 65 63  b test.db.  exec
1010: 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43 54  sql {.    SELECT
1020: 20 6d 64 35 73 75 6d 28 78 29 20 46 52 4f 4d 20   md5sum(x) FROM 
1030: 74 31 3b 0a 20 20 7d 0a 7d 20 24 3a 3a 4d 41 47  t1;.  }.} $::MAG
1040: 49 43 5f 53 55 4d 0a 64 6f 5f 74 65 73 74 20 62  IC_SUM.do_test b
1050: 69 67 66 69 6c 65 2d 31 2e 31 31 20 7b 0a 20 20  igfile-1.11 {.  
1060: 73 71 6c 69 74 65 33 20 64 62 20 74 65 73 74 2e  sqlite3 db test.
1070: 64 62 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20  db.  execsql {. 
1080: 20 20 20 53 45 4c 45 43 54 20 6d 64 35 73 75 6d     SELECT md5sum
1090: 28 78 29 20 46 52 4f 4d 20 74 32 3b 0a 20 20 7d  (x) FROM t2;.  }
10a0: 0a 7d 20 24 3a 3a 4d 41 47 49 43 5f 53 55 4d 0a  .} $::MAGIC_SUM.
10b0: 64 6f 5f 74 65 73 74 20 62 69 67 66 69 6c 65 2d  do_test bigfile-
10c0: 31 2e 31 32 20 7b 0a 20 20 73 71 6c 69 74 65 33  1.12 {.  sqlite3
10d0: 20 64 62 20 74 65 73 74 2e 64 62 0a 20 20 65 78   db test.db.  ex
10e0: 65 63 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45  ecsql {.    SELE
10f0: 43 54 20 6d 64 35 73 75 6d 28 78 29 20 46 52 4f  CT md5sum(x) FRO
1100: 4d 20 74 33 3b 0a 20 20 7d 0a 7d 20 24 3a 3a 4d  M t3;.  }.} $::M
1110: 41 47 49 43 5f 53 55 4d 0a 64 6f 5f 74 65 73 74  AGIC_SUM.do_test
1120: 20 62 69 67 66 69 6c 65 2d 31 2e 31 33 20 7b 0a   bigfile-1.13 {.
1130: 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20    execsql {.    
1140: 43 52 45 41 54 45 20 54 41 42 4c 45 20 74 34 20  CREATE TABLE t4 
1150: 41 53 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d  AS SELECT * FROM
1160: 20 74 31 3b 0a 20 20 20 20 53 45 4c 45 43 54 20   t1;.    SELECT 
1170: 6d 64 35 73 75 6d 28 78 29 20 46 52 4f 4d 20 74  md5sum(x) FROM t
1180: 34 3b 0a 20 20 7d 0a 7d 20 24 3a 3a 4d 41 47 49  4;.  }.} $::MAGI
1190: 43 5f 53 55 4d 0a 64 6f 5f 74 65 73 74 20 62 69  C_SUM.do_test bi
11a0: 67 66 69 6c 65 2d 31 2e 31 34 20 7b 0a 20 20 64  gfile-1.14 {.  d
11b0: 62 20 63 6c 6f 73 65 0a 20 20 73 71 6c 69 74 65  b close.  sqlite
11c0: 33 20 64 62 20 74 65 73 74 2e 64 62 0a 20 20 65  3 db test.db.  e
11d0: 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c  xecsql {.    SEL
11e0: 45 43 54 20 6d 64 35 73 75 6d 28 78 29 20 46 52  ECT md5sum(x) FR
11f0: 4f 4d 20 74 31 3b 0a 20 20 7d 0a 7d 20 24 3a 3a  OM t1;.  }.} $::
1200: 4d 41 47 49 43 5f 53 55 4d 0a 64 6f 5f 74 65 73  MAGIC_SUM.do_tes
1210: 74 20 62 69 67 66 69 6c 65 2d 31 2e 31 35 20 7b  t bigfile-1.15 {
1220: 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20  .  execsql {.   
1230: 20 53 45 4c 45 43 54 20 6d 64 35 73 75 6d 28 78   SELECT md5sum(x
1240: 29 20 46 52 4f 4d 20 74 32 3b 0a 20 20 7d 0a 7d  ) FROM t2;.  }.}
1250: 20 24 3a 3a 4d 41 47 49 43 5f 53 55 4d 0a 64 6f   $::MAGIC_SUM.do
1260: 5f 74 65 73 74 20 62 69 67 66 69 6c 65 2d 31 2e  _test bigfile-1.
1270: 31 36 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b  16 {.  execsql {
1280: 0a 20 20 20 20 53 45 4c 45 43 54 20 6d 64 35 73  .    SELECT md5s
1290: 75 6d 28 78 29 20 46 52 4f 4d 20 74 33 3b 0a 20  um(x) FROM t3;. 
12a0: 20 7d 0a 7d 20 24 3a 3a 4d 41 47 49 43 5f 53 55   }.} $::MAGIC_SU
12b0: 4d 0a 0a 66 69 6e 69 73 68 5f 74 65 73 74 0a     M..finish_test.