/ Hex Artifact Content
Login

Artifact a591be066ebc6ad34adaa4b38939a037a59ebd80ad681e79dedac7b4a9e7bc09:


0000: 23 20 32 30 30 35 20 4e 6f 76 65 6d 62 65 72 20  # 2005 November 
0010: 33 30 0a 23 0a 23 20 54 68 65 20 61 75 74 68 6f  30.#.# The autho
0020: 72 20 64 69 73 63 6c 61 69 6d 73 20 63 6f 70 79  r disclaims copy
0030: 72 69 67 68 74 20 74 6f 20 74 68 69 73 20 73 6f  right to this so
0040: 75 72 63 65 20 63 6f 64 65 2e 20 20 49 6e 20 70  urce code.  In p
0050: 6c 61 63 65 20 6f 66 0a 23 20 61 20 6c 65 67 61  lace of.# a lega
0060: 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72 65 20 69  l notice, here i
0070: 73 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a 23 0a  s a blessing:.#.
0080: 23 20 20 20 20 4d 61 79 20 79 6f 75 20 64 6f 20  #    May you do 
0090: 67 6f 6f 64 20 61 6e 64 20 6e 6f 74 20 65 76 69  good and not evi
00a0: 6c 2e 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20  l..#    May you 
00b0: 66 69 6e 64 20 66 6f 72 67 69 76 65 6e 65 73 73  find forgiveness
00c0: 20 66 6f 72 20 79 6f 75 72 73 65 6c 66 20 61 6e   for yourself an
00d0: 64 20 66 6f 72 67 69 76 65 20 6f 74 68 65 72 73  d forgive others
00e0: 2e 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20 73  ..#    May you s
00f0: 68 61 72 65 20 66 72 65 65 6c 79 2c 20 6e 65 76  hare freely, nev
0100: 65 72 20 74 61 6b 69 6e 67 20 6d 6f 72 65 20 74  er taking more t
0110: 68 61 6e 20 79 6f 75 20 67 69 76 65 2e 0a 23 0a  han you give..#.
0120: 23 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  #***************
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 0a 23 0a 23 20 54 68 69  ********.#.# Thi
0170: 73 20 66 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20  s file contains 
0180: 74 65 73 74 20 63 61 73 65 73 20 66 6f 63 75 73  test cases focus
0190: 65 64 20 6f 6e 20 74 68 65 20 74 77 6f 20 6d 65  ed on the two me
01a0: 6d 6f 72 79 2d 6d 61 6e 61 67 65 6d 65 6e 74 20  mory-management 
01b0: 41 50 49 73 2c 20 0a 23 20 73 71 6c 69 74 65 33  APIs, .# sqlite3
01c0: 5f 73 6f 66 74 5f 68 65 61 70 5f 6c 69 6d 69 74  _soft_heap_limit
01d0: 28 29 20 61 6e 64 20 73 71 6c 69 74 65 33 5f 72  () and sqlite3_r
01e0: 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 28 29 2e  elease_memory().
01f0: 0a 23 0a 23 20 50 72 69 6f 72 20 74 6f 20 76 65  .#.# Prior to ve
0200: 72 73 69 6f 6e 20 33 2e 36 2e 32 2c 20 63 61 6c  rsion 3.6.2, cal
0210: 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 72 65 6c  ling sqlite3_rel
0220: 65 61 73 65 5f 6d 65 6d 6f 72 79 28 29 20 6f 72  ease_memory() or
0230: 20 65 78 63 65 65 64 69 6e 67 0a 23 20 74 68 65   exceeding.# the
0240: 20 63 6f 6e 66 69 67 75 72 65 64 20 73 6f 66 74   configured soft
0250: 20 68 65 61 70 20 6c 69 6d 69 74 20 63 6f 75 6c   heap limit coul
0260: 64 20 63 61 75 73 65 20 73 71 6c 69 74 65 20 74  d cause sqlite t
0270: 6f 20 75 70 67 72 61 64 65 20 64 61 74 61 62 61  o upgrade databa
0280: 73 65 20 0a 23 20 6c 6f 63 6b 73 20 61 6e 64 20  se .# locks and 
0290: 66 6c 75 73 68 20 64 69 72 74 79 20 70 61 67 65  flush dirty page
02a0: 73 20 74 6f 20 74 68 65 20 66 69 6c 65 20 73 79  s to the file sy
02b0: 73 74 65 6d 2e 20 41 73 20 6f 66 20 33 2e 36 2e  stem. As of 3.6.
02c0: 32 2c 20 74 68 69 73 20 69 73 0a 23 20 6e 6f 20  2, this is.# no 
02d0: 6c 6f 6e 67 65 72 20 74 68 65 20 63 61 73 65 2e  longer the case.
02e0: 20 49 6e 20 76 65 72 73 69 6f 6e 20 33 2e 36 2e   In version 3.6.
02f0: 32 2c 20 73 71 6c 69 74 65 33 5f 72 65 6c 65 61  2, sqlite3_relea
0300: 73 65 5f 6d 65 6d 6f 72 79 28 29 20 6f 6e 6c 79  se_memory() only
0310: 0a 23 20 72 65 63 6c 61 69 6d 73 20 63 6c 65 61  .# reclaims clea
0320: 6e 20 70 61 67 65 73 2e 20 54 68 69 73 20 74 65  n pages. This te
0330: 73 74 20 66 69 6c 65 20 68 61 73 20 62 65 65 6e  st file has been
0340: 20 75 70 64 61 74 65 64 20 61 63 63 6f 72 64 69   updated accordi
0350: 6e 67 6c 79 2e 0a 23 0a 23 20 24 49 64 3a 20 6d  ngly..#.# $Id: m
0360: 61 6c 6c 6f 63 35 2e 74 65 73 74 2c 76 20 31 2e  alloc5.test,v 1.
0370: 32 32 20 32 30 30 39 2f 30 34 2f 31 31 20 31 39  22 2009/04/11 19
0380: 3a 30 39 3a 35 34 20 64 72 68 20 45 78 70 20 24  :09:54 drh Exp $
0390: 0a 0a 73 65 74 20 74 65 73 74 64 69 72 20 5b 66  ..set testdir [f
03a0: 69 6c 65 20 64 69 72 6e 61 6d 65 20 24 61 72 67  ile dirname $arg
03b0: 76 30 5d 0a 73 6f 75 72 63 65 20 24 74 65 73 74  v0].source $test
03c0: 64 69 72 2f 74 65 73 74 65 72 2e 74 63 6c 0a 73  dir/tester.tcl.s
03d0: 6f 75 72 63 65 20 24 74 65 73 74 64 69 72 2f 6d  ource $testdir/m
03e0: 61 6c 6c 6f 63 5f 63 6f 6d 6d 6f 6e 2e 74 63 6c  alloc_common.tcl
03f0: 0a 64 62 20 63 6c 6f 73 65 0a 0a 23 20 4f 6e 6c  .db close..# Onl
0400: 79 20 72 75 6e 20 74 68 65 73 65 20 74 65 73 74  y run these test
0410: 73 20 69 66 20 6d 65 6d 6f 72 79 20 64 65 62 75  s if memory debu
0420: 67 67 69 6e 67 20 69 73 20 74 75 72 6e 65 64 20  gging is turned 
0430: 6f 6e 2e 0a 23 0a 69 66 20 7b 21 24 4d 45 4d 44  on..#.if {!$MEMD
0440: 45 42 55 47 7d 20 7b 0a 20 20 20 70 75 74 73 20  EBUG} {.   puts 
0450: 22 53 6b 69 70 70 69 6e 67 20 6d 61 6c 6c 6f 63  "Skipping malloc
0460: 35 20 74 65 73 74 73 3a 20 6e 6f 74 20 63 6f 6d  5 tests: not com
0470: 70 69 6c 65 64 20 77 69 74 68 20 2d 44 53 51 4c  piled with -DSQL
0480: 49 54 45 5f 4d 45 4d 44 45 42 55 47 2e 2e 2e 22  ITE_MEMDEBUG..."
0490: 0a 20 20 20 66 69 6e 69 73 68 5f 74 65 73 74 0a  .   finish_test.
04a0: 20 20 20 72 65 74 75 72 6e 0a 7d 0a 0a 23 20 53     return.}..# S
04b0: 6b 69 70 20 74 68 65 73 65 20 74 65 73 74 73 20  kip these tests 
04c0: 69 66 20 4f 4d 49 54 5f 4d 45 4d 4f 52 59 5f 4d  if OMIT_MEMORY_M
04d0: 41 4e 41 47 45 4d 45 4e 54 20 77 61 73 20 64 65  ANAGEMENT was de
04e0: 66 69 6e 65 64 20 61 74 20 63 6f 6d 70 69 6c 65  fined at compile
04f0: 20 74 69 6d 65 2e 0a 69 66 63 61 70 61 62 6c 65   time..ifcapable
0500: 20 21 6d 65 6d 6f 72 79 6d 61 6e 61 67 65 20 7b   !memorymanage {
0510: 0a 20 20 20 66 69 6e 69 73 68 5f 74 65 73 74 0a  .   finish_test.
0520: 20 20 20 72 65 74 75 72 6e 0a 7d 0a 0a 23 20 54     return.}..# T
0530: 68 65 20 73 69 7a 65 73 20 6f 66 20 6d 65 6d 6f  he sizes of memo
0540: 72 79 20 61 6c 6c 6f 63 61 74 69 6f 6e 73 20 66  ry allocations f
0550: 72 6f 6d 20 73 79 73 74 65 6d 20 6d 61 6c 6c 6f  rom system mallo
0560: 63 28 29 20 6d 69 67 68 74 20 76 61 72 79 2c 0a  c() might vary,.
0570: 23 20 64 65 70 65 6e 64 69 6e 67 20 6f 6e 20 74  # depending on t
0580: 68 65 20 6d 65 6d 6f 72 79 20 61 6c 6c 6f 63 61  he memory alloca
0590: 74 6f 72 20 61 6c 67 6f 72 69 74 68 6d 73 20 75  tor algorithms u
05a0: 73 65 64 2e 20 20 54 68 65 20 66 6f 6c 6c 6f 77  sed.  The follow
05b0: 69 6e 67 0a 23 20 72 6f 75 74 69 6e 65 20 69 73  ing.# routine is
05c0: 20 64 65 73 69 67 6e 65 64 20 74 6f 20 73 75 70   designed to sup
05d0: 70 6f 72 74 20 61 6e 73 77 65 72 73 20 74 68 61  port answers tha
05e0: 74 20 66 61 6c 6c 20 77 69 74 68 69 6e 20 61 20  t fall within a 
05f0: 72 61 6e 67 65 0a 23 20 6f 66 20 76 61 6c 75 65  range.# of value
0600: 73 20 77 68 69 6c 65 20 61 6c 73 6f 20 73 75 70  s while also sup
0610: 70 6c 79 69 6e 67 20 65 61 73 79 2d 74 6f 2d 75  plying easy-to-u
0620: 6e 64 65 72 73 74 61 6e 64 20 22 65 78 70 65 63  nderstand "expec
0630: 74 65 64 22 20 76 61 6c 75 65 73 0a 23 20 77 68  ted" values.# wh
0640: 65 6e 20 65 72 72 6f 72 73 20 6f 63 63 75 72 2e  en errors occur.
0650: 0a 23 0a 70 72 6f 63 20 76 61 6c 75 65 5f 69 6e  .#.proc value_in
0660: 5f 72 61 6e 67 65 20 7b 74 61 72 67 65 74 20 78  _range {target x
0670: 20 61 72 67 73 7d 20 7b 0a 20 20 73 65 74 20 76   args} {.  set v
0680: 20 5b 6c 69 6e 64 65 78 20 24 61 72 67 73 20 30   [lindex $args 0
0690: 5d 0a 20 20 69 66 20 7b 24 76 21 3d 22 22 7d 20  ].  if {$v!=""} 
06a0: 7b 0a 20 20 20 20 69 66 20 7b 24 76 3c 24 74 61  {.    if {$v<$ta
06b0: 72 67 65 74 2a 24 78 7d 20 7b 72 65 74 75 72 6e  rget*$x} {return
06c0: 20 24 76 7d 0a 20 20 20 20 69 66 20 7b 24 76 3e   $v}.    if {$v>
06d0: 24 74 61 72 67 65 74 2f 24 78 7d 20 7b 72 65 74  $target/$x} {ret
06e0: 75 72 6e 20 24 76 7d 0a 20 20 7d 0a 20 20 72 65  urn $v}.  }.  re
06f0: 74 75 72 6e 20 22 6e 75 6d 62 65 72 20 62 65 74  turn "number bet
0700: 77 65 65 6e 20 5b 65 78 70 72 20 7b 69 6e 74 28  ween [expr {int(
0710: 24 74 61 72 67 65 74 2a 24 78 29 7d 5d 20 61 6e  $target*$x)}] an
0720: 64 20 5b 65 78 70 72 20 7b 69 6e 74 28 24 74 61  d [expr {int($ta
0730: 72 67 65 74 2f 24 78 29 7d 5d 22 0a 7d 0a 73 65  rget/$x)}]".}.se
0740: 74 20 6d 72 61 6e 67 65 20 30 2e 39 38 20 20 20  t mrange 0.98   
0750: 3b 23 20 20 70 6c 75 73 20 6f 72 20 6d 69 6e 75  ;#  plus or minu
0760: 73 20 32 25 0a 0a 74 65 73 74 5f 73 65 74 5f 63  s 2%..test_set_c
0770: 6f 6e 66 69 67 5f 70 61 67 65 63 61 63 68 65 20  onfig_pagecache 
0780: 30 20 31 30 30 0a 0a 73 71 6c 69 74 65 33 5f 73  0 100..sqlite3_s
0790: 6f 66 74 5f 68 65 61 70 5f 6c 69 6d 69 74 20 30  oft_heap_limit 0
07a0: 0a 73 71 6c 69 74 65 33 20 64 62 20 74 65 73 74  .sqlite3 db test
07b0: 2e 64 62 0a 23 20 64 62 20 65 76 61 6c 20 7b 50  .db.# db eval {P
07c0: 52 41 47 4d 41 20 63 61 63 68 65 5f 73 69 7a 65  RAGMA cache_size
07d0: 3d 31 7d 0a 0a 64 6f 5f 74 65 73 74 20 6d 61 6c  =1}..do_test mal
07e0: 6c 6f 63 35 2d 31 2e 31 20 7b 0a 20 20 23 20 53  loc5-1.1 {.  # S
07f0: 69 6d 70 6c 65 73 74 20 70 6f 73 73 69 62 6c 65  implest possible
0800: 20 74 65 73 74 2e 20 43 61 6c 6c 20 73 71 6c 69   test. Call sqli
0810: 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f  te3_release_memo
0820: 72 79 20 77 68 65 6e 20 74 68 65 72 65 20 69 73  ry when there is
0830: 20 65 78 61 63 74 6c 79 0a 20 20 23 20 6f 6e 65   exactly.  # one
0840: 20 75 6e 75 73 65 64 20 70 61 67 65 20 69 6e 20   unused page in 
0850: 61 20 73 69 6e 67 6c 65 20 70 61 67 65 72 20 63  a single pager c
0860: 61 63 68 65 2e 20 54 68 65 20 70 61 67 65 20 63  ache. The page c
0870: 61 6e 6e 6f 74 20 62 65 20 66 72 65 65 64 2c 20  annot be freed, 
0880: 61 73 0a 20 20 23 20 69 74 20 69 73 20 64 69 72  as.  # it is dir
0890: 74 79 2e 20 53 6f 20 73 71 6c 69 74 65 33 5f 72  ty. So sqlite3_r
08a0: 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 28 29 20  elease_memory() 
08b0: 72 65 74 75 72 6e 73 20 30 2e 0a 20 20 23 0a 20  returns 0..  #. 
08c0: 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 50   execsql {.    P
08d0: 52 41 47 4d 41 20 61 75 74 6f 5f 76 61 63 75 75  RAGMA auto_vacuu
08e0: 6d 3d 4f 46 46 3b 0a 20 20 20 20 42 45 47 49 4e  m=OFF;.    BEGIN
08f0: 3b 0a 20 20 20 20 43 52 45 41 54 45 20 54 41 42  ;.    CREATE TAB
0900: 4c 45 20 61 62 63 28 61 2c 20 62 2c 20 63 29 3b  LE abc(a, b, c);
0910: 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72  .  }.  sqlite3_r
0920: 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 0a 7d 20  elease_memory.} 
0930: 7b 30 7d 0a 0a 64 6f 5f 74 65 73 74 20 6d 61 6c  {0}..do_test mal
0940: 6c 6f 63 35 2d 31 2e 32 20 7b 0a 20 20 23 20 54  loc5-1.2 {.  # T
0950: 65 73 74 20 74 68 61 74 20 74 68 65 20 74 72 61  est that the tra
0960: 6e 73 61 63 74 69 6f 6e 20 73 74 61 72 74 65 64  nsaction started
0970: 20 69 6e 20 74 68 65 20 61 62 6f 76 65 20 74 65   in the above te
0980: 73 74 20 69 73 20 73 74 69 6c 6c 20 61 63 74 69  st is still acti
0990: 76 65 2e 0a 20 20 23 20 54 68 65 20 6c 6f 63 6b  ve..  # The lock
09a0: 20 6f 6e 20 74 68 65 20 64 61 74 61 62 61 73 65   on the database
09b0: 20 66 69 6c 65 20 73 68 6f 75 6c 64 20 6e 6f 74   file should not
09c0: 20 68 61 76 65 20 62 65 65 6e 20 75 70 67 72 61   have been upgra
09d0: 64 65 64 20 28 74 68 69 73 20 77 61 73 0a 20 20  ded (this was.  
09e0: 23 20 6e 6f 74 20 74 68 65 20 63 61 73 65 20 62  # not the case b
09f0: 65 66 6f 72 65 20 76 65 72 73 69 6f 6e 20 33 2e  efore version 3.
0a00: 36 2e 32 29 2e 0a 20 20 23 0a 20 20 73 71 6c 69  6.2)..  #.  sqli
0a10: 74 65 33 20 64 62 32 20 74 65 73 74 2e 64 62 0a  te3 db2 test.db.
0a20: 20 20 65 78 65 63 73 71 6c 20 7b 50 52 41 47 4d    execsql {PRAGM
0a30: 41 20 63 61 63 68 65 5f 73 69 7a 65 3d 32 3b 20  A cache_size=2; 
0a40: 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 73 71  SELECT * FROM sq
0a50: 6c 69 74 65 5f 6d 61 73 74 65 72 20 7d 20 64 62  lite_master } db
0a60: 32 0a 7d 20 7b 7d 0a 64 6f 5f 74 65 73 74 20 6d  2.} {}.do_test m
0a70: 61 6c 6c 6f 63 35 2d 31 2e 33 20 7b 0a 20 20 23  alloc5-1.3 {.  #
0a80: 20 43 61 6c 6c 20 5b 73 71 6c 69 74 65 33 5f 72   Call [sqlite3_r
0a90: 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 5d 20 77  elease_memory] w
0aa0: 68 65 6e 20 74 68 65 72 65 20 69 73 20 65 78 61  hen there is exa
0ab0: 63 74 6c 79 20 6f 6e 65 20 75 6e 75 73 65 64 20  ctly one unused 
0ac0: 70 61 67 65 20 0a 20 20 23 20 69 6e 20 74 68 65  page .  # in the
0ad0: 20 63 61 63 68 65 20 62 65 6c 6f 6e 67 69 6e 67   cache belonging
0ae0: 20 74 6f 20 64 62 32 2e 0a 20 20 23 0a 20 20 73   to db2..  #.  s
0af0: 65 74 20 3a 3a 70 67 61 6c 6c 6f 63 20 5b 73 71  et ::pgalloc [sq
0b00: 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65  lite3_release_me
0b10: 6d 6f 72 79 5d 0a 20 20 76 61 6c 75 65 5f 69 6e  mory].  value_in
0b20: 5f 72 61 6e 67 65 20 31 32 38 38 20 30 2e 37 35  _range 1288 0.75
0b30: 0a 7d 20 5b 76 61 6c 75 65 5f 69 6e 5f 72 61 6e  .} [value_in_ran
0b40: 67 65 20 31 32 38 38 20 30 2e 37 35 5d 0a 0a 64  ge 1288 0.75]..d
0b50: 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 31  o_test malloc5-1
0b60: 2e 34 20 7b 0a 20 20 23 20 43 6f 6d 6d 69 74 20  .4 {.  # Commit 
0b70: 74 68 65 20 74 72 61 6e 73 61 63 74 69 6f 6e 20  the transaction 
0b80: 61 6e 64 20 6f 70 65 6e 20 61 20 6e 65 77 20 6f  and open a new o
0b90: 6e 65 2e 20 52 65 61 64 20 31 20 70 61 67 65 20  ne. Read 1 page 
0ba0: 69 6e 74 6f 20 74 68 65 20 63 61 63 68 65 2e 0a  into the cache..
0bb0: 20 20 23 20 42 65 63 61 75 73 65 20 74 68 65 20    # Because the 
0bc0: 70 61 67 65 20 69 73 20 6e 6f 74 20 64 69 72 74  page is not dirt
0bd0: 79 2c 20 69 74 20 69 73 20 65 6c 69 67 69 62 6c  y, it is eligibl
0be0: 65 20 66 6f 72 20 63 6f 6c 6c 65 63 74 69 6f 6e  e for collection
0bf0: 20 65 76 65 6e 0a 20 20 23 20 62 65 66 6f 72 65   even.  # before
0c00: 20 74 68 65 20 74 72 61 6e 73 61 63 74 69 6f 6e   the transaction
0c10: 20 69 73 20 63 6f 6e 63 6c 75 64 65 64 2e 0a 20   is concluded.. 
0c20: 20 23 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20   #.  execsql {. 
0c30: 20 20 20 43 4f 4d 4d 49 54 3b 0a 20 20 20 20 42     COMMIT;.    B
0c40: 45 47 49 4e 3b 0a 20 20 20 20 53 45 4c 45 43 54  EGIN;.    SELECT
0c50: 20 2a 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 7d   * FROM abc;.  }
0c60: 0a 20 20 76 61 6c 75 65 5f 69 6e 5f 72 61 6e 67  .  value_in_rang
0c70: 65 20 24 3a 3a 70 67 61 6c 6c 6f 63 20 24 3a 3a  e $::pgalloc $::
0c80: 6d 72 61 6e 67 65 20 5b 73 71 6c 69 74 65 33 5f  mrange [sqlite3_
0c90: 72 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 5d 0a  release_memory].
0ca0: 7d 20 5b 76 61 6c 75 65 5f 69 6e 5f 72 61 6e 67  } [value_in_rang
0cb0: 65 20 24 3a 3a 70 67 61 6c 6c 6f 63 20 24 3a 3a  e $::pgalloc $::
0cc0: 6d 72 61 6e 67 65 5d 0a 0a 64 6f 5f 74 65 73 74  mrange]..do_test
0cd0: 20 6d 61 6c 6c 6f 63 35 2d 31 2e 35 20 7b 0a 20   malloc5-1.5 {. 
0ce0: 20 23 20 43 6f 6e 63 6c 75 64 65 20 74 68 65 20   # Conclude the 
0cf0: 74 72 61 6e 73 61 63 74 69 6f 6e 20 6f 70 65 6e  transaction open
0d00: 65 64 20 69 6e 20 74 68 65 20 70 72 65 76 69 6f  ed in the previo
0d10: 75 73 20 5b 64 6f 5f 74 65 73 74 5d 20 62 6c 6f  us [do_test] blo
0d20: 63 6b 2e 20 54 68 69 73 0a 20 20 23 20 63 61 75  ck. This.  # cau
0d30: 73 65 73 20 61 6e 6f 74 68 65 72 20 70 61 67 65  ses another page
0d40: 20 28 70 61 67 65 20 31 29 20 74 6f 20 62 65 63   (page 1) to bec
0d50: 6f 6d 65 20 65 6c 69 67 69 62 6c 65 20 66 6f 72  ome eligible for
0d60: 20 72 65 63 79 63 6c 69 6e 67 2e 0a 20 20 23 0a   recycling..  #.
0d70: 20 20 65 78 65 63 73 71 6c 20 7b 20 43 4f 4d 4d    execsql { COMM
0d80: 49 54 20 7d 0a 20 20 76 61 6c 75 65 5f 69 6e 5f  IT }.  value_in_
0d90: 72 61 6e 67 65 20 24 3a 3a 70 67 61 6c 6c 6f 63  range $::pgalloc
0da0: 20 24 3a 3a 6d 72 61 6e 67 65 20 5b 73 71 6c 69   $::mrange [sqli
0db0: 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f  te3_release_memo
0dc0: 72 79 5d 0a 7d 20 5b 76 61 6c 75 65 5f 69 6e 5f  ry].} [value_in_
0dd0: 72 61 6e 67 65 20 24 3a 3a 70 67 61 6c 6c 6f 63  range $::pgalloc
0de0: 20 24 3a 3a 6d 72 61 6e 67 65 5d 0a 0a 64 6f 5f   $::mrange]..do_
0df0: 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 31 2e 36  test malloc5-1.6
0e00: 20 7b 0a 20 20 23 20 4d 61 6e 69 70 75 6c 61 74   {.  # Manipulat
0e10: 65 20 74 68 65 20 63 61 63 68 65 20 73 6f 20 74  e the cache so t
0e20: 68 61 74 20 69 74 20 63 6f 6e 74 61 69 6e 73 20  hat it contains 
0e30: 74 77 6f 20 75 6e 75 73 65 64 20 70 61 67 65 73  two unused pages
0e40: 2e 20 4f 6e 65 20 72 65 71 75 69 72 65 73 20 0a  . One requires .
0e50: 20 20 23 20 61 20 6a 6f 75 72 6e 61 6c 2d 73 79    # a journal-sy
0e60: 6e 63 20 74 6f 20 66 72 65 65 2c 20 74 68 65 20  nc to free, the 
0e70: 6f 74 68 65 72 20 64 6f 65 73 20 6e 6f 74 2e 0a  other does not..
0e80: 20 20 64 62 32 20 63 6c 6f 73 65 0a 20 20 65 78    db2 close.  ex
0e90: 65 63 73 71 6c 20 7b 0a 20 20 20 20 42 45 47 49  ecsql {.    BEGI
0ea0: 4e 3b 0a 20 20 20 20 43 52 45 41 54 45 20 54 41  N;.    CREATE TA
0eb0: 42 4c 45 20 64 65 66 28 64 2c 20 65 2c 20 66 29  BLE def(d, e, f)
0ec0: 3b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a 20 46  ;.    SELECT * F
0ed0: 52 4f 4d 20 61 62 63 3b 0a 20 20 7d 0a 20 20 62  ROM abc;.  }.  b
0ee0: 72 65 61 6b 70 6f 69 6e 74 0a 20 20 76 61 6c 75  reakpoint.  valu
0ef0: 65 5f 69 6e 5f 72 61 6e 67 65 20 24 3a 3a 70 67  e_in_range $::pg
0f00: 61 6c 6c 6f 63 20 24 3a 3a 6d 72 61 6e 67 65 20  alloc $::mrange 
0f10: 5b 73 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65  [sqlite3_release
0f20: 5f 6d 65 6d 6f 72 79 20 35 30 30 5d 0a 7d 20 5b  _memory 500].} [
0f30: 76 61 6c 75 65 5f 69 6e 5f 72 61 6e 67 65 20 24  value_in_range $
0f40: 3a 3a 70 67 61 6c 6c 6f 63 20 24 3a 3a 6d 72 61  ::pgalloc $::mra
0f50: 6e 67 65 5d 0a 64 6f 5f 74 65 73 74 20 6d 61 6c  nge].do_test mal
0f60: 6c 6f 63 35 2d 31 2e 37 20 7b 0a 20 20 23 20 44  loc5-1.7 {.  # D
0f70: 61 74 61 62 61 73 65 20 73 68 6f 75 6c 64 20 6e  atabase should n
0f80: 6f 74 20 62 65 20 6c 6f 63 6b 65 64 20 74 68 69  ot be locked thi
0f90: 73 20 74 69 6d 65 2e 20 0a 20 20 73 71 6c 69 74  s time. .  sqlit
0fa0: 65 33 20 64 62 32 20 74 65 73 74 2e 64 62 0a 20  e3 db2 test.db. 
0fb0: 20 63 61 74 63 68 73 71 6c 20 7b 20 53 45 4c 45   catchsql { SELE
0fc0: 43 54 20 2a 20 46 52 4f 4d 20 61 62 63 20 7d 20  CT * FROM abc } 
0fd0: 64 62 32 0a 7d 20 7b 30 20 7b 7d 7d 0a 64 6f 5f  db2.} {0 {}}.do_
0fe0: 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 31 2e 38  test malloc5-1.8
0ff0: 20 7b 0a 20 20 23 20 54 72 79 20 74 6f 20 72 65   {.  # Try to re
1000: 6c 65 61 73 65 20 61 6e 6f 74 68 65 72 20 62 6c  lease another bl
1010: 6f 63 6b 20 6f 66 20 6d 65 6d 6f 72 79 2e 20 54  ock of memory. T
1020: 68 69 73 20 77 69 6c 6c 20 66 61 69 6c 20 61 73  his will fail as
1030: 20 74 68 65 20 6f 6e 6c 79 0a 20 20 23 20 70 61   the only.  # pa
1040: 67 65 73 20 63 75 72 72 65 6e 74 6c 79 20 69 6e  ges currently in
1050: 20 74 68 65 20 63 61 63 68 65 20 61 72 65 20 64   the cache are d
1060: 69 72 74 79 20 28 70 61 67 65 20 33 29 20 6f 72  irty (page 3) or
1070: 20 70 69 6e 6e 65 64 20 28 70 61 67 65 20 31 29   pinned (page 1)
1080: 2e 0a 20 20 64 62 32 20 63 6c 6f 73 65 0a 20 20  ..  db2 close.  
1090: 73 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f  sqlite3_release_
10a0: 6d 65 6d 6f 72 79 20 35 30 30 0a 7d 20 30 0a 64  memory 500.} 0.d
10b0: 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 31  o_test malloc5-1
10c0: 2e 38 20 7b 0a 20 20 23 20 44 61 74 61 62 61 73  .8 {.  # Databas
10d0: 65 20 69 73 20 73 74 69 6c 6c 20 6e 6f 74 20 6c  e is still not l
10e0: 6f 63 6b 65 64 2e 0a 20 20 23 0a 20 20 73 71 6c  ocked..  #.  sql
10f0: 69 74 65 33 20 64 62 32 20 74 65 73 74 2e 64 62  ite3 db2 test.db
1100: 0a 20 20 63 61 74 63 68 73 71 6c 20 7b 20 53 45  .  catchsql { SE
1110: 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61 62 63 20  LECT * FROM abc 
1120: 7d 20 64 62 32 0a 7d 20 7b 30 20 7b 7d 7d 0a 64  } db2.} {0 {}}.d
1130: 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 31  o_test malloc5-1
1140: 2e 39 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b  .9 {.  execsql {
1150: 0a 20 20 20 20 43 4f 4d 4d 49 54 3b 0a 20 20 7d  .    COMMIT;.  }
1160: 0a 7d 20 7b 7d 0a 0a 64 6f 5f 74 65 73 74 20 6d  .} {}..do_test m
1170: 61 6c 6c 6f 63 35 2d 32 2e 31 20 7b 0a 20 20 23  alloc5-2.1 {.  #
1180: 20 50 75 74 20 73 6f 6d 65 20 64 61 74 61 20 69   Put some data i
1190: 6e 20 74 61 62 6c 65 73 20 61 62 63 20 61 6e 64  n tables abc and
11a0: 20 64 65 66 2e 20 42 6f 74 68 20 74 61 62 6c 65   def. Both table
11b0: 73 20 61 72 65 20 73 74 69 6c 6c 20 77 68 6f 6c  s are still whol
11c0: 6c 79 20 0a 20 20 23 20 63 6f 6e 74 61 69 6e 65  ly .  # containe
11d0: 64 20 77 69 74 68 69 6e 20 74 68 65 69 72 20 72  d within their r
11e0: 6f 6f 74 20 70 61 67 65 73 2e 0a 20 20 65 78 65  oot pages..  exe
11f0: 63 73 71 6c 20 7b 0a 20 20 20 20 49 4e 53 45 52  csql {.    INSER
1200: 54 20 49 4e 54 4f 20 61 62 63 20 56 41 4c 55 45  T INTO abc VALUE
1210: 53 28 31 2c 20 32 2c 20 33 29 3b 0a 20 20 20 20  S(1, 2, 3);.    
1220: 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63 20  INSERT INTO abc 
1230: 56 41 4c 55 45 53 28 34 2c 20 35 2c 20 36 29 3b  VALUES(4, 5, 6);
1240: 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f  .    INSERT INTO
1250: 20 64 65 66 20 56 41 4c 55 45 53 28 37 2c 20 38   def VALUES(7, 8
1260: 2c 20 39 29 3b 0a 20 20 20 20 49 4e 53 45 52 54  , 9);.    INSERT
1270: 20 49 4e 54 4f 20 64 65 66 20 56 41 4c 55 45 53   INTO def VALUES
1280: 28 31 30 2c 31 31 2c 31 32 29 3b 0a 20 20 7d 0a  (10,11,12);.  }.
1290: 7d 20 7b 7d 0a 64 6f 5f 74 65 73 74 20 6d 61 6c  } {}.do_test mal
12a0: 6c 6f 63 35 2d 32 2e 32 20 7b 0a 20 20 23 20 4c  loc5-2.2 {.  # L
12b0: 6f 61 64 20 74 68 65 20 72 6f 6f 74 2d 70 61 67  oad the root-pag
12c0: 65 20 66 6f 72 20 74 61 62 6c 65 20 64 65 66 20  e for table def 
12d0: 69 6e 74 6f 20 74 68 65 20 63 61 63 68 65 2e 20  into the cache. 
12e0: 54 68 65 6e 20 71 75 65 72 79 20 74 61 62 6c 65  Then query table
12f0: 20 61 62 63 2e 20 0a 20 20 23 20 48 61 6c 66 77   abc. .  # Halfw
1300: 61 79 20 74 68 72 6f 75 67 68 20 74 68 65 20 71  ay through the q
1310: 75 65 72 79 20 63 61 6c 6c 20 73 71 6c 69 74 65  uery call sqlite
1320: 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79  3_release_memory
1330: 28 29 2e 20 54 68 65 20 67 6f 61 6c 20 6f 66 20  (). The goal of 
1340: 74 68 69 73 0a 20 20 23 20 74 65 73 74 20 69 73  this.  # test is
1350: 20 74 6f 20 6d 61 6b 65 20 73 75 72 65 20 77 65   to make sure we
1360: 20 64 6f 6e 27 74 20 66 72 65 65 20 70 61 67 65   don't free page
1370: 73 20 74 68 61 74 20 61 72 65 20 69 6e 20 75 73  s that are in us
1380: 65 20 28 73 70 65 63 69 66 69 63 61 6c 6c 79 2c  e (specifically,
1390: 20 0a 20 20 23 20 74 68 65 20 72 6f 6f 74 20 6f   .  # the root o
13a0: 66 20 74 61 62 6c 65 20 61 62 63 29 2e 0a 20 20  f table abc)..  
13b0: 73 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f  sqlite3_release_
13c0: 6d 65 6d 6f 72 79 0a 20 20 73 65 74 20 6e 52 65  memory.  set nRe
13d0: 6c 65 61 73 65 20 30 0a 20 20 65 78 65 63 73 71  lease 0.  execsq
13e0: 6c 20 7b 20 0a 20 20 20 20 42 45 47 49 4e 3b 0a  l { .    BEGIN;.
13f0: 20 20 20 20 53 45 4c 45 43 54 20 2a 20 46 52 4f      SELECT * FRO
1400: 4d 20 64 65 66 3b 0a 20 20 7d 0a 20 20 73 65 74  M def;.  }.  set
1410: 20 64 61 74 61 20 5b 6c 69 73 74 5d 0a 20 20 64   data [list].  d
1420: 62 20 65 76 61 6c 20 7b 53 45 4c 45 43 54 20 2a  b eval {SELECT *
1430: 20 46 52 4f 4d 20 61 62 63 7d 20 7b 0a 20 20 20   FROM abc} {.   
1440: 20 69 6e 63 72 20 6e 52 65 6c 65 61 73 65 20 5b   incr nRelease [
1450: 73 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f  sqlite3_release_
1460: 6d 65 6d 6f 72 79 5d 0a 20 20 20 20 6c 61 70 70  memory].    lapp
1470: 65 6e 64 20 64 61 74 61 20 24 61 20 24 62 20 24  end data $a $b $
1480: 63 0a 20 20 7d 0a 20 20 65 78 65 63 73 71 6c 20  c.  }.  execsql 
1490: 7b 0a 20 20 20 20 43 4f 4d 4d 49 54 3b 0a 20 20  {.    COMMIT;.  
14a0: 7d 0a 20 20 6c 69 73 74 20 24 6e 52 65 6c 65 61  }.  list $nRelea
14b0: 73 65 20 24 64 61 74 61 0a 7d 20 5b 6c 69 73 74  se $data.} [list
14c0: 20 24 70 67 61 6c 6c 6f 63 20 5b 6c 69 73 74 20   $pgalloc [list 
14d0: 31 20 32 20 33 20 34 20 35 20 36 5d 5d 0a 0a 64  1 2 3 4 5 6]]..d
14e0: 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 33  o_test malloc5-3
14f0: 2e 31 20 7b 0a 20 20 23 20 53 69 6d 70 6c 65 20  .1 {.  # Simple 
1500: 74 65 73 74 20 74 6f 20 73 68 6f 77 20 74 68 61  test to show tha
1510: 74 20 69 66 20 74 77 6f 20 70 61 67 65 72 73 20  t if two pagers 
1520: 61 72 65 20 6f 70 65 6e 65 64 20 66 72 6f 6d 20  are opened from 
1530: 77 69 74 68 69 6e 20 74 68 69 73 0a 20 20 23 20  within this.  # 
1540: 74 68 72 65 61 64 2c 20 6d 65 6d 6f 72 79 20 69  thread, memory i
1550: 73 20 66 72 65 65 64 20 66 72 6f 6d 20 62 6f 74  s freed from bot
1560: 68 20 77 68 65 6e 20 73 71 6c 69 74 65 33 5f 72  h when sqlite3_r
1570: 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 28 29 20  elease_memory() 
1580: 69 73 0a 20 20 23 20 63 61 6c 6c 65 64 2e 0a 20  is.  # called.. 
1590: 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 42   execsql {.    B
15a0: 45 47 49 4e 3b 0a 20 20 20 20 53 45 4c 45 43 54  EGIN;.    SELECT
15b0: 20 2a 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 7d   * FROM abc;.  }
15c0: 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20  .  execsql {.   
15d0: 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 73   SELECT * FROM s
15e0: 71 6c 69 74 65 5f 6d 61 73 74 65 72 3b 0a 20 20  qlite_master;.  
15f0: 20 20 42 45 47 49 4e 3b 0a 20 20 20 20 53 45 4c    BEGIN;.    SEL
1600: 45 43 54 20 2a 20 46 52 4f 4d 20 64 65 66 3b 0a  ECT * FROM def;.
1610: 20 20 7d 20 64 62 32 0a 20 20 76 61 6c 75 65 5f    } db2.  value_
1620: 69 6e 5f 72 61 6e 67 65 20 5b 65 78 70 72 20 24  in_range [expr $
1630: 3a 3a 70 67 61 6c 6c 6f 63 2a 32 5d 20 30 2e 39  ::pgalloc*2] 0.9
1640: 39 20 5b 73 71 6c 69 74 65 33 5f 72 65 6c 65 61  9 [sqlite3_relea
1650: 73 65 5f 6d 65 6d 6f 72 79 5d 0a 7d 20 5b 76 61  se_memory].} [va
1660: 6c 75 65 5f 69 6e 5f 72 61 6e 67 65 20 5b 65 78  lue_in_range [ex
1670: 70 72 20 24 3a 3a 70 67 61 6c 6c 6f 63 20 2a 20  pr $::pgalloc * 
1680: 32 5d 20 30 2e 39 39 5d 0a 64 6f 5f 74 65 73 74  2] 0.99].do_test
1690: 20 6d 61 6c 6c 6f 63 35 2d 33 2e 32 20 7b 0a 20   malloc5-3.2 {. 
16a0: 20 63 6f 6e 63 61 74 20 5c 0a 20 20 20 20 5b 65   concat \.    [e
16b0: 78 65 63 73 71 6c 20 7b 53 45 4c 45 43 54 20 2a  xecsql {SELECT *
16c0: 20 46 52 4f 4d 20 61 62 63 3b 20 43 4f 4d 4d 49   FROM abc; COMMI
16d0: 54 7d 5d 20 5c 0a 20 20 20 20 5b 65 78 65 63 73  T}] \.    [execs
16e0: 71 6c 20 7b 53 45 4c 45 43 54 20 2a 20 46 52 4f  ql {SELECT * FRO
16f0: 4d 20 64 65 66 3b 20 43 4f 4d 4d 49 54 7d 20 64  M def; COMMIT} d
1700: 62 32 5d 0a 7d 20 7b 31 20 32 20 33 20 34 20 35  b2].} {1 2 3 4 5
1710: 20 36 20 37 20 38 20 39 20 31 30 20 31 31 20 31   6 7 8 9 10 11 1
1720: 32 7d 0a 0a 64 62 32 20 63 6c 6f 73 65 0a 70 75  2}..db2 close.pu
1730: 74 73 20 22 48 69 67 68 77 61 74 65 72 20 6d 61  ts "Highwater ma
1740: 72 6b 3a 20 5b 73 71 6c 69 74 65 33 5f 6d 65 6d  rk: [sqlite3_mem
1750: 6f 72 79 5f 68 69 67 68 77 61 74 65 72 5d 22 0a  ory_highwater]".
1760: 0a 23 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67  .# The following
1770: 20 74 77 6f 20 74 65 73 74 20 63 61 73 65 73 20   two test cases 
1780: 65 61 63 68 20 65 78 65 63 75 74 65 20 61 20 74  each execute a t
1790: 72 61 6e 73 61 63 74 69 6f 6e 20 69 6e 20 77 68  ransaction in wh
17a0: 69 63 68 20 0a 23 20 31 30 30 30 30 20 72 6f 77  ich .# 10000 row
17b0: 73 20 61 72 65 20 69 6e 73 65 72 74 65 64 20 69  s are inserted i
17c0: 6e 74 6f 20 74 61 62 6c 65 20 61 62 63 2e 20 54  nto table abc. T
17d0: 68 65 20 66 69 72 73 74 20 74 65 73 74 20 63 61  he first test ca
17e0: 73 65 20 69 73 20 75 73 65 64 0a 23 20 74 6f 20  se is used.# to 
17f0: 65 6e 73 75 72 65 20 74 68 61 74 20 6d 6f 72 65  ensure that more
1800: 20 74 68 61 6e 20 31 4d 42 20 6f 66 20 64 79 6e   than 1MB of dyn
1810: 61 6d 69 63 20 6d 65 6d 6f 72 79 20 69 73 20 75  amic memory is u
1820: 73 65 64 20 74 6f 20 70 65 72 66 6f 72 6d 0a 23  sed to perform.#
1830: 20 74 68 65 20 74 72 61 6e 73 61 63 74 69 6f 6e   the transaction
1840: 2e 20 0a 23 0a 23 20 54 68 65 20 73 65 63 6f 6e  . .#.# The secon
1850: 64 20 74 65 73 74 20 63 61 73 65 20 73 65 74 73  d test case sets
1860: 20 74 68 65 20 22 73 6f 66 74 2d 68 65 61 70 2d   the "soft-heap-
1870: 6c 69 6d 69 74 22 20 74 6f 20 31 30 30 2c 30 30  limit" to 100,00
1880: 30 20 62 79 74 65 73 20 28 30 2e 31 20 4d 42 29  0 bytes (0.1 MB)
1890: 0a 23 20 61 6e 64 20 74 65 73 74 73 20 74 6f 20  .# and tests to 
18a0: 73 65 65 20 74 68 61 74 20 74 68 69 73 20 6c 69  see that this li
18b0: 6d 69 74 20 69 73 20 6e 6f 74 20 65 78 63 65 65  mit is not excee
18c0: 64 65 64 20 61 74 20 61 6e 79 20 70 6f 69 6e 74  ded at any point
18d0: 20 64 75 72 69 6e 67 20 0a 23 20 74 72 61 6e 73   during .# trans
18e0: 61 63 74 69 6f 6e 20 65 78 65 63 75 74 69 6f 6e  action execution
18f0: 2e 0a 23 0a 23 20 42 65 66 6f 72 65 20 65 78 65  ..#.# Before exe
1900: 63 75 74 69 6e 67 20 6d 61 6c 6c 6f 63 35 2d 34  cuting malloc5-4
1910: 2e 2a 20 77 65 20 73 61 76 65 20 74 68 65 20 76  .* we save the v
1920: 61 6c 75 65 20 6f 66 20 74 68 65 20 63 75 72 72  alue of the curr
1930: 65 6e 74 20 73 6f 66 74 20 68 65 61 70 20 0a 23  ent soft heap .#
1940: 20 6c 69 6d 69 74 20 69 6e 20 76 61 72 69 61 62   limit in variab
1950: 6c 65 20 3a 3a 73 6f 66 74 5f 6c 69 6d 69 74 2e  le ::soft_limit.
1960: 20 54 68 65 20 6f 72 69 67 69 6e 61 6c 20 76 61   The original va
1970: 6c 75 65 20 69 73 20 72 65 73 74 6f 72 65 64 20  lue is restored 
1980: 61 66 74 65 72 20 0a 23 20 72 75 6e 6e 69 6e 67  after .# running
1990: 20 74 68 65 20 74 65 73 74 73 2e 0a 23 0a 73 65   the tests..#.se
19a0: 74 20 3a 3a 73 6f 66 74 5f 6c 69 6d 69 74 20 5b  t ::soft_limit [
19b0: 73 71 6c 69 74 65 33 5f 73 6f 66 74 5f 68 65 61  sqlite3_soft_hea
19c0: 70 5f 6c 69 6d 69 74 20 2d 31 5d 0a 65 78 65 63  p_limit -1].exec
19d0: 73 71 6c 20 7b 50 52 41 47 4d 41 20 63 61 63 68  sql {PRAGMA cach
19e0: 65 5f 73 69 7a 65 3d 32 30 30 30 7d 0a 64 6f 5f  e_size=2000}.do_
19f0: 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 34 2e 31  test malloc5-4.1
1a00: 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 42 45   {.  execsql {BE
1a10: 47 49 4e 3b 7d 0a 20 20 65 78 65 63 73 71 6c 20  GIN;}.  execsql 
1a20: 7b 44 45 4c 45 54 45 20 46 52 4f 4d 20 61 62 63  {DELETE FROM abc
1a30: 3b 7d 0a 20 20 66 6f 72 20 7b 73 65 74 20 69 20  ;}.  for {set i 
1a40: 30 7d 20 7b 24 69 20 3c 20 31 30 30 30 30 7d 20  0} {$i < 10000} 
1a50: 7b 69 6e 63 72 20 69 7d 20 7b 0a 20 20 20 20 65  {incr i} {.    e
1a60: 78 65 63 73 71 6c 20 22 49 4e 53 45 52 54 20 49  xecsql "INSERT I
1a70: 4e 54 4f 20 61 62 63 20 56 41 4c 55 45 53 28 24  NTO abc VALUES($
1a80: 69 2c 20 24 69 2c 20 27 5b 73 74 72 69 6e 67 20  i, $i, '[string 
1a90: 72 65 70 65 61 74 20 58 20 31 30 30 5d 27 29 3b  repeat X 100]');
1aa0: 22 0a 20 20 7d 0a 20 20 65 78 65 63 73 71 6c 20  ".  }.  execsql 
1ab0: 7b 43 4f 4d 4d 49 54 3b 7d 0a 20 20 64 62 20 63  {COMMIT;}.  db c
1ac0: 61 63 68 65 20 66 6c 75 73 68 0a 20 20 73 71 6c  ache flush.  sql
1ad0: 69 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d  ite3_release_mem
1ae0: 6f 72 79 0a 20 20 73 71 6c 69 74 65 33 5f 6d 65  ory.  sqlite3_me
1af0: 6d 6f 72 79 5f 68 69 67 68 77 61 74 65 72 20 31  mory_highwater 1
1b00: 0a 20 20 65 78 65 63 73 71 6c 20 7b 53 45 4c 45  .  execsql {SELE
1b10: 43 54 20 2a 20 46 52 4f 4d 20 61 62 63 7d 0a 20  CT * FROM abc}. 
1b20: 20 73 65 74 20 6e 4d 61 78 42 79 74 65 73 20 5b   set nMaxBytes [
1b30: 73 71 6c 69 74 65 33 5f 6d 65 6d 6f 72 79 5f 68  sqlite3_memory_h
1b40: 69 67 68 77 61 74 65 72 20 31 5d 0a 20 20 70 75  ighwater 1].  pu
1b50: 74 73 20 2d 6e 6f 6e 65 77 6c 69 6e 65 20 22 20  ts -nonewline " 
1b60: 28 48 69 67 68 77 61 74 65 72 20 6d 61 72 6b 3a  (Highwater mark:
1b70: 20 24 6e 4d 61 78 42 79 74 65 73 29 20 22 0a 20   $nMaxBytes) ". 
1b80: 20 65 78 70 72 20 24 6e 4d 61 78 42 79 74 65 73   expr $nMaxBytes
1b90: 20 3e 20 31 30 30 30 30 30 30 0a 7d 20 7b 31 7d   > 1000000.} {1}
1ba0: 0a 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35  .do_test malloc5
1bb0: 2d 34 2e 32 20 7b 0a 20 20 64 62 20 65 76 61 6c  -4.2 {.  db eval
1bc0: 20 7b 50 52 41 47 4d 41 20 63 61 63 68 65 5f 73   {PRAGMA cache_s
1bd0: 69 7a 65 3d 31 7d 0a 20 20 64 62 20 63 61 63 68  ize=1}.  db cach
1be0: 65 20 66 6c 75 73 68 0a 20 20 73 71 6c 69 74 65  e flush.  sqlite
1bf0: 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79  3_release_memory
1c00: 0a 20 20 73 71 6c 69 74 65 33 5f 73 6f 66 74 5f  .  sqlite3_soft_
1c10: 68 65 61 70 5f 6c 69 6d 69 74 20 32 30 30 30 30  heap_limit 20000
1c20: 30 0a 20 20 73 71 6c 69 74 65 33 5f 6d 65 6d 6f  0.  sqlite3_memo
1c30: 72 79 5f 68 69 67 68 77 61 74 65 72 20 31 0a 20  ry_highwater 1. 
1c40: 20 65 78 65 63 73 71 6c 20 7b 53 45 4c 45 43 54   execsql {SELECT
1c50: 20 2a 20 46 52 4f 4d 20 61 62 63 7d 0a 20 20 73   * FROM abc}.  s
1c60: 65 74 20 6e 4d 61 78 42 79 74 65 73 20 5b 73 71  et nMaxBytes [sq
1c70: 6c 69 74 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67  lite3_memory_hig
1c80: 68 77 61 74 65 72 20 31 5d 0a 20 20 70 75 74 73  hwater 1].  puts
1c90: 20 2d 6e 6f 6e 65 77 6c 69 6e 65 20 22 20 28 48   -nonewline " (H
1ca0: 69 67 68 77 61 74 65 72 20 6d 61 72 6b 3a 20 24  ighwater mark: $
1cb0: 6e 4d 61 78 42 79 74 65 73 29 20 22 0a 20 20 65  nMaxBytes) ".  e
1cc0: 78 70 72 20 24 6e 4d 61 78 42 79 74 65 73 20 3c  xpr $nMaxBytes <
1cd0: 3d 20 32 31 30 30 30 30 0a 7d 20 7b 31 7d 0a 64  = 210000.} {1}.d
1ce0: 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 34  o_test malloc5-4
1cf0: 2e 33 20 7b 0a 20 20 23 20 43 68 65 63 6b 20 74  .3 {.  # Check t
1d00: 68 61 74 20 74 68 65 20 63 6f 6e 74 65 6e 74 20  hat the content 
1d10: 6f 66 20 74 61 62 6c 65 20 61 62 63 20 69 73 20  of table abc is 
1d20: 61 74 20 6c 65 61 73 74 20 72 6f 75 67 68 6c 79  at least roughly
1d30: 20 61 73 20 65 78 70 65 63 74 65 64 2e 0a 20 20   as expected..  
1d40: 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 53 45  execsql {.    SE
1d50: 4c 45 43 54 20 63 6f 75 6e 74 28 2a 29 2c 20 73  LECT count(*), s
1d60: 75 6d 28 61 29 2c 20 73 75 6d 28 62 29 20 46 52  um(a), sum(b) FR
1d70: 4f 4d 20 61 62 63 3b 0a 20 20 7d 0a 7d 20 5b 6c  OM abc;.  }.} [l
1d80: 69 73 74 20 31 30 30 30 30 20 5b 65 78 70 72 20  ist 10000 [expr 
1d90: 69 6e 74 28 31 30 30 30 30 2e 30 20 2a 20 34 39  int(10000.0 * 49
1da0: 39 39 2e 35 29 5d 20 5b 65 78 70 72 20 69 6e 74  99.5)] [expr int
1db0: 28 31 30 30 30 30 2e 30 20 2a 20 34 39 39 39 2e  (10000.0 * 4999.
1dc0: 35 29 5d 5d 0a 0a 23 20 52 65 73 74 6f 72 65 20  5)]]..# Restore 
1dd0: 74 68 65 20 73 6f 66 74 20 68 65 61 70 20 6c 69  the soft heap li
1de0: 6d 69 74 2e 0a 73 71 6c 69 74 65 33 5f 73 6f 66  mit..sqlite3_sof
1df0: 74 5f 68 65 61 70 5f 6c 69 6d 69 74 20 24 3a 3a  t_heap_limit $::
1e00: 73 6f 66 74 5f 6c 69 6d 69 74 0a 0a 23 20 54 65  soft_limit..# Te
1e10: 73 74 20 74 68 61 74 20 74 68 65 72 65 20 61 72  st that there ar
1e20: 65 20 6e 6f 20 70 72 6f 62 6c 65 6d 73 20 63 61  e no problems ca
1e30: 6c 6c 69 6e 67 20 73 71 6c 69 74 65 33 5f 72 65  lling sqlite3_re
1e40: 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 20 77 68 65  lease_memory whe
1e50: 6e 0a 23 20 74 68 65 72 65 20 61 72 65 20 6f 70  n.# there are op
1e60: 65 6e 20 69 6e 2d 6d 65 6d 6f 72 79 20 64 61 74  en in-memory dat
1e70: 61 62 61 73 65 73 2e 0a 23 0a 23 20 41 74 20 6f  abases..#.# At o
1e80: 6e 65 20 70 6f 69 6e 74 20 74 68 65 73 65 20 74  ne point these t
1e90: 65 73 74 73 20 77 6f 75 6c 64 20 63 61 75 73 65  ests would cause
1ea0: 20 61 20 73 65 67 2d 66 61 75 6c 74 2e 0a 23 0a   a seg-fault..#.
1eb0: 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d  do_test malloc5-
1ec0: 35 2e 31 20 7b 0a 20 20 64 62 20 63 6c 6f 73 65  5.1 {.  db close
1ed0: 0a 20 20 73 71 6c 69 74 65 33 20 64 62 20 3a 6d  .  sqlite3 db :m
1ee0: 65 6d 6f 72 79 3a 0a 20 20 65 78 65 63 73 71 6c  emory:.  execsql
1ef0: 20 7b 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20 20   {.    BEGIN;.  
1f00: 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 61    CREATE TABLE a
1f10: 62 63 28 61 2c 20 62 2c 20 63 29 3b 0a 20 20 20  bc(a, b, c);.   
1f20: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63   INSERT INTO abc
1f30: 20 56 41 4c 55 45 53 28 27 61 62 63 64 65 66 67   VALUES('abcdefg
1f40: 68 69 27 2c 20 31 32 33 34 35 36 37 38 39 30 2c  hi', 1234567890,
1f50: 20 4e 55 4c 4c 29 3b 0a 20 20 20 20 49 4e 53 45   NULL);.    INSE
1f60: 52 54 20 49 4e 54 4f 20 61 62 63 20 53 45 4c 45  RT INTO abc SELE
1f70: 43 54 20 2a 20 46 52 4f 4d 20 61 62 63 3b 0a 20  CT * FROM abc;. 
1f80: 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61     INSERT INTO a
1f90: 62 63 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d  bc SELECT * FROM
1fa0: 20 61 62 63 3b 0a 20 20 20 20 49 4e 53 45 52 54   abc;.    INSERT
1fb0: 20 49 4e 54 4f 20 61 62 63 20 53 45 4c 45 43 54   INTO abc SELECT
1fc0: 20 2a 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 20   * FROM abc;.   
1fd0: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63   INSERT INTO abc
1fe0: 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61   SELECT * FROM a
1ff0: 62 63 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49  bc;.    INSERT I
2000: 4e 54 4f 20 61 62 63 20 53 45 4c 45 43 54 20 2a  NTO abc SELECT *
2010: 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 20 20 49   FROM abc;.    I
2020: 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63 20 53  NSERT INTO abc S
2030: 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61 62 63  ELECT * FROM abc
2040: 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54  ;.    INSERT INT
2050: 4f 20 61 62 63 20 53 45 4c 45 43 54 20 2a 20 46  O abc SELECT * F
2060: 52 4f 4d 20 61 62 63 3b 0a 20 20 7d 0a 20 20 73  ROM abc;.  }.  s
2070: 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d  qlite3_release_m
2080: 65 6d 6f 72 79 0a 7d 20 30 0a 64 6f 5f 74 65 73  emory.} 0.do_tes
2090: 74 20 6d 61 6c 6c 6f 63 35 2d 35 2e 32 20 7b 0a  t malloc5-5.2 {.
20a0: 20 20 73 71 6c 69 74 65 33 5f 73 6f 66 74 5f 68    sqlite3_soft_h
20b0: 65 61 70 5f 6c 69 6d 69 74 20 35 30 30 30 0a 20  eap_limit 5000. 
20c0: 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 43   execsql {.    C
20d0: 4f 4d 4d 49 54 3b 0a 20 20 20 20 50 52 41 47 4d  OMMIT;.    PRAGM
20e0: 41 20 74 65 6d 70 5f 73 74 6f 72 65 20 3d 20 6d  A temp_store = m
20f0: 65 6d 6f 72 79 3b 0a 20 20 20 20 53 45 4c 45 43  emory;.    SELEC
2100: 54 20 2a 20 46 52 4f 4d 20 61 62 63 20 4f 52 44  T * FROM abc ORD
2110: 45 52 20 42 59 20 61 3b 0a 20 20 7d 0a 20 20 65  ER BY a;.  }.  e
2120: 78 70 72 20 31 0a 7d 20 7b 31 7d 0a 73 71 6c 69  xpr 1.} {1}.sqli
2130: 74 65 33 5f 73 6f 66 74 5f 68 65 61 70 5f 6c 69  te3_soft_heap_li
2140: 6d 69 74 20 24 3a 3a 73 6f 66 74 5f 6c 69 6d 69  mit $::soft_limi
2150: 74 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  t..#------------
2160: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
2170: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
2180: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
2190: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 23 20  -------------.# 
21a0: 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 74 65  The following te
21b0: 73 74 20 63 61 73 65 73 20 28 6d 61 6c 6c 6f 63  st cases (malloc
21c0: 35 2d 36 2e 2a 29 20 74 65 73 74 20 74 68 65 20  5-6.*) test the 
21d0: 6e 65 77 20 67 6c 6f 62 61 6c 20 4c 52 55 20 6c  new global LRU l
21e0: 69 73 74 0a 23 20 75 73 65 64 20 74 6f 20 64 65  ist.# used to de
21f0: 74 65 72 6d 69 6e 65 20 74 68 65 20 70 61 67 65  termine the page
2200: 73 20 74 6f 20 72 65 63 79 63 6c 65 20 77 68 65  s to recycle whe
2210: 6e 20 73 71 6c 69 74 65 33 5f 72 65 6c 65 61 73  n sqlite3_releas
2220: 65 5f 6d 65 6d 6f 72 79 20 69 73 0a 23 20 63 61  e_memory is.# ca
2230: 6c 6c 65 64 20 61 6e 64 20 74 68 65 72 65 20 69  lled and there i
2240: 73 20 6d 6f 72 65 20 74 68 61 6e 20 6f 6e 65 20  s more than one 
2250: 70 61 67 65 72 20 6f 70 65 6e 2e 0a 23 0a 70 72  pager open..#.pr
2260: 6f 63 20 6e 50 61 67 65 20 7b 64 62 7d 20 7b 0a  oc nPage {db} {.
2270: 20 20 73 65 74 20 62 74 20 5b 62 74 72 65 65 5f    set bt [btree_
2280: 66 72 6f 6d 5f 64 62 20 24 64 62 5d 0a 20 20 61  from_db $db].  a
2290: 72 72 61 79 20 73 65 74 20 73 74 61 74 73 20 5b  rray set stats [
22a0: 62 74 72 65 65 5f 70 61 67 65 72 5f 73 74 61 74  btree_pager_stat
22b0: 73 20 24 62 74 5d 0a 20 20 73 65 74 20 73 74 61  s $bt].  set sta
22c0: 74 73 28 70 61 67 65 29 0a 7d 0a 64 62 20 63 6c  ts(page).}.db cl
22d0: 6f 73 65 0a 66 6f 72 63 65 64 65 6c 65 74 65 20  ose.forcedelete 
22e0: 74 65 73 74 2e 64 62 20 74 65 73 74 2e 64 62 2d  test.db test.db-
22f0: 6a 6f 75 72 6e 61 6c 20 74 65 73 74 32 2e 64 62  journal test2.db
2300: 20 74 65 73 74 32 2e 64 62 2d 6a 6f 75 72 6e 61   test2.db-journa
2310: 6c 0a 0a 23 20 54 68 69 73 20 62 6c 6f 63 6b 20  l..# This block 
2320: 6f 66 20 74 65 73 74 2d 63 61 73 65 73 20 28 6d  of test-cases (m
2330: 61 6c 6c 6f 63 35 2d 36 2e 31 2e 2a 29 20 70 72  alloc5-6.1.*) pr
2340: 65 70 61 72 65 73 20 74 77 6f 20 64 61 74 61 62  epares two datab
2350: 61 73 65 20 66 69 6c 65 73 0a 23 20 66 6f 72 20  ase files.# for 
2360: 74 68 65 20 73 75 62 73 65 71 75 65 6e 74 20 74  the subsequent t
2370: 65 73 74 73 2e 0a 64 6f 5f 74 65 73 74 20 6d 61  ests..do_test ma
2380: 6c 6c 6f 63 35 2d 36 2e 31 2e 31 20 7b 0a 20 20  lloc5-6.1.1 {.  
2390: 73 71 6c 69 74 65 33 20 64 62 20 74 65 73 74 2e  sqlite3 db test.
23a0: 64 62 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20  db.  execsql {. 
23b0: 20 20 20 50 52 41 47 4d 41 20 70 61 67 65 5f 73     PRAGMA page_s
23c0: 69 7a 65 3d 31 30 32 34 3b 0a 20 20 20 20 50 52  ize=1024;.    PR
23d0: 41 47 4d 41 20 64 65 66 61 75 6c 74 5f 63 61 63  AGMA default_cac
23e0: 68 65 5f 73 69 7a 65 3d 32 3b 0a 20 20 7d 0a 20  he_size=2;.  }. 
23f0: 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 50   execsql {.    P
2400: 52 41 47 4d 41 20 74 65 6d 70 5f 73 74 6f 72 65  RAGMA temp_store
2410: 20 3d 20 6d 65 6d 6f 72 79 3b 0a 20 20 20 20 42   = memory;.    B
2420: 45 47 49 4e 3b 0a 20 20 20 20 43 52 45 41 54 45  EGIN;.    CREATE
2430: 20 54 41 42 4c 45 20 61 62 63 28 61 20 50 52 49   TABLE abc(a PRI
2440: 4d 41 52 59 20 4b 45 59 2c 20 62 2c 20 63 29 3b  MARY KEY, b, c);
2450: 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f  .    INSERT INTO
2460: 20 61 62 63 20 56 41 4c 55 45 53 28 72 61 6e 64   abc VALUES(rand
2470: 73 74 72 28 35 30 2c 35 30 29 2c 20 72 61 6e 64  str(50,50), rand
2480: 73 74 72 28 37 35 2c 37 35 29 2c 20 72 61 6e 64  str(75,75), rand
2490: 73 74 72 28 31 30 30 2c 31 30 30 29 29 3b 0a 20  str(100,100));. 
24a0: 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61     INSERT INTO a
24b0: 62 63 20 0a 20 20 20 20 20 20 20 20 53 45 4c 45  bc .        SELE
24c0: 43 54 20 72 61 6e 64 73 74 72 28 35 30 2c 35 30  CT randstr(50,50
24d0: 29 2c 20 72 61 6e 64 73 74 72 28 37 35 2c 37 35  ), randstr(75,75
24e0: 29 2c 20 72 61 6e 64 73 74 72 28 31 30 30 2c 31  ), randstr(100,1
24f0: 30 30 29 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20  00) FROM abc;.  
2500: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62    INSERT INTO ab
2510: 63 20 0a 20 20 20 20 20 20 20 20 53 45 4c 45 43  c .        SELEC
2520: 54 20 72 61 6e 64 73 74 72 28 35 30 2c 35 30 29  T randstr(50,50)
2530: 2c 20 72 61 6e 64 73 74 72 28 37 35 2c 37 35 29  , randstr(75,75)
2540: 2c 20 72 61 6e 64 73 74 72 28 31 30 30 2c 31 30  , randstr(100,10
2550: 30 29 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 20  0) FROM abc;.   
2560: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63   INSERT INTO abc
2570: 20 0a 20 20 20 20 20 20 20 20 53 45 4c 45 43 54   .        SELECT
2580: 20 72 61 6e 64 73 74 72 28 35 30 2c 35 30 29 2c   randstr(50,50),
2590: 20 72 61 6e 64 73 74 72 28 37 35 2c 37 35 29 2c   randstr(75,75),
25a0: 20 72 61 6e 64 73 74 72 28 31 30 30 2c 31 30 30   randstr(100,100
25b0: 29 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 20 20  ) FROM abc;.    
25c0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63 20  INSERT INTO abc 
25d0: 0a 20 20 20 20 20 20 20 20 53 45 4c 45 43 54 20  .        SELECT 
25e0: 72 61 6e 64 73 74 72 28 35 30 2c 35 30 29 2c 20  randstr(50,50), 
25f0: 72 61 6e 64 73 74 72 28 37 35 2c 37 35 29 2c 20  randstr(75,75), 
2600: 72 61 6e 64 73 74 72 28 31 30 30 2c 31 30 30 29  randstr(100,100)
2610: 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 20 20 49   FROM abc;.    I
2620: 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63 20 0a  NSERT INTO abc .
2630: 20 20 20 20 20 20 20 20 53 45 4c 45 43 54 20 72          SELECT r
2640: 61 6e 64 73 74 72 28 35 30 2c 35 30 29 2c 20 72  andstr(50,50), r
2650: 61 6e 64 73 74 72 28 37 35 2c 37 35 29 2c 20 72  andstr(75,75), r
2660: 61 6e 64 73 74 72 28 31 30 30 2c 31 30 30 29 20  andstr(100,100) 
2670: 46 52 4f 4d 20 61 62 63 3b 0a 20 20 20 20 49 4e  FROM abc;.    IN
2680: 53 45 52 54 20 49 4e 54 4f 20 61 62 63 20 0a 20  SERT INTO abc . 
2690: 20 20 20 20 20 20 20 53 45 4c 45 43 54 20 72 61         SELECT ra
26a0: 6e 64 73 74 72 28 35 30 2c 35 30 29 2c 20 72 61  ndstr(50,50), ra
26b0: 6e 64 73 74 72 28 37 35 2c 37 35 29 2c 20 72 61  ndstr(75,75), ra
26c0: 6e 64 73 74 72 28 31 30 30 2c 31 30 30 29 20 46  ndstr(100,100) F
26d0: 52 4f 4d 20 61 62 63 3b 0a 20 20 20 20 43 4f 4d  ROM abc;.    COM
26e0: 4d 49 54 3b 0a 20 20 7d 20 0a 20 20 66 6f 72 63  MIT;.  } .  forc
26f0: 65 63 6f 70 79 20 74 65 73 74 2e 64 62 20 74 65  ecopy test.db te
2700: 73 74 32 2e 64 62 0a 20 20 73 71 6c 69 74 65 33  st2.db.  sqlite3
2710: 20 64 62 32 20 74 65 73 74 32 2e 64 62 0a 20 20   db2 test2.db.  
2720: 64 62 32 20 65 76 61 6c 20 7b 50 52 41 47 4d 41  db2 eval {PRAGMA
2730: 20 63 61 63 68 65 5f 73 69 7a 65 3d 32 7d 0a 20   cache_size=2}. 
2740: 20 6c 69 73 74 20 5c 0a 20 20 20 20 5b 65 78 70   list \.    [exp
2750: 72 20 28 5b 66 69 6c 65 20 73 69 7a 65 20 74 65  r ([file size te
2760: 73 74 2e 64 62 5d 2f 31 30 32 34 29 3e 32 30 5d  st.db]/1024)>20]
2770: 20 5b 65 78 70 72 20 28 5b 66 69 6c 65 20 73 69   [expr ([file si
2780: 7a 65 20 74 65 73 74 32 2e 64 62 5d 2f 31 30 32  ze test2.db]/102
2790: 34 29 3e 32 30 5d 0a 7d 20 7b 31 20 31 7d 0a 64  4)>20].} {1 1}.d
27a0: 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 36  o_test malloc5-6
27b0: 2e 31 2e 32 20 7b 0a 20 20 6c 69 73 74 20 5b 65  .1.2 {.  list [e
27c0: 78 65 63 73 71 6c 20 7b 50 52 41 47 4d 41 20 63  xecsql {PRAGMA c
27d0: 61 63 68 65 5f 73 69 7a 65 7d 5d 20 5b 65 78 65  ache_size}] [exe
27e0: 63 73 71 6c 20 7b 50 52 41 47 4d 41 20 63 61 63  csql {PRAGMA cac
27f0: 68 65 5f 73 69 7a 65 7d 20 64 62 32 5d 0a 7d 20  he_size} db2].} 
2800: 7b 32 20 32 7d 0a 0a 64 6f 5f 74 65 73 74 20 6d  {2 2}..do_test m
2810: 61 6c 6c 6f 63 35 2d 36 2e 32 2e 31 20 7b 0a 20  alloc5-6.2.1 {. 
2820: 20 65 78 65 63 73 71 6c 20 7b 53 45 4c 45 43 54   execsql {SELECT
2830: 20 2a 20 46 52 4f 4d 20 61 62 63 7d 20 64 62 32   * FROM abc} db2
2840: 0a 20 20 65 78 65 63 73 71 6c 20 7b 53 45 4c 45  .  execsql {SELE
2850: 43 54 20 2a 20 46 52 4f 4d 20 61 62 63 7d 20 64  CT * FROM abc} d
2860: 62 0a 20 20 65 78 70 72 20 5b 6e 50 61 67 65 20  b.  expr [nPage 
2870: 64 62 5d 20 2b 20 5b 6e 50 61 67 65 20 64 62 32  db] + [nPage db2
2880: 5d 0a 7d 20 7b 34 7d 0a 0a 64 6f 5f 74 65 73 74  ].} {4}..do_test
2890: 20 6d 61 6c 6c 6f 63 35 2d 36 2e 32 2e 32 20 7b   malloc5-6.2.2 {
28a0: 0a 20 20 23 20 49 66 20 77 65 20 6e 6f 77 20 74  .  # If we now t
28b0: 72 79 20 74 6f 20 72 65 63 6c 61 69 6d 20 73 6f  ry to reclaim so
28c0: 6d 65 20 6d 65 6d 6f 72 79 2c 20 69 74 20 73 68  me memory, it sh
28d0: 6f 75 6c 64 20 63 6f 6d 65 20 66 72 6f 6d 20 74  ould come from t
28e0: 68 65 20 64 62 32 20 63 61 63 68 65 2e 0a 20 20  he db2 cache..  
28f0: 73 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f  sqlite3_release_
2900: 6d 65 6d 6f 72 79 20 33 30 30 30 0a 20 20 65 78  memory 3000.  ex
2910: 70 72 20 5b 6e 50 61 67 65 20 64 62 5d 20 2b 20  pr [nPage db] + 
2920: 5b 6e 50 61 67 65 20 64 62 32 5d 0a 7d 20 7b 31  [nPage db2].} {1
2930: 7d 0a 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63  }.do_test malloc
2940: 35 2d 36 2e 32 2e 33 20 7b 0a 20 20 23 20 41 63  5-6.2.3 {.  # Ac
2950: 63 65 73 73 20 74 68 65 20 64 62 32 20 63 61 63  cess the db2 cac
2960: 68 65 20 61 67 61 69 6e 2c 20 73 6f 20 74 68 61  he again, so tha
2970: 74 20 61 6c 6c 20 74 68 65 20 64 62 32 20 70 61  t all the db2 pa
2980: 67 65 73 20 68 61 76 65 20 62 65 65 6e 20 75 73  ges have been us
2990: 65 64 0a 20 20 23 20 6d 6f 72 65 20 72 65 63 65  ed.  # more rece
29a0: 6e 74 6c 79 20 74 68 61 6e 20 61 6c 6c 20 74 68  ntly than all th
29b0: 65 20 64 62 20 70 61 67 65 73 2e 20 54 68 65 6e  e db pages. Then
29c0: 20 74 72 79 20 74 6f 20 72 65 63 6c 61 69 6d 20   try to reclaim 
29d0: 33 30 30 30 20 62 79 74 65 73 2e 0a 20 20 23 20  3000 bytes..  # 
29e0: 54 68 69 73 20 74 69 6d 65 2c 20 33 20 70 61 67  This time, 3 pag
29f0: 65 73 20 73 68 6f 75 6c 64 20 62 65 20 70 75 6c  es should be pul
2a00: 6c 65 64 20 66 72 6f 6d 20 74 68 65 20 64 62 20  led from the db 
2a10: 63 61 63 68 65 2e 0a 20 20 65 78 65 63 73 71 6c  cache..  execsql
2a20: 20 7b 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d   { SELECT * FROM
2a30: 20 61 62 63 20 7d 20 64 62 32 0a 20 20 73 71 6c   abc } db2.  sql
2a40: 69 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d  ite3_release_mem
2a50: 6f 72 79 20 33 30 30 30 0a 20 20 65 78 70 72 20  ory 3000.  expr 
2a60: 5b 6e 50 61 67 65 20 64 62 5d 20 2b 20 5b 6e 50  [nPage db] + [nP
2a70: 61 67 65 20 64 62 32 5d 0a 7d 20 7b 30 7d 0a 0a  age db2].} {0}..
2a80: 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d  do_test malloc5-
2a90: 36 2e 33 2e 31 20 7b 0a 20 20 23 20 4e 6f 77 20  6.3.1 {.  # Now 
2aa0: 6f 70 65 6e 20 61 20 74 72 61 6e 73 61 63 74 69  open a transacti
2ab0: 6f 6e 20 61 6e 64 20 75 70 64 61 74 65 20 32 20  on and update 2 
2ac0: 70 61 67 65 73 20 69 6e 20 74 68 65 20 64 62 32  pages in the db2
2ad0: 20 63 61 63 68 65 2e 20 54 68 65 6e 0a 20 20 23   cache. Then.  #
2ae0: 20 64 6f 20 61 20 53 45 4c 45 43 54 20 6f 6e 20   do a SELECT on 
2af0: 74 68 65 20 64 62 20 63 61 63 68 65 20 73 6f 20  the db cache so 
2b00: 74 68 61 74 20 61 6c 6c 20 74 68 65 20 64 62 20  that all the db 
2b10: 70 61 67 65 73 20 61 72 65 20 6d 6f 72 65 20 72  pages are more r
2b20: 65 63 65 6e 74 6c 79 0a 20 20 23 20 75 73 65 64  ecently.  # used
2b30: 20 74 68 61 6e 20 74 68 65 20 64 62 32 20 70 61   than the db2 pa
2b40: 67 65 73 2e 20 57 68 65 6e 20 77 65 20 74 72 79  ges. When we try
2b50: 20 74 6f 20 66 72 65 65 20 6d 65 6d 6f 72 79 2c   to free memory,
2b60: 20 53 51 4c 69 74 65 20 73 68 6f 75 6c 64 0a 20   SQLite should. 
2b70: 20 23 20 66 72 65 65 20 74 68 65 20 6e 6f 6e 2d   # free the non-
2b80: 64 69 72 74 79 20 64 62 32 20 70 61 67 65 73 2c  dirty db2 pages,
2b90: 20 74 68 65 6e 20 74 68 65 20 64 62 20 70 61 67   then the db pag
2ba0: 65 73 2c 20 74 68 65 6e 20 66 69 6e 61 6c 6c 79  es, then finally
2bb0: 20 75 73 65 0a 20 20 23 20 73 79 6e 63 28 29 20   use.  # sync() 
2bc0: 74 6f 20 66 72 65 65 20 75 70 20 74 68 65 20 64  to free up the d
2bd0: 69 72 74 79 20 64 62 32 20 70 61 67 65 73 2e 20  irty db2 pages. 
2be0: 54 68 65 20 6f 6e 6c 79 20 70 61 67 65 20 74 68  The only page th
2bf0: 61 74 20 63 61 6e 6e 6f 74 20 62 65 0a 20 20 23  at cannot be.  #
2c00: 20 66 72 65 65 64 20 69 73 20 70 61 67 65 31 20   freed is page1 
2c10: 6f 66 20 64 62 32 2e 20 42 65 63 61 75 73 65 20  of db2. Because 
2c20: 74 68 65 72 65 20 69 73 20 61 6e 20 6f 70 65 6e  there is an open
2c30: 20 74 72 61 6e 73 61 63 74 69 6f 6e 2c 20 74 68   transaction, th
2c40: 65 0a 20 20 23 20 62 74 72 65 65 20 6c 61 79 65  e.  # btree laye
2c50: 72 20 68 6f 6c 64 73 20 61 20 72 65 66 65 72 65  r holds a refere
2c60: 6e 63 65 20 74 6f 20 70 61 67 65 20 31 20 69 6e  nce to page 1 in
2c70: 20 74 68 65 20 64 62 32 20 63 61 63 68 65 2e 0a   the db2 cache..
2c80: 20 20 23 0a 20 20 23 20 55 50 44 41 54 45 3a 20    #.  # UPDATE: 
2c90: 4e 6f 20 6c 6f 6e 67 65 72 2e 20 41 73 20 72 65  No longer. As re
2ca0: 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 28 29 20 64  lease_memory() d
2cb0: 6f 65 73 20 6e 6f 74 20 63 61 75 73 65 20 61 20  oes not cause a 
2cc0: 73 79 6e 63 28 29 0a 20 20 65 78 65 63 73 71 6c  sync().  execsql
2cd0: 20 7b 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20 20   {.    BEGIN;.  
2ce0: 20 20 55 50 44 41 54 45 20 61 62 63 20 53 45 54    UPDATE abc SET
2cf0: 20 63 20 3d 20 72 61 6e 64 73 74 72 28 31 30 30   c = randstr(100
2d00: 2c 31 30 30 29 20 0a 20 20 20 20 57 48 45 52 45  ,100) .    WHERE
2d10: 20 72 6f 77 69 64 20 3d 20 31 20 4f 52 20 72 6f   rowid = 1 OR ro
2d20: 77 69 64 20 3d 20 28 53 45 4c 45 43 54 20 6d 61  wid = (SELECT ma
2d30: 78 28 72 6f 77 69 64 29 20 46 52 4f 4d 20 61 62  x(rowid) FROM ab
2d40: 63 29 3b 0a 20 20 7d 20 64 62 32 0a 20 20 65 78  c);.  } db2.  ex
2d50: 65 63 73 71 6c 20 7b 20 53 45 4c 45 43 54 20 2a  ecsql { SELECT *
2d60: 20 46 52 4f 4d 20 61 62 63 20 7d 20 64 62 0a 20   FROM abc } db. 
2d70: 20 65 78 70 72 20 5b 6e 50 61 67 65 20 64 62 5d   expr [nPage db]
2d80: 20 2b 20 5b 6e 50 61 67 65 20 64 62 32 5d 0a 7d   + [nPage db2].}
2d90: 20 7b 34 7d 0a 64 6f 5f 74 65 73 74 20 6d 61 6c   {4}.do_test mal
2da0: 6c 6f 63 35 2d 36 2e 33 2e 32 20 7b 0a 20 20 23  loc5-6.3.2 {.  #
2db0: 20 54 72 79 20 74 6f 20 72 65 6c 65 61 73 65 20   Try to release 
2dc0: 37 37 30 30 20 62 79 74 65 73 2e 20 54 68 69 73  7700 bytes. This
2dd0: 20 73 68 6f 75 6c 64 20 72 65 6c 65 61 73 65 20   should release 
2de0: 61 6c 6c 20 74 68 65 20 0a 20 20 23 20 6e 6f 6e  all the .  # non
2df0: 2d 64 69 72 74 79 20 70 61 67 65 73 20 68 65 6c  -dirty pages hel
2e00: 64 20 62 79 20 64 62 32 2e 0a 20 20 73 71 6c 69  d by db2..  sqli
2e10: 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f  te3_release_memo
2e20: 72 79 20 5b 65 78 70 72 20 37 2a 31 31 33 32 5d  ry [expr 7*1132]
2e30: 0a 20 20 6c 69 73 74 20 5b 6e 50 61 67 65 20 64  .  list [nPage d
2e40: 62 5d 20 5b 6e 50 61 67 65 20 64 62 32 5d 0a 7d  b] [nPage db2].}
2e50: 20 7b 30 20 33 7d 0a 64 6f 5f 74 65 73 74 20 6d   {0 3}.do_test m
2e60: 61 6c 6c 6f 63 35 2d 36 2e 33 2e 33 20 7b 0a 20  alloc5-6.3.3 {. 
2e70: 20 23 20 54 72 79 20 74 6f 20 72 65 6c 65 61 73   # Try to releas
2e80: 65 20 61 6e 6f 74 68 65 72 20 31 30 30 30 20 62  e another 1000 b
2e90: 79 74 65 73 2e 20 54 68 69 73 20 73 68 6f 75 6c  ytes. This shoul
2ea0: 64 20 63 6f 6d 65 20 66 72 6f 6d 74 20 74 68 65  d come fromt the
2eb0: 20 64 62 0a 20 20 23 20 63 61 63 68 65 2c 20 73   db.  # cache, s
2ec0: 69 6e 63 65 20 61 6c 6c 20 74 68 72 65 65 20 70  ince all three p
2ed0: 61 67 65 73 20 68 65 6c 64 20 62 79 20 64 62 32  ages held by db2
2ee0: 20 61 72 65 20 65 69 74 68 65 72 20 69 6e 2d 75   are either in-u
2ef0: 73 65 20 6f 72 20 64 69 72 79 2e 0a 20 20 73 71  se or diry..  sq
2f00: 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65  lite3_release_me
2f10: 6d 6f 72 79 20 31 30 30 30 0a 20 20 6c 69 73 74  mory 1000.  list
2f20: 20 5b 6e 50 61 67 65 20 64 62 5d 20 5b 6e 50 61   [nPage db] [nPa
2f30: 67 65 20 64 62 32 5d 0a 7d 20 7b 30 20 33 7d 0a  ge db2].} {0 3}.
2f40: 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d  do_test malloc5-
2f50: 36 2e 33 2e 34 20 7b 0a 20 20 23 20 4e 6f 77 20  6.3.4 {.  # Now 
2f60: 72 65 6c 65 61 73 65 20 39 39 30 30 20 6d 6f 72  release 9900 mor
2f70: 65 20 28 61 62 6f 75 74 20 39 20 70 61 67 65 73  e (about 9 pages
2f80: 20 77 6f 72 74 68 29 2e 20 54 68 69 73 20 73 68   worth). This sh
2f90: 6f 75 6c 64 20 65 78 70 75 6e 67 65 0a 20 20 23  ould expunge.  #
2fa0: 20 74 68 65 20 72 65 73 74 20 6f 66 20 74 68 65   the rest of the
2fb0: 20 64 62 20 63 61 63 68 65 2e 20 42 75 74 20 74   db cache. But t
2fc0: 68 65 20 64 62 32 20 63 61 63 68 65 20 72 65 6d  he db2 cache rem
2fd0: 61 69 6e 73 20 69 6e 74 61 63 74 2c 20 62 65 63  ains intact, bec
2fe0: 61 75 73 65 0a 20 20 23 20 53 51 4c 69 74 65 20  ause.  # SQLite 
2ff0: 74 72 69 65 73 20 74 6f 20 61 76 6f 69 64 20 63  tries to avoid c
3000: 61 6c 6c 69 6e 67 20 73 79 6e 63 28 29 2e 0a 20  alling sync().. 
3010: 20 69 66 20 7b 24 3a 3a 74 63 6c 5f 70 6c 61 74   if {$::tcl_plat
3020: 66 6f 72 6d 28 77 6f 72 64 53 69 7a 65 29 3d 3d  form(wordSize)==
3030: 38 7d 20 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  8} {.    sqlite3
3040: 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 20  _release_memory 
3050: 31 30 35 30 30 0a 20 20 7d 20 65 6c 73 65 20 7b  10500.  } else {
3060: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 6c  .    sqlite3_rel
3070: 65 61 73 65 5f 6d 65 6d 6f 72 79 20 39 39 30 30  ease_memory 9900
3080: 0a 20 20 7d 0a 20 20 6c 69 73 74 20 5b 6e 50 61  .  }.  list [nPa
3090: 67 65 20 64 62 5d 20 5b 6e 50 61 67 65 20 64 62  ge db] [nPage db
30a0: 32 5d 0a 7d 20 7b 30 20 33 7d 0a 64 6f 5f 74 65  2].} {0 3}.do_te
30b0: 73 74 20 6d 61 6c 6c 6f 63 35 2d 36 2e 33 2e 35  st malloc5-6.3.5
30c0: 20 7b 0a 20 20 23 20 42 75 74 20 69 66 20 77 65   {.  # But if we
30d0: 20 61 72 65 20 72 65 61 6c 6c 79 20 69 6e 73 69   are really insi
30e0: 73 74 65 6e 74 2c 20 53 51 4c 69 74 65 20 77 69  stent, SQLite wi
30f0: 6c 6c 20 63 6f 6e 73 65 6e 74 20 74 6f 20 63 61  ll consent to ca
3100: 6c 6c 20 73 79 6e 63 28 29 0a 20 20 23 20 69 66  ll sync().  # if
3110: 20 74 68 65 72 65 20 69 73 20 6e 6f 20 6f 74 68   there is no oth
3120: 65 72 20 6f 70 74 69 6f 6e 2e 20 55 50 44 41 54  er option. UPDAT
3130: 45 3a 20 41 73 20 6f 66 20 33 2e 36 2e 32 2c 20  E: As of 3.6.2, 
3140: 53 51 4c 69 74 65 20 77 69 6c 6c 20 6e 6f 74 0a  SQLite will not.
3150: 20 20 23 20 63 61 6c 6c 20 73 79 6e 63 28 29 20    # call sync() 
3160: 69 6e 20 74 68 69 73 20 73 63 65 6e 61 72 69 6f  in this scenario
3170: 2e 20 53 6f 20 6e 6f 20 66 75 72 74 68 65 72 20  . So no further 
3180: 6d 65 6d 6f 72 79 20 63 61 6e 20 62 65 20 72 65  memory can be re
3190: 63 6c 61 69 6d 65 64 2e 0a 20 20 73 71 6c 69 74  claimed..  sqlit
31a0: 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f 72  e3_release_memor
31b0: 79 20 31 30 30 30 0a 20 20 6c 69 73 74 20 5b 6e  y 1000.  list [n
31c0: 50 61 67 65 20 64 62 5d 20 5b 6e 50 61 67 65 20  Page db] [nPage 
31d0: 64 62 32 5d 0a 7d 20 7b 30 20 33 7d 0a 64 6f 5f  db2].} {0 3}.do_
31e0: 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 36 2e 33  test malloc5-6.3
31f0: 2e 36 20 7b 0a 20 20 23 20 54 68 65 20 72 65 66  .6 {.  # The ref
3200: 65 72 65 6e 63 65 64 20 70 61 67 65 20 28 70 61  erenced page (pa
3210: 67 65 20 31 20 6f 66 20 74 68 65 20 64 62 32 20  ge 1 of the db2 
3220: 63 61 63 68 65 29 20 77 69 6c 6c 20 6e 6f 74 20  cache) will not 
3230: 62 65 20 66 72 65 65 64 20 6e 6f 0a 20 20 23 20  be freed no.  # 
3240: 6d 61 74 74 65 72 20 68 6f 77 20 6d 75 63 68 20  matter how much 
3250: 6d 65 6d 6f 72 79 20 77 65 20 61 73 6b 20 66 6f  memory we ask fo
3260: 72 3a 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 6c  r:.  sqlite3_rel
3270: 65 61 73 65 5f 6d 65 6d 6f 72 79 20 33 31 34 35  ease_memory 3145
3280: 39 0a 20 20 6c 69 73 74 20 5b 6e 50 61 67 65 20  9.  list [nPage 
3290: 64 62 5d 20 5b 6e 50 61 67 65 20 64 62 32 5d 0a  db] [nPage db2].
32a0: 7d 20 7b 30 20 33 7d 0a 0a 64 62 32 20 63 6c 6f  } {0 3}..db2 clo
32b0: 73 65 0a 0a 73 71 6c 69 74 65 33 5f 73 6f 66 74  se..sqlite3_soft
32c0: 5f 68 65 61 70 5f 6c 69 6d 69 74 20 24 3a 3a 73  _heap_limit $::s
32d0: 6f 66 74 5f 6c 69 6d 69 74 0a 74 65 73 74 5f 72  oft_limit.test_r
32e0: 65 73 74 6f 72 65 5f 63 6f 6e 66 69 67 5f 70 61  estore_config_pa
32f0: 67 65 63 61 63 68 65 0a 66 69 6e 69 73 68 5f 74  gecache.finish_t
3300: 65 73 74 0a 63 61 74 63 68 20 7b 64 62 20 63 6c  est.catch {db cl
3310: 6f 73 65 7d 0a                                   ose}.