Return to wal4.test CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / sqlite3 / test

Annotation of embedaddon/sqlite3/test/wal4.test, revision 1.1.1.1

1.1       misho       1: # 2010 July 1
                      2: #
                      3: # The author disclaims copyright to this source code.  In place of
                      4: # a legal notice, here is a blessing:
                      5: #
                      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.
                      9: #
                     10: #***********************************************************************
                     11: # Verify that an empty database and a non-empty WAL file do not
                     12: # result in database corruption
                     13: #
                     14: 
                     15: set testdir [file dirname $argv0]
                     16: source $testdir/tester.tcl
                     17: source $testdir/malloc_common.tcl
                     18: ifcapable !wal {finish_test ; return }
                     19: 
                     20: do_test wal4-1.1 {
                     21:   execsql {
                     22:     PRAGMA journal_mode=WAL;
                     23:     CREATE TABLE t1(x);
                     24:     INSERT INTO t1 VALUES(1);
                     25:     INSERT INTO t1 VALUES(2);
                     26:     SELECT x FROM t1 ORDER BY x;
                     27:   }
                     28: } {wal 1 2}
                     29: 
                     30: do_test wal4-1.2 {
                     31:   # Save a copy of the file-system containing the wal and wal-index files 
                     32:   # only (no database file).
                     33:   faultsim_save_and_close
                     34:   forcedelete sv_test.db
                     35: } {}
                     36: 
                     37: do_test wal4-1.3 {
                     38:   faultsim_restore_and_reopen
                     39:   catchsql { SELECT * FROM t1 }
                     40: } {1 {no such table: t1}}
                     41: 
                     42: do_faultsim_test wal4-2 -prep {
                     43:   faultsim_restore_and_reopen
                     44: } -body {
                     45:   execsql { SELECT name FROM sqlite_master }
                     46: } -test {
                     47:   # Result should be zero rows (empty db file).
                     48:   #
                     49:   faultsim_test_result {0 {}}
                     50: 
                     51:   # If the SELECT finished successfully, the WAL file should have been
                     52:   # deleted. In no case should the database file have been written, so
                     53:   # it should still be zero bytes in size regardless of whether or not
                     54:   # a fault was injected. Test these assertions:
                     55:   #
                     56:   if { $testrc==0 && [file exists test.db-wal] } { 
                     57:     error "Wal file was not deleted"
                     58:   }
                     59:   if { [file size test.db]!=0 } { 
                     60:     error "Db file grew to [file size test.db] bytes"
                     61:   }
                     62: }
                     63: 
                     64: finish_test