From: danielk1977 Date: Sat, 12 Jul 2008 15:55:54 +0000 (+0000) Subject: Fix the test script --binarylog option. (CVS 5401) X-Git-Tag: version-3.6.10~776 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=185eac95b6231abe4afe440c86684fe8f49ab5a1;p=thirdparty%2Fsqlite.git Fix the test script --binarylog option. (CVS 5401) FossilOrigin-Name: 03e3cfc4ccab3c6441d41ade175dc041b8fa6c98 --- diff --git a/manifest b/manifest index 24b2e09ce9..c03bd1921b 100644 --- a/manifest +++ b/manifest @@ -1,5 +1,5 @@ -C Remove\sleftover\sdebugging\scommands\s(breakpoint\sand\sbtree_breakpoint)\sfrom\ntest\sscripts.\s(CVS\s5400) -D 2008-07-12T14:52:20 +C Fix\sthe\stest\sscript\s--binarylog\soption.\s(CVS\s5401) +D 2008-07-12T15:55:55 F Makefile.arm-wince-mingw32ce-gcc fcd5e9cd67fe88836360bb4f9ef4cb7f8e2fb5a0 F Makefile.in a03f7cb4f7ad50bc53a788c6c544430e81f95de4 F Makefile.linux-gcc d53183f4aa6a9192d249731c90dbdffbd2c68654 @@ -170,7 +170,7 @@ F src/test_malloc.c e655e3ff61845fc23886ee81973638e795477c9e F src/test_md5.c 28209a4e2068711b5443c33104fe41f21d160071 F src/test_mutex.c 86a937f5d28f373b8495faf1347a9d0a306594d4 F src/test_onefile.c 243157b10275251c5dc2d6619aee2ff9ae22379c -F src/test_osinst.c 867f1317bd135f942a63eab5a78da40fc70d1493 +F src/test_osinst.c 49d777e6129bead1726e316e83751be35f455acc F src/test_schema.c 4b4bf7bb329326458c491b0e6facd4c8c4c5b479 F src/test_server.c f0a403b5f699c09bd2b1236b6f69830fd6221f6b F src/test_tclvar.c 73530070df8378571c8ce6bbbbb993236ae3ad0b @@ -223,7 +223,7 @@ F test/blob.test 2a38d867bdf08f9ce081776acec1ac8d4bca66be F test/busy.test 76b4887f8b9160ba903c1ac22e8ff406ad6ae2f0 F test/cache.test 3ff445c445742a7b6b9ba6e1d62a25263f9424b9 F test/capi2.test cc64df7560a96f848f919ea2926c60acf639684b -F test/capi3.test b92ba9a889def7578da553b1a36f92b147244579 +F test/capi3.test ffc1156d1f28738eb335df0b88dd294bb3c94c27 F test/capi3b.test 664eb55318132f292f2c436f90906f578cad6b97 F test/capi3c.test 208713e5f3a63442c3574c55b83baa7cf8ac5f28 F test/capi3d.test 537de3a1f724862e327e02bb21b4a84f185dc1e2 @@ -419,7 +419,7 @@ F test/misc5.test 0b68dcb630d44af2dbcdca94dd2b17c8d580f6fa F test/misc6.test 953cc693924d88e6117aeba16f46f0bf5abede91 F test/misc7.test b0d80b95dc2b46ce417cf3e06bfff18166e55181 F test/misuse.test 30b3a458e5a70c31e74c291937b6c82204c59f33 -F test/mutex1.test b0017a45203e92ddab9e27cc3d6bd5c8637925ac +F test/mutex1.test c4fed76ad88646e6cfab0435fd89f5fc72da4dde F test/mutex2.test dce072fe922afaf193de0069ac570d3f15fa011b F test/nan.test 14c41572ff52dbc740b1c3303dd313a90dc6084c F test/notnull.test 44d600f916b770def8b095a9962dbe3be5a70d82 @@ -485,7 +485,7 @@ F test/tableapi.test a669ae9dd3bc8e7a6f74eff003664801667cf4c2 F test/tclsqlite.test aa1781808502271feccfd24f9e2c0d2c1d7c496a F test/tempdb.test b88ac8a19823cf771d742bf61eef93ef337c06b1 F test/temptable.test 19b851b9e3e64d91e9867619b2a3f5fffee6e125 -F test/tester.tcl 3a121e1a03b29376057b3dfff429ad4f373cd0c3 +F test/tester.tcl de507ef0412c8dd9a82cd853964caffa71acbc01 F test/thread001.test 3fb08080e1fe84d1bb7ec7bbc9e13743a77e5bc5 F test/thread002.test ed9b800460df01e3cf9428ee11dc4e3f04b9b896 F test/thread1.test 776c9e459b75ba905193b351926ac4019b049f35 @@ -605,7 +605,7 @@ F tool/speedtest16.c c8a9c793df96db7e4933f0852abb7a03d48f2e81 F tool/speedtest2.tcl ee2149167303ba8e95af97873c575c3e0fab58ff F tool/speedtest8.c 1dbced29de5f59ba2ebf877edcadf171540374d1 F tool/speedtest8inst1.c 293327bc76823f473684d589a8160bde1f52c14e -P c80a5d09935c60a2a50bc262c172a94073355f0d -R 4ecb2580e4a853826fb4fa1ac5c915ee -U drh -Z 7ad634a4c18eb92cdbc19f19fa25b073 +P dcb160249fa2d592ad09b8b0052102dc44a93511 +R 710dd56994c44964337f17483893049d +U danielk1977 +Z 8c0bccde1c33db0df30307b242744816 diff --git a/manifest.uuid b/manifest.uuid index ed60718977..53a1facf3f 100644 --- a/manifest.uuid +++ b/manifest.uuid @@ -1 +1 @@ -dcb160249fa2d592ad09b8b0052102dc44a93511 \ No newline at end of file +03e3cfc4ccab3c6441d41ade175dc041b8fa6c98 \ No newline at end of file diff --git a/src/test_osinst.c b/src/test_osinst.c index 753273bd46..c2230786f3 100644 --- a/src/test_osinst.c +++ b/src/test_osinst.c @@ -14,7 +14,7 @@ ** adds instrumentation to all vfs and file methods. C and Tcl interfaces ** are provided to control the instrumentation. ** -** $Id: test_osinst.c,v 1.16 2008/06/12 12:40:14 drh Exp $ +** $Id: test_osinst.c,v 1.17 2008/07/12 15:55:55 danielk1977 Exp $ */ /* @@ -714,7 +714,7 @@ static void binarylog_blob( return; } pLog = (InstVfsBinaryLog *)pInstVfs->pClient; - if( !isBinary || pLog->log_data ){ + if( zBlob && (!isBinary || pLog->log_data) ){ unsigned char *zRec; int nWrite; diff --git a/test/capi3.test b/test/capi3.test index 71599810e9..5ac748750e 100644 --- a/test/capi3.test +++ b/test/capi3.test @@ -11,7 +11,7 @@ # This file implements regression tests for SQLite library. The # focus of this script testing the callback-free C/C++ API. # -# $Id: capi3.test,v 1.66 2008/07/07 13:32:00 drh Exp $ +# $Id: capi3.test,v 1.67 2008/07/12 15:55:55 danielk1977 Exp $ # set testdir [file dirname $argv0] @@ -1186,11 +1186,13 @@ do_test capi3-19.1 { # Tests of the interface when no VFS is registered. # -db close -vfs_unregister_all -do_test capi3-20.1 { - sqlite3_sleep 100 -} {0} -vfs_reregister_all +if {![info exists tester_do_binarylog]} { + db close + vfs_unregister_all + do_test capi3-20.1 { + sqlite3_sleep 100 + } {0} + vfs_reregister_all +} finish_test diff --git a/test/mutex1.test b/test/mutex1.test index 9a72d705df..1769e7367b 100644 --- a/test/mutex1.test +++ b/test/mutex1.test @@ -9,10 +9,16 @@ # #*********************************************************************** # -# $Id: mutex1.test,v 1.8 2008/07/10 17:52:49 danielk1977 Exp $ +# $Id: mutex1.test,v 1.9 2008/07/12 15:55:55 danielk1977 Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl + +if {[info exists tester_do_binarylog]} { + finish_test + return +} + sqlite3_reset_auto_extension proc mutex_counters {varname} { diff --git a/test/tester.tcl b/test/tester.tcl index 009f36b193..3b4c1c136b 100644 --- a/test/tester.tcl +++ b/test/tester.tcl @@ -11,7 +11,7 @@ # This file implements some common TCL routines used for regression # testing the SQLite library # -# $Id: tester.tcl,v 1.131 2008/07/11 16:15:18 drh Exp $ +# $Id: tester.tcl,v 1.132 2008/07/12 15:55:55 danielk1977 Exp $ # # What for user input before continuing. This gives an opportunity @@ -94,12 +94,7 @@ for {set i 0} {$i<[llength $argv]} {incr i} { } if {[lindex $argv $i] eq "--binarylog"} { set tester_do_binarylog 1 - - # sqlite3_simulate_device -char safe_append - # sqlite3_instvfs binarylog -default -parent devsym binarylog ostrace.bin - sqlite3_instvfs binarylog -default binarylog ostrace.bin set argv [lreplace $argv $i $i] - sqlite3_instvfs marker binarylog "$argv0 $argv" } } @@ -137,6 +132,10 @@ if {![info exists nTest]} { sqlite3_shutdown install_malloc_faultsim 1 sqlite3_initialize + if {[info exists tester_do_binarylog]} { + sqlite3_instvfs binarylog -default binarylog ostrace.bin + sqlite3_instvfs marker binarylog "$argv0 $argv" + } } catch {db close} file delete -force test.db