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.