Return to createtab.test CVS log

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

Annotation of embedaddon/sqlite3/test/createtab.test, revision 1.1.1.1

1.1       misho       1: # 2007 May 02
                      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: # This file implements regression tests for SQLite library.  The
                     12: # focus of this file is testing that it is OK to create new tables
                     13: # and indices while creating existing tables and indices.
                     14: #
                     15: # $Id: createtab.test,v 1.3 2007/09/12 17:01:45 danielk1977 Exp $
                     16: 
                     17: set testdir [file dirname $argv0]
                     18: source $testdir/tester.tcl
                     19: 
                     20: ifcapable autovacuum {
                     21:   set upperBound 2
                     22: } else {
                     23:   set upperBound 0
                     24: }
                     25: 
                     26: # Run these tests for all possible values of autovacuum.
                     27: #
                     28: for {set av 0} {$av<=$upperBound} {incr av} {
                     29:   db close
                     30:   forcedelete test.db test.db-journal
                     31:   sqlite3 db test.db
                     32: 
                     33:   # Create a table that spans multiple pages.  It is important
                     34:   # that part of the database be in pages beyond the root page.
                     35:   #
                     36:   do_test createtab-$av.1 {
                     37:     execsql "PRAGMA auto_vacuum=$av"
                     38:     execsql {
                     39:       PRAGMA page_size=1024;
                     40:       CREATE TABLE t1(x INTEGER PRIMARY KEY, y);
                     41:       INSERT INTO t1 VALUES(1, hex(randomblob(200)));
                     42:       INSERT INTO t1 VALUES(2, hex(randomblob(200)));
                     43:       INSERT INTO t1 VALUES(3, hex(randomblob(200)));
                     44:       INSERT INTO t1 VALUES(4, hex(randomblob(200)));
                     45:       SELECT count(*) FROM t1;
                     46:     }
                     47:   } {4}
                     48: 
                     49:   set isUtf16 0
                     50:   ifcapable utf16 { 
                     51:     set isUtf16 [expr {[execsql {PRAGMA encoding}] != "UTF-8"}]
                     52:   }
                     53: 
                     54:   do_test createtab-$av.2 {
                     55:     file size test.db
                     56:   } [expr {1024*(4+($av!=0)+(${isUtf16}*2))}]
                     57:   
                     58:   # Start reading the table
                     59:   #
                     60:   do_test createtab-$av.3 {
                     61:     set STMT [sqlite3_prepare db {SELECT x FROM t1} -1 TAIL]
                     62:     sqlite3_step $STMT
                     63:   } {SQLITE_ROW}
                     64:   do_test createtab-$av.4 {
                     65:     sqlite3_column_int $STMT 0
                     66:   } {1}
                     67:   
                     68:   # While still reading the table, create a new table.
                     69:   #
                     70:   do_test createtab-$av.5 {
                     71:     execsql {
                     72:       CREATE TABLE t2(a,b);
                     73:       INSERT INTO t2 VALUES(1,2);
                     74:       SELECT * FROM t2;
                     75:     }
                     76:   } {1 2}
                     77:   
                     78:   # Continue reading the original table.
                     79:   #
                     80:   do_test createtab-$av.6 {
                     81:     sqlite3_column_int $STMT 0
                     82:   } {1}
                     83:   do_test createtab-$av.7 {
                     84:     sqlite3_step $STMT
                     85:   } {SQLITE_ROW}
                     86:   do_test createtab-$av.8 {
                     87:     sqlite3_column_int $STMT 0
                     88:   } {2}
                     89:   
                     90:   # Do another cycle of creating a new database table while contining
                     91:   # to read the original table.
                     92:   #
                     93:   do_test createtab-$av.11 {
                     94:     execsql {
                     95:       CREATE TABLE t3(a,b);
                     96:       INSERT INTO t3 VALUES(4,5);
                     97:       SELECT * FROM t3;
                     98:     }
                     99:   } {4 5}
                    100:   do_test createtab-$av.12 {
                    101:     sqlite3_column_int $STMT 0
                    102:   } {2}
                    103:   do_test createtab-$av.13 {
                    104:     sqlite3_step $STMT
                    105:   } {SQLITE_ROW}
                    106:   do_test createtab-$av.14 {
                    107:     sqlite3_column_int $STMT 0
                    108:   } {3}
                    109:   
                    110:   # One more cycle.
                    111:   #
                    112:   do_test createtab-$av.21 {
                    113:     execsql {
                    114:       CREATE TABLE t4(a,b);
                    115:       INSERT INTO t4 VALUES('abc','xyz');
                    116:       SELECT * FROM t4;
                    117:     }
                    118:   } {abc xyz}
                    119:   do_test createtab-$av.22 {
                    120:     sqlite3_column_int $STMT 0
                    121:   } {3}
                    122:   do_test createtab-$av.23 {
                    123:     sqlite3_step $STMT
                    124:   } {SQLITE_ROW}
                    125:   do_test createtab-$av.24 {
                    126:     sqlite3_column_int $STMT 0
                    127:   } {4}
                    128:   
                    129:   # Finish reading.  Do an integrity check on the database.
                    130:   #
                    131:   do_test createtab-$av.30 {
                    132:     sqlite3_step $STMT
                    133:   } {SQLITE_DONE}
                    134:   do_test createtab-$av.31 {
                    135:     sqlite3_finalize $STMT
                    136:   } {SQLITE_OK}
                    137:   do_test createtab-$av.32 {
                    138:     execsql {
                    139:       SELECT name FROM sqlite_master WHERE type='table' ORDER BY 1
                    140:     }
                    141:   } {t1 t2 t3 t4}
                    142:   integrity_check createtab-$av.40
                    143: 
                    144: }
                    145:   
                    146: finish_test