third_party/sqlite/sqlite-src-3070603/test/tkt3442.test

   1 # 2008 October 20
   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 # This file implements regression tests for SQLite library.
  12 #
  13 # This file implements tests to verify that ticket #3442 has been
  14 # fixed.
  15 #
  16 #
  17 # $Id: tkt3442.test,v 1.2 2009/06/05 17:09:12 drh Exp $
  18
  19
  20 set testdir [file dirname $argv0]
  21 source $testdir/tester.tcl
  22
  23
  24 # Create a schema with some indexes.
  25 #
  26 do_test tkt3442-1.1 {
  27   execsql {
  28      CREATE TABLE listhash(
  29        key INTEGER PRIMARY KEY,
  30        id TEXT,
  31        node INTEGER
  32      );
  33      CREATE UNIQUE INDEX ididx ON listhash(id);
  34   }
  35 } {}
  36
  37
  38 # Explain Query Plan
  39 #
  40 proc EQP {sql} {
  41   uplevel "execsql {EXPLAIN QUERY PLAN $sql}"
  42 }
  43
  44
  45 # These tests perform an EXPLAIN QUERY PLAN on both versions of the
  46 # SELECT referenced in ticket #3442 (both '5000' and "5000")
  47 # and verify that the query plan is the same.
  48 #
  49 ifcapable explain {
  50   do_test tkt3442-1.2 {
  51     EQP { SELECT node FROM listhash WHERE id='5000' LIMIT 1; }
  52   } {0 0 0 {SEARCH TABLE listhash USING INDEX ididx (id=?) (~1 rows)}}
  53   do_test tkt3442-1.3 {
  54     EQP { SELECT node FROM listhash WHERE id="5000" LIMIT 1; }
  55   } {0 0 0 {SEARCH TABLE listhash USING INDEX ididx (id=?) (~1 rows)}}
  56 }
  57
  58
  59 # Some extra tests testing other permutations of 5000.
  60 #
  61 ifcapable explain {
  62   do_test tkt3442-1.4 {
  63     EQP { SELECT node FROM listhash WHERE id=5000 LIMIT 1; }
  64   } {0 0 0 {SEARCH TABLE listhash USING INDEX ididx (id=?) (~1 rows)}}
  65 }
  66 do_test tkt3442-1.5 {
  67   catchsql {
  68     SELECT node FROM listhash WHERE id=[5000] LIMIT 1;
  69   }
  70 } {1 {no such column: 5000}}
  71
  72 finish_test