Import SQLite 3.8.7.4.

third_party/sqlite/src/test/misc1.test

 # 2001 September 15.
 #
 # 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 217 matching lines @@
   execsql {
     CREATE TABLE t5(a,b,c,PRIMARY KEY(a,b));
     INSERT INTO t5 VALUES(1,2,3);
     SELECT * FROM t5 ORDER BY a;
   }
 } {1 2 3}
 do_test misc1-7.4 {
   catchsql {
     INSERT INTO t5 VALUES(1,2,4);
   }
-} {1 {columns a, b are not unique}}
+} {1 {UNIQUE constraint failed: t5.a, t5.b}}
 do_test misc1-7.5 {
   catchsql {
     INSERT INTO t5 VALUES(0,2,4);
   }
 } {0 {}}
 do_test misc1-7.6 {
   execsql {
     SELECT * FROM t5 ORDER BY a;
   }
 } {0 2 4 1 2 3}
@@ skipping 216 matching lines @@
           OR x=(SELECT x FROM t9 WHERE y=10)
           OR x=(SELECT x FROM t9 WHERE y=11)
           OR x=(SELECT x FROM t9 WHERE y=12)
           OR x=(SELECT x FROM t9 WHERE y=13)
           OR x=(SELECT x FROM t9 WHERE y=14)
        ;
      }
   } {1 2 3 4 5 6 7 8 9 10 11}
 }
 
+#
+# The following tests can only work if the current SQLite VFS has the concept
+# of a current directory.
+#
+ifcapable curdir {
 # Make sure a database connection still works after changing the
 # working directory.
 #
 do_test misc1-14.1 {
   file mkdir tempdir
   cd tempdir
   execsql {BEGIN}
   file exists ./test.db-journal
 } {0}
 do_test misc1-14.2a {
   execsql {UPDATE t1 SET a=a||'x' WHERE 0}
   file exists ../test.db-journal
 } {0}
 do_test misc1-14.2b {
   execsql {UPDATE t1 SET a=a||'y' WHERE 1}
   file exists ../test.db-journal
 } {1}
 do_test misc1-14.3 {
   cd ..
-  file delete -force tempdir
+  forcedelete tempdir
   execsql {COMMIT}
   file exists ./test.db-journal
 } {0}
+}
 
 # A failed create table should not leave the table in the internal
 # data structures.  Ticket #238.
 #
 do_test misc1-15.1.1 {
   catchsql {
     CREATE TABLE t10 AS SELECT c1;
   }
 } {1 {no such column: c1}}
 do_test misc1-15.1.2 {
@@ skipping 71 matching lines @@
     SELECT TestString FROM RealTable ORDER BY 1;
   }
 } {2 3}
 }
 
 do_test misc1-18.1 {
   set n [sqlite3_sleep 100]
   expr {$n>=100}
 } {1}
 
+# 2014-01-10:  In a CREATE TABLE AS, if one or more of the column names
+# are an empty string, that is still OK.
+#
+do_execsql_test misc1-19.1 {
+  CREATE TABLE t19 AS SELECT 1, 2 AS '', 3;
+  SELECT * FROM t19;
+} {1 2 3}
+do_execsql_test misc1-19.2 {
+  CREATE TABLE t19b AS SELECT 4 AS '', 5 AS '',  6 AS '';
+  SELECT * FROM t19b;
+} {4 5 6}
+
+# 2014-05-16:  Tests for the SQLITE_TESTCTRL_FAULT_INSTALL feature.
+#
+unset -nocomplain fault_callbacks
+set fault_callbacks {}
+proc fault_callback {n} {
+  lappend ::fault_callbacks $n
+  return 0
+}
+do_test misc1-19.1 {
+  sqlite3_test_control_fault_install fault_callback
+  set fault_callbacks
+} {0}
+do_test misc1-19.2 {
+  sqlite3_test_control_fault_install
+  set fault_callbacks
+} {0}
+
 finish_test