Move bundled copy of sqlite one level deeper to better separate it...

third_party/sqlite/test/misc2.test

-# 2003 June 21
-#
-# 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.
-#
-#***********************************************************************
-# This file implements regression tests for SQLite library.
-#
-# This file implements tests for miscellanous features that were
-# left out of other test files.
-#
-# $Id: misc2.test,v 1.28 2007/09/12 17:01:45 danielk1977 Exp $
-
-set testdir [file dirname $argv0]
-source $testdir/tester.tcl
-
-# The tests in this file were written before SQLite supported recursive
-# trigger invocation, and some tests depend on that to pass. So disable
-# recursive triggers for this file.
-catchsql { pragma recursive_triggers = off } 
-
-ifcapable {trigger} {
-# Test for ticket #360
-#
-do_test misc2-1.1 {
-  catchsql {
-    CREATE TABLE FOO(bar integer);
-    CREATE TRIGGER foo_insert BEFORE INSERT ON foo BEGIN
-      SELECT CASE WHEN (NOT new.bar BETWEEN 0 AND 20)
-             THEN raise(rollback, 'aiieee') END;
-    END;
-    INSERT INTO foo(bar) VALUES (1);
-  }
-} {0 {}}
-do_test misc2-1.2 {
-  catchsql {
-    INSERT INTO foo(bar) VALUES (111);
-  }
-} {1 aiieee}
-} ;# endif trigger
-
-# Make sure ROWID works on a view and a subquery.  Ticket #364
-#
-do_test misc2-2.1 {
-  execsql {
-    CREATE TABLE t1(a,b,c);
-    INSERT INTO t1 VALUES(1,2,3);
-    CREATE TABLE t2(a,b,c);
-    INSERT INTO t2 VALUES(7,8,9);
-  }
-} {}
-ifcapable subquery {
-  do_test misc2-2.2 {
-    execsql {
-      SELECT rowid, * FROM (SELECT * FROM t1, t2);
-    }
-  } {{} 1 2 3 7 8 9}
-}
-ifcapable view {
-  do_test misc2-2.3 {
-    execsql {
-      CREATE VIEW v1 AS SELECT * FROM t1, t2;
-      SELECT rowid, * FROM v1;
-    }
-  } {{} 1 2 3 7 8 9}
-} ;# ifcapable view
-
-# Ticket #2002 and #1952.
-ifcapable subquery {
-  do_test misc2-2.4 {
-    execsql2 {
-      SELECT * FROM (SELECT a, b AS 'a', c AS 'a', 4 AS 'a' FROM t1)
-    }
-  } {a 1 a:1 2 a:2 3 a:3 4}
-}
-
-# Check name binding precedence.  Ticket #387
-#
-do_test misc2-3.1 {
-  catchsql {
-    SELECT t1.b+t2.b AS a, t1.a, t2.a FROM t1, t2 WHERE a==10
-  }
-} {1 {ambiguous column name: a}}
-
-# Make sure 32-bit integer overflow is handled properly in queries.
-# ticket #408
-#
-do_test misc2-4.1 {
-  execsql {
-    INSERT INTO t1 VALUES(4000000000,'a','b');
-    SELECT a FROM t1 WHERE a>1;
-  }
-} {4000000000}
-do_test misc2-4.2 {
-  execsql {
-    INSERT INTO t1 VALUES(2147483648,'b2','c2');
-    INSERT INTO t1 VALUES(2147483647,'b3','c3');
-    SELECT a FROM t1 WHERE a>2147483647;
-  }
-} {4000000000 2147483648}
-do_test misc2-4.3 {
-  execsql {
-    SELECT a FROM t1 WHERE a<2147483648;
-  }
-} {1 2147483647}
-do_test misc2-4.4 {
-  execsql {
-    SELECT a FROM t1 WHERE a<=2147483648;
-  }
-} {1 2147483648 2147483647}
-do_test misc2-4.5 {
-  execsql {
-    SELECT a FROM t1 WHERE a<10000000000;
-  }
-} {1 4000000000 2147483648 2147483647}
-do_test misc2-4.6 {
-  execsql {
-    SELECT a FROM t1 WHERE a<1000000000000 ORDER BY 1;
-  }
-} {1 2147483647 2147483648 4000000000}
-
-# There were some issues with expanding a SrcList object using a call
-# to sqliteSrcListAppend() if the SrcList had previously been duplicated
-# using a call to sqliteSrcListDup().  Ticket #416.  The following test
-# makes sure the problem has been fixed.
-#
-ifcapable view {
-do_test misc2-5.1 {
-  execsql {
-    CREATE TABLE x(a,b);
-    CREATE VIEW y AS 
-      SELECT x1.b AS p, x2.b AS q FROM x AS x1, x AS x2 WHERE x1.a=x2.a;
-    CREATE VIEW z AS
-      SELECT y1.p, y2.p FROM y AS y1, y AS y2 WHERE y1.q=y2.q;
-    SELECT * from z;
-  }
-} {}
-}
-
-# Make sure we can open a database with an empty filename.  What this
-# does is store the database in a temporary file that is deleted when
-# the database is closed.  Ticket #432.
-#
-do_test misc2-6.1 {
-  db close
-  sqlite3 db {}
-  execsql {
-    CREATE TABLE t1(a,b);
-    INSERT INTO t1 VALUES(1,2);
-    SELECT * FROM t1;
-  }
-} {1 2}
-
-# Make sure we get an error message (not a segfault) on an attempt to
-# update a table from within the callback of a select on that same
-# table.
-#
-# 2006-08-16:  This has changed.  It is now permitted to update
-# the table being SELECTed from within the callback of the query.
-#
-ifcapable tclvar {
-  do_test misc2-7.1 {
-    db close
-    file delete -force test.db
-    sqlite3 db test.db
-    execsql {
-      CREATE TABLE t1(x);
-      INSERT INTO t1 VALUES(1);
-      INSERT INTO t1 VALUES(2);
-      INSERT INTO t1 VALUES(3);
-      SELECT * FROM t1;
-    }
-  } {1 2 3}
-  do_test misc2-7.2 {
-    set rc [catch {
-      db eval {SELECT rowid FROM t1} {} {
-        db eval "DELETE FROM t1 WHERE rowid=$rowid"
-      }
-    } msg]
-    lappend rc $msg
-  } {0 {}}
-  do_test misc2-7.3 {
-    execsql {SELECT * FROM t1}
-  } {}
-  do_test misc2-7.4 {
-    execsql {
-      DELETE FROM t1;
-      INSERT INTO t1 VALUES(1);
-      INSERT INTO t1 VALUES(2);
-      INSERT INTO t1 VALUES(3);
-      INSERT INTO t1 VALUES(4);
-    }
-    db eval {SELECT rowid, x FROM t1} {
-      if {$x & 1} {
-        db eval {DELETE FROM t1 WHERE rowid=$rowid}
-      }
-    }
-    execsql {SELECT * FROM t1}
-  } {2 4}
-  do_test misc2-7.5 {
-    execsql {
-      DELETE FROM t1;
-      INSERT INTO t1 VALUES(1);
-      INSERT INTO t1 VALUES(2);
-      INSERT INTO t1 VALUES(3);
-      INSERT INTO t1 VALUES(4);
-    }
-    db eval {SELECT rowid, x FROM t1} {
-      if {$x & 1} {
-        db eval {DELETE FROM t1 WHERE rowid=$rowid+1}
-      }
-    }
-    execsql {SELECT * FROM t1}
-  } {1 3}
-  do_test misc2-7.6 {
-    execsql {
-      DELETE FROM t1;
-      INSERT INTO t1 VALUES(1);
-      INSERT INTO t1 VALUES(2);
-      INSERT INTO t1 VALUES(3);
-      INSERT INTO t1 VALUES(4);
-    }
-    db eval {SELECT rowid, x FROM t1} {
-      if {$x & 1} {
-        db eval {DELETE FROM t1}
-      }
-    }
-    execsql {SELECT * FROM t1}
-  } {}
-  do_test misc2-7.7 {
-    execsql {
-      DELETE FROM t1;
-      INSERT INTO t1 VALUES(1);
-      INSERT INTO t1 VALUES(2);
-      INSERT INTO t1 VALUES(3);
-      INSERT INTO t1 VALUES(4);
-    }
-    db eval {SELECT rowid, x FROM t1} {
-      if {$x & 1} {
-        db eval {UPDATE t1 SET x=x+100 WHERE rowid=$rowid}
-      }
-    }
-    execsql {SELECT * FROM t1}
-  } {101 2 103 4}
-  do_test misc2-7.8 {
-    execsql {
-      DELETE FROM t1;
-      INSERT INTO t1 VALUES(1);
-    }
-    db eval {SELECT rowid, x FROM t1} {
-      if {$x<10} {
-        db eval {INSERT INTO t1 VALUES($x+1)}
-      }
-    }
-    execsql {SELECT * FROM t1}
-  } {1 2 3 4 5 6 7 8 9 10}
-  
-  # Repeat the tests 7.1 through 7.8 about but this time do the SELECTs
-  # in reverse order so that we exercise the sqlite3BtreePrev() routine
-  # instead of sqlite3BtreeNext()
-  #
-  do_test misc2-7.11 {
-    db close
-    file delete -force test.db
-    sqlite3 db test.db
-    execsql {
-      CREATE TABLE t1(x);
-      INSERT INTO t1 VALUES(1);
-      INSERT INTO t1 VALUES(2);
-      INSERT INTO t1 VALUES(3);
-      SELECT * FROM t1;
-    }
-  } {1 2 3}
-  do_test misc2-7.12 {
-    set rc [catch {
-      db eval {SELECT rowid FROM t1 ORDER BY rowid DESC} {} {
-        db eval "DELETE FROM t1 WHERE rowid=$rowid"
-      }
-    } msg]
-    lappend rc $msg
-  } {0 {}}
-  do_test misc2-7.13 {
-    execsql {SELECT * FROM t1}
-  } {}
-  do_test misc2-7.14 {
-    execsql {
-      DELETE FROM t1;
-      INSERT INTO t1 VALUES(1);
-      INSERT INTO t1 VALUES(2);
-      INSERT INTO t1 VALUES(3);
-      INSERT INTO t1 VALUES(4);
-    }
-    db eval {SELECT rowid, x FROM t1 ORDER BY rowid DESC} {
-      if {$x & 1} {
-        db eval {DELETE FROM t1 WHERE rowid=$rowid}
-      }
-    }
-    execsql {SELECT * FROM t1}
-  } {2 4}
-  do_test misc2-7.15 {
-    execsql {
-      DELETE FROM t1;
-      INSERT INTO t1 VALUES(1);
-      INSERT INTO t1 VALUES(2);
-      INSERT INTO t1 VALUES(3);
-      INSERT INTO t1 VALUES(4);
-    }
-    db eval {SELECT rowid, x FROM t1} {
-      if {$x & 1} {
-        db eval {DELETE FROM t1 WHERE rowid=$rowid+1}
-      }
-    }
-    execsql {SELECT * FROM t1}
-  } {1 3}
-  do_test misc2-7.16 {
-    execsql {
-      DELETE FROM t1;
-      INSERT INTO t1 VALUES(1);
-      INSERT INTO t1 VALUES(2);
-      INSERT INTO t1 VALUES(3);
-      INSERT INTO t1 VALUES(4);
-    }
-    db eval {SELECT rowid, x FROM t1 ORDER BY rowid DESC} {
-      if {$x & 1} {
-        db eval {DELETE FROM t1}
-      }
-    }
-    execsql {SELECT * FROM t1}
-  } {}
-  do_test misc2-7.17 {
-    execsql {
-      DELETE FROM t1;
-      INSERT INTO t1 VALUES(1);
-      INSERT INTO t1 VALUES(2);
-      INSERT INTO t1 VALUES(3);
-      INSERT INTO t1 VALUES(4);
-    }
-    db eval {SELECT rowid, x FROM t1 ORDER BY rowid DESC} {
-      if {$x & 1} {
-        db eval {UPDATE t1 SET x=x+100 WHERE rowid=$rowid}
-      }
-    }
-    execsql {SELECT * FROM t1}
-  } {101 2 103 4}
-  do_test misc2-7.18 {
-    execsql {
-      DELETE FROM t1;
-      INSERT INTO t1(rowid,x) VALUES(10,10);
-    }
-    db eval {SELECT rowid, x FROM t1 ORDER BY rowid DESC} {
-      if {$x>1} {
-        db eval {INSERT INTO t1(rowid,x) VALUES($x-1,$x-1)}
-      }
-    }
-    execsql {SELECT * FROM t1}
-  } {1 2 3 4 5 6 7 8 9 10}
-}
-
-db close
-file delete -force test.db
-sqlite3 db test.db
-catchsql { pragma recursive_triggers = off } 
-
-# Ticket #453.  If the SQL ended with "-", the tokenizer was calling that
-# an incomplete token, which caused problem.  The solution was to just call
-# it a minus sign.
-#
-do_test misc2-8.1 {
-  catchsql {-}
-} {1 {near "-": syntax error}}
-
-# Ticket #513.  Make sure the VDBE stack does not grow on a 3-way join.
-#
-ifcapable tempdb {
-  do_test misc2-9.1 {
-    execsql {
-      BEGIN;
-      CREATE TABLE counts(n INTEGER PRIMARY KEY);
-      INSERT INTO counts VALUES(0);
-      INSERT INTO counts VALUES(1);
-      INSERT INTO counts SELECT n+2 FROM counts;
-      INSERT INTO counts SELECT n+4 FROM counts;
-      INSERT INTO counts SELECT n+8 FROM counts;
-      COMMIT;
-  
-      CREATE TEMP TABLE x AS
-      SELECT dim1.n, dim2.n, dim3.n
-      FROM counts AS dim1, counts AS dim2, counts AS dim3
-      WHERE dim1.n<10 AND dim2.n<10 AND dim3.n<10;
-  
-      SELECT count(*) FROM x;
-    }
-  } {1000}
-  do_test misc2-9.2 {
-    execsql {
-      DROP TABLE x;
-      CREATE TEMP TABLE x AS
-      SELECT dim1.n, dim2.n, dim3.n
-      FROM counts AS dim1, counts AS dim2, counts AS dim3
-      WHERE dim1.n>=6 AND dim2.n>=6 AND dim3.n>=6;
-  
-      SELECT count(*) FROM x;
-    }
-  } {1000}
-  do_test misc2-9.3 {
-    execsql {
-      DROP TABLE x;
-      CREATE TEMP TABLE x AS
-      SELECT dim1.n, dim2.n, dim3.n, dim4.n
-      FROM counts AS dim1, counts AS dim2, counts AS dim3, counts AS dim4
-      WHERE dim1.n<5 AND dim2.n<5 AND dim3.n<5 AND dim4.n<5;
-  
-      SELECT count(*) FROM x;
-    }
-  } [expr 5*5*5*5]
-}
-
-# Ticket #1229.  Sometimes when a "NEW.X" appears in a SELECT without
-# a FROM clause deep within a trigger, the code generator is unable to
-# trace the NEW.X back to an original table and thus figure out its
-# declared datatype.
-#
-# The SQL code below was causing a segfault.
-#
-ifcapable subquery&&trigger {
-  do_test misc2-10.1 {
-    execsql {
-      CREATE TABLE t1229(x);
-      CREATE TRIGGER r1229 BEFORE INSERT ON t1229 BEGIN
-        INSERT INTO t1229 SELECT y FROM (SELECT new.x y);
-      END;
-      INSERT INTO t1229 VALUES(1);
-    }
-  } {}
-}
-
-finish_test