Chromium Code Reviews
chromiumcodereview-hr@appspot.gserviceaccount.com (chromiumcodereview-hr) | Please choose your nickname with Settings | Help | Chromium Project | Gerrit Changes | Sign out
(12)

Unified Diff: third_party/sqlite/sqlite-src-3100200/test/fordelete.test

Issue 2846743003: [sql] Remove SQLite 3.10.2 reference directory. (Closed)
Patch Set: Created 3 years, 8 months ago
Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.
Jump to:
View side-by-side diff with in-line comments
Download patch
Index: third_party/sqlite/sqlite-src-3100200/test/fordelete.test
diff --git a/third_party/sqlite/sqlite-src-3100200/test/fordelete.test b/third_party/sqlite/sqlite-src-3100200/test/fordelete.test
deleted file mode 100644
index 1e860e8867cc26c9a7c55290fa03a982a17fb81a..0000000000000000000000000000000000000000
--- a/third_party/sqlite/sqlite-src-3100200/test/fordelete.test
+++ /dev/null
@@ -1,130 +0,0 @@
-# 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.
-#
-#***********************************************************************
-# This file implements regression tests for SQLite library. The
-# focus of this file is testing the SELECT statement.
-#
-# $Id: select1.test,v 1.70 2009/05/28 01:00:56 drh Exp $
-
-set testdir [file dirname $argv0]
-source $testdir/tester.tcl
-set ::testprefix fordelete
-
-# This function returns a list of the tables or indexes opened with
-# OP_OpenWrite instructions when the SQL statement passed as the only
-# argument is executed. If the OPFLAG_FORDELETE flag is specified on
-# the OP_OpenWrite, an asterix is appended to the object name. The list
-# is sorted in [lsort] order before it is returned.
-#
-proc analyze_delete_program {sql} {
- # Build a map from root page to table/index name.
- db eval {
- SELECT name, rootpage FROM sqlite_master
- } {
- set T($rootpage) $name
- }
-
- # Calculate the results.
- set res [list]
- db eval "EXPLAIN $sql" R {
- if {$R(opcode) == "OpenWrite"} {
- set obj $T($R(p2))
- if {"0x$R(p5)" & 0x08} { append obj *}
- lappend res $obj
- }
- }
-
- lsort $res
-}
-
-proc do_adp_test {tn sql res} {
- uplevel [list do_test $tn [list analyze_delete_program $sql] [list {*}$res]]
-}
-
-do_execsql_test 1.0 {
- CREATE TABLE t1(a PRIMARY KEY, b);
-}
-
-foreach {tn sql res} {
- 1 { DELETE FROM t1 WHERE a=?} { sqlite_autoindex_t1_1 t1* }
- 2 { DELETE FROM t1 WHERE a=? AND b=? } { sqlite_autoindex_t1_1 t1 }
- 3 { DELETE FROM t1 WHERE a>? } { sqlite_autoindex_t1_1 t1* }
- 4 { DELETE FROM t1 WHERE rowid=? } { sqlite_autoindex_t1_1* t1 }
-} {
- do_adp_test 1.$tn $sql $res
-}
-
-do_execsql_test 2.0 {
- CREATE TABLE t2(a, b, c);
- CREATE INDEX t2a ON t2(a);
- CREATE INDEX t2b ON t2(b);
- CREATE INDEX t2c ON t2(c);
-}
-foreach {tn sql res} {
- 1 { DELETE FROM t2 WHERE a=?} { t2* t2a t2b* t2c* }
- 2 { DELETE FROM t2 WHERE a=? AND +b=?} { t2 t2a t2b* t2c* }
- 3 { DELETE FROM t2 WHERE a=? OR b=?} { t2 t2a* t2b* t2c* }
- 4 { DELETE FROM t2 WHERE +a=? } { t2 t2a* t2b* t2c* }
- 5 { DELETE FROM t2 WHERE rowid=? } { t2 t2a* t2b* t2c* }
-} {
- do_adp_test 2.$tn $sql $res
-}
-
-#-------------------------------------------------------------------------
-# Test that a record that consists of the bytes:
-#
-# 0x01 0x00
-#
-# is interpreted by OP_Column as a vector of NULL values (assuming the
-# default column values are NULL). Also test that:
-#
-# 0x00
-#
-# is handled in the same way.
-#
-do_execsql_test 3.0 {
- CREATE TABLE x1(a INTEGER PRIMARY KEY, b, c, d);
- CREATE TABLE x2(a INTEGER PRIMARY KEY, b, c, d);
-}
-
-do_test 3.1 {
- set root [db one { SELECT rootpage FROM sqlite_master WHERE name = 'x1' }]
- db eval {
- BEGIN IMMEDIATE;
- }
- set bt [btree_from_db db]
- set csr [btree_cursor $bt $root 1]
- btree_insert $csr 5 "\000"
- btree_close_cursor $csr
- db eval { COMMIT }
-
- db eval {
- SELECT * FROM x1;
- }
-} {5 {} {} {}}
-
-do_test 3.2 {
- set root [db one { SELECT rootpage FROM sqlite_master WHERE name = 'x2' }]
- db eval {
- BEGIN IMMEDIATE;
- }
- set bt [btree_from_db db]
- set csr [btree_cursor $bt $root 1]
- btree_insert $csr 6 "\000"
- btree_close_cursor $csr
- db eval { COMMIT }
-
- db eval {
- SELECT * FROM x2;
- }
-} {6 {} {} {}}
-
-finish_test
-
« no previous file with comments | « third_party/sqlite/sqlite-src-3100200/test/fkey_malloc.test ('k') | third_party/sqlite/sqlite-src-3100200/test/format4.test » ('j') | no next file with comments »

Powered by Google App Engine
This is Rietveld 408576698