Import SQLite 3.10.2.

third_party/sqlite/src/test/index7.test

 # 2013-11-04
 #
 # 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.
 #
 #***********************************************************************
 #
 # Test cases for partial indices in WITHOUT ROWID tables
 #
 
 
 set testdir [file dirname $argv0]
 source $testdir/tester.tcl
 
 ifcapable !vtab {
   finish_test
   return
 }
 
+# Capture the output of a pragma in a TEMP table.
+#
+proc capture_pragma {db tabname sql} {
+  $db eval "DROP TABLE IF EXISTS temp.$tabname"
+  set once 1
+  $db eval $sql x {
+    if {$once} {
+      set once 0
+      set ins "INSERT INTO $tabname VALUES"
+      set crtab "CREATE TEMP TABLE $tabname "
+      set sep "("
+      foreach col $x(*) {
+        append ins ${sep}\$x($col)
+        append crtab ${sep}\"$col\"
+        set sep ,
+      }
+      append ins )
+      append crtab )
+      $db eval $crtab
+    }
+    $db eval $ins
+  }
+}
+
+
 load_static_extension db wholenumber;
 do_test index7-1.1 {
   # Able to parse and manage partial indices
   execsql {
     CREATE TABLE t1(a,b,c PRIMARY KEY) WITHOUT rowid;
     CREATE INDEX t1a ON t1(a) WHERE a IS NOT NULL;
     CREATE INDEX t1b ON t1(b) WHERE b>10;
     CREATE VIRTUAL TABLE nums USING wholenumber;
     INSERT INTO t1(a,b,c)
        SELECT CASE WHEN value%3!=0 THEN value END, value, value
          FROM nums WHERE value<=20;
     SELECT count(a), count(b) FROM t1;
     PRAGMA integrity_check;
   }
 } {14 20 ok}
 
+# (The "partial" column of the PRAGMA index_list output is...)
+# EVIDENCE-OF: R-34457-09668 "1" if the index is a partial index and "0"
+# if not.
+#
+do_test index7-1.1a {
+  capture_pragma db out {PRAGMA index_list(t1)}
+  db eval {SELECT "name", "partial", '|' FROM out ORDER BY "name"}
+} {sqlite_autoindex_t1_1 0 | t1a 1 | t1b 1 |}
+
 # Make sure the count(*) optimization works correctly with
 # partial indices.  Ticket [a5c8ed66cae16243be6] 2013-10-03.
 #
 do_execsql_test index7-1.1.1 {
   SELECT count(*) FROM t1;
 } {20}
 
 # Error conditions during parsing...
 #
 do_test index7-1.2 {
@@ skipping 220 matching lines @@
   INSERT INTO t4 VALUES('def', 'xyz');
   SELECT * FROM v4 WHERE d='xyz' AND c='def'
 } {
   def xyz
 }
 do_eqp_test index7-6.4 {
   SELECT * FROM v4 WHERE d='xyz' AND c='def'
 } {
   0 0 0 {SEARCH TABLE t4 USING INDEX i4 (c=?)}
 }
+do_catchsql_test index7-6.5 {
+  CREATE INDEX t5a ON t5(a) WHERE a=#1;
+} {1 {near "#1": syntax error}}
+
 
 finish_test