Annotation of embedaddon/sqlite3/test/server1.test, revision 1.1
1.1 ! misho 1: # 2006 January 09
! 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 script is testing the server mode of SQLite.
! 13: #
! 14: # This file is derived from thread1.test
! 15: #
! 16: # $Id: server1.test,v 1.5 2007/08/29 18:20:17 drh Exp $
! 17:
! 18:
! 19: set testdir [file dirname $argv0]
! 20: source $testdir/tester.tcl
! 21:
! 22: # Skip this whole file if the server testing code is not enabled
! 23: #
! 24: if {[llength [info command client_step]]==0 || [sqlite3 -has-codec]} {
! 25: finish_test
! 26: return
! 27: }
! 28:
! 29: # The sample server implementation does not work right when memory
! 30: # management is enabled.
! 31: #
! 32: ifcapable (memorymanage||mutex_noop) {
! 33: finish_test
! 34: return
! 35: }
! 36:
! 37: # Create some data to work with
! 38: #
! 39: do_test server1-1.1 {
! 40: execsql {
! 41: CREATE TABLE t1(a,b);
! 42: INSERT INTO t1 VALUES(1,'abcdefgh');
! 43: INSERT INTO t1 SELECT a+1, b||b FROM t1;
! 44: INSERT INTO t1 SELECT a+2, b||b FROM t1;
! 45: INSERT INTO t1 SELECT a+4, b||b FROM t1;
! 46: SELECT count(*), max(length(b)) FROM t1;
! 47: }
! 48: } {8 64}
! 49:
! 50: # Interleave two threads on read access. Then make sure a third
! 51: # thread can write the database. In other words:
! 52: #
! 53: # read-lock A
! 54: # read-lock B
! 55: # unlock A
! 56: # unlock B
! 57: # write-lock C
! 58: #
! 59: do_test server1-1.2 {
! 60: client_create A test.db
! 61: client_create B test.db
! 62: client_create C test.db
! 63: client_compile A {SELECT a FROM t1}
! 64: client_step A
! 65: client_result A
! 66: } SQLITE_ROW
! 67: do_test server1-1.3 {
! 68: client_argc A
! 69: } 1
! 70: do_test server1-1.4 {
! 71: client_argv A 0
! 72: } 1
! 73: do_test server1-1.5 {
! 74: client_compile B {SELECT b FROM t1}
! 75: client_step B
! 76: client_result B
! 77: } SQLITE_ROW
! 78: do_test server1-1.6 {
! 79: client_argc B
! 80: } 1
! 81: do_test server1-1.7 {
! 82: client_argv B 0
! 83: } abcdefgh
! 84: do_test server1-1.8 {
! 85: client_finalize A
! 86: client_result A
! 87: } SQLITE_OK
! 88: do_test server1-1.9 {
! 89: client_finalize B
! 90: client_result B
! 91: } SQLITE_OK
! 92: do_test server1-1.10 {
! 93: client_compile C {CREATE TABLE t2(x,y)}
! 94: client_step C
! 95: client_result C
! 96: } SQLITE_DONE
! 97: do_test server1-1.11 {
! 98: client_finalize C
! 99: client_result C
! 100: } SQLITE_OK
! 101: do_test server1-1.12 {
! 102: catchsql {SELECT name FROM sqlite_master}
! 103: execsql {SELECT name FROM sqlite_master}
! 104: } {t1 t2}
! 105:
! 106:
! 107: # Read from table t1. Do not finalize the statement. This
! 108: # will leave the lock pending.
! 109: #
! 110: do_test server1-2.1 {
! 111: client_halt *
! 112: client_create A test.db
! 113: client_compile A {SELECT a FROM t1}
! 114: client_step A
! 115: client_result A
! 116: } SQLITE_ROW
! 117:
! 118: # Read from the same table from another thread. This is allows.
! 119: #
! 120: do_test server1-2.2 {
! 121: client_create B test.db
! 122: client_compile B {SELECT b FROM t1}
! 123: client_step B
! 124: client_result B
! 125: } SQLITE_ROW
! 126:
! 127: # Write to a different table from another thread. This is allowed
! 128: # because in server mode with a shared cache we have table-level locking.
! 129: #
! 130: do_test server1-2.3 {
! 131: client_create C test.db
! 132: client_compile C {INSERT INTO t2 VALUES(98,99)}
! 133: client_step C
! 134: client_result C
! 135: client_finalize C
! 136: client_result C
! 137: } SQLITE_OK
! 138:
! 139: # But we cannot insert into table t1 because threads A and B have it locked.
! 140: #
! 141: do_test server1-2.4 {
! 142: client_compile C {INSERT INTO t1 VALUES(98,99)}
! 143: client_step C
! 144: client_result C
! 145: client_finalize C
! 146: client_result C
! 147: } SQLITE_LOCKED
! 148: do_test server1-2.5 {
! 149: client_finalize B
! 150: client_wait B
! 151: client_compile C {INSERT INTO t1 VALUES(98,99)}
! 152: client_step C
! 153: client_result C
! 154: client_finalize C
! 155: client_result C
! 156: } SQLITE_LOCKED
! 157:
! 158: # Insert into t1 is successful after finishing the other two threads.
! 159: do_test server1-2.6 {
! 160: client_finalize A
! 161: client_wait A
! 162: client_compile C {INSERT INTO t1 VALUES(98,99)}
! 163: client_step C
! 164: client_result C
! 165: client_finalize C
! 166: client_result C
! 167: } SQLITE_OK
! 168:
! 169: client_halt *
! 170: sqlite3_enable_shared_cache 0
! 171: finish_test
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to server1.test CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / sqlite3 / test