[sql] Import SQLite 3.17.0.

third_party/sqlite/src/test/walbak.test

 # 2010 April 22
 #
 # 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 109 matching lines @@
       INSERT INTO t1 SELECT randomblob(500), randomblob(500) FROM t1; /*  2 */
       INSERT INTO t1 SELECT randomblob(500), randomblob(500) FROM t1; /*  4 */
       INSERT INTO t1 SELECT randomblob(500), randomblob(500) FROM t1; /*  8 */
       INSERT INTO t1 SELECT randomblob(500), randomblob(500) FROM t1; /* 16 */
       INSERT INTO t1 SELECT randomblob(500), randomblob(500) FROM t1; /* 32 */
       INSERT INTO t1 SELECT randomblob(500), randomblob(500) FROM t1; /* 64 */
     COMMIT;
   }
 } {}
 do_test walbak-2.2 {
+  forcedelete abc.db
   db backup abc.db
   sqlite3 db2 abc.db
   string compare [sig db] [sig db2]
 } {0}
 
 do_test walbak-2.3 {
   sqlite3_backup B db2 main db main
   B step 50
   execsql { UPDATE t1 SET b = randomblob(500) }
   list [B step 1000] [B finish]
@@ skipping 92 matching lines @@
     sqlite3 db2 test.db2
     db  eval { PRAGMA page_size = 1024 ; PRAGMA journal_mode = WAL }
     db2 eval { 
       PRAGMA page_size = 2048;
       PRAGMA journal_mode = PERSIST;
       CREATE TABLE xx(x);
     }
   }
 
 } {
+  if {$tn==4 && [sqlite3 -has-codec]} continue
   foreach f [glob -nocomplain test.db*] { forcedelete $f }
 
   eval $setup
 
   do_test walbak-3.$tn.1 {
     execsql {
       CREATE TABLE t1(a, b);
       INSERT INTO t1 VALUES(1, 2);
       INSERT INTO t1 VALUES(3, 4);
       SELECT * FROM t1;
@@ skipping 96 matching lines @@
 
 
   db2 close
   do_test walbak-4.$tn.6 { file exists test.db2-wal } 0
   sqlite3 db2 test.db2
   do_test walbak-4.$tn.7 { execsql { PRAGMA journal_mode } db2 } $dest_final
 }
 
 
 finish_test