1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/persistentdata/persistentstorage/sqlite3api/TEST/TclScript/pagesize.test Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,193 @@
1.4 +# 2004 September 2
1.5 +#
1.6 +# The author disclaims copyright to this source code. In place of
1.7 +# a legal notice, here is a blessing:
1.8 +#
1.9 +# May you do good and not evil.
1.10 +# May you find forgiveness for yourself and forgive others.
1.11 +# May you share freely, never taking more than you give.
1.12 +#
1.13 +#***********************************************************************
1.14 +# This file implements regression tests for SQLite library.
1.15 +# This file implements tests for the page_size PRAGMA.
1.16 +#
1.17 +# $Id: pagesize.test,v 1.13 2008/08/26 21:07:27 drh Exp $
1.18 +
1.19 +
1.20 +set testdir [file dirname $argv0]
1.21 +source $testdir/tester.tcl
1.22 +
1.23 +# This test script depends entirely on "PRAGMA page_size". So if this
1.24 +# pragma is not available, omit the whole file.
1.25 +ifcapable !pager_pragmas {
1.26 + finish_test
1.27 + return
1.28 +}
1.29 +
1.30 +do_test pagesize-1.1 {
1.31 + execsql {PRAGMA page_size}
1.32 +} 1024
1.33 +ifcapable {explain} {
1.34 + do_test pagesize-1.2 {
1.35 + catch {execsql {EXPLAIN PRAGMA page_size}}
1.36 + } 0
1.37 +}
1.38 +do_test pagesize-1.3 {
1.39 + execsql {
1.40 + CREATE TABLE t1(a);
1.41 + PRAGMA page_size=2048;
1.42 + PRAGMA page_size;
1.43 + }
1.44 +} 1024
1.45 +
1.46 +do_test pagesize-1.4 {
1.47 + db close
1.48 + file delete -force test.db
1.49 + sqlite3 db test.db
1.50 + execsql {
1.51 + PRAGMA page_size=511;
1.52 + PRAGMA page_size;
1.53 + }
1.54 +} 1024
1.55 +do_test pagesize-1.5 {
1.56 + execsql {
1.57 + PRAGMA page_size=512;
1.58 + PRAGMA page_size;
1.59 + }
1.60 +} 512
1.61 +if {![info exists SQLITE_MAX_PAGE_SIZE] || $SQLITE_MAX_PAGE_SIZE>=8192} {
1.62 + do_test pagesize-1.6 {
1.63 + execsql {
1.64 + PRAGMA page_size=8192;
1.65 + PRAGMA page_size;
1.66 + }
1.67 + } 8192
1.68 + do_test pagesize-1.7 {
1.69 + execsql {
1.70 + PRAGMA page_size=65537;
1.71 + PRAGMA page_size;
1.72 + }
1.73 + } 8192
1.74 + do_test pagesize-1.8 {
1.75 + execsql {
1.76 + PRAGMA page_size=1234;
1.77 + PRAGMA page_size
1.78 + }
1.79 + } 8192
1.80 +}
1.81 +foreach PGSZ {512 2048 4096 8192} {
1.82 + if {[info exists SQLITE_MAX_PAGE_SIZE]
1.83 + && $SQLITE_MAX_PAGE_SIZE<$PGSZ} continue
1.84 + ifcapable memorydb {
1.85 + do_test pagesize-2.$PGSZ.0.1 {
1.86 + db close
1.87 + sqlite3 db :memory:
1.88 + execsql "PRAGMA page_size=$PGSZ;"
1.89 + execsql {PRAGMA page_size}
1.90 + } $PGSZ
1.91 + do_test pagesize-2.$PGSZ.0.2 {
1.92 + execsql {CREATE TABLE t1(x UNIQUE, y UNIQUE, z UNIQUE)}
1.93 + execsql {PRAGMA page_size}
1.94 + } $PGSZ
1.95 + do_test pagesize-2.$PGSZ.0.3 {
1.96 + execsql {
1.97 + INSERT INTO t1 VALUES(1,2,3);
1.98 + INSERT INTO t1 VALUES(2,3,4);
1.99 + SELECT * FROM t1;
1.100 + }
1.101 + } {1 2 3 2 3 4}
1.102 + }
1.103 + do_test pagesize-2.$PGSZ.1 {
1.104 + db close
1.105 + file delete -force test.db
1.106 + sqlite3 db test.db
1.107 + execsql "PRAGMA page_size=$PGSZ"
1.108 + execsql {
1.109 + CREATE TABLE t1(x);
1.110 + PRAGMA page_size;
1.111 + }
1.112 + } $PGSZ
1.113 + do_test pagesize-2.$PGSZ.2 {
1.114 + db close
1.115 + sqlite3 db test.db
1.116 + execsql {
1.117 + PRAGMA page_size
1.118 + }
1.119 + } $PGSZ
1.120 + do_test pagesize-2.$PGSZ.3 {
1.121 + file size test.db
1.122 + } [expr {$PGSZ*($AUTOVACUUM?3:2)}]
1.123 + ifcapable {vacuum} {
1.124 + do_test pagesize-2.$PGSZ.4 {
1.125 + execsql {VACUUM}
1.126 + } {}
1.127 + }
1.128 + integrity_check pagesize-2.$PGSZ.5
1.129 + do_test pagesize-2.$PGSZ.6 {
1.130 + db close
1.131 + sqlite3 db test.db
1.132 + execsql {PRAGMA page_size}
1.133 + } $PGSZ
1.134 + do_test pagesize-2.$PGSZ.7 {
1.135 + execsql {
1.136 + INSERT INTO t1 VALUES(randstr(10,9000));
1.137 + INSERT INTO t1 VALUES(randstr(10,9000));
1.138 + INSERT INTO t1 VALUES(randstr(10,9000));
1.139 + BEGIN;
1.140 + INSERT INTO t1 SELECT x||x FROM t1;
1.141 + INSERT INTO t1 SELECT x||x FROM t1;
1.142 + INSERT INTO t1 SELECT x||x FROM t1;
1.143 + INSERT INTO t1 SELECT x||x FROM t1;
1.144 + SELECT count(*) FROM t1;
1.145 + }
1.146 + } 48
1.147 + do_test pagesize-2.$PGSZ.8 {
1.148 + execsql {
1.149 + ROLLBACK;
1.150 + SELECT count(*) FROM t1;
1.151 + }
1.152 + } 3
1.153 + integrity_check pagesize-2.$PGSZ.9
1.154 + do_test pagesize-2.$PGSZ.10 {
1.155 + db close
1.156 + sqlite3 db test.db
1.157 + execsql {PRAGMA page_size}
1.158 + } $PGSZ
1.159 + do_test pagesize-2.$PGSZ.11 {
1.160 + execsql {
1.161 + INSERT INTO t1 SELECT x||x FROM t1;
1.162 + INSERT INTO t1 SELECT x||x FROM t1;
1.163 + INSERT INTO t1 SELECT x||x FROM t1;
1.164 + INSERT INTO t1 SELECT x||x FROM t1;
1.165 + INSERT INTO t1 SELECT x||x FROM t1;
1.166 + INSERT INTO t1 SELECT x||x FROM t1;
1.167 + SELECT count(*) FROM t1;
1.168 + }
1.169 + } 192
1.170 + do_test pagesize-2.$PGSZ.12 {
1.171 + execsql {
1.172 + BEGIN;
1.173 + DELETE FROM t1 WHERE rowid%5!=0;
1.174 + SELECT count(*) FROM t1;
1.175 + }
1.176 + } 38
1.177 + do_test pagesize-2.$PGSZ.13 {
1.178 + execsql {
1.179 + ROLLBACK;
1.180 + SELECT count(*) FROM t1;
1.181 + }
1.182 + } 192
1.183 + integrity_check pagesize-2.$PGSZ.14
1.184 + do_test pagesize-2.$PGSZ.15 {
1.185 + execsql {DELETE FROM t1 WHERE rowid%5!=0}
1.186 + ifcapable {vacuum} {execsql VACUUM}
1.187 + execsql {SELECT count(*) FROM t1}
1.188 + } 38
1.189 + do_test pagesize-2.$PGSZ.16 {
1.190 + execsql {DROP TABLE t1}
1.191 + ifcapable {vacuum} {execsql VACUUM}
1.192 + } {}
1.193 + integrity_check pagesize-2.$PGSZ.17
1.194 +}
1.195 +
1.196 +finish_test