Return to sidedelete.test CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / sqlite3 / test

sqlite3

    1: # 2007 Dec 12
    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: #
   12: # This file contains test cases for stressing database
   13: # changes that involve side effects that delete rows from
   14: # the table being changed.  Ticket #2832 shows that in
   15: # older versions of SQLite that behavior was implemented
   16: # incorrectly and resulted in corrupt database files.
   17: #
   18: # $Id: sidedelete.test,v 1.1.1.1 2012/02/21 17:04:16 misho Exp $
   19: #
   20: 
   21: set testdir [file dirname $argv0]
   22: source $testdir/tester.tcl
   23: 
   24: # The sequence table is created to store a sequence of integers
   25: # starting with 1.  This is used to reinitialize other tables
   26: # as part of other tests.
   27: #
   28: do_test sidedelete-1.1 {
   29:   execsql {
   30:     CREATE TABLE sequence(a INTEGER PRIMARY KEY);
   31:     INSERT INTO sequence VALUES(1);
   32:     INSERT INTO sequence VALUES(2);
   33:   }
   34:   for {set i 0} {$i<8} {incr i} {
   35:     execsql {
   36:       INSERT INTO sequence SELECT a+(SELECT max(a) FROM sequence) FROM sequence;
   37:     }
   38:   }
   39:   execsql {SELECT count(*) FROM sequence}
   40: } {512}
   41: 
   42: # Make a series of changes using an UPDATE OR REPLACE and a
   43: # correlated subquery.  This would cause database corruption
   44: # prior to the fix for ticket #2832.
   45: #
   46: do_test sidedelete-2.0 {
   47:   execsql {
   48:     CREATE TABLE t1(a PRIMARY KEY, b);
   49:     CREATE TABLE chng(a PRIMARY KEY, b);
   50:     SELECT count(*) FROM t1;
   51:     SELECT count(*) FROM chng;
   52:   }
   53: } {0 0}
   54: for {set i 2} {$i<=100} {incr i} {
   55:   set n [expr {($i+2)/2}]
   56:   do_test sidedelete-2.$i.1 {
   57:     execsql {
   58:       DELETE FROM t1;
   59:       INSERT INTO t1 SELECT a, a FROM sequence WHERE a<=$i;
   60:       DELETE FROM chng;
   61:       INSERT INTO chng SELECT a*2, a*2+1 FROM sequence WHERE a<=$i/2;
   62:       UPDATE OR REPLACE t1 SET a=(SELECT b FROM chng WHERE a=t1.a);
   63:       SELECT count(*), sum(a) FROM t1;
   64:     }
   65:   } [list $n [expr {$n*$n-1}]]
   66:   integrity_check sidedelete-2.$i.2
   67: }
   68: 
   69: # This will cause stacks leaks but not database corruption prior
   70: # to the #2832 fix.
   71: #
   72: do_test sidedelete-3.0 {
   73:   execsql {
   74:      DROP TABLE t1;
   75:      CREATE TABLE t1(a PRIMARY KEY);
   76:      SELECT * FROM t1;
   77:   }
   78: } {}
   79: for {set i 1} {$i<=100} {incr i} {
   80:   set n [expr {($i+1)/2}]
   81:   do_test sidedelete-3.$i.1 {
   82:     execsql {
   83:       DELETE FROM t1;
   84:       INSERT INTO t1 SELECT a FROM sequence WHERE a<=$i;
   85:       UPDATE OR REPLACE t1 SET a=a+1;
   86:       SELECT count(*), sum(a) FROM t1;
   87:     }
   88:   } [list $n [expr {$n*($n+1)}]]
   89:   integrity_check sidedelete-3.$i.2
   90: }
   91: 
   92: finish_test