Artifact
7faf2f7af8a782a843add6c8be7598d7a6b16a15:
- File
test/dbstatus.test
— part of check-in
[da13c446be]
at
2012-06-29 15:39:25
on branch trunk
— Change all "SQLITE_" prefixes on preprocessor macros to "SQLITE4_" to
avoid name collisions with SQLite3.
(user:
drh
size: 11590)
0000: 23 20 32 30 31 30 20 4d 61 72 63 68 20 31 30 0a # 2010 March 10.
0010: 23 0a 23 20 54 68 65 20 61 75 74 68 6f 72 20 64 #.# The author d
0020: 69 73 63 6c 61 69 6d 73 20 63 6f 70 79 72 69 67 isclaims copyrig
0030: 68 74 20 74 6f 20 74 68 69 73 20 73 6f 75 72 63 ht to this sourc
0040: 65 20 63 6f 64 65 2e 20 20 49 6e 20 70 6c 61 63 e code. In plac
0050: 65 20 6f 66 0a 23 20 61 20 6c 65 67 61 6c 20 6e e of.# a legal n
0060: 6f 74 69 63 65 2c 20 68 65 72 65 20 69 73 20 61 otice, here is a
0070: 20 62 6c 65 73 73 69 6e 67 3a 0a 23 0a 23 20 20 blessing:.#.#
0080: 20 20 4d 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f May you do goo
0090: 64 20 61 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a d and not evil..
00a0: 23 20 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e # May you fin
00b0: 64 20 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f d forgiveness fo
00c0: 72 20 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 r yourself and f
00d0: 6f 72 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 23 orgive others..#
00e0: 20 20 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 May you shar
00f0: 65 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 e freely, never
0100: 74 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e taking more than
0110: 20 79 6f 75 20 67 69 76 65 2e 0a 23 0a 23 2a 2a you give..#.#**
0120: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0160: 2a 2a 2a 2a 2a 0a 23 0a 23 20 54 65 73 74 73 20 *****.#.# Tests
0170: 66 6f 72 20 74 68 65 20 73 71 6c 69 74 65 34 5f for the sqlite4_
0180: 64 62 5f 73 74 61 74 75 73 28 29 20 66 75 6e 63 db_status() func
0190: 74 69 6f 6e 0a 23 0a 0a 73 65 74 20 74 65 73 74 tion.#..set test
01a0: 64 69 72 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d dir [file dirnam
01b0: 65 20 24 61 72 67 76 30 5d 0a 73 6f 75 72 63 65 e $argv0].source
01c0: 20 24 74 65 73 74 64 69 72 2f 74 65 73 74 65 72 $testdir/tester
01d0: 2e 74 63 6c 0a 0a 23 20 4d 65 6d 6f 72 79 20 73 .tcl..# Memory s
01e0: 74 61 74 69 73 74 69 63 73 20 6d 75 73 74 20 62 tatistics must b
01f0: 65 20 65 6e 61 62 6c 65 64 20 66 6f 72 20 74 68 e enabled for th
0200: 69 73 20 74 65 73 74 2e 0a 64 62 20 63 6c 6f 73 is test..db clos
0210: 65 0a 73 71 6c 69 74 65 34 5f 73 68 75 74 64 6f e.sqlite4_shutdo
0220: 77 6e 0a 73 71 6c 69 74 65 34 5f 65 6e 76 5f 63 wn.sqlite4_env_c
0230: 6f 6e 66 69 67 5f 6d 65 6d 73 74 61 74 75 73 20 onfig_memstatus
0240: 31 0a 73 71 6c 69 74 65 34 5f 69 6e 69 74 69 61 1.sqlite4_initia
0250: 6c 69 7a 65 0a 73 71 6c 69 74 65 34 20 64 62 20 lize.sqlite4 db
0260: 74 65 73 74 2e 64 62 0a 0a 0a 23 20 4d 61 6b 65 test.db...# Make
0270: 20 73 75 72 65 20 73 71 6c 69 74 65 34 5f 64 62 sure sqlite4_db
0280: 5f 63 6f 6e 66 69 67 28 29 20 61 6e 64 20 73 71 _config() and sq
0290: 6c 69 74 65 34 5f 64 62 5f 73 74 61 74 75 73 20 lite4_db_status
02a0: 61 72 65 20 77 6f 72 6b 69 6e 67 2e 0a 23 0a 75 are working..#.u
02b0: 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e nset -nocomplain
02c0: 20 50 41 47 45 53 5a 0a 75 6e 73 65 74 20 2d 6e PAGESZ.unset -n
02d0: 6f 63 6f 6d 70 6c 61 69 6e 20 42 41 53 45 53 5a ocomplain BASESZ
02e0: 0a 64 6f 5f 74 65 73 74 20 64 62 73 74 61 74 75 .do_test dbstatu
02f0: 73 2d 31 2e 31 20 7b 0a 20 20 64 62 20 63 6c 6f s-1.1 {. db clo
0300: 73 65 0a 20 20 73 71 6c 69 74 65 34 20 64 62 20 se. sqlite4 db
0310: 3a 6d 65 6d 6f 72 79 3a 0a 20 20 64 62 20 65 76 :memory:. db ev
0320: 61 6c 20 7b 0a 20 20 20 20 43 52 45 41 54 45 20 al {. CREATE
0330: 54 41 42 4c 45 20 74 31 28 78 29 3b 0a 20 20 7d TABLE t1(x);. }
0340: 0a 20 20 73 65 74 20 73 7a 31 20 5b 6c 69 6e 64 . set sz1 [lind
0350: 65 78 20 5b 73 71 6c 69 74 65 34 5f 64 62 5f 73 ex [sqlite4_db_s
0360: 74 61 74 75 73 20 64 62 20 53 51 4c 49 54 45 34 tatus db SQLITE4
0370: 5f 44 42 53 54 41 54 55 53 5f 43 41 43 48 45 5f _DBSTATUS_CACHE_
0380: 55 53 45 44 20 30 5d 20 31 5d 0a 20 20 64 62 20 USED 0] 1]. db
0390: 65 76 61 6c 20 7b 0a 20 20 20 20 43 52 45 41 54 eval {. CREAT
03a0: 45 20 54 41 42 4c 45 20 74 32 28 79 29 3b 0a 20 E TABLE t2(y);.
03b0: 20 7d 0a 20 20 73 65 74 20 73 7a 32 20 5b 6c 69 }. set sz2 [li
03c0: 6e 64 65 78 20 5b 73 71 6c 69 74 65 34 5f 64 62 ndex [sqlite4_db
03d0: 5f 73 74 61 74 75 73 20 64 62 20 53 51 4c 49 54 _status db SQLIT
03e0: 45 34 5f 44 42 53 54 41 54 55 53 5f 43 41 43 48 E4_DBSTATUS_CACH
03f0: 45 5f 55 53 45 44 20 30 5d 20 31 5d 0a 20 20 73 E_USED 0] 1]. s
0400: 65 74 20 3a 3a 50 41 47 45 53 5a 20 5b 65 78 70 et ::PAGESZ [exp
0410: 72 20 7b 24 73 7a 32 2d 24 73 7a 31 7d 5d 0a 20 r {$sz2-$sz1}].
0420: 20 73 65 74 20 3a 3a 42 41 53 45 53 5a 20 5b 65 set ::BASESZ [e
0430: 78 70 72 20 7b 24 73 7a 31 2d 24 3a 3a 50 41 47 xpr {$sz1-$::PAG
0440: 45 53 5a 7d 5d 0a 20 20 65 78 70 72 20 7b 24 3a ESZ}]. expr {$:
0450: 3a 50 41 47 45 53 5a 3e 31 30 32 34 20 26 26 20 :PAGESZ>1024 &&
0460: 24 3a 3a 50 41 47 45 53 5a 3c 31 33 30 30 7d 0a $::PAGESZ<1300}.
0470: 7d 20 7b 31 7d 0a 64 6f 5f 74 65 73 74 20 64 62 } {1}.do_test db
0480: 73 74 61 74 75 73 2d 31 2e 32 20 7b 0a 20 20 64 status-1.2 {. d
0490: 62 20 65 76 61 6c 20 7b 0a 20 20 20 20 49 4e 53 b eval {. INS
04a0: 45 52 54 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 ERT INTO t1 VALU
04b0: 45 53 28 7a 65 72 6f 62 6c 6f 62 28 39 30 30 30 ES(zeroblob(9000
04c0: 29 29 3b 0a 20 20 7d 0a 20 20 6c 69 6e 64 65 78 ));. }. lindex
04d0: 20 5b 73 71 6c 69 74 65 34 5f 64 62 5f 73 74 61 [sqlite4_db_sta
04e0: 74 75 73 20 64 62 20 53 51 4c 49 54 45 34 5f 44 tus db SQLITE4_D
04f0: 42 53 54 41 54 55 53 5f 43 41 43 48 45 5f 55 53 BSTATUS_CACHE_US
0500: 45 44 20 30 5d 20 31 0a 7d 20 5b 65 78 70 72 20 ED 0] 1.} [expr
0510: 7b 24 42 41 53 45 53 5a 20 2b 20 31 30 2a 24 50 {$BASESZ + 10*$P
0520: 41 47 45 53 5a 7d 5d 0a 0a 0a 70 72 6f 63 20 6c AGESZ}]...proc l
0530: 6f 6f 6b 61 73 69 64 65 20 7b 64 62 7d 20 7b 0a ookaside {db} {.
0540: 20 20 65 78 70 72 20 7b 20 24 3a 3a 6c 6f 6f 6b expr { $::look
0550: 61 73 69 64 65 5f 62 75 66 66 65 72 5f 73 69 7a aside_buffer_siz
0560: 65 20 2a 0a 20 20 20 20 5b 6c 69 6e 64 65 78 20 e *. [lindex
0570: 5b 73 71 6c 69 74 65 34 5f 64 62 5f 73 74 61 74 [sqlite4_db_stat
0580: 75 73 20 24 64 62 20 53 51 4c 49 54 45 34 5f 44 us $db SQLITE4_D
0590: 42 53 54 41 54 55 53 5f 4c 4f 4f 4b 41 53 49 44 BSTATUS_LOOKASID
05a0: 45 5f 55 53 45 44 20 30 5d 20 31 5d 0a 20 20 7d E_USED 0] 1]. }
05b0: 0a 7d 0a 0a 69 66 63 61 70 61 62 6c 65 20 73 74 .}..ifcapable st
05c0: 61 74 33 20 7b 0a 20 20 73 65 74 20 53 54 41 54 at3 {. set STAT
05d0: 33 20 31 0a 7d 20 65 6c 73 65 20 7b 0a 20 20 73 3 1.} else {. s
05e0: 65 74 20 53 54 41 54 33 20 30 0a 7d 0a 0a 69 66 et STAT3 0.}..if
05f0: 63 61 70 61 62 6c 65 20 6d 61 6c 6c 6f 63 5f 75 capable malloc_u
0600: 73 61 62 6c 65 5f 73 69 7a 65 20 7b 0a 20 20 66 sable_size {. f
0610: 69 6e 69 73 68 5f 74 65 73 74 0a 20 20 72 65 74 inish_test. ret
0620: 75 72 6e 0a 7d 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d urn.}..#--------
0630: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0640: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0650: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0660: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0670: 2d 2d 2d 0a 23 20 52 75 6e 20 74 68 65 20 64 62 ---.# Run the db
0680: 73 74 61 74 75 73 2d 32 20 61 6e 64 20 64 62 73 status-2 and dbs
0690: 74 61 74 75 73 2d 33 20 74 65 73 74 73 20 77 69 tatus-3 tests wi
06a0: 74 68 20 73 65 76 65 72 61 6c 20 6f 66 20 64 69 th several of di
06b0: 66 66 65 72 65 6e 74 0a 23 20 6c 6f 6f 6b 61 73 fferent.# lookas
06c0: 69 64 65 20 62 75 66 66 65 72 20 73 69 7a 65 73 ide buffer sizes
06d0: 2e 0a 23 0a 66 6f 72 65 61 63 68 20 3a 3a 6c 6f ..#.foreach ::lo
06e0: 6f 6b 61 73 69 64 65 5f 62 75 66 66 65 72 5f 73 okaside_buffer_s
06f0: 69 7a 65 20 7b 30 20 36 34 20 31 32 30 7d 20 7b ize {0 64 120} {
0700: 0a 0a 20 20 23 20 44 6f 20 6e 6f 74 20 72 75 6e .. # Do not run
0710: 20 61 6e 79 20 6f 66 20 74 68 65 73 65 20 74 65 any of these te
0720: 73 74 73 20 69 66 20 74 68 65 72 65 20 69 73 20 sts if there is
0730: 53 51 4c 20 63 6f 6e 66 69 67 75 72 65 64 20 74 SQL configured t
0740: 6f 20 72 75 6e 0a 20 20 23 20 61 73 20 70 61 72 o run. # as par
0750: 74 20 6f 66 20 74 68 65 20 5b 73 71 6c 69 74 65 t of the [sqlite
0760: 34 5d 20 63 6f 6d 6d 61 6e 64 2e 20 54 68 69 73 4] command. This
0770: 20 70 72 65 76 65 6e 74 73 20 74 68 65 20 73 63 prevents the sc
0780: 72 69 70 74 20 66 72 6f 6d 0a 20 20 23 20 63 6f ript from. # co
0790: 6e 66 69 67 75 72 69 6e 67 20 74 68 65 20 73 69 nfiguring the si
07a0: 7a 65 20 6f 66 20 74 68 65 20 6c 6f 6f 6b 61 73 ze of the lookas
07b0: 69 64 65 20 62 75 66 66 65 72 20 61 66 74 65 72 ide buffer after
07c0: 20 5b 73 71 6c 69 74 65 34 5d 20 68 61 73 0a 20 [sqlite4] has.
07d0: 20 23 20 72 65 74 75 72 6e 65 64 2e 0a 20 20 69 # returned.. i
07e0: 66 20 7b 5b 70 72 65 73 71 6c 5d 20 21 3d 20 22 f {[presql] != "
07f0: 22 7d 20 62 72 65 61 6b 0a 0a 20 20 23 2d 2d 2d "} break.. #---
0800: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0810: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0820: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0830: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0840: 2d 2d 2d 2d 2d 2d 0a 20 20 23 20 54 65 73 74 73 ------. # Tests
0850: 20 66 6f 72 20 53 51 4c 49 54 45 34 5f 44 42 53 for SQLITE4_DBS
0860: 54 41 54 55 53 5f 53 43 48 45 4d 41 5f 55 53 45 TATUS_SCHEMA_USE
0870: 44 2e 0a 20 20 23 0a 20 20 23 20 45 61 63 68 20 D.. #. # Each
0880: 74 65 73 74 20 69 6e 20 74 68 65 20 66 6f 6c 6c test in the foll
0890: 6f 77 69 6e 67 20 62 6c 6f 63 6b 20 77 6f 72 6b owing block work
08a0: 73 20 61 73 20 66 6f 6c 6c 6f 77 73 2e 20 45 61 s as follows. Ea
08b0: 63 68 20 74 65 73 74 20 75 73 65 73 20 61 0a 20 ch test uses a.
08c0: 20 23 20 64 69 66 66 65 72 65 6e 74 20 64 61 74 # different dat
08d0: 61 62 61 73 65 20 73 63 68 65 6d 61 2e 0a 20 20 abase schema..
08e0: 23 0a 20 20 23 20 20 20 31 2e 20 4f 70 65 6e 20 #. # 1. Open
08f0: 61 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 74 6f 20 a connection to
0900: 61 6e 20 65 6d 70 74 79 20 64 61 74 61 62 61 73 an empty databas
0910: 65 2e 20 44 69 73 61 62 6c 65 20 73 74 61 74 65 e. Disable state
0920: 6d 65 6e 74 20 63 61 63 68 69 6e 67 2e 0a 20 20 ment caching..
0930: 23 0a 20 20 23 20 20 20 32 2e 20 45 78 65 63 75 #. # 2. Execu
0940: 74 65 20 74 68 65 20 53 51 4c 20 74 6f 20 63 72 te the SQL to cr
0950: 65 61 74 65 20 74 68 65 20 64 61 74 61 62 61 73 eate the databas
0960: 65 20 73 63 68 65 6d 61 2e 20 4d 65 61 73 75 72 e schema. Measur
0970: 65 20 74 68 65 20 74 6f 74 61 6c 20 0a 20 20 23 e the total . #
0980: 20 20 20 20 20 20 68 65 61 70 20 61 6e 64 20 6c heap and l
0990: 6f 6f 6b 61 73 69 64 65 20 6d 65 6d 6f 72 79 20 ookaside memory
09a0: 61 6c 6c 6f 63 61 74 65 64 20 62 79 20 53 51 4c allocated by SQL
09b0: 69 74 65 2c 20 61 6e 64 20 74 68 65 20 6d 65 6d ite, and the mem
09c0: 6f 72 79 20 0a 20 20 23 20 20 20 20 20 20 61 6c ory . # al
09d0: 6c 6f 63 61 74 65 64 20 66 6f 72 20 74 68 65 20 located for the
09e0: 64 61 74 61 62 61 73 65 20 73 63 68 65 6d 61 20 database schema
09f0: 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 73 71 6c according to sql
0a00: 69 74 65 34 5f 64 62 5f 73 74 61 74 75 73 28 29 ite4_db_status()
0a10: 2e 0a 20 20 23 0a 20 20 23 20 20 20 33 2e 20 44 .. #. # 3. D
0a20: 72 6f 70 20 61 6c 6c 20 74 61 62 6c 65 73 20 69 rop all tables i
0a30: 6e 20 74 68 65 20 64 61 74 61 62 61 73 65 20 73 n the database s
0a40: 63 68 65 6d 61 2e 20 4d 65 61 73 75 72 65 20 74 chema. Measure t
0a50: 68 65 20 74 6f 74 61 6c 20 6d 65 6d 6f 72 79 20 he total memory
0a60: 0a 20 20 23 20 20 20 20 20 20 61 6e 64 20 74 68 . # and th
0a70: 65 20 73 63 68 65 6d 61 20 6d 65 6d 6f 72 79 20 e schema memory
0a80: 61 67 61 69 6e 2e 0a 20 20 23 0a 20 20 23 20 20 again.. #. #
0a90: 20 34 2e 20 52 65 70 65 61 74 20 73 74 65 70 20 4. Repeat step
0aa0: 32 2e 0a 20 20 23 0a 20 20 23 20 20 20 35 2e 20 2.. #. # 5.
0ab0: 52 65 70 65 61 74 20 73 74 65 70 20 33 2e 0a 20 Repeat step 3..
0ac0: 20 23 0a 20 20 23 20 54 68 65 6e 20 74 65 73 74 #. # Then test
0ad0: 20 74 68 61 74 3a 0a 20 20 23 0a 20 20 23 20 20 that:. #. #
0ae0: 20 61 29 20 54 68 65 20 64 69 66 66 65 72 65 6e a) The differen
0af0: 63 65 20 69 6e 20 73 63 68 65 6d 61 20 6d 65 6d ce in schema mem
0b00: 6f 72 79 20 71 75 61 6e 74 69 74 69 65 73 20 69 ory quantities i
0b10: 6e 20 73 74 65 70 73 20 32 20 61 6e 64 20 33 20 n steps 2 and 3
0b20: 69 73 20 74 68 65 0a 20 20 23 20 20 20 20 20 20 is the. #
0b30: 73 61 6d 65 20 61 73 20 74 68 65 20 64 69 66 66 same as the diff
0b40: 65 72 65 6e 63 65 20 69 6e 20 74 6f 74 61 6c 20 erence in total
0b50: 6d 65 6d 6f 72 79 20 69 6e 20 73 74 65 70 73 20 memory in steps
0b60: 32 20 61 6e 64 20 33 2e 0a 20 20 23 0a 20 20 23 2 and 3.. #. #
0b70: 20 20 20 62 29 20 53 74 65 70 20 34 20 72 65 70 b) Step 4 rep
0b80: 6f 72 74 73 20 74 68 65 20 73 61 6d 65 20 61 6d orts the same am
0b90: 6f 75 6e 74 20 6f 66 20 73 63 68 65 6d 61 20 61 ount of schema a
0ba0: 6e 64 20 74 6f 74 61 6c 20 6d 65 6d 6f 72 79 20 nd total memory
0bb0: 75 73 65 64 20 61 73 0a 20 20 23 20 20 20 20 20 used as. #
0bc0: 20 69 6e 20 73 74 65 70 20 32 2e 0a 20 20 23 0a in step 2.. #.
0bd0: 20 20 23 20 20 20 63 29 20 53 74 65 70 20 35 20 # c) Step 5
0be0: 72 65 70 6f 72 74 73 20 74 68 65 20 73 61 6d 65 reports the same
0bf0: 20 61 6d 6f 75 6e 74 20 6f 66 20 73 63 68 65 6d amount of schem
0c00: 61 20 61 6e 64 20 74 6f 74 61 6c 20 6d 65 6d 6f a and total memo
0c10: 72 79 20 75 73 65 64 20 61 73 0a 20 20 23 20 20 ry used as. #
0c20: 20 20 20 20 69 6e 20 73 74 65 70 20 33 2e 0a 20 in step 3..
0c30: 20 23 0a 20 20 66 6f 72 65 61 63 68 20 7b 74 6e #. foreach {tn
0c40: 20 73 63 68 65 6d 61 7d 20 7b 20 0a 20 20 20 20 schema} { .
0c50: 31 20 7b 20 43 52 45 41 54 45 20 54 41 42 4c 45 1 { CREATE TABLE
0c60: 20 74 31 28 61 2c 20 62 29 20 7d 0a 20 20 20 20 t1(a, b) }.
0c70: 32 20 7b 20 43 52 45 41 54 45 20 54 41 42 4c 45 2 { CREATE TABLE
0c80: 20 74 31 28 61 20 50 52 49 4d 41 52 59 20 4b 45 t1(a PRIMARY KE
0c90: 59 2c 20 62 20 52 45 46 45 52 45 4e 43 45 53 20 Y, b REFERENCES
0ca0: 74 31 2c 20 63 20 55 4e 49 51 55 45 29 20 7d 0a t1, c UNIQUE) }.
0cb0: 20 20 20 20 33 20 7b 0a 20 20 20 20 20 20 43 52 3 {. CR
0cc0: 45 41 54 45 20 54 41 42 4c 45 20 74 31 28 61 2c EATE TABLE t1(a,
0cd0: 20 62 29 3b 0a 20 20 20 20 20 20 43 52 45 41 54 b);. CREAT
0ce0: 45 20 49 4e 44 45 58 20 69 31 20 4f 4e 20 74 31 E INDEX i1 ON t1
0cf0: 28 61 2c 20 62 29 3b 0a 20 20 20 20 7d 0a 20 20 (a, b);. }.
0d00: 20 20 34 20 7b 0a 20 20 20 20 20 20 43 52 45 41 4 {. CREA
0d10: 54 45 20 54 41 42 4c 45 20 74 31 28 61 2c 20 62 TE TABLE t1(a, b
0d20: 29 3b 0a 20 20 20 20 20 20 43 52 45 41 54 45 20 );. CREATE
0d30: 54 41 42 4c 45 20 74 32 28 63 2c 20 64 29 3b 0a TABLE t2(c, d);.
0d40: 20 20 20 20 20 20 43 52 45 41 54 45 20 54 52 49 CREATE TRI
0d50: 47 47 45 52 20 41 46 54 45 52 20 49 4e 53 45 52 GGER AFTER INSER
0d60: 54 20 4f 4e 20 74 31 20 42 45 47 49 4e 0a 20 20 T ON t1 BEGIN.
0d70: 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 INSERT INT
0d80: 4f 20 74 32 20 56 41 4c 55 45 53 28 6e 65 77 2e O t2 VALUES(new.
0d90: 61 2c 20 6e 65 77 2e 62 29 3b 0a 20 20 20 20 20 a, new.b);.
0da0: 20 20 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d SELECT * FROM
0db0: 20 74 31 2c 20 74 32 20 57 48 45 52 45 20 61 3d t1, t2 WHERE a=
0dc0: 63 20 41 4e 44 20 62 3d 64 20 47 52 4f 55 50 20 c AND b=d GROUP
0dd0: 42 59 20 62 20 48 41 56 49 4e 47 20 61 3e 35 20 BY b HAVING a>5
0de0: 4f 52 44 45 52 20 42 59 20 61 3b 0a 20 20 20 20 ORDER BY a;.
0df0: 20 20 45 4e 44 3b 0a 20 20 20 20 7d 0a 20 20 20 END;. }.
0e00: 20 35 20 7b 0a 20 20 20 20 20 20 43 52 45 41 54 5 {. CREAT
0e10: 45 20 54 41 42 4c 45 20 74 31 28 61 2c 20 62 29 E TABLE t1(a, b)
0e20: 3b 0a 20 20 20 20 20 20 43 52 45 41 54 45 20 54 ;. CREATE T
0e30: 41 42 4c 45 20 74 32 28 63 2c 20 64 29 3b 0a 20 ABLE t2(c, d);.
0e40: 20 20 20 20 20 43 52 45 41 54 45 20 56 49 45 57 CREATE VIEW
0e50: 20 76 31 20 41 53 20 53 45 4c 45 43 54 20 2a 20 v1 AS SELECT *
0e60: 46 52 4f 4d 20 74 31 20 55 4e 49 4f 4e 20 53 45 FROM t1 UNION SE
0e70: 4c 45 43 54 20 2a 20 46 52 4f 4d 20 74 32 3b 0a LECT * FROM t2;.
0e80: 20 20 20 20 7d 0a 20 20 20 20 36 79 20 7b 0a 20 }. 6y {.
0e90: 20 20 20 20 20 43 52 45 41 54 45 20 54 41 42 4c CREATE TABL
0ea0: 45 20 74 31 28 61 2c 20 62 29 3b 0a 20 20 20 20 E t1(a, b);.
0eb0: 20 20 43 52 45 41 54 45 20 49 4e 44 45 58 20 69 CREATE INDEX i
0ec0: 31 20 4f 4e 20 74 31 28 61 29 3b 0a 20 20 20 20 1 ON t1(a);.
0ed0: 20 20 43 52 45 41 54 45 20 49 4e 44 45 58 20 69 CREATE INDEX i
0ee0: 32 20 4f 4e 20 74 31 28 61 2c 62 29 3b 0a 20 20 2 ON t1(a,b);.
0ef0: 20 20 20 20 43 52 45 41 54 45 20 49 4e 44 45 58 CREATE INDEX
0f00: 20 69 33 20 4f 4e 20 74 31 28 62 2c 62 29 3b 0a i3 ON t1(b,b);.
0f10: 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 INSERT INT
0f20: 4f 20 74 31 20 56 41 4c 55 45 53 28 72 61 6e 64 O t1 VALUES(rand
0f30: 6f 6d 62 6c 6f 62 28 32 30 29 2c 20 72 61 6e 64 omblob(20), rand
0f40: 6f 6d 62 6c 6f 62 28 32 35 29 29 3b 0a 20 20 20 omblob(25));.
0f50: 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 INSERT INTO t
0f60: 31 20 53 45 4c 45 43 54 20 72 61 6e 64 6f 6d 62 1 SELECT randomb
0f70: 6c 6f 62 28 32 30 29 2c 20 72 61 6e 64 6f 6d 62 lob(20), randomb
0f80: 6c 6f 62 28 32 35 29 20 46 52 4f 4d 20 74 31 3b lob(25) FROM t1;
0f90: 0a 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e . INSERT IN
0fa0: 54 4f 20 74 31 20 53 45 4c 45 43 54 20 72 61 6e TO t1 SELECT ran
0fb0: 64 6f 6d 62 6c 6f 62 28 32 30 29 2c 20 72 61 6e domblob(20), ran
0fc0: 64 6f 6d 62 6c 6f 62 28 32 35 29 20 46 52 4f 4d domblob(25) FROM
0fd0: 20 74 31 3b 0a 20 20 20 20 20 20 49 4e 53 45 52 t1;. INSER
0fe0: 54 20 49 4e 54 4f 20 74 31 20 53 45 4c 45 43 54 T INTO t1 SELECT
0ff0: 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 32 30 29 2c randomblob(20),
1000: 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 32 35 29 20 randomblob(25)
1010: 46 52 4f 4d 20 74 31 3b 0a 20 20 20 20 20 20 41 FROM t1;. A
1020: 4e 41 4c 59 5a 45 3b 0a 20 20 20 20 7d 0a 20 20 NALYZE;. }.
1030: 20 20 37 20 7b 0a 20 20 20 20 20 20 43 52 45 41 7 {. CREA
1040: 54 45 20 54 41 42 4c 45 20 74 31 28 61 2c 20 62 TE TABLE t1(a, b
1050: 29 3b 0a 20 20 20 20 20 20 43 52 45 41 54 45 20 );. CREATE
1060: 54 41 42 4c 45 20 74 32 28 63 2c 20 64 29 3b 0a TABLE t2(c, d);.
1070: 20 20 20 20 20 20 43 52 45 41 54 45 20 56 49 45 CREATE VIE
1080: 57 20 76 31 20 41 53 20 0a 20 20 20 20 20 20 20 W v1 AS .
1090: 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 74 SELECT * FROM t
10a0: 31 20 0a 20 20 20 20 20 20 20 20 55 4e 49 4f 4e 1 . UNION
10b0: 20 0a 20 20 20 20 20 20 20 20 53 45 4c 45 43 54 . SELECT
10c0: 20 2a 20 46 52 4f 4d 20 74 32 0a 20 20 20 20 20 * FROM t2.
10d0: 20 20 20 55 4e 49 4f 4e 20 41 4c 4c 0a 20 20 20 UNION ALL.
10e0: 20 20 20 20 20 53 45 4c 45 43 54 20 63 7c 7c 62 SELECT c||b
10f0: 2c 20 64 7c 7c 61 20 46 52 4f 4d 20 74 32 20 4c , d||a FROM t2 L
1100: 45 46 54 20 4f 55 54 45 52 20 4a 4f 49 4e 20 74 EFT OUTER JOIN t
1110: 31 20 47 52 4f 55 50 20 42 59 20 63 2c 20 64 0a 1 GROUP BY c, d.
1120: 20 20 20 20 20 20 20 20 4f 52 44 45 52 20 42 59 ORDER BY
1130: 20 31 2c 20 32 0a 20 20 20 20 20 20 3b 0a 20 20 1, 2. ;.
1140: 20 20 20 20 43 52 45 41 54 45 20 54 52 49 47 47 CREATE TRIGG
1150: 45 52 20 74 72 31 20 49 4e 53 54 45 41 44 20 4f ER tr1 INSTEAD O
1160: 46 20 49 4e 53 45 52 54 20 4f 4e 20 76 31 20 42 F INSERT ON v1 B
1170: 45 47 49 4e 0a 20 20 20 20 20 20 20 20 53 45 4c EGIN. SEL
1180: 45 43 54 20 2a 20 46 52 4f 4d 20 76 31 3b 0a 20 ECT * FROM v1;.
1190: 20 20 20 20 20 20 20 55 50 44 41 54 45 20 74 31 UPDATE t1
11a0: 20 53 45 54 20 61 3d 35 2c 20 62 3d 28 53 45 4c SET a=5, b=(SEL
11b0: 45 43 54 20 63 20 46 52 4f 4d 20 74 32 29 3b 0a ECT c FROM t2);.
11c0: 20 20 20 20 20 20 45 4e 44 3b 0a 20 20 20 20 20 END;.
11d0: 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 76 SELECT * FROM v
11e0: 31 3b 0a 20 20 20 20 7d 0a 20 20 20 20 38 78 20 1;. }. 8x
11f0: 7b 0a 20 20 20 20 20 20 43 52 45 41 54 45 20 54 {. CREATE T
1200: 41 42 4c 45 20 74 31 28 61 2c 20 62 2c 20 55 4e ABLE t1(a, b, UN
1210: 49 51 55 45 28 61 2c 20 62 29 29 3b 0a 20 20 20 IQUE(a, b));.
1220: 20 20 20 43 52 45 41 54 45 20 56 49 52 54 55 41 CREATE VIRTUA
1230: 4c 20 54 41 42 4c 45 20 74 32 20 55 53 49 4e 47 L TABLE t2 USING
1240: 20 65 63 68 6f 28 74 31 29 3b 0a 20 20 20 20 7d echo(t1);. }
1250: 0a 20 20 7d 20 7b 0a 20 20 20 20 73 65 74 20 74 . } {. set t
1260: 6e 20 22 24 3a 3a 6c 6f 6f 6b 61 73 69 64 65 5f n "$::lookaside_
1270: 62 75 66 66 65 72 5f 73 69 7a 65 2d 24 74 6e 22 buffer_size-$tn"
1280: 0a 20 20 0a 20 20 20 20 23 20 53 74 65 70 20 31 . . # Step 1
1290: 2e 0a 20 20 20 20 64 62 20 63 6c 6f 73 65 0a 20 .. db close.
12a0: 20 20 20 66 6f 72 63 65 64 65 6c 65 74 65 20 74 forcedelete t
12b0: 65 73 74 2e 64 62 0a 20 20 20 20 73 71 6c 69 74 est.db. sqlit
12c0: 65 34 20 64 62 20 74 65 73 74 2e 64 62 0a 20 20 e4 db test.db.
12d0: 20 20 73 71 6c 69 74 65 34 5f 64 62 5f 63 6f 6e sqlite4_db_con
12e0: 66 69 67 5f 6c 6f 6f 6b 61 73 69 64 65 20 64 62 fig_lookaside db
12f0: 20 30 20 24 3a 3a 6c 6f 6f 6b 61 73 69 64 65 5f 0 $::lookaside_
1300: 62 75 66 66 65 72 5f 73 69 7a 65 20 35 30 30 0a buffer_size 500.
1310: 20 20 20 20 64 62 20 63 61 63 68 65 20 73 69 7a db cache siz
1320: 65 20 30 0a 0a 20 20 20 20 63 61 74 63 68 20 7b e 0.. catch {
1330: 20 72 65 67 69 73 74 65 72 5f 65 63 68 6f 5f 6d register_echo_m
1340: 6f 64 75 6c 65 20 64 62 20 7d 0a 20 20 20 20 69 odule db }. i
1350: 66 63 61 70 61 62 6c 65 20 21 76 74 61 62 20 7b fcapable !vtab {
1360: 20 69 66 20 7b 5b 73 74 72 69 6e 67 20 6d 61 74 if {[string mat
1370: 63 68 20 2a 78 20 24 74 6e 5d 7d 20 63 6f 6e 74 ch *x $tn]} cont
1380: 69 6e 75 65 20 7d 0a 20 20 0a 20 20 20 20 23 20 inue }. . #
1390: 53 74 65 70 20 32 2e 0a 20 20 20 20 65 78 65 63 Step 2.. exec
13a0: 73 71 6c 20 24 73 63 68 65 6d 61 0a 20 20 20 20 sql $schema.
13b0: 73 65 74 20 6e 41 6c 6c 6f 63 31 20 20 5b 6c 69 set nAlloc1 [li
13c0: 6e 64 65 78 20 5b 73 71 6c 69 74 65 34 5f 65 6e ndex [sqlite4_en
13d0: 76 5f 73 74 61 74 75 73 20 53 51 4c 49 54 45 34 v_status SQLITE4
13e0: 5f 45 4e 56 53 54 41 54 55 53 5f 4d 45 4d 4f 52 _ENVSTATUS_MEMOR
13f0: 59 5f 55 53 45 44 20 30 5d 20 31 5d 0a 20 20 20 Y_USED 0] 1].
1400: 20 69 6e 63 72 20 6e 41 6c 6c 6f 63 31 20 5b 6c incr nAlloc1 [l
1410: 6f 6f 6b 61 73 69 64 65 20 64 62 5d 0a 20 20 20 ookaside db].
1420: 20 73 65 74 20 6e 53 63 68 65 6d 61 31 20 5b 6c set nSchema1 [l
1430: 69 6e 64 65 78 20 5b 73 71 6c 69 74 65 34 5f 64 index [sqlite4_d
1440: 62 5f 73 74 61 74 75 73 20 64 62 20 53 51 4c 49 b_status db SQLI
1450: 54 45 34 5f 44 42 53 54 41 54 55 53 5f 53 43 48 TE4_DBSTATUS_SCH
1460: 45 4d 41 5f 55 53 45 44 20 30 5d 20 31 5d 0a 20 EMA_USED 0] 1].
1470: 20 0a 20 20 20 20 23 20 53 74 65 70 20 33 2e 0a . # Step 3..
1480: 20 20 20 20 64 72 6f 70 5f 61 6c 6c 5f 74 61 62 drop_all_tab
1490: 6c 65 73 0a 20 20 20 20 73 65 74 20 6e 41 6c 6c les. set nAll
14a0: 6f 63 32 20 20 5b 6c 69 6e 64 65 78 20 5b 73 71 oc2 [lindex [sq
14b0: 6c 69 74 65 34 5f 65 6e 76 5f 73 74 61 74 75 73 lite4_env_status
14c0: 20 53 51 4c 49 54 45 34 5f 45 4e 56 53 54 41 54 SQLITE4_ENVSTAT
14d0: 55 53 5f 4d 45 4d 4f 52 59 5f 55 53 45 44 20 30 US_MEMORY_USED 0
14e0: 5d 20 31 5d 0a 20 20 20 20 69 6e 63 72 20 6e 41 ] 1]. incr nA
14f0: 6c 6c 6f 63 32 20 5b 6c 6f 6f 6b 61 73 69 64 65 lloc2 [lookaside
1500: 20 64 62 5d 0a 20 20 20 20 73 65 74 20 6e 53 63 db]. set nSc
1510: 68 65 6d 61 32 20 5b 6c 69 6e 64 65 78 20 5b 73 hema2 [lindex [s
1520: 71 6c 69 74 65 34 5f 64 62 5f 73 74 61 74 75 73 qlite4_db_status
1530: 20 64 62 20 53 51 4c 49 54 45 34 5f 44 42 53 54 db SQLITE4_DBST
1540: 41 54 55 53 5f 53 43 48 45 4d 41 5f 55 53 45 44 ATUS_SCHEMA_USED
1550: 20 30 5d 20 31 5d 0a 20 20 0a 20 20 20 20 23 20 0] 1]. . #
1560: 53 74 65 70 20 34 2e 0a 20 20 20 20 65 78 65 63 Step 4.. exec
1570: 73 71 6c 20 24 73 63 68 65 6d 61 0a 20 20 20 20 sql $schema.
1580: 73 65 74 20 6e 41 6c 6c 6f 63 33 20 20 5b 6c 69 set nAlloc3 [li
1590: 6e 64 65 78 20 5b 73 71 6c 69 74 65 34 5f 65 6e ndex [sqlite4_en
15a0: 76 5f 73 74 61 74 75 73 20 53 51 4c 49 54 45 34 v_status SQLITE4
15b0: 5f 45 4e 56 53 54 41 54 55 53 5f 4d 45 4d 4f 52 _ENVSTATUS_MEMOR
15c0: 59 5f 55 53 45 44 20 30 5d 20 31 5d 0a 20 20 20 Y_USED 0] 1].
15d0: 20 69 6e 63 72 20 6e 41 6c 6c 6f 63 33 20 5b 6c incr nAlloc3 [l
15e0: 6f 6f 6b 61 73 69 64 65 20 64 62 5d 0a 20 20 20 ookaside db].
15f0: 20 73 65 74 20 6e 53 63 68 65 6d 61 33 20 5b 6c set nSchema3 [l
1600: 69 6e 64 65 78 20 5b 73 71 6c 69 74 65 34 5f 64 index [sqlite4_d
1610: 62 5f 73 74 61 74 75 73 20 64 62 20 53 51 4c 49 b_status db SQLI
1620: 54 45 34 5f 44 42 53 54 41 54 55 53 5f 53 43 48 TE4_DBSTATUS_SCH
1630: 45 4d 41 5f 55 53 45 44 20 30 5d 20 31 5d 0a 20 EMA_USED 0] 1].
1640: 20 20 20 0a 20 20 20 20 23 20 53 74 65 70 20 35 . # Step 5
1650: 2e 0a 20 20 20 20 64 72 6f 70 5f 61 6c 6c 5f 74 .. drop_all_t
1660: 61 62 6c 65 73 0a 20 20 20 20 73 65 74 20 6e 41 ables. set nA
1670: 6c 6c 6f 63 34 20 20 5b 6c 69 6e 64 65 78 20 5b lloc4 [lindex [
1680: 73 71 6c 69 74 65 34 5f 65 6e 76 5f 73 74 61 74 sqlite4_env_stat
1690: 75 73 20 53 51 4c 49 54 45 34 5f 45 4e 56 53 54 us SQLITE4_ENVST
16a0: 41 54 55 53 5f 4d 45 4d 4f 52 59 5f 55 53 45 44 ATUS_MEMORY_USED
16b0: 20 30 5d 20 31 5d 0a 20 20 20 20 69 6e 63 72 20 0] 1]. incr
16c0: 6e 41 6c 6c 6f 63 34 20 5b 6c 6f 6f 6b 61 73 69 nAlloc4 [lookasi
16d0: 64 65 20 64 62 5d 0a 20 20 20 20 73 65 74 20 6e de db]. set n
16e0: 53 63 68 65 6d 61 34 20 5b 6c 69 6e 64 65 78 20 Schema4 [lindex
16f0: 5b 73 71 6c 69 74 65 34 5f 64 62 5f 73 74 61 74 [sqlite4_db_stat
1700: 75 73 20 64 62 20 53 51 4c 49 54 45 34 5f 44 42 us db SQLITE4_DB
1710: 53 54 41 54 55 53 5f 53 43 48 45 4d 41 5f 55 53 STATUS_SCHEMA_US
1720: 45 44 20 30 5d 20 31 5d 0a 20 20 20 20 73 65 74 ED 0] 1]. set
1730: 20 6e 46 72 65 65 20 5b 65 78 70 72 20 7b 24 6e nFree [expr {$n
1740: 41 6c 6c 6f 63 31 2d 24 6e 41 6c 6c 6f 63 32 7d Alloc1-$nAlloc2}
1750: 5d 0a 20 20 20 20 0a 20 20 20 20 23 20 54 65 73 ]. . # Tes
1760: 74 73 20 66 6f 72 20 77 68 69 63 68 20 74 68 65 ts for which the
1770: 20 74 65 73 74 20 6e 61 6d 65 20 65 6e 64 73 20 test name ends
1780: 69 6e 20 61 6e 20 22 78 22 20 72 65 70 6f 72 74 in an "x" report
1790: 20 73 6c 69 67 68 74 6c 79 20 6c 65 73 73 0a 20 slightly less.
17a0: 20 20 20 23 20 6d 65 6d 6f 72 79 20 74 68 61 6e # memory than
17b0: 20 69 73 20 61 63 74 75 61 6c 6c 79 20 66 72 65 is actually fre
17c0: 65 64 20 77 68 65 6e 20 61 6c 6c 20 73 63 68 65 ed when all sche
17d0: 6d 61 20 69 74 65 6d 73 20 61 72 65 20 66 69 6e ma items are fin
17e0: 61 6c 69 7a 65 64 2e 0a 20 20 20 20 23 20 54 68 alized.. # Th
17f0: 69 73 20 69 73 20 62 65 63 61 75 73 65 20 6d 65 is is because me
1800: 6d 6f 72 79 20 61 6c 6c 6f 63 61 74 65 64 20 62 mory allocated b
1810: 79 20 76 69 72 74 75 61 6c 20 74 61 62 6c 65 20 y virtual table
1820: 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 73 0a implementations.
1830: 20 20 20 20 23 20 66 6f 72 20 61 6e 79 20 72 65 # for any re
1840: 61 73 6f 6e 20 69 73 20 6e 6f 74 20 63 6f 75 6e ason is not coun
1850: 74 65 64 20 61 73 20 22 73 63 68 65 6d 61 20 6d ted as "schema m
1860: 65 6d 6f 72 79 22 2e 0a 20 20 20 20 23 0a 20 20 emory".. #.
1870: 20 20 23 20 41 64 64 69 74 69 6f 6e 61 6c 6c 79 # Additionally
1880: 2c 20 69 6e 20 61 75 74 6f 2d 76 61 63 75 75 6d , in auto-vacuum
1890: 20 6d 6f 64 65 2c 20 64 72 6f 70 70 69 6e 67 20 mode, dropping
18a0: 74 61 62 6c 65 73 20 61 6e 64 20 69 6e 64 65 78 tables and index
18b0: 65 73 20 63 61 75 73 65 73 0a 20 20 20 20 23 20 es causes. #
18c0: 74 68 65 20 70 61 67 65 2d 63 61 63 68 65 20 74 the page-cache t
18d0: 6f 20 73 68 72 69 6e 6b 2e 20 53 6f 20 74 68 65 o shrink. So the
18e0: 20 61 6d 6f 75 6e 74 20 6f 66 20 6d 65 6d 6f 72 amount of memor
18f0: 79 20 66 72 65 65 64 20 69 73 20 61 6c 77 61 79 y freed is alway
1900: 73 0a 20 20 20 20 23 20 6d 75 63 68 20 67 72 65 s. # much gre
1910: 61 74 65 72 20 74 68 61 6e 20 6a 75 73 74 20 74 ater than just t
1920: 68 61 74 20 72 65 70 6f 72 74 65 64 20 62 79 20 hat reported by
1930: 44 42 53 54 41 54 55 53 5f 53 43 48 45 4d 41 5f DBSTATUS_SCHEMA_
1940: 55 53 45 44 20 69 6e 20 74 68 69 73 0a 20 20 20 USED in this.
1950: 20 23 20 63 61 73 65 2e 0a 20 20 20 20 23 0a 20 # case.. #.
1960: 20 20 20 23 20 53 6f 6d 65 20 6f 66 20 74 68 65 # Some of the
1970: 20 6d 65 6d 6f 72 79 20 75 73 65 64 20 66 6f 72 memory used for
1980: 20 73 71 6c 69 74 65 5f 73 74 61 74 33 20 69 73 sqlite_stat3 is
1990: 20 75 6e 61 63 63 6f 75 6e 74 65 64 20 66 6f 72 unaccounted for
19a0: 20 62 79 0a 20 20 20 20 23 20 64 62 73 74 61 74 by. # dbstat
19b0: 75 73 2e 0a 20 20 20 20 23 0a 20 20 20 20 23 20 us.. #. #
19c0: 46 69 6e 61 6c 6c 79 2c 20 6f 6e 20 6f 73 78 20 Finally, on osx
19d0: 74 68 65 20 65 73 74 69 6d 61 74 65 20 6f 66 20 the estimate of
19e0: 6d 65 6d 6f 72 79 20 75 73 65 64 20 62 79 20 74 memory used by t
19f0: 68 65 20 73 63 68 65 6d 61 20 6d 61 79 20 62 65 he schema may be
1a00: 0a 20 20 20 20 23 20 73 6c 69 67 68 74 6c 79 20 . # slightly
1a10: 6c 6f 77 2e 20 0a 20 20 20 20 23 0a 20 20 20 20 low. . #.
1a20: 69 66 20 7b 5b 73 74 72 69 6e 67 20 6d 61 74 63 if {[string matc
1a30: 68 20 2a 78 20 24 74 6e 5d 20 7c 7c 20 24 41 55 h *x $tn] || $AU
1a40: 54 4f 56 41 43 55 55 4d 0a 20 20 20 20 20 20 20 TOVACUUM.
1a50: 20 20 7c 7c 20 28 5b 73 74 72 69 6e 67 20 6d 61 || ([string ma
1a60: 74 63 68 20 2a 79 20 24 74 6e 5d 20 26 26 20 24 tch *y $tn] && $
1a70: 53 54 41 54 33 29 0a 20 20 20 20 20 20 20 20 20 STAT3).
1a80: 7c 7c 20 28 24 3a 3a 74 63 6c 5f 70 6c 61 74 66 || ($::tcl_platf
1a90: 6f 72 6d 28 6f 73 29 20 3d 3d 20 22 44 61 72 77 orm(os) == "Darw
1aa0: 69 6e 22 29 0a 20 20 20 20 7d 20 7b 0a 20 20 20 in"). } {.
1ab0: 20 20 20 64 6f 5f 74 65 73 74 20 64 62 73 74 61 do_test dbsta
1ac0: 74 75 73 2d 32 2e 24 74 6e 2e 61 78 20 7b 20 65 tus-2.$tn.ax { e
1ad0: 78 70 72 20 7b 28 24 6e 53 63 68 65 6d 61 31 2d xpr {($nSchema1-
1ae0: 24 6e 53 63 68 65 6d 61 32 29 3c 3d 24 6e 46 72 $nSchema2)<=$nFr
1af0: 65 65 7d 20 7d 20 31 0a 20 20 20 20 7d 20 65 6c ee} } 1. } el
1b00: 73 65 20 7b 0a 20 20 20 20 20 20 64 6f 5f 74 65 se {. do_te
1b10: 73 74 20 64 62 73 74 61 74 75 73 2d 32 2e 24 74 st dbstatus-2.$t
1b20: 6e 2e 61 20 7b 20 65 78 70 72 20 7b 24 6e 53 63 n.a { expr {$nSc
1b30: 68 65 6d 61 31 2d 24 6e 53 63 68 65 6d 61 32 7d hema1-$nSchema2}
1b40: 20 7d 20 24 6e 46 72 65 65 0a 20 20 20 20 7d 0a } $nFree. }.
1b50: 20 20 0a 20 20 20 20 64 6f 5f 74 65 73 74 20 64 . do_test d
1b60: 62 73 74 61 74 75 73 2d 32 2e 24 74 6e 2e 62 20 bstatus-2.$tn.b
1b70: 7b 20 6c 69 73 74 20 24 6e 41 6c 6c 6f 63 31 20 { list $nAlloc1
1b80: 24 6e 53 63 68 65 6d 61 31 20 7d 20 22 24 6e 41 $nSchema1 } "$nA
1b90: 6c 6c 6f 63 33 20 24 6e 53 63 68 65 6d 61 33 22 lloc3 $nSchema3"
1ba0: 0a 20 20 20 20 64 6f 5f 74 65 73 74 20 64 62 73 . do_test dbs
1bb0: 74 61 74 75 73 2d 32 2e 24 74 6e 2e 63 20 7b 20 tatus-2.$tn.c {
1bc0: 6c 69 73 74 20 24 6e 41 6c 6c 6f 63 32 20 24 6e list $nAlloc2 $n
1bd0: 53 63 68 65 6d 61 32 20 7d 20 22 24 6e 41 6c 6c Schema2 } "$nAll
1be0: 6f 63 34 20 24 6e 53 63 68 65 6d 61 34 22 0a 20 oc4 $nSchema4".
1bf0: 20 7d 0a 20 20 0a 20 20 23 2d 2d 2d 2d 2d 2d 2d }. . #-------
1c00: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
1c10: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
1c20: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
1c30: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
1c40: 2d 2d 0a 20 20 23 20 54 65 73 74 73 20 66 6f 72 --. # Tests for
1c50: 20 53 51 4c 49 54 45 34 5f 44 42 53 54 41 54 55 SQLITE4_DBSTATU
1c60: 53 5f 53 54 4d 54 5f 55 53 45 44 2e 0a 20 20 23 S_STMT_USED.. #
1c70: 0a 20 20 23 20 45 61 63 68 20 74 65 73 74 20 69 . # Each test i
1c80: 6e 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 n the following
1c90: 62 6c 6f 63 6b 20 77 6f 72 6b 73 20 61 73 20 66 block works as f
1ca0: 6f 6c 6c 6f 77 73 2e 20 45 61 63 68 20 74 65 73 ollows. Each tes
1cb0: 74 20 75 73 65 73 20 61 0a 20 20 23 20 64 69 66 t uses a. # dif
1cc0: 66 65 72 65 6e 74 20 64 61 74 61 62 61 73 65 20 ferent database
1cd0: 73 63 68 65 6d 61 2e 0a 20 20 23 0a 20 20 23 20 schema.. #. #
1ce0: 20 20 31 2e 20 4f 70 65 6e 20 61 20 63 6f 6e 6e 1. Open a conn
1cf0: 65 63 74 69 6f 6e 20 74 6f 20 61 6e 20 65 6d 70 ection to an emp
1d00: 74 79 20 64 61 74 61 62 61 73 65 2e 20 49 6e 69 ty database. Ini
1d10: 74 69 61 6c 69 7a 65 64 20 74 68 65 20 64 61 74 tialized the dat
1d20: 61 62 61 73 65 0a 20 20 23 20 20 20 20 20 20 73 abase. # s
1d30: 63 68 65 6d 61 2e 0a 20 20 23 0a 20 20 23 20 20 chema.. #. #
1d40: 20 32 2e 20 50 72 65 70 61 72 65 20 61 20 62 75 2. Prepare a bu
1d50: 6e 63 68 20 6f 66 20 53 51 4c 20 73 74 61 74 65 nch of SQL state
1d60: 6d 65 6e 74 73 2e 20 4d 65 61 73 75 72 65 20 74 ments. Measure t
1d70: 68 65 20 74 6f 74 61 6c 20 68 65 61 70 20 61 6e he total heap an
1d80: 64 20 0a 20 20 23 20 20 20 20 20 20 6c 6f 6f 6b d . # look
1d90: 61 73 69 64 65 20 6d 65 6d 6f 72 79 20 61 6c 6c aside memory all
1da0: 6f 63 61 74 65 64 20 62 79 20 53 51 4c 69 74 65 ocated by SQLite
1db0: 2c 20 61 6e 64 20 74 68 65 20 6d 65 6d 6f 72 79 , and the memory
1dc0: 20 61 6c 6c 6f 63 61 74 65 64 20 0a 20 20 23 20 allocated . #
1dd0: 20 20 20 20 20 66 6f 72 20 74 68 65 20 70 72 65 for the pre
1de0: 70 61 72 65 64 20 73 74 61 74 65 6d 65 6e 74 73 pared statements
1df0: 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 73 71 according to sq
1e00: 6c 69 74 65 34 5f 64 62 5f 73 74 61 74 75 73 28 lite4_db_status(
1e10: 29 2e 0a 20 20 23 0a 20 20 23 20 20 20 33 2e 20 ).. #. # 3.
1e20: 46 69 6e 61 6c 69 7a 65 20 61 6c 6c 20 70 72 65 Finalize all pre
1e30: 70 61 72 65 64 20 73 74 61 74 65 6d 65 6e 74 73 pared statements
1e40: 20 4d 65 61 73 75 72 65 20 74 68 65 20 74 6f 74 Measure the tot
1e50: 61 6c 20 6d 65 6d 6f 72 79 20 0a 20 20 23 20 20 al memory . #
1e60: 20 20 20 20 61 6e 64 20 74 68 65 20 70 72 65 70 and the prep
1e70: 61 72 65 64 20 73 74 61 74 65 6d 65 6e 74 20 6d ared statement m
1e80: 65 6d 6f 72 79 20 61 67 61 69 6e 2e 0a 20 20 23 emory again.. #
1e90: 0a 20 20 23 20 20 20 34 2e 20 52 65 70 65 61 74 . # 4. Repeat
1ea0: 20 73 74 65 70 20 32 2e 0a 20 20 23 0a 20 20 23 step 2.. #. #
1eb0: 20 20 20 35 2e 20 52 65 70 65 61 74 20 73 74 65 5. Repeat ste
1ec0: 70 20 33 2e 0a 20 20 23 0a 20 20 23 20 54 68 65 p 3.. #. # The
1ed0: 6e 20 74 65 73 74 20 74 68 61 74 3a 0a 20 20 23 n test that:. #
1ee0: 0a 20 20 23 20 20 20 61 29 20 54 68 65 20 64 69 . # a) The di
1ef0: 66 66 65 72 65 6e 63 65 20 69 6e 20 73 63 68 65 fference in sche
1f00: 6d 61 20 6d 65 6d 6f 72 79 20 71 75 61 6e 74 69 ma memory quanti
1f10: 74 69 65 73 20 69 6e 20 73 74 65 70 73 20 32 20 ties in steps 2
1f20: 61 6e 64 20 33 20 69 73 20 74 68 65 0a 20 20 23 and 3 is the. #
1f30: 20 20 20 20 20 20 73 61 6d 65 20 61 73 20 74 68 same as th
1f40: 65 20 64 69 66 66 65 72 65 6e 63 65 20 69 6e 20 e difference in
1f50: 74 6f 74 61 6c 20 6d 65 6d 6f 72 79 20 69 6e 20 total memory in
1f60: 73 74 65 70 73 20 32 20 61 6e 64 20 33 2e 0a 20 steps 2 and 3..
1f70: 20 23 0a 20 20 23 20 20 20 62 29 20 53 74 65 70 #. # b) Step
1f80: 20 34 20 72 65 70 6f 72 74 73 20 74 68 65 20 73 4 reports the s
1f90: 61 6d 65 20 61 6d 6f 75 6e 74 20 6f 66 20 73 63 ame amount of sc
1fa0: 68 65 6d 61 20 61 6e 64 20 74 6f 74 61 6c 20 6d hema and total m
1fb0: 65 6d 6f 72 79 20 75 73 65 64 20 61 73 0a 20 20 emory used as.
1fc0: 23 20 20 20 20 20 20 69 6e 20 73 74 65 70 20 32 # in step 2
1fd0: 2e 0a 20 20 23 0a 20 20 23 20 20 20 63 29 20 53 .. #. # c) S
1fe0: 74 65 70 20 35 20 72 65 70 6f 72 74 73 20 74 68 tep 5 reports th
1ff0: 65 20 73 61 6d 65 20 61 6d 6f 75 6e 74 20 6f 66 e same amount of
2000: 20 73 63 68 65 6d 61 20 61 6e 64 20 74 6f 74 61 schema and tota
2010: 6c 20 6d 65 6d 6f 72 79 20 75 73 65 64 20 61 73 l memory used as
2020: 0a 20 20 23 20 20 20 20 20 20 69 6e 20 73 74 65 . # in ste
2030: 70 20 33 2e 0a 20 20 23 0a 20 20 66 6f 72 65 61 p 3.. #. forea
2040: 63 68 20 7b 74 6e 20 73 63 68 65 6d 61 20 73 74 ch {tn schema st
2050: 61 74 65 6d 65 6e 74 73 7d 20 7b 20 0a 20 20 20 atements} { .
2060: 20 31 20 7b 20 43 52 45 41 54 45 20 54 41 42 4c 1 { CREATE TABL
2070: 45 20 74 31 28 61 2c 20 62 29 20 7d 20 7b 0a 20 E t1(a, b) } {.
2080: 20 20 20 20 20 53 45 4c 45 43 54 20 2a 20 46 52 SELECT * FR
2090: 4f 4d 20 74 31 3b 0a 20 20 20 20 20 20 49 4e 53 OM t1;. INS
20a0: 45 52 54 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 ERT INTO t1 VALU
20b0: 45 53 28 31 2c 20 32 29 3b 0a 20 20 20 20 20 20 ES(1, 2);.
20c0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53 INSERT INTO t1 S
20d0: 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 74 31 3b ELECT * FROM t1;
20e0: 0a 20 20 20 20 20 20 55 50 44 41 54 45 20 74 31 . UPDATE t1
20f0: 20 53 45 54 20 61 3d 35 3b 0a 20 20 20 20 20 20 SET a=5;.
2100: 44 45 4c 45 54 45 20 46 52 4f 4d 20 74 31 3b 0a DELETE FROM t1;.
2110: 20 20 20 20 7d 0a 20 20 20 20 32 20 7b 0a 20 20 }. 2 {.
2120: 20 20 20 20 50 52 41 47 4d 41 20 72 65 63 75 72 PRAGMA recur
2130: 73 69 76 65 5f 74 72 69 67 67 65 72 73 20 3d 20 sive_triggers =
2140: 31 3b 0a 20 20 20 20 20 20 43 52 45 41 54 45 20 1;. CREATE
2150: 54 41 42 4c 45 20 74 31 28 61 2c 20 62 29 3b 0a TABLE t1(a, b);.
2160: 20 20 20 20 20 20 43 52 45 41 54 45 20 54 52 49 CREATE TRI
2170: 47 47 45 52 20 74 72 31 20 41 46 54 45 52 20 49 GGER tr1 AFTER I
2180: 4e 53 45 52 54 20 4f 4e 20 74 31 20 57 48 45 4e NSERT ON t1 WHEN
2190: 20 28 6e 65 77 2e 61 3e 30 29 20 42 45 47 49 4e (new.a>0) BEGIN
21a0: 0a 20 20 20 20 20 20 20 20 49 4e 53 45 52 54 20 . INSERT
21b0: 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 6e INTO t1 VALUES(n
21c0: 65 77 2e 61 2d 31 2c 20 6e 65 77 2e 62 29 3b 0a ew.a-1, new.b);.
21d0: 20 20 20 20 20 20 45 4e 44 3b 0a 20 20 20 20 7d END;. }
21e0: 20 7b 0a 20 20 20 20 20 20 49 4e 53 45 52 54 20 {. INSERT
21f0: 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 35 INTO t1 VALUES(5
2200: 2c 20 27 78 27 29 3b 0a 20 20 20 20 7d 20 0a 20 , 'x');. } .
2210: 20 20 20 33 20 7b 0a 20 20 20 20 20 20 50 52 41 3 {. PRA
2220: 47 4d 41 20 72 65 63 75 72 73 69 76 65 5f 74 72 GMA recursive_tr
2230: 69 67 67 65 72 73 20 3d 20 31 3b 0a 20 20 20 20 iggers = 1;.
2240: 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 74 CREATE TABLE t
2250: 31 28 61 2c 20 62 29 3b 0a 20 20 20 20 20 20 43 1(a, b);. C
2260: 52 45 41 54 45 20 54 41 42 4c 45 20 74 32 28 61 REATE TABLE t2(a
2270: 2c 20 62 29 3b 0a 20 20 20 20 20 20 43 52 45 41 , b);. CREA
2280: 54 45 20 54 52 49 47 47 45 52 20 74 72 31 20 41 TE TRIGGER tr1 A
2290: 46 54 45 52 20 49 4e 53 45 52 54 20 4f 4e 20 74 FTER INSERT ON t
22a0: 31 20 57 48 45 4e 20 28 6e 65 77 2e 61 3e 30 29 1 WHEN (new.a>0)
22b0: 20 42 45 47 49 4e 0a 20 20 20 20 20 20 20 20 49 BEGIN. I
22c0: 4e 53 45 52 54 20 49 4e 54 4f 20 74 32 20 56 41 NSERT INTO t2 VA
22d0: 4c 55 45 53 28 6e 65 77 2e 61 2d 31 2c 20 6e 65 LUES(new.a-1, ne
22e0: 77 2e 62 29 3b 0a 20 20 20 20 20 20 45 4e 44 3b w.b);. END;
22f0: 0a 20 20 20 20 20 20 43 52 45 41 54 45 20 54 52 . CREATE TR
2300: 49 47 47 45 52 20 74 72 32 20 41 46 54 45 52 20 IGGER tr2 AFTER
2310: 49 4e 53 45 52 54 20 4f 4e 20 74 31 20 57 48 45 INSERT ON t1 WHE
2320: 4e 20 28 6e 65 77 2e 61 3e 30 29 20 42 45 47 49 N (new.a>0) BEGI
2330: 4e 0a 20 20 20 20 20 20 20 20 49 4e 53 45 52 54 N. INSERT
2340: 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 INTO t1 VALUES(
2350: 6e 65 77 2e 61 2d 31 2c 20 6e 65 77 2e 62 29 3b new.a-1, new.b);
2360: 0a 20 20 20 20 20 20 45 4e 44 3b 0a 20 20 20 20 . END;.
2370: 7d 20 7b 0a 20 20 20 20 20 20 49 4e 53 45 52 54 } {. INSERT
2380: 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 INTO t1 VALUES(
2390: 31 30 2c 20 27 78 27 29 3b 0a 20 20 20 20 7d 20 10, 'x');. }
23a0: 0a 20 20 20 20 34 20 7b 0a 20 20 20 20 20 20 43 . 4 {. C
23b0: 52 45 41 54 45 20 54 41 42 4c 45 20 74 31 28 61 REATE TABLE t1(a
23c0: 2c 20 62 29 3b 0a 20 20 20 20 7d 20 7b 0a 20 20 , b);. } {.
23d0: 20 20 20 20 53 45 4c 45 43 54 20 63 6f 75 6e 74 SELECT count
23e0: 28 2a 29 20 46 52 4f 4d 20 74 31 20 57 48 45 52 (*) FROM t1 WHER
23f0: 45 20 75 70 70 65 72 28 61 29 3d 27 41 42 43 27 E upper(a)='ABC'
2400: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 35 78 20 7b ;. }. 5x {
2410: 0a 20 20 20 20 20 20 43 52 45 41 54 45 20 54 41 . CREATE TA
2420: 42 4c 45 20 74 31 28 61 2c 20 62 20 55 4e 49 51 BLE t1(a, b UNIQ
2430: 55 45 29 3b 0a 20 20 20 20 20 20 43 52 45 41 54 UE);. CREAT
2440: 45 20 56 49 52 54 55 41 4c 20 54 41 42 4c 45 20 E VIRTUAL TABLE
2450: 74 32 20 55 53 49 4e 47 20 65 63 68 6f 28 74 31 t2 USING echo(t1
2460: 29 3b 0a 20 20 20 20 7d 20 7b 0a 20 20 20 20 20 );. } {.
2470: 20 53 45 4c 45 43 54 20 63 6f 75 6e 74 28 2a 29 SELECT count(*)
2480: 20 46 52 4f 4d 20 74 32 3b 0a 20 20 20 20 20 20 FROM t2;.
2490: 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 74 32 SELECT * FROM t2
24a0: 20 57 48 45 52 45 20 62 3e 35 3b 0a 20 20 20 20 WHERE b>5;.
24b0: 20 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 SELECT * FROM
24c0: 74 32 20 57 48 45 52 45 20 62 3d 27 61 62 63 64 t2 WHERE b='abcd
24d0: 65 66 67 27 3b 0a 20 20 20 20 7d 0a 20 20 7d 20 efg';. }. }
24e0: 7b 0a 20 20 20 20 73 65 74 20 74 6e 20 22 24 3a {. set tn "$:
24f0: 3a 6c 6f 6f 6b 61 73 69 64 65 5f 62 75 66 66 65 :lookaside_buffe
2500: 72 5f 73 69 7a 65 2d 24 74 6e 22 0a 0a 20 20 20 r_size-$tn"..
2510: 20 23 20 53 74 65 70 20 31 2e 0a 20 20 20 20 64 # Step 1.. d
2520: 62 20 63 6c 6f 73 65 0a 20 20 20 20 66 6f 72 63 b close. forc
2530: 65 64 65 6c 65 74 65 20 74 65 73 74 2e 64 62 0a edelete test.db.
2540: 20 20 20 20 73 71 6c 69 74 65 34 20 64 62 20 74 sqlite4 db t
2550: 65 73 74 2e 64 62 0a 20 20 20 20 73 71 6c 69 74 est.db. sqlit
2560: 65 34 5f 64 62 5f 63 6f 6e 66 69 67 5f 6c 6f 6f e4_db_config_loo
2570: 6b 61 73 69 64 65 20 64 62 20 30 20 24 3a 3a 6c kaside db 0 $::l
2580: 6f 6f 6b 61 73 69 64 65 5f 62 75 66 66 65 72 5f ookaside_buffer_
2590: 73 69 7a 65 20 35 30 30 0a 20 20 20 20 64 62 20 size 500. db
25a0: 63 61 63 68 65 20 73 69 7a 65 20 31 30 30 30 0a cache size 1000.
25b0: 0a 20 20 20 20 63 61 74 63 68 20 7b 20 72 65 67 . catch { reg
25c0: 69 73 74 65 72 5f 65 63 68 6f 5f 6d 6f 64 75 6c ister_echo_modul
25d0: 65 20 64 62 20 7d 0a 20 20 20 20 69 66 63 61 70 e db }. ifcap
25e0: 61 62 6c 65 20 21 76 74 61 62 20 7b 20 69 66 20 able !vtab { if
25f0: 7b 5b 73 74 72 69 6e 67 20 6d 61 74 63 68 20 2a {[string match *
2600: 78 20 24 74 6e 5d 7d 20 63 6f 6e 74 69 6e 75 65 x $tn]} continue
2610: 20 7d 0a 20 20 0a 20 20 20 20 65 78 65 63 73 71 }. . execsq
2620: 6c 20 24 73 63 68 65 6d 61 0a 20 20 20 20 64 62 l $schema. db
2630: 20 63 61 63 68 65 20 66 6c 75 73 68 0a 20 20 0a cache flush. .
2640: 20 20 20 20 23 20 53 74 65 70 20 32 2e 0a 20 20 # Step 2..
2650: 20 20 65 78 65 63 73 71 6c 20 24 73 74 61 74 65 execsql $state
2660: 6d 65 6e 74 73 0a 20 20 20 20 73 65 74 20 6e 41 ments. set nA
2670: 6c 6c 6f 63 31 20 20 5b 6c 69 6e 64 65 78 20 5b lloc1 [lindex [
2680: 73 71 6c 69 74 65 34 5f 65 6e 76 5f 73 74 61 74 sqlite4_env_stat
2690: 75 73 20 53 51 4c 49 54 45 34 5f 45 4e 56 53 54 us SQLITE4_ENVST
26a0: 41 54 55 53 5f 4d 45 4d 4f 52 59 5f 55 53 45 44 ATUS_MEMORY_USED
26b0: 20 30 5d 20 31 5d 0a 20 20 20 20 69 6e 63 72 20 0] 1]. incr
26c0: 6e 41 6c 6c 6f 63 31 20 5b 6c 6f 6f 6b 61 73 69 nAlloc1 [lookasi
26d0: 64 65 20 64 62 5d 0a 20 20 20 20 73 65 74 20 6e de db]. set n
26e0: 53 74 6d 74 31 20 20 20 5b 6c 69 6e 64 65 78 20 Stmt1 [lindex
26f0: 5b 73 71 6c 69 74 65 34 5f 64 62 5f 73 74 61 74 [sqlite4_db_stat
2700: 75 73 20 64 62 20 53 51 4c 49 54 45 34 5f 44 42 us db SQLITE4_DB
2710: 53 54 41 54 55 53 5f 53 54 4d 54 5f 55 53 45 44 STATUS_STMT_USED
2720: 20 30 5d 20 31 5d 0a 20 20 20 20 65 78 65 63 73 0] 1]. execs
2730: 71 6c 20 24 73 74 61 74 65 6d 65 6e 74 73 0a 20 ql $statements.
2740: 20 0a 20 20 20 20 23 20 53 74 65 70 20 33 2e 0a . # Step 3..
2750: 20 20 20 20 64 62 20 63 61 63 68 65 20 66 6c 75 db cache flu
2760: 73 68 0a 20 20 20 20 73 65 74 20 6e 41 6c 6c 6f sh. set nAllo
2770: 63 32 20 20 5b 6c 69 6e 64 65 78 20 5b 73 71 6c c2 [lindex [sql
2780: 69 74 65 34 5f 65 6e 76 5f 73 74 61 74 75 73 20 ite4_env_status
2790: 53 51 4c 49 54 45 34 5f 45 4e 56 53 54 41 54 55 SQLITE4_ENVSTATU
27a0: 53 5f 4d 45 4d 4f 52 59 5f 55 53 45 44 20 30 5d S_MEMORY_USED 0]
27b0: 20 31 5d 0a 20 20 20 20 69 6e 63 72 20 6e 41 6c 1]. incr nAl
27c0: 6c 6f 63 32 20 5b 6c 6f 6f 6b 61 73 69 64 65 20 loc2 [lookaside
27d0: 64 62 5d 0a 20 20 20 20 73 65 74 20 6e 53 74 6d db]. set nStm
27e0: 74 32 20 20 20 5b 6c 69 6e 64 65 78 20 5b 73 71 t2 [lindex [sq
27f0: 6c 69 74 65 34 5f 64 62 5f 73 74 61 74 75 73 20 lite4_db_status
2800: 64 62 20 53 51 4c 49 54 45 34 5f 44 42 53 54 41 db SQLITE4_DBSTA
2810: 54 55 53 5f 53 54 4d 54 5f 55 53 45 44 20 30 5d TUS_STMT_USED 0]
2820: 20 31 5d 0a 20 20 20 20 0a 20 20 20 20 23 20 53 1]. . # S
2830: 74 65 70 20 33 2e 0a 20 20 20 20 65 78 65 63 73 tep 3.. execs
2840: 71 6c 20 24 73 74 61 74 65 6d 65 6e 74 73 0a 20 ql $statements.
2850: 20 20 20 73 65 74 20 6e 41 6c 6c 6f 63 33 20 20 set nAlloc3
2860: 5b 6c 69 6e 64 65 78 20 5b 73 71 6c 69 74 65 34 [lindex [sqlite4
2870: 5f 65 6e 76 5f 73 74 61 74 75 73 20 53 51 4c 49 _env_status SQLI
2880: 54 45 34 5f 45 4e 56 53 54 41 54 55 53 5f 4d 45 TE4_ENVSTATUS_ME
2890: 4d 4f 52 59 5f 55 53 45 44 20 30 5d 20 31 5d 0a MORY_USED 0] 1].
28a0: 20 20 20 20 69 6e 63 72 20 6e 41 6c 6c 6f 63 33 incr nAlloc3
28b0: 20 5b 6c 6f 6f 6b 61 73 69 64 65 20 64 62 5d 0a [lookaside db].
28c0: 20 20 20 20 73 65 74 20 6e 53 74 6d 74 33 20 20 set nStmt3
28d0: 20 5b 6c 69 6e 64 65 78 20 5b 73 71 6c 69 74 65 [lindex [sqlite
28e0: 34 5f 64 62 5f 73 74 61 74 75 73 20 64 62 20 53 4_db_status db S
28f0: 51 4c 49 54 45 34 5f 44 42 53 54 41 54 55 53 5f QLITE4_DBSTATUS_
2900: 53 54 4d 54 5f 55 53 45 44 20 30 5d 20 31 5d 0a STMT_USED 0] 1].
2910: 20 20 20 20 65 78 65 63 73 71 6c 20 24 73 74 61 execsql $sta
2920: 74 65 6d 65 6e 74 73 0a 20 20 0a 20 20 20 20 23 tements. . #
2930: 20 53 74 65 70 20 34 2e 0a 20 20 20 20 64 62 20 Step 4.. db
2940: 63 61 63 68 65 20 66 6c 75 73 68 0a 20 20 20 20 cache flush.
2950: 73 65 74 20 6e 41 6c 6c 6f 63 34 20 20 5b 6c 69 set nAlloc4 [li
2960: 6e 64 65 78 20 5b 73 71 6c 69 74 65 34 5f 65 6e ndex [sqlite4_en
2970: 76 5f 73 74 61 74 75 73 20 53 51 4c 49 54 45 34 v_status SQLITE4
2980: 5f 45 4e 56 53 54 41 54 55 53 5f 4d 45 4d 4f 52 _ENVSTATUS_MEMOR
2990: 59 5f 55 53 45 44 20 30 5d 20 31 5d 0a 20 20 20 Y_USED 0] 1].
29a0: 20 69 6e 63 72 20 6e 41 6c 6c 6f 63 34 20 5b 6c incr nAlloc4 [l
29b0: 6f 6f 6b 61 73 69 64 65 20 64 62 5d 0a 20 20 20 ookaside db].
29c0: 20 73 65 74 20 6e 53 74 6d 74 34 20 5b 6c 69 6e set nStmt4 [lin
29d0: 64 65 78 20 5b 73 71 6c 69 74 65 34 5f 64 62 5f dex [sqlite4_db_
29e0: 73 74 61 74 75 73 20 64 62 20 53 51 4c 49 54 45 status db SQLITE
29f0: 34 5f 44 42 53 54 41 54 55 53 5f 53 54 4d 54 5f 4_DBSTATUS_STMT_
2a00: 55 53 45 44 20 30 5d 20 31 5d 0a 20 20 0a 20 20 USED 0] 1]. .
2a10: 20 20 73 65 74 20 6e 46 72 65 65 20 5b 65 78 70 set nFree [exp
2a20: 72 20 7b 24 6e 41 6c 6c 6f 63 31 2d 24 6e 41 6c r {$nAlloc1-$nAl
2a30: 6c 6f 63 32 7d 5d 0a 0a 20 20 20 20 64 6f 5f 74 loc2}].. do_t
2a40: 65 73 74 20 64 62 73 74 61 74 75 73 2d 33 2e 24 est dbstatus-3.$
2a50: 74 6e 2e 61 20 7b 20 65 78 70 72 20 24 6e 53 74 tn.a { expr $nSt
2a60: 6d 74 32 20 7d 20 7b 30 7d 0a 0a 20 20 20 20 23 mt2 } {0}.. #
2a70: 20 54 65 73 74 73 20 66 6f 72 20 77 68 69 63 68 Tests for which
2a80: 20 74 68 65 20 74 65 73 74 20 6e 61 6d 65 20 65 the test name e
2a90: 6e 64 73 20 69 6e 20 61 6e 20 22 78 22 20 72 65 nds in an "x" re
2aa0: 70 6f 72 74 20 73 6c 69 67 68 74 6c 79 20 6c 65 port slightly le
2ab0: 73 73 0a 20 20 20 20 23 20 6d 65 6d 6f 72 79 20 ss. # memory
2ac0: 74 68 61 6e 20 69 73 20 61 63 74 75 61 6c 6c 79 than is actually
2ad0: 20 66 72 65 65 64 20 77 68 65 6e 20 61 6c 6c 20 freed when all
2ae0: 73 74 61 74 65 6d 65 6e 74 73 20 61 72 65 20 66 statements are f
2af0: 69 6e 61 6c 69 7a 65 64 2e 0a 20 20 20 20 23 20 inalized.. #
2b00: 54 68 69 73 20 69 73 20 62 65 63 61 75 73 65 20 This is because
2b10: 61 20 73 6d 61 6c 6c 20 61 6d 6f 75 6e 74 20 6f a small amount o
2b20: 66 20 6d 65 6d 6f 72 79 20 61 6c 6c 6f 63 61 74 f memory allocat
2b30: 65 64 20 62 79 20 61 20 76 69 72 74 75 61 6c 20 ed by a virtual
2b40: 74 61 62 6c 65 0a 20 20 20 20 23 20 69 6d 70 6c table. # impl
2b50: 65 6d 65 6e 74 61 74 69 6f 6e 20 75 73 69 6e 67 ementation using
2b60: 20 73 71 6c 69 74 65 34 5f 6d 70 72 69 6e 74 66 sqlite4_mprintf
2b70: 28 29 20 69 73 20 74 65 63 68 6e 69 63 61 6c 6c () is technicall
2b80: 79 20 63 6f 6e 73 69 64 65 72 65 64 0a 20 20 20 y considered.
2b90: 20 23 20 65 78 74 65 72 6e 61 6c 20 61 6e 64 20 # external and
2ba0: 73 6f 20 69 73 20 6e 6f 74 20 63 6f 75 6e 74 65 so is not counte
2bb0: 64 20 61 73 20 22 73 74 61 74 65 6d 65 6e 74 20 d as "statement
2bc0: 6d 65 6d 6f 72 79 22 2e 0a 20 20 20 20 23 0a 23 memory".. #.#
2bd0: 70 75 74 73 20 22 24 6e 53 74 6d 74 31 20 24 6e puts "$nStmt1 $n
2be0: 46 72 65 65 22 0a 20 20 20 20 69 66 20 7b 5b 73 Free". if {[s
2bf0: 74 72 69 6e 67 20 6d 61 74 63 68 20 2a 78 20 24 tring match *x $
2c00: 74 6e 5d 7d 20 7b 0a 20 20 20 20 20 20 64 6f 5f tn]} {. do_
2c10: 74 65 73 74 20 64 62 73 74 61 74 75 73 2d 33 2e test dbstatus-3.
2c20: 24 74 6e 2e 62 78 20 7b 20 65 78 70 72 20 24 6e $tn.bx { expr $n
2c30: 53 74 6d 74 31 3c 3d 24 6e 46 72 65 65 20 7d 20 Stmt1<=$nFree }
2c40: 20 7b 31 7d 0a 20 20 20 20 7d 20 65 6c 73 65 20 {1}. } else
2c50: 7b 0a 20 20 20 20 20 20 64 6f 5f 74 65 73 74 20 {. do_test
2c60: 64 62 73 74 61 74 75 73 2d 33 2e 24 74 6e 2e 62 dbstatus-3.$tn.b
2c70: 20 7b 20 65 78 70 72 20 24 6e 53 74 6d 74 31 3d { expr $nStmt1=
2c80: 3d 24 6e 46 72 65 65 20 7d 20 7b 31 7d 0a 20 20 =$nFree } {1}.
2c90: 20 20 7d 0a 0a 20 20 20 20 64 6f 5f 74 65 73 74 }.. do_test
2ca0: 20 64 62 73 74 61 74 75 73 2d 33 2e 24 74 6e 2e dbstatus-3.$tn.
2cb0: 63 20 7b 20 6c 69 73 74 20 24 6e 41 6c 6c 6f 63 c { list $nAlloc
2cc0: 31 20 24 6e 53 74 6d 74 31 20 7d 20 5b 6c 69 73 1 $nStmt1 } [lis
2cd0: 74 20 24 6e 41 6c 6c 6f 63 33 20 24 6e 53 74 6d t $nAlloc3 $nStm
2ce0: 74 33 5d 0a 20 20 20 20 64 6f 5f 74 65 73 74 20 t3]. do_test
2cf0: 64 62 73 74 61 74 75 73 2d 33 2e 24 74 6e 2e 64 dbstatus-3.$tn.d
2d00: 20 7b 20 6c 69 73 74 20 24 6e 41 6c 6c 6f 63 32 { list $nAlloc2
2d10: 20 24 6e 53 74 6d 74 32 20 7d 20 5b 6c 69 73 74 $nStmt2 } [list
2d20: 20 24 6e 41 6c 6c 6f 63 34 20 24 6e 53 74 6d 74 $nAlloc4 $nStmt
2d30: 34 5d 0a 20 20 7d 0a 7d 0a 0a 66 69 6e 69 73 68 4]. }.}..finish
2d40: 5f 74 65 73 74 0a _test.