0000: 23 20 32 30 30 35 20 4d 61 72 63 68 20 31 38 0a # 2005 March 18.
0010: 23 0a 23 20 54 68 65 20 61 75 74 68 6f 72 20 64 #.# The author d
0020: 69 73 63 6c 61 69 6d 73 20 63 6f 70 79 72 69 67 isclaims copyrig
0030: 68 74 20 74 6f 20 74 68 69 73 20 73 6f 75 72 63 ht to this sourc
0040: 65 20 63 6f 64 65 2e 20 20 49 6e 20 70 6c 61 63 e code. In plac
0050: 65 20 6f 66 0a 23 20 61 20 6c 65 67 61 6c 20 6e e of.# a legal n
0060: 6f 74 69 63 65 2c 20 68 65 72 65 20 69 73 20 61 otice, here is a
0070: 20 62 6c 65 73 73 69 6e 67 3a 0a 23 0a 23 20 20 blessing:.#.#
0080: 20 20 4d 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f May you do goo
0090: 64 20 61 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a d and not evil..
00a0: 23 20 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e # May you fin
00b0: 64 20 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f d forgiveness fo
00c0: 72 20 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 r yourself and f
00d0: 6f 72 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 23 orgive others..#
00e0: 20 20 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 May you shar
00f0: 65 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 e freely, never
0100: 74 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e taking more than
0110: 20 79 6f 75 20 67 69 76 65 2e 0a 23 0a 23 2a 2a you give..#.#**
0120: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0160: 2a 2a 2a 2a 2a 0a 23 20 54 68 69 73 20 66 69 6c *****.# This fil
0170: 65 20 61 74 74 65 6d 70 74 73 20 74 6f 20 63 68 e attempts to ch
0180: 65 63 6b 20 74 68 61 74 20 74 68 65 20 6c 69 62 eck that the lib
0190: 72 61 72 79 20 63 61 6e 20 72 65 63 6f 76 65 72 rary can recover
01a0: 20 66 72 6f 6d 20 61 20 6d 61 6c 6c 6f 63 28 29 from a malloc()
01b0: 0a 23 20 66 61 69 6c 75 72 65 20 77 68 65 6e 20 .# failure when
01c0: 73 71 6c 69 74 65 33 5f 67 6c 6f 62 61 6c 5f 72 sqlite3_global_r
01d0: 65 63 6f 76 65 72 28 29 20 69 73 20 69 6e 76 6f ecover() is invo
01e0: 6b 65 64 2e 0a 23 0a 23 20 24 49 64 3a 20 6d 61 ked..#.# $Id: ma
01f0: 6c 6c 6f 63 32 2e 74 65 73 74 2c 76 20 31 2e 34 lloc2.test,v 1.4
0200: 20 32 30 30 35 2f 31 32 2f 30 36 20 31 32 3a 35 2005/12/06 12:5
0210: 33 3a 30 31 20 64 61 6e 69 65 6c 6b 31 39 37 37 3:01 danielk1977
0220: 20 45 78 70 20 24 0a 0a 73 65 74 20 74 65 73 74 Exp $..set test
0230: 64 69 72 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d dir [file dirnam
0240: 65 20 24 61 72 67 76 30 5d 0a 73 6f 75 72 63 65 e $argv0].source
0250: 20 24 74 65 73 74 64 69 72 2f 74 65 73 74 65 72 $testdir/tester
0260: 2e 74 63 6c 0a 0a 23 20 4f 6e 6c 79 20 72 75 6e .tcl..# Only run
0270: 20 74 68 65 73 65 20 74 65 73 74 73 20 69 66 20 these tests if
0280: 6d 65 6d 6f 72 79 20 64 65 62 75 67 67 69 6e 67 memory debugging
0290: 20 69 73 20 74 75 72 6e 65 64 20 6f 6e 2e 0a 23 is turned on..#
02a0: 0a 69 66 20 7b 5b 69 6e 66 6f 20 63 6f 6d 6d 61 .if {[info comma
02b0: 6e 64 20 73 71 6c 69 74 65 5f 6d 61 6c 6c 6f 63 nd sqlite_malloc
02c0: 5f 73 74 61 74 5d 3d 3d 22 22 7d 20 7b 0a 20 20 _stat]==""} {.
02d0: 70 75 74 73 20 22 53 6b 69 70 70 69 6e 67 20 6d puts "Skipping m
02e0: 61 6c 6c 6f 63 20 74 65 73 74 73 3a 20 6e 6f 74 alloc tests: not
02f0: 20 63 6f 6d 70 69 6c 65 64 20 77 69 74 68 20 2d compiled with -
0300: 44 53 51 4c 49 54 45 5f 44 45 42 55 47 2e 2e 2e DSQLITE_DEBUG...
0310: 22 0a 20 20 66 69 6e 69 73 68 5f 74 65 73 74 0a ". finish_test.
0320: 20 20 72 65 74 75 72 6e 0a 7d 0a 0a 69 66 63 61 return.}..ifca
0330: 70 61 62 6c 65 20 21 67 6c 6f 62 61 6c 72 65 63 pable !globalrec
0340: 6f 76 65 72 20 7b 0a 20 20 66 69 6e 69 73 68 5f over {. finish_
0350: 74 65 73 74 0a 20 20 72 65 74 75 72 6e 0a 7d 0a test. return.}.
0360: 0a 23 20 47 65 6e 65 72 61 74 65 20 61 20 63 68 .# Generate a ch
0370: 65 63 6b 73 75 6d 20 62 61 73 65 64 20 6f 6e 20 ecksum based on
0380: 74 68 65 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 the contents of
0390: 74 68 65 20 64 61 74 61 62 61 73 65 2e 20 49 66 the database. If
03a0: 20 74 68 65 0a 23 20 63 68 65 63 6b 73 75 6d 20 the.# checksum
03b0: 6f 66 20 74 77 6f 20 64 61 74 61 62 61 73 65 73 of two databases
03c0: 20 69 73 20 74 68 65 20 73 61 6d 65 2c 20 61 6e is the same, an
03d0: 64 20 74 68 65 20 69 6e 74 65 67 72 69 74 79 2d d the integrity-
03e0: 63 68 65 63 6b 20 70 61 73 73 65 73 0a 23 20 66 check passes.# f
03f0: 6f 72 20 62 6f 74 68 2c 20 74 68 65 20 74 77 6f or both, the two
0400: 20 64 61 74 61 62 61 73 65 73 20 61 72 65 20 69 databases are i
0410: 64 65 6e 74 69 63 61 6c 2e 0a 23 0a 70 72 6f 63 dentical..#.proc
0420: 20 63 6b 73 75 6d 20 7b 64 62 7d 20 7b 0a 20 20 cksum {db} {.
0430: 73 65 74 20 72 65 74 20 5b 6c 69 73 74 5d 0a 20 set ret [list].
0440: 20 69 66 63 61 70 61 62 6c 65 20 74 65 6d 70 64 ifcapable tempd
0450: 62 20 7b 0a 20 20 20 20 73 65 74 20 73 71 6c 20 b {. set sql
0460: 7b 0a 20 20 20 20 20 20 53 45 4c 45 43 54 20 6e {. SELECT n
0470: 61 6d 65 20 46 52 4f 4d 20 73 71 6c 69 74 65 5f ame FROM sqlite_
0480: 6d 61 73 74 65 72 20 57 48 45 52 45 20 74 79 70 master WHERE typ
0490: 65 20 3d 20 27 74 61 62 6c 65 27 20 55 4e 49 4f e = 'table' UNIO
04a0: 4e 0a 20 20 20 20 20 20 53 45 4c 45 43 54 20 6e N. SELECT n
04b0: 61 6d 65 20 46 52 4f 4d 20 73 71 6c 69 74 65 5f ame FROM sqlite_
04c0: 74 65 6d 70 5f 6d 61 73 74 65 72 20 57 48 45 52 temp_master WHER
04d0: 45 20 74 79 70 65 20 3d 20 27 74 61 62 6c 65 27 E type = 'table'
04e0: 20 55 4e 49 4f 4e 0a 20 20 20 20 20 20 53 45 4c UNION. SEL
04f0: 45 43 54 20 27 73 71 6c 69 74 65 5f 6d 61 73 74 ECT 'sqlite_mast
0500: 65 72 27 20 55 4e 49 4f 4e 0a 20 20 20 20 20 20 er' UNION.
0510: 53 45 4c 45 43 54 20 27 73 71 6c 69 74 65 5f 74 SELECT 'sqlite_t
0520: 65 6d 70 5f 6d 61 73 74 65 72 27 0a 20 20 20 20 emp_master'.
0530: 7d 0a 20 20 7d 20 65 6c 73 65 20 7b 0a 20 20 20 }. } else {.
0540: 20 73 65 74 20 73 71 6c 20 7b 0a 20 20 20 20 20 set sql {.
0550: 20 53 45 4c 45 43 54 20 6e 61 6d 65 20 46 52 4f SELECT name FRO
0560: 4d 20 73 71 6c 69 74 65 5f 6d 61 73 74 65 72 20 M sqlite_master
0570: 57 48 45 52 45 20 74 79 70 65 20 3d 20 27 74 61 WHERE type = 'ta
0580: 62 6c 65 27 20 55 4e 49 4f 4e 0a 20 20 20 20 20 ble' UNION.
0590: 20 53 45 4c 45 43 54 20 27 73 71 6c 69 74 65 5f SELECT 'sqlite_
05a0: 6d 61 73 74 65 72 27 0a 20 20 20 20 7d 0a 20 20 master'. }.
05b0: 7d 0a 20 20 73 65 74 20 74 62 6c 6c 69 73 74 20 }. set tbllist
05c0: 5b 24 64 62 20 65 76 61 6c 20 24 73 71 6c 5d 0a [$db eval $sql].
05d0: 20 20 73 65 74 20 74 78 74 20 7b 7d 0a 20 20 66 set txt {}. f
05e0: 6f 72 65 61 63 68 20 74 62 6c 20 24 74 62 6c 6c oreach tbl $tbll
05f0: 69 73 74 20 7b 0a 20 20 20 20 61 70 70 65 6e 64 ist {. append
0600: 20 74 78 74 20 5b 24 64 62 20 65 76 61 6c 20 22 txt [$db eval "
0610: 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 24 74 SELECT * FROM $t
0620: 62 6c 22 5d 0a 20 20 7d 0a 20 20 23 20 70 75 74 bl"]. }. # put
0630: 73 20 74 78 74 3d 24 74 78 74 0a 20 20 72 65 74 s txt=$txt. ret
0640: 75 72 6e 20 5b 6d 64 35 20 24 74 78 74 5d 0a 7d urn [md5 $txt].}
0650: 0a 0a 70 72 6f 63 20 64 6f 5f 6d 61 6c 6c 6f 63 ..proc do_malloc
0660: 32 5f 74 65 73 74 20 7b 74 6e 20 61 72 67 73 7d 2_test {tn args}
0670: 20 7b 0a 20 20 61 72 72 61 79 20 73 65 74 20 3a {. array set :
0680: 3a 6d 61 6c 6c 6f 63 6f 70 74 73 20 24 61 72 67 :mallocopts $arg
0690: 73 0a 20 20 73 65 74 20 73 75 6d 20 5b 63 6b 73 s. set sum [cks
06a0: 75 6d 20 64 62 5d 0a 0a 20 20 66 6f 72 20 7b 73 um db].. for {s
06b0: 65 74 20 3a 3a 6e 20 31 7d 20 7b 74 72 75 65 7d et ::n 1} {true}
06c0: 20 7b 69 6e 63 72 20 3a 3a 6e 7d 20 7b 0a 0a 20 {incr ::n} {..
06d0: 20 20 20 23 20 52 75 6e 20 74 68 65 20 53 51 4c # Run the SQL
06e0: 2e 20 4d 61 6c 6c 6f 63 20 6e 75 6d 62 65 72 20 . Malloc number
06f0: 24 3a 3a 6e 20 69 73 20 73 65 74 20 74 6f 20 66 $::n is set to f
0700: 61 69 6c 2e 20 41 20 6d 61 6c 6c 6f 63 28 29 20 ail. A malloc()
0710: 66 61 69 6c 75 72 65 0a 20 20 20 20 23 20 6d 61 failure. # ma
0720: 79 20 6f 72 20 6d 61 79 20 6e 6f 74 20 62 65 20 y or may not be
0730: 72 65 70 6f 72 74 65 64 2e 0a 20 20 20 20 73 71 reported.. sq
0740: 6c 69 74 65 5f 6d 61 6c 6c 6f 63 5f 66 61 69 6c lite_malloc_fail
0750: 20 24 3a 3a 6e 0a 20 20 20 20 64 6f 5f 74 65 73 $::n. do_tes
0760: 74 20 6d 61 6c 6c 6f 63 32 2d 24 74 6e 2e 24 3a t malloc2-$tn.$:
0770: 3a 6e 2e 32 20 7b 0a 20 20 20 20 20 20 73 65 74 :n.2 {. set
0780: 20 72 65 73 20 5b 63 61 74 63 68 73 71 6c 20 5b res [catchsql [
0790: 73 74 72 69 6e 67 20 74 72 69 6d 20 24 3a 3a 6d string trim $::m
07a0: 61 6c 6c 6f 63 6f 70 74 73 28 2d 73 71 6c 29 5d allocopts(-sql)]
07b0: 5d 0a 20 20 20 20 20 20 73 65 74 20 72 63 20 5b ]. set rc [
07c0: 65 78 70 72 20 7b 20 0a 20 20 20 20 20 20 20 20 expr { .
07d0: 30 3d 3d 5b 73 74 72 69 6e 67 20 63 6f 6d 70 61 0==[string compa
07e0: 72 65 20 24 72 65 73 20 7b 31 20 7b 6f 75 74 20 re $res {1 {out
07f0: 6f 66 20 6d 65 6d 6f 72 79 7d 7d 5d 20 7c 7c 0a of memory}}] ||.
0800: 20 20 20 20 20 20 20 20 30 3d 3d 5b 6c 69 6e 64 0==[lind
0810: 65 78 20 24 72 65 73 20 30 5d 0a 20 20 20 20 20 ex $res 0].
0820: 20 7d 5d 0a 20 20 20 20 20 20 69 66 20 7b 24 72 }]. if {$r
0830: 63 21 3d 31 7d 20 7b 0a 20 20 20 20 20 20 20 20 c!=1} {.
0840: 70 75 74 73 20 22 45 72 72 6f 72 3a 20 24 72 65 puts "Error: $re
0850: 73 22 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 s". }.
0860: 20 73 65 74 20 72 63 0a 20 20 20 20 7d 20 7b 31 set rc. } {1
0870: 7d 0a 0a 20 20 20 20 23 20 49 66 20 24 3a 3a 6e }.. # If $::n
0880: 20 69 73 20 67 72 65 61 74 65 72 20 74 68 61 6e is greater than
0890: 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 6d the number of m
08a0: 61 6c 6c 6f 63 28 29 20 63 61 6c 6c 73 20 72 65 alloc() calls re
08b0: 71 75 69 72 65 64 20 74 6f 0a 20 20 20 20 23 20 quired to. #
08c0: 65 78 65 63 75 74 65 20 74 68 65 20 53 51 4c 2c execute the SQL,
08d0: 20 74 68 65 6e 20 74 68 69 73 20 74 65 73 74 20 then this test
08e0: 69 73 20 66 69 6e 69 73 68 65 64 2e 20 42 72 65 is finished. Bre
08f0: 61 6b 20 6f 75 74 20 6f 66 20 74 68 65 20 6c 6f ak out of the lo
0900: 6f 70 2e 0a 20 20 20 20 69 66 20 7b 5b 6c 69 6e op.. if {[lin
0910: 64 65 78 20 5b 73 71 6c 69 74 65 5f 6d 61 6c 6c dex [sqlite_mall
0920: 6f 63 5f 73 74 61 74 5d 20 32 5d 3e 30 7d 20 7b oc_stat] 2]>0} {
0930: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 5f 6d 61 . sqlite_ma
0940: 6c 6c 6f 63 5f 66 61 69 6c 20 2d 31 0a 20 20 20 lloc_fail -1.
0950: 20 20 20 62 72 65 61 6b 0a 20 20 20 20 7d 0a 0a break. }..
0960: 20 20 20 20 23 20 4e 6f 74 68 69 6e 67 20 73 68 # Nothing sh
0970: 6f 75 6c 64 20 77 6f 72 6b 20 6e 6f 77 2c 20 62 ould work now, b
0980: 65 63 61 75 73 65 20 74 68 65 20 61 6c 6c 6f 63 ecause the alloc
0990: 61 74 6f 72 20 73 68 6f 75 6c 64 20 72 65 66 75 ator should refu
09a0: 73 65 20 74 6f 0a 20 20 20 20 23 20 61 6c 6c 6f se to. # allo
09b0: 63 61 74 65 20 61 6e 79 20 6d 65 6d 6f 72 79 2e cate any memory.
09c0: 0a 20 20 20 20 23 0a 20 20 20 20 23 20 55 70 64 . #. # Upd
09d0: 61 74 65 3a 20 53 51 4c 69 74 65 20 6e 6f 77 20 ate: SQLite now
09e0: 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 72 65 automatically re
09f0: 63 6f 76 65 72 73 20 66 72 6f 6d 20 61 20 6d 61 covers from a ma
0a00: 6c 6c 6f 63 28 29 20 66 61 69 6c 75 72 65 2e 0a lloc() failure..
0a10: 20 20 20 20 23 20 53 6f 20 74 68 65 20 73 74 61 # So the sta
0a20: 74 65 6d 65 6e 74 20 69 6e 20 74 68 65 20 74 65 tement in the te
0a30: 73 74 20 62 65 6c 6f 77 20 77 6f 75 6c 64 20 77 st below would w
0a40: 6f 72 6b 2e 20 0a 69 66 20 30 20 7b 0a 20 20 20 ork. .if 0 {.
0a50: 20 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 32 do_test malloc2
0a60: 2d 24 74 6e 2e 24 3a 3a 6e 2e 33 20 7b 0a 20 20 -$tn.$::n.3 {.
0a70: 20 20 20 20 63 61 74 63 68 73 71 6c 20 7b 53 45 catchsql {SE
0a80: 4c 45 43 54 20 27 6e 6f 74 68 69 6e 67 20 73 68 LECT 'nothing sh
0a90: 6f 75 6c 64 20 77 6f 72 6b 27 7d 0a 20 20 20 20 ould work'}.
0aa0: 7d 20 7b 31 20 7b 6f 75 74 20 6f 66 20 6d 65 6d } {1 {out of mem
0ab0: 6f 72 79 7d 7d 0a 7d 0a 0a 20 20 20 20 23 20 52 ory}}.}.. # R
0ac0: 65 63 6f 76 65 72 20 66 72 6f 6d 20 74 68 65 20 ecover from the
0ad0: 6d 61 6c 6c 6f 63 20 66 61 69 6c 75 72 65 2e 0a malloc failure..
0ae0: 20 20 20 20 23 0a 20 20 20 20 23 20 55 70 64 61 #. # Upda
0af0: 74 65 3a 20 54 68 65 20 6e 65 77 20 6d 61 6c 6c te: The new mall
0b00: 6f 63 28 29 20 66 61 69 6c 75 72 65 20 68 61 6e oc() failure han
0b10: 64 6c 69 6e 67 20 6d 65 61 6e 73 20 74 68 61 74 dling means that
0b20: 20 61 20 74 72 61 6e 73 61 63 74 69 6f 6e 20 6d a transaction m
0b30: 61 79 0a 20 20 20 20 23 20 73 74 69 6c 6c 20 62 ay. # still b
0b40: 65 20 61 63 74 69 76 65 20 65 76 65 6e 20 69 66 e active even if
0b50: 20 61 20 6d 61 6c 6c 6f 63 28 29 20 68 61 73 20 a malloc() has
0b60: 66 61 69 6c 65 64 2e 20 42 75 74 20 77 68 65 6e failed. But when
0b70: 20 74 68 65 73 65 20 74 65 73 74 73 20 77 65 72 these tests wer
0b80: 65 0a 20 20 20 20 23 20 77 72 69 74 74 65 6e 20 e. # written
0b90: 74 68 69 73 20 77 61 73 20 6e 6f 74 20 74 68 65 this was not the
0ba0: 20 63 61 73 65 2e 20 53 6f 20 64 6f 20 61 20 6d case. So do a m
0bb0: 61 6e 75 61 6c 20 52 4f 4c 4c 42 41 43 4b 20 68 anual ROLLBACK h
0bc0: 65 72 65 20 73 6f 20 74 68 61 74 20 74 68 65 0a ere so that the.
0bd0: 20 20 20 20 23 20 74 65 73 74 73 20 70 61 73 73 # tests pass
0be0: 2e 0a 20 20 20 20 64 6f 5f 74 65 73 74 20 6d 61 .. do_test ma
0bf0: 6c 6c 6f 63 32 2d 24 74 6e 2e 24 3a 3a 6e 2e 34 lloc2-$tn.$::n.4
0c00: 20 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 {. sqlite3
0c10: 5f 67 6c 6f 62 61 6c 5f 72 65 63 6f 76 65 72 0a _global_recover.
0c20: 20 20 20 20 20 20 63 61 74 63 68 20 7b 0a 20 20 catch {.
0c30: 20 20 20 20 20 20 65 78 65 63 73 71 6c 20 7b 0a execsql {.
0c40: 20 20 20 20 20 20 20 20 20 20 52 4f 4c 4c 42 41 ROLLBA
0c50: 43 4b 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 CK;. }.
0c60: 20 20 20 20 7d 0a 20 20 20 20 20 20 65 78 70 72 }. expr
0c70: 20 30 0a 20 20 20 20 7d 20 7b 30 7d 0a 0a 20 20 0. } {0}..
0c80: 20 20 23 20 43 68 65 63 6b 73 75 6d 20 74 68 65 # Checksum the
0c90: 20 64 61 74 61 62 61 73 65 2e 0a 20 20 20 20 64 database.. d
0ca0: 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 32 2d 24 o_test malloc2-$
0cb0: 74 6e 2e 24 3a 3a 6e 2e 35 20 7b 0a 20 20 20 20 tn.$::n.5 {.
0cc0: 20 20 63 6b 73 75 6d 20 64 62 0a 20 20 20 20 7d cksum db. }
0cd0: 20 24 73 75 6d 0a 0a 20 20 20 20 69 6e 74 65 67 $sum.. integ
0ce0: 72 69 74 79 5f 63 68 65 63 6b 20 6d 61 6c 6c 6f rity_check mallo
0cf0: 63 32 2d 24 74 6e 2e 24 3a 3a 6e 2e 36 0a 20 20 c2-$tn.$::n.6.
0d00: 69 66 20 7b 24 3a 3a 6e 45 72 72 3e 31 7d 20 72 if {$::nErr>1} r
0d10: 65 74 75 72 6e 0a 20 20 7d 0a 20 20 75 6e 73 65 eturn. }. unse
0d20: 74 20 3a 3a 6d 61 6c 6c 6f 63 6f 70 74 73 0a 7d t ::mallocopts.}
0d30: 0a 0a 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 ..do_test malloc
0d40: 32 2e 31 2e 73 65 74 75 70 20 7b 0a 20 20 65 78 2.1.setup {. ex
0d50: 65 63 73 71 6c 20 7b 0a 20 20 20 20 43 52 45 41 ecsql {. CREA
0d60: 54 45 20 54 41 42 4c 45 20 61 62 63 28 61 2c 20 TE TABLE abc(a,
0d70: 62 2c 20 63 29 3b 0a 20 20 20 20 49 4e 53 45 52 b, c);. INSER
0d80: 54 20 49 4e 54 4f 20 61 62 63 20 56 41 4c 55 45 T INTO abc VALUE
0d90: 53 28 31 30 2c 20 32 30 2c 20 33 30 29 3b 0a 20 S(10, 20, 30);.
0da0: 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 INSERT INTO a
0db0: 62 63 20 56 41 4c 55 45 53 28 34 30 2c 20 35 30 bc VALUES(40, 50
0dc0: 2c 20 36 30 29 3b 0a 20 20 20 20 43 52 45 41 54 , 60);. CREAT
0dd0: 45 20 49 4e 44 45 58 20 61 62 63 5f 69 20 4f 4e E INDEX abc_i ON
0de0: 20 61 62 63 28 61 2c 20 62 2c 20 63 29 3b 0a 20 abc(a, b, c);.
0df0: 20 7d 0a 7d 20 7b 7d 0a 64 6f 5f 6d 61 6c 6c 6f }.} {}.do_mallo
0e00: 63 32 5f 74 65 73 74 20 31 2e 31 20 2d 73 71 6c c2_test 1.1 -sql
0e10: 20 7b 0a 20 20 53 45 4c 45 43 54 20 2a 20 46 52 {. SELECT * FR
0e20: 4f 4d 20 61 62 63 3b 0a 7d 0a 64 6f 5f 6d 61 6c OM abc;.}.do_mal
0e30: 6c 6f 63 32 5f 74 65 73 74 20 31 2e 32 20 2d 73 loc2_test 1.2 -s
0e40: 71 6c 20 7b 0a 20 20 55 50 44 41 54 45 20 61 62 ql {. UPDATE ab
0e50: 63 20 53 45 54 20 63 20 3d 20 63 2b 31 30 3b 0a c SET c = c+10;.
0e60: 7d 0a 64 6f 5f 6d 61 6c 6c 6f 63 32 5f 74 65 73 }.do_malloc2_tes
0e70: 74 20 31 2e 33 20 2d 73 71 6c 20 7b 0a 20 20 49 t 1.3 -sql {. I
0e80: 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63 20 56 NSERT INTO abc V
0e90: 41 4c 55 45 53 28 37 30 2c 20 38 30 2c 20 39 30 ALUES(70, 80, 90
0ea0: 29 3b 0a 7d 0a 64 6f 5f 6d 61 6c 6c 6f 63 32 5f );.}.do_malloc2_
0eb0: 74 65 73 74 20 31 2e 34 20 2d 73 71 6c 20 7b 0a test 1.4 -sql {.
0ec0: 20 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 61 62 DELETE FROM ab
0ed0: 63 3b 0a 7d 0a 64 6f 5f 74 65 73 74 20 6d 61 6c c;.}.do_test mal
0ee0: 6c 6f 63 32 2e 31 2e 35 20 7b 0a 20 20 65 78 65 loc2.1.5 {. exe
0ef0: 63 73 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43 csql {. SELEC
0f00: 54 20 2a 20 46 52 4f 4d 20 61 62 63 3b 0a 20 20 T * FROM abc;.
0f10: 7d 0a 7d 20 7b 7d 0a 0a 64 6f 5f 74 65 73 74 20 }.} {}..do_test
0f20: 6d 61 6c 6c 6f 63 32 2e 32 2e 73 65 74 75 70 20 malloc2.2.setup
0f30: 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 {. execsql {.
0f40: 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 64 CREATE TABLE d
0f50: 65 66 28 61 2c 20 62 2c 20 63 29 3b 0a 20 20 20 ef(a, b, c);.
0f60: 20 43 52 45 41 54 45 20 49 4e 44 45 58 20 64 65 CREATE INDEX de
0f70: 66 5f 69 31 20 4f 4e 20 64 65 66 28 61 29 3b 0a f_i1 ON def(a);.
0f80: 20 20 20 20 43 52 45 41 54 45 20 49 4e 44 45 58 CREATE INDEX
0f90: 20 64 65 66 5f 69 32 20 4f 4e 20 64 65 66 28 63 def_i2 ON def(c
0fa0: 29 3b 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20 20 );. BEGIN;.
0fb0: 7d 0a 20 20 66 6f 72 20 7b 73 65 74 20 69 20 30 }. for {set i 0
0fc0: 7d 20 7b 24 69 3c 32 30 7d 20 7b 69 6e 63 72 20 } {$i<20} {incr
0fd0: 69 7d 20 7b 0a 20 20 20 20 65 78 65 63 73 71 6c i} {. execsql
0fe0: 20 7b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e {. INSERT IN
0ff0: 54 4f 20 64 65 66 20 56 41 4c 55 45 53 28 72 61 TO def VALUES(ra
1000: 6e 64 73 74 72 28 33 30 30 2c 33 30 30 29 2c 72 ndstr(300,300),r
1010: 61 6e 64 73 74 72 28 33 30 30 2c 33 30 30 29 2c andstr(300,300),
1020: 72 61 6e 64 73 74 72 28 33 30 30 2c 33 30 30 29 randstr(300,300)
1030: 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 65 );. }. }. e
1040: 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 43 4f 4d xecsql {. COM
1050: 4d 49 54 3b 0a 20 20 7d 0a 7d 20 7b 7d 0a 64 6f MIT;. }.} {}.do
1060: 5f 6d 61 6c 6c 6f 63 32 5f 74 65 73 74 20 32 20 _malloc2_test 2
1070: 2d 73 71 6c 20 7b 0a 20 20 42 45 47 49 4e 3b 0a -sql {. BEGIN;.
1080: 20 20 55 50 44 41 54 45 20 64 65 66 20 53 45 54 UPDATE def SET
1090: 20 61 20 3d 20 72 61 6e 64 73 74 72 28 31 30 30 a = randstr(100
10a0: 2c 31 30 30 29 20 57 48 45 52 45 20 28 6f 69 64 ,100) WHERE (oid
10b0: 25 39 29 3d 3d 30 3b 0a 20 20 49 4e 53 45 52 54 %9)==0;. INSERT
10c0: 20 49 4e 54 4f 20 64 65 66 20 53 45 4c 45 43 54 INTO def SELECT
10d0: 20 2a 20 46 52 4f 4d 20 64 65 66 20 57 48 45 52 * FROM def WHER
10e0: 45 20 28 6f 69 64 25 31 33 29 3d 3d 30 3b 0a 0a E (oid%13)==0;..
10f0: 20 20 43 52 45 41 54 45 20 49 4e 44 45 58 20 64 CREATE INDEX d
1100: 65 66 5f 69 33 20 4f 4e 20 64 65 66 28 62 29 3b ef_i3 ON def(b);
1110: 0a 0a 20 20 55 50 44 41 54 45 20 64 65 66 20 53 .. UPDATE def S
1120: 45 54 20 61 20 3d 20 72 61 6e 64 73 74 72 28 31 ET a = randstr(1
1130: 30 30 2c 31 30 30 29 20 57 48 45 52 45 20 28 6f 00,100) WHERE (o
1140: 69 64 25 39 29 3d 3d 31 3b 0a 20 20 49 4e 53 45 id%9)==1;. INSE
1150: 52 54 20 49 4e 54 4f 20 64 65 66 20 53 45 4c 45 RT INTO def SELE
1160: 43 54 20 2a 20 46 52 4f 4d 20 64 65 66 20 57 48 CT * FROM def WH
1170: 45 52 45 20 28 6f 69 64 25 31 33 29 3d 3d 31 3b ERE (oid%13)==1;
1180: 0a 0a 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 .. CREATE TABLE
1190: 20 64 65 66 32 20 41 53 20 53 45 4c 45 43 54 20 def2 AS SELECT
11a0: 2a 20 46 52 4f 4d 20 64 65 66 3b 0a 20 20 44 52 * FROM def;. DR
11b0: 4f 50 20 54 41 42 4c 45 20 64 65 66 3b 0a 20 20 OP TABLE def;.
11c0: 43 52 45 41 54 45 20 54 41 42 4c 45 20 64 65 66 CREATE TABLE def
11d0: 20 41 53 20 53 45 4c 45 43 54 20 2a 20 46 52 4f AS SELECT * FRO
11e0: 4d 20 64 65 66 32 3b 0a 20 20 44 52 4f 50 20 54 M def2;. DROP T
11f0: 41 42 4c 45 20 64 65 66 32 3b 0a 0a 20 20 44 45 ABLE def2;.. DE
1200: 4c 45 54 45 20 46 52 4f 4d 20 64 65 66 20 57 48 LETE FROM def WH
1210: 45 52 45 20 28 6f 69 64 25 39 29 3d 3d 32 3b 0a ERE (oid%9)==2;.
1220: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 64 65 INSERT INTO de
1230: 66 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 f SELECT * FROM
1240: 64 65 66 20 57 48 45 52 45 20 28 6f 69 64 25 31 def WHERE (oid%1
1250: 33 29 3d 3d 32 3b 0a 20 20 43 4f 4d 4d 49 54 3b 3)==2;. COMMIT;
1260: 0a 7d 0a 0a 69 66 63 61 70 61 62 6c 65 20 74 65 .}..ifcapable te
1270: 6d 70 64 62 20 7b 0a 20 20 64 6f 5f 74 65 73 74 mpdb {. do_test
1280: 20 6d 61 6c 6c 6f 63 32 2e 33 2e 73 65 74 75 70 malloc2.3.setup
1290: 20 7b 0a 20 20 20 20 65 78 65 63 73 71 6c 20 7b {. execsql {
12a0: 0a 20 20 20 20 20 20 43 52 45 41 54 45 20 54 45 . CREATE TE
12b0: 4d 50 20 54 41 42 4c 45 20 67 68 69 28 61 2c 20 MP TABLE ghi(a,
12c0: 62 2c 20 63 29 3b 0a 20 20 20 20 20 20 42 45 47 b, c);. BEG
12d0: 49 4e 3b 0a 20 20 20 20 7d 0a 20 20 20 20 66 6f IN;. }. fo
12e0: 72 20 7b 73 65 74 20 69 20 30 7d 20 7b 24 69 3c r {set i 0} {$i<
12f0: 32 30 7d 20 7b 69 6e 63 72 20 69 7d 20 7b 0a 20 20} {incr i} {.
1300: 20 20 20 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 execsql {.
1310: 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f INSERT INTO
1320: 20 67 68 69 20 56 41 4c 55 45 53 28 72 61 6e 64 ghi VALUES(rand
1330: 73 74 72 28 33 30 30 2c 33 30 30 29 2c 72 61 6e str(300,300),ran
1340: 64 73 74 72 28 33 30 30 2c 33 30 30 29 2c 72 61 dstr(300,300),ra
1350: 6e 64 73 74 72 28 33 30 30 2c 33 30 30 29 29 3b ndstr(300,300));
1360: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 . }. }.
1370: 20 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 execsql {.
1380: 20 20 20 43 4f 4d 4d 49 54 3b 0a 20 20 20 20 7d COMMIT;. }
1390: 0a 20 20 7d 20 7b 7d 0a 20 20 64 6f 5f 6d 61 6c . } {}. do_mal
13a0: 6c 6f 63 32 5f 74 65 73 74 20 33 20 2d 73 71 6c loc2_test 3 -sql
13b0: 20 7b 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20 20 {. BEGIN;.
13c0: 20 20 43 52 45 41 54 45 20 49 4e 44 45 58 20 67 CREATE INDEX g
13d0: 68 69 5f 69 31 20 4f 4e 20 67 68 69 28 61 29 3b hi_i1 ON ghi(a);
13e0: 0a 20 20 20 20 55 50 44 41 54 45 20 64 65 66 20 . UPDATE def
13f0: 53 45 54 20 61 20 3d 20 72 61 6e 64 73 74 72 28 SET a = randstr(
1400: 31 30 30 2c 31 30 30 29 20 57 48 45 52 45 20 28 100,100) WHERE (
1410: 6f 69 64 25 32 29 3d 3d 30 3b 0a 20 20 20 20 55 oid%2)==0;. U
1420: 50 44 41 54 45 20 67 68 69 20 53 45 54 20 61 20 PDATE ghi SET a
1430: 3d 20 72 61 6e 64 73 74 72 28 31 30 30 2c 31 30 = randstr(100,10
1440: 30 29 20 57 48 45 52 45 20 28 6f 69 64 25 32 29 0) WHERE (oid%2)
1450: 3d 3d 30 3b 0a 20 20 20 20 43 4f 4d 4d 49 54 3b ==0;. COMMIT;
1460: 0a 20 20 7d 0a 7d 0a 0a 23 23 23 23 23 23 23 23 . }.}..########
1470: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
1480: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
1490: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
14a0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
14b0: 23 23 23 23 0a 23 20 54 68 65 20 74 65 73 74 20 ####.# The test
14c0: 63 61 73 65 73 20 62 65 6c 6f 77 20 61 72 65 20 cases below are
14d0: 74 6f 20 69 6e 63 72 65 61 73 65 20 74 68 65 20 to increase the
14e0: 63 6f 64 65 20 63 6f 76 65 72 61 67 65 20 69 6e code coverage in
14f0: 20 62 74 72 65 65 2e 63 20 61 6e 64 20 0a 23 20 btree.c and .#
1500: 70 61 67 65 72 2e 63 20 6f 66 20 74 68 69 73 20 pager.c of this
1510: 74 65 73 74 20 66 69 6c 65 2e 20 54 68 65 20 69 test file. The i
1520: 64 65 61 20 69 73 20 74 68 61 74 20 65 61 63 68 dea is that each
1530: 20 6d 61 6c 6c 6f 63 28 29 20 74 68 61 74 20 6f malloc() that o
1540: 63 63 75 72 73 20 69 6e 0a 23 20 74 68 65 73 65 ccurs in.# these
1550: 20 74 77 6f 20 73 6f 75 72 63 65 20 66 69 6c 65 two source file
1560: 73 20 73 68 6f 75 6c 64 20 62 65 20 6d 61 64 65 s should be made
1570: 20 74 6f 20 66 61 69 6c 20 61 74 20 6c 65 61 73 to fail at leas
1580: 74 20 6f 6e 63 65 2e 0a 23 0a 63 61 74 63 68 73 t once..#.catchs
1590: 71 6c 20 7b 0a 20 20 44 52 4f 50 20 54 41 42 4c ql {. DROP TABL
15a0: 45 20 67 68 69 3b 0a 7d 0a 64 6f 5f 6d 61 6c 6c E ghi;.}.do_mall
15b0: 6f 63 32 5f 74 65 73 74 20 34 2e 31 20 2d 73 71 oc2_test 4.1 -sq
15c0: 6c 20 7b 0a 20 20 53 45 4c 45 43 54 20 2a 20 46 l {. SELECT * F
15d0: 52 4f 4d 20 64 65 66 20 4f 52 44 45 52 20 42 59 ROM def ORDER BY
15e0: 20 6f 69 64 20 41 53 43 3b 0a 20 20 53 45 4c 45 oid ASC;. SELE
15f0: 43 54 20 2a 20 46 52 4f 4d 20 64 65 66 20 4f 52 CT * FROM def OR
1600: 44 45 52 20 42 59 20 6f 69 64 20 44 45 53 43 3b DER BY oid DESC;
1610: 0a 7d 0a 64 6f 5f 6d 61 6c 6c 6f 63 32 5f 74 65 .}.do_malloc2_te
1620: 73 74 20 34 2e 32 20 2d 73 71 6c 20 7b 0a 20 20 st 4.2 -sql {.
1630: 50 52 41 47 4d 41 20 63 61 63 68 65 5f 73 69 7a PRAGMA cache_siz
1640: 65 20 3d 20 31 30 3b 0a 20 20 42 45 47 49 4e 3b e = 10;. BEGIN;
1650: 0a 0a 20 20 2d 2d 20 54 68 69 73 20 77 69 6c 6c .. -- This will
1660: 20 70 75 74 20 61 62 6f 75 74 20 32 35 20 70 61 put about 25 pa
1670: 67 65 73 20 6f 6e 20 74 68 65 20 66 72 65 65 20 ges on the free
1680: 6c 69 73 74 2e 0a 20 20 44 45 4c 45 54 45 20 46 list.. DELETE F
1690: 52 4f 4d 20 64 65 66 20 57 48 45 52 45 20 31 3b ROM def WHERE 1;
16a0: 0a 0a 20 20 2d 2d 20 41 6c 6c 6f 63 61 74 65 20 .. -- Allocate
16b0: 33 32 20 6e 65 77 20 72 6f 6f 74 20 70 61 67 65 32 new root page
16c0: 73 2e 20 54 68 69 73 20 77 69 6c 6c 20 65 78 65 s. This will exe
16d0: 72 63 69 73 65 20 74 68 65 20 27 65 78 74 72 61 rcise the 'extra
16e0: 63 74 20 73 70 65 63 69 66 69 63 20 0a 20 20 2d ct specific . -
16f0: 2d 20 70 61 67 65 20 66 72 6f 6d 20 74 68 65 20 - page from the
1700: 66 72 65 65 6c 69 73 74 27 20 63 6f 64 65 20 77 freelist' code w
1710: 68 65 6e 20 69 6e 20 61 75 74 6f 2d 76 61 63 75 hen in auto-vacu
1720: 75 6d 20 6d 6f 64 65 20 28 73 65 65 20 74 68 65 um mode (see the
1730: 0a 20 20 2d 2d 20 61 6c 6c 6f 63 61 74 65 50 61 . -- allocatePa
1740: 67 65 28 29 20 72 6f 75 74 69 6e 65 20 69 6e 20 ge() routine in
1750: 62 74 72 65 65 2e 63 29 2e 0a 20 20 43 52 45 41 btree.c).. CREA
1760: 54 45 20 54 41 42 4c 45 20 74 31 28 61 20 55 4e TE TABLE t1(a UN
1770: 49 51 55 45 2c 20 62 20 55 4e 49 51 55 45 2c 20 IQUE, b UNIQUE,
1780: 63 20 55 4e 49 51 55 45 29 3b 0a 20 20 43 52 45 c UNIQUE);. CRE
1790: 41 54 45 20 54 41 42 4c 45 20 74 32 28 61 20 55 ATE TABLE t2(a U
17a0: 4e 49 51 55 45 2c 20 62 20 55 4e 49 51 55 45 2c NIQUE, b UNIQUE,
17b0: 20 63 20 55 4e 49 51 55 45 29 3b 0a 20 20 43 52 c UNIQUE);. CR
17c0: 45 41 54 45 20 54 41 42 4c 45 20 74 33 28 61 20 EATE TABLE t3(a
17d0: 55 4e 49 51 55 45 2c 20 62 20 55 4e 49 51 55 45 UNIQUE, b UNIQUE
17e0: 2c 20 63 20 55 4e 49 51 55 45 29 3b 0a 20 20 43 , c UNIQUE);. C
17f0: 52 45 41 54 45 20 54 41 42 4c 45 20 74 34 28 61 REATE TABLE t4(a
1800: 20 55 4e 49 51 55 45 2c 20 62 20 55 4e 49 51 55 UNIQUE, b UNIQU
1810: 45 2c 20 63 20 55 4e 49 51 55 45 29 3b 0a 20 20 E, c UNIQUE);.
1820: 43 52 45 41 54 45 20 54 41 42 4c 45 20 74 35 28 CREATE TABLE t5(
1830: 61 20 55 4e 49 51 55 45 2c 20 62 20 55 4e 49 51 a UNIQUE, b UNIQ
1840: 55 45 2c 20 63 20 55 4e 49 51 55 45 29 3b 0a 20 UE, c UNIQUE);.
1850: 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 74 36 CREATE TABLE t6
1860: 28 61 20 55 4e 49 51 55 45 2c 20 62 20 55 4e 49 (a UNIQUE, b UNI
1870: 51 55 45 2c 20 63 20 55 4e 49 51 55 45 29 3b 0a QUE, c UNIQUE);.
1880: 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 74 CREATE TABLE t
1890: 37 28 61 20 55 4e 49 51 55 45 2c 20 62 20 55 4e 7(a UNIQUE, b UN
18a0: 49 51 55 45 2c 20 63 20 55 4e 49 51 55 45 29 3b IQUE, c UNIQUE);
18b0: 0a 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 . CREATE TABLE
18c0: 74 38 28 61 20 55 4e 49 51 55 45 2c 20 62 20 55 t8(a UNIQUE, b U
18d0: 4e 49 51 55 45 2c 20 63 20 55 4e 49 51 55 45 29 NIQUE, c UNIQUE)
18e0: 3b 0a 0a 20 20 52 4f 4c 4c 42 41 43 4b 3b 0a 7d ;.. ROLLBACK;.}
18f0: 0a 0a 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ..##############
1900: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
1910: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
1920: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
1930: 23 23 23 23 23 23 23 23 23 23 0a 23 20 54 65 73 ##########.# Tes
1940: 74 20 74 68 61 74 20 74 68 65 20 67 6c 6f 62 61 t that the globa
1950: 6c 20 6c 69 6e 6b 65 64 20 6c 69 73 74 20 6f 66 l linked list of
1960: 20 64 61 74 61 62 61 73 65 20 68 61 6e 64 6c 65 database handle
1970: 73 20 77 6f 72 6b 73 2e 20 41 6e 20 61 73 73 65 s works. An asse
1980: 72 74 28 29 0a 23 20 77 69 6c 6c 20 66 61 69 6c rt().# will fail
1990: 20 69 66 20 74 68 65 72 65 20 69 73 20 73 6f 6d if there is som
19a0: 65 20 70 72 6f 62 6c 65 6d 2e 0a 64 6f 5f 74 65 e problem..do_te
19b0: 73 74 20 6d 61 6c 6c 6f 63 32 2d 35 20 7b 0a 20 st malloc2-5 {.
19c0: 20 73 71 6c 69 74 65 33 20 64 62 31 20 74 65 73 sqlite3 db1 tes
19d0: 74 2e 64 62 0a 20 20 73 71 6c 69 74 65 33 20 64 t.db. sqlite3 d
19e0: 62 32 20 74 65 73 74 2e 64 62 0a 20 20 73 71 6c b2 test.db. sql
19f0: 69 74 65 33 20 64 62 33 20 74 65 73 74 2e 64 62 ite3 db3 test.db
1a00: 0a 20 20 73 71 6c 69 74 65 33 20 64 62 34 20 74 . sqlite3 db4 t
1a10: 65 73 74 2e 64 62 0a 20 20 73 71 6c 69 74 65 33 est.db. sqlite3
1a20: 20 64 62 35 20 74 65 73 74 2e 64 62 0a 0a 20 20 db5 test.db..
1a30: 23 20 43 6c 6f 73 65 20 74 68 65 20 68 65 61 64 # Close the head
1a40: 20 6f 66 20 74 68 65 20 6c 69 73 74 3a 0a 20 20 of the list:.
1a50: 64 62 35 20 63 6c 6f 73 65 0a 20 20 0a 20 20 23 db5 close. . #
1a60: 20 43 6c 6f 73 65 20 74 68 65 20 65 6e 64 20 6f Close the end o
1a70: 66 20 74 68 65 20 6c 69 73 74 3a 0a 20 20 64 62 f the list:. db
1a80: 31 20 63 6c 6f 73 65 0a 0a 20 20 23 20 43 6c 6f 1 close.. # Clo
1a90: 73 65 20 61 20 68 61 6e 64 6c 65 20 66 72 6f 6d se a handle from
1aa0: 20 74 68 65 20 6d 69 64 64 6c 65 20 6f 66 20 74 the middle of t
1ab0: 68 65 20 6c 69 73 74 3a 0a 20 20 64 62 33 20 63 he list:. db3 c
1ac0: 6c 6f 73 65 0a 0a 20 20 23 20 43 6c 6f 73 65 20 lose.. # Close
1ad0: 74 68 65 20 6f 74 68 65 72 20 74 77 6f 2e 20 54 the other two. T
1ae0: 68 65 6e 20 6f 70 65 6e 20 61 6e 64 20 63 6c 6f hen open and clo
1af0: 73 65 20 6f 6e 65 20 6d 6f 72 65 20 64 61 74 61 se one more data
1b00: 62 61 73 65 2c 20 74 6f 20 6d 61 6b 65 0a 20 20 base, to make.
1b10: 23 20 73 75 72 65 20 74 68 65 20 68 65 61 64 20 # sure the head
1b20: 6f 66 20 74 68 65 20 6c 69 73 74 20 77 61 73 20 of the list was
1b30: 73 65 74 20 62 61 63 6b 20 74 6f 20 4e 55 4c 4c set back to NULL
1b40: 2e 0a 20 20 64 62 32 20 63 6c 6f 73 65 0a 20 20 .. db2 close.
1b50: 64 62 34 20 63 6c 6f 73 65 0a 20 20 73 71 6c 69 db4 close. sqli
1b60: 74 65 20 64 62 31 20 74 65 73 74 2e 64 62 0a 20 te db1 test.db.
1b70: 20 64 62 31 20 63 6c 6f 73 65 0a 7d 20 7b 7d 0a db1 close.} {}.
1b80: 0a 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 .###############
1b90: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
1ba0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
1bb0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
1bc0: 23 23 23 23 23 23 23 23 23 0a 23 20 43 68 65 63 #########.# Chec
1bd0: 6b 20 74 68 61 74 20 69 66 20 61 20 73 74 61 74 k that if a stat
1be0: 65 6d 65 6e 74 20 69 73 20 61 63 74 69 76 65 20 ement is active
1bf0: 73 71 6c 69 74 65 33 5f 67 6c 6f 62 61 6c 5f 72 sqlite3_global_r
1c00: 65 63 6f 76 65 72 20 64 6f 65 73 6e 27 74 20 72 ecover doesn't r
1c10: 65 73 65 74 0a 23 20 74 68 65 20 73 71 6c 69 74 eset.# the sqlit
1c20: 65 33 5f 6d 61 6c 6c 6f 63 5f 66 61 69 6c 65 64 e3_malloc_failed
1c30: 20 76 61 72 69 61 62 6c 65 2e 0a 23 0a 23 20 55 variable..#.# U
1c40: 70 64 61 74 65 3a 20 54 68 65 72 65 20 69 73 20 pdate: There is
1c50: 6e 6f 77 20 6e 6f 20 73 71 6c 69 74 65 33 5f 6d now no sqlite3_m
1c60: 61 6c 6c 6f 63 5f 66 61 69 6c 65 64 20 76 61 72 alloc_failed var
1c70: 69 61 62 6c 65 2c 20 73 6f 20 74 68 65 73 65 20 iable, so these
1c80: 74 65 73 74 73 20 0a 23 20 61 72 65 20 6e 6f 74 tests .# are not
1c90: 20 72 75 6e 2e 0a 23 0a 23 20 64 6f 5f 74 65 73 run..#.# do_tes
1ca0: 74 20 6d 61 6c 6c 6f 63 32 2d 36 2e 31 20 7b 0a t malloc2-6.1 {.
1cb0: 23 20 20 20 73 65 74 20 3a 3a 53 54 4d 54 20 5b # set ::STMT [
1cc0: 73 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 20 sqlite3_prepare
1cd0: 24 3a 3a 44 42 20 7b 53 45 4c 45 43 54 20 2a 20 $::DB {SELECT *
1ce0: 46 52 4f 4d 20 64 65 66 7d 20 2d 31 20 44 55 4d FROM def} -1 DUM
1cf0: 4d 59 5d 0a 23 20 20 20 73 71 6c 69 74 65 33 5f MY].# sqlite3_
1d00: 73 74 65 70 20 24 3a 3a 53 54 4d 54 0a 23 20 7d step $::STMT.# }
1d10: 20 7b 53 51 4c 49 54 45 5f 52 4f 57 7d 0a 23 20 {SQLITE_ROW}.#
1d20: 64 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 32 2d do_test malloc2-
1d30: 36 2e 32 20 7b 0a 23 20 20 20 73 71 6c 69 74 65 6.2 {.# sqlite
1d40: 33 20 64 62 31 20 74 65 73 74 2e 64 62 0a 23 20 3 db1 test.db.#
1d50: 20 20 73 71 6c 69 74 65 5f 6d 61 6c 6c 6f 63 5f sqlite_malloc_
1d60: 66 61 69 6c 20 31 30 30 0a 23 20 20 20 63 61 74 fail 100.# cat
1d70: 63 68 73 71 6c 20 7b 0a 23 20 20 20 20 20 53 45 chsql {.# SE
1d80: 4c 45 43 54 20 2a 20 46 52 4f 4d 20 64 65 66 3b LECT * FROM def;
1d90: 0a 23 20 20 20 7d 20 64 62 31 0a 23 20 7d 20 7b .# } db1.# } {
1da0: 31 20 7b 6f 75 74 20 6f 66 20 6d 65 6d 6f 72 79 1 {out of memory
1db0: 7d 7d 0a 23 20 64 6f 5f 74 65 73 74 20 6d 61 6c }}.# do_test mal
1dc0: 6c 6f 63 32 2d 36 2e 33 20 7b 0a 23 20 20 20 73 loc2-6.3 {.# s
1dd0: 71 6c 69 74 65 33 5f 67 6c 6f 62 61 6c 5f 72 65 qlite3_global_re
1de0: 63 6f 76 65 72 0a 23 20 7d 20 7b 53 51 4c 49 54 cover.# } {SQLIT
1df0: 45 5f 42 55 53 59 7d 0a 23 20 64 6f 5f 74 65 73 E_BUSY}.# do_tes
1e00: 74 20 6d 61 6c 6c 6f 63 32 2d 36 2e 34 20 7b 0a t malloc2-6.4 {.
1e10: 23 20 20 20 63 61 74 63 68 73 71 6c 20 7b 0a 23 # catchsql {.#
1e20: 20 20 20 20 20 53 45 4c 45 43 54 20 27 68 65 6c SELECT 'hel
1e30: 6c 6f 27 3b 0a 23 20 20 20 7d 0a 23 20 7d 20 7b lo';.# }.# } {
1e40: 31 20 7b 6f 75 74 20 6f 66 20 6d 65 6d 6f 72 79 1 {out of memory
1e50: 7d 7d 0a 23 20 64 6f 5f 74 65 73 74 20 6d 61 6c }}.# do_test mal
1e60: 6c 6f 63 32 2d 36 2e 35 20 7b 0a 23 20 20 20 73 loc2-6.5 {.# s
1e70: 71 6c 69 74 65 33 5f 72 65 73 65 74 20 24 3a 3a qlite3_reset $::
1e80: 53 54 4d 54 0a 23 20 7d 20 7b 53 51 4c 49 54 45 STMT.# } {SQLITE
1e90: 5f 4f 4b 7d 0a 23 20 64 6f 5f 74 65 73 74 20 6d _OK}.# do_test m
1ea0: 61 6c 6c 6f 63 32 2d 36 2e 36 20 7b 0a 23 20 20 alloc2-6.6 {.#
1eb0: 20 73 71 6c 69 74 65 33 5f 67 6c 6f 62 61 6c 5f sqlite3_global_
1ec0: 72 65 63 6f 76 65 72 0a 23 20 7d 20 7b 53 51 4c recover.# } {SQL
1ed0: 49 54 45 5f 4f 4b 7d 0a 23 20 64 6f 5f 74 65 73 ITE_OK}.# do_tes
1ee0: 74 20 6d 61 6c 6c 6f 63 32 2d 36 2e 37 20 7b 0a t malloc2-6.7 {.
1ef0: 23 20 20 20 63 61 74 63 68 73 71 6c 20 7b 0a 23 # catchsql {.#
1f00: 20 20 20 20 20 53 45 4c 45 43 54 20 27 68 65 6c SELECT 'hel
1f10: 6c 6f 27 3b 0a 23 20 20 20 7d 0a 23 20 7d 20 7b lo';.# }.# } {
1f20: 30 20 68 65 6c 6c 6f 7d 0a 23 20 64 6f 5f 74 65 0 hello}.# do_te
1f30: 73 74 20 6d 61 6c 6c 6f 63 32 2d 36 2e 38 20 7b st malloc2-6.8 {
1f40: 0a 23 20 20 20 73 71 6c 69 74 65 33 5f 73 74 65 .# sqlite3_ste
1f50: 70 20 24 3a 3a 53 54 4d 54 0a 23 20 7d 20 7b 53 p $::STMT.# } {S
1f60: 51 4c 49 54 45 5f 45 52 52 4f 52 7d 0a 23 20 64 QLITE_ERROR}.# d
1f70: 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 32 2d 36 o_test malloc2-6
1f80: 2e 39 20 7b 0a 23 20 20 20 73 71 6c 69 74 65 33 .9 {.# sqlite3
1f90: 5f 66 69 6e 61 6c 69 7a 65 20 24 3a 3a 53 54 4d _finalize $::STM
1fa0: 54 0a 23 20 7d 20 7b 53 51 4c 49 54 45 5f 53 43 T.# } {SQLITE_SC
1fb0: 48 45 4d 41 7d 0a 23 20 64 6f 5f 74 65 73 74 20 HEMA}.# do_test
1fc0: 6d 61 6c 6c 6f 63 32 2d 36 2e 31 30 20 7b 0a 23 malloc2-6.10 {.#
1fd0: 20 20 20 64 62 31 20 63 6c 6f 73 65 0a 23 20 7d db1 close.# }
1fe0: 20 7b 7d 0a 0a 23 23 23 23 23 23 23 23 23 23 23 {}..###########
1ff0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
2000: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
2010: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 ################
2020: 23 23 23 23 23 23 23 23 23 23 23 23 23 0a 23 20 #############.#
2030: 43 68 65 63 6b 20 74 68 61 74 20 69 66 20 61 6e Check that if an
2040: 20 69 6e 2d 6d 65 6d 6f 72 79 20 64 61 74 61 62 in-memory datab
2050: 61 73 65 20 69 73 20 62 65 69 6e 67 20 75 73 65 ase is being use
2060: 64 20 69 74 20 69 73 20 6e 6f 74 20 70 6f 73 73 d it is not poss
2070: 69 62 6c 65 0a 23 20 74 6f 20 72 65 63 6f 76 65 ible.# to recove
2080: 72 20 66 72 6f 6d 20 61 20 6d 61 6c 6c 6f 63 28 r from a malloc(
2090: 29 20 66 61 69 6c 75 72 65 2e 0a 23 0a 23 20 55 ) failure..#.# U
20a0: 70 64 61 74 65 3a 20 41 6e 20 69 6e 2d 6d 65 6d pdate: An in-mem
20b0: 6f 72 79 20 64 61 74 61 62 61 73 65 20 63 61 6e ory database can
20c0: 20 6e 6f 77 20 73 75 72 76 69 76 65 20 61 20 6d now survive a m
20d0: 61 6c 6c 6f 63 28 29 20 66 61 69 6c 75 72 65 2c alloc() failure,
20e0: 20 73 6f 20 74 68 65 73 65 0a 23 20 74 65 73 74 so these.# test
20f0: 73 20 61 72 65 20 6e 6f 74 20 72 75 6e 2e 0a 23 s are not run..#
2100: 0a 23 20 69 66 63 61 70 61 62 6c 65 20 6d 65 6d .# ifcapable mem
2110: 6f 72 79 64 62 20 7b 0a 23 20 20 20 64 6f 5f 74 orydb {.# do_t
2120: 65 73 74 20 6d 61 6c 6c 6f 63 32 2d 37 2e 31 20 est malloc2-7.1
2130: 7b 0a 23 20 20 20 20 20 73 71 6c 69 74 65 33 20 {.# sqlite3
2140: 64 62 31 20 3a 6d 65 6d 6f 72 79 3a 0a 23 20 20 db1 :memory:.#
2150: 20 20 20 6c 69 73 74 0a 23 20 20 20 7d 20 7b 7d list.# } {}
2160: 0a 23 20 20 20 64 6f 5f 74 65 73 74 20 6d 61 6c .# do_test mal
2170: 6c 6f 63 32 2d 37 2e 32 20 7b 0a 23 20 20 20 20 loc2-7.2 {.#
2180: 20 73 71 6c 69 74 65 5f 6d 61 6c 6c 6f 63 5f 66 sqlite_malloc_f
2190: 61 69 6c 20 31 30 30 0a 23 20 20 20 20 20 63 61 ail 100.# ca
21a0: 74 63 68 73 71 6c 20 7b 0a 23 20 20 20 20 20 20 tchsql {.#
21b0: 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 64 SELECT * FROM d
21c0: 65 66 3b 0a 23 20 20 20 20 20 7d 20 0a 23 20 20 ef;.# } .#
21d0: 20 7d 20 7b 31 20 7b 6f 75 74 20 6f 66 20 6d 65 } {1 {out of me
21e0: 6d 6f 72 79 7d 7d 0a 23 20 20 20 64 6f 5f 74 65 mory}}.# do_te
21f0: 73 74 20 6d 61 6c 6c 6f 63 32 2d 37 2e 33 20 7b st malloc2-7.3 {
2200: 0a 23 20 20 20 20 20 73 71 6c 69 74 65 33 5f 67 .# sqlite3_g
2210: 6c 6f 62 61 6c 5f 72 65 63 6f 76 65 72 0a 23 20 lobal_recover.#
2220: 20 20 7d 20 7b 53 51 4c 49 54 45 5f 45 52 52 4f } {SQLITE_ERRO
2230: 52 7d 0a 23 20 20 20 64 6f 5f 74 65 73 74 20 6d R}.# do_test m
2240: 61 6c 6c 6f 63 32 2d 37 2e 34 20 7b 0a 23 20 20 alloc2-7.4 {.#
2250: 20 20 20 63 61 74 63 68 73 71 6c 20 7b 0a 23 20 catchsql {.#
2260: 20 20 20 20 20 20 53 45 4c 45 43 54 20 27 68 65 SELECT 'he
2270: 6c 6c 6f 27 3b 0a 23 20 20 20 20 20 7d 0a 23 20 llo';.# }.#
2280: 20 20 7d 20 7b 31 20 7b 6f 75 74 20 6f 66 20 6d } {1 {out of m
2290: 65 6d 6f 72 79 7d 7d 0a 23 20 20 20 64 6f 5f 74 emory}}.# do_t
22a0: 65 73 74 20 6d 61 6c 6c 6f 63 32 2d 37 2e 35 20 est malloc2-7.5
22b0: 7b 0a 23 20 20 20 20 20 64 62 31 20 63 6c 6f 73 {.# db1 clos
22c0: 65 0a 23 20 20 20 7d 20 7b 7d 0a 23 20 20 20 64 e.# } {}.# d
22d0: 6f 5f 74 65 73 74 20 6d 61 6c 6c 6f 63 32 2d 37 o_test malloc2-7
22e0: 2e 36 20 7b 0a 23 20 20 20 20 20 73 71 6c 69 74 .6 {.# sqlit
22f0: 65 33 5f 67 6c 6f 62 61 6c 5f 72 65 63 6f 76 65 e3_global_recove
2300: 72 0a 23 20 20 20 7d 20 7b 53 51 4c 49 54 45 5f r.# } {SQLITE_
2310: 4f 4b 7d 0a 23 20 20 20 64 6f 5f 74 65 73 74 20 OK}.# do_test
2320: 6d 61 6c 6c 6f 63 32 2d 37 2e 37 20 7b 0a 23 20 malloc2-7.7 {.#
2330: 20 20 20 20 63 61 74 63 68 73 71 6c 20 7b 0a 23 catchsql {.#
2340: 20 20 20 20 20 20 20 53 45 4c 45 43 54 20 27 68 SELECT 'h
2350: 65 6c 6c 6f 27 3b 0a 23 20 20 20 20 20 7d 0a 23 ello';.# }.#
2360: 20 20 20 7d 20 7b 30 20 68 65 6c 6c 6f 7d 0a 23 } {0 hello}.#
2370: 20 7d 0a 0a 66 69 6e 69 73 68 5f 74 65 73 74 0a }..finish_test.