3 # The author disclaims copyright to this source code. In place of
4 # a legal notice, here is a blessing:
6 # May you do good and not evil.
7 # May you find forgiveness for yourself and forgive others.
8 # May you share freely, never taking more than you give.
10 #***********************************************************************
11 # This file implements regression tests for SQLite library.
13 # This file implements tests to make sure SQLite does not crash or
14 # segfault if it sees a corrupt database file. It creates a base
15 # data base file, then tests that single byte corruptions in
16 # increasingly larger quantities are handled gracefully.
18 # $Id: corruptC.test,v 1.14 2009/07/11 06:55:34 danielk1977 Exp $
20 catch {forcedelete test.db test.db-journal test.bu}
22 set testdir [file dirname $argv0]
23 source $testdir/tester.tcl
25 # Do not use a codec for tests in this file, as the database file is
26 # manipulated directly using tcl scripts (using the [hexio_write] command).
30 # These tests deal with corrupt database files
32 database_may_be_corrupt
34 # Construct a compact, dense database for testing.
36 do_test corruptC-1.1 {
37 sqlite3_db_config db LEGACY_FILE_FORMAT 1
39 PRAGMA auto_vacuum = 0;
42 INSERT INTO t1 VALUES(1,1);
43 INSERT OR IGNORE INTO t1 SELECT x*2,y FROM t1;
44 INSERT OR IGNORE INTO t1 SELECT x*3,y FROM t1;
45 INSERT OR IGNORE INTO t1 SELECT x*5,y FROM t1;
46 INSERT OR IGNORE INTO t1 SELECT x*7,y FROM t1;
47 INSERT OR IGNORE INTO t1 SELECT x*11,y FROM t1;
48 INSERT OR IGNORE INTO t1 SELECT x*13,y FROM t1;
49 CREATE INDEX t1i1 ON t1(x);
50 CREATE TABLE t2 AS SELECT x,2 as y FROM t1 WHERE rowid%5!=0;
55 ifcapable {integrityck} {
56 integrity_check corruptC-1.2
59 # Generate random integer
62 return [expr {round(rand()*$range)}]
65 # Setup for the tests. Make a backup copy of the good database in test.bu.
68 forcecopy test.db test.bu
70 set fsize [file size test.db]
72 # Set a quasi-random random seed.
73 if {[info exists ::G(issoak)]} {
74 # If we are doing SOAK tests, we want a different
75 # random seed for each run. Ideally we would like
76 # to use [clock clicks] or something like that here.
77 set qseed [file mtime test.db]
79 # If we are not doing soak tests,
86 # First test some specific corruption tests found from earlier runs
87 # with specific seeds.
90 # test that a corrupt content offset size is handled (seed 5577)
91 do_test corruptC-2.1 {
93 forcecopy test.bu test.db
95 # insert corrupt byte(s)
96 hexio_write test.db 2053 [format %02x 0x04]
99 catchsql {PRAGMA integrity_check}
100 } {0 {{*** in database main ***
101 Page 3: free space corruption}}}
103 # test that a corrupt content offset size is handled (seed 5649)
105 # Update 2016-12-27: As of check-in [0b86fbca66] "In sqlite3BtreeInsert() when
106 # replacing a re-existing row, try to overwrite the cell directly rather than
107 # deallocate and reallocate the cell" on 2016-12-09, this test case no longer
108 # detects the offset size problem during the UPDATE. We have to run a subsequent
109 # integrity_check to see it.
110 do_test corruptC-2.2 {
112 forcecopy test.bu test.db
114 # insert corrupt byte(s)
115 hexio_write test.db 27 [format %02x 0x08]
116 hexio_write test.db 233 [format %02x 0x6a]
117 hexio_write test.db 328 [format %02x 0x67]
118 hexio_write test.db 750 [format %02x 0x1f]
119 hexio_write test.db 1132 [format %02x 0x52]
120 hexio_write test.db 1133 [format %02x 0x84]
121 hexio_write test.db 1220 [format %02x 0x01]
122 hexio_write test.db 3688 [format %02x 0xc1]
123 hexio_write test.db 3714 [format %02x 0x58]
124 hexio_write test.db 3746 [format %02x 0x9a]
127 db eval {UPDATE t1 SET y=1}
128 db eval {PRAGMA integrity_check}
129 } {/Offset .* out of range/}
131 # test that a corrupt free cell size is handled (seed 13329)
132 do_test corruptC-2.3 {
134 forcecopy test.bu test.db
136 # insert corrupt byte(s)
137 hexio_write test.db 1094 [format %02x 0x76]
140 catchsql {UPDATE t1 SET y=1}
141 } {1 {database disk image is malformed}}
143 # test that a corrupt free cell size is handled (seed 169571)
144 do_test corruptC-2.4 {
146 forcecopy test.bu test.db
148 # insert corrupt byte(s)
149 hexio_write test.db 3119 [format %02x 0xdf]
152 catchsql {UPDATE t2 SET y='abcdef-uvwxyz'}
153 } {1 {database disk image is malformed}}
155 # test that a corrupt free cell size is handled (seed 169571)
156 do_test corruptC-2.5 {
158 forcecopy test.bu test.db
160 # insert corrupt byte(s)
161 hexio_write test.db 3119 [format %02x 0xdf]
162 hexio_write test.db 4073 [format %02x 0xbf]
165 catchsql {BEGIN; UPDATE t2 SET y='abcdef-uvwxyz'; ROLLBACK;}
166 catchsql {PRAGMA integrity_check}
167 } {0 {{*** in database main ***
168 On tree page 4 cell 19: Extends off end of page} {database disk image is malformed}}}
170 # {0 {{*** in database main ***
171 # Corruption detected in cell 710 on page 4
172 # Multiple uses for byte 661 of page 4
173 # Fragmented space is 249 byte reported as 21 on page 4}}}
175 # test that a corrupt free cell size is handled (seed 169595)
176 do_test corruptC-2.6 {
178 forcecopy test.bu test.db
180 # insert corrupt byte(s)
181 hexio_write test.db 619 [format %02x 0xe2]
182 hexio_write test.db 3150 [format %02x 0xa8]
185 catchsql {BEGIN; UPDATE t2 SET y='abcdef-uvwxyz'; ROLLBACK;}
186 } {1 {database disk image is malformed}}
188 # corruption (seed 178692)
189 do_test corruptC-2.7 {
191 forcecopy test.bu test.db
193 # insert corrupt byte(s)
194 hexio_write test.db 3074 [format %02x 0xa0]
197 catchsql {BEGIN; UPDATE t2 SET y='abcdef-uvwxyz'; ROLLBACK;}
198 } {1 {database disk image is malformed}}
201 # corruption (seed 179069)
202 # Obsolete. With single-pass DELETE the corruption in the
203 # main database is not detected.
205 do_test corruptC-2.8 {
207 forcecopy test.bu test.db
209 # insert corrupt byte(s)
210 hexio_write test.db 1393 [format %02x 0x7d]
211 hexio_write test.db 84 [format %02x 0x19]
212 hexio_write test.db 3287 [format %02x 0x3b]
213 hexio_write test.db 2564 [format %02x 0xed]
214 hexio_write test.db 2139 [format %02x 0x55]
217 catchsql {BEGIN; DELETE FROM t1 WHERE x>13; ROLLBACK;}
218 } {1 {database disk image is malformed}}
221 # corruption (seed 170434)
223 # UPDATE: Prior to 3.8.2, this used to return SQLITE_CORRUPT. It no longer
224 # does. That is Ok, the point of these tests is to verify that no buffer
225 # overruns or overreads can be caused by corrupt databases.
226 do_test corruptC-2.9 {
228 forcecopy test.bu test.db
230 # insert corrupt byte(s)
231 hexio_write test.db 2095 [format %02x 0xd6]
234 catchsql {BEGIN; DELETE FROM t1 WHERE x>13; ROLLBACK;}
237 # corruption (seed 186504)
238 do_test corruptC-2.10 {
240 forcecopy test.bu test.db
242 # insert corrupt byte(s)
243 hexio_write test.db 3130 [format %02x 0x02]
246 catchsql {BEGIN; UPDATE t2 SET y='abcdef-uvwxyz'; ROLLBACK;}
247 } {1 {database disk image is malformed}}
249 # corruption (seed 1589)
250 do_test corruptC-2.11 {
252 forcecopy test.bu test.db
254 # insert corrupt byte(s)
255 hexio_write test.db 55 [format %02x 0xa7]
258 catchsql {BEGIN; CREATE TABLE t3 AS SELECT x,3 as y FROM t2 WHERE rowid%5!=0; ROLLBACK;}
259 } {1 {database disk image is malformed}}
261 # corruption (seed 14166)
262 do_test corruptC-2.12 {
264 forcecopy test.bu test.db
266 # insert corrupt byte(s)
267 hexio_write test.db 974 [format %02x 0x2e]
270 catchsql {SELECT count(*) FROM sqlite_master;}
271 } {1 {malformed database schema (t1i1) - corrupt database}}
273 # corruption (seed 218803)
274 do_test corruptC-2.13 {
276 forcecopy test.bu test.db
278 # insert corrupt byte(s)
279 hexio_write test.db 102 [format %02x 0x12]
282 catchsql {BEGIN; CREATE TABLE t3 AS SELECT x,3 as y FROM t2 WHERE rowid%5!=0; ROLLBACK;}
283 } {1 {database disk image is malformed}}
285 do_test corruptC-2.14 {
287 forcecopy test.bu test.db
290 set blob [string repeat abcdefghij 10000]
291 execsql { INSERT INTO t1 VALUES (1, $blob) }
294 set filesize [file size test.db]
295 hexio_write test.db [expr $filesize-2048] 00000001
296 catchsql {DELETE FROM t1 WHERE rowid = (SELECT max(rowid) FROM t1)}
297 } {1 {database disk image is malformed}}
299 # At one point this particular corrupt database was causing a buffer
300 # overread. Which caused a crash in a run of all.test once.
302 do_test corruptC-2.15 {
304 forcecopy test.bu test.db
305 hexio_write test.db 986 b9
307 catchsql {SELECT count(*) FROM sqlite_master;}
308 } {1 {database disk image is malformed}}
311 # Now test for a series of quasi-random seeds.
312 # We loop over the entire file size and touch
313 # each byte at least once.
314 for {set tn 0} {$tn<$fsize} {incr tn 1} {
318 forcecopy test.bu test.db
321 # Seek to a random location in the file, and write a random single byte
322 # value. Then do various operations on the file to make sure that
323 # the database engine can handle the corruption gracefully.
326 for {set i 1} {$i<=512 && !$last} {incr i 1} {
330 # on the first corrupt value, use location $tn
331 # this ensures that we touch each location in the
332 # file at least once.
335 # insert random byte at random location
336 set roffset [random $fsize]
338 set rbyte [format %02x [random 255]]
340 # You can uncomment the following to have it trace
341 # exactly how it's corrupting the file. This is
342 # useful for generating the "seed specific" tests
344 # set rline "$roffset $rbyte"
347 hexio_write test.db $roffset $rbyte
350 # do a few random operations to make sure that if
351 # they error, they error gracefully instead of crashing.
352 do_test corruptC-3.$tn.($qseed).$i.1 {
353 catchsql {SELECT count(*) FROM sqlite_master}
356 do_test corruptC-3.$tn.($qseed).$i.2 {
357 catchsql {SELECT count(*) FROM t1}
360 do_test corruptC-3.$tn.($qseed).$i.3 {
361 catchsql {SELECT count(*) FROM t1 WHERE x>13}
364 do_test corruptC-3.$tn.($qseed).$i.4 {
365 catchsql {SELECT count(*) FROM t2}
368 do_test corruptC-3.$tn.($qseed).$i.5 {
369 catchsql {SELECT count(*) FROM t2 WHERE x<13}
372 do_test corruptC-3.$tn.($qseed).$i.6 {
373 catchsql {BEGIN; UPDATE t1 SET y=1; ROLLBACK;}
376 do_test corruptC-3.$tn.($qseed).$i.7 {
377 catchsql {BEGIN; UPDATE t2 SET y='abcdef-uvwxyz'; ROLLBACK;}
380 do_test corruptC-3.$tn.($qseed).$i.8 {
381 catchsql {BEGIN; DELETE FROM t1 WHERE x>13; ROLLBACK;}
384 do_test corruptC-3.$tn.($qseed).$i.9 {
385 catchsql {BEGIN; DELETE FROM t2 WHERE x<13; ROLLBACK;}
388 do_test corruptC-3.$tn.($qseed).$i.10 {
389 catchsql {BEGIN; CREATE TABLE t3 AS SELECT x,3 as y FROM t2 WHERE rowid%5!=0; ROLLBACK;}
393 # check the integrity of the database.
394 # once the corruption is detected, we can stop.
395 ifcapable {integrityck} {
396 set res [ catchsql {PRAGMA integrity_check} ]
397 set ans [lindex $res 1]
398 if { [ string compare $ans "ok" ] != 0 } {
402 # if we are not capable of doing an integrity check,
403 # stop after corrupting 5 bytes.
404 ifcapable {!integrityck} {
410 # Check that no page references were leaked.
411 # TBD: need to figure out why this doesn't work
412 # work with ROLLBACKs...
414 do_test corruptC-3.$tn.($qseed).$i.11 {
415 set bt [btree_from_db db]
417 array set stats [btree_pager_stats $bt]