Home | History | Annotate | Download | only in test 
      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   file delete -force 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
    147