mirror of
				https://github.com/sqlite/sqlite.git
				synced 2025-10-30 07:05:46 +03:00 
			
		
		
		
	wherecosttest tool. Other fixes to logarithm cost. FossilOrigin-Name: aa580e368e3c398b8377b80342dfdd906324c248
		
			
				
	
	
		
			58 lines
		
	
	
		
			1.7 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			58 lines
		
	
	
		
			1.7 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| # 2013 April 02
 | |
| #
 | |
| # The author disclaims copyright to this source code.  In place of
 | |
| # a legal notice, here is a blessing:
 | |
| #
 | |
| #    May you do good and not evil.
 | |
| #    May you find forgiveness for yourself and forgive others.
 | |
| #    May you share freely, never taking more than you give.
 | |
| #
 | |
| #***********************************************************************
 | |
| #
 | |
| # This file contains fault injection tests designed to test the btree.c 
 | |
| # module.
 | |
| #
 | |
| 
 | |
| set testdir [file dirname $argv0]
 | |
| source $testdir/tester.tcl
 | |
| source $testdir/malloc_common.tcl
 | |
| set testprefix btreefault
 | |
| 
 | |
| # This test will not work with an in-memory journal, as the database will
 | |
| # become corrupt if an error is injected into a transaction after it starts
 | |
| # writing data out to the db file.
 | |
| if {[permutation]=="inmemory_journal"} {
 | |
|   finish_test
 | |
|   return
 | |
| }
 | |
| 
 | |
| do_test 1-pre1 {
 | |
|   execsql {
 | |
|     PRAGMA auto_vacuum = incremental;
 | |
|     PRAGMA journal_mode = DELETE;
 | |
|     CREATE TABLE t1(a PRIMARY KEY, b);
 | |
|     INSERT INTO t1 VALUES(randomblob(1000), randomblob(100));
 | |
|     INSERT INTO t1 SELECT randomblob(1000), randomblob(1000) FROM t1;
 | |
|     INSERT INTO t1 SELECT randomblob(1000), randomblob(1000) FROM t1;
 | |
|     INSERT INTO t1 SELECT randomblob(1000), randomblob(1000) FROM t1;
 | |
|     INSERT INTO t1 SELECT randomblob(1000), randomblob(1000) FROM t1;
 | |
|     DELETE FROM t1 WHERE rowid%2;
 | |
|   }
 | |
|   faultsim_save_and_close
 | |
| } {}
 | |
| 
 | |
| do_faultsim_test 1 -prep {
 | |
|   faultsim_restore_and_reopen
 | |
|   set ::STMT [sqlite3_prepare db "SELECT * FROM t1 ORDER BY a" -1 DUMMY]
 | |
|   sqlite3_step $::STMT
 | |
|   sqlite3_step $::STMT
 | |
| } -body {
 | |
|   execsql { PRAGMA incremental_vacuum = 10 }
 | |
| } -test {
 | |
|   sqlite3_finalize $::STMT
 | |
|   faultsim_test_result {0 {}} 
 | |
|   faultsim_integrity_check
 | |
| }
 | |
| 
 | |
| finish_test
 |