Import SQLite 3.8.7.4.

third_party/sqlite/src/test/walfault.test

 # 2010 May 03
 #
 # 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.
 #
 #***********************************************************************
@@ skipping 105 matching lines @@
 } -body {
   db eval {
     DELETE FROM abc;
     PRAGMA wal_checkpoint;
   }
   set {} {}
 } -test {
   faultsim_test_result {0 {}}
 }
 
-
 #--------------------------------------------------------------------------
 #
 if {[permutation] != "inmemory_journal"} {
   faultsim_delete_and_reopen
   faultsim_save_and_close
   do_faultsim_test walfault-4 -prep {
     faultsim_restore_and_reopen
   } -body {
     execsql {
       PRAGMA auto_vacuum = 0;
       PRAGMA journal_mode = WAL;
       CREATE TABLE t1(a PRIMARY KEY, b);
       INSERT INTO t1 VALUES('a', 'b');
       PRAGMA wal_checkpoint;
       SELECT * FROM t1;
     }
   } -test {
-    faultsim_test_result {0 {wal 0 7 7 a b}}
+    # Update: The following changed from {0 {wal 0 7 7 a b}} as a result
+    # of PSOW being set by default.
+    faultsim_test_result {0 {wal 0 5 5 a b}}
     faultsim_integrity_check
   } 
 }
 
 #--------------------------------------------------------------------------
 #
 do_test walfault-5-pre-1 {
   faultsim_delete_and_reopen
   execsql {
     PRAGMA page_size = 512;
@@ skipping 303 matching lines @@
   execsql {
     PRAGMA journal_mode = WAL;
     PRAGMA wal_autocheckpoint = 0;
     BEGIN;
       CREATE TABLE abc(a PRIMARY KEY);
       INSERT INTO abc VALUES(randomblob(1500));
       INSERT INTO abc VALUES(randomblob(1500));
     COMMIT;
   }
   faultsim_save_and_close
-  file delete sv_test.db-shm
+  delete_file sv_test.db-shm
 } {}
 
 do_faultsim_test walfault-13.1 -prep {
   faultsim_restore_and_reopen
 } -body {
   db eval { PRAGMA locking_mode = exclusive }
   db eval { SELECT count(*) FROM abc }
 } -test {
   faultsim_test_result {0 2}
   if {[file exists test.db-shm]} { error "Not using heap-memory mode" }
@@ skipping 56 matching lines @@
   faultsim_save_and_close
 } {}
 do_faultsim_test walfault-14 -prep {
   faultsim_restore_and_reopen
 } -body {
   db eval { 
     PRAGMA wal_checkpoint = full;
     INSERT INTO abc VALUES(randomblob(1500));
   }
 } -test {
-  faultsim_test_result {0 {0 10 10}}
+  faultsim_test_result {0 {0 9 9}}
   faultsim_integrity_check
   set nRow [db eval {SELECT count(*) FROM abc}]
   if {!(($nRow==2 && $testrc) || $nRow==3)} { error "Bad db content" }
 }
 
+#-------------------------------------------------------------------------
+# Test fault-handling when switching out of exclusive-locking mode.
+#
+do_test walfault-14-pre {
+  faultsim_delete_and_reopen
+  execsql {
+    PRAGMA auto_vacuum = 0;
+    PRAGMA journal_mode = WAL;
+    BEGIN;
+      CREATE TABLE abc(a PRIMARY KEY);
+      INSERT INTO abc VALUES(randomblob(1500));
+      INSERT INTO abc VALUES(randomblob(1500));
+    COMMIT;
+  }
+  faultsim_save_and_close
+} {}
+do_faultsim_test walfault-14 -prep {
+  faultsim_restore_and_reopen
+  execsql {
+    SELECT count(*) FROM abc;
+    PRAGMA locking_mode = exclusive;
+    BEGIN;
+      INSERT INTO abc VALUES(randomblob(1500));
+    COMMIT;
+  }
+} -body {
+  db eval { 
+    PRAGMA locking_mode = normal;
+    BEGIN;
+      INSERT INTO abc VALUES(randomblob(1500));
+    COMMIT;
+  }
+} -test {
+  faultsim_integrity_check
+  set nRow [db eval {SELECT count(*) FROM abc}]
+  if {$nRow!=3 && $nRow!=4} { error "Bad db content" }
+}
+
 finish_test