1: # 2008 September 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: # This file is focused on testing the pcache module.
13: #
14: # $Id: pcache2.test,v 1.1.1.1 2012/02/21 17:04:16 misho Exp $
15:
16: set testdir [file dirname $argv0]
17: source $testdir/tester.tcl
18:
19: # Set up a pcache memory pool so that we can easily track how many
20: # pages are being used for cache.
21: #
22: do_test pcache2-1.1 {
23: db close
24: sqlite3_reset_auto_extension
25: sqlite3_shutdown
26: sqlite3_config_pagecache 6000 100
27: sqlite3_initialize
28: autoinstall_test_functions
29: sqlite3_status SQLITE_STATUS_PAGECACHE_USED 1
30: sqlite3_status SQLITE_STATUS_PAGECACHE_USED 0
31: } {0 0 0}
32:
33: # Open up two database connections to separate files.
34: #
35: do_test pcache2-1.2 {
36: forcedelete test.db test.db-journal
37: sqlite3 db test.db
38: db eval {PRAGMA cache_size=10}
39: lindex [sqlite3_status SQLITE_STATUS_PAGECACHE_USED 0] 1
40: } {2}
41: do_test pcache2-1.3 {
42: forcedelete test2.db test2.db-journal
43: sqlite3 db2 test2.db
44: db2 eval {PRAGMA cache_size=50}
45: lindex [sqlite3_status SQLITE_STATUS_PAGECACHE_USED 0] 1
46: } {4}
47:
48:
49: # Make lots of changes on the first connection. Verify that the
50: # page cache usage does not grow to consume the page space set aside
51: # for the second connection.
52: #
53: do_test pcache2-1.4 {
54: db eval {
55: CREATE TABLE t1(a,b);
56: CREATE TABLE t2(x,y);
57: INSERT INTO t1 VALUES(1, zeroblob(800));
58: INSERT INTO t1 VALUES(2, zeroblob(800));
59: INSERT INTO t2 SELECT * FROM t1;
60: INSERT INTO t1 SELECT x+2, y FROM t2;
61: INSERT INTO t2 SELECT a+10, b FROM t1;
62: INSERT INTO t1 SELECT x+10, y FROM t2;
63: INSERT INTO t2 SELECT a+100, b FROM t1;
64: INSERT INTO t1 SELECT x+100, y FROM t2;
65: INSERT INTO t2 SELECT a+1000, b FROM t1;
66: INSERT INTO t1 SELECT x+1000, y FROM t2;
67: }
68: sqlite3_status SQLITE_STATUS_PAGECACHE_USED 0
69: } {0 13 13}
70:
71: db close
72: catch {db2 close}
73: sqlite3_reset_auto_extension
74: sqlite3_shutdown
75: sqlite3_config_pagecache 0 0
76: sqlite3_initialize
77: autoinstall_test_functions
78:
79: finish_test
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>