/ Hex Artifact Content
Login
SQLite training in Houston TX on 2019-11-05 (details)
Part of the 2019 Tcl Conference

Artifact cf59bafccb143f8df21c043b3201d5afa9fe2474:


0000: 23 20 32 30 31 31 20 4d 61 72 63 68 20 32 39 0a  # 2011 March 29.
0010: 23 0a 23 20 54 68 65 20 61 75 74 68 6f 72 20 64  #.# The author d
0020: 69 73 63 6c 61 69 6d 73 20 63 6f 70 79 72 69 67  isclaims copyrig
0030: 68 74 20 74 6f 20 74 68 69 73 20 73 6f 75 72 63  ht to this sourc
0040: 65 20 63 6f 64 65 2e 20 20 49 6e 20 70 6c 61 63  e code.  In plac
0050: 65 20 6f 66 0a 23 20 61 20 6c 65 67 61 6c 20 6e  e of.# a legal n
0060: 6f 74 69 63 65 2c 20 68 65 72 65 20 69 73 20 61  otice, here is a
0070: 20 62 6c 65 73 73 69 6e 67 3a 0a 23 0a 23 20 20   blessing:.#.#  
0080: 20 20 4d 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f    May you do goo
0090: 64 20 61 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a  d and not evil..
00a0: 23 20 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e  #    May you fin
00b0: 64 20 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f  d forgiveness fo
00c0: 72 20 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66  r yourself and f
00d0: 6f 72 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 23  orgive others..#
00e0: 20 20 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72      May you shar
00f0: 65 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20  e freely, never 
0100: 74 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e  taking more than
0110: 20 79 6f 75 20 67 69 76 65 2e 0a 23 0a 23 2a 2a   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 0a 23 0a 0a 73 65 74 20 74 65 73  *****.#..set tes
0170: 74 64 69 72 20 5b 66 69 6c 65 20 64 69 72 6e 61  tdir [file dirna
0180: 6d 65 20 24 61 72 67 76 30 5d 0a 73 6f 75 72 63  me $argv0].sourc
0190: 65 20 24 74 65 73 74 64 69 72 2f 74 65 73 74 65  e $testdir/teste
01a0: 72 2e 74 63 6c 0a 73 6f 75 72 63 65 20 24 74 65  r.tcl.source $te
01b0: 73 74 64 69 72 2f 6c 6f 63 6b 5f 63 6f 6d 6d 6f  stdir/lock_commo
01c0: 6e 2e 74 63 6c 0a 73 6f 75 72 63 65 20 24 74 65  n.tcl.source $te
01d0: 73 74 64 69 72 2f 6d 61 6c 6c 6f 63 5f 63 6f 6d  stdir/malloc_com
01e0: 6d 6f 6e 2e 74 63 6c 0a 0a 69 66 20 7b 5b 6c 6c  mon.tcl..if {[ll
01f0: 65 6e 67 74 68 20 5b 69 6e 66 6f 20 63 6f 6d 6d  ength [info comm
0200: 61 6e 64 73 20 74 65 73 74 5f 73 79 73 63 61 6c  ands test_syscal
0210: 6c 5d 5d 3d 3d 30 7d 20 7b 0a 20 20 66 69 6e 69  l]]==0} {.  fini
0220: 73 68 5f 74 65 73 74 0a 20 20 72 65 74 75 72 6e  sh_test.  return
0230: 0a 7d 20 0a 0a 69 66 20 7b 5b 74 65 73 74 5f 73  .} ..if {[test_s
0240: 79 73 63 61 6c 6c 20 64 65 66 61 75 6c 74 76 66  yscall defaultvf
0250: 73 5d 20 21 3d 20 22 75 6e 69 78 22 7d 20 7b 0a  s] != "unix"} {.
0260: 20 20 66 69 6e 69 73 68 5f 74 65 73 74 0a 20 20    finish_test.  
0270: 72 65 74 75 72 6e 0a 7d 0a 73 65 74 20 74 65 73  return.}.set tes
0280: 74 70 72 65 66 69 78 20 73 79 73 63 61 6c 6c 0a  tprefix syscall.
0290: 0a 23 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  .#--------------
02a0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
02b0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
02c0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
02d0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 23 20 54 65  -----------.# Te
02e0: 73 74 73 20 66 6f 72 20 74 68 65 20 78 53 65 74  sts for the xSet
02f0: 53 79 73 74 65 6d 43 61 6c 6c 20 6d 65 74 68 6f  SystemCall metho
0300: 64 2e 0a 23 0a 64 6f 5f 74 65 73 74 20 31 2e 31  d..#.do_test 1.1
0310: 2e 31 20 7b 0a 20 20 6c 69 73 74 20 5b 63 61 74  .1 {.  list [cat
0320: 63 68 20 7b 20 74 65 73 74 5f 73 79 73 63 61 6c  ch { test_syscal
0330: 6c 20 72 65 73 65 74 20 6f 70 65 6e 20 7d 20 6d  l reset open } m
0340: 73 67 5d 20 24 6d 73 67 0a 7d 20 7b 30 20 7b 7d  sg] $msg.} {0 {}
0350: 7d 0a 64 6f 5f 74 65 73 74 20 31 2e 31 2e 32 20  }.do_test 1.1.2 
0360: 7b 0a 20 20 6c 69 73 74 20 5b 63 61 74 63 68 20  {.  list [catch 
0370: 7b 20 74 65 73 74 5f 73 79 73 63 61 6c 6c 20 72  { test_syscall r
0380: 65 73 65 74 20 6e 6f 73 75 63 68 63 61 6c 6c 20  eset nosuchcall 
0390: 7d 20 6d 73 67 5d 20 24 6d 73 67 0a 7d 20 7b 31  } msg] $msg.} {1
03a0: 20 53 51 4c 49 54 45 5f 4e 4f 54 46 4f 55 4e 44   SQLITE_NOTFOUND
03b0: 7d 0a 64 6f 5f 74 65 73 74 20 31 2e 31 2e 33 20  }.do_test 1.1.3 
03c0: 7b 0a 20 20 6c 69 73 74 20 5b 63 61 74 63 68 20  {.  list [catch 
03d0: 7b 20 74 65 73 74 5f 73 79 73 63 61 6c 6c 20 72  { test_syscall r
03e0: 65 73 65 74 20 6f 70 65 6e 20 7d 20 6d 73 67 5d  eset open } msg]
03f0: 20 24 6d 73 67 0a 7d 20 7b 30 20 7b 7d 7d 0a 64   $msg.} {0 {}}.d
0400: 6f 5f 74 65 73 74 20 31 2e 31 2e 34 20 7b 0a 20  o_test 1.1.4 {. 
0410: 20 6c 69 73 74 20 5b 63 61 74 63 68 20 7b 20 74   list [catch { t
0420: 65 73 74 5f 73 79 73 63 61 6c 6c 20 72 65 73 65  est_syscall rese
0430: 74 20 22 22 7d 20 6d 73 67 5d 20 24 6d 73 67 0a  t ""} msg] $msg.
0440: 7d 20 7b 31 20 53 51 4c 49 54 45 5f 4e 4f 54 46  } {1 SQLITE_NOTF
0450: 4f 55 4e 44 7d 0a 0a 64 6f 5f 74 65 73 74 20 31  OUND}..do_test 1
0460: 2e 32 20 7b 20 74 65 73 74 5f 73 79 73 63 61 6c  .2 { test_syscal
0470: 6c 20 72 65 73 65 74 20 7d 20 7b 7d 0a 0a 64 6f  l reset } {}..do
0480: 5f 74 65 73 74 20 31 2e 33 2e 31 20 7b 20 74 65  _test 1.3.1 { te
0490: 73 74 5f 73 79 73 63 61 6c 6c 20 69 6e 73 74 61  st_syscall insta
04a0: 6c 6c 20 7b 6f 70 65 6e 20 67 65 74 63 77 64 20  ll {open getcwd 
04b0: 61 63 63 65 73 73 7d 20 7d 20 7b 7d 0a 64 6f 5f  access} } {}.do_
04c0: 74 65 73 74 20 31 2e 33 2e 32 20 7b 20 74 65 73  test 1.3.2 { tes
04d0: 74 5f 73 79 73 63 61 6c 6c 20 72 65 73 65 74 20  t_syscall reset 
04e0: 7d 20 7b 7d 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d 2d  } {}..#---------
04f0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0500: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0510: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0520: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0530: 0a 23 20 54 65 73 74 73 20 66 6f 72 20 74 68 65  .# Tests for the
0540: 20 78 47 65 74 53 79 73 74 65 6d 43 61 6c 6c 20   xGetSystemCall 
0550: 6d 65 74 68 6f 64 2e 0a 23 0a 64 6f 5f 74 65 73  method..#.do_tes
0560: 74 20 32 2e 31 2e 31 20 7b 20 74 65 73 74 5f 73  t 2.1.1 { test_s
0570: 79 73 63 61 6c 6c 20 65 78 69 73 74 73 20 6f 70  yscall exists op
0580: 65 6e 20 7d 20 31 0a 64 6f 5f 74 65 73 74 20 32  en } 1.do_test 2
0590: 2e 31 2e 32 20 7b 20 74 65 73 74 5f 73 79 73 63  .1.2 { test_sysc
05a0: 61 6c 6c 20 65 78 69 73 74 73 20 6e 6f 73 75 63  all exists nosuc
05b0: 68 63 61 6c 6c 20 7d 20 30 0a 0a 23 2d 2d 2d 2d  hcall } 0..#----
05c0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
05d0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
05e0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
05f0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0600: 2d 2d 2d 2d 2d 0a 23 20 54 65 73 74 73 20 66 6f  -----.# Tests fo
0610: 72 20 74 68 65 20 78 4e 65 78 74 53 79 73 74 65  r the xNextSyste
0620: 6d 43 61 6c 6c 20 6d 65 74 68 6f 64 2e 0a 23 0a  mCall method..#.
0630: 66 6f 72 65 61 63 68 20 73 20 7b 0a 20 20 20 20  foreach s {.    
0640: 6f 70 65 6e 20 63 6c 6f 73 65 20 61 63 63 65 73  open close acces
0650: 73 20 67 65 74 63 77 64 20 73 74 61 74 20 66 73  s getcwd stat fs
0660: 74 61 74 20 66 74 72 75 6e 63 61 74 65 0a 20 20  tat ftruncate.  
0670: 20 20 66 63 6e 74 6c 20 72 65 61 64 20 70 72 65    fcntl read pre
0680: 61 64 20 77 72 69 74 65 20 70 77 72 69 74 65 20  ad write pwrite 
0690: 66 63 68 6d 6f 64 20 66 61 6c 6c 6f 63 61 74 65  fchmod fallocate
06a0: 0a 20 20 20 20 70 72 65 61 64 36 34 20 70 77 72  .    pread64 pwr
06b0: 69 74 65 36 34 20 75 6e 6c 69 6e 6b 20 6f 70 65  ite64 unlink ope
06c0: 6e 44 69 72 65 63 74 6f 72 79 20 6d 6b 64 69 72  nDirectory mkdir
06d0: 20 72 6d 64 69 72 20 0a 20 20 20 20 73 74 61 74   rmdir .    stat
06e0: 76 66 73 20 66 63 68 6f 77 6e 20 75 6d 61 73 6b  vfs fchown umask
06f0: 20 6d 6d 61 70 0a 7d 20 7b 0a 20 20 69 66 20 7b   mmap.} {.  if {
0700: 5b 74 65 73 74 5f 73 79 73 63 61 6c 6c 20 65 78  [test_syscall ex
0710: 69 73 74 73 20 24 73 5d 7d 20 7b 6c 61 70 70 65  ists $s]} {lappe
0720: 6e 64 20 73 79 73 63 61 6c 6c 5f 6c 69 73 74 20  nd syscall_list 
0730: 24 73 7d 0a 7d 0a 64 6f 5f 74 65 73 74 20 33 2e  $s}.}.do_test 3.
0740: 31 20 7b 20 6c 73 6f 72 74 20 5b 74 65 73 74 5f  1 { lsort [test_
0750: 73 79 73 63 61 6c 6c 20 6c 69 73 74 5d 20 7d 20  syscall list] } 
0760: 5b 6c 73 6f 72 74 20 24 73 79 73 63 61 6c 6c 5f  [lsort $syscall_
0770: 6c 69 73 74 5d 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d  list]..#--------
0780: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0790: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
07a0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
07b0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
07c0: 2d 0a 23 20 54 68 69 73 20 74 65 73 74 20 76 65  -.# This test ve
07d0: 72 69 66 69 65 73 20 74 68 61 74 20 69 66 20 61  rifies that if a
07e0: 20 63 61 6c 6c 20 74 6f 20 6f 70 65 6e 28 29 20   call to open() 
07f0: 66 61 69 6c 73 20 61 6e 64 20 65 72 72 6e 6f 20  fails and errno 
0800: 69 73 20 73 65 74 20 74 6f 0a 23 20 45 49 4e 54  is set to.# EINT
0810: 52 2c 20 74 68 65 20 63 61 6c 6c 20 69 73 20 72  R, the call is r
0820: 65 74 72 69 65 64 2e 20 49 66 20 69 74 20 73 75  etried. If it su
0830: 63 63 65 65 64 73 2c 20 65 78 65 63 75 74 69 6f  cceeds, executio
0840: 6e 20 63 6f 6e 74 69 6e 75 65 73 20 61 73 20 69  n continues as i
0850: 66 0a 23 20 6e 6f 74 68 69 6e 67 20 68 61 70 70  f.# nothing happ
0860: 65 6e 65 64 2e 20 0a 23 0a 74 65 73 74 5f 73 79  ened. .#.test_sy
0870: 73 63 61 6c 6c 20 72 65 73 65 74 0a 66 6f 72 63  scall reset.forc
0880: 65 64 65 6c 65 74 65 20 74 65 73 74 2e 64 62 32  edelete test.db2
0890: 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74  .do_execsql_test
08a0: 20 34 2e 31 20 7b 0a 20 20 43 52 45 41 54 45 20   4.1 {.  CREATE 
08b0: 54 41 42 4c 45 20 74 31 28 78 2c 20 79 29 3b 0a  TABLE t1(x, y);.
08c0: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31    INSERT INTO t1
08d0: 20 56 41 4c 55 45 53 28 31 2c 20 32 29 3b 0a 20   VALUES(1, 2);. 
08e0: 20 41 54 54 41 43 48 20 27 74 65 73 74 2e 64 62   ATTACH 'test.db
08f0: 32 27 20 41 53 20 61 75 78 3b 0a 20 20 43 52 45  2' AS aux;.  CRE
0900: 41 54 45 20 54 41 42 4c 45 20 61 75 78 2e 74 32  ATE TABLE aux.t2
0910: 28 78 2c 20 79 29 3b 0a 20 20 49 4e 53 45 52 54  (x, y);.  INSERT
0920: 20 49 4e 54 4f 20 74 32 20 56 41 4c 55 45 53 28   INTO t2 VALUES(
0930: 33 2c 20 34 29 3b 0a 7d 0a 0a 64 62 5f 73 61 76  3, 4);.}..db_sav
0940: 65 5f 61 6e 64 5f 63 6c 6f 73 65 0a 74 65 73 74  e_and_close.test
0950: 5f 73 79 73 63 61 6c 6c 20 69 6e 73 74 61 6c 6c  _syscall install
0960: 20 6f 70 65 6e 0a 66 6f 72 65 61 63 68 20 6a 72   open.foreach jr
0970: 6e 6c 20 5b 6c 69 73 74 20 77 61 6c 20 64 65 6c  nl [list wal del
0980: 65 74 65 5d 20 7b 0a 20 20 66 6f 72 20 7b 73 65  ete] {.  for {se
0990: 74 20 69 20 31 7d 20 7b 24 69 20 3c 20 32 30 7d  t i 1} {$i < 20}
09a0: 20 7b 69 6e 63 72 20 69 7d 20 7b 0a 20 20 20 20   {incr i} {.    
09b0: 64 62 5f 72 65 73 74 6f 72 65 5f 61 6e 64 5f 72  db_restore_and_r
09c0: 65 6f 70 65 6e 0a 20 20 20 20 74 65 73 74 5f 73  eopen.    test_s
09d0: 79 73 63 61 6c 6c 20 66 61 75 6c 74 20 24 69 20  yscall fault $i 
09e0: 30 0a 20 20 20 20 74 65 73 74 5f 73 79 73 63 61  0.    test_sysca
09f0: 6c 6c 20 65 72 72 6e 6f 20 6f 70 65 6e 20 45 49  ll errno open EI
0a00: 4e 54 52 0a 20 20 0a 20 20 20 20 64 6f 5f 74 65  NTR.  .    do_te
0a10: 73 74 20 34 2e 32 2e 24 6a 72 6e 6c 2e 24 69 20  st 4.2.$jrnl.$i 
0a20: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 20  {.      sqlite3 
0a30: 64 62 20 74 65 73 74 2e 64 62 0a 20 20 20 20 20  db test.db.     
0a40: 20 65 78 65 63 73 71 6c 20 7b 20 41 54 54 41 43   execsql { ATTAC
0a50: 48 20 27 74 65 73 74 2e 64 62 32 27 20 41 53 20  H 'test.db2' AS 
0a60: 61 75 78 20 7d 0a 20 20 20 20 20 20 65 78 65 63  aux }.      exec
0a70: 73 71 6c 20 22 50 52 41 47 4d 41 20 6d 61 69 6e  sql "PRAGMA main
0a80: 2e 6a 6f 75 72 6e 61 6c 5f 6d 6f 64 65 20 3d 20  .journal_mode = 
0a90: 24 6a 72 6e 6c 22 0a 20 20 20 20 20 20 65 78 65  $jrnl".      exe
0aa0: 63 73 71 6c 20 22 50 52 41 47 4d 41 20 61 75 78  csql "PRAGMA aux
0ab0: 2e 6a 6f 75 72 6e 61 6c 5f 6d 6f 64 65 20 3d 20  .journal_mode = 
0ac0: 24 6a 72 6e 6c 22 0a 20 20 20 20 20 20 65 78 65  $jrnl".      exe
0ad0: 63 73 71 6c 20 7b 0a 20 20 20 20 20 20 20 20 42  csql {.        B
0ae0: 45 47 49 4e 3b 0a 20 20 20 20 20 20 20 20 20 20  EGIN;.          
0af0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 56  INSERT INTO t1 V
0b00: 41 4c 55 45 53 28 35 2c 20 36 29 3b 0a 20 20 20  ALUES(5, 6);.   
0b10: 20 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e         INSERT IN
0b20: 54 4f 20 74 32 20 56 41 4c 55 45 53 28 37 2c 20  TO t2 VALUES(7, 
0b30: 38 29 3b 0a 20 20 20 20 20 20 20 20 43 4f 4d 4d  8);.        COMM
0b40: 49 54 3b 0a 20 20 20 20 20 20 7d 0a 0a 20 20 20  IT;.      }..   
0b50: 20 20 20 64 62 20 63 6c 6f 73 65 0a 20 20 20 20     db close.    
0b60: 20 20 73 71 6c 69 74 65 33 20 64 62 20 74 65 73    sqlite3 db tes
0b70: 74 2e 64 62 0a 20 20 20 20 20 20 65 78 65 63 73  t.db.      execs
0b80: 71 6c 20 7b 20 41 54 54 41 43 48 20 27 74 65 73  ql { ATTACH 'tes
0b90: 74 2e 64 62 32 27 20 41 53 20 61 75 78 20 7d 0a  t.db2' AS aux }.
0ba0: 20 20 20 20 20 20 65 78 65 63 73 71 6c 20 7b 0a        execsql {.
0bb0: 20 20 20 20 20 20 20 20 53 45 4c 45 43 54 20 2a          SELECT *
0bc0: 20 46 52 4f 4d 20 74 31 3b 0a 20 20 20 20 20 20   FROM t1;.      
0bd0: 20 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20    SELECT * FROM 
0be0: 74 32 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  t2;.      }.    
0bf0: 7d 20 7b 31 20 32 20 35 20 36 20 33 20 34 20 37  } {1 2 5 6 3 4 7
0c00: 20 38 7d 0a 20 20 7d 0a 7d 0a 0a 23 2d 2d 2d 2d   8}.  }.}..#----
0c10: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0c20: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0c30: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0c40: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0c50: 2d 2d 2d 2d 2d 0a 23 20 54 68 69 73 20 74 65 73  -----.# This tes
0c60: 74 20 76 65 72 69 66 69 65 73 20 74 68 61 74 20  t verifies that 
0c70: 63 6c 6f 73 69 6e 67 20 64 61 74 61 62 61 73 65  closing database
0c80: 20 68 61 6e 64 6c 65 73 20 64 6f 65 73 20 6e 6f   handles does no
0c90: 74 20 64 72 6f 70 20 6c 6f 63 6b 73 0a 23 20 68  t drop locks.# h
0ca0: 65 6c 64 20 62 79 20 6f 74 68 65 72 20 64 61 74  eld by other dat
0cb0: 61 62 61 73 65 20 68 61 6e 64 6c 65 73 20 69 6e  abase handles in
0cc0: 20 74 68 65 20 73 61 6d 65 20 70 72 6f 63 65 73   the same proces
0cd0: 73 20 6f 6e 20 74 68 65 20 73 61 6d 65 20 66 69  s on the same fi
0ce0: 6c 65 2e 0a 23 0a 23 20 54 68 65 20 6f 73 5f 75  le..#.# The os_u
0cf0: 6e 69 78 2e 63 20 6d 6f 64 75 6c 65 20 68 61 73  nix.c module has
0d00: 20 74 6f 20 74 61 6b 65 20 70 72 65 63 61 75 74   to take precaut
0d10: 69 6f 6e 73 20 74 6f 20 70 72 65 76 65 6e 74 20  ions to prevent 
0d20: 74 68 69 73 20 61 73 20 74 68 65 0a 23 20 63 6c  this as the.# cl
0d30: 6f 73 65 28 29 20 73 79 73 74 65 6d 20 63 61 6c  ose() system cal
0d40: 6c 20 64 72 6f 70 73 20 6c 6f 63 6b 73 20 68 65  l drops locks he
0d50: 6c 64 20 62 79 20 6f 74 68 65 72 20 66 69 6c 65  ld by other file
0d60: 2d 64 65 73 63 72 69 70 74 6f 72 73 20 6f 6e 20  -descriptors on 
0d70: 74 68 65 0a 23 20 73 61 6d 65 20 66 69 6c 65 2e  the.# same file.
0d80: 20 46 72 6f 6d 20 74 68 65 20 4c 69 6e 75 78 20   From the Linux 
0d90: 6d 61 6e 20 70 61 67 65 3a 0a 23 0a 23 20 20 20  man page:.#.#   
0da0: 63 6c 6f 73 65 28 29 20 63 6c 6f 73 65 73 20 61  close() closes a
0db0: 20 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72   file descriptor
0dc0: 2c 20 73 6f 20 74 68 61 74 20 69 74 20 6e 6f 20  , so that it no 
0dd0: 6c 6f 6e 67 65 72 20 72 65 66 65 72 73 20 74 6f  longer refers to
0de0: 20 61 6e 79 20 66 69 6c 65 0a 23 20 20 20 61 6e   any file.#   an
0df0: 64 20 6d 61 79 20 62 65 20 72 65 75 73 65 64 2e  d may be reused.
0e00: 20 41 6e 79 20 72 65 63 6f 72 64 20 6c 6f 63 6b   Any record lock
0e10: 73 20 28 73 65 65 20 66 63 6e 74 6c 28 32 29 29  s (see fcntl(2))
0e20: 20 68 65 6c 64 20 6f 6e 20 74 68 65 20 66 69 6c   held on the fil
0e30: 65 20 69 74 20 0a 23 20 20 20 77 61 73 20 61 73  e it .#   was as
0e40: 73 6f 63 69 61 74 65 64 20 77 69 74 68 2c 20 61  sociated with, a
0e50: 6e 64 20 6f 77 6e 65 64 20 62 79 20 74 68 65 20  nd owned by the 
0e60: 70 72 6f 63 65 73 73 2c 20 61 72 65 20 72 65 6d  process, are rem
0e70: 6f 76 65 64 20 28 72 65 67 61 72 64 6c 65 73 73  oved (regardless
0e80: 20 0a 23 20 20 20 6f 66 20 74 68 65 20 66 69 6c   .#   of the fil
0e90: 65 20 64 65 73 63 72 69 70 74 6f 72 20 74 68 61  e descriptor tha
0ea0: 74 20 77 61 73 20 75 73 65 64 20 74 6f 20 6f 62  t was used to ob
0eb0: 74 61 69 6e 20 74 68 65 20 6c 6f 63 6b 29 2e 0a  tain the lock)..
0ec0: 23 0a 63 61 74 63 68 20 7b 20 64 62 20 63 6c 6f  #.catch { db clo
0ed0: 73 65 20 7d 0a 66 6f 72 63 65 64 65 6c 65 74 65  se }.forcedelete
0ee0: 20 74 65 73 74 2e 64 62 20 74 65 73 74 2e 64 62   test.db test.db
0ef0: 32 0a 0a 64 6f 5f 6d 75 6c 74 69 63 6c 69 65 6e  2..do_multiclien
0f00: 74 5f 74 65 73 74 20 74 6e 20 7b 0a 20 20 63 6f  t_test tn {.  co
0f10: 64 65 31 20 7b 0a 20 20 20 20 73 71 6c 69 74 65  de1 {.    sqlite
0f20: 33 20 64 62 58 31 20 74 65 73 74 2e 64 62 0a 20  3 dbX1 test.db. 
0f30: 20 20 20 73 71 6c 69 74 65 33 20 64 62 58 32 20     sqlite3 dbX2 
0f40: 74 65 73 74 2e 64 62 0a 20 20 7d 0a 0a 20 20 64  test.db.  }..  d
0f50: 6f 5f 74 65 73 74 20 73 79 73 63 61 6c 6c 2d 35  o_test syscall-5
0f60: 2e 24 74 6e 2e 31 20 7b 0a 20 20 20 20 73 71 6c  .$tn.1 {.    sql
0f70: 31 20 7b 0a 20 20 20 20 20 20 43 52 45 41 54 45  1 {.      CREATE
0f80: 20 54 41 42 4c 45 20 74 31 28 61 2c 20 62 29 3b   TABLE t1(a, b);
0f90: 0a 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e  .      INSERT IN
0fa0: 54 4f 20 74 31 20 56 41 4c 55 45 53 28 31 2c 20  TO t1 VALUES(1, 
0fb0: 32 29 3b 0a 20 20 20 20 20 20 42 45 47 49 4e 3b  2);.      BEGIN;
0fc0: 0a 20 20 20 20 20 20 20 20 49 4e 53 45 52 54 20  .        INSERT 
0fd0: 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 33  INTO t1 VALUES(3
0fe0: 2c 20 34 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 20  , 4);.    }.  } 
0ff0: 7b 7d 0a 0a 20 20 64 6f 5f 74 65 73 74 20 73 79  {}..  do_test sy
1000: 73 63 61 6c 6c 2d 35 2e 24 74 6e 2e 32 20 7b 20  scall-5.$tn.2 { 
1010: 73 71 6c 32 20 7b 20 53 45 4c 45 43 54 20 2a 20  sql2 { SELECT * 
1020: 46 52 4f 4d 20 74 31 20 7d 20 7d 20 7b 31 20 32  FROM t1 } } {1 2
1030: 7d 0a 20 20 64 6f 5f 74 65 73 74 20 73 79 73 63  }.  do_test sysc
1040: 61 6c 6c 2d 35 2e 24 74 6e 2e 33 20 7b 20 0a 20  all-5.$tn.3 { . 
1050: 20 20 20 63 73 71 6c 32 20 7b 20 49 4e 53 45 52     csql2 { INSER
1060: 54 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53  T INTO t1 VALUES
1070: 28 35 2c 20 36 29 20 7d 0a 20 20 7d 20 7b 31 20  (5, 6) }.  } {1 
1080: 7b 64 61 74 61 62 61 73 65 20 69 73 20 6c 6f 63  {database is loc
1090: 6b 65 64 7d 7d 0a 0a 20 20 64 6f 5f 74 65 73 74  ked}}..  do_test
10a0: 20 73 79 73 63 61 6c 6c 2d 35 2e 24 74 6e 2e 34   syscall-5.$tn.4
10b0: 20 7b 20 0a 20 20 20 20 63 6f 64 65 31 20 7b 0a   { .    code1 {.
10c0: 20 20 20 20 20 20 64 62 58 31 20 63 6c 6f 73 65        dbX1 close
10d0: 0a 20 20 20 20 20 20 64 62 58 32 20 63 6c 6f 73  .      dbX2 clos
10e0: 65 0a 20 20 20 20 7d 0a 20 20 7d 20 7b 7d 0a 0a  e.    }.  } {}..
10f0: 20 20 64 6f 5f 74 65 73 74 20 73 79 73 63 61 6c    do_test syscal
1100: 6c 2d 35 2e 24 74 6e 2e 35 20 7b 20 0a 20 20 20  l-5.$tn.5 { .   
1110: 20 63 73 71 6c 32 20 7b 20 49 4e 53 45 52 54 20   csql2 { INSERT 
1120: 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 35  INTO t1 VALUES(5
1130: 2c 20 36 29 20 7d 0a 20 20 7d 20 7b 31 20 7b 64  , 6) }.  } {1 {d
1140: 61 74 61 62 61 73 65 20 69 73 20 6c 6f 63 6b 65  atabase is locke
1150: 64 7d 7d 0a 0a 20 20 64 6f 5f 74 65 73 74 20 73  d}}..  do_test s
1160: 79 73 63 61 6c 6c 2d 35 2e 24 74 6e 2e 36 20 7b  yscall-5.$tn.6 {
1170: 20 73 71 6c 31 20 7b 20 43 4f 4d 4d 49 54 20 7d   sql1 { COMMIT }
1180: 20 7d 20 7b 7d 0a 0a 20 20 64 6f 5f 74 65 73 74   } {}..  do_test
1190: 20 73 79 73 63 61 6c 6c 2d 35 2e 24 74 6e 2e 37   syscall-5.$tn.7
11a0: 20 7b 20 0a 20 20 20 20 63 73 71 6c 32 20 7b 20   { .    csql2 { 
11b0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 56  INSERT INTO t1 V
11c0: 41 4c 55 45 53 28 35 2c 20 36 29 20 7d 0a 20 20  ALUES(5, 6) }.  
11d0: 7d 20 7b 30 20 7b 7d 7d 0a 7d 0a 0a 63 61 74 63  } {0 {}}.}..catc
11e0: 68 20 7b 64 62 20 63 6c 6f 73 65 7d 0a 64 6f 5f  h {db close}.do_
11f0: 74 65 73 74 20 36 2e 31 20 7b 0a 20 20 73 71 6c  test 6.1 {.  sql
1200: 69 74 65 33 20 64 62 31 20 74 65 73 74 2e 64 62  ite3 db1 test.db
1210: 31 0a 20 20 73 71 6c 69 74 65 33 20 64 62 32 20  1.  sqlite3 db2 
1220: 74 65 73 74 2e 64 62 32 0a 20 20 73 71 6c 69 74  test.db2.  sqlit
1230: 65 33 20 64 62 33 20 74 65 73 74 2e 64 62 33 0a  e3 db3 test.db3.
1240: 20 20 73 71 6c 69 74 65 33 20 64 62 4d 20 22 22    sqlite3 dbM ""
1250: 0a 0a 20 20 64 62 32 20 63 6c 6f 73 65 0a 20 20  ..  db2 close.  
1260: 64 62 33 20 63 6c 6f 73 65 0a 20 20 64 62 4d 20  db3 close.  dbM 
1270: 63 6c 6f 73 65 0a 20 20 64 62 31 20 63 6c 6f 73  close.  db1 clos
1280: 65 0a 7d 20 7b 7d 0a 0a 64 6f 5f 74 65 73 74 20  e.} {}..do_test 
1290: 36 2e 32 20 7b 0a 20 20 73 71 6c 69 74 65 33 20  6.2 {.  sqlite3 
12a0: 64 62 20 74 65 73 74 2e 64 62 0a 20 20 65 78 65  db test.db.  exe
12b0: 63 73 71 6c 20 7b 0a 20 20 20 20 50 52 41 47 4d  csql {.    PRAGM
12c0: 41 20 74 65 6d 70 5f 73 74 6f 72 65 20 3d 20 66  A temp_store = f
12d0: 69 6c 65 3b 0a 0a 20 20 20 20 50 52 41 47 4d 41  ile;..    PRAGMA
12e0: 20 6d 61 69 6e 2e 63 61 63 68 65 5f 73 69 7a 65   main.cache_size
12f0: 20 3d 20 31 30 3b 0a 20 20 20 20 50 52 41 47 4d   = 10;.    PRAGM
1300: 41 20 74 65 6d 70 2e 63 61 63 68 65 5f 73 69 7a  A temp.cache_siz
1310: 65 20 3d 20 31 30 3b 0a 20 20 20 20 43 52 45 41  e = 10;.    CREA
1320: 54 45 20 54 41 42 4c 45 20 74 65 6d 70 2e 74 74  TE TABLE temp.tt
1330: 28 61 2c 20 62 29 3b 0a 20 20 20 20 49 4e 53 45  (a, b);.    INSE
1340: 52 54 20 49 4e 54 4f 20 74 74 20 56 41 4c 55 45  RT INTO tt VALUE
1350: 53 28 72 61 6e 64 6f 6d 62 6c 6f 62 28 35 30 30  S(randomblob(500
1360: 29 2c 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 36 30  ), randomblob(60
1370: 30 29 29 3b 0a 20 20 20 20 49 4e 53 45 52 54 20  0));.    INSERT 
1380: 49 4e 54 4f 20 74 74 20 53 45 4c 45 43 54 20 72  INTO tt SELECT r
1390: 61 6e 64 6f 6d 62 6c 6f 62 28 35 30 30 29 2c 20  andomblob(500), 
13a0: 72 61 6e 64 6f 6d 62 6c 6f 62 28 36 30 30 29 20  randomblob(600) 
13b0: 46 52 4f 4d 20 74 74 3b 0a 20 20 20 20 49 4e 53  FROM tt;.    INS
13c0: 45 52 54 20 49 4e 54 4f 20 74 74 20 53 45 4c 45  ERT INTO tt SELE
13d0: 43 54 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 35 30  CT randomblob(50
13e0: 30 29 2c 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 36  0), randomblob(6
13f0: 30 30 29 20 46 52 4f 4d 20 74 74 3b 0a 20 20 20  00) FROM tt;.   
1400: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 74 20   INSERT INTO tt 
1410: 53 45 4c 45 43 54 20 72 61 6e 64 6f 6d 62 6c 6f  SELECT randomblo
1420: 62 28 35 30 30 29 2c 20 72 61 6e 64 6f 6d 62 6c  b(500), randombl
1430: 6f 62 28 36 30 30 29 20 46 52 4f 4d 20 74 74 3b  ob(600) FROM tt;
1440: 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f  .    INSERT INTO
1450: 20 74 74 20 53 45 4c 45 43 54 20 72 61 6e 64 6f   tt SELECT rando
1460: 6d 62 6c 6f 62 28 35 30 30 29 2c 20 72 61 6e 64  mblob(500), rand
1470: 6f 6d 62 6c 6f 62 28 36 30 30 29 20 46 52 4f 4d  omblob(600) FROM
1480: 20 74 74 3b 0a 20 20 20 20 49 4e 53 45 52 54 20   tt;.    INSERT 
1490: 49 4e 54 4f 20 74 74 20 53 45 4c 45 43 54 20 72  INTO tt SELECT r
14a0: 61 6e 64 6f 6d 62 6c 6f 62 28 35 30 30 29 2c 20  andomblob(500), 
14b0: 72 61 6e 64 6f 6d 62 6c 6f 62 28 36 30 30 29 20  randomblob(600) 
14c0: 46 52 4f 4d 20 74 74 3b 0a 20 20 20 20 49 4e 53  FROM tt;.    INS
14d0: 45 52 54 20 49 4e 54 4f 20 74 74 20 53 45 4c 45  ERT INTO tt SELE
14e0: 43 54 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 35 30  CT randomblob(50
14f0: 30 29 2c 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 36  0), randomblob(6
1500: 30 30 29 20 46 52 4f 4d 20 74 74 3b 0a 20 20 20  00) FROM tt;.   
1510: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 74 20   INSERT INTO tt 
1520: 53 45 4c 45 43 54 20 72 61 6e 64 6f 6d 62 6c 6f  SELECT randomblo
1530: 62 28 35 30 30 29 2c 20 72 61 6e 64 6f 6d 62 6c  b(500), randombl
1540: 6f 62 28 36 30 30 29 20 46 52 4f 4d 20 74 74 3b  ob(600) FROM tt;
1550: 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f  .    INSERT INTO
1560: 20 74 74 20 53 45 4c 45 43 54 20 72 61 6e 64 6f   tt SELECT rando
1570: 6d 62 6c 6f 62 28 35 30 30 29 2c 20 72 61 6e 64  mblob(500), rand
1580: 6f 6d 62 6c 6f 62 28 36 30 30 29 20 46 52 4f 4d  omblob(600) FROM
1590: 20 74 74 3b 0a 20 20 7d 0a 0a 20 20 64 62 20 63   tt;.  }..  db c
15a0: 6c 6f 73 65 0a 7d 20 7b 7d 0a 0a 23 2d 2d 2d 2d  lose.} {}..#----
15b0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
15c0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
15d0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
15e0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
15f0: 2d 2d 2d 2d 2d 0a 23 20 54 65 73 74 20 74 68 61  -----.# Test tha
1600: 74 20 61 20 64 61 74 61 62 61 73 65 20 66 69 6c  t a database fil
1610: 65 20 61 20 73 69 6e 67 6c 65 20 62 79 74 65 20  e a single byte 
1620: 69 6e 20 73 69 7a 65 20 69 73 20 74 72 65 61 74  in size is treat
1630: 65 64 20 61 73 20 61 6e 20 65 6d 70 74 79 0a 23  ed as an empty.#
1640: 20 66 69 6c 65 2e 20 57 68 65 72 65 61 73 20 61   file. Whereas a
1650: 20 66 69 6c 65 20 32 20 62 79 74 65 73 20 6f 72   file 2 bytes or
1660: 20 6c 61 72 67 65 72 20 6d 69 67 68 74 20 62 65   larger might be
1670: 20 63 6f 6e 73 69 64 65 72 65 64 20 63 6f 72 72   considered corr
1680: 75 70 74 2e 0a 23 0a 63 61 74 63 68 20 7b 20 64  upt..#.catch { d
1690: 62 20 63 6c 6f 73 65 20 7d 0a 66 6f 72 63 65 64  b close }.forced
16a0: 65 6c 65 74 65 20 74 65 73 74 2e 64 62 20 74 65  elete test.db te
16b0: 73 74 2e 64 62 32 0a 0a 70 72 6f 63 20 63 72 65  st.db2..proc cre
16c0: 61 74 65 5f 64 62 5f 66 69 6c 65 20 7b 6e 42 79  ate_db_file {nBy
16d0: 74 65 7d 20 7b 0a 20 20 73 65 74 20 66 64 20 5b  te} {.  set fd [
16e0: 6f 70 65 6e 20 74 65 73 74 2e 64 62 20 77 5d 0a  open test.db w].
16f0: 20 20 66 63 6f 6e 66 69 67 75 72 65 20 24 66 64    fconfigure $fd
1700: 20 2d 74 72 61 6e 73 6c 61 74 69 6f 6e 20 62 69   -translation bi
1710: 6e 61 72 79 20 2d 65 6e 63 6f 64 69 6e 67 20 62  nary -encoding b
1720: 69 6e 61 72 79 0a 20 20 70 75 74 73 20 2d 6e 6f  inary.  puts -no
1730: 6e 65 77 6c 69 6e 65 20 24 66 64 20 5b 73 74 72  newline $fd [str
1740: 69 6e 67 20 72 61 6e 67 65 20 22 78 53 51 4c 69  ing range "xSQLi
1750: 74 65 22 20 31 20 24 6e 42 79 74 65 5d 0a 20 20  te" 1 $nByte].  
1760: 63 6c 6f 73 65 20 24 66 64 0a 7d 0a 0a 66 6f 72  close $fd.}..for
1770: 65 61 63 68 20 7b 6e 42 79 74 65 20 72 65 73 7d  each {nByte res}
1780: 20 7b 0a 20 20 31 20 20 20 20 20 20 7b 30 20 7b   {.  1      {0 {
1790: 7d 7d 0a 20 20 32 20 20 20 20 20 20 7b 31 20 7b  }}.  2      {1 {
17a0: 66 69 6c 65 20 69 73 20 65 6e 63 72 79 70 74 65  file is encrypte
17b0: 64 20 6f 72 20 69 73 20 6e 6f 74 20 61 20 64 61  d or is not a da
17c0: 74 61 62 61 73 65 7d 7d 0a 20 20 33 20 20 20 20  tabase}}.  3    
17d0: 20 20 7b 31 20 7b 66 69 6c 65 20 69 73 20 65 6e    {1 {file is en
17e0: 63 72 79 70 74 65 64 20 6f 72 20 69 73 20 6e 6f  crypted or is no
17f0: 74 20 61 20 64 61 74 61 62 61 73 65 7d 7d 0a 7d  t a database}}.}
1800: 20 7b 0a 20 20 64 6f 5f 74 65 73 74 20 37 2e 24   {.  do_test 7.$
1810: 6e 42 79 74 65 20 7b 0a 20 20 20 20 63 72 65 61  nByte {.    crea
1820: 74 65 5f 64 62 5f 66 69 6c 65 20 24 6e 42 79 74  te_db_file $nByt
1830: 65 0a 20 20 20 20 6c 69 73 74 20 5b 63 61 74 63  e.    list [catc
1840: 68 20 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65  h {.      sqlite
1850: 33 20 64 62 20 74 65 73 74 2e 64 62 0a 20 20 20  3 db test.db.   
1860: 20 20 20 65 78 65 63 73 71 6c 20 7b 20 43 52 45     execsql { CRE
1870: 41 54 45 20 54 41 42 4c 45 20 74 31 28 61 2c 20  ATE TABLE t1(a, 
1880: 62 29 20 7d 0a 20 20 20 20 7d 20 6d 73 67 5d 20  b) }.    } msg] 
1890: 24 6d 73 67 0a 20 20 7d 20 24 72 65 73 0a 20 20  $msg.  } $res.  
18a0: 63 61 74 63 68 20 7b 20 64 62 20 63 6c 6f 73 65  catch { db close
18b0: 20 7d 0a 7d 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d 2d   }.}..#---------
18c0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
18d0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
18e0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
18f0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
1900: 0a 23 20 0a 63 61 74 63 68 20 7b 20 64 62 20 63  .# .catch { db c
1910: 6c 6f 73 65 20 7d 0a 66 6f 72 63 65 64 65 6c 65  lose }.forcedele
1920: 74 65 20 74 65 73 74 2e 64 62 20 74 65 73 74 2e  te test.db test.
1930: 64 62 32 0a 0a 64 6f 5f 74 65 73 74 20 38 2e 31  db2..do_test 8.1
1940: 20 7b 0a 20 20 73 71 6c 69 74 65 33 20 64 62 20   {.  sqlite3 db 
1950: 74 65 73 74 2e 64 62 0a 20 20 66 69 6c 65 5f 63  test.db.  file_c
1960: 6f 6e 74 72 6f 6c 5f 63 68 75 6e 6b 73 69 7a 65  ontrol_chunksize
1970: 5f 74 65 73 74 20 64 62 20 6d 61 69 6e 20 34 30  _test db main 40
1980: 39 36 0a 20 20 66 69 6c 65 20 73 69 7a 65 20 74  96.  file size t
1990: 65 73 74 2e 64 62 0a 7d 20 7b 30 7d 0a 66 6f 72  est.db.} {0}.for
19a0: 65 61 63 68 20 7b 74 6e 20 68 69 6e 74 20 73 69  each {tn hint si
19b0: 7a 65 7d 20 7b 0a 20 20 31 20 20 31 30 30 30 20  ze} {.  1  1000 
19c0: 20 20 20 34 30 39 36 20 0a 20 20 32 20 20 31 30     4096 .  2  10
19d0: 30 30 20 20 20 20 34 30 39 36 20 0a 20 20 33 20  00    4096 .  3 
19e0: 20 33 30 30 30 20 20 20 20 34 30 39 36 20 0a 20   3000    4096 . 
19f0: 20 34 20 20 34 30 39 36 20 20 20 20 34 30 39 36   4  4096    4096
1a00: 20 0a 20 20 35 20 20 34 31 39 37 20 20 20 20 38   .  5  4197    8
1a10: 31 39 32 20 0a 7d 20 7b 0a 20 20 64 6f 5f 74 65  192 .} {.  do_te
1a20: 73 74 20 38 2e 32 2e 24 74 6e 20 7b 0a 20 20 20  st 8.2.$tn {.   
1a30: 20 66 69 6c 65 5f 63 6f 6e 74 72 6f 6c 5f 73 69   file_control_si
1a40: 7a 65 68 69 6e 74 5f 74 65 73 74 20 64 62 20 6d  zehint_test db m
1a50: 61 69 6e 20 24 68 69 6e 74 0a 20 20 20 20 66 69  ain $hint.    fi
1a60: 6c 65 20 73 69 7a 65 20 74 65 73 74 2e 64 62 0a  le size test.db.
1a70: 20 20 7d 20 24 73 69 7a 65 0a 7d 0a 0a 64 6f 5f    } $size.}..do_
1a80: 74 65 73 74 20 38 2e 33 20 7b 0a 20 20 64 62 20  test 8.3 {.  db 
1a90: 63 6c 6f 73 65 0a 20 20 66 6f 72 63 65 64 65 6c  close.  forcedel
1aa0: 65 74 65 20 74 65 73 74 2e 64 62 20 74 65 73 74  ete test.db test
1ab0: 2e 64 62 32 0a 20 20 73 71 6c 69 74 65 33 20 64  .db2.  sqlite3 d
1ac0: 62 20 74 65 73 74 2e 64 62 0a 20 20 66 69 6c 65  b test.db.  file
1ad0: 5f 63 6f 6e 74 72 6f 6c 5f 63 68 75 6e 6b 73 69  _control_chunksi
1ae0: 7a 65 5f 74 65 73 74 20 64 62 20 6d 61 69 6e 20  ze_test db main 
1af0: 31 36 0a 20 20 66 69 6c 65 20 73 69 7a 65 20 74  16.  file size t
1b00: 65 73 74 2e 64 62 0a 7d 20 7b 30 7d 0a 66 6f 72  est.db.} {0}.for
1b10: 65 61 63 68 20 7b 74 6e 20 68 69 6e 74 20 73 69  each {tn hint si
1b20: 7a 65 7d 20 7b 0a 20 20 31 20 20 35 20 20 20 20  ze} {.  1  5    
1b30: 20 20 20 31 36 20 0a 20 20 32 20 20 31 33 20 20     16 .  2  13  
1b40: 20 20 20 20 31 36 20 0a 20 20 33 20 20 34 35 20      16 .  3  45 
1b50: 20 20 20 20 20 34 38 20 0a 20 20 34 20 20 34 38       48 .  4  48
1b60: 20 20 20 20 20 20 34 38 20 0a 20 20 35 20 20 34        48 .  5  4
1b70: 39 20 20 20 20 20 20 36 34 20 0a 7d 20 7b 0a 20  9      64 .} {. 
1b80: 20 64 6f 5f 74 65 73 74 20 38 2e 34 2e 24 74 6e   do_test 8.4.$tn
1b90: 20 7b 0a 20 20 20 20 66 69 6c 65 5f 63 6f 6e 74   {.    file_cont
1ba0: 72 6f 6c 5f 73 69 7a 65 68 69 6e 74 5f 74 65 73  rol_sizehint_tes
1bb0: 74 20 64 62 20 6d 61 69 6e 20 24 68 69 6e 74 0a  t db main $hint.
1bc0: 20 20 20 20 66 69 6c 65 20 73 69 7a 65 20 74 65      file size te
1bd0: 73 74 2e 64 62 0a 20 20 7d 20 24 73 69 7a 65 0a  st.db.  } $size.
1be0: 7d 0a 0a 74 65 73 74 5f 73 79 73 63 61 6c 6c 20  }..test_syscall 
1bf0: 72 65 73 65 74 0a 66 69 6e 69 73 68 5f 74 65 73  reset.finish_tes
1c00: 74 0a                                            t.