1# 2008 December 15
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# $Id: savepoint3.test,v 1.5 2009/06/05 17:09:12 drh Exp $
13
14set testdir [file dirname $argv0]
15source $testdir/tester.tcl
16
17source $testdir/malloc_common.tcl
18
19do_malloc_test savepoint3-1 -sqlprep {
20  CREATE TABLE t1(a, b, c);
21  INSERT INTO t1 VALUES(1, 2, 3);
22} -sqlbody {
23  SAVEPOINT one;
24    INSERT INTO t1 VALUES(4, 5, 6);
25    SAVEPOINT two;
26      DELETE FROM t1;
27    ROLLBACK TO two;
28  RELEASE one;
29}
30
31do_malloc_test savepoint3-2 -sqlprep {
32  PRAGMA cache_size = 10;
33  CREATE TABLE t1(a, b, c);
34  INSERT INTO t1 VALUES(randstr(400,400), randstr(400,400), randstr(400,400));
35  INSERT INTO t1 SELECT 
36    randstr(400,400), randstr(400,400), randstr(400,400) FROM t1;
37  INSERT INTO t1 
38    SELECT randstr(400,400), randstr(400,400), randstr(400,400) FROM t1;
39  INSERT INTO t1 
40    SELECT randstr(400,400), randstr(400,400), randstr(400,400) FROM t1;
41  INSERT INTO t1 
42    SELECT randstr(400,400), randstr(400,400), randstr(400,400) FROM t1;
43  INSERT INTO t1 
44    SELECT randstr(400,400), randstr(400,400), randstr(400,400) FROM t1;
45  INSERT INTO t1 
46    SELECT randstr(400,400), randstr(400,400), randstr(400,400) FROM t1;
47  INSERT INTO t1 
48    SELECT randstr(400,400), randstr(400,400), randstr(400,400) FROM t1;
49  INSERT INTO t1 
50    SELECT randstr(400,400), randstr(400,400), randstr(400,400) FROM t1;
51} -sqlbody {
52  PRAGMA cache_size = 10;
53  SAVEPOINT one;
54    DELETE FROM t1 WHERE rowid < 5;
55    SAVEPOINT two;
56      DELETE FROM t1 WHERE rowid > 10;
57    ROLLBACK TO two;
58  ROLLBACK TO one;
59  RELEASE one;
60}
61
62do_ioerr_test savepoint3.3 -sqlprep {
63  CREATE TABLE t1(a, b, c);
64  INSERT INTO t1 VALUES(1, randstr(1000,1000), randstr(1000,1000));
65  INSERT INTO t1 VALUES(2, randstr(1000,1000), randstr(1000,1000));
66} -sqlbody {
67  BEGIN;
68    UPDATE t1 SET a = 3 WHERE a = 1;
69    SAVEPOINT one;
70      UPDATE t1 SET a = 4 WHERE a = 2;
71  COMMIT;
72} -cleanup {
73  db eval {
74    SAVEPOINT one;
75    RELEASE one;
76  }
77}
78
79# The following test does a really big savepoint rollback. One involving
80# more than 4000 pages. The idea is to get a specific sqlite3BitvecSet()
81# operation in pagerPlaybackSavepoint() to fail.
82#do_malloc_test savepoint3-4 -sqlprep {
83#  BEGIN;
84#    CREATE TABLE t1(a, b);
85#    CREATE INDEX i1 ON t1(a);
86#    CREATE INDEX i2 ON t1(b);
87#    INSERT INTO t1 VALUES(randstr(500,500), randstr(500,500));        --     1
88#    INSERT INTO t1 VALUES(randstr(500,500), randstr(500,500));        --     2
89#    INSERT INTO t1 SELECT randstr(500,500), randstr(500,500) FROM t1; --     4
90#    INSERT INTO t1 SELECT randstr(500,500), randstr(500,500) FROM t1; --     8
91#    INSERT INTO t1 SELECT randstr(500,500), randstr(500,500) FROM t1; --    16
92#    INSERT INTO t1 SELECT randstr(500,500), randstr(500,500) FROM t1; --    32
93#    INSERT INTO t1 SELECT randstr(500,500), randstr(500,500) FROM t1; --    64
94#    INSERT INTO t1 SELECT randstr(500,500), randstr(500,500) FROM t1; --   128
95#    INSERT INTO t1 SELECT randstr(500,500), randstr(500,500) FROM t1; --   256
96#    INSERT INTO t1 SELECT randstr(500,500), randstr(500,500) FROM t1; --   512
97#    INSERT INTO t1 SELECT randstr(500,500), randstr(500,500) FROM t1; --  1024
98#    INSERT INTO t1 SELECT randstr(500,500), randstr(500,500) FROM t1; --  2048
99#  COMMIT;
100#  BEGIN;
101#    SAVEPOINT abc;
102#      UPDATE t1 SET a = randstr(500,500);
103#} -sqlbody {
104#    ROLLBACK TO abc;
105#}
106
107
108# Cause a specific malloc in savepoint rollback code to fail.
109#
110do_malloc_test savepoint3-4 -start 7 -sqlprep {
111  PRAGMA auto_vacuum = incremental;
112  PRAGMA cache_size = 1000;
113
114  CREATE TABLE t1(a, b);
115  CREATE TABLE t2(a, b);
116  CREATE TABLE t3(a, b);
117  INSERT INTO t1 VALUES(1, randstr(500,500));
118  INSERT INTO t1 VALUES(2, randstr(500,500));
119  INSERT INTO t1 VALUES(3, randstr(500,500));
120  DELETE FROM t1;
121
122  BEGIN;
123    INSERT INTO t1 VALUES(1, randstr(500,500));
124    INSERT INTO t1 VALUES(2, randstr(500,500));
125    INSERT INTO t1 VALUES(3, randstr(500,500));
126    DROP TABLE t3;                  -- Page 5 of the database file is now free.
127    DROP TABLE t2;                  -- Page 4 of the database file is now free.
128
129    SAVEPOINT abc;
130      PRAGMA incremental_vacuum;
131} -sqlbody {
132  ROLLBACK TO abc;
133}
134
135
136finish_test
137