/ Hex Artifact Content
Login

Artifact a577cbbcc1594c7763b9b3515b3633555751c7f0:


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 73 71 6c     return.}..sql
0530: 69 74 65 33 5f 73 6f 66 74 5f 68 65 61 70 5f 6c  ite3_soft_heap_l
0540: 69 6d 69 74 20 30 0a 73 71 6c 69 74 65 33 20 64  imit 0.sqlite3 d
0550: 62 20 74 65 73 74 2e 64 62 0a 0a 64 6f 5f 74 65  b test.db..do_te
0560: 73 74 20 6d 61 6c 6c 6f 63 35 2d 31 2e 31 20 7b  st malloc5-1.1 {
0570: 0a 20 20 23 20 53 69 6d 70 6c 65 73 74 20 70 6f  .  # Simplest po
0580: 73 73 69 62 6c 65 20 74 65 73 74 2e 20 43 61 6c  ssible test. Cal
0590: 6c 20 73 71 6c 69 74 65 33 5f 72 65 6c 65 61 73  l sqlite3_releas
05a0: 65 5f 6d 65 6d 6f 72 79 20 77 68 65 6e 20 74 68  e_memory when th
05b0: 65 72 65 20 69 73 20 65 78 61 63 74 6c 79 0a 20  ere is exactly. 
05c0: 20 23 20 6f 6e 65 20 75 6e 75 73 65 64 20 70 61   # one unused pa
05d0: 67 65 20 69 6e 20 61 20 73 69 6e 67 6c 65 20 70  ge in a single p
05e0: 61 67 65 72 20 63 61 63 68 65 2e 20 54 68 65 20  ager cache. The 
05f0: 70 61 67 65 20 63 61 6e 6e 6f 74 20 62 65 20 66  page cannot be f
0600: 72 65 65 64 2c 20 61 73 0a 20 20 23 20 69 74 20  reed, as.  # it 
0610: 69 73 20 64 69 72 74 79 2e 20 53 6f 20 73 71 6c  is dirty. So sql
0620: 69 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d  ite3_release_mem
0630: 6f 72 79 28 29 20 72 65 74 75 72 6e 73 20 30 2e  ory() returns 0.
0640: 0a 20 20 23 0a 20 20 65 78 65 63 73 71 6c 20 7b  .  #.  execsql {
0650: 0a 20 20 20 20 50 52 41 47 4d 41 20 61 75 74 6f  .    PRAGMA auto
0660: 5f 76 61 63 75 75 6d 3d 4f 46 46 3b 0a 20 20 20  _vacuum=OFF;.   
0670: 20 42 45 47 49 4e 3b 0a 20 20 20 20 43 52 45 41   BEGIN;.    CREA
0680: 54 45 20 54 41 42 4c 45 20 61 62 63 28 61 2c 20  TE TABLE abc(a, 
0690: 62 2c 20 63 29 3b 0a 20 20 7d 0a 20 20 73 71 6c  b, c);.  }.  sql
06a0: 69 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d  ite3_release_mem
06b0: 6f 72 79 0a 7d 20 7b 30 7d 0a 0a 64 6f 5f 74 65  ory.} {0}..do_te
06c0: 73 74 20 6d 61 6c 6c 6f 63 35 2d 31 2e 32 20 7b  st malloc5-1.2 {
06d0: 0a 20 20 23 20 54 65 73 74 20 74 68 61 74 20 74  .  # Test that t
06e0: 68 65 20 74 72 61 6e 73 61 63 74 69 6f 6e 20 73  he transaction s
06f0: 74 61 72 74 65 64 20 69 6e 20 74 68 65 20 61 62  tarted in the ab
0700: 6f 76 65 20 74 65 73 74 20 69 73 20 73 74 69 6c  ove test is stil
0710: 6c 20 61 63 74 69 76 65 2e 0a 20 20 23 20 54 68  l active..  # Th
0720: 65 20 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 64 61  e lock on the da
0730: 74 61 62 61 73 65 20 66 69 6c 65 20 73 68 6f 75  tabase file shou
0740: 6c 64 20 6e 6f 74 20 68 61 76 65 20 62 65 65 6e  ld not have been
0750: 20 75 70 67 72 61 64 65 64 20 28 74 68 69 73 20   upgraded (this 
0760: 77 61 73 0a 20 20 23 20 6e 6f 74 20 74 68 65 20  was.  # not the 
0770: 63 61 73 65 20 62 65 66 6f 72 65 20 76 65 72 73  case before vers
0780: 69 6f 6e 20 33 2e 36 2e 32 29 2e 0a 20 20 23 0a  ion 3.6.2)..  #.
0790: 20 20 73 71 6c 69 74 65 33 20 64 62 32 20 74 65    sqlite3 db2 te
07a0: 73 74 2e 64 62 0a 20 20 65 78 65 63 73 71 6c 20  st.db.  execsql 
07b0: 7b 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20  { SELECT * FROM 
07c0: 73 71 6c 69 74 65 5f 6d 61 73 74 65 72 20 7d 20  sqlite_master } 
07d0: 64 62 32 0a 7d 20 7b 7d 0a 64 6f 5f 74 65 73 74  db2.} {}.do_test
07e0: 20 6d 61 6c 6c 6f 63 35 2d 31 2e 33 20 7b 0a 20   malloc5-1.3 {. 
07f0: 20 23 20 43 61 6c 6c 20 5b 73 71 6c 69 74 65 33   # Call [sqlite3
0800: 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 5d  _release_memory]
0810: 20 77 68 65 6e 20 74 68 65 72 65 20 69 73 20 65   when there is e
0820: 78 61 63 74 6c 79 20 6f 6e 65 20 75 6e 75 73 65  xactly one unuse
0830: 64 20 70 61 67 65 20 0a 20 20 23 20 69 6e 20 74  d page .  # in t
0840: 68 65 20 63 61 63 68 65 20 62 65 6c 6f 6e 67 69  he cache belongi
0850: 6e 67 20 74 6f 20 64 62 32 2e 0a 20 20 23 0a 20  ng to db2..  #. 
0860: 20 73 65 74 20 3a 3a 70 67 61 6c 6c 6f 63 20 5b   set ::pgalloc [
0870: 73 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f  sqlite3_release_
0880: 6d 65 6d 6f 72 79 5d 0a 20 20 65 78 70 72 20 24  memory].  expr $
0890: 3a 3a 70 67 61 6c 6c 6f 63 20 3e 20 30 0a 7d 20  ::pgalloc > 0.} 
08a0: 7b 31 7d 0a 0a 64 6f 5f 74 65 73 74 20 6d 61 6c  {1}..do_test mal
08b0: 6c 6f 63 35 2d 31 2e 34 20 7b 0a 20 20 23 20 43  loc5-1.4 {.  # C
08c0: 6f 6d 6d 69 74 20 74 68 65 20 74 72 61 6e 73 61  ommit the transa
08d0: 63 74 69 6f 6e 20 61 6e 64 20 6f 70 65 6e 20 61  ction and open a
08e0: 20 6e 65 77 20 6f 6e 65 2e 20 52 65 61 64 20 31   new one. Read 1
08f0: 20 70 61 67 65 20 69 6e 74 6f 20 74 68 65 20 63   page into the c
0900: 61 63 68 65 2e 0a 20 20 23 20 42 65 63 61 75 73  ache..  # Becaus
0910: 65 20 74 68 65 20 70 61 67 65 20 69 73 20 6e 6f  e the page is no
0920: 74 20 64 69 72 74 79 2c 20 69 74 20 69 73 20 65  t dirty, it is e
0930: 6c 69 67 69 62 6c 65 20 66 6f 72 20 63 6f 6c 6c  ligible for coll
0940: 65 63 74 69 6f 6e 20 65 76 65 6e 0a 20 20 23 20  ection even.  # 
0950: 62 65 66 6f 72 65 20 74 68 65 20 74 72 61 6e 73  before the trans
0960: 61 63 74 69 6f 6e 20 69 73 20 63 6f 6e 63 6c 75  action is conclu
0970: 64 65 64 2e 0a 20 20 23 0a 20 20 65 78 65 63 73  ded..  #.  execs
0980: 71 6c 20 7b 0a 20 20 20 20 43 4f 4d 4d 49 54 3b  ql {.    COMMIT;
0990: 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20 20 20 20  .    BEGIN;.    
09a0: 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61 62  SELECT * FROM ab
09b0: 63 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33  c;.  }.  sqlite3
09c0: 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 0a  _release_memory.
09d0: 7d 20 24 3a 3a 70 67 61 6c 6c 6f 63 0a 0a 64 6f  } $::pgalloc..do
09e0: 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 31 2e  _test malloc5-1.
09f0: 35 20 7b 0a 20 20 23 20 43 6f 6e 63 6c 75 64 65  5 {.  # Conclude
0a00: 20 74 68 65 20 74 72 61 6e 73 61 63 74 69 6f 6e   the transaction
0a10: 20 6f 70 65 6e 65 64 20 69 6e 20 74 68 65 20 70   opened in the p
0a20: 72 65 76 69 6f 75 73 20 5b 64 6f 5f 74 65 73 74  revious [do_test
0a30: 5d 20 62 6c 6f 63 6b 2e 20 54 68 69 73 0a 20 20  ] block. This.  
0a40: 23 20 63 61 75 73 65 73 20 61 6e 6f 74 68 65 72  # causes another
0a50: 20 70 61 67 65 20 28 70 61 67 65 20 31 29 20 74   page (page 1) t
0a60: 6f 20 62 65 63 6f 6d 65 20 65 6c 69 67 69 62 6c  o become eligibl
0a70: 65 20 66 6f 72 20 72 65 63 79 63 6c 69 6e 67 2e  e for recycling.
0a80: 0a 20 20 23 0a 20 20 65 78 65 63 73 71 6c 20 7b  .  #.  execsql {
0a90: 20 43 4f 4d 4d 49 54 20 7d 0a 20 20 73 71 6c 69   COMMIT }.  sqli
0aa0: 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f  te3_release_memo
0ab0: 72 79 0a 7d 20 24 3a 3a 70 67 61 6c 6c 6f 63 0a  ry.} $::pgalloc.
0ac0: 0a 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35  .do_test malloc5
0ad0: 2d 31 2e 36 20 7b 0a 20 20 23 20 4d 61 6e 69 70  -1.6 {.  # Manip
0ae0: 75 6c 61 74 65 20 74 68 65 20 63 61 63 68 65 20  ulate the cache 
0af0: 73 6f 20 74 68 61 74 20 69 74 20 63 6f 6e 74 61  so that it conta
0b00: 69 6e 73 20 74 77 6f 20 75 6e 75 73 65 64 20 70  ins two unused p
0b10: 61 67 65 73 2e 20 4f 6e 65 20 72 65 71 75 69 72  ages. One requir
0b20: 65 73 20 0a 20 20 23 20 61 20 6a 6f 75 72 6e 61  es .  # a journa
0b30: 6c 2d 73 79 6e 63 20 74 6f 20 66 72 65 65 2c 20  l-sync to free, 
0b40: 74 68 65 20 6f 74 68 65 72 20 64 6f 65 73 20 6e  the other does n
0b50: 6f 74 2e 0a 20 20 64 62 32 20 63 6c 6f 73 65 0a  ot..  db2 close.
0b60: 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20    execsql {.    
0b70: 42 45 47 49 4e 3b 0a 20 20 20 20 53 45 4c 45 43  BEGIN;.    SELEC
0b80: 54 20 2a 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20  T * FROM abc;.  
0b90: 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 64    CREATE TABLE d
0ba0: 65 66 28 64 2c 20 65 2c 20 66 29 3b 0a 20 20 7d  ef(d, e, f);.  }
0bb0: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 6c 65 61  .  sqlite3_relea
0bc0: 73 65 5f 6d 65 6d 6f 72 79 20 35 30 30 0a 7d 20  se_memory 500.} 
0bd0: 24 3a 3a 70 67 61 6c 6c 6f 63 0a 0a 64 6f 5f 74  $::pgalloc..do_t
0be0: 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 31 2e 37 20  est malloc5-1.7 
0bf0: 7b 0a 20 20 23 20 44 61 74 61 62 61 73 65 20 73  {.  # Database s
0c00: 68 6f 75 6c 64 20 6e 6f 74 20 62 65 20 6c 6f 63  hould not be loc
0c10: 6b 65 64 20 74 68 69 73 20 74 69 6d 65 2e 20 0a  ked this time. .
0c20: 20 20 73 71 6c 69 74 65 33 20 64 62 32 20 74 65    sqlite3 db2 te
0c30: 73 74 2e 64 62 0a 20 20 63 61 74 63 68 73 71 6c  st.db.  catchsql
0c40: 20 7b 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d   { SELECT * FROM
0c50: 20 61 62 63 20 7d 20 64 62 32 0a 7d 20 7b 30 20   abc } db2.} {0 
0c60: 7b 7d 7d 0a 64 6f 5f 74 65 73 74 20 6d 61 6c 6c  {}}.do_test mall
0c70: 6f 63 35 2d 31 2e 38 20 7b 0a 20 20 23 20 54 72  oc5-1.8 {.  # Tr
0c80: 79 20 74 6f 20 72 65 6c 65 61 73 65 20 61 6e 6f  y to release ano
0c90: 74 68 65 72 20 62 6c 6f 63 6b 20 6f 66 20 6d 65  ther block of me
0ca0: 6d 6f 72 79 2e 20 54 68 69 73 20 77 69 6c 6c 20  mory. This will 
0cb0: 66 61 69 6c 20 61 73 20 74 68 65 20 6f 6e 6c 79  fail as the only
0cc0: 0a 20 20 23 20 70 61 67 65 73 20 63 75 72 72 65  .  # pages curre
0cd0: 6e 74 6c 79 20 69 6e 20 74 68 65 20 63 61 63 68  ntly in the cach
0ce0: 65 20 61 72 65 20 64 69 72 74 79 20 28 70 61 67  e are dirty (pag
0cf0: 65 20 33 29 20 6f 72 20 70 69 6e 6e 65 64 20 28  e 3) or pinned (
0d00: 70 61 67 65 20 31 29 2e 0a 20 20 64 62 32 20 63  page 1)..  db2 c
0d10: 6c 6f 73 65 0a 20 20 73 71 6c 69 74 65 33 5f 72  lose.  sqlite3_r
0d20: 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 20 35 30  elease_memory 50
0d30: 30 0a 7d 20 30 0a 64 6f 5f 74 65 73 74 20 6d 61  0.} 0.do_test ma
0d40: 6c 6c 6f 63 35 2d 31 2e 38 20 7b 0a 20 20 23 20  lloc5-1.8 {.  # 
0d50: 44 61 74 61 62 61 73 65 20 69 73 20 73 74 69 6c  Database is stil
0d60: 6c 20 6e 6f 74 20 6c 6f 63 6b 65 64 2e 0a 20 20  l not locked..  
0d70: 23 0a 20 20 73 71 6c 69 74 65 33 20 64 62 32 20  #.  sqlite3 db2 
0d80: 74 65 73 74 2e 64 62 0a 20 20 63 61 74 63 68 73  test.db.  catchs
0d90: 71 6c 20 7b 20 53 45 4c 45 43 54 20 2a 20 46 52  ql { SELECT * FR
0da0: 4f 4d 20 61 62 63 20 7d 20 64 62 32 0a 7d 20 7b  OM abc } db2.} {
0db0: 30 20 7b 7d 7d 0a 64 6f 5f 74 65 73 74 20 6d 61  0 {}}.do_test ma
0dc0: 6c 6c 6f 63 35 2d 31 2e 39 20 7b 0a 20 20 65 78  lloc5-1.9 {.  ex
0dd0: 65 63 73 71 6c 20 7b 0a 20 20 20 20 43 4f 4d 4d  ecsql {.    COMM
0de0: 49 54 3b 0a 20 20 7d 0a 7d 20 7b 7d 0a 0a 64 6f  IT;.  }.} {}..do
0df0: 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 32 2e  _test malloc5-2.
0e00: 31 20 7b 0a 20 20 23 20 50 75 74 20 73 6f 6d 65  1 {.  # Put some
0e10: 20 64 61 74 61 20 69 6e 20 74 61 62 6c 65 73 20   data in tables 
0e20: 61 62 63 20 61 6e 64 20 64 65 66 2e 20 42 6f 74  abc and def. Bot
0e30: 68 20 74 61 62 6c 65 73 20 61 72 65 20 73 74 69  h tables are sti
0e40: 6c 6c 20 77 68 6f 6c 6c 79 20 0a 20 20 23 20 63  ll wholly .  # c
0e50: 6f 6e 74 61 69 6e 65 64 20 77 69 74 68 69 6e 20  ontained within 
0e60: 74 68 65 69 72 20 72 6f 6f 74 20 70 61 67 65 73  their root pages
0e70: 2e 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20  ..  execsql {.  
0e80: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62    INSERT INTO ab
0e90: 63 20 56 41 4c 55 45 53 28 31 2c 20 32 2c 20 33  c VALUES(1, 2, 3
0ea0: 29 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e  );.    INSERT IN
0eb0: 54 4f 20 61 62 63 20 56 41 4c 55 45 53 28 34 2c  TO abc VALUES(4,
0ec0: 20 35 2c 20 36 29 3b 0a 20 20 20 20 49 4e 53 45   5, 6);.    INSE
0ed0: 52 54 20 49 4e 54 4f 20 64 65 66 20 56 41 4c 55  RT INTO def VALU
0ee0: 45 53 28 37 2c 20 38 2c 20 39 29 3b 0a 20 20 20  ES(7, 8, 9);.   
0ef0: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 64 65 66   INSERT INTO def
0f00: 20 56 41 4c 55 45 53 28 31 30 2c 31 31 2c 31 32   VALUES(10,11,12
0f10: 29 3b 0a 20 20 7d 0a 7d 20 7b 7d 0a 64 6f 5f 74  );.  }.} {}.do_t
0f20: 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 32 2e 32 20  est malloc5-2.2 
0f30: 7b 0a 20 20 23 20 4c 6f 61 64 20 74 68 65 20 72  {.  # Load the r
0f40: 6f 6f 74 2d 70 61 67 65 20 66 6f 72 20 74 61 62  oot-page for tab
0f50: 6c 65 20 64 65 66 20 69 6e 74 6f 20 74 68 65 20  le def into the 
0f60: 63 61 63 68 65 2e 20 54 68 65 6e 20 71 75 65 72  cache. Then quer
0f70: 79 20 74 61 62 6c 65 20 61 62 63 2e 20 0a 20 20  y table abc. .  
0f80: 23 20 48 61 6c 66 77 61 79 20 74 68 72 6f 75 67  # Halfway throug
0f90: 68 20 74 68 65 20 71 75 65 72 79 20 63 61 6c 6c  h the query call
0fa0: 20 73 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65   sqlite3_release
0fb0: 5f 6d 65 6d 6f 72 79 28 29 2e 20 54 68 65 20 67  _memory(). The g
0fc0: 6f 61 6c 20 6f 66 20 74 68 69 73 0a 20 20 23 20  oal of this.  # 
0fd0: 74 65 73 74 20 69 73 20 74 6f 20 6d 61 6b 65 20  test is to make 
0fe0: 73 75 72 65 20 77 65 20 64 6f 6e 27 74 20 66 72  sure we don't fr
0ff0: 65 65 20 70 61 67 65 73 20 74 68 61 74 20 61 72  ee pages that ar
1000: 65 20 69 6e 20 75 73 65 20 28 73 70 65 63 69 66  e in use (specif
1010: 69 63 61 6c 6c 79 2c 20 0a 20 20 23 20 74 68 65  ically, .  # the
1020: 20 72 6f 6f 74 20 6f 66 20 74 61 62 6c 65 20 61   root of table a
1030: 62 63 29 2e 0a 20 20 73 71 6c 69 74 65 33 5f 72  bc)..  sqlite3_r
1040: 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 0a 20 20  elease_memory.  
1050: 73 65 74 20 6e 52 65 6c 65 61 73 65 20 30 0a 20  set nRelease 0. 
1060: 20 65 78 65 63 73 71 6c 20 7b 20 0a 20 20 20 20   execsql { .    
1070: 42 45 47 49 4e 3b 0a 20 20 20 20 53 45 4c 45 43  BEGIN;.    SELEC
1080: 54 20 2a 20 46 52 4f 4d 20 64 65 66 3b 0a 20 20  T * FROM def;.  
1090: 7d 0a 20 20 73 65 74 20 64 61 74 61 20 5b 6c 69  }.  set data [li
10a0: 73 74 5d 0a 20 20 64 62 20 65 76 61 6c 20 7b 53  st].  db eval {S
10b0: 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61 62 63  ELECT * FROM abc
10c0: 7d 20 7b 0a 20 20 20 20 69 6e 63 72 20 6e 52 65  } {.    incr nRe
10d0: 6c 65 61 73 65 20 5b 73 71 6c 69 74 65 33 5f 72  lease [sqlite3_r
10e0: 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 5d 0a 20  elease_memory]. 
10f0: 20 20 20 6c 61 70 70 65 6e 64 20 64 61 74 61 20     lappend data 
1100: 24 61 20 24 62 20 24 63 0a 20 20 7d 0a 20 20 65  $a $b $c.  }.  e
1110: 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 43 4f 4d  xecsql {.    COM
1120: 4d 49 54 3b 0a 20 20 7d 0a 20 20 6c 69 73 74 20  MIT;.  }.  list 
1130: 24 6e 52 65 6c 65 61 73 65 20 24 64 61 74 61 0a  $nRelease $data.
1140: 7d 20 5b 6c 69 73 74 20 24 70 67 61 6c 6c 6f 63  } [list $pgalloc
1150: 20 5b 6c 69 73 74 20 31 20 32 20 33 20 34 20 35   [list 1 2 3 4 5
1160: 20 36 5d 5d 0a 0a 64 6f 5f 74 65 73 74 20 6d 61   6]]..do_test ma
1170: 6c 6c 6f 63 35 2d 33 2e 31 20 7b 0a 20 20 23 20  lloc5-3.1 {.  # 
1180: 53 69 6d 70 6c 65 20 74 65 73 74 20 74 6f 20 73  Simple test to s
1190: 68 6f 77 20 74 68 61 74 20 69 66 20 74 77 6f 20  how that if two 
11a0: 70 61 67 65 72 73 20 61 72 65 20 6f 70 65 6e 65  pagers are opene
11b0: 64 20 66 72 6f 6d 20 77 69 74 68 69 6e 20 74 68  d from within th
11c0: 69 73 0a 20 20 23 20 74 68 72 65 61 64 2c 20 6d  is.  # thread, m
11d0: 65 6d 6f 72 79 20 69 73 20 66 72 65 65 64 20 66  emory is freed f
11e0: 72 6f 6d 20 62 6f 74 68 20 77 68 65 6e 20 73 71  rom both when sq
11f0: 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65  lite3_release_me
1200: 6d 6f 72 79 28 29 20 69 73 0a 20 20 23 20 63 61  mory() is.  # ca
1210: 6c 6c 65 64 2e 0a 20 20 65 78 65 63 73 71 6c 20  lled..  execsql 
1220: 7b 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20 20 20  {.    BEGIN;.   
1230: 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61   SELECT * FROM a
1240: 62 63 3b 0a 20 20 7d 0a 20 20 65 78 65 63 73 71  bc;.  }.  execsq
1250: 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a  l {.    SELECT *
1260: 20 46 52 4f 4d 20 73 71 6c 69 74 65 5f 6d 61 73   FROM sqlite_mas
1270: 74 65 72 3b 0a 20 20 20 20 42 45 47 49 4e 3b 0a  ter;.    BEGIN;.
1280: 20 20 20 20 53 45 4c 45 43 54 20 2a 20 46 52 4f      SELECT * FRO
1290: 4d 20 64 65 66 3b 0a 20 20 7d 20 64 62 32 0a 20  M def;.  } db2. 
12a0: 20 73 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65   sqlite3_release
12b0: 5f 6d 65 6d 6f 72 79 0a 7d 20 5b 65 78 70 72 20  _memory.} [expr 
12c0: 24 3a 3a 70 67 61 6c 6c 6f 63 20 2a 20 32 5d 0a  $::pgalloc * 2].
12d0: 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d  do_test malloc5-
12e0: 33 2e 32 20 7b 0a 20 20 63 6f 6e 63 61 74 20 5c  3.2 {.  concat \
12f0: 0a 20 20 20 20 5b 65 78 65 63 73 71 6c 20 7b 53  .    [execsql {S
1300: 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61 62 63  ELECT * FROM abc
1310: 3b 20 43 4f 4d 4d 49 54 7d 5d 20 5c 0a 20 20 20  ; COMMIT}] \.   
1320: 20 5b 65 78 65 63 73 71 6c 20 7b 53 45 4c 45 43   [execsql {SELEC
1330: 54 20 2a 20 46 52 4f 4d 20 64 65 66 3b 20 43 4f  T * FROM def; CO
1340: 4d 4d 49 54 7d 20 64 62 32 5d 0a 7d 20 7b 31 20  MMIT} db2].} {1 
1350: 32 20 33 20 34 20 35 20 36 20 37 20 38 20 39 20  2 3 4 5 6 7 8 9 
1360: 31 30 20 31 31 20 31 32 7d 0a 0a 64 62 32 20 63  10 11 12}..db2 c
1370: 6c 6f 73 65 0a 70 75 74 73 20 22 48 69 67 68 77  lose.puts "Highw
1380: 61 74 65 72 20 6d 61 72 6b 3a 20 5b 73 71 6c 69  ater mark: [sqli
1390: 74 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67 68 77  te3_memory_highw
13a0: 61 74 65 72 5d 22 0a 0a 23 20 54 68 65 20 66 6f  ater]"..# The fo
13b0: 6c 6c 6f 77 69 6e 67 20 74 77 6f 20 74 65 73 74  llowing two test
13c0: 20 63 61 73 65 73 20 65 61 63 68 20 65 78 65 63   cases each exec
13d0: 75 74 65 20 61 20 74 72 61 6e 73 61 63 74 69 6f  ute a transactio
13e0: 6e 20 69 6e 20 77 68 69 63 68 20 0a 23 20 31 30  n in which .# 10
13f0: 30 30 30 20 72 6f 77 73 20 61 72 65 20 69 6e 73  000 rows are ins
1400: 65 72 74 65 64 20 69 6e 74 6f 20 74 61 62 6c 65  erted into table
1410: 20 61 62 63 2e 20 54 68 65 20 66 69 72 73 74 20   abc. The first 
1420: 74 65 73 74 20 63 61 73 65 20 69 73 20 75 73 65  test case is use
1430: 64 0a 23 20 74 6f 20 65 6e 73 75 72 65 20 74 68  d.# to ensure th
1440: 61 74 20 6d 6f 72 65 20 74 68 61 6e 20 31 4d 42  at more than 1MB
1450: 20 6f 66 20 64 79 6e 61 6d 69 63 20 6d 65 6d 6f   of dynamic memo
1460: 72 79 20 69 73 20 75 73 65 64 20 74 6f 20 70 65  ry is used to pe
1470: 72 66 6f 72 6d 0a 23 20 74 68 65 20 74 72 61 6e  rform.# the tran
1480: 73 61 63 74 69 6f 6e 2e 20 0a 23 0a 23 20 54 68  saction. .#.# Th
1490: 65 20 73 65 63 6f 6e 64 20 74 65 73 74 20 63 61  e second test ca
14a0: 73 65 20 73 65 74 73 20 74 68 65 20 22 73 6f 66  se sets the "sof
14b0: 74 2d 68 65 61 70 2d 6c 69 6d 69 74 22 20 74 6f  t-heap-limit" to
14c0: 20 31 30 30 2c 30 30 30 20 62 79 74 65 73 20 28   100,000 bytes (
14d0: 30 2e 31 20 4d 42 29 0a 23 20 61 6e 64 20 74 65  0.1 MB).# and te
14e0: 73 74 73 20 74 6f 20 73 65 65 20 74 68 61 74 20  sts to see that 
14f0: 74 68 69 73 20 6c 69 6d 69 74 20 69 73 20 6e 6f  this limit is no
1500: 74 20 65 78 63 65 65 64 65 64 20 61 74 20 61 6e  t exceeded at an
1510: 79 20 70 6f 69 6e 74 20 64 75 72 69 6e 67 20 0a  y point during .
1520: 23 20 74 72 61 6e 73 61 63 74 69 6f 6e 20 65 78  # transaction ex
1530: 65 63 75 74 69 6f 6e 2e 0a 23 0a 23 20 42 65 66  ecution..#.# Bef
1540: 6f 72 65 20 65 78 65 63 75 74 69 6e 67 20 6d 61  ore executing ma
1550: 6c 6c 6f 63 35 2d 34 2e 2a 20 77 65 20 73 61 76  lloc5-4.* we sav
1560: 65 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74  e the value of t
1570: 68 65 20 63 75 72 72 65 6e 74 20 73 6f 66 74 20  he current soft 
1580: 68 65 61 70 20 0a 23 20 6c 69 6d 69 74 20 69 6e  heap .# limit in
1590: 20 76 61 72 69 61 62 6c 65 20 3a 3a 73 6f 66 74   variable ::soft
15a0: 5f 6c 69 6d 69 74 2e 20 54 68 65 20 6f 72 69 67  _limit. The orig
15b0: 69 6e 61 6c 20 76 61 6c 75 65 20 69 73 20 72 65  inal value is re
15c0: 73 74 6f 72 65 64 20 61 66 74 65 72 20 0a 23 20  stored after .# 
15d0: 72 75 6e 6e 69 6e 67 20 74 68 65 20 74 65 73 74  running the test
15e0: 73 2e 0a 23 0a 73 65 74 20 3a 3a 73 6f 66 74 5f  s..#.set ::soft_
15f0: 6c 69 6d 69 74 20 5b 73 71 6c 69 74 65 33 5f 73  limit [sqlite3_s
1600: 6f 66 74 5f 68 65 61 70 5f 6c 69 6d 69 74 20 2d  oft_heap_limit -
1610: 31 5d 0a 65 78 65 63 73 71 6c 20 7b 50 52 41 47  1].execsql {PRAG
1620: 4d 41 20 63 61 63 68 65 5f 73 69 7a 65 3d 32 30  MA cache_size=20
1630: 30 30 7d 0a 64 6f 5f 74 65 73 74 20 6d 61 6c 6c  00}.do_test mall
1640: 6f 63 35 2d 34 2e 31 20 7b 0a 20 20 65 78 65 63  oc5-4.1 {.  exec
1650: 73 71 6c 20 7b 42 45 47 49 4e 3b 7d 0a 20 20 65  sql {BEGIN;}.  e
1660: 78 65 63 73 71 6c 20 7b 44 45 4c 45 54 45 20 46  xecsql {DELETE F
1670: 52 4f 4d 20 61 62 63 3b 7d 0a 20 20 66 6f 72 20  ROM abc;}.  for 
1680: 7b 73 65 74 20 69 20 30 7d 20 7b 24 69 20 3c 20  {set i 0} {$i < 
1690: 31 30 30 30 30 7d 20 7b 69 6e 63 72 20 69 7d 20  10000} {incr i} 
16a0: 7b 0a 20 20 20 20 65 78 65 63 73 71 6c 20 22 49  {.    execsql "I
16b0: 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63 20 56  NSERT INTO abc V
16c0: 41 4c 55 45 53 28 24 69 2c 20 24 69 2c 20 27 5b  ALUES($i, $i, '[
16d0: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 58 20  string repeat X 
16e0: 31 30 30 5d 27 29 3b 22 0a 20 20 7d 0a 20 20 65  100]');".  }.  e
16f0: 78 65 63 73 71 6c 20 7b 43 4f 4d 4d 49 54 3b 7d  xecsql {COMMIT;}
1700: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 6c 65 61  .  sqlite3_relea
1710: 73 65 5f 6d 65 6d 6f 72 79 0a 20 20 73 71 6c 69  se_memory.  sqli
1720: 74 65 33 5f 6d 65 6d 6f 72 79 5f 68 69 67 68 77  te3_memory_highw
1730: 61 74 65 72 20 31 0a 20 20 65 78 65 63 73 71 6c  ater 1.  execsql
1740: 20 7b 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20   {SELECT * FROM 
1750: 61 62 63 7d 0a 20 20 73 65 74 20 6e 4d 61 78 42  abc}.  set nMaxB
1760: 79 74 65 73 20 5b 73 71 6c 69 74 65 33 5f 6d 65  ytes [sqlite3_me
1770: 6d 6f 72 79 5f 68 69 67 68 77 61 74 65 72 20 31  mory_highwater 1
1780: 5d 0a 20 20 70 75 74 73 20 2d 6e 6f 6e 65 77 6c  ].  puts -nonewl
1790: 69 6e 65 20 22 20 28 48 69 67 68 77 61 74 65 72  ine " (Highwater
17a0: 20 6d 61 72 6b 3a 20 24 6e 4d 61 78 42 79 74 65   mark: $nMaxByte
17b0: 73 29 20 22 0a 20 20 65 78 70 72 20 24 6e 4d 61  s) ".  expr $nMa
17c0: 78 42 79 74 65 73 20 3e 20 31 30 30 30 30 30 30  xBytes > 1000000
17d0: 0a 7d 20 7b 31 7d 0a 64 6f 5f 74 65 73 74 20 6d  .} {1}.do_test m
17e0: 61 6c 6c 6f 63 35 2d 34 2e 32 20 7b 0a 20 20 73  alloc5-4.2 {.  s
17f0: 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d  qlite3_release_m
1800: 65 6d 6f 72 79 0a 20 20 73 71 6c 69 74 65 33 5f  emory.  sqlite3_
1810: 73 6f 66 74 5f 68 65 61 70 5f 6c 69 6d 69 74 20  soft_heap_limit 
1820: 31 30 30 30 30 30 0a 20 20 73 71 6c 69 74 65 33  100000.  sqlite3
1830: 5f 6d 65 6d 6f 72 79 5f 68 69 67 68 77 61 74 65  _memory_highwate
1840: 72 20 31 0a 20 20 65 78 65 63 73 71 6c 20 7b 53  r 1.  execsql {S
1850: 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61 62 63  ELECT * FROM abc
1860: 7d 0a 20 20 73 65 74 20 6e 4d 61 78 42 79 74 65  }.  set nMaxByte
1870: 73 20 5b 73 71 6c 69 74 65 33 5f 6d 65 6d 6f 72  s [sqlite3_memor
1880: 79 5f 68 69 67 68 77 61 74 65 72 20 31 5d 0a 20  y_highwater 1]. 
1890: 20 70 75 74 73 20 2d 6e 6f 6e 65 77 6c 69 6e 65   puts -nonewline
18a0: 20 22 20 28 48 69 67 68 77 61 74 65 72 20 6d 61   " (Highwater ma
18b0: 72 6b 3a 20 24 6e 4d 61 78 42 79 74 65 73 29 20  rk: $nMaxBytes) 
18c0: 22 0a 20 20 65 78 70 72 20 24 6e 4d 61 78 42 79  ".  expr $nMaxBy
18d0: 74 65 73 20 3c 3d 20 31 31 30 30 30 30 0a 7d 20  tes <= 110000.} 
18e0: 7b 31 7d 0a 64 6f 5f 74 65 73 74 20 6d 61 6c 6c  {1}.do_test mall
18f0: 6f 63 35 2d 34 2e 33 20 7b 0a 20 20 23 20 43 68  oc5-4.3 {.  # Ch
1900: 65 63 6b 20 74 68 61 74 20 74 68 65 20 63 6f 6e  eck that the con
1910: 74 65 6e 74 20 6f 66 20 74 61 62 6c 65 20 61 62  tent of table ab
1920: 63 20 69 73 20 61 74 20 6c 65 61 73 74 20 72 6f  c is at least ro
1930: 75 67 68 6c 79 20 61 73 20 65 78 70 65 63 74 65  ughly as expecte
1940: 64 2e 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20  d..  execsql {. 
1950: 20 20 20 53 45 4c 45 43 54 20 63 6f 75 6e 74 28     SELECT count(
1960: 2a 29 2c 20 73 75 6d 28 61 29 2c 20 73 75 6d 28  *), sum(a), sum(
1970: 62 29 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 7d  b) FROM abc;.  }
1980: 0a 7d 20 5b 6c 69 73 74 20 31 30 30 30 30 20 5b  .} [list 10000 [
1990: 65 78 70 72 20 69 6e 74 28 31 30 30 30 30 2e 30  expr int(10000.0
19a0: 20 2a 20 34 39 39 39 2e 35 29 5d 20 5b 65 78 70   * 4999.5)] [exp
19b0: 72 20 69 6e 74 28 31 30 30 30 30 2e 30 20 2a 20  r int(10000.0 * 
19c0: 34 39 39 39 2e 35 29 5d 5d 0a 0a 23 20 52 65 73  4999.5)]]..# Res
19d0: 74 6f 72 65 20 74 68 65 20 73 6f 66 74 20 68 65  tore the soft he
19e0: 61 70 20 6c 69 6d 69 74 2e 0a 73 71 6c 69 74 65  ap limit..sqlite
19f0: 33 5f 73 6f 66 74 5f 68 65 61 70 5f 6c 69 6d 69  3_soft_heap_limi
1a00: 74 20 24 3a 3a 73 6f 66 74 5f 6c 69 6d 69 74 0a  t $::soft_limit.
1a10: 0a 23 20 54 65 73 74 20 74 68 61 74 20 74 68 65  .# Test that the
1a20: 72 65 20 61 72 65 20 6e 6f 20 70 72 6f 62 6c 65  re are no proble
1a30: 6d 73 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74  ms calling sqlit
1a40: 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f 72  e3_release_memor
1a50: 79 20 77 68 65 6e 0a 23 20 74 68 65 72 65 20 61  y when.# there a
1a60: 72 65 20 6f 70 65 6e 20 69 6e 2d 6d 65 6d 6f 72  re open in-memor
1a70: 79 20 64 61 74 61 62 61 73 65 73 2e 0a 23 0a 23  y databases..#.#
1a80: 20 41 74 20 6f 6e 65 20 70 6f 69 6e 74 20 74 68   At one point th
1a90: 65 73 65 20 74 65 73 74 73 20 77 6f 75 6c 64 20  ese tests would 
1aa0: 63 61 75 73 65 20 61 20 73 65 67 2d 66 61 75 6c  cause a seg-faul
1ab0: 74 2e 0a 23 0a 64 6f 5f 74 65 73 74 20 6d 61 6c  t..#.do_test mal
1ac0: 6c 6f 63 35 2d 35 2e 31 20 7b 0a 20 20 64 62 20  loc5-5.1 {.  db 
1ad0: 63 6c 6f 73 65 0a 20 20 73 71 6c 69 74 65 33 20  close.  sqlite3 
1ae0: 64 62 20 3a 6d 65 6d 6f 72 79 3a 0a 20 20 65 78  db :memory:.  ex
1af0: 65 63 73 71 6c 20 7b 0a 20 20 20 20 42 45 47 49  ecsql {.    BEGI
1b00: 4e 3b 0a 20 20 20 20 43 52 45 41 54 45 20 54 41  N;.    CREATE TA
1b10: 42 4c 45 20 61 62 63 28 61 2c 20 62 2c 20 63 29  BLE abc(a, b, c)
1b20: 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54  ;.    INSERT INT
1b30: 4f 20 61 62 63 20 56 41 4c 55 45 53 28 27 61 62  O abc VALUES('ab
1b40: 63 64 65 66 67 68 69 27 2c 20 31 32 33 34 35 36  cdefghi', 123456
1b50: 37 38 39 30 2c 20 4e 55 4c 4c 29 3b 0a 20 20 20  7890, NULL);.   
1b60: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63   INSERT INTO abc
1b70: 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61   SELECT * FROM a
1b80: 62 63 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49  bc;.    INSERT I
1b90: 4e 54 4f 20 61 62 63 20 53 45 4c 45 43 54 20 2a  NTO abc SELECT *
1ba0: 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 20 20 49   FROM abc;.    I
1bb0: 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63 20 53  NSERT INTO abc S
1bc0: 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61 62 63  ELECT * FROM abc
1bd0: 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54  ;.    INSERT INT
1be0: 4f 20 61 62 63 20 53 45 4c 45 43 54 20 2a 20 46  O abc SELECT * F
1bf0: 52 4f 4d 20 61 62 63 3b 0a 20 20 20 20 49 4e 53  ROM abc;.    INS
1c00: 45 52 54 20 49 4e 54 4f 20 61 62 63 20 53 45 4c  ERT INTO abc SEL
1c10: 45 43 54 20 2a 20 46 52 4f 4d 20 61 62 63 3b 0a  ECT * FROM abc;.
1c20: 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20      INSERT INTO 
1c30: 61 62 63 20 53 45 4c 45 43 54 20 2a 20 46 52 4f  abc SELECT * FRO
1c40: 4d 20 61 62 63 3b 0a 20 20 20 20 49 4e 53 45 52  M abc;.    INSER
1c50: 54 20 49 4e 54 4f 20 61 62 63 20 53 45 4c 45 43  T INTO abc SELEC
1c60: 54 20 2a 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20  T * FROM abc;.  
1c70: 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 6c 65  }.  sqlite3_rele
1c80: 61 73 65 5f 6d 65 6d 6f 72 79 0a 7d 20 30 0a 64  ase_memory.} 0.d
1c90: 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 35  o_test malloc5-5
1ca0: 2e 32 20 7b 0a 20 20 73 71 6c 69 74 65 33 5f 73  .2 {.  sqlite3_s
1cb0: 6f 66 74 5f 68 65 61 70 5f 6c 69 6d 69 74 20 35  oft_heap_limit 5
1cc0: 30 30 30 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a  000.  execsql {.
1cd0: 20 20 20 20 43 4f 4d 4d 49 54 3b 0a 20 20 20 20      COMMIT;.    
1ce0: 50 52 41 47 4d 41 20 74 65 6d 70 5f 73 74 6f 72  PRAGMA temp_stor
1cf0: 65 20 3d 20 6d 65 6d 6f 72 79 3b 0a 20 20 20 20  e = memory;.    
1d00: 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61 62  SELECT * FROM ab
1d10: 63 20 4f 52 44 45 52 20 42 59 20 61 3b 0a 20 20  c ORDER BY a;.  
1d20: 7d 0a 20 20 65 78 70 72 20 31 0a 7d 20 7b 31 7d  }.  expr 1.} {1}
1d30: 0a 73 71 6c 69 74 65 33 5f 73 6f 66 74 5f 68 65  .sqlite3_soft_he
1d40: 61 70 5f 6c 69 6d 69 74 20 24 3a 3a 73 6f 66 74  ap_limit $::soft
1d50: 5f 6c 69 6d 69 74 0a 0a 23 2d 2d 2d 2d 2d 2d 2d  _limit..#-------
1d60: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
1d70: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
1d80: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
1d90: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
1da0: 2d 2d 0a 23 20 54 68 65 20 66 6f 6c 6c 6f 77 69  --.# The followi
1db0: 6e 67 20 74 65 73 74 20 63 61 73 65 73 20 28 6d  ng test cases (m
1dc0: 61 6c 6c 6f 63 35 2d 36 2e 2a 29 20 74 65 73 74  alloc5-6.*) test
1dd0: 20 74 68 65 20 6e 65 77 20 67 6c 6f 62 61 6c 20   the new global 
1de0: 4c 52 55 20 6c 69 73 74 0a 23 20 75 73 65 64 20  LRU list.# used 
1df0: 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 74 68 65  to determine the
1e00: 20 70 61 67 65 73 20 74 6f 20 72 65 63 79 63 6c   pages to recycl
1e10: 65 20 77 68 65 6e 20 73 71 6c 69 74 65 33 5f 72  e when sqlite3_r
1e20: 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 20 69 73  elease_memory is
1e30: 0a 23 20 63 61 6c 6c 65 64 20 61 6e 64 20 74 68  .# called and th
1e40: 65 72 65 20 69 73 20 6d 6f 72 65 20 74 68 61 6e  ere is more than
1e50: 20 6f 6e 65 20 70 61 67 65 72 20 6f 70 65 6e 2e   one pager open.
1e60: 0a 23 0a 70 72 6f 63 20 6e 50 61 67 65 20 7b 64  .#.proc nPage {d
1e70: 62 7d 20 7b 0a 20 20 73 65 74 20 62 74 20 5b 62  b} {.  set bt [b
1e80: 74 72 65 65 5f 66 72 6f 6d 5f 64 62 20 24 64 62  tree_from_db $db
1e90: 5d 0a 20 20 61 72 72 61 79 20 73 65 74 20 73 74  ].  array set st
1ea0: 61 74 73 20 5b 62 74 72 65 65 5f 70 61 67 65 72  ats [btree_pager
1eb0: 5f 73 74 61 74 73 20 24 62 74 5d 0a 20 20 73 65  _stats $bt].  se
1ec0: 74 20 73 74 61 74 73 28 70 61 67 65 29 0a 7d 0a  t stats(page).}.
1ed0: 64 62 20 63 6c 6f 73 65 0a 66 6f 72 63 65 64 65  db close.forcede
1ee0: 6c 65 74 65 20 74 65 73 74 2e 64 62 20 74 65 73  lete test.db tes
1ef0: 74 2e 64 62 2d 6a 6f 75 72 6e 61 6c 20 74 65 73  t.db-journal tes
1f00: 74 32 2e 64 62 20 74 65 73 74 32 2e 64 62 2d 6a  t2.db test2.db-j
1f10: 6f 75 72 6e 61 6c 0a 0a 23 20 54 68 69 73 20 62  ournal..# This b
1f20: 6c 6f 63 6b 20 6f 66 20 74 65 73 74 2d 63 61 73  lock of test-cas
1f30: 65 73 20 28 6d 61 6c 6c 6f 63 35 2d 36 2e 31 2e  es (malloc5-6.1.
1f40: 2a 29 20 70 72 65 70 61 72 65 73 20 74 77 6f 20  *) prepares two 
1f50: 64 61 74 61 62 61 73 65 20 66 69 6c 65 73 0a 23  database files.#
1f60: 20 66 6f 72 20 74 68 65 20 73 75 62 73 65 71 75   for the subsequ
1f70: 65 6e 74 20 74 65 73 74 73 2e 0a 64 6f 5f 74 65  ent tests..do_te
1f80: 73 74 20 6d 61 6c 6c 6f 63 35 2d 36 2e 31 2e 31  st malloc5-6.1.1
1f90: 20 7b 0a 20 20 73 71 6c 69 74 65 33 20 64 62 20   {.  sqlite3 db 
1fa0: 74 65 73 74 2e 64 62 0a 20 20 65 78 65 63 73 71  test.db.  execsq
1fb0: 6c 20 7b 0a 20 20 20 20 50 52 41 47 4d 41 20 70  l {.    PRAGMA p
1fc0: 61 67 65 5f 73 69 7a 65 3d 31 30 32 34 3b 0a 20  age_size=1024;. 
1fd0: 20 20 20 50 52 41 47 4d 41 20 64 65 66 61 75 6c     PRAGMA defaul
1fe0: 74 5f 63 61 63 68 65 5f 73 69 7a 65 3d 31 30 3b  t_cache_size=10;
1ff0: 0a 20 20 7d 0a 20 20 65 78 65 63 73 71 6c 20 7b  .  }.  execsql {
2000: 0a 20 20 20 20 50 52 41 47 4d 41 20 74 65 6d 70  .    PRAGMA temp
2010: 5f 73 74 6f 72 65 20 3d 20 6d 65 6d 6f 72 79 3b  _store = memory;
2020: 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20 20 20 20  .    BEGIN;.    
2030: 43 52 45 41 54 45 20 54 41 42 4c 45 20 61 62 63  CREATE TABLE abc
2040: 28 61 20 50 52 49 4d 41 52 59 20 4b 45 59 2c 20  (a PRIMARY KEY, 
2050: 62 2c 20 63 29 3b 0a 20 20 20 20 49 4e 53 45 52  b, c);.    INSER
2060: 54 20 49 4e 54 4f 20 61 62 63 20 56 41 4c 55 45  T INTO abc VALUE
2070: 53 28 72 61 6e 64 73 74 72 28 35 30 2c 35 30 29  S(randstr(50,50)
2080: 2c 20 72 61 6e 64 73 74 72 28 37 35 2c 37 35 29  , randstr(75,75)
2090: 2c 20 72 61 6e 64 73 74 72 28 31 30 30 2c 31 30  , randstr(100,10
20a0: 30 29 29 3b 0a 20 20 20 20 49 4e 53 45 52 54 20  0));.    INSERT 
20b0: 49 4e 54 4f 20 61 62 63 20 0a 20 20 20 20 20 20  INTO abc .      
20c0: 20 20 53 45 4c 45 43 54 20 72 61 6e 64 73 74 72    SELECT randstr
20d0: 28 35 30 2c 35 30 29 2c 20 72 61 6e 64 73 74 72  (50,50), randstr
20e0: 28 37 35 2c 37 35 29 2c 20 72 61 6e 64 73 74 72  (75,75), randstr
20f0: 28 31 30 30 2c 31 30 30 29 20 46 52 4f 4d 20 61  (100,100) FROM a
2100: 62 63 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49  bc;.    INSERT I
2110: 4e 54 4f 20 61 62 63 20 0a 20 20 20 20 20 20 20  NTO abc .       
2120: 20 53 45 4c 45 43 54 20 72 61 6e 64 73 74 72 28   SELECT randstr(
2130: 35 30 2c 35 30 29 2c 20 72 61 6e 64 73 74 72 28  50,50), randstr(
2140: 37 35 2c 37 35 29 2c 20 72 61 6e 64 73 74 72 28  75,75), randstr(
2150: 31 30 30 2c 31 30 30 29 20 46 52 4f 4d 20 61 62  100,100) FROM ab
2160: 63 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e  c;.    INSERT IN
2170: 54 4f 20 61 62 63 20 0a 20 20 20 20 20 20 20 20  TO abc .        
2180: 53 45 4c 45 43 54 20 72 61 6e 64 73 74 72 28 35  SELECT randstr(5
2190: 30 2c 35 30 29 2c 20 72 61 6e 64 73 74 72 28 37  0,50), randstr(7
21a0: 35 2c 37 35 29 2c 20 72 61 6e 64 73 74 72 28 31  5,75), randstr(1
21b0: 30 30 2c 31 30 30 29 20 46 52 4f 4d 20 61 62 63  00,100) FROM abc
21c0: 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54  ;.    INSERT INT
21d0: 4f 20 61 62 63 20 0a 20 20 20 20 20 20 20 20 53  O abc .        S
21e0: 45 4c 45 43 54 20 72 61 6e 64 73 74 72 28 35 30  ELECT randstr(50
21f0: 2c 35 30 29 2c 20 72 61 6e 64 73 74 72 28 37 35  ,50), randstr(75
2200: 2c 37 35 29 2c 20 72 61 6e 64 73 74 72 28 31 30  ,75), randstr(10
2210: 30 2c 31 30 30 29 20 46 52 4f 4d 20 61 62 63 3b  0,100) FROM abc;
2220: 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f  .    INSERT INTO
2230: 20 61 62 63 20 0a 20 20 20 20 20 20 20 20 53 45   abc .        SE
2240: 4c 45 43 54 20 72 61 6e 64 73 74 72 28 35 30 2c  LECT randstr(50,
2250: 35 30 29 2c 20 72 61 6e 64 73 74 72 28 37 35 2c  50), randstr(75,
2260: 37 35 29 2c 20 72 61 6e 64 73 74 72 28 31 30 30  75), randstr(100
2270: 2c 31 30 30 29 20 46 52 4f 4d 20 61 62 63 3b 0a  ,100) FROM abc;.
2280: 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20      INSERT INTO 
2290: 61 62 63 20 0a 20 20 20 20 20 20 20 20 53 45 4c  abc .        SEL
22a0: 45 43 54 20 72 61 6e 64 73 74 72 28 35 30 2c 35  ECT randstr(50,5
22b0: 30 29 2c 20 72 61 6e 64 73 74 72 28 37 35 2c 37  0), randstr(75,7
22c0: 35 29 2c 20 72 61 6e 64 73 74 72 28 31 30 30 2c  5), randstr(100,
22d0: 31 30 30 29 20 46 52 4f 4d 20 61 62 63 3b 0a 20  100) FROM abc;. 
22e0: 20 20 20 43 4f 4d 4d 49 54 3b 0a 20 20 7d 20 0a     COMMIT;.  } .
22f0: 20 20 66 6f 72 63 65 63 6f 70 79 20 74 65 73 74    forcecopy test
2300: 2e 64 62 20 74 65 73 74 32 2e 64 62 0a 20 20 73  .db test2.db.  s
2310: 71 6c 69 74 65 33 20 64 62 32 20 74 65 73 74 32  qlite3 db2 test2
2320: 2e 64 62 0a 20 20 6c 69 73 74 20 5c 0a 20 20 20  .db.  list \.   
2330: 20 5b 65 78 70 72 20 28 5b 66 69 6c 65 20 73 69   [expr ([file si
2340: 7a 65 20 74 65 73 74 2e 64 62 5d 2f 31 30 32 34  ze test.db]/1024
2350: 29 3e 32 30 5d 20 5b 65 78 70 72 20 28 5b 66 69  )>20] [expr ([fi
2360: 6c 65 20 73 69 7a 65 20 74 65 73 74 32 2e 64 62  le size test2.db
2370: 5d 2f 31 30 32 34 29 3e 32 30 5d 0a 7d 20 7b 31  ]/1024)>20].} {1
2380: 20 31 7d 0a 64 6f 5f 74 65 73 74 20 6d 61 6c 6c   1}.do_test mall
2390: 6f 63 35 2d 36 2e 31 2e 32 20 7b 0a 20 20 6c 69  oc5-6.1.2 {.  li
23a0: 73 74 20 5b 65 78 65 63 73 71 6c 20 7b 50 52 41  st [execsql {PRA
23b0: 47 4d 41 20 63 61 63 68 65 5f 73 69 7a 65 7d 5d  GMA cache_size}]
23c0: 20 5b 65 78 65 63 73 71 6c 20 7b 50 52 41 47 4d   [execsql {PRAGM
23d0: 41 20 63 61 63 68 65 5f 73 69 7a 65 7d 20 64 62  A cache_size} db
23e0: 32 5d 0a 7d 20 7b 31 30 20 31 30 7d 0a 0a 64 6f  2].} {10 10}..do
23f0: 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 36 2e  _test malloc5-6.
2400: 32 2e 31 20 7b 0a 20 20 65 78 65 63 73 71 6c 20  2.1 {.  execsql 
2410: 7b 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 61  {SELECT * FROM a
2420: 62 63 7d 20 64 62 32 0a 20 20 65 78 65 63 73 71  bc} db2.  execsq
2430: 6c 20 7b 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d  l {SELECT * FROM
2440: 20 61 62 63 7d 20 64 62 0a 20 20 65 78 70 72 20   abc} db.  expr 
2450: 5b 6e 50 61 67 65 20 64 62 5d 20 2b 20 5b 6e 50  [nPage db] + [nP
2460: 61 67 65 20 64 62 32 5d 0a 7d 20 7b 32 30 7d 0a  age db2].} {20}.
2470: 0a 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35  .do_test malloc5
2480: 2d 36 2e 32 2e 32 20 7b 0a 20 20 23 20 49 66 20  -6.2.2 {.  # If 
2490: 77 65 20 6e 6f 77 20 74 72 79 20 74 6f 20 72 65  we now try to re
24a0: 63 6c 61 69 6d 20 73 6f 6d 65 20 6d 65 6d 6f 72  claim some memor
24b0: 79 2c 20 69 74 20 73 68 6f 75 6c 64 20 63 6f 6d  y, it should com
24c0: 65 20 66 72 6f 6d 20 74 68 65 20 64 62 32 20 63  e from the db2 c
24d0: 61 63 68 65 2e 0a 20 20 73 71 6c 69 74 65 33 5f  ache..  sqlite3_
24e0: 72 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 20 33  release_memory 3
24f0: 30 30 30 0a 20 20 65 78 70 72 20 5b 6e 50 61 67  000.  expr [nPag
2500: 65 20 64 62 5d 20 2b 20 5b 6e 50 61 67 65 20 64  e db] + [nPage d
2510: 62 32 5d 0a 7d 20 7b 31 37 7d 0a 64 6f 5f 74 65  b2].} {17}.do_te
2520: 73 74 20 6d 61 6c 6c 6f 63 35 2d 36 2e 32 2e 33  st malloc5-6.2.3
2530: 20 7b 0a 20 20 23 20 41 63 63 65 73 73 20 74 68   {.  # Access th
2540: 65 20 64 62 32 20 63 61 63 68 65 20 61 67 61 69  e db2 cache agai
2550: 6e 2c 20 73 6f 20 74 68 61 74 20 61 6c 6c 20 74  n, so that all t
2560: 68 65 20 64 62 32 20 70 61 67 65 73 20 68 61 76  he db2 pages hav
2570: 65 20 62 65 65 6e 20 75 73 65 64 0a 20 20 23 20  e been used.  # 
2580: 6d 6f 72 65 20 72 65 63 65 6e 74 6c 79 20 74 68  more recently th
2590: 61 6e 20 61 6c 6c 20 74 68 65 20 64 62 20 70 61  an all the db pa
25a0: 67 65 73 2e 20 54 68 65 6e 20 74 72 79 20 74 6f  ges. Then try to
25b0: 20 72 65 63 6c 61 69 6d 20 33 30 30 30 20 62 79   reclaim 3000 by
25c0: 74 65 73 2e 0a 20 20 23 20 54 68 69 73 20 74 69  tes..  # This ti
25d0: 6d 65 2c 20 33 20 70 61 67 65 73 20 73 68 6f 75  me, 3 pages shou
25e0: 6c 64 20 62 65 20 70 75 6c 6c 65 64 20 66 72 6f  ld be pulled fro
25f0: 6d 20 74 68 65 20 64 62 20 63 61 63 68 65 2e 0a  m the db cache..
2600: 20 20 65 78 65 63 73 71 6c 20 7b 20 53 45 4c 45    execsql { SELE
2610: 43 54 20 2a 20 46 52 4f 4d 20 61 62 63 20 7d 20  CT * FROM abc } 
2620: 64 62 32 0a 20 20 73 71 6c 69 74 65 33 5f 72 65  db2.  sqlite3_re
2630: 6c 65 61 73 65 5f 6d 65 6d 6f 72 79 20 33 30 30  lease_memory 300
2640: 30 0a 20 20 65 78 70 72 20 5b 6e 50 61 67 65 20  0.  expr [nPage 
2650: 64 62 5d 20 2b 20 5b 6e 50 61 67 65 20 64 62 32  db] + [nPage db2
2660: 5d 0a 7d 20 7b 31 37 7d 0a 0a 64 6f 5f 74 65 73  ].} {17}..do_tes
2670: 74 20 6d 61 6c 6c 6f 63 35 2d 36 2e 33 2e 31 20  t malloc5-6.3.1 
2680: 7b 0a 20 20 23 20 4e 6f 77 20 6f 70 65 6e 20 61  {.  # Now open a
2690: 20 74 72 61 6e 73 61 63 74 69 6f 6e 20 61 6e 64   transaction and
26a0: 20 75 70 64 61 74 65 20 32 20 70 61 67 65 73 20   update 2 pages 
26b0: 69 6e 20 74 68 65 20 64 62 32 20 63 61 63 68 65  in the db2 cache
26c0: 2e 20 54 68 65 6e 0a 20 20 23 20 64 6f 20 61 20  . Then.  # do a 
26d0: 53 45 4c 45 43 54 20 6f 6e 20 74 68 65 20 64 62  SELECT on the db
26e0: 20 63 61 63 68 65 20 73 6f 20 74 68 61 74 20 61   cache so that a
26f0: 6c 6c 20 74 68 65 20 64 62 20 70 61 67 65 73 20  ll the db pages 
2700: 61 72 65 20 6d 6f 72 65 20 72 65 63 65 6e 74 6c  are more recentl
2710: 79 0a 20 20 23 20 75 73 65 64 20 74 68 61 6e 20  y.  # used than 
2720: 74 68 65 20 64 62 32 20 70 61 67 65 73 2e 20 57  the db2 pages. W
2730: 68 65 6e 20 77 65 20 74 72 79 20 74 6f 20 66 72  hen we try to fr
2740: 65 65 20 6d 65 6d 6f 72 79 2c 20 53 51 4c 69 74  ee memory, SQLit
2750: 65 20 73 68 6f 75 6c 64 0a 20 20 23 20 66 72 65  e should.  # fre
2760: 65 20 74 68 65 20 6e 6f 6e 2d 64 69 72 74 79 20  e the non-dirty 
2770: 64 62 32 20 70 61 67 65 73 2c 20 74 68 65 6e 20  db2 pages, then 
2780: 74 68 65 20 64 62 20 70 61 67 65 73 2c 20 74 68  the db pages, th
2790: 65 6e 20 66 69 6e 61 6c 6c 79 20 75 73 65 0a 20  en finally use. 
27a0: 20 23 20 73 79 6e 63 28 29 20 74 6f 20 66 72 65   # sync() to fre
27b0: 65 20 75 70 20 74 68 65 20 64 69 72 74 79 20 64  e up the dirty d
27c0: 62 32 20 70 61 67 65 73 2e 20 54 68 65 20 6f 6e  b2 pages. The on
27d0: 6c 79 20 70 61 67 65 20 74 68 61 74 20 63 61 6e  ly page that can
27e0: 6e 6f 74 20 62 65 0a 20 20 23 20 66 72 65 65 64  not be.  # freed
27f0: 20 69 73 20 70 61 67 65 31 20 6f 66 20 64 62 32   is page1 of db2
2800: 2e 20 42 65 63 61 75 73 65 20 74 68 65 72 65 20  . Because there 
2810: 69 73 20 61 6e 20 6f 70 65 6e 20 74 72 61 6e 73  is an open trans
2820: 61 63 74 69 6f 6e 2c 20 74 68 65 0a 20 20 23 20  action, the.  # 
2830: 62 74 72 65 65 20 6c 61 79 65 72 20 68 6f 6c 64  btree layer hold
2840: 73 20 61 20 72 65 66 65 72 65 6e 63 65 20 74 6f  s a reference to
2850: 20 70 61 67 65 20 31 20 69 6e 20 74 68 65 20 64   page 1 in the d
2860: 62 32 20 63 61 63 68 65 2e 0a 20 20 65 78 65 63  b2 cache..  exec
2870: 73 71 6c 20 7b 0a 20 20 20 20 42 45 47 49 4e 3b  sql {.    BEGIN;
2880: 0a 20 20 20 20 55 50 44 41 54 45 20 61 62 63 20  .    UPDATE abc 
2890: 53 45 54 20 63 20 3d 20 72 61 6e 64 73 74 72 28  SET c = randstr(
28a0: 31 30 30 2c 31 30 30 29 20 0a 20 20 20 20 57 48  100,100) .    WH
28b0: 45 52 45 20 72 6f 77 69 64 20 3d 20 31 20 4f 52  ERE rowid = 1 OR
28c0: 20 72 6f 77 69 64 20 3d 20 28 53 45 4c 45 43 54   rowid = (SELECT
28d0: 20 6d 61 78 28 72 6f 77 69 64 29 20 46 52 4f 4d   max(rowid) FROM
28e0: 20 61 62 63 29 3b 0a 20 20 7d 20 64 62 32 0a 20   abc);.  } db2. 
28f0: 20 65 78 65 63 73 71 6c 20 7b 20 53 45 4c 45 43   execsql { SELEC
2900: 54 20 2a 20 46 52 4f 4d 20 61 62 63 20 7d 20 64  T * FROM abc } d
2910: 62 0a 20 20 65 78 70 72 20 5b 6e 50 61 67 65 20  b.  expr [nPage 
2920: 64 62 5d 20 2b 20 5b 6e 50 61 67 65 20 64 62 32  db] + [nPage db2
2930: 5d 0a 7d 20 7b 32 30 7d 0a 64 6f 5f 74 65 73 74  ].} {20}.do_test
2940: 20 6d 61 6c 6c 6f 63 35 2d 36 2e 33 2e 32 20 7b   malloc5-6.3.2 {
2950: 0a 20 20 23 20 54 72 79 20 74 6f 20 72 65 6c 65  .  # Try to rele
2960: 61 73 65 20 37 37 30 30 20 62 79 74 65 73 2e 20  ase 7700 bytes. 
2970: 54 68 69 73 20 73 68 6f 75 6c 64 20 72 65 6c 65  This should rele
2980: 61 73 65 20 61 6c 6c 20 74 68 65 20 0a 20 20 23  ase all the .  #
2990: 20 6e 6f 6e 2d 64 69 72 74 79 20 70 61 67 65 73   non-dirty pages
29a0: 20 68 65 6c 64 20 62 79 20 64 62 32 2e 0a 20 20   held by db2..  
29b0: 73 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f  sqlite3_release_
29c0: 6d 65 6d 6f 72 79 20 5b 65 78 70 72 20 37 2a 31  memory [expr 7*1
29d0: 31 33 32 5d 0a 20 20 6c 69 73 74 20 5b 6e 50 61  132].  list [nPa
29e0: 67 65 20 64 62 5d 20 5b 6e 50 61 67 65 20 64 62  ge db] [nPage db
29f0: 32 5d 0a 7d 20 7b 31 30 20 33 7d 0a 64 6f 5f 74  2].} {10 3}.do_t
2a00: 65 73 74 20 6d 61 6c 6c 6f 63 35 2d 36 2e 33 2e  est malloc5-6.3.
2a10: 33 20 7b 0a 20 20 23 20 54 72 79 20 74 6f 20 72  3 {.  # Try to r
2a20: 65 6c 65 61 73 65 20 61 6e 6f 74 68 65 72 20 31  elease another 1
2a30: 30 30 30 20 62 79 74 65 73 2e 20 54 68 69 73 20  000 bytes. This 
2a40: 73 68 6f 75 6c 64 20 63 6f 6d 65 20 66 72 6f 6d  should come from
2a50: 74 20 74 68 65 20 64 62 0a 20 20 23 20 63 61 63  t the db.  # cac
2a60: 68 65 2c 20 73 69 6e 63 65 20 61 6c 6c 20 74 68  he, since all th
2a70: 72 65 65 20 70 61 67 65 73 20 68 65 6c 64 20 62  ree pages held b
2a80: 79 20 64 62 32 20 61 72 65 20 65 69 74 68 65 72  y db2 are either
2a90: 20 69 6e 2d 75 73 65 20 6f 72 20 64 69 72 79 2e   in-use or diry.
2aa0: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 6c 65 61  .  sqlite3_relea
2ab0: 73 65 5f 6d 65 6d 6f 72 79 20 31 30 30 30 0a 20  se_memory 1000. 
2ac0: 20 6c 69 73 74 20 5b 6e 50 61 67 65 20 64 62 5d   list [nPage db]
2ad0: 20 5b 6e 50 61 67 65 20 64 62 32 5d 0a 7d 20 7b   [nPage db2].} {
2ae0: 39 20 33 7d 0a 64 6f 5f 74 65 73 74 20 6d 61 6c  9 3}.do_test mal
2af0: 6c 6f 63 35 2d 36 2e 33 2e 34 20 7b 0a 20 20 23  loc5-6.3.4 {.  #
2b00: 20 4e 6f 77 20 72 65 6c 65 61 73 65 20 39 39 30   Now release 990
2b10: 30 20 6d 6f 72 65 20 28 61 62 6f 75 74 20 39 20  0 more (about 9 
2b20: 70 61 67 65 73 20 77 6f 72 74 68 29 2e 20 54 68  pages worth). Th
2b30: 69 73 20 73 68 6f 75 6c 64 20 65 78 70 75 6e 67  is should expung
2b40: 65 0a 20 20 23 20 74 68 65 20 72 65 73 74 20 6f  e.  # the rest o
2b50: 66 20 74 68 65 20 64 62 20 63 61 63 68 65 2e 20  f the db cache. 
2b60: 42 75 74 20 74 68 65 20 64 62 32 20 63 61 63 68  But the db2 cach
2b70: 65 20 72 65 6d 61 69 6e 73 20 69 6e 74 61 63 74  e remains intact
2b80: 2c 20 62 65 63 61 75 73 65 0a 20 20 23 20 53 51  , because.  # SQ
2b90: 4c 69 74 65 20 74 72 69 65 73 20 74 6f 20 61 76  Lite tries to av
2ba0: 6f 69 64 20 63 61 6c 6c 69 6e 67 20 73 79 6e 63  oid calling sync
2bb0: 28 29 2e 0a 20 20 69 66 20 7b 24 3a 3a 74 63 6c  ()..  if {$::tcl
2bc0: 5f 70 6c 61 74 66 6f 72 6d 28 77 6f 72 64 53 69  _platform(wordSi
2bd0: 7a 65 29 3d 3d 38 7d 20 7b 0a 20 20 20 20 73 71  ze)==8} {.    sq
2be0: 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d 65  lite3_release_me
2bf0: 6d 6f 72 79 20 31 30 35 30 30 0a 20 20 7d 20 65  mory 10500.  } e
2c00: 6c 73 65 20 7b 0a 20 20 20 20 73 71 6c 69 74 65  lse {.    sqlite
2c10: 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79  3_release_memory
2c20: 20 39 39 30 30 0a 20 20 7d 0a 20 20 6c 69 73 74   9900.  }.  list
2c30: 20 5b 6e 50 61 67 65 20 64 62 5d 20 5b 6e 50 61   [nPage db] [nPa
2c40: 67 65 20 64 62 32 5d 0a 7d 20 7b 30 20 33 7d 0a  ge db2].} {0 3}.
2c50: 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 35 2d  do_test malloc5-
2c60: 36 2e 33 2e 35 20 7b 0a 20 20 23 20 42 75 74 20  6.3.5 {.  # But 
2c70: 69 66 20 77 65 20 61 72 65 20 72 65 61 6c 6c 79  if we are really
2c80: 20 69 6e 73 69 73 74 65 6e 74 2c 20 53 51 4c 69   insistent, SQLi
2c90: 74 65 20 77 69 6c 6c 20 63 6f 6e 73 65 6e 74 20  te will consent 
2ca0: 74 6f 20 63 61 6c 6c 20 73 79 6e 63 28 29 0a 20  to call sync(). 
2cb0: 20 23 20 69 66 20 74 68 65 72 65 20 69 73 20 6e   # if there is n
2cc0: 6f 20 6f 74 68 65 72 20 6f 70 74 69 6f 6e 2e 20  o other option. 
2cd0: 55 50 44 41 54 45 3a 20 41 73 20 6f 66 20 33 2e  UPDATE: As of 3.
2ce0: 36 2e 32 2c 20 53 51 4c 69 74 65 20 77 69 6c 6c  6.2, SQLite will
2cf0: 20 6e 6f 74 0a 20 20 23 20 63 61 6c 6c 20 73 79   not.  # call sy
2d00: 6e 63 28 29 20 69 6e 20 74 68 69 73 20 73 63 65  nc() in this sce
2d10: 6e 61 72 69 6f 2e 20 53 6f 20 6e 6f 20 66 75 72  nario. So no fur
2d20: 74 68 65 72 20 6d 65 6d 6f 72 79 20 63 61 6e 20  ther memory can 
2d30: 62 65 20 72 65 63 6c 61 69 6d 65 64 2e 0a 20 20  be reclaimed..  
2d40: 73 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f  sqlite3_release_
2d50: 6d 65 6d 6f 72 79 20 31 30 30 30 0a 20 20 6c 69  memory 1000.  li
2d60: 73 74 20 5b 6e 50 61 67 65 20 64 62 5d 20 5b 6e  st [nPage db] [n
2d70: 50 61 67 65 20 64 62 32 5d 0a 7d 20 7b 30 20 33  Page db2].} {0 3
2d80: 7d 0a 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63  }.do_test malloc
2d90: 35 2d 36 2e 33 2e 36 20 7b 0a 20 20 23 20 54 68  5-6.3.6 {.  # Th
2da0: 65 20 72 65 66 65 72 65 6e 63 65 64 20 70 61 67  e referenced pag
2db0: 65 20 28 70 61 67 65 20 31 20 6f 66 20 74 68 65  e (page 1 of the
2dc0: 20 64 62 32 20 63 61 63 68 65 29 20 77 69 6c 6c   db2 cache) will
2dd0: 20 6e 6f 74 20 62 65 20 66 72 65 65 64 20 6e 6f   not be freed no
2de0: 0a 20 20 23 20 6d 61 74 74 65 72 20 68 6f 77 20  .  # matter how 
2df0: 6d 75 63 68 20 6d 65 6d 6f 72 79 20 77 65 20 61  much memory we a
2e00: 73 6b 20 66 6f 72 3a 0a 20 20 73 71 6c 69 74 65  sk for:.  sqlite
2e10: 33 5f 72 65 6c 65 61 73 65 5f 6d 65 6d 6f 72 79  3_release_memory
2e20: 20 33 31 34 35 39 0a 20 20 6c 69 73 74 20 5b 6e   31459.  list [n
2e30: 50 61 67 65 20 64 62 5d 20 5b 6e 50 61 67 65 20  Page db] [nPage 
2e40: 64 62 32 5d 0a 7d 20 7b 30 20 33 7d 0a 0a 64 62  db2].} {0 3}..db
2e50: 32 20 63 6c 6f 73 65 0a 0a 73 71 6c 69 74 65 33  2 close..sqlite3
2e60: 5f 73 6f 66 74 5f 68 65 61 70 5f 6c 69 6d 69 74  _soft_heap_limit
2e70: 20 24 3a 3a 73 6f 66 74 5f 6c 69 6d 69 74 0a 66   $::soft_limit.f
2e80: 69 6e 69 73 68 5f 74 65 73 74 0a 63 61 74 63 68  inish_test.catch
2e90: 20 7b 64 62 20 63 6c 6f 73 65 7d 0a               {db close}.