0000: 23 20 32 30 30 31 20 4f 63 74 6f 62 65 72 20 31 # 2001 October 1
0010: 32 0a 23 0a 23 20 54 68 65 20 61 75 74 68 6f 72 2.#.# The author
0020: 20 64 69 73 63 6c 61 69 6d 73 20 63 6f 70 79 72 disclaims copyr
0030: 69 67 68 74 20 74 6f 20 74 68 69 73 20 73 6f 75 ight to this sou
0040: 72 63 65 20 63 6f 64 65 2e 20 20 49 6e 20 70 6c rce code. In pl
0050: 61 63 65 20 6f 66 0a 23 20 61 20 6c 65 67 61 6c ace of.# a legal
0060: 20 6e 6f 74 69 63 65 2c 20 68 65 72 65 20 69 73 notice, here is
0070: 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a 23 0a 23 a blessing:.#.#
0080: 20 20 20 20 4d 61 79 20 79 6f 75 20 64 6f 20 67 May you do g
0090: 6f 6f 64 20 61 6e 64 20 6e 6f 74 20 65 76 69 6c ood and not evil
00a0: 2e 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20 66 ..# May you f
00b0: 69 6e 64 20 66 6f 72 67 69 76 65 6e 65 73 73 20 ind forgiveness
00c0: 66 6f 72 20 79 6f 75 72 73 65 6c 66 20 61 6e 64 for yourself and
00d0: 20 66 6f 72 67 69 76 65 20 6f 74 68 65 72 73 2e forgive others.
00e0: 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20 73 68 .# May you sh
00f0: 61 72 65 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 are freely, neve
0100: 72 20 74 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 r taking more th
0110: 61 6e 20 79 6f 75 20 67 69 76 65 2e 0a 23 0a 23 an 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 2a 2a 0a 23 20 54 68 69 73 20 66 *******.# This f
0170: 69 6c 65 20 69 6d 70 6c 65 6d 65 6e 74 73 20 72 ile implements r
0180: 65 67 72 65 73 73 69 6f 6e 20 74 65 73 74 73 20 egression tests
0190: 66 6f 72 20 53 51 4c 69 74 65 20 6c 69 62 72 61 for SQLite libra
01a0: 72 79 2e 20 20 54 68 65 0a 23 20 66 6f 63 75 73 ry. The.# focus
01b0: 20 6f 66 20 74 68 69 73 20 66 69 6c 65 20 69 73 of this file is
01c0: 20 74 65 73 74 69 6e 67 20 66 6f 72 20 63 6f 72 testing for cor
01d0: 72 65 63 74 20 68 61 6e 64 6c 69 6e 67 20 6f 66 rect handling of
01e0: 20 49 2f 4f 20 65 72 72 6f 72 73 0a 23 20 73 75 I/O errors.# su
01f0: 63 68 20 61 73 20 77 72 69 74 65 73 20 66 61 69 ch as writes fai
0200: 6c 69 6e 67 20 62 65 63 61 75 73 65 20 74 68 65 ling because the
0210: 20 64 69 73 6b 20 69 73 20 66 75 6c 6c 2e 0a 23 disk is full..#
0220: 20 0a 23 20 54 68 65 20 74 65 73 74 73 20 69 6e .# The tests in
0230: 20 74 68 69 73 20 66 69 6c 65 20 75 73 65 20 73 this file use s
0240: 70 65 63 69 61 6c 20 66 61 63 69 6c 69 74 69 65 pecial facilitie
0250: 73 20 74 68 61 74 20 61 72 65 20 6f 6e 6c 79 0a s that are only.
0260: 23 20 61 76 61 69 6c 61 62 6c 65 20 69 6e 20 74 # available in t
0270: 68 65 20 53 51 4c 69 74 65 20 74 65 73 74 20 66 he SQLite test f
0280: 69 78 74 75 72 65 2e 0a 23 0a 23 20 24 49 64 3a ixture..#.# $Id:
0290: 20 69 6f 65 72 72 2e 74 65 73 74 2c 76 20 31 2e ioerr.test,v 1.
02a0: 34 32 20 32 30 30 38 2f 31 31 2f 32 36 20 30 37 42 2008/11/26 07
02b0: 3a 34 30 3a 33 30 20 64 61 6e 69 65 6c 6b 31 39 :40:30 danielk19
02c0: 37 37 20 45 78 70 20 24 0a 0a 73 65 74 20 74 65 77 Exp $..set te
02d0: 73 74 64 69 72 20 5b 66 69 6c 65 20 64 69 72 6e stdir [file dirn
02e0: 61 6d 65 20 24 61 72 67 76 30 5d 0a 73 6f 75 72 ame $argv0].sour
02f0: 63 65 20 24 74 65 73 74 64 69 72 2f 74 65 73 74 ce $testdir/test
0300: 65 72 2e 74 63 6c 0a 0a 23 20 49 66 20 53 51 4c er.tcl..# If SQL
0310: 49 54 45 5f 44 45 46 41 55 4c 54 5f 41 55 54 4f ITE_DEFAULT_AUTO
0320: 56 41 43 55 55 4d 20 69 73 20 73 65 74 20 74 6f VACUUM is set to
0330: 20 74 72 75 65 2c 20 74 68 65 6e 20 61 20 73 69 true, then a si
0340: 6d 75 6c 61 74 65 64 20 49 4f 20 65 72 72 6f 72 mulated IO error
0350: 0a 23 20 6f 6e 20 74 68 65 20 38 74 68 20 49 4f .# on the 8th IO
0360: 20 6f 70 65 72 61 74 69 6f 6e 20 69 6e 20 74 68 operation in th
0370: 65 20 53 51 4c 20 73 63 72 69 70 74 20 62 65 6c e SQL script bel
0380: 6f 77 20 64 6f 65 73 6e 27 74 20 72 65 70 6f 72 ow doesn't repor
0390: 74 20 61 6e 20 65 72 72 6f 72 2e 0a 23 0a 23 20 t an error..#.#
03a0: 54 68 69 73 20 69 73 20 62 65 63 61 75 73 65 20 This is because
03b0: 74 68 65 20 38 74 68 20 49 4f 20 63 61 6c 6c 20 the 8th IO call
03c0: 61 74 74 65 6d 70 74 73 20 74 6f 20 72 65 61 64 attempts to read
03d0: 20 70 61 67 65 20 32 20 6f 66 20 74 68 65 20 64 page 2 of the d
03e0: 61 74 61 62 61 73 65 0a 23 20 66 69 6c 65 20 77 atabase.# file w
03f0: 68 65 6e 20 74 68 65 20 66 69 6c 65 20 6f 6e 20 hen the file on
0400: 64 69 73 6b 20 69 73 20 6f 6e 6c 79 20 31 20 70 disk is only 1 p
0410: 61 67 65 2e 20 54 68 65 20 70 61 67 65 72 20 6c age. The pager l
0420: 61 79 65 72 20 64 65 74 65 63 74 73 20 74 68 61 ayer detects tha
0430: 74 0a 23 20 74 68 69 73 20 68 61 73 20 68 61 70 t.# this has hap
0440: 70 65 6e 65 64 20 61 6e 64 20 73 75 70 70 72 65 pened and suppre
0450: 73 73 65 73 20 74 68 65 20 65 72 72 6f 72 20 72 sses the error r
0460: 65 74 75 72 6e 65 64 20 62 79 20 74 68 65 20 4f eturned by the O
0470: 53 20 6c 61 79 65 72 2e 0a 23 0a 64 6f 5f 69 6f S layer..#.do_io
0480: 65 72 72 5f 74 65 73 74 20 69 6f 65 72 72 2d 31 err_test ioerr-1
0490: 20 2d 65 72 63 20 31 20 2d 63 6b 72 65 66 63 6f -erc 1 -ckrefco
04a0: 75 6e 74 20 31 20 2d 73 71 6c 70 72 65 70 20 7b unt 1 -sqlprep {
04b0: 0a 20 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d . SELECT * FROM
04c0: 20 73 71 6c 69 74 65 5f 6d 61 73 74 65 72 3b 0a sqlite_master;.
04d0: 7d 20 2d 73 71 6c 62 6f 64 79 20 7b 0a 20 20 43 } -sqlbody {. C
04e0: 52 45 41 54 45 20 54 41 42 4c 45 20 74 31 28 61 REATE TABLE t1(a
04f0: 2c 62 2c 63 29 3b 0a 20 20 53 45 4c 45 43 54 20 ,b,c);. SELECT
0500: 2a 20 46 52 4f 4d 20 73 71 6c 69 74 65 5f 6d 61 * FROM sqlite_ma
0510: 73 74 65 72 3b 0a 20 20 42 45 47 49 4e 20 54 52 ster;. BEGIN TR
0520: 41 4e 53 41 43 54 49 4f 4e 3b 0a 20 20 49 4e 53 ANSACTION;. INS
0530: 45 52 54 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 ERT INTO t1 VALU
0540: 45 53 28 31 2c 32 2c 33 29 3b 0a 20 20 49 4e 53 ES(1,2,3);. INS
0550: 45 52 54 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 ERT INTO t1 VALU
0560: 45 53 28 34 2c 35 2c 36 29 3b 0a 20 20 52 4f 4c ES(4,5,6);. ROL
0570: 4c 42 41 43 4b 3b 0a 20 20 53 45 4c 45 43 54 20 LBACK;. SELECT
0580: 2a 20 46 52 4f 4d 20 74 31 3b 0a 20 20 42 45 47 * FROM t1;. BEG
0590: 49 4e 20 54 52 41 4e 53 41 43 54 49 4f 4e 3b 0a IN TRANSACTION;.
05a0: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 INSERT INTO t1
05b0: 20 56 41 4c 55 45 53 28 31 2c 32 2c 33 29 3b 0a VALUES(1,2,3);.
05c0: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 INSERT INTO t1
05d0: 20 56 41 4c 55 45 53 28 34 2c 35 2c 36 29 3b 0a VALUES(4,5,6);.
05e0: 20 20 43 4f 4d 4d 49 54 3b 0a 20 20 53 45 4c 45 COMMIT;. SELE
05f0: 43 54 20 2a 20 46 52 4f 4d 20 74 31 3b 0a 20 20 CT * FROM t1;.
0600: 44 45 4c 45 54 45 20 46 52 4f 4d 20 74 31 20 57 DELETE FROM t1 W
0610: 48 45 52 45 20 61 3c 31 30 30 3b 0a 7d 20 2d 65 HERE a<100;.} -e
0620: 78 63 6c 75 64 65 20 5b 65 78 70 72 20 5b 73 74 xclude [expr [st
0630: 72 69 6e 67 20 6d 61 74 63 68 20 5b 65 78 65 63 ring match [exec
0640: 73 71 6c 20 7b 70 72 61 67 6d 61 20 61 75 74 6f sql {pragma auto
0650: 5f 76 61 63 75 75 6d 7d 5d 20 31 5d 20 3f 20 34 _vacuum}] 1] ? 4
0660: 20 3a 20 30 5d 0a 0a 23 20 54 65 73 74 20 66 6f : 0]..# Test fo
0670: 72 20 49 4f 20 65 72 72 6f 72 73 20 64 75 72 69 r IO errors duri
0680: 6e 67 20 61 20 56 41 43 55 55 4d 2e 20 0a 23 0a ng a VACUUM. .#.
0690: 23 20 54 68 65 20 66 69 72 73 74 20 49 4f 20 63 # The first IO c
06a0: 61 6c 6c 20 69 73 20 65 78 63 6c 75 64 65 64 20 all is excluded
06b0: 66 72 6f 6d 20 74 68 65 20 74 65 73 74 2e 20 54 from the test. T
06c0: 68 69 73 20 63 61 6c 6c 20 61 74 74 65 6d 70 74 his call attempt
06d0: 73 20 74 6f 20 72 65 61 64 0a 23 20 74 68 65 20 s to read.# the
06e0: 66 69 6c 65 2d 68 65 61 64 65 72 20 6f 66 20 74 file-header of t
06f0: 68 65 20 74 65 6d 70 6f 72 61 72 79 20 64 61 74 he temporary dat
0700: 61 62 61 73 65 20 75 73 65 64 20 62 79 20 56 41 abase used by VA
0710: 43 55 55 4d 2e 20 53 69 6e 63 65 20 74 68 65 0a CUUM. Since the.
0720: 23 20 64 61 74 61 62 61 73 65 20 64 6f 65 73 6e # database doesn
0730: 27 74 20 65 78 69 73 74 20 61 74 20 74 68 61 74 't exist at that
0740: 20 70 6f 69 6e 74 2c 20 74 68 65 20 49 4f 20 65 point, the IO e
0750: 72 72 6f 72 20 69 73 20 6e 6f 74 20 64 65 74 65 rror is not dete
0760: 63 74 65 64 2e 0a 23 20 0a 23 20 41 64 64 69 74 cted..# .# Addit
0770: 69 6f 6e 61 6c 6c 79 2c 20 69 66 20 61 75 74 6f ionally, if auto
0780: 2d 76 61 63 75 75 6d 20 69 73 20 65 6e 61 62 6c -vacuum is enabl
0790: 65 64 2c 20 74 68 65 20 31 32 74 68 20 49 4f 20 ed, the 12th IO
07a0: 65 72 72 6f 72 20 69 73 20 6e 6f 74 20 0a 23 20 error is not .#
07b0: 64 65 74 65 63 74 65 64 2e 20 53 61 6d 65 20 72 detected. Same r
07c0: 65 61 73 6f 6e 20 61 73 20 74 68 65 20 38 74 68 eason as the 8th
07d0: 20 69 6e 20 74 68 65 20 74 65 73 74 20 63 61 73 in the test cas
07e0: 65 20 61 62 6f 76 65 2e 0a 23 20 0a 69 66 63 61 e above..# .ifca
07f0: 70 61 62 6c 65 20 76 61 63 75 75 6d 20 7b 0a 20 pable vacuum {.
0800: 20 64 6f 5f 69 6f 65 72 72 5f 74 65 73 74 20 69 do_ioerr_test i
0810: 6f 65 72 72 2d 32 20 2d 63 6b 73 75 6d 20 74 72 oerr-2 -cksum tr
0820: 75 65 20 2d 63 6b 72 65 66 63 6f 75 6e 74 20 74 ue -ckrefcount t
0830: 72 75 65 20 2d 73 71 6c 70 72 65 70 20 7b 20 0a rue -sqlprep { .
0840: 20 20 20 20 42 45 47 49 4e 3b 20 0a 20 20 20 20 BEGIN; .
0850: 43 52 45 41 54 45 20 54 41 42 4c 45 20 74 31 28 CREATE TABLE t1(
0860: 61 2c 20 62 2c 20 63 29 3b 20 0a 20 20 20 20 49 a, b, c); . I
0870: 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 56 41 NSERT INTO t1 VA
0880: 4c 55 45 53 28 31 2c 20 72 61 6e 64 73 74 72 28 LUES(1, randstr(
0890: 35 30 2c 35 30 29 2c 20 72 61 6e 64 73 74 72 28 50,50), randstr(
08a0: 35 30 2c 35 30 29 29 3b 20 0a 20 20 20 20 49 4e 50,50)); . IN
08b0: 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53 45 4c SERT INTO t1 SEL
08c0: 45 43 54 20 61 2b 32 2c 20 62 7c 7c 27 2d 27 7c ECT a+2, b||'-'|
08d0: 7c 72 6f 77 69 64 2c 20 63 7c 7c 27 2d 27 7c 7c |rowid, c||'-'||
08e0: 72 6f 77 69 64 20 46 52 4f 4d 20 74 31 3b 20 0a rowid FROM t1; .
08f0: 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 INSERT INTO
0900: 74 31 20 53 45 4c 45 43 54 20 61 2b 34 2c 20 62 t1 SELECT a+4, b
0910: 7c 7c 27 2d 27 7c 7c 72 6f 77 69 64 2c 20 63 7c ||'-'||rowid, c|
0920: 7c 27 2d 27 7c 7c 72 6f 77 69 64 20 46 52 4f 4d |'-'||rowid FROM
0930: 20 74 31 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 t1;. INSERT
0940: 49 4e 54 4f 20 74 31 20 53 45 4c 45 43 54 20 61 INTO t1 SELECT a
0950: 2b 38 2c 20 62 7c 7c 27 2d 27 7c 7c 72 6f 77 69 +8, b||'-'||rowi
0960: 64 2c 20 63 7c 7c 27 2d 27 7c 7c 72 6f 77 69 64 d, c||'-'||rowid
0970: 20 46 52 4f 4d 20 74 31 3b 0a 20 20 20 20 49 4e FROM t1;. IN
0980: 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53 45 4c SERT INTO t1 SEL
0990: 45 43 54 20 61 2b 31 36 2c 20 62 7c 7c 27 2d 27 ECT a+16, b||'-'
09a0: 7c 7c 72 6f 77 69 64 2c 20 63 7c 7c 27 2d 27 7c ||rowid, c||'-'|
09b0: 7c 72 6f 77 69 64 20 46 52 4f 4d 20 74 31 3b 0a |rowid FROM t1;.
09c0: 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 INSERT INTO
09d0: 74 31 20 53 45 4c 45 43 54 20 61 2b 33 32 2c 20 t1 SELECT a+32,
09e0: 62 7c 7c 27 2d 27 7c 7c 72 6f 77 69 64 2c 20 63 b||'-'||rowid, c
09f0: 7c 7c 27 2d 27 7c 7c 72 6f 77 69 64 20 46 52 4f ||'-'||rowid FRO
0a00: 4d 20 74 31 3b 0a 20 20 20 20 49 4e 53 45 52 54 M t1;. INSERT
0a10: 20 49 4e 54 4f 20 74 31 20 53 45 4c 45 43 54 20 INTO t1 SELECT
0a20: 61 2b 36 34 2c 20 62 7c 7c 27 2d 27 7c 7c 72 6f a+64, b||'-'||ro
0a30: 77 69 64 2c 20 63 7c 7c 27 2d 27 7c 7c 72 6f 77 wid, c||'-'||row
0a40: 69 64 20 46 52 4f 4d 20 74 31 3b 0a 20 20 20 20 id FROM t1;.
0a50: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53 INSERT INTO t1 S
0a60: 45 4c 45 43 54 20 61 2b 31 32 38 2c 20 62 7c 7c ELECT a+128, b||
0a70: 27 2d 27 7c 7c 72 6f 77 69 64 2c 20 63 7c 7c 27 '-'||rowid, c||'
0a80: 2d 27 7c 7c 72 6f 77 69 64 20 46 52 4f 4d 20 74 -'||rowid FROM t
0a90: 31 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 1;. INSERT IN
0aa0: 54 4f 20 74 31 20 56 41 4c 55 45 53 28 31 2c 20 TO t1 VALUES(1,
0ab0: 72 61 6e 64 73 74 72 28 36 30 30 2c 36 30 30 29 randstr(600,600)
0ac0: 2c 20 72 61 6e 64 73 74 72 28 36 30 30 2c 36 30 , randstr(600,60
0ad0: 30 29 29 3b 0a 20 20 20 20 43 52 45 41 54 45 20 0));. CREATE
0ae0: 54 41 42 4c 45 20 74 32 20 41 53 20 53 45 4c 45 TABLE t2 AS SELE
0af0: 43 54 20 2a 20 46 52 4f 4d 20 74 31 3b 0a 20 20 CT * FROM t1;.
0b00: 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 74 CREATE TABLE t
0b10: 33 20 41 53 20 53 45 4c 45 43 54 20 2a 20 46 52 3 AS SELECT * FR
0b20: 4f 4d 20 74 31 3b 0a 20 20 20 20 43 4f 4d 4d 49 OM t1;. COMMI
0b30: 54 3b 0a 20 20 20 20 44 52 4f 50 20 54 41 42 4c T;. DROP TABL
0b40: 45 20 74 32 3b 0a 20 20 7d 20 2d 73 71 6c 62 6f E t2;. } -sqlbo
0b50: 64 79 20 7b 0a 20 20 20 20 56 41 43 55 55 4d 3b dy {. VACUUM;
0b60: 0a 20 20 7d 20 2d 65 78 63 6c 75 64 65 20 5b 6c . } -exclude [l
0b70: 69 73 74 20 5c 0a 20 20 20 20 20 20 31 20 5b 65 ist \. 1 [e
0b80: 78 70 72 20 5b 73 74 72 69 6e 67 20 6d 61 74 63 xpr [string matc
0b90: 68 20 5b 65 78 65 63 73 71 6c 20 7b 70 72 61 67 h [execsql {prag
0ba0: 6d 61 20 61 75 74 6f 5f 76 61 63 75 75 6d 7d 5d ma auto_vacuum}]
0bb0: 20 31 5d 3f 39 3a 2d 31 5d 5d 0a 7d 0a 0a 64 6f 1]?9:-1]].}..do
0bc0: 5f 69 6f 65 72 72 5f 74 65 73 74 20 69 6f 65 72 _ioerr_test ioer
0bd0: 72 2d 33 20 2d 63 6b 72 65 66 63 6f 75 6e 74 20 r-3 -ckrefcount
0be0: 74 72 75 65 20 2d 74 63 6c 70 72 65 70 20 7b 0a true -tclprep {.
0bf0: 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 execsql {.
0c00: 50 52 41 47 4d 41 20 63 61 63 68 65 5f 73 69 7a PRAGMA cache_siz
0c10: 65 20 3d 20 31 30 3b 0a 20 20 20 20 42 45 47 49 e = 10;. BEGI
0c20: 4e 3b 0a 20 20 20 20 43 52 45 41 54 45 20 54 41 N;. CREATE TA
0c30: 42 4c 45 20 61 62 63 28 61 29 3b 0a 20 20 20 20 BLE abc(a);.
0c40: 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63 20 INSERT INTO abc
0c50: 56 41 4c 55 45 53 28 72 61 6e 64 73 74 72 28 31 VALUES(randstr(1
0c60: 35 30 30 2c 31 35 30 30 29 29 3b 20 2d 2d 20 50 500,1500)); -- P
0c70: 61 67 65 20 34 20 69 73 20 6f 76 65 72 66 6c 6f age 4 is overflo
0c80: 77 0a 20 20 7d 0a 20 20 66 6f 72 20 7b 73 65 74 w. }. for {set
0c90: 20 69 20 30 7d 20 7b 24 69 3c 31 35 30 7d 20 7b i 0} {$i<150} {
0ca0: 69 6e 63 72 20 69 7d 20 7b 0a 20 20 20 20 65 78 incr i} {. ex
0cb0: 65 63 73 71 6c 20 7b 0a 20 20 20 20 20 20 49 4e ecsql {. IN
0cc0: 53 45 52 54 20 49 4e 54 4f 20 61 62 63 20 56 41 SERT INTO abc VA
0cd0: 4c 55 45 53 28 72 61 6e 64 73 74 72 28 31 30 30 LUES(randstr(100
0ce0: 2c 31 30 30 29 29 3b 20 0a 20 20 20 20 7d 0a 20 ,100)); . }.
0cf0: 20 7d 0a 20 20 65 78 65 63 73 71 6c 20 43 4f 4d }. execsql COM
0d00: 4d 49 54 0a 7d 20 2d 73 71 6c 62 6f 64 79 20 7b MIT.} -sqlbody {
0d10: 0a 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 . CREATE TABLE
0d20: 61 62 63 32 28 61 29 3b 0a 20 20 42 45 47 49 4e abc2(a);. BEGIN
0d30: 3b 0a 20 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 ;. DELETE FROM
0d40: 61 62 63 20 57 48 45 52 45 20 6c 65 6e 67 74 68 abc WHERE length
0d50: 28 61 29 3e 31 30 30 3b 0a 20 20 55 50 44 41 54 (a)>100;. UPDAT
0d60: 45 20 61 62 63 20 53 45 54 20 61 20 3d 20 72 61 E abc SET a = ra
0d70: 6e 64 73 74 72 28 39 30 2c 39 30 29 3b 0a 20 20 ndstr(90,90);.
0d80: 43 4f 4d 4d 49 54 3b 0a 20 20 43 52 45 41 54 45 COMMIT;. CREATE
0d90: 20 54 41 42 4c 45 20 61 62 63 33 28 61 29 3b 0a TABLE abc3(a);.
0da0: 7d 20 0a 0a 23 20 54 65 73 74 20 49 4f 20 65 72 } ..# Test IO er
0db0: 72 6f 72 73 20 74 68 61 74 20 63 61 6e 20 6f 63 rors that can oc
0dc0: 63 75 72 20 72 65 74 72 69 65 76 69 6e 67 20 61 cur retrieving a
0dd0: 20 72 65 63 6f 72 64 20 68 65 61 64 65 72 20 74 record header t
0de0: 68 61 74 20 66 6c 6f 77 73 20 6f 76 65 72 0a 23 hat flows over.#
0df0: 20 6f 6e 74 6f 20 61 6e 20 6f 76 65 72 66 6c 6f onto an overflo
0e00: 77 20 70 61 67 65 2e 0a 64 6f 5f 69 6f 65 72 72 w page..do_ioerr
0e10: 5f 74 65 73 74 20 69 6f 65 72 72 2d 34 20 2d 63 _test ioerr-4 -c
0e20: 6b 72 65 66 63 6f 75 6e 74 20 74 72 75 65 20 2d krefcount true -
0e30: 74 63 6c 70 72 65 70 20 7b 0a 20 20 73 65 74 20 tclprep {. set
0e40: 73 71 6c 20 22 43 52 45 41 54 45 20 54 41 42 4c sql "CREATE TABL
0e50: 45 20 61 62 63 28 61 31 22 0a 20 20 66 6f 72 20 E abc(a1". for
0e60: 7b 73 65 74 20 69 20 32 7d 20 7b 24 69 3c 31 33 {set i 2} {$i<13
0e70: 30 30 7d 20 7b 69 6e 63 72 20 69 7d 20 7b 0a 20 00} {incr i} {.
0e80: 20 20 20 61 70 70 65 6e 64 20 73 71 6c 20 22 2c append sql ",
0e90: 20 61 24 69 22 0a 20 20 7d 0a 20 20 61 70 70 65 a$i". }. appe
0ea0: 6e 64 20 73 71 6c 20 22 29 3b 22 0a 20 20 65 78 nd sql ");". ex
0eb0: 65 63 73 71 6c 20 24 73 71 6c 0a 20 20 65 78 65 ecsql $sql. exe
0ec0: 63 73 71 6c 20 7b 49 4e 53 45 52 54 20 49 4e 54 csql {INSERT INT
0ed0: 4f 20 61 62 63 20 28 61 31 29 20 56 41 4c 55 45 O abc (a1) VALUE
0ee0: 53 28 4e 55 4c 4c 29 7d 0a 7d 20 2d 73 71 6c 62 S(NULL)}.} -sqlb
0ef0: 6f 64 79 20 7b 0a 20 53 45 4c 45 43 54 20 2a 20 ody {. SELECT *
0f00: 46 52 4f 4d 20 61 62 63 3b 0a 7d 0a 0a 0a 23 20 FROM abc;.}...#
0f10: 54 65 73 74 20 49 4f 20 65 72 72 6f 72 73 20 74 Test IO errors t
0f20: 68 61 74 20 6d 61 79 20 6f 63 63 75 72 20 64 75 hat may occur du
0f30: 72 69 6e 67 20 61 20 6d 75 6c 74 69 2d 66 69 6c ring a multi-fil
0f40: 65 20 63 6f 6d 6d 69 74 2e 0a 23 0a 23 20 54 65 e commit..#.# Te
0f50: 73 74 73 20 38 20 61 6e 64 20 31 37 20 61 72 65 sts 8 and 17 are
0f60: 20 65 78 63 6c 75 64 65 64 20 77 68 65 6e 20 61 excluded when a
0f70: 75 74 6f 2d 76 61 63 75 75 6d 20 69 73 20 65 6e uto-vacuum is en
0f80: 61 62 6c 65 64 20 66 6f 72 20 74 68 65 20 73 61 abled for the sa
0f90: 6d 65 20 0a 23 20 72 65 61 73 6f 6e 20 61 73 20 me .# reason as
0fa0: 69 6e 20 74 65 73 74 20 63 61 73 65 73 20 69 6f in test cases io
0fb0: 65 72 72 2d 31 2e 58 58 58 0a 69 66 63 61 70 61 err-1.XXX.ifcapa
0fc0: 62 6c 65 20 61 74 74 61 63 68 20 7b 0a 20 20 73 ble attach {. s
0fd0: 65 74 20 65 78 20 22 22 0a 20 20 69 66 20 7b 5b et ex "". if {[
0fe0: 73 74 72 69 6e 67 20 6d 61 74 63 68 20 5b 65 78 string match [ex
0ff0: 65 63 73 71 6c 20 7b 70 72 61 67 6d 61 20 61 75 ecsql {pragma au
1000: 74 6f 5f 76 61 63 75 75 6d 7d 5d 20 31 5d 7d 20 to_vacuum}] 1]}
1010: 7b 0a 20 20 20 20 73 65 74 20 65 78 20 5b 6c 69 {. set ex [li
1020: 73 74 20 34 20 31 37 5d 0a 20 20 7d 0a 20 20 64 st 4 17]. }. d
1030: 6f 5f 69 6f 65 72 72 5f 74 65 73 74 20 69 6f 65 o_ioerr_test ioe
1040: 72 72 2d 35 20 2d 72 65 73 74 6f 72 65 70 72 6e rr-5 -restoreprn
1050: 67 20 30 20 2d 63 6b 72 65 66 63 6f 75 6e 74 20 g 0 -ckrefcount
1060: 74 72 75 65 20 2d 73 71 6c 70 72 65 70 20 7b 0a true -sqlprep {.
1070: 20 20 20 20 41 54 54 41 43 48 20 27 74 65 73 74 ATTACH 'test
1080: 32 2e 64 62 27 20 41 53 20 74 65 73 74 32 3b 0a 2.db' AS test2;.
1090: 20 20 7d 20 2d 73 71 6c 62 6f 64 79 20 7b 0a 20 } -sqlbody {.
10a0: 20 20 20 42 45 47 49 4e 3b 0a 20 20 20 20 43 52 BEGIN;. CR
10b0: 45 41 54 45 20 54 41 42 4c 45 20 74 31 28 61 2c EATE TABLE t1(a,
10c0: 62 2c 63 29 3b 0a 20 20 20 20 43 52 45 41 54 45 b,c);. CREATE
10d0: 20 54 41 42 4c 45 20 74 65 73 74 32 2e 74 32 28 TABLE test2.t2(
10e0: 61 2c 62 2c 63 29 3b 0a 20 20 20 20 43 4f 4d 4d a,b,c);. COMM
10f0: 49 54 3b 0a 20 20 7d 20 2d 65 78 63 6c 75 64 65 IT;. } -exclude
1100: 20 24 65 78 0a 7d 0a 0a 23 20 54 65 73 74 20 49 $ex.}..# Test I
1110: 4f 20 65 72 72 6f 72 73 20 77 68 65 6e 20 72 65 O errors when re
1120: 70 6c 61 79 69 6e 67 20 74 77 6f 20 68 6f 74 20 playing two hot
1130: 6a 6f 75 72 6e 61 6c 73 20 66 72 6f 6d 20 61 20 journals from a
1140: 32 2d 66 69 6c 65 20 0a 23 20 74 72 61 6e 73 61 2-file .# transa
1150: 63 74 69 6f 6e 2e 20 54 68 69 73 20 74 65 73 74 ction. This test
1160: 20 6f 6e 6c 79 20 72 75 6e 73 20 6f 6e 20 55 4e only runs on UN
1170: 49 58 2e 0a 69 66 63 61 70 61 62 6c 65 20 63 72 IX..ifcapable cr
1180: 61 73 68 74 65 73 74 26 26 61 74 74 61 63 68 20 ashtest&&attach
1190: 7b 0a 20 20 69 66 20 7b 21 5b 63 61 74 63 68 20 {. if {![catch
11a0: 7b 73 71 6c 69 74 65 33 20 2d 68 61 73 5f 63 6f {sqlite3 -has_co
11b0: 64 65 63 7d 20 72 5d 20 26 26 20 21 24 72 7d 20 dec} r] && !$r}
11c0: 7b 0a 20 20 20 20 64 6f 5f 69 6f 65 72 72 5f 74 {. do_ioerr_t
11d0: 65 73 74 20 69 6f 65 72 72 2d 36 20 2d 63 6b 72 est ioerr-6 -ckr
11e0: 65 66 63 6f 75 6e 74 20 74 72 75 65 20 2d 74 63 efcount true -tc
11f0: 6c 70 72 65 70 20 7b 0a 20 20 20 20 20 20 65 78 lprep {. ex
1200: 65 63 73 71 6c 20 7b 0a 20 20 20 20 20 20 20 20 ecsql {.
1210: 41 54 54 41 43 48 20 27 74 65 73 74 32 2e 64 62 ATTACH 'test2.db
1220: 27 20 61 73 20 61 75 78 3b 0a 20 20 20 20 20 20 ' as aux;.
1230: 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 74 CREATE TABLE t
1240: 78 28 61 2c 20 62 29 3b 0a 20 20 20 20 20 20 20 x(a, b);.
1250: 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 61 75 CREATE TABLE au
1260: 78 2e 74 79 28 61 2c 20 62 29 3b 0a 20 20 20 20 x.ty(a, b);.
1270: 20 20 7d 0a 20 20 20 20 20 20 73 65 74 20 72 63 }. set rc
1280: 20 5b 63 72 61 73 68 73 71 6c 20 2d 64 65 6c 61 [crashsql -dela
1290: 79 20 32 20 2d 66 69 6c 65 20 74 65 73 74 32 2e y 2 -file test2.
12a0: 64 62 2d 6a 6f 75 72 6e 61 6c 20 7b 0a 20 20 20 db-journal {.
12b0: 20 20 20 20 20 41 54 54 41 43 48 20 27 74 65 73 ATTACH 'tes
12c0: 74 32 2e 64 62 27 20 61 73 20 61 75 78 3b 0a 20 t2.db' as aux;.
12d0: 20 20 20 20 20 20 20 50 52 41 47 4d 41 20 63 61 PRAGMA ca
12e0: 63 68 65 5f 73 69 7a 65 20 3d 20 31 30 3b 0a 20 che_size = 10;.
12f0: 20 20 20 20 20 20 20 42 45 47 49 4e 3b 0a 20 20 BEGIN;.
1300: 20 20 20 20 20 20 43 52 45 41 54 45 20 54 41 42 CREATE TAB
1310: 4c 45 20 61 75 78 2e 74 32 28 61 2c 20 62 2c 20 LE aux.t2(a, b,
1320: 63 29 3b 0a 20 20 20 20 20 20 20 20 43 52 45 41 c);. CREA
1330: 54 45 20 54 41 42 4c 45 20 74 31 28 61 2c 20 62 TE TABLE t1(a, b
1340: 2c 20 63 29 3b 0a 20 20 20 20 20 20 20 20 43 4f , c);. CO
1350: 4d 4d 49 54 3b 0a 20 20 20 20 20 20 7d 5d 0a 20 MMIT;. }].
1360: 20 20 20 20 20 69 66 20 7b 24 72 63 21 3d 22 31 if {$rc!="1
1370: 20 7b 63 68 69 6c 64 20 70 72 6f 63 65 73 73 20 {child process
1380: 65 78 69 74 65 64 20 61 62 6e 6f 72 6d 61 6c 6c exited abnormall
1390: 79 7d 22 7d 20 7b 0a 20 20 20 20 20 20 20 20 65 y}"} {. e
13a0: 72 72 6f 72 20 22 57 72 6f 6e 67 20 65 72 72 6f rror "Wrong erro
13b0: 72 20 6d 65 73 73 61 67 65 3a 20 24 72 63 22 0a r message: $rc".
13c0: 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 20 2d 73 }. } -s
13d0: 71 6c 62 6f 64 79 20 7b 0a 20 20 20 20 20 20 53 qlbody {. S
13e0: 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 73 71 6c ELECT * FROM sql
13f0: 69 74 65 5f 6d 61 73 74 65 72 3b 0a 20 20 20 20 ite_master;.
1400: 20 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 SELECT * FROM
1410: 61 75 78 2e 73 71 6c 69 74 65 5f 6d 61 73 74 65 aux.sqlite_maste
1420: 72 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 20 0a r;. }. }.} .
1430: 0a 23 20 54 65 73 74 20 68 61 6e 64 6c 69 6e 67 .# Test handling
1440: 20 6f 66 20 49 4f 20 65 72 72 6f 72 73 20 74 68 of IO errors th
1450: 61 74 20 6f 63 63 75 72 20 77 68 69 6c 65 20 72 at occur while r
1460: 6f 6c 6c 69 6e 67 20 62 61 63 6b 20 68 6f 74 20 olling back hot
1470: 6a 6f 75 72 6e 61 6c 0a 23 20 66 69 6c 65 73 2e journal.# files.
1480: 0a 23 0a 23 20 54 68 65 73 65 20 74 65 73 74 73 .#.# These tests
1490: 20 63 61 6e 27 74 20 62 65 20 72 75 6e 20 6f 6e can't be run on
14a0: 20 77 69 6e 64 6f 77 73 20 62 65 63 61 75 73 65 windows because
14b0: 20 74 68 65 20 77 69 6e 64 6f 77 73 20 76 65 72 the windows ver
14c0: 73 69 6f 6e 20 6f 66 20 0a 23 20 53 51 4c 69 74 sion of .# SQLit
14d0: 65 20 68 6f 6c 64 73 20 61 20 6d 61 6e 64 61 74 e holds a mandat
14e0: 6f 72 79 20 65 78 63 6c 75 73 69 76 65 20 6c 6f ory exclusive lo
14f0: 63 6b 20 6f 6e 20 6a 6f 75 72 6e 61 6c 20 66 69 ck on journal fi
1500: 6c 65 73 20 69 74 20 68 61 73 20 6f 70 65 6e 2e les it has open.
1510: 0a 23 0a 69 66 20 7b 24 74 63 6c 5f 70 6c 61 74 .#.if {$tcl_plat
1520: 66 6f 72 6d 28 70 6c 61 74 66 6f 72 6d 29 21 3d form(platform)!=
1530: 22 77 69 6e 64 6f 77 73 22 7d 20 7b 0a 20 20 64 "windows"} {. d
1540: 6f 5f 69 6f 65 72 72 5f 74 65 73 74 20 69 6f 65 o_ioerr_test ioe
1550: 72 72 2d 37 20 2d 74 63 6c 70 72 65 70 20 7b 0a rr-7 -tclprep {.
1560: 20 20 20 20 64 62 20 63 6c 6f 73 65 0a 20 20 20 db close.
1570: 20 73 71 6c 69 74 65 33 20 64 62 32 20 74 65 73 sqlite3 db2 tes
1580: 74 32 2e 64 62 0a 20 20 20 20 64 62 32 20 65 76 t2.db. db2 ev
1590: 61 6c 20 7b 0a 20 20 20 20 20 20 50 52 41 47 4d al {. PRAGM
15a0: 41 20 73 79 6e 63 68 72 6f 6e 6f 75 73 20 3d 20 A synchronous =
15b0: 30 3b 0a 20 20 20 20 20 20 43 52 45 41 54 45 20 0;. CREATE
15c0: 54 41 42 4c 45 20 74 31 28 61 2c 20 62 29 3b 0a TABLE t1(a, b);.
15d0: 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 INSERT INT
15e0: 4f 20 74 31 20 56 41 4c 55 45 53 28 31 2c 20 32 O t1 VALUES(1, 2
15f0: 29 3b 0a 20 20 20 20 20 20 42 45 47 49 4e 3b 0a );. BEGIN;.
1600: 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 INSERT INT
1610: 4f 20 74 31 20 56 41 4c 55 45 53 28 33 2c 20 34 O t1 VALUES(3, 4
1620: 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 6f 70 );. }. cop
1630: 79 5f 66 69 6c 65 20 74 65 73 74 32 2e 64 62 20 y_file test2.db
1640: 74 65 73 74 2e 64 62 0a 20 20 20 20 63 6f 70 79 test.db. copy
1650: 5f 66 69 6c 65 20 74 65 73 74 32 2e 64 62 2d 6a _file test2.db-j
1660: 6f 75 72 6e 61 6c 20 74 65 73 74 2e 64 62 2d 6a ournal test.db-j
1670: 6f 75 72 6e 61 6c 0a 20 20 20 20 64 62 32 20 63 ournal. db2 c
1680: 6c 6f 73 65 0a 20 20 7d 20 2d 74 63 6c 62 6f 64 lose. } -tclbod
1690: 79 20 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 20 y {. sqlite3
16a0: 64 62 20 74 65 73 74 2e 64 62 0a 20 20 20 20 64 db test.db. d
16b0: 62 20 65 76 61 6c 20 7b 0a 20 20 20 20 20 20 53 b eval {. S
16c0: 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 74 31 3b ELECT * FROM t1;
16d0: 0a 20 20 20 20 7d 0a 20 20 7d 20 2d 65 78 63 6c . }. } -excl
16e0: 75 64 65 20 31 0a 7d 0a 0a 23 20 46 6f 72 20 74 ude 1.}..# For t
16f0: 65 73 74 20 63 6f 76 65 72 61 67 65 3a 20 20 43 est coverage: C
1700: 61 75 73 65 20 61 6e 20 49 2f 4f 20 66 61 69 6c ause an I/O fail
1710: 75 72 65 20 77 68 69 6c 65 20 74 72 79 69 6e 67 ure while trying
1720: 20 74 6f 20 72 65 61 64 20 61 0a 23 20 73 68 6f to read a.# sho
1730: 72 74 20 66 69 65 6c 64 20 28 6f 6e 65 20 74 68 rt field (one th
1740: 61 74 20 66 69 74 73 20 69 6e 74 6f 20 61 20 4d at fits into a M
1750: 65 6d 20 62 75 66 66 65 72 20 77 69 74 68 6f 75 em buffer withou
1760: 74 20 6d 61 6c 6c 6f 63 69 6e 67 0a 23 20 66 6f t mallocing.# fo
1770: 72 20 73 70 61 63 65 29 2e 0a 23 0a 64 6f 5f 69 r space)..#.do_i
1780: 6f 65 72 72 5f 74 65 73 74 20 69 6f 65 72 72 2d oerr_test ioerr-
1790: 38 20 2d 63 6b 72 65 66 63 6f 75 6e 74 20 74 72 8 -ckrefcount tr
17a0: 75 65 20 2d 74 63 6c 70 72 65 70 20 7b 0a 20 20 ue -tclprep {.
17b0: 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 43 52 execsql {. CR
17c0: 45 41 54 45 20 54 41 42 4c 45 20 74 31 28 61 2c EATE TABLE t1(a,
17d0: 62 2c 63 29 3b 0a 20 20 20 20 49 4e 53 45 52 54 b,c);. INSERT
17e0: 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 INTO t1 VALUES(
17f0: 72 61 6e 64 73 74 72 28 32 30 30 2c 32 30 30 29 randstr(200,200)
1800: 2c 20 72 61 6e 64 73 74 72 28 31 30 30 30 2c 31 , randstr(1000,1
1810: 30 30 30 29 2c 20 32 29 3b 0a 20 20 7d 0a 20 20 000), 2);. }.
1820: 64 62 20 63 6c 6f 73 65 0a 20 20 73 71 6c 69 74 db close. sqlit
1830: 65 33 20 64 62 20 74 65 73 74 2e 64 62 0a 7d 20 e3 db test.db.}
1840: 2d 73 71 6c 62 6f 64 79 20 7b 0a 20 20 53 45 4c -sqlbody {. SEL
1850: 45 43 54 20 63 20 46 52 4f 4d 20 74 31 3b 0a 7d ECT c FROM t1;.}
1860: 0a 0a 23 20 46 6f 72 20 74 65 73 74 20 63 6f 76 ..# For test cov
1870: 65 72 61 67 65 3a 20 43 61 75 73 65 20 61 6e 20 erage: Cause an
1880: 49 4f 20 65 72 72 6f 72 20 77 68 69 6c 73 74 20 IO error whilst
1890: 72 65 61 64 69 6e 67 20 74 68 65 20 6d 61 73 74 reading the mast
18a0: 65 72 2d 6a 6f 75 72 6e 61 6c 0a 23 20 6e 61 6d er-journal.# nam
18b0: 65 20 66 72 6f 6d 20 61 20 6a 6f 75 72 6e 61 6c e from a journal
18c0: 20 66 69 6c 65 2e 0a 69 66 20 7b 24 74 63 6c 5f file..if {$tcl_
18d0: 70 6c 61 74 66 6f 72 6d 28 70 6c 61 74 66 6f 72 platform(platfor
18e0: 6d 29 3d 3d 22 75 6e 69 78 22 7d 20 7b 0a 20 20 m)=="unix"} {.
18f0: 64 6f 5f 69 6f 65 72 72 5f 74 65 73 74 20 69 6f do_ioerr_test io
1900: 65 72 72 2d 39 20 2d 63 6b 72 65 66 63 6f 75 6e err-9 -ckrefcoun
1910: 74 20 74 72 75 65 20 2d 74 63 6c 70 72 65 70 20 t true -tclprep
1920: 7b 0a 20 20 20 20 65 78 65 63 73 71 6c 20 7b 0a {. execsql {.
1930: 20 20 20 20 20 20 43 52 45 41 54 45 20 54 41 42 CREATE TAB
1940: 4c 45 20 74 31 28 61 2c 62 2c 63 29 3b 0a 20 20 LE t1(a,b,c);.
1950: 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 INSERT INTO
1960: 74 31 20 56 41 4c 55 45 53 28 72 61 6e 64 73 74 t1 VALUES(randst
1970: 72 28 32 30 30 2c 32 30 30 29 2c 20 72 61 6e 64 r(200,200), rand
1980: 73 74 72 28 31 30 30 30 2c 31 30 30 30 29 2c 20 str(1000,1000),
1990: 32 29 3b 0a 20 20 20 20 20 20 42 45 47 49 4e 3b 2);. BEGIN;
19a0: 0a 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e . INSERT IN
19b0: 54 4f 20 74 31 20 56 41 4c 55 45 53 28 72 61 6e TO t1 VALUES(ran
19c0: 64 73 74 72 28 32 30 30 2c 32 30 30 29 2c 20 72 dstr(200,200), r
19d0: 61 6e 64 73 74 72 28 31 30 30 30 2c 31 30 30 30 andstr(1000,1000
19e0: 29 2c 20 32 29 3b 0a 20 20 20 20 7d 0a 20 20 20 ), 2);. }.
19f0: 20 63 6f 70 79 5f 66 69 6c 65 20 74 65 73 74 2e copy_file test.
1a00: 64 62 2d 6a 6f 75 72 6e 61 6c 20 74 65 73 74 32 db-journal test2
1a10: 2e 64 62 2d 6a 6f 75 72 6e 61 6c 0a 20 20 20 20 .db-journal.
1a20: 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 20 20 execsql {.
1a30: 43 4f 4d 4d 49 54 3b 0a 20 20 20 20 7d 0a 20 20 COMMIT;. }.
1a40: 20 20 63 6f 70 79 5f 66 69 6c 65 20 74 65 73 74 copy_file test
1a50: 32 2e 64 62 2d 6a 6f 75 72 6e 61 6c 20 74 65 73 2.db-journal tes
1a60: 74 2e 64 62 2d 6a 6f 75 72 6e 61 6c 0a 20 20 20 t.db-journal.
1a70: 20 73 65 74 20 66 20 5b 6f 70 65 6e 20 74 65 73 set f [open tes
1a80: 74 2e 64 62 2d 6a 6f 75 72 6e 61 6c 20 61 5d 0a t.db-journal a].
1a90: 20 20 20 20 66 63 6f 6e 66 69 67 75 72 65 20 24 fconfigure $
1aa0: 66 20 2d 65 6e 63 6f 64 69 6e 67 20 62 69 6e 61 f -encoding bina
1ab0: 72 79 0a 20 20 20 20 70 75 74 73 20 2d 6e 6f 6e ry. puts -non
1ac0: 65 77 6c 69 6e 65 20 24 66 20 22 68 65 6c 6c 6f ewline $f "hello
1ad0: 22 0a 20 20 20 20 70 75 74 73 20 2d 6e 6f 6e 65 ". puts -none
1ae0: 77 6c 69 6e 65 20 24 66 20 22 5c 78 30 30 5c 78 wline $f "\x00\x
1af0: 30 30 5c 78 30 30 5c 78 30 35 5c 78 30 31 5c 78 00\x00\x05\x01\x
1b00: 30 32 5c 78 30 33 5c 78 30 34 22 0a 20 20 20 20 02\x03\x04".
1b10: 70 75 74 73 20 2d 6e 6f 6e 65 77 6c 69 6e 65 20 puts -nonewline
1b20: 24 66 20 22 5c 78 64 39 5c 78 64 35 5c 78 30 35 $f "\xd9\xd5\x05
1b30: 5c 78 66 39 5c 78 32 30 5c 78 61 31 5c 78 36 33 \xf9\x20\xa1\x63
1b40: 5c 78 64 37 22 0a 20 20 20 20 63 6c 6f 73 65 20 \xd7". close
1b50: 24 66 0a 20 20 7d 20 2d 73 71 6c 62 6f 64 79 20 $f. } -sqlbody
1b60: 7b 0a 20 20 20 20 53 45 4c 45 43 54 20 61 20 46 {. SELECT a F
1b70: 52 4f 4d 20 74 31 3b 0a 20 20 7d 0a 7d 0a 0a 23 ROM t1;. }.}..#
1b80: 20 46 6f 72 20 74 65 73 74 20 63 6f 76 65 72 61 For test covera
1b90: 67 65 3a 20 43 61 75 73 65 20 61 6e 20 49 4f 20 ge: Cause an IO
1ba0: 65 72 72 6f 72 20 64 75 72 69 6e 67 20 73 74 61 error during sta
1bb0: 74 65 6d 65 6e 74 20 70 6c 61 79 62 61 63 6b 20 tement playback
1bc0: 28 69 2e 65 2e 20 0a 23 20 61 20 63 6f 6e 73 74 (i.e. .# a const
1bd0: 72 61 69 6e 74 29 2e 0a 64 6f 5f 69 6f 65 72 72 raint)..do_ioerr
1be0: 5f 74 65 73 74 20 69 6f 65 72 72 2d 31 30 20 2d _test ioerr-10 -
1bf0: 63 6b 72 65 66 63 6f 75 6e 74 20 74 72 75 65 20 ckrefcount true
1c00: 2d 74 63 6c 70 72 65 70 20 7b 0a 20 20 65 78 65 -tclprep {. exe
1c10: 63 73 71 6c 20 7b 0a 20 20 20 20 42 45 47 49 4e csql {. BEGIN
1c20: 3b 0a 20 20 20 20 43 52 45 41 54 45 20 54 41 42 ;. CREATE TAB
1c30: 4c 45 20 74 31 28 61 20 50 52 49 4d 41 52 59 20 LE t1(a PRIMARY
1c40: 4b 45 59 2c 20 62 29 3b 0a 20 20 7d 0a 20 20 66 KEY, b);. }. f
1c50: 6f 72 20 7b 73 65 74 20 69 20 30 7d 20 7b 24 69 or {set i 0} {$i
1c60: 20 3c 20 35 30 30 7d 20 7b 69 6e 63 72 20 69 7d < 500} {incr i}
1c70: 20 7b 0a 20 20 20 20 65 78 65 63 73 71 6c 20 7b {. execsql {
1c80: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 56 INSERT INTO t1 V
1c90: 41 4c 55 45 53 28 3a 69 2c 20 27 68 65 6c 6c 6f ALUES(:i, 'hello
1ca0: 20 77 6f 72 6c 64 27 29 3b 7d 0a 20 20 7d 0a 20 world');}. }.
1cb0: 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 43 execsql {. C
1cc0: 4f 4d 4d 49 54 3b 0a 20 20 7d 0a 7d 20 2d 74 63 OMMIT;. }.} -tc
1cd0: 6c 62 6f 64 79 20 7b 0a 0a 20 20 63 61 74 63 68 lbody {.. catch
1ce0: 20 7b 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 {execsql {.
1cf0: 42 45 47 49 4e 3b 0a 20 20 20 20 49 4e 53 45 52 BEGIN;. INSER
1d00: 54 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 T INTO t1 VALUES
1d10: 28 27 61 62 63 27 2c 20 31 32 33 29 3b 0a 20 20 ('abc', 123);.
1d20: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 INSERT INTO t1
1d30: 20 56 41 4c 55 45 53 28 27 64 65 66 27 2c 20 31 VALUES('def', 1
1d40: 32 33 29 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 23);. INSERT
1d50: 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 27 INTO t1 VALUES('
1d60: 67 68 69 27 2c 20 31 32 33 29 3b 0a 20 20 20 20 ghi', 123);.
1d70: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53 INSERT INTO t1 S
1d80: 45 4c 45 43 54 20 28 61 2b 35 30 30 29 25 39 30 ELECT (a+500)%90
1d90: 30 2c 20 27 67 6f 6f 64 20 73 74 72 69 6e 67 27 0, 'good string'
1da0: 20 46 52 4f 4d 20 74 31 3b 0a 20 20 7d 7d 20 6d FROM t1;. }} m
1db0: 73 67 0a 0a 20 20 69 66 20 7b 24 6d 73 67 20 21 sg.. if {$msg !
1dc0: 3d 20 22 63 6f 6c 75 6d 6e 20 61 20 69 73 20 6e = "column a is n
1dd0: 6f 74 20 75 6e 69 71 75 65 22 7d 20 7b 0a 20 20 ot unique"} {.
1de0: 20 20 65 72 72 6f 72 20 24 6d 73 67 0a 20 20 7d error $msg. }
1df0: 0a 7d 0a 0a 23 20 41 73 73 65 72 74 69 6f 6e 20 .}..# Assertion
1e00: 66 61 75 6c 74 20 62 75 67 20 72 65 70 6f 72 74 fault bug report
1e10: 65 64 20 62 79 20 61 6c 65 78 20 64 69 6d 69 74 ed by alex dimit
1e20: 72 6f 76 2e 0a 23 0a 64 6f 5f 69 6f 65 72 72 5f rov..#.do_ioerr_
1e30: 74 65 73 74 20 69 6f 65 72 72 2d 31 31 20 2d 63 test ioerr-11 -c
1e40: 6b 72 65 66 63 6f 75 6e 74 20 74 72 75 65 20 2d krefcount true -
1e50: 65 72 63 20 31 20 2d 73 71 6c 70 72 65 70 20 7b erc 1 -sqlprep {
1e60: 0a 20 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 . CREATE TABLE
1e70: 20 41 28 49 64 20 49 4e 54 45 47 45 52 2c 20 4e A(Id INTEGER, N
1e80: 61 6d 65 20 54 45 58 54 29 3b 0a 20 20 20 49 4e ame TEXT);. IN
1e90: 53 45 52 54 20 49 4e 54 4f 20 41 28 49 64 2c 20 SERT INTO A(Id,
1ea0: 4e 61 6d 65 29 20 56 41 4c 55 45 53 28 31 2c 20 Name) VALUES(1,
1eb0: 27 4e 61 6d 65 27 29 3b 0a 7d 20 2d 73 71 6c 62 'Name');.} -sqlb
1ec0: 6f 64 79 20 7b 0a 20 20 20 55 50 44 41 54 45 20 ody {. UPDATE
1ed0: 41 20 53 45 54 20 49 64 20 3d 20 32 2c 20 4e 61 A SET Id = 2, Na
1ee0: 6d 65 20 3d 20 27 4e 61 6d 65 32 27 20 57 48 45 me = 'Name2' WHE
1ef0: 52 45 20 49 64 20 3d 20 31 3b 0a 7d 0a 0a 23 20 RE Id = 1;.}..#
1f00: 54 65 73 74 20 74 68 61 74 20 61 6e 20 69 6f 20 Test that an io
1f10: 65 72 72 6f 72 20 65 6e 63 6f 75 6e 74 65 72 65 error encountere
1f20: 64 20 69 6e 20 61 20 73 79 6e 63 28 29 20 63 61 d in a sync() ca
1f30: 75 73 65 64 20 62 79 20 61 20 63 61 6c 6c 20 74 used by a call t
1f40: 6f 0a 23 20 73 71 6c 69 74 65 33 5f 72 65 6c 65 o.# sqlite3_rele
1f50: 61 73 65 5f 6d 65 6d 6f 72 79 28 29 20 69 73 20 ase_memory() is
1f60: 68 61 6e 64 6c 65 64 20 4f 6b 2e 20 4f 6e 6c 79 handled Ok. Only
1f70: 20 74 72 79 20 74 68 69 73 20 69 66 20 0a 23 20 try this if .#
1f80: 6d 65 6d 6f 72 79 2d 6d 61 6e 61 67 65 6d 65 6e memory-managemen
1f90: 74 20 69 73 20 65 6e 61 62 6c 65 64 2e 0a 23 0a t is enabled..#.
1fa0: 69 66 63 61 70 61 62 6c 65 20 6d 65 6d 6f 72 79 ifcapable memory
1fb0: 6d 61 6e 61 67 65 20 7b 0a 20 20 64 6f 5f 69 6f manage {. do_io
1fc0: 65 72 72 5f 74 65 73 74 20 6d 65 6d 6d 61 6e 61 err_test memmana
1fd0: 67 65 2d 69 6f 65 72 72 31 20 2d 63 6b 72 65 66 ge-ioerr1 -ckref
1fe0: 63 6f 75 6e 74 20 74 72 75 65 20 2d 73 71 6c 70 count true -sqlp
1ff0: 72 65 70 20 7b 0a 20 20 20 20 42 45 47 49 4e 3b rep {. BEGIN;
2000: 0a 20 20 20 20 43 52 45 41 54 45 20 54 41 42 4c . CREATE TABL
2010: 45 20 74 31 28 61 2c 20 62 2c 20 63 29 3b 0a 20 E t1(a, b, c);.
2020: 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 INSERT INTO t
2030: 31 20 56 41 4c 55 45 53 28 72 61 6e 64 73 74 72 1 VALUES(randstr
2040: 28 35 30 2c 35 30 29 2c 20 72 61 6e 64 73 74 72 (50,50), randstr
2050: 28 31 30 30 2c 31 30 30 29 2c 20 72 61 6e 64 73 (100,100), rands
2060: 74 72 28 31 30 2c 31 30 29 29 3b 0a 20 20 20 20 tr(10,10));.
2070: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53 INSERT INTO t1 S
2080: 45 4c 45 43 54 20 72 61 6e 64 73 74 72 28 35 30 ELECT randstr(50
2090: 2c 35 30 29 2c 20 72 61 6e 64 73 74 72 28 39 2c ,50), randstr(9,
20a0: 39 29 2c 20 72 61 6e 64 73 74 72 28 39 30 2c 39 9), randstr(90,9
20b0: 30 29 20 46 52 4f 4d 20 74 31 3b 0a 20 20 20 20 0) FROM t1;.
20c0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53 INSERT INTO t1 S
20d0: 45 4c 45 43 54 20 72 61 6e 64 73 74 72 28 35 30 ELECT randstr(50
20e0: 2c 35 30 29 2c 20 72 61 6e 64 73 74 72 28 39 2c ,50), randstr(9,
20f0: 39 29 2c 20 72 61 6e 64 73 74 72 28 39 30 2c 39 9), randstr(90,9
2100: 30 29 20 46 52 4f 4d 20 74 31 3b 0a 20 20 20 20 0) FROM t1;.
2110: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53 INSERT INTO t1 S
2120: 45 4c 45 43 54 20 72 61 6e 64 73 74 72 28 35 30 ELECT randstr(50
2130: 2c 35 30 29 2c 20 72 61 6e 64 73 74 72 28 39 2c ,50), randstr(9,
2140: 39 29 2c 20 72 61 6e 64 73 74 72 28 39 30 2c 39 9), randstr(90,9
2150: 30 29 20 46 52 4f 4d 20 74 31 3b 0a 20 20 20 20 0) FROM t1;.
2160: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53 INSERT INTO t1 S
2170: 45 4c 45 43 54 20 72 61 6e 64 73 74 72 28 35 30 ELECT randstr(50
2180: 2c 35 30 29 2c 20 72 61 6e 64 73 74 72 28 39 2c ,50), randstr(9,
2190: 39 29 2c 20 72 61 6e 64 73 74 72 28 39 30 2c 39 9), randstr(90,9
21a0: 30 29 20 46 52 4f 4d 20 74 31 3b 0a 20 20 20 20 0) FROM t1;.
21b0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53 INSERT INTO t1 S
21c0: 45 4c 45 43 54 20 72 61 6e 64 73 74 72 28 35 30 ELECT randstr(50
21d0: 2c 35 30 29 2c 20 72 61 6e 64 73 74 72 28 39 2c ,50), randstr(9,
21e0: 39 29 2c 20 72 61 6e 64 73 74 72 28 39 30 2c 39 9), randstr(90,9
21f0: 30 29 20 46 52 4f 4d 20 74 31 3b 0a 20 20 7d 20 0) FROM t1;. }
2200: 2d 74 63 6c 62 6f 64 79 20 7b 0a 20 20 20 20 73 -tclbody {. s
2210: 71 6c 69 74 65 33 5f 72 65 6c 65 61 73 65 5f 6d qlite3_release_m
2220: 65 6d 6f 72 79 20 0a 20 20 7d 20 2d 73 71 6c 62 emory . } -sqlb
2230: 6f 64 79 20 7b 0a 20 20 20 20 43 4f 4d 4d 49 54 ody {. COMMIT
2240: 3b 0a 20 20 7d 0a 7d 0a 0a 69 66 63 61 70 61 62 ;. }.}..ifcapab
2250: 6c 65 20 70 61 67 65 72 5f 70 72 61 67 6d 61 73 le pager_pragmas
2260: 26 26 61 75 74 6f 76 61 63 75 75 6d 20 7b 0a 20 &&autovacuum {.
2270: 20 64 6f 5f 69 6f 65 72 72 5f 74 65 73 74 20 69 do_ioerr_test i
2280: 6f 65 72 72 2d 31 32 20 2d 63 6b 72 65 66 63 6f oerr-12 -ckrefco
2290: 75 6e 74 20 74 72 75 65 20 2d 65 72 63 20 31 20 unt true -erc 1
22a0: 2d 73 71 6c 70 72 65 70 20 7b 0a 20 20 20 20 20 -sqlprep {.
22b0: 50 52 41 47 4d 41 20 70 61 67 65 5f 73 69 7a 65 PRAGMA page_size
22c0: 20 3d 20 35 31 32 3b 0a 20 20 20 20 20 50 52 41 = 512;. PRA
22d0: 47 4d 41 20 61 75 74 6f 5f 76 61 63 75 75 6d 20 GMA auto_vacuum
22e0: 3d 20 69 6e 63 72 65 6d 65 6e 74 61 6c 3b 0a 20 = incremental;.
22f0: 20 20 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 CREATE TABLE
2300: 20 74 31 28 78 29 3b 0a 20 20 20 20 20 49 4e 53 t1(x);. INS
2310: 45 52 54 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 ERT INTO t1 VALU
2320: 45 53 28 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 31 ES( randomblob(1
2330: 20 20 20 2a 20 28 35 31 32 2d 34 29 29 20 29 3b * (512-4)) );
2340: 0a 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 . INSERT INT
2350: 4f 20 74 31 20 56 41 4c 55 45 53 28 20 72 61 6e O t1 VALUES( ran
2360: 64 6f 6d 62 6c 6f 62 28 31 31 30 20 2a 20 28 35 domblob(110 * (5
2370: 31 32 2d 34 29 29 20 29 3b 0a 20 20 20 20 20 49 12-4)) );. I
2380: 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 56 41 NSERT INTO t1 VA
2390: 4c 55 45 53 28 20 72 61 6e 64 6f 6d 62 6c 6f 62 LUES( randomblob
23a0: 28 32 20 20 20 2a 20 28 35 31 32 2d 34 29 29 20 (2 * (512-4))
23b0: 29 3b 0a 20 20 20 20 20 49 4e 53 45 52 54 20 49 );. INSERT I
23c0: 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 20 72 NTO t1 VALUES( r
23d0: 61 6e 64 6f 6d 62 6c 6f 62 28 31 31 30 20 2a 20 andomblob(110 *
23e0: 28 35 31 32 2d 34 29 29 20 29 3b 0a 20 20 20 20 (512-4)) );.
23f0: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 INSERT INTO t1
2400: 56 41 4c 55 45 53 28 20 72 61 6e 64 6f 6d 62 6c VALUES( randombl
2410: 6f 62 28 33 20 2a 20 28 35 31 32 2d 34 29 29 20 ob(3 * (512-4))
2420: 29 3b 0a 20 20 20 20 20 44 45 4c 45 54 45 20 46 );. DELETE F
2430: 52 4f 4d 20 74 31 20 57 48 45 52 45 20 72 6f 77 ROM t1 WHERE row
2440: 69 64 20 3d 20 33 3b 0a 20 20 20 20 20 50 52 41 id = 3;. PRA
2450: 47 4d 41 20 69 6e 63 72 65 6d 65 6e 74 61 6c 5f GMA incremental_
2460: 76 61 63 75 75 6d 20 3d 20 32 3b 0a 20 20 20 20 vacuum = 2;.
2470: 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 74 31 20 DELETE FROM t1
2480: 57 48 45 52 45 20 72 6f 77 69 64 20 3d 20 31 3b WHERE rowid = 1;
2490: 0a 20 20 7d 20 2d 73 71 6c 62 6f 64 79 20 7b 0a . } -sqlbody {.
24a0: 20 20 20 20 20 50 52 41 47 4d 41 20 69 6e 63 72 PRAGMA incr
24b0: 65 6d 65 6e 74 61 6c 5f 76 61 63 75 75 6d 20 3d emental_vacuum =
24c0: 20 31 3b 0a 20 20 7d 0a 7d 0a 0a 23 20 55 73 75 1;. }.}..# Usu
24d0: 61 6c 6c 79 2c 20 61 66 74 65 72 20 61 20 6e 65 ally, after a ne
24e0: 77 20 70 61 67 65 20 69 73 20 61 6c 6c 6f 63 61 w page is alloca
24f0: 74 65 64 20 66 72 6f 6d 20 74 68 65 20 65 6e 64 ted from the end
2500: 20 6f 66 20 74 68 65 20 66 69 6c 65 2c 20 69 74 of the file, it
2510: 20 64 6f 65 73 0a 23 20 6e 6f 74 20 6e 65 65 64 does.# not need
2520: 20 74 6f 20 62 65 20 77 72 69 74 74 65 6e 20 74 to be written t
2530: 6f 20 74 68 65 20 6a 6f 75 72 6e 61 6c 2e 20 54 o the journal. T
2540: 68 65 20 65 78 63 65 70 74 69 6f 6e 20 69 73 20 he exception is
2550: 77 68 65 6e 20 74 68 65 20 6e 65 77 20 70 61 67 when the new pag
2560: 65 0a 23 20 73 68 61 72 65 73 20 69 74 73 20 73 e.# shares its s
2570: 65 63 74 6f 72 20 77 69 74 68 20 61 6e 20 65 78 ector with an ex
2580: 69 73 74 69 6e 67 20 70 61 67 65 20 74 68 61 74 isting page that
2590: 20 64 6f 65 73 20 6e 65 65 64 20 74 6f 20 62 65 does need to be
25a0: 20 6a 6f 75 72 6e 61 6c 6c 65 64 2e 0a 23 20 54 journalled..# T
25b0: 68 69 73 20 74 65 73 74 20 63 61 73 65 20 70 72 his test case pr
25c0: 6f 76 6f 6b 65 73 20 74 68 69 73 20 63 6f 6e 64 ovokes this cond
25d0: 69 74 69 6f 6e 20 74 6f 20 74 65 73 74 20 66 6f ition to test fo
25e0: 72 20 74 68 65 20 73 61 6b 65 20 6f 66 20 63 6f r the sake of co
25f0: 76 65 72 61 67 65 0a 23 20 74 68 61 74 20 61 6e verage.# that an
2600: 20 49 4f 20 65 72 72 6f 72 20 77 68 69 6c 65 20 IO error while
2610: 6a 6f 75 72 6e 61 6c 6c 69 6e 67 20 74 68 65 20 journalling the
2620: 63 6f 72 65 73 69 64 65 6e 74 20 70 61 67 65 20 coresident page
2630: 69 73 20 68 61 6e 64 6c 65 64 20 63 6f 72 72 65 is handled corre
2640: 63 74 6c 79 2e 0a 23 0a 73 71 6c 69 74 65 33 5f ctly..#.sqlite3_
2650: 73 69 6d 75 6c 61 74 65 5f 64 65 76 69 63 65 20 simulate_device
2660: 2d 63 68 61 72 20 7b 7d 20 2d 73 65 63 74 6f 72 -char {} -sector
2670: 73 69 7a 65 20 32 30 34 38 0a 64 6f 5f 69 6f 65 size 2048.do_ioe
2680: 72 72 5f 74 65 73 74 20 69 6f 65 72 72 2d 31 32 rr_test ioerr-12
2690: 20 2d 63 6b 72 65 66 63 6f 75 6e 74 20 74 72 75 -ckrefcount tru
26a0: 65 20 2d 65 72 63 20 31 20 2d 74 63 6c 70 72 65 e -erc 1 -tclpre
26b0: 70 20 7b 0a 20 20 64 62 20 63 6c 6f 73 65 0a 20 p {. db close.
26c0: 20 73 71 6c 69 74 65 33 20 64 62 20 74 65 73 74 sqlite3 db test
26d0: 2e 64 62 20 2d 76 66 73 20 64 65 76 73 79 6d 0a .db -vfs devsym.
26e0: 0a 20 20 23 20 43 72 65 61 74 65 20 61 20 74 65 . # Create a te
26f0: 73 74 20 64 61 74 61 62 61 73 65 2e 20 50 61 67 st database. Pag
2700: 65 20 32 20 69 73 20 74 68 65 20 72 6f 6f 74 20 e 2 is the root
2710: 70 61 67 65 20 6f 66 20 74 61 62 6c 65 20 74 31 page of table t1
2720: 2e 20 54 68 65 20 6f 6e 6c 79 0a 20 20 23 20 72 . The only. # r
2730: 6f 77 20 69 6e 73 65 72 74 65 64 20 69 6e 74 6f ow inserted into
2740: 20 74 31 20 68 61 73 20 61 6e 20 6f 76 65 72 66 t1 has an overf
2750: 6c 6f 77 20 70 61 67 65 20 2d 20 70 61 67 65 20 low page - page
2760: 33 2e 20 50 61 67 65 20 33 20 77 69 6c 6c 20 62 3. Page 3 will b
2770: 65 0a 20 20 23 20 63 6f 72 65 73 69 64 65 6e 74 e. # coresident
2780: 20 6f 6e 20 74 68 65 20 32 30 34 38 20 62 79 74 on the 2048 byt
2790: 65 20 73 65 63 74 6f 72 20 77 69 74 68 20 74 68 e sector with th
27a0: 65 20 6e 65 78 74 20 70 61 67 65 20 74 6f 20 62 e next page to b
27b0: 65 20 61 6c 6c 6f 63 61 74 65 64 2e 0a 20 20 23 e allocated.. #
27c0: 20 0a 20 20 64 62 20 65 76 61 6c 20 7b 20 50 52 . db eval { PR
27d0: 41 47 4d 41 20 70 61 67 65 5f 73 69 7a 65 20 3d AGMA page_size =
27e0: 20 31 30 32 34 20 7d 0a 20 20 64 62 20 65 76 61 1024 }. db eva
27f0: 6c 20 7b 20 43 52 45 41 54 45 20 54 41 42 4c 45 l { CREATE TABLE
2800: 20 74 31 28 78 29 20 7d 0a 20 20 64 62 20 65 76 t1(x) }. db ev
2810: 61 6c 20 7b 20 49 4e 53 45 52 54 20 49 4e 54 4f al { INSERT INTO
2820: 20 74 31 20 56 41 4c 55 45 53 28 72 61 6e 64 6f t1 VALUES(rando
2830: 6d 62 6c 6f 62 28 31 31 30 30 29 29 3b 20 7d 0a mblob(1100)); }.
2840: 7d 20 2d 74 63 6c 62 6f 64 79 20 7b 0a 20 20 64 } -tclbody {. d
2850: 62 20 65 76 61 6c 20 7b 20 49 4e 53 45 52 54 20 b eval { INSERT
2860: 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 72 INTO t1 VALUES(r
2870: 61 6e 64 6f 6d 62 6c 6f 62 28 32 30 30 30 29 29 andomblob(2000))
2880: 3b 20 7d 0a 7d 0a 73 71 6c 69 74 65 33 5f 73 69 ; }.}.sqlite3_si
2890: 6d 75 6c 61 74 65 5f 64 65 76 69 63 65 20 2d 63 mulate_device -c
28a0: 68 61 72 20 7b 7d 20 2d 73 65 63 74 6f 72 73 69 har {} -sectorsi
28b0: 7a 65 20 30 0a 63 61 74 63 68 20 7b 64 62 20 63 ze 0.catch {db c
28c0: 6c 6f 73 65 7d 0a 0a 64 6f 5f 69 6f 65 72 72 5f lose}..do_ioerr_
28d0: 74 65 73 74 20 69 6f 65 72 72 2d 31 33 20 2d 63 test ioerr-13 -c
28e0: 6b 72 65 66 63 6f 75 6e 74 20 74 72 75 65 20 2d krefcount true -
28f0: 65 72 63 20 31 20 2d 73 71 6c 70 72 65 70 20 7b erc 1 -sqlprep {
2900: 0a 20 20 50 52 41 47 4d 41 20 61 75 74 6f 5f 76 . PRAGMA auto_v
2910: 61 63 75 75 6d 20 3d 20 69 6e 63 72 65 6d 65 6e acuum = incremen
2920: 74 61 6c 3b 0a 20 20 43 52 45 41 54 45 20 54 41 tal;. CREATE TA
2930: 42 4c 45 20 74 31 28 78 29 3b 0a 20 20 43 52 45 BLE t1(x);. CRE
2940: 41 54 45 20 54 41 42 4c 45 20 74 32 28 78 29 3b ATE TABLE t2(x);
2950: 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 . INSERT INTO t
2960: 32 20 56 41 4c 55 45 53 28 72 61 6e 64 6f 6d 62 2 VALUES(randomb
2970: 6c 6f 62 28 31 35 30 30 29 29 3b 0a 20 20 49 4e lob(1500));. IN
2980: 53 45 52 54 20 49 4e 54 4f 20 74 32 20 53 45 4c SERT INTO t2 SEL
2990: 45 43 54 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 31 ECT randomblob(1
29a0: 35 30 30 29 20 46 52 4f 4d 20 74 32 3b 0a 20 20 500) FROM t2;.
29b0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 32 20 53 INSERT INTO t2 S
29c0: 45 4c 45 43 54 20 72 61 6e 64 6f 6d 62 6c 6f 62 ELECT randomblob
29d0: 28 31 35 30 30 29 20 46 52 4f 4d 20 74 32 3b 0a (1500) FROM t2;.
29e0: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 32 INSERT INTO t2
29f0: 20 53 45 4c 45 43 54 20 72 61 6e 64 6f 6d 62 6c SELECT randombl
2a00: 6f 62 28 31 35 30 30 29 20 46 52 4f 4d 20 74 32 ob(1500) FROM t2
2a10: 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 ;. INSERT INTO
2a20: 74 32 20 53 45 4c 45 43 54 20 72 61 6e 64 6f 6d t2 SELECT random
2a30: 62 6c 6f 62 28 31 35 30 30 29 20 46 52 4f 4d 20 blob(1500) FROM
2a40: 74 32 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 t2;. INSERT INT
2a50: 4f 20 74 32 20 53 45 4c 45 43 54 20 72 61 6e 64 O t2 SELECT rand
2a60: 6f 6d 62 6c 6f 62 28 31 35 30 30 29 20 46 52 4f omblob(1500) FRO
2a70: 4d 20 74 32 3b 0a 20 20 49 4e 53 45 52 54 20 49 M t2;. INSERT I
2a80: 4e 54 4f 20 74 32 20 53 45 4c 45 43 54 20 72 61 NTO t2 SELECT ra
2a90: 6e 64 6f 6d 62 6c 6f 62 28 31 35 30 30 29 20 46 ndomblob(1500) F
2aa0: 52 4f 4d 20 74 32 3b 0a 20 20 49 4e 53 45 52 54 ROM t2;. INSERT
2ab0: 20 49 4e 54 4f 20 74 32 20 53 45 4c 45 43 54 20 INTO t2 SELECT
2ac0: 72 61 6e 64 6f 6d 62 6c 6f 62 28 31 35 30 30 29 randomblob(1500)
2ad0: 20 46 52 4f 4d 20 74 32 3b 0a 20 20 49 4e 53 45 FROM t2;. INSE
2ae0: 52 54 20 49 4e 54 4f 20 74 32 20 53 45 4c 45 43 RT INTO t2 SELEC
2af0: 54 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 31 35 30 T randomblob(150
2b00: 30 29 20 46 52 4f 4d 20 74 32 3b 0a 20 20 49 4e 0) FROM t2;. IN
2b10: 53 45 52 54 20 49 4e 54 4f 20 74 31 20 56 41 4c SERT INTO t1 VAL
2b20: 55 45 53 28 72 61 6e 64 6f 6d 62 6c 6f 62 28 32 UES(randomblob(2
2b30: 30 29 29 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 0));. INSERT IN
2b40: 54 4f 20 74 31 20 53 45 4c 45 43 54 20 78 20 46 TO t1 SELECT x F
2b50: 52 4f 4d 20 74 31 3b 0a 20 20 49 4e 53 45 52 54 ROM t1;. INSERT
2b60: 20 49 4e 54 4f 20 74 31 20 53 45 4c 45 43 54 20 INTO t1 SELECT
2b70: 78 20 46 52 4f 4d 20 74 31 3b 0a 20 20 49 4e 53 x FROM t1;. INS
2b80: 45 52 54 20 49 4e 54 4f 20 74 31 20 53 45 4c 45 ERT INTO t1 SELE
2b90: 43 54 20 78 20 46 52 4f 4d 20 74 31 3b 0a 20 20 CT x FROM t1;.
2ba0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53 INSERT INTO t1 S
2bb0: 45 4c 45 43 54 20 78 20 46 52 4f 4d 20 74 31 3b ELECT x FROM t1;
2bc0: 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 . INSERT INTO t
2bd0: 31 20 53 45 4c 45 43 54 20 78 20 46 52 4f 4d 20 1 SELECT x FROM
2be0: 74 31 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 t1;. INSERT INT
2bf0: 4f 20 74 31 20 53 45 4c 45 43 54 20 78 20 46 52 O t1 SELECT x FR
2c00: 4f 4d 20 74 31 3b 20 20 20 20 20 20 20 20 20 20 OM t1;
2c10: 20 20 20 2f 2a 20 36 34 20 65 6e 74 72 69 65 73 /* 64 entries
2c20: 20 69 6e 20 74 31 20 2a 2f 0a 20 20 49 4e 53 45 in t1 */. INSE
2c30: 52 54 20 49 4e 54 4f 20 74 31 20 53 45 4c 45 43 RT INTO t1 SELEC
2c40: 54 20 78 20 46 52 4f 4d 20 74 31 20 4c 49 4d 49 T x FROM t1 LIMI
2c50: 54 20 31 34 3b 20 20 20 20 2f 2a 20 37 38 20 65 T 14; /* 78 e
2c60: 6e 74 72 69 65 73 20 69 6e 20 74 31 20 2a 2f 0a ntries in t1 */.
2c70: 20 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 74 32 DELETE FROM t2
2c80: 20 57 48 45 52 45 20 72 6f 77 69 64 20 3d 20 33 WHERE rowid = 3
2c90: 3b 0a 7d 20 2d 73 71 6c 62 6f 64 79 20 7b 0a 20 ;.} -sqlbody {.
2ca0: 20 2d 2d 20 54 68 69 73 20 73 74 61 74 65 6d 65 -- This stateme
2cb0: 6e 74 20 75 73 65 73 20 74 68 65 20 62 61 6c 61 nt uses the bala
2cc0: 6e 63 65 5f 71 75 69 63 6b 28 29 20 6f 70 74 69 nce_quick() opti
2cd0: 6d 69 7a 61 74 69 6f 6e 2e 20 54 68 65 20 6e 65 mization. The ne
2ce0: 77 20 70 61 67 65 0a 20 20 2d 2d 20 69 73 20 61 w page. -- is a
2cf0: 70 70 65 6e 64 65 64 20 74 6f 20 74 68 65 20 64 ppended to the d
2d00: 61 74 61 62 61 73 65 20 66 69 6c 65 2e 20 42 75 atabase file. Bu
2d10: 74 20 74 68 65 20 6f 76 65 72 66 6c 6f 77 20 70 t the overflow p
2d20: 61 67 65 20 75 73 65 64 20 62 79 0a 20 20 2d 2d age used by. --
2d30: 20 74 68 65 20 6e 65 77 20 72 65 63 6f 72 64 20 the new record
2d40: 77 69 6c 6c 20 62 65 20 70 6f 73 69 74 69 6f 6e will be position
2d50: 65 64 20 6e 65 61 72 20 74 68 65 20 73 74 61 72 ed near the star
2d60: 74 20 6f 66 20 74 68 65 20 64 61 74 61 62 61 73 t of the databas
2d70: 65 0a 20 20 2d 2d 20 66 69 6c 65 2c 20 69 6e 20 e. -- file, in
2d80: 74 68 65 20 67 61 70 20 6c 65 66 74 20 62 79 20 the gap left by
2d90: 74 68 65 20 22 44 45 4c 45 54 45 20 46 52 4f 4d the "DELETE FROM
2da0: 20 74 32 20 57 48 45 52 45 20 72 6f 77 69 64 3d t2 WHERE rowid=
2db0: 33 22 20 73 74 61 74 65 6d 65 6e 74 0a 20 20 2d 3" statement. -
2dc0: 2d 20 61 62 6f 76 65 2e 0a 20 20 2d 2d 0a 20 20 - above.. --.
2dd0: 2d 2d 20 54 68 65 20 70 6f 69 6e 74 20 6f 66 20 -- The point of
2de0: 74 68 69 73 20 69 73 20 74 68 61 74 20 74 68 65 this is that the
2df0: 20 73 74 61 74 65 6d 65 6e 74 20 77 69 6c 20 6e statement wil n
2e00: 65 65 64 20 74 6f 20 75 70 64 61 74 65 20 74 77 eed to update tw
2e10: 6f 20 70 6f 69 6e 74 65 72 0a 20 20 2d 2d 20 6d o pointer. -- m
2e20: 61 70 20 70 61 67 65 73 2e 20 57 68 69 63 68 20 ap pages. Which
2e30: 69 6e 74 72 6f 64 75 63 65 73 20 61 6e 6f 74 68 introduces anoth
2e40: 65 72 20 6f 70 70 6f 72 74 75 6e 69 74 79 20 66 er opportunity f
2e50: 6f 72 20 61 6e 20 49 4f 20 65 72 72 6f 72 2e 0a or an IO error..
2e60: 20 20 2d 2d 0a 20 20 49 4e 53 45 52 54 20 49 4e --. INSERT IN
2e70: 54 4f 20 74 31 20 56 41 4c 55 45 53 28 72 61 6e TO t1 VALUES(ran
2e80: 64 6f 6d 62 6c 6f 62 28 32 30 30 30 29 29 3b 0a domblob(2000));.
2e90: 7d 0a 0a 64 6f 5f 69 6f 65 72 72 5f 74 65 73 74 }..do_ioerr_test
2ea0: 20 69 6f 65 72 72 2d 31 34 20 2d 63 6b 72 65 66 ioerr-14 -ckref
2eb0: 63 6f 75 6e 74 20 74 72 75 65 20 2d 65 72 63 20 count true -erc
2ec0: 31 20 2d 73 71 6c 70 72 65 70 20 7b 0a 20 20 50 1 -sqlprep {. P
2ed0: 52 41 47 4d 41 20 61 75 74 6f 5f 76 61 63 75 75 RAGMA auto_vacuu
2ee0: 6d 20 3d 20 69 6e 63 72 65 6d 65 6e 74 61 6c 3b m = incremental;
2ef0: 0a 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 . CREATE TABLE
2f00: 74 31 28 78 29 3b 0a 20 20 43 52 45 41 54 45 20 t1(x);. CREATE
2f10: 54 41 42 4c 45 20 74 32 28 78 29 3b 0a 20 20 49 TABLE t2(x);. I
2f20: 4e 53 45 52 54 20 49 4e 54 4f 20 74 32 20 56 41 NSERT INTO t2 VA
2f30: 4c 55 45 53 28 72 61 6e 64 6f 6d 62 6c 6f 62 28 LUES(randomblob(
2f40: 31 35 30 30 29 29 3b 0a 20 20 49 4e 53 45 52 54 1500));. INSERT
2f50: 20 49 4e 54 4f 20 74 32 20 53 45 4c 45 43 54 20 INTO t2 SELECT
2f60: 72 61 6e 64 6f 6d 62 6c 6f 62 28 31 35 30 30 29 randomblob(1500)
2f70: 20 46 52 4f 4d 20 74 32 3b 0a 20 20 49 4e 53 45 FROM t2;. INSE
2f80: 52 54 20 49 4e 54 4f 20 74 32 20 53 45 4c 45 43 RT INTO t2 SELEC
2f90: 54 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 31 35 30 T randomblob(150
2fa0: 30 29 20 46 52 4f 4d 20 74 32 3b 0a 20 20 49 4e 0) FROM t2;. IN
2fb0: 53 45 52 54 20 49 4e 54 4f 20 74 32 20 53 45 4c SERT INTO t2 SEL
2fc0: 45 43 54 20 72 61 6e 64 6f 6d 62 6c 6f 62 28 31 ECT randomblob(1
2fd0: 35 30 30 29 20 46 52 4f 4d 20 74 32 3b 0a 20 20 500) FROM t2;.
2fe0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 32 20 53 INSERT INTO t2 S
2ff0: 45 4c 45 43 54 20 72 61 6e 64 6f 6d 62 6c 6f 62 ELECT randomblob
3000: 28 31 35 30 30 29 20 46 52 4f 4d 20 74 32 3b 0a (1500) FROM t2;.
3010: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 32 INSERT INTO t2
3020: 20 53 45 4c 45 43 54 20 72 61 6e 64 6f 6d 62 6c SELECT randombl
3030: 6f 62 28 31 35 30 30 29 20 46 52 4f 4d 20 74 32 ob(1500) FROM t2
3040: 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 ;. INSERT INTO
3050: 74 32 20 53 45 4c 45 43 54 20 72 61 6e 64 6f 6d t2 SELECT random
3060: 62 6c 6f 62 28 31 35 30 30 29 20 46 52 4f 4d 20 blob(1500) FROM
3070: 74 32 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 t2;. INSERT INT
3080: 4f 20 74 32 20 53 45 4c 45 43 54 20 72 61 6e 64 O t2 SELECT rand
3090: 6f 6d 62 6c 6f 62 28 31 35 30 30 29 20 46 52 4f omblob(1500) FRO
30a0: 4d 20 74 32 3b 0a 20 20 49 4e 53 45 52 54 20 49 M t2;. INSERT I
30b0: 4e 54 4f 20 74 32 20 53 45 4c 45 43 54 20 72 61 NTO t2 SELECT ra
30c0: 6e 64 6f 6d 62 6c 6f 62 28 31 35 30 30 29 20 46 ndomblob(1500) F
30d0: 52 4f 4d 20 74 32 3b 0a 0a 20 20 2d 2d 20 54 68 ROM t2;.. -- Th
30e0: 69 73 20 73 74 61 74 65 6d 65 6e 74 20 69 6e 73 is statement ins
30f0: 65 72 74 73 20 61 20 72 6f 77 20 69 6e 74 6f 20 erts a row into
3100: 74 31 20 77 69 74 68 20 61 6e 20 6f 76 65 72 66 t1 with an overf
3110: 6c 6f 77 20 70 61 67 65 20 61 74 20 74 68 65 0a low page at the.
3120: 20 20 2d 2d 20 65 6e 64 20 6f 66 20 74 68 65 20 -- end of the
3130: 66 69 6c 65 2e 20 41 20 6c 6f 6e 67 20 77 61 79 file. A long way
3140: 20 66 72 6f 6d 20 69 74 73 20 70 61 72 65 6e 74 from its parent
3150: 20 28 74 68 65 20 72 6f 6f 74 20 6f 66 20 74 31 (the root of t1
3160: 29 2e 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f ).. INSERT INTO
3170: 20 74 31 20 56 41 4c 55 45 53 28 72 61 6e 64 6f t1 VALUES(rando
3180: 6d 62 6c 6f 62 28 31 35 30 30 29 29 3b 0a 20 20 mblob(1500));.
3190: 44 45 4c 45 54 45 20 46 52 4f 4d 20 74 32 20 57 DELETE FROM t2 W
31a0: 48 45 52 45 20 72 6f 77 69 64 3c 31 30 3b 0a 7d HERE rowid<10;.}
31b0: 20 2d 73 71 6c 62 6f 64 79 20 7b 0a 20 20 2d 2d -sqlbody {. --
31c0: 20 54 68 69 73 20 74 72 61 6e 73 61 63 74 69 6f This transactio
31d0: 6e 20 77 69 6c 6c 20 63 61 75 73 65 20 74 68 65 n will cause the
31e0: 20 72 6f 6f 74 2d 70 61 67 65 20 6f 66 20 74 61 root-page of ta
31f0: 62 6c 65 20 74 31 20 74 6f 20 64 69 76 69 64 65 ble t1 to divide
3200: 0a 20 20 2d 2d 20 28 62 79 20 63 61 6c 6c 69 6e . -- (by callin
3210: 67 20 62 61 6c 61 6e 63 65 5f 64 65 65 70 65 72 g balance_deeper
3220: 28 29 29 2e 20 57 68 65 6e 20 69 74 20 64 6f 65 ()). When it doe
3230: 73 2c 20 74 68 65 20 22 70 61 72 65 6e 74 22 20 s, the "parent"
3240: 70 61 67 65 20 6f 66 20 74 68 65 0a 20 20 2d 2d page of the. --
3250: 20 6f 76 65 72 66 6c 6f 77 20 70 61 67 65 20 69 overflow page i
3260: 6e 73 65 72 74 65 64 20 69 6e 20 74 68 65 20 2d nserted in the -
3270: 73 71 6c 70 72 65 70 20 62 6c 6f 63 6b 20 61 62 sqlprep block ab
3280: 6f 76 65 20 77 69 6c 6c 20 63 68 61 6e 67 65 20 ove will change
3290: 61 6e 64 0a 20 20 2d 2d 20 74 68 65 20 63 6f 72 and. -- the cor
32a0: 72 65 73 70 6f 6e 64 69 6e 67 20 70 6f 69 6e 74 responding point
32b0: 65 72 20 6d 61 70 20 70 61 67 65 20 62 65 20 75 er map page be u
32c0: 70 64 61 74 65 64 2e 20 54 68 69 73 20 74 65 73 pdated. This tes
32d0: 74 20 63 61 73 65 20 61 74 74 65 6d 70 74 73 0a t case attempts.
32e0: 20 20 2d 2d 20 74 6f 20 63 61 75 73 65 20 61 6e -- to cause an
32f0: 20 49 4f 20 65 72 72 6f 72 20 64 75 72 69 6e 67 IO error during
3300: 20 74 68 65 20 70 6f 69 6e 74 65 72 20 6d 61 70 the pointer map
3310: 20 70 61 67 65 20 75 70 64 61 74 65 2e 0a 20 20 page update..
3320: 2d 2d 0a 20 20 42 45 47 49 4e 3b 0a 20 20 49 4e --. BEGIN;. IN
3330: 53 45 52 54 20 49 4e 54 4f 20 74 31 20 56 41 4c SERT INTO t1 VAL
3340: 55 45 53 28 72 61 6e 64 6f 6d 62 6c 6f 62 28 31 UES(randomblob(1
3350: 30 30 29 29 3b 0a 20 20 49 4e 53 45 52 54 20 49 00));. INSERT I
3360: 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 72 61 NTO t1 VALUES(ra
3370: 6e 64 6f 6d 62 6c 6f 62 28 31 30 30 29 29 3b 0a ndomblob(100));.
3380: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 INSERT INTO t1
3390: 20 56 41 4c 55 45 53 28 72 61 6e 64 6f 6d 62 6c VALUES(randombl
33a0: 6f 62 28 31 30 30 29 29 3b 0a 20 20 49 4e 53 45 ob(100));. INSE
33b0: 52 54 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 RT INTO t1 VALUE
33c0: 53 28 72 61 6e 64 6f 6d 62 6c 6f 62 28 31 30 30 S(randomblob(100
33d0: 29 29 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 ));. INSERT INT
33e0: 4f 20 74 31 20 56 41 4c 55 45 53 28 72 61 6e 64 O t1 VALUES(rand
33f0: 6f 6d 62 6c 6f 62 28 31 30 30 29 29 3b 0a 20 20 omblob(100));.
3400: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 56 INSERT INTO t1 V
3410: 41 4c 55 45 53 28 72 61 6e 64 6f 6d 62 6c 6f 62 ALUES(randomblob
3420: 28 31 30 30 29 29 3b 0a 20 20 49 4e 53 45 52 54 (100));. INSERT
3430: 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 INTO t1 VALUES(
3440: 72 61 6e 64 6f 6d 62 6c 6f 62 28 31 30 30 29 29 randomblob(100))
3450: 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 ;. INSERT INTO
3460: 74 31 20 56 41 4c 55 45 53 28 72 61 6e 64 6f 6d t1 VALUES(random
3470: 62 6c 6f 62 28 31 30 30 29 29 3b 0a 20 20 49 4e blob(100));. IN
3480: 53 45 52 54 20 49 4e 54 4f 20 74 31 20 56 41 4c SERT INTO t1 VAL
3490: 55 45 53 28 72 61 6e 64 6f 6d 62 6c 6f 62 28 31 UES(randomblob(1
34a0: 30 30 29 29 3b 0a 20 20 49 4e 53 45 52 54 20 49 00));. INSERT I
34b0: 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 72 61 NTO t1 VALUES(ra
34c0: 6e 64 6f 6d 62 6c 6f 62 28 31 30 30 29 29 3b 0a ndomblob(100));.
34d0: 20 20 43 4f 4d 4d 49 54 3b 0a 7d 0a 0a 64 6f 5f COMMIT;.}..do_
34e0: 69 6f 65 72 72 5f 74 65 73 74 20 69 6f 65 72 72 ioerr_test ioerr
34f0: 2d 31 35 20 2d 74 63 6c 70 72 65 70 20 7b 0a 20 -15 -tclprep {.
3500: 20 64 62 20 65 76 61 6c 20 7b 0a 20 20 20 20 42 db eval {. B
3510: 45 47 49 4e 3b 0a 20 20 20 20 50 52 41 47 4d 41 EGIN;. PRAGMA
3520: 20 63 61 63 68 65 5f 73 69 7a 65 20 3d 20 31 30 cache_size = 10
3530: 3b 0a 20 20 20 20 43 52 45 41 54 45 20 54 41 42 ;. CREATE TAB
3540: 4c 45 20 74 31 28 61 29 3b 0a 20 20 20 20 43 52 LE t1(a);. CR
3550: 45 41 54 45 20 49 4e 44 45 58 20 69 31 20 4f 4e EATE INDEX i1 ON
3560: 20 74 31 28 61 29 3b 0a 20 20 20 20 43 52 45 41 t1(a);. CREA
3570: 54 45 20 54 41 42 4c 45 20 74 32 28 61 29 3b 0a TE TABLE t2(a);.
3580: 20 20 7d 0a 20 20 66 6f 72 20 7b 73 65 74 20 69 }. for {set i
3590: 69 20 31 7d 20 7b 24 69 69 20 3c 20 31 30 30 7d i 1} {$ii < 100}
35a0: 20 7b 69 6e 63 72 20 69 69 7d 20 7b 0a 20 20 20 {incr ii} {.
35b0: 20 73 65 74 20 76 20 5b 73 74 72 69 6e 67 20 72 set v [string r
35c0: 61 6e 67 65 20 5b 73 74 72 69 6e 67 20 72 65 70 ange [string rep
35d0: 65 61 74 20 5b 66 6f 72 6d 61 74 20 25 2e 33 64 eat [format %.3d
35e0: 20 24 69 69 5d 20 32 30 30 5d 20 30 20 32 32 30 $ii] 200] 0 220
35f0: 5d 0a 20 20 20 20 64 62 20 65 76 61 6c 20 7b 49 ]. db eval {I
3600: 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 56 41 NSERT INTO t1 VA
3610: 4c 55 45 53 28 24 76 29 7d 0a 20 20 7d 0a 20 20 LUES($v)}. }.
3620: 64 62 20 65 76 61 6c 20 7b 0a 20 20 20 20 44 45 db eval {. DE
3630: 4c 45 54 45 20 46 52 4f 4d 20 74 31 20 57 48 45 LETE FROM t1 WHE
3640: 52 45 20 6f 69 64 20 3e 20 38 35 3b 0a 20 20 20 RE oid > 85;.
3650: 20 43 4f 4d 4d 49 54 3b 0a 20 20 7d 0a 7d 20 2d COMMIT;. }.} -
3660: 73 71 6c 62 6f 64 79 20 7b 0a 20 20 42 45 47 49 sqlbody {. BEGI
3670: 4e 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f N;. INSERT INTO
3680: 20 74 32 20 56 41 4c 55 45 53 28 72 61 6e 64 73 t2 VALUES(rands
3690: 74 72 28 32 32 30 30 30 2c 32 32 30 30 30 29 29 tr(22000,22000))
36a0: 3b 0a 20 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 ;. DELETE FROM
36b0: 74 31 20 57 48 45 52 45 20 6f 69 64 20 3d 20 38 t1 WHERE oid = 8
36c0: 33 3b 0a 20 20 43 4f 4d 4d 49 54 3b 0a 7d 20 0a 3;. COMMIT;.} .
36d0: 0a 66 69 6e 69 73 68 5f 74 65 73 74 0a .finish_test.