/ Hex Artifact Content
Login

Artifact 5390ddf1f90a6d055111c0ebe6311045dd3035e1:


0000: 23 20 32 30 30 37 20 4d 61 72 63 68 20 32 34 0a  # 2007 March 24.
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 20 54 68 69 73 20 66 69 6c  *****.# This fil
0170: 65 20 69 6d 70 6c 65 6d 65 6e 74 73 20 72 65 67  e implements reg
0180: 72 65 73 73 69 6f 6e 20 74 65 73 74 73 20 66 6f  ression tests fo
0190: 72 20 53 51 4c 69 74 65 20 6c 69 62 72 61 72 79  r SQLite library
01a0: 2e 20 54 68 65 20 66 6f 63 75 73 0a 23 20 6f 66  . The focus.# of
01b0: 20 74 68 65 73 65 20 74 65 73 74 73 20 69 73 20   these tests is 
01c0: 65 78 63 6c 75 73 69 76 65 20 61 63 63 65 73 73  exclusive access
01d0: 20 6d 6f 64 65 20 28 69 2e 65 2e 20 74 68 65 20   mode (i.e. the 
01e0: 74 68 69 6e 67 20 61 63 74 69 76 61 74 65 64 20  thing activated 
01f0: 62 79 20 0a 23 20 22 50 52 41 47 4d 41 20 6c 6f  by .# "PRAGMA lo
0200: 63 6b 69 6e 67 5f 6d 6f 64 65 20 3d 20 45 58 43  cking_mode = EXC
0210: 4c 55 53 49 56 45 22 29 2e 0a 23 0a 23 20 24 49  LUSIVE")..#.# $I
0220: 64 3a 20 65 78 63 6c 75 73 69 76 65 2e 74 65 73  d: exclusive.tes
0230: 74 2c 76 20 31 2e 38 20 32 30 30 38 2f 30 34 2f  t,v 1.8 2008/04/
0240: 31 37 20 31 34 3a 31 36 3a 34 32 20 64 72 68 20  17 14:16:42 drh 
0250: 45 78 70 20 24 0a 0a 73 65 74 20 74 65 73 74 64  Exp $..set testd
0260: 69 72 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65  ir [file dirname
0270: 20 24 61 72 67 76 30 5d 0a 73 6f 75 72 63 65 20   $argv0].source 
0280: 24 74 65 73 74 64 69 72 2f 74 65 73 74 65 72 2e  $testdir/tester.
0290: 74 63 6c 0a 0a 69 66 63 61 70 61 62 6c 65 20 7b  tcl..ifcapable {
02a0: 21 70 61 67 65 72 5f 70 72 61 67 6d 61 73 7d 20  !pager_pragmas} 
02b0: 7b 0a 20 20 66 69 6e 69 73 68 5f 74 65 73 74 0a  {.  finish_test.
02c0: 20 20 72 65 74 75 72 6e 0a 7d 0a 0a 66 69 6c 65    return.}..file
02d0: 20 64 65 6c 65 74 65 20 2d 66 6f 72 63 65 20 74   delete -force t
02e0: 65 73 74 32 2e 64 62 2d 6a 6f 75 72 6e 61 6c 0a  est2.db-journal.
02f0: 66 69 6c 65 20 64 65 6c 65 74 65 20 2d 66 6f 72  file delete -for
0300: 63 65 20 74 65 73 74 32 2e 64 62 0a 66 69 6c 65  ce test2.db.file
0310: 20 64 65 6c 65 74 65 20 2d 66 6f 72 63 65 20 74   delete -force t
0320: 65 73 74 33 2e 64 62 2d 6a 6f 75 72 6e 61 6c 0a  est3.db-journal.
0330: 66 69 6c 65 20 64 65 6c 65 74 65 20 2d 66 6f 72  file delete -for
0340: 63 65 20 74 65 73 74 33 2e 64 62 0a 66 69 6c 65  ce test3.db.file
0350: 20 64 65 6c 65 74 65 20 2d 66 6f 72 63 65 20 74   delete -force t
0360: 65 73 74 34 2e 64 62 2d 6a 6f 75 72 6e 61 6c 0a  est4.db-journal.
0370: 66 69 6c 65 20 64 65 6c 65 74 65 20 2d 66 6f 72  file delete -for
0380: 63 65 20 74 65 73 74 34 2e 64 62 0a 0a 23 20 54  ce test4.db..# T
0390: 68 65 20 6c 6f 63 6b 69 6e 67 20 6d 6f 64 65 20  he locking mode 
03a0: 66 6f 72 20 74 68 65 20 54 45 4d 50 20 74 61 62  for the TEMP tab
03b0: 6c 65 20 69 73 20 61 6c 77 61 79 73 20 22 65 78  le is always "ex
03c0: 63 6c 75 73 69 76 65 22 20 66 6f 72 0a 23 20 6f  clusive" for.# o
03d0: 6e 2d 64 69 73 6b 20 74 61 62 6c 65 73 20 61 6e  n-disk tables an
03e0: 64 20 22 6e 6f 72 6d 61 6c 22 20 66 6f 72 20 69  d "normal" for i
03f0: 6e 2d 6d 65 6d 6f 72 79 20 74 61 62 6c 65 73 2e  n-memory tables.
0400: 0a 23 0a 69 66 20 7b 5b 69 6e 66 6f 20 65 78 69  .#.if {[info exi
0410: 73 74 73 20 54 45 4d 50 5f 53 54 4f 52 45 5d 20  sts TEMP_STORE] 
0420: 26 26 20 24 54 45 4d 50 5f 53 54 4f 52 45 3e 3d  && $TEMP_STORE>=
0430: 32 7d 20 7b 0a 20 20 73 65 74 20 74 65 6d 70 5f  2} {.  set temp_
0440: 6d 6f 64 65 20 6e 6f 72 6d 61 6c 0a 7d 20 65 6c  mode normal.} el
0450: 73 65 20 7b 0a 20 20 73 65 74 20 74 65 6d 70 5f  se {.  set temp_
0460: 6d 6f 64 65 20 65 78 63 6c 75 73 69 76 65 0a 7d  mode exclusive.}
0470: 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ..#-------------
0480: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0490: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
04a0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
04b0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 23 20 54 65 73 74  ---------.# Test
04c0: 20 63 61 73 65 73 20 65 78 63 6c 75 73 69 76 65   cases exclusive
04d0: 2d 31 2e 58 20 74 65 73 74 20 74 68 65 20 50 52  -1.X test the PR
04e0: 41 47 4d 41 20 6c 6f 67 69 63 2e 0a 23 0a 64 6f  AGMA logic..#.do
04f0: 5f 74 65 73 74 20 65 78 63 6c 75 73 69 76 65 2d  _test exclusive-
0500: 31 2e 30 20 7b 0a 20 20 65 78 65 63 73 71 6c 20  1.0 {.  execsql 
0510: 7b 0a 20 20 20 20 70 72 61 67 6d 61 20 6c 6f 63  {.    pragma loc
0520: 6b 69 6e 67 5f 6d 6f 64 65 3b 0a 20 20 20 20 70  king_mode;.    p
0530: 72 61 67 6d 61 20 6d 61 69 6e 2e 6c 6f 63 6b 69  ragma main.locki
0540: 6e 67 5f 6d 6f 64 65 3b 0a 20 20 20 20 70 72 61  ng_mode;.    pra
0550: 67 6d 61 20 74 65 6d 70 2e 6c 6f 63 6b 69 6e 67  gma temp.locking
0560: 5f 6d 6f 64 65 3b 0a 20 20 7d 20 0a 7d 20 5b 6c  _mode;.  } .} [l
0570: 69 73 74 20 6e 6f 72 6d 61 6c 20 6e 6f 72 6d 61  ist normal norma
0580: 6c 20 24 74 65 6d 70 5f 6d 6f 64 65 5d 0a 64 6f  l $temp_mode].do
0590: 5f 74 65 73 74 20 65 78 63 6c 75 73 69 76 65 2d  _test exclusive-
05a0: 31 2e 31 20 7b 0a 20 20 65 78 65 63 73 71 6c 20  1.1 {.  execsql 
05b0: 7b 0a 20 20 20 20 70 72 61 67 6d 61 20 6c 6f 63  {.    pragma loc
05c0: 6b 69 6e 67 5f 6d 6f 64 65 20 3d 20 65 78 63 6c  king_mode = excl
05d0: 75 73 69 76 65 3b 0a 20 20 7d 20 0a 7d 20 7b 65  usive;.  } .} {e
05e0: 78 63 6c 75 73 69 76 65 7d 0a 64 6f 5f 74 65 73  xclusive}.do_tes
05f0: 74 20 65 78 63 6c 75 73 69 76 65 2d 31 2e 32 20  t exclusive-1.2 
0600: 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20  {.  execsql {.  
0610: 20 20 70 72 61 67 6d 61 20 6c 6f 63 6b 69 6e 67    pragma locking
0620: 5f 6d 6f 64 65 3b 0a 20 20 20 20 70 72 61 67 6d  _mode;.    pragm
0630: 61 20 6d 61 69 6e 2e 6c 6f 63 6b 69 6e 67 5f 6d  a main.locking_m
0640: 6f 64 65 3b 0a 20 20 20 20 70 72 61 67 6d 61 20  ode;.    pragma 
0650: 74 65 6d 70 2e 6c 6f 63 6b 69 6e 67 5f 6d 6f 64  temp.locking_mod
0660: 65 3b 0a 20 20 7d 20 0a 7d 20 5b 6c 69 73 74 20  e;.  } .} [list 
0670: 65 78 63 6c 75 73 69 76 65 20 65 78 63 6c 75 73  exclusive exclus
0680: 69 76 65 20 24 74 65 6d 70 5f 6d 6f 64 65 5d 0a  ive $temp_mode].
0690: 64 6f 5f 74 65 73 74 20 65 78 63 6c 75 73 69 76  do_test exclusiv
06a0: 65 2d 31 2e 33 20 7b 0a 20 20 65 78 65 63 73 71  e-1.3 {.  execsq
06b0: 6c 20 7b 0a 20 20 20 20 70 72 61 67 6d 61 20 6c  l {.    pragma l
06c0: 6f 63 6b 69 6e 67 5f 6d 6f 64 65 20 3d 20 6e 6f  ocking_mode = no
06d0: 72 6d 61 6c 3b 0a 20 20 7d 20 0a 7d 20 7b 6e 6f  rmal;.  } .} {no
06e0: 72 6d 61 6c 7d 0a 64 6f 5f 74 65 73 74 20 65 78  rmal}.do_test ex
06f0: 63 6c 75 73 69 76 65 2d 31 2e 34 20 7b 0a 20 20  clusive-1.4 {.  
0700: 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 70 72  execsql {.    pr
0710: 61 67 6d 61 20 6c 6f 63 6b 69 6e 67 5f 6d 6f 64  agma locking_mod
0720: 65 3b 0a 20 20 20 20 70 72 61 67 6d 61 20 6d 61  e;.    pragma ma
0730: 69 6e 2e 6c 6f 63 6b 69 6e 67 5f 6d 6f 64 65 3b  in.locking_mode;
0740: 0a 20 20 20 20 70 72 61 67 6d 61 20 74 65 6d 70  .    pragma temp
0750: 2e 6c 6f 63 6b 69 6e 67 5f 6d 6f 64 65 3b 0a 20  .locking_mode;. 
0760: 20 7d 20 0a 7d 20 5b 6c 69 73 74 20 6e 6f 72 6d   } .} [list norm
0770: 61 6c 20 6e 6f 72 6d 61 6c 20 24 74 65 6d 70 5f  al normal $temp_
0780: 6d 6f 64 65 5d 0a 64 6f 5f 74 65 73 74 20 65 78  mode].do_test ex
0790: 63 6c 75 73 69 76 65 2d 31 2e 35 20 7b 0a 20 20  clusive-1.5 {.  
07a0: 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 70 72  execsql {.    pr
07b0: 61 67 6d 61 20 6c 6f 63 6b 69 6e 67 5f 6d 6f 64  agma locking_mod
07c0: 65 20 3d 20 69 6e 76 61 6c 69 64 3b 0a 20 20 7d  e = invalid;.  }
07d0: 20 0a 7d 20 7b 6e 6f 72 6d 61 6c 7d 0a 64 6f 5f   .} {normal}.do_
07e0: 74 65 73 74 20 65 78 63 6c 75 73 69 76 65 2d 31  test exclusive-1
07f0: 2e 36 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b  .6 {.  execsql {
0800: 0a 20 20 20 20 70 72 61 67 6d 61 20 6c 6f 63 6b  .    pragma lock
0810: 69 6e 67 5f 6d 6f 64 65 3b 0a 20 20 20 20 70 72  ing_mode;.    pr
0820: 61 67 6d 61 20 6d 61 69 6e 2e 6c 6f 63 6b 69 6e  agma main.lockin
0830: 67 5f 6d 6f 64 65 3b 0a 20 20 20 20 70 72 61 67  g_mode;.    prag
0840: 6d 61 20 74 65 6d 70 2e 6c 6f 63 6b 69 6e 67 5f  ma temp.locking_
0850: 6d 6f 64 65 3b 0a 20 20 7d 20 0a 7d 20 5b 6c 69  mode;.  } .} [li
0860: 73 74 20 6e 6f 72 6d 61 6c 20 6e 6f 72 6d 61 6c  st normal normal
0870: 20 24 74 65 6d 70 5f 6d 6f 64 65 5d 0a 69 66 63   $temp_mode].ifc
0880: 61 70 61 62 6c 65 20 61 74 74 61 63 68 20 7b 0a  apable attach {.
0890: 20 20 64 6f 5f 74 65 73 74 20 65 78 63 6c 75 73    do_test exclus
08a0: 69 76 65 2d 31 2e 37 20 7b 0a 20 20 20 20 65 78  ive-1.7 {.    ex
08b0: 65 63 73 71 6c 20 7b 0a 20 20 20 20 20 20 70 72  ecsql {.      pr
08c0: 61 67 6d 61 20 6c 6f 63 6b 69 6e 67 5f 6d 6f 64  agma locking_mod
08d0: 65 20 3d 20 65 78 63 6c 75 73 69 76 65 3b 0a 20  e = exclusive;. 
08e0: 20 20 20 20 20 41 54 54 41 43 48 20 27 74 65 73       ATTACH 'tes
08f0: 74 32 2e 64 62 27 20 61 73 20 61 75 78 3b 0a 20  t2.db' as aux;. 
0900: 20 20 20 7d 0a 20 20 20 20 65 78 65 63 73 71 6c     }.    execsql
0910: 20 7b 0a 20 20 20 20 20 20 70 72 61 67 6d 61 20   {.      pragma 
0920: 6d 61 69 6e 2e 6c 6f 63 6b 69 6e 67 5f 6d 6f 64  main.locking_mod
0930: 65 3b 0a 20 20 20 20 20 20 70 72 61 67 6d 61 20  e;.      pragma 
0940: 61 75 78 2e 6c 6f 63 6b 69 6e 67 5f 6d 6f 64 65  aux.locking_mode
0950: 3b 0a 20 20 20 20 7d 0a 20 20 7d 20 7b 65 78 63  ;.    }.  } {exc
0960: 6c 75 73 69 76 65 20 65 78 63 6c 75 73 69 76 65  lusive exclusive
0970: 7d 0a 20 20 64 6f 5f 74 65 73 74 20 65 78 63 6c  }.  do_test excl
0980: 75 73 69 76 65 2d 31 2e 38 20 7b 0a 20 20 20 20  usive-1.8 {.    
0990: 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 20 20  execsql {.      
09a0: 70 72 61 67 6d 61 20 6d 61 69 6e 2e 6c 6f 63 6b  pragma main.lock
09b0: 69 6e 67 5f 6d 6f 64 65 20 3d 20 6e 6f 72 6d 61  ing_mode = norma
09c0: 6c 3b 0a 20 20 20 20 7d 0a 20 20 20 20 65 78 65  l;.    }.    exe
09d0: 63 73 71 6c 20 7b 0a 20 20 20 20 20 20 70 72 61  csql {.      pra
09e0: 67 6d 61 20 6d 61 69 6e 2e 6c 6f 63 6b 69 6e 67  gma main.locking
09f0: 5f 6d 6f 64 65 3b 0a 20 20 20 20 20 20 70 72 61  _mode;.      pra
0a00: 67 6d 61 20 74 65 6d 70 2e 6c 6f 63 6b 69 6e 67  gma temp.locking
0a10: 5f 6d 6f 64 65 3b 0a 20 20 20 20 20 20 70 72 61  _mode;.      pra
0a20: 67 6d 61 20 61 75 78 2e 6c 6f 63 6b 69 6e 67 5f  gma aux.locking_
0a30: 6d 6f 64 65 3b 0a 20 20 20 20 7d 0a 20 20 7d 20  mode;.    }.  } 
0a40: 5b 6c 69 73 74 20 6e 6f 72 6d 61 6c 20 24 74 65  [list normal $te
0a50: 6d 70 5f 6d 6f 64 65 20 65 78 63 6c 75 73 69 76  mp_mode exclusiv
0a60: 65 5d 0a 20 20 64 6f 5f 74 65 73 74 20 65 78 63  e].  do_test exc
0a70: 6c 75 73 69 76 65 2d 31 2e 39 20 7b 0a 20 20 20  lusive-1.9 {.   
0a80: 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 20   execsql {.     
0a90: 20 70 72 61 67 6d 61 20 6c 6f 63 6b 69 6e 67 5f   pragma locking_
0aa0: 6d 6f 64 65 3b 0a 20 20 20 20 7d 0a 20 20 7d 20  mode;.    }.  } 
0ab0: 7b 65 78 63 6c 75 73 69 76 65 7d 0a 20 20 64 6f  {exclusive}.  do
0ac0: 5f 74 65 73 74 20 65 78 63 6c 75 73 69 76 65 2d  _test exclusive-
0ad0: 31 2e 31 30 20 7b 0a 20 20 20 20 65 78 65 63 73  1.10 {.    execs
0ae0: 71 6c 20 7b 0a 20 20 20 20 20 20 41 54 54 41 43  ql {.      ATTAC
0af0: 48 20 27 74 65 73 74 33 2e 64 62 27 20 61 73 20  H 'test3.db' as 
0b00: 61 75 78 32 3b 0a 20 20 20 20 7d 0a 20 20 20 20  aux2;.    }.    
0b10: 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 20 20  execsql {.      
0b20: 70 72 61 67 6d 61 20 6d 61 69 6e 2e 6c 6f 63 6b  pragma main.lock
0b30: 69 6e 67 5f 6d 6f 64 65 3b 0a 20 20 20 20 20 20  ing_mode;.      
0b40: 70 72 61 67 6d 61 20 61 75 78 2e 6c 6f 63 6b 69  pragma aux.locki
0b50: 6e 67 5f 6d 6f 64 65 3b 0a 20 20 20 20 20 20 70  ng_mode;.      p
0b60: 72 61 67 6d 61 20 61 75 78 32 2e 6c 6f 63 6b 69  ragma aux2.locki
0b70: 6e 67 5f 6d 6f 64 65 3b 0a 20 20 20 20 7d 0a 20  ng_mode;.    }. 
0b80: 20 7d 20 7b 6e 6f 72 6d 61 6c 20 65 78 63 6c 75   } {normal exclu
0b90: 73 69 76 65 20 65 78 63 6c 75 73 69 76 65 7d 0a  sive exclusive}.
0ba0: 20 20 64 6f 5f 74 65 73 74 20 65 78 63 6c 75 73    do_test exclus
0bb0: 69 76 65 2d 31 2e 31 31 20 7b 0a 20 20 20 20 65  ive-1.11 {.    e
0bc0: 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 20 20 70  xecsql {.      p
0bd0: 72 61 67 6d 61 20 61 75 78 2e 6c 6f 63 6b 69 6e  ragma aux.lockin
0be0: 67 5f 6d 6f 64 65 20 3d 20 6e 6f 72 6d 61 6c 3b  g_mode = normal;
0bf0: 0a 20 20 20 20 7d 0a 20 20 20 20 65 78 65 63 73  .    }.    execs
0c00: 71 6c 20 7b 0a 20 20 20 20 20 20 70 72 61 67 6d  ql {.      pragm
0c10: 61 20 6d 61 69 6e 2e 6c 6f 63 6b 69 6e 67 5f 6d  a main.locking_m
0c20: 6f 64 65 3b 0a 20 20 20 20 20 20 70 72 61 67 6d  ode;.      pragm
0c30: 61 20 61 75 78 2e 6c 6f 63 6b 69 6e 67 5f 6d 6f  a aux.locking_mo
0c40: 64 65 3b 0a 20 20 20 20 20 20 70 72 61 67 6d 61  de;.      pragma
0c50: 20 61 75 78 32 2e 6c 6f 63 6b 69 6e 67 5f 6d 6f   aux2.locking_mo
0c60: 64 65 3b 0a 20 20 20 20 7d 0a 20 20 7d 20 7b 6e  de;.    }.  } {n
0c70: 6f 72 6d 61 6c 20 6e 6f 72 6d 61 6c 20 65 78 63  ormal normal exc
0c80: 6c 75 73 69 76 65 7d 0a 20 20 64 6f 5f 74 65 73  lusive}.  do_tes
0c90: 74 20 65 78 63 6c 75 73 69 76 65 2d 31 2e 31 32  t exclusive-1.12
0ca0: 20 7b 0a 20 20 20 20 65 78 65 63 73 71 6c 20 7b   {.    execsql {
0cb0: 0a 20 20 20 20 20 20 70 72 61 67 6d 61 20 6c 6f  .      pragma lo
0cc0: 63 6b 69 6e 67 5f 6d 6f 64 65 20 3d 20 6e 6f 72  cking_mode = nor
0cd0: 6d 61 6c 3b 0a 20 20 20 20 7d 0a 20 20 20 20 65  mal;.    }.    e
0ce0: 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 20 20 70  xecsql {.      p
0cf0: 72 61 67 6d 61 20 6d 61 69 6e 2e 6c 6f 63 6b 69  ragma main.locki
0d00: 6e 67 5f 6d 6f 64 65 3b 0a 20 20 20 20 20 20 70  ng_mode;.      p
0d10: 72 61 67 6d 61 20 74 65 6d 70 2e 6c 6f 63 6b 69  ragma temp.locki
0d20: 6e 67 5f 6d 6f 64 65 3b 0a 20 20 20 20 20 20 70  ng_mode;.      p
0d30: 72 61 67 6d 61 20 61 75 78 2e 6c 6f 63 6b 69 6e  ragma aux.lockin
0d40: 67 5f 6d 6f 64 65 3b 0a 20 20 20 20 20 20 70 72  g_mode;.      pr
0d50: 61 67 6d 61 20 61 75 78 32 2e 6c 6f 63 6b 69 6e  agma aux2.lockin
0d60: 67 5f 6d 6f 64 65 3b 0a 20 20 20 20 7d 0a 20 20  g_mode;.    }.  
0d70: 7d 20 5b 6c 69 73 74 20 6e 6f 72 6d 61 6c 20 24  } [list normal $
0d80: 74 65 6d 70 5f 6d 6f 64 65 20 6e 6f 72 6d 61 6c  temp_mode normal
0d90: 20 6e 6f 72 6d 61 6c 5d 0a 20 20 64 6f 5f 74 65   normal].  do_te
0da0: 73 74 20 65 78 63 6c 75 73 69 76 65 2d 31 2e 31  st exclusive-1.1
0db0: 33 20 7b 0a 20 20 20 20 65 78 65 63 73 71 6c 20  3 {.    execsql 
0dc0: 7b 0a 20 20 20 20 20 20 41 54 54 41 43 48 20 27  {.      ATTACH '
0dd0: 74 65 73 74 34 2e 64 62 27 20 61 73 20 61 75 78  test4.db' as aux
0de0: 33 3b 0a 20 20 20 20 7d 0a 20 20 20 20 65 78 65  3;.    }.    exe
0df0: 63 73 71 6c 20 7b 0a 20 20 20 20 20 20 70 72 61  csql {.      pra
0e00: 67 6d 61 20 6d 61 69 6e 2e 6c 6f 63 6b 69 6e 67  gma main.locking
0e10: 5f 6d 6f 64 65 3b 0a 20 20 20 20 20 20 70 72 61  _mode;.      pra
0e20: 67 6d 61 20 74 65 6d 70 2e 6c 6f 63 6b 69 6e 67  gma temp.locking
0e30: 5f 6d 6f 64 65 3b 0a 20 20 20 20 20 20 70 72 61  _mode;.      pra
0e40: 67 6d 61 20 61 75 78 2e 6c 6f 63 6b 69 6e 67 5f  gma aux.locking_
0e50: 6d 6f 64 65 3b 0a 20 20 20 20 20 20 70 72 61 67  mode;.      prag
0e60: 6d 61 20 61 75 78 32 2e 6c 6f 63 6b 69 6e 67 5f  ma aux2.locking_
0e70: 6d 6f 64 65 3b 0a 20 20 20 20 20 20 70 72 61 67  mode;.      prag
0e80: 6d 61 20 61 75 78 33 2e 6c 6f 63 6b 69 6e 67 5f  ma aux3.locking_
0e90: 6d 6f 64 65 3b 0a 20 20 20 20 7d 0a 20 20 7d 20  mode;.    }.  } 
0ea0: 5b 6c 69 73 74 20 6e 6f 72 6d 61 6c 20 24 74 65  [list normal $te
0eb0: 6d 70 5f 6d 6f 64 65 20 6e 6f 72 6d 61 6c 20 6e  mp_mode normal n
0ec0: 6f 72 6d 61 6c 20 6e 6f 72 6d 61 6c 5d 0a 20 20  ormal normal].  
0ed0: 0a 20 20 64 6f 5f 74 65 73 74 20 65 78 63 6c 75  .  do_test exclu
0ee0: 73 69 76 65 2d 31 2e 39 39 20 7b 0a 20 20 20 20  sive-1.99 {.    
0ef0: 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 20 20  execsql {.      
0f00: 44 45 54 41 43 48 20 61 75 78 3b 0a 20 20 20 20  DETACH aux;.    
0f10: 20 20 44 45 54 41 43 48 20 61 75 78 32 3b 0a 20    DETACH aux2;. 
0f20: 20 20 20 20 20 44 45 54 41 43 48 20 61 75 78 33       DETACH aux3
0f30: 3b 0a 20 20 20 20 7d 0a 20 20 7d 20 7b 7d 0a 7d  ;.    }.  } {}.}
0f40: 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ..#-------------
0f50: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0f60: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0f70: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0f80: 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 23 20 54 65 73 74  ---------.# Test
0f90: 20 63 61 73 65 73 20 65 78 63 6c 75 73 69 76 65   cases exclusive
0fa0: 2d 32 2e 58 20 76 65 72 69 66 79 20 74 68 61 74  -2.X verify that
0fb0: 20 63 6f 6e 6e 65 63 74 69 6f 6e 73 20 69 6e 20   connections in 
0fc0: 65 78 63 6c 75 73 69 76 65 20 0a 23 20 6c 6f 63  exclusive .# loc
0fd0: 6b 69 6e 67 5f 6d 6f 64 65 20 64 6f 20 6e 6f 74  king_mode do not
0fe0: 20 72 65 6c 69 6e 71 75 69 73 68 20 6c 6f 63 6b   relinquish lock
0ff0: 73 2e 0a 23 0a 64 6f 5f 74 65 73 74 20 65 78 63  s..#.do_test exc
1000: 6c 75 73 69 76 65 2d 32 2e 30 20 7b 0a 20 20 65  lusive-2.0 {.  e
1010: 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 43 52 45  xecsql {.    CRE
1020: 41 54 45 20 54 41 42 4c 45 20 61 62 63 28 61 2c  ATE TABLE abc(a,
1030: 20 62 2c 20 63 29 3b 0a 20 20 20 20 49 4e 53 45   b, c);.    INSE
1040: 52 54 20 49 4e 54 4f 20 61 62 63 20 56 41 4c 55  RT INTO abc VALU
1050: 45 53 28 31 2c 20 32 2c 20 33 29 3b 0a 20 20 20  ES(1, 2, 3);.   
1060: 20 50 52 41 47 4d 41 20 6c 6f 63 6b 69 6e 67 5f   PRAGMA locking_
1070: 6d 6f 64 65 20 3d 20 65 78 63 6c 75 73 69 76 65  mode = exclusive
1080: 3b 0a 20 20 7d 0a 7d 20 7b 65 78 63 6c 75 73 69  ;.  }.} {exclusi
1090: 76 65 7d 0a 64 6f 5f 74 65 73 74 20 65 78 63 6c  ve}.do_test excl
10a0: 75 73 69 76 65 2d 32 2e 31 20 7b 0a 20 20 73 71  usive-2.1 {.  sq
10b0: 6c 69 74 65 33 20 64 62 32 20 74 65 73 74 2e 64  lite3 db2 test.d
10c0: 62 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20  b.  execsql {.  
10d0: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62    INSERT INTO ab
10e0: 63 20 56 41 4c 55 45 53 28 34 2c 20 35 2c 20 36  c VALUES(4, 5, 6
10f0: 29 3b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a 20  );.    SELECT * 
1100: 46 52 4f 4d 20 61 62 63 3b 0a 20 20 7d 20 64 62  FROM abc;.  } db
1110: 32 0a 7d 20 7b 31 20 32 20 33 20 34 20 35 20 36  2.} {1 2 3 4 5 6
1120: 7d 0a 64 6f 5f 74 65 73 74 20 65 78 63 6c 75 73  }.do_test exclus
1130: 69 76 65 2d 32 2e 32 20 7b 0a 20 20 23 20 54 68  ive-2.2 {.  # Th
1140: 69 73 20 63 61 75 73 65 73 20 63 6f 6e 6e 65 63  is causes connec
1150: 74 69 6f 6e 20 27 64 62 27 20 28 69 6e 20 65 78  tion 'db' (in ex
1160: 63 6c 75 73 69 76 65 20 6d 6f 64 65 29 20 74 6f  clusive mode) to
1170: 20 65 73 74 61 62 6c 69 73 68 20 0a 20 20 23 20   establish .  # 
1180: 61 20 73 68 61 72 65 64 2d 6c 6f 63 6b 20 6f 6e  a shared-lock on
1190: 20 74 68 65 20 64 62 2e 20 54 68 65 20 6f 74 68   the db. The oth
11a0: 65 72 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 73 68  er connection sh
11b0: 6f 75 6c 64 20 6e 6f 77 20 62 65 0a 20 20 23 20  ould now be.  # 
11c0: 6c 6f 63 6b 65 64 20 6f 75 74 20 61 73 20 61 20  locked out as a 
11d0: 77 72 69 74 65 72 2e 0a 20 20 65 78 65 63 73 71  writer..  execsq
11e0: 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a  l {.    SELECT *
11f0: 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 7d 20 64   FROM abc;.  } d
1200: 62 0a 7d 20 7b 31 20 32 20 33 20 34 20 35 20 36  b.} {1 2 3 4 5 6
1210: 7d 0a 64 6f 5f 74 65 73 74 20 65 78 63 6c 75 73  }.do_test exclus
1220: 69 76 65 2d 32 2e 34 20 7b 0a 20 20 65 78 65 63  ive-2.4 {.  exec
1230: 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43 54  sql {.    SELECT
1240: 20 2a 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 7d   * FROM abc;.  }
1250: 20 64 62 32 0a 7d 20 7b 31 20 32 20 33 20 34 20   db2.} {1 2 3 4 
1260: 35 20 36 7d 0a 64 6f 5f 74 65 73 74 20 65 78 63  5 6}.do_test exc
1270: 6c 75 73 69 76 65 2d 32 2e 35 20 7b 0a 20 20 63  lusive-2.5 {.  c
1280: 61 74 63 68 73 71 6c 20 7b 0a 20 20 20 20 49 4e  atchsql {.    IN
1290: 53 45 52 54 20 49 4e 54 4f 20 61 62 63 20 56 41  SERT INTO abc VA
12a0: 4c 55 45 53 28 37 2c 20 38 2c 20 39 29 3b 0a 20  LUES(7, 8, 9);. 
12b0: 20 7d 20 64 62 32 0a 7d 20 7b 31 20 7b 64 61 74   } db2.} {1 {dat
12c0: 61 62 61 73 65 20 69 73 20 6c 6f 63 6b 65 64 7d  abase is locked}
12d0: 7d 0a 73 71 6c 69 74 65 33 5f 73 6f 66 74 5f 68  }.sqlite3_soft_h
12e0: 65 61 70 5f 6c 69 6d 69 74 20 30 0a 64 6f 5f 74  eap_limit 0.do_t
12f0: 65 73 74 20 65 78 63 6c 75 73 69 76 65 2d 32 2e  est exclusive-2.
1300: 36 20 7b 0a 20 20 23 20 42 65 63 61 75 73 65 20  6 {.  # Because 
1310: 63 6f 6e 6e 65 63 74 69 6f 6e 20 27 64 62 27 20  connection 'db' 
1320: 6f 6e 6c 79 20 68 61 73 20 61 20 73 68 61 72 65  only has a share
1330: 64 2d 6c 6f 63 6b 2c 20 74 68 65 20 6f 74 68 65  d-lock, the othe
1340: 72 20 63 6f 6e 6e 65 63 74 69 6f 6e 0a 20 20 23  r connection.  #
1350: 20 77 69 6c 6c 20 62 65 20 61 62 6c 65 20 74 6f   will be able to
1360: 20 67 65 74 20 61 20 52 45 53 45 52 56 45 44 2c   get a RESERVED,
1370: 20 62 75 74 20 77 69 6c 6c 20 66 61 69 6c 20 74   but will fail t
1380: 6f 20 75 70 67 72 61 64 65 20 74 6f 20 45 58 43  o upgrade to EXC
1390: 4c 55 53 49 56 45 2e 0a 20 20 65 78 65 63 73 71  LUSIVE..  execsq
13a0: 6c 20 7b 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20  l {.    BEGIN;. 
13b0: 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61     INSERT INTO a
13c0: 62 63 20 56 41 4c 55 45 53 28 37 2c 20 38 2c 20  bc VALUES(7, 8, 
13d0: 39 29 3b 0a 20 20 7d 20 64 62 32 0a 20 20 63 61  9);.  } db2.  ca
13e0: 74 63 68 73 71 6c 20 7b 0a 20 20 20 20 43 4f 4d  tchsql {.    COM
13f0: 4d 49 54 0a 20 20 7d 20 64 62 32 0a 7d 20 7b 31  MIT.  } db2.} {1
1400: 20 7b 64 61 74 61 62 61 73 65 20 69 73 20 6c 6f   {database is lo
1410: 63 6b 65 64 7d 7d 0a 64 6f 5f 74 65 73 74 20 65  cked}}.do_test e
1420: 78 63 6c 75 73 69 76 65 2d 32 2e 37 20 7b 0a 20  xclusive-2.7 {. 
1430: 20 63 61 74 63 68 73 71 6c 20 7b 0a 20 20 20 20   catchsql {.    
1440: 43 4f 4d 4d 49 54 0a 20 20 7d 20 64 62 32 0a 7d  COMMIT.  } db2.}
1450: 20 7b 31 20 7b 64 61 74 61 62 61 73 65 20 69 73   {1 {database is
1460: 20 6c 6f 63 6b 65 64 7d 7d 0a 64 6f 5f 74 65 73   locked}}.do_tes
1470: 74 20 65 78 63 6c 75 73 69 76 65 2d 32 2e 38 20  t exclusive-2.8 
1480: 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20  {.  execsql {.  
1490: 20 20 52 4f 4c 4c 42 41 43 4b 3b 0a 20 20 7d 20    ROLLBACK;.  } 
14a0: 64 62 32 0a 7d 20 7b 7d 0a 73 71 6c 69 74 65 33  db2.} {}.sqlite3
14b0: 5f 73 6f 66 74 5f 68 65 61 70 5f 6c 69 6d 69 74  _soft_heap_limit
14c0: 20 24 73 6f 66 74 5f 6c 69 6d 69 74 0a 0a 64 6f   $soft_limit..do
14d0: 5f 74 65 73 74 20 65 78 63 6c 75 73 69 76 65 2d  _test exclusive-
14e0: 32 2e 39 20 7b 0a 20 20 23 20 57 72 69 74 65 20  2.9 {.  # Write 
14f0: 74 68 65 20 64 61 74 61 62 61 73 65 20 74 6f 20  the database to 
1500: 65 73 74 61 62 6c 69 73 68 20 74 68 65 20 65 78  establish the ex
1510: 63 6c 75 73 69 76 65 20 6c 6f 63 6b 20 77 69 74  clusive lock wit
1520: 68 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 27 64 62  h connection 'db
1530: 2e 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20  ..  execsql {.  
1540: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62    INSERT INTO ab
1550: 63 20 56 41 4c 55 45 53 28 37 2c 20 38 2c 20 39  c VALUES(7, 8, 9
1560: 29 3b 0a 20 20 7d 20 64 62 0a 20 20 63 61 74 63  );.  } db.  catc
1570: 68 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43  hsql {.    SELEC
1580: 54 20 2a 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20  T * FROM abc;.  
1590: 7d 20 64 62 32 0a 7d 20 7b 31 20 7b 64 61 74 61  } db2.} {1 {data
15a0: 62 61 73 65 20 69 73 20 6c 6f 63 6b 65 64 7d 7d  base is locked}}
15b0: 0a 64 6f 5f 74 65 73 74 20 65 78 63 6c 75 73 69  .do_test exclusi
15c0: 76 65 2d 32 2e 31 30 20 7b 0a 20 20 23 20 43 68  ve-2.10 {.  # Ch
15d0: 61 6e 67 69 6e 67 20 74 68 65 20 6c 6f 63 6b 69  anging the locki
15e0: 6e 67 2d 6d 6f 64 65 20 64 6f 65 73 20 6e 6f 74  ng-mode does not
15f0: 20 72 65 6c 65 61 73 65 20 61 6e 79 20 6c 6f 63   release any loc
1600: 6b 73 2e 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a  ks..  execsql {.
1610: 20 20 20 20 50 52 41 47 4d 41 20 6c 6f 63 6b 69      PRAGMA locki
1620: 6e 67 5f 6d 6f 64 65 20 3d 20 6e 6f 72 6d 61 6c  ng_mode = normal
1630: 3b 0a 20 20 7d 20 64 62 0a 20 20 63 61 74 63 68  ;.  } db.  catch
1640: 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43 54  sql {.    SELECT
1650: 20 2a 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 7d   * FROM abc;.  }
1660: 20 64 62 32 0a 7d 20 7b 31 20 7b 64 61 74 61 62   db2.} {1 {datab
1670: 61 73 65 20 69 73 20 6c 6f 63 6b 65 64 7d 7d 0a  ase is locked}}.
1680: 64 6f 5f 74 65 73 74 20 65 78 63 6c 75 73 69 76  do_test exclusiv
1690: 65 2d 32 2e 31 31 20 7b 0a 20 20 23 20 41 66 74  e-2.11 {.  # Aft
16a0: 65 72 20 63 68 61 6e 67 69 6e 67 20 74 68 65 20  er changing the 
16b0: 6c 6f 63 6b 69 6e 67 20 6d 6f 64 65 2c 20 61 63  locking mode, ac
16c0: 63 65 73 73 69 6e 67 20 74 68 65 20 64 62 20 72  cessing the db r
16d0: 65 6c 65 61 73 65 73 20 6c 6f 63 6b 73 2e 0a 20  eleases locks.. 
16e0: 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 53   execsql {.    S
16f0: 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61 62 63  ELECT * FROM abc
1700: 3b 0a 20 20 7d 20 64 62 0a 20 20 65 78 65 63 73  ;.  } db.  execs
1710: 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43 54 20  ql {.    SELECT 
1720: 2a 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 7d 20  * FROM abc;.  } 
1730: 64 62 32 0a 7d 20 7b 31 20 32 20 33 20 34 20 35  db2.} {1 2 3 4 5
1740: 20 36 20 37 20 38 20 39 7d 0a 64 62 32 20 63 6c   6 7 8 9}.db2 cl
1750: 6f 73 65 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ose..#----------
1760: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
1770: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
1780: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
1790: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 23 20 54  ------------.# T
17a0: 65 73 74 73 20 65 78 63 6c 75 73 69 76 65 2d 33  ests exclusive-3
17b0: 2e 58 20 2d 20 74 65 73 74 20 74 68 61 74 20 61  .X - test that a
17c0: 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 69 6e 20 65   connection in e
17d0: 78 63 6c 75 73 69 76 65 20 6d 6f 64 65 20 0a 23  xclusive mode .#
17e0: 20 74 72 75 6e 63 61 74 65 73 20 69 6e 73 74 65   truncates inste
17f0: 61 64 20 6f 66 20 64 65 6c 65 74 65 73 20 74 68  ad of deletes th
1800: 65 20 6a 6f 75 72 6e 61 6c 20 66 69 6c 65 20 77  e journal file w
1810: 68 65 6e 20 63 6f 6d 6d 69 74 74 69 6e 67 20 0a  hen committing .
1820: 23 20 61 20 74 72 61 6e 73 61 63 74 69 6f 6e 2e  # a transaction.
1830: 0a 23 0a 70 72 6f 63 20 66 69 6c 65 73 74 61 74  .#.proc filestat
1840: 65 20 7b 66 6e 61 6d 65 7d 20 7b 0a 20 20 73 65  e {fname} {.  se
1850: 74 20 65 78 69 73 74 73 20 30 0a 20 20 73 65 74  t exists 0.  set
1860: 20 63 6f 6e 74 65 6e 74 20 30 0a 20 20 69 66 20   content 0.  if 
1870: 7b 5b 66 69 6c 65 20 65 78 69 73 74 73 20 24 66  {[file exists $f
1880: 6e 61 6d 65 5d 7d 20 7b 0a 20 20 20 20 73 65 74  name]} {.    set
1890: 20 65 78 69 73 74 73 20 31 0a 20 20 20 20 73 65   exists 1.    se
18a0: 74 20 68 64 72 20 5b 68 65 78 69 6f 5f 72 65 61  t hdr [hexio_rea
18b0: 64 20 24 66 6e 61 6d 65 20 30 20 32 38 5d 0a 20  d $fname 0 28]. 
18c0: 20 20 20 73 65 74 20 63 6f 6e 74 65 6e 74 20 5c     set content \
18d0: 0a 20 20 20 20 20 20 5b 65 78 70 72 20 7b 24 68  .      [expr {$h
18e0: 64 72 21 3d 22 30 30 30 30 30 30 30 30 30 30 30  dr!="00000000000
18f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1900: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1910: 30 30 30 30 30 30 30 30 30 30 30 30 30 22 7d 5d  0000000000000"}]
1920: 0a 20 20 7d 0a 20 20 6c 69 73 74 20 24 65 78 69  .  }.  list $exi
1930: 73 74 73 20 24 63 6f 6e 74 65 6e 74 0a 7d 0a 64  sts $content.}.d
1940: 6f 5f 74 65 73 74 20 65 78 63 6c 75 73 69 76 65  o_test exclusive
1950: 2d 33 2e 30 20 7b 0a 20 20 66 69 6c 65 73 74 61  -3.0 {.  filesta
1960: 74 65 20 74 65 73 74 2e 64 62 2d 6a 6f 75 72 6e  te test.db-journ
1970: 61 6c 0a 7d 20 7b 30 20 30 7d 0a 64 6f 5f 74 65  al.} {0 0}.do_te
1980: 73 74 20 65 78 63 6c 75 73 69 76 65 2d 33 2e 31  st exclusive-3.1
1990: 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20   {.  execsql {. 
19a0: 20 20 20 50 52 41 47 4d 41 20 6c 6f 63 6b 69 6e     PRAGMA lockin
19b0: 67 5f 6d 6f 64 65 20 3d 20 65 78 63 6c 75 73 69  g_mode = exclusi
19c0: 76 65 3b 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20  ve;.    BEGIN;. 
19d0: 20 20 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 61     DELETE FROM a
19e0: 62 63 3b 0a 20 20 7d 0a 20 20 66 69 6c 65 73 74  bc;.  }.  filest
19f0: 61 74 65 20 74 65 73 74 2e 64 62 2d 6a 6f 75 72  ate test.db-jour
1a00: 6e 61 6c 0a 7d 20 7b 31 20 31 7d 0a 64 6f 5f 74  nal.} {1 1}.do_t
1a10: 65 73 74 20 65 78 63 6c 75 73 69 76 65 2d 33 2e  est exclusive-3.
1a20: 32 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a  2 {.  execsql {.
1a30: 20 20 20 20 43 4f 4d 4d 49 54 3b 0a 20 20 7d 0a      COMMIT;.  }.
1a40: 20 20 66 69 6c 65 73 74 61 74 65 20 74 65 73 74    filestate test
1a50: 2e 64 62 2d 6a 6f 75 72 6e 61 6c 0a 7d 20 7b 31  .db-journal.} {1
1a60: 20 30 7d 0a 64 6f 5f 74 65 73 74 20 65 78 63 6c   0}.do_test excl
1a70: 75 73 69 76 65 2d 33 2e 33 20 7b 0a 20 20 65 78  usive-3.3 {.  ex
1a80: 65 63 73 71 6c 20 7b 0a 20 20 20 20 49 4e 53 45  ecsql {.    INSE
1a90: 52 54 20 49 4e 54 4f 20 61 62 63 20 56 41 4c 55  RT INTO abc VALU
1aa0: 45 53 28 27 41 27 2c 20 27 42 27 2c 20 27 43 27  ES('A', 'B', 'C'
1ab0: 29 3b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a 20  );.    SELECT * 
1ac0: 46 52 4f 4d 20 61 62 63 3b 0a 20 20 7d 0a 7d 20  FROM abc;.  }.} 
1ad0: 7b 41 20 42 20 43 7d 0a 64 6f 5f 74 65 73 74 20  {A B C}.do_test 
1ae0: 65 78 63 6c 75 73 69 76 65 2d 33 2e 34 20 7b 0a  exclusive-3.4 {.
1af0: 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20    execsql {.    
1b00: 42 45 47 49 4e 3b 0a 20 20 20 20 55 50 44 41 54  BEGIN;.    UPDAT
1b10: 45 20 61 62 63 20 53 45 54 20 61 20 3d 20 31 2c  E abc SET a = 1,
1b20: 20 62 20 3d 20 32 2c 20 63 20 3d 20 33 3b 0a 20   b = 2, c = 3;. 
1b30: 20 20 20 52 4f 4c 4c 42 41 43 4b 3b 0a 20 20 20     ROLLBACK;.   
1b40: 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61   SELECT * FROM a
1b50: 62 63 3b 0a 20 20 7d 0a 7d 20 7b 41 20 42 20 43  bc;.  }.} {A B C
1b60: 7d 0a 64 6f 5f 74 65 73 74 20 65 78 63 6c 75 73  }.do_test exclus
1b70: 69 76 65 2d 33 2e 35 20 7b 0a 20 20 66 69 6c 65  ive-3.5 {.  file
1b80: 73 74 61 74 65 20 74 65 73 74 2e 64 62 2d 6a 6f  state test.db-jo
1b90: 75 72 6e 61 6c 0a 7d 20 7b 31 20 30 7d 0a 64 6f  urnal.} {1 0}.do
1ba0: 5f 74 65 73 74 20 65 78 63 6c 75 73 69 76 65 2d  _test exclusive-
1bb0: 33 2e 36 20 7b 0a 20 20 65 78 65 63 73 71 6c 20  3.6 {.  execsql 
1bc0: 7b 0a 20 20 20 20 50 52 41 47 4d 41 20 6c 6f 63  {.    PRAGMA loc
1bd0: 6b 69 6e 67 5f 6d 6f 64 65 20 3d 20 6e 6f 72 6d  king_mode = norm
1be0: 61 6c 3b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a  al;.    SELECT *
1bf0: 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 7d 0a 20   FROM abc;.  }. 
1c00: 20 66 69 6c 65 73 74 61 74 65 20 74 65 73 74 2e   filestate test.
1c10: 64 62 2d 6a 6f 75 72 6e 61 6c 0a 7d 20 7b 30 20  db-journal.} {0 
1c20: 30 7d 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  0}..#-----------
1c30: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
1c40: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
1c50: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
1c60: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 23 20 54 65  -----------.# Te
1c70: 73 74 73 20 65 78 63 6c 75 73 69 76 65 2d 34 2e  sts exclusive-4.
1c80: 58 20 2d 20 74 65 73 74 20 74 68 61 74 20 72 6f  X - test that ro
1c90: 6c 6c 62 61 63 6b 20 77 6f 72 6b 73 20 63 6f 72  llback works cor
1ca0: 72 65 63 74 6c 79 20 77 68 65 6e 0a 23 20 69 6e  rectly when.# in
1cb0: 20 65 78 63 6c 75 73 69 76 65 2d 61 63 63 65 73   exclusive-acces
1cc0: 73 20 6d 6f 64 65 2e 0a 23 0a 0a 23 20 54 68 65  s mode..#..# The
1cd0: 20 66 6f 6c 6c 6f 77 69 6e 67 20 70 72 6f 63 65   following proce
1ce0: 64 75 72 65 20 63 6f 6d 70 75 74 65 73 20 61 20  dure computes a 
1cf0: 22 73 69 67 6e 61 74 75 72 65 22 20 66 6f 72 20  "signature" for 
1d00: 74 61 62 6c 65 20 22 74 33 22 2e 20 20 49 66 0a  table "t3".  If.
1d10: 23 20 54 33 20 63 68 61 6e 67 65 73 20 69 6e 20  # T3 changes in 
1d20: 61 6e 79 20 77 61 79 2c 20 74 68 65 20 73 69 67  any way, the sig
1d30: 6e 61 74 75 72 65 20 73 68 6f 75 6c 64 20 63 68  nature should ch
1d40: 61 6e 67 65 2e 20 20 0a 23 0a 23 20 54 68 69 73  ange.  .#.# This
1d50: 20 69 73 20 75 73 65 64 20 74 6f 20 74 65 73 74   is used to test
1d60: 20 52 4f 4c 4c 42 41 43 4b 2e 20 20 57 65 20 67   ROLLBACK.  We g
1d70: 61 74 68 65 72 20 61 20 73 69 67 6e 61 74 75 72  ather a signatur
1d80: 65 20 66 6f 72 20 74 33 2c 20 74 68 65 6e 0a 23  e for t3, then.#
1d90: 20 6d 61 6b 65 20 6c 6f 74 73 20 6f 66 20 63 68   make lots of ch
1da0: 61 6e 67 65 73 20 74 6f 20 74 33 2c 20 74 68 65  anges to t3, the
1db0: 6e 20 72 6f 6c 6c 62 61 63 6b 20 61 6e 64 20 74  n rollback and t
1dc0: 61 6b 65 20 61 6e 6f 74 68 65 72 20 73 69 67 6e  ake another sign
1dd0: 61 74 75 72 65 2e 0a 23 20 54 68 65 20 74 77 6f  ature..# The two
1de0: 20 73 69 67 6e 61 74 75 72 65 73 20 73 68 6f 75   signatures shou
1df0: 6c 64 20 62 65 20 74 68 65 20 73 61 6d 65 2e 0a  ld be the same..
1e00: 23 0a 70 72 6f 63 20 73 69 67 6e 61 74 75 72 65  #.proc signature
1e10: 20 7b 7d 20 7b 0a 20 20 72 65 74 75 72 6e 20 5b   {} {.  return [
1e20: 64 62 20 65 76 61 6c 20 7b 53 45 4c 45 43 54 20  db eval {SELECT 
1e30: 63 6f 75 6e 74 28 2a 29 2c 20 6d 64 35 73 75 6d  count(*), md5sum
1e40: 28 78 29 20 46 52 4f 4d 20 74 33 7d 5d 0a 7d 0a  (x) FROM t3}].}.
1e50: 0a 64 6f 5f 74 65 73 74 20 65 78 63 6c 75 73 69  .do_test exclusi
1e60: 76 65 2d 34 2e 30 20 7b 0a 20 20 65 78 65 63 73  ve-4.0 {.  execs
1e70: 71 6c 20 7b 20 50 52 41 47 4d 41 20 6c 6f 63 6b  ql { PRAGMA lock
1e80: 69 6e 67 5f 6d 6f 64 65 20 3d 20 65 78 63 6c 75  ing_mode = exclu
1e90: 73 69 76 65 3b 20 7d 0a 20 20 65 78 65 63 73 71  sive; }.  execsq
1ea0: 6c 20 7b 20 50 52 41 47 4d 41 20 64 65 66 61 75  l { PRAGMA defau
1eb0: 6c 74 5f 63 61 63 68 65 5f 73 69 7a 65 20 3d 20  lt_cache_size = 
1ec0: 31 30 3b 20 7d 0a 20 20 65 78 65 63 73 71 6c 20  10; }.  execsql 
1ed0: 7b 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20 20 20  {.    BEGIN;.   
1ee0: 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 74 33   CREATE TABLE t3
1ef0: 28 78 20 54 45 58 54 29 3b 0a 20 20 20 20 49 4e  (x TEXT);.    IN
1f00: 53 45 52 54 20 49 4e 54 4f 20 74 33 20 56 41 4c  SERT INTO t3 VAL
1f10: 55 45 53 28 72 61 6e 64 73 74 72 28 31 30 2c 34  UES(randstr(10,4
1f20: 30 30 29 29 3b 0a 20 20 20 20 49 4e 53 45 52 54  00));.    INSERT
1f30: 20 49 4e 54 4f 20 74 33 20 56 41 4c 55 45 53 28   INTO t3 VALUES(
1f40: 72 61 6e 64 73 74 72 28 31 30 2c 34 30 30 29 29  randstr(10,400))
1f50: 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54  ;.    INSERT INT
1f60: 4f 20 74 33 20 53 45 4c 45 43 54 20 72 61 6e 64  O t3 SELECT rand
1f70: 73 74 72 28 31 30 2c 34 30 30 29 20 46 52 4f 4d  str(10,400) FROM
1f80: 20 74 33 3b 0a 20 20 20 20 49 4e 53 45 52 54 20   t3;.    INSERT 
1f90: 49 4e 54 4f 20 74 33 20 53 45 4c 45 43 54 20 72  INTO t3 SELECT r
1fa0: 61 6e 64 73 74 72 28 31 30 2c 34 30 30 29 20 46  andstr(10,400) F
1fb0: 52 4f 4d 20 74 33 3b 0a 20 20 20 20 49 4e 53 45  ROM t3;.    INSE
1fc0: 52 54 20 49 4e 54 4f 20 74 33 20 53 45 4c 45 43  RT INTO t3 SELEC
1fd0: 54 20 72 61 6e 64 73 74 72 28 31 30 2c 34 30 30  T randstr(10,400
1fe0: 29 20 46 52 4f 4d 20 74 33 3b 0a 20 20 20 20 49  ) FROM t3;.    I
1ff0: 4e 53 45 52 54 20 49 4e 54 4f 20 74 33 20 53 45  NSERT INTO t3 SE
2000: 4c 45 43 54 20 72 61 6e 64 73 74 72 28 31 30 2c  LECT randstr(10,
2010: 34 30 30 29 20 46 52 4f 4d 20 74 33 3b 0a 20 20  400) FROM t3;.  
2020: 20 20 43 4f 4d 4d 49 54 3b 0a 20 20 7d 0a 20 20    COMMIT;.  }.  
2030: 65 78 65 63 73 71 6c 20 7b 53 45 4c 45 43 54 20  execsql {SELECT 
2040: 63 6f 75 6e 74 28 2a 29 20 46 52 4f 4d 20 74 33  count(*) FROM t3
2050: 3b 7d 0a 7d 20 7b 33 32 7d 0a 0a 73 65 74 20 3a  ;}.} {32}..set :
2060: 3a 58 20 5b 73 69 67 6e 61 74 75 72 65 5d 0a 64  :X [signature].d
2070: 6f 5f 74 65 73 74 20 65 78 63 6c 75 73 69 76 65  o_test exclusive
2080: 2d 34 2e 31 20 7b 0a 20 20 65 78 65 63 73 71 6c  -4.1 {.  execsql
2090: 20 7b 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20 20   {.    BEGIN;.  
20a0: 20 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 74 33    DELETE FROM t3
20b0: 20 57 48 45 52 45 20 72 61 6e 64 6f 6d 28 29 25   WHERE random()%
20c0: 31 30 21 3d 30 3b 0a 20 20 20 20 49 4e 53 45 52  10!=0;.    INSER
20d0: 54 20 49 4e 54 4f 20 74 33 20 53 45 4c 45 43 54  T INTO t3 SELECT
20e0: 20 72 61 6e 64 73 74 72 28 31 30 2c 31 30 29 7c   randstr(10,10)|
20f0: 7c 78 20 46 52 4f 4d 20 74 33 3b 0a 20 20 20 20  |x FROM t3;.    
2100: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 33 20 53  INSERT INTO t3 S
2110: 45 4c 45 43 54 20 72 61 6e 64 73 74 72 28 31 30  ELECT randstr(10
2120: 2c 31 30 29 7c 7c 78 20 46 52 4f 4d 20 74 33 3b  ,10)||x FROM t3;
2130: 0a 20 20 20 20 53 45 4c 45 43 54 20 63 6f 75 6e  .    SELECT coun
2140: 74 28 2a 29 20 46 52 4f 4d 20 74 33 3b 0a 20 20  t(*) FROM t3;.  
2150: 20 20 52 4f 4c 4c 42 41 43 4b 3b 0a 20 20 7d 0a    ROLLBACK;.  }.
2160: 20 20 73 69 67 6e 61 74 75 72 65 0a 7d 20 24 3a    signature.} $:
2170: 3a 58 0a 0a 64 6f 5f 74 65 73 74 20 65 78 63 6c  :X..do_test excl
2180: 75 73 69 76 65 2d 34 2e 32 20 7b 0a 20 20 65 78  usive-4.2 {.  ex
2190: 65 63 73 71 6c 20 7b 0a 20 20 20 20 42 45 47 49  ecsql {.    BEGI
21a0: 4e 3b 0a 20 20 20 20 44 45 4c 45 54 45 20 46 52  N;.    DELETE FR
21b0: 4f 4d 20 74 33 20 57 48 45 52 45 20 72 61 6e 64  OM t3 WHERE rand
21c0: 6f 6d 28 29 25 31 30 21 3d 30 3b 0a 20 20 20 20  om()%10!=0;.    
21d0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 33 20 53  INSERT INTO t3 S
21e0: 45 4c 45 43 54 20 72 61 6e 64 73 74 72 28 31 30  ELECT randstr(10
21f0: 2c 31 30 29 7c 7c 78 20 46 52 4f 4d 20 74 33 3b  ,10)||x FROM t3;
2200: 0a 20 20 20 20 44 45 4c 45 54 45 20 46 52 4f 4d  .    DELETE FROM
2210: 20 74 33 20 57 48 45 52 45 20 72 61 6e 64 6f 6d   t3 WHERE random
2220: 28 29 25 31 30 21 3d 30 3b 0a 20 20 20 20 49 4e  ()%10!=0;.    IN
2230: 53 45 52 54 20 49 4e 54 4f 20 74 33 20 53 45 4c  SERT INTO t3 SEL
2240: 45 43 54 20 72 61 6e 64 73 74 72 28 31 30 2c 31  ECT randstr(10,1
2250: 30 29 7c 7c 78 20 46 52 4f 4d 20 74 33 3b 0a 20  0)||x FROM t3;. 
2260: 20 20 20 52 4f 4c 4c 42 41 43 4b 3b 0a 20 20 7d     ROLLBACK;.  }
2270: 0a 20 20 73 69 67 6e 61 74 75 72 65 0a 7d 20 24  .  signature.} $
2280: 3a 3a 58 0a 0a 64 6f 5f 74 65 73 74 20 65 78 63  ::X..do_test exc
2290: 6c 75 73 69 76 65 2d 34 2e 33 20 7b 0a 20 20 65  lusive-4.3 {.  e
22a0: 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 49 4e 53  xecsql {.    INS
22b0: 45 52 54 20 49 4e 54 4f 20 74 33 20 53 45 4c 45  ERT INTO t3 SELE
22c0: 43 54 20 72 61 6e 64 73 74 72 28 31 30 2c 34 30  CT randstr(10,40
22d0: 30 29 20 46 52 4f 4d 20 74 33 20 57 48 45 52 45  0) FROM t3 WHERE
22e0: 20 72 61 6e 64 6f 6d 28 29 25 31 30 3d 3d 30 3b   random()%10==0;
22f0: 0a 20 20 7d 0a 7d 20 7b 7d 0a 0a 64 6f 5f 74 65  .  }.} {}..do_te
2300: 73 74 20 65 78 63 6c 75 73 69 76 65 2d 34 2e 34  st exclusive-4.4
2310: 20 7b 0a 20 20 63 61 74 63 68 20 7b 73 65 74 20   {.  catch {set 
2320: 3a 3a 58 20 5b 73 69 67 6e 61 74 75 72 65 5d 7d  ::X [signature]}
2330: 0a 7d 20 7b 30 7d 0a 64 6f 5f 74 65 73 74 20 65  .} {0}.do_test e
2340: 78 63 6c 75 73 69 76 65 2d 34 2e 35 20 7b 0a 20  xclusive-4.5 {. 
2350: 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 50   execsql {.    P
2360: 52 41 47 4d 41 20 6c 6f 63 6b 69 6e 67 5f 6d 6f  RAGMA locking_mo
2370: 64 65 20 3d 20 4e 4f 52 4d 41 4c 3b 0a 20 20 20  de = NORMAL;.   
2380: 20 44 52 4f 50 20 54 41 42 4c 45 20 74 33 3b 0a   DROP TABLE t3;.
2390: 20 20 20 20 44 52 4f 50 20 54 41 42 4c 45 20 61      DROP TABLE a
23a0: 62 63 3b 0a 20 20 7d 0a 7d 20 7b 6e 6f 72 6d 61  bc;.  }.} {norma
23b0: 6c 7d 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  l}..#-----------
23c0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
23d0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
23e0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
23f0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 23 20 54 65  -----------.# Te
2400: 73 74 73 20 65 78 63 6c 75 73 69 76 65 2d 35 2e  sts exclusive-5.
2410: 58 20 2d 20 74 65 73 74 20 74 68 61 74 20 73 74  X - test that st
2420: 61 74 65 6d 65 6e 74 20 6a 6f 75 72 6e 61 6c 73  atement journals
2430: 20 61 72 65 20 74 72 75 6e 63 61 74 65 64 0a 23   are truncated.#
2440: 20 69 6e 73 74 65 61 64 20 6f 66 20 64 65 6c 65   instead of dele
2450: 74 65 64 20 77 68 65 6e 20 69 6e 20 65 78 63 6c  ted when in excl
2460: 75 73 69 76 65 20 61 63 63 65 73 73 20 6d 6f 64  usive access mod
2470: 65 2e 0a 23 0a 0a 23 20 43 6c 6f 73 65 20 61 6e  e..#..# Close an
2480: 64 20 72 65 6f 70 65 6e 20 74 68 65 20 64 61 74  d reopen the dat
2490: 61 62 61 73 65 20 73 6f 20 74 68 61 74 20 74 68  abase so that th
24a0: 65 20 74 65 6d 70 20 64 61 74 61 62 61 73 65 20  e temp database 
24b0: 69 73 20 6e 6f 0a 23 20 6c 6f 6e 67 65 72 20 61  is no.# longer a
24c0: 63 74 69 76 65 2e 0a 23 0a 64 62 20 63 6c 6f 73  ctive..#.db clos
24d0: 65 0a 73 71 6c 69 74 65 20 64 62 20 74 65 73 74  e.sqlite db test
24e0: 2e 64 62 0a 0a 0a 64 6f 5f 74 65 73 74 20 65 78  .db...do_test ex
24f0: 63 6c 75 73 69 76 65 2d 35 2e 30 20 7b 0a 20 20  clusive-5.0 {.  
2500: 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 43 52  execsql {.    CR
2510: 45 41 54 45 20 54 41 42 4c 45 20 61 62 63 28 61  EATE TABLE abc(a
2520: 20 55 4e 49 51 55 45 2c 20 62 20 55 4e 49 51 55   UNIQUE, b UNIQU
2530: 45 2c 20 63 20 55 4e 49 51 55 45 29 3b 0a 20 20  E, c UNIQUE);.  
2540: 20 20 42 45 47 49 4e 3b 0a 20 20 20 20 49 4e 53    BEGIN;.    INS
2550: 45 52 54 20 49 4e 54 4f 20 61 62 63 20 56 41 4c  ERT INTO abc VAL
2560: 55 45 53 28 31 2c 20 32 2c 20 33 29 3b 0a 20 20  UES(1, 2, 3);.  
2570: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62    INSERT INTO ab
2580: 63 20 53 45 4c 45 43 54 20 61 2b 31 2c 20 62 2b  c SELECT a+1, b+
2590: 31 2c 20 63 2b 31 20 46 52 4f 4d 20 61 62 63 3b  1, c+1 FROM abc;
25a0: 0a 20 20 7d 0a 7d 20 7b 7d 0a 64 6f 5f 74 65 73  .  }.} {}.do_tes
25b0: 74 20 65 78 63 6c 75 73 69 76 65 2d 35 2e 31 20  t exclusive-5.1 
25c0: 7b 0a 20 20 23 20 54 68 72 65 65 20 66 69 6c 65  {.  # Three file
25d0: 73 20 61 72 65 20 6f 70 65 6e 3a 20 54 68 65 20  s are open: The 
25e0: 64 62 2c 20 6a 6f 75 72 6e 61 6c 20 61 6e 64 20  db, journal and 
25f0: 73 74 61 74 65 6d 65 6e 74 2d 6a 6f 75 72 6e 61  statement-journa
2600: 6c 2e 0a 20 20 73 65 74 20 73 71 6c 69 74 65 5f  l..  set sqlite_
2610: 6f 70 65 6e 5f 66 69 6c 65 5f 63 6f 75 6e 74 0a  open_file_count.
2620: 7d 20 7b 33 7d 0a 64 6f 5f 74 65 73 74 20 65 78  } {3}.do_test ex
2630: 63 6c 75 73 69 76 65 2d 35 2e 32 20 7b 0a 20 20  clusive-5.2 {.  
2640: 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 43 4f  execsql {.    CO
2650: 4d 4d 49 54 3b 0a 20 20 7d 0a 20 20 23 20 4f 6e  MMIT;.  }.  # On
2660: 65 20 66 69 6c 65 20 6f 70 65 6e 3a 20 74 68 65  e file open: the
2670: 20 64 62 2e 0a 20 20 73 65 74 20 73 71 6c 69 74   db..  set sqlit
2680: 65 5f 6f 70 65 6e 5f 66 69 6c 65 5f 63 6f 75 6e  e_open_file_coun
2690: 74 0a 7d 20 7b 31 7d 0a 64 6f 5f 74 65 73 74 20  t.} {1}.do_test 
26a0: 65 78 63 6c 75 73 69 76 65 2d 35 2e 33 20 7b 0a  exclusive-5.3 {.
26b0: 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20    execsql {.    
26c0: 50 52 41 47 4d 41 20 6c 6f 63 6b 69 6e 67 5f 6d  PRAGMA locking_m
26d0: 6f 64 65 20 3d 20 65 78 63 6c 75 73 69 76 65 3b  ode = exclusive;
26e0: 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20 20 20 20  .    BEGIN;.    
26f0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63 20  INSERT INTO abc 
2700: 56 41 4c 55 45 53 28 35 2c 20 36 2c 20 37 29 3b  VALUES(5, 6, 7);
2710: 0a 20 20 7d 0a 20 20 23 20 54 77 6f 20 66 69 6c  .  }.  # Two fil
2720: 65 73 20 6f 70 65 6e 3a 20 74 68 65 20 64 62 20  es open: the db 
2730: 61 6e 64 20 6a 6f 75 72 6e 61 6c 2e 0a 20 20 73  and journal..  s
2740: 65 74 20 73 71 6c 69 74 65 5f 6f 70 65 6e 5f 66  et sqlite_open_f
2750: 69 6c 65 5f 63 6f 75 6e 74 0a 7d 20 7b 32 7d 0a  ile_count.} {2}.
2760: 64 6f 5f 74 65 73 74 20 65 78 63 6c 75 73 69 76  do_test exclusiv
2770: 65 2d 35 2e 34 20 7b 0a 20 20 65 78 65 63 73 71  e-5.4 {.  execsq
2780: 6c 20 7b 0a 20 20 20 20 49 4e 53 45 52 54 20 49  l {.    INSERT I
2790: 4e 54 4f 20 61 62 63 20 53 45 4c 45 43 54 20 61  NTO abc SELECT a
27a0: 2b 31 30 2c 20 62 2b 31 30 2c 20 63 2b 31 30 20  +10, b+10, c+10 
27b0: 46 52 4f 4d 20 61 62 63 3b 0a 20 20 7d 0a 20 20  FROM abc;.  }.  
27c0: 23 20 54 68 72 65 65 20 66 69 6c 65 73 20 61 72  # Three files ar
27d0: 65 20 6f 70 65 6e 3a 20 54 68 65 20 64 62 2c 20  e open: The db, 
27e0: 6a 6f 75 72 6e 61 6c 20 61 6e 64 20 73 74 61 74  journal and stat
27f0: 65 6d 65 6e 74 2d 6a 6f 75 72 6e 61 6c 2e 0a 20  ement-journal.. 
2800: 20 73 65 74 20 73 71 6c 69 74 65 5f 6f 70 65 6e   set sqlite_open
2810: 5f 66 69 6c 65 5f 63 6f 75 6e 74 0a 7d 20 7b 33  _file_count.} {3
2820: 7d 0a 64 6f 5f 74 65 73 74 20 65 78 63 6c 75 73  }.do_test exclus
2830: 69 76 65 2d 35 2e 35 20 7b 0a 20 20 65 78 65 63  ive-5.5 {.  exec
2840: 73 71 6c 20 7b 0a 20 20 20 20 43 4f 4d 4d 49 54  sql {.    COMMIT
2850: 3b 0a 20 20 7d 0a 20 20 23 20 54 68 72 65 65 20  ;.  }.  # Three 
2860: 66 69 6c 65 73 20 61 72 65 20 73 74 69 6c 6c 20  files are still 
2870: 6f 70 65 6e 3a 20 54 68 65 20 64 62 2c 20 6a 6f  open: The db, jo
2880: 75 72 6e 61 6c 20 61 6e 64 20 73 74 61 74 65 6d  urnal and statem
2890: 65 6e 74 2d 6a 6f 75 72 6e 61 6c 2e 0a 20 20 73  ent-journal..  s
28a0: 65 74 20 73 71 6c 69 74 65 5f 6f 70 65 6e 5f 66  et sqlite_open_f
28b0: 69 6c 65 5f 63 6f 75 6e 74 0a 7d 20 7b 33 7d 0a  ile_count.} {3}.
28c0: 64 6f 5f 74 65 73 74 20 65 78 63 6c 75 73 69 76  do_test exclusiv
28d0: 65 2d 35 2e 36 20 7b 0a 20 20 65 78 65 63 73 71  e-5.6 {.  execsq
28e0: 6c 20 7b 0a 20 20 20 20 50 52 41 47 4d 41 20 6c  l {.    PRAGMA l
28f0: 6f 63 6b 69 6e 67 5f 6d 6f 64 65 20 3d 20 6e 6f  ocking_mode = no
2900: 72 6d 61 6c 3b 0a 20 20 20 20 53 45 4c 45 43 54  rmal;.    SELECT
2910: 20 2a 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 7d   * FROM abc;.  }
2920: 0a 7d 20 7b 6e 6f 72 6d 61 6c 20 31 20 32 20 33  .} {normal 1 2 3
2930: 20 32 20 33 20 34 20 35 20 36 20 37 20 31 31 20   2 3 4 5 6 7 11 
2940: 31 32 20 31 33 20 31 32 20 31 33 20 31 34 20 31  12 13 12 13 14 1
2950: 35 20 31 36 20 31 37 7d 0a 64 6f 5f 74 65 73 74  5 16 17}.do_test
2960: 20 65 78 63 6c 75 73 69 76 65 2d 35 2e 37 20 7b   exclusive-5.7 {
2970: 0a 20 20 23 20 4a 75 73 74 20 74 68 65 20 64 62  .  # Just the db
2980: 20 6f 70 65 6e 2e 0a 20 20 73 65 74 20 73 71 6c   open..  set sql
2990: 69 74 65 5f 6f 70 65 6e 5f 66 69 6c 65 5f 63 6f  ite_open_file_co
29a0: 75 6e 74 0a 7d 20 7b 31 7d 0a 0a 66 69 6e 69 73  unt.} {1}..finis
29b0: 68 5f 74 65 73 74 0a                             h_test.