Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Add the ability to specify the initial journal mode for stress test database files. |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
b5c343a59ce73f6e9fd3c383c651cf9f |
User & Date: | mistachkin 2016-09-06 02:42:08.878 |
Context
2016-09-06
| ||
03:12 | Revisions to the previous check-in. check-in: 876e28e172 user: mistachkin tags: trunk | |
02:42 | Add the ability to specify the initial journal mode for stress test database files. check-in: b5c343a59c user: mistachkin tags: trunk | |
2016-09-05
| ||
21:22 | Correct the list of exlucded files for the normal source code archive package. check-in: c69251f90b user: mistachkin tags: trunk | |
Changes
Changes to Tests/stress.eagle.
︙ | ︙ | |||
69 70 71 72 73 74 75 | proc setupWorkloadFileDb { fileName varName } { # # NOTE: Skip attempting to delete the underlying database file. Also, # disable use of "PRAGMA temp_store_directory" when setting up # the new connection because it is not thread-safe. # | | | | 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 | proc setupWorkloadFileDb { fileName varName } { # # NOTE: Skip attempting to delete the underlying database file. Also, # disable use of "PRAGMA temp_store_directory" when setting up # the new connection because it is not thread-safe. # uplevel 1 [list setupDb $fileName $::journalMode "" "" "" "" true false \ false false $varName true] } ############################################################################# proc formatWorkloadResult { index } { set result [appendArgs "---- iterations for workload (" $index "): "] |
︙ | ︙ | |||
339 340 341 342 343 344 345 346 347 348 349 350 351 352 | set count(2) 200; # Workload iteration delay (milliseconds). set count(3) 57; # Workload "small" data chunk size, in bytes. set count(4) 10000; # Workload "big" data chunk size, in bytes. set count(5) 209715200; # Maximum heap memory to exclude at one time. set count(6) 15; # Workload auxiliary iteration count (within a run). set count(7) 100; # Workload auxiliary iteration delay (milliseconds). set count(8) 5000; # Workload auxiliary data value (for use by run). set noWorkload [list]; # Workloads to be omitted from the run, by index. set priorities [list]; # Dictionary of workload thread priorities. set exitOnFail false; # Halt testing and exit process on test failure? set coTaskMem true; # Use AllocCoTaskMem/FreeCoTaskMem for memory? set noTrace false; # Disable SQLite trace logging to a file? ############################################################################# | > | 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 | set count(2) 200; # Workload iteration delay (milliseconds). set count(3) 57; # Workload "small" data chunk size, in bytes. set count(4) 10000; # Workload "big" data chunk size, in bytes. set count(5) 209715200; # Maximum heap memory to exclude at one time. set count(6) 15; # Workload auxiliary iteration count (within a run). set count(7) 100; # Workload auxiliary iteration delay (milliseconds). set count(8) 5000; # Workload auxiliary data value (for use by run). set journalMode ""; # Initial journal mode for database files. set noWorkload [list]; # Workloads to be omitted from the run, by index. set priorities [list]; # Dictionary of workload thread priorities. set exitOnFail false; # Halt testing and exit process on test failure? set coTaskMem true; # Use AllocCoTaskMem/FreeCoTaskMem for memory? set noTrace false; # Disable SQLite trace logging to a file? ############################################################################# |
︙ | ︙ | |||
364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 | [list null MustHaveIntegerValue -1 -1 -count2 $count(2)] \ [list null MustHaveIntegerValue -1 -1 -count3 $count(3)] \ [list null MustHaveIntegerValue -1 -1 -count4 $count(4)] \ [list null MustHaveIntegerValue -1 -1 -count5 $count(5)] \ [list null MustHaveIntegerValue -1 -1 -count6 $count(6)] \ [list null MustHaveIntegerValue -1 -1 -count7 $count(7)] \ [list null MustHaveIntegerValue -1 -1 -count8 $count(8)] \ [list null MustHaveListValue -1 -1 -noWorkload $noWorkload] \ [list null MustHaveListValue -1 -1 -priorities $priorities] \ [list null MustHaveBooleanValue -1 -1 -exitOnFail $exitOnFail] \ [list null MustHaveBooleanValue -1 -1 -coTaskMem $coTaskMem] \ [list null MustHaveBooleanValue -1 -1 -noTrace $noTrace]] $argv set count(0) $options(-count0,value) set count(1) $options(-count1,value) set count(2) $options(-count2,value) set count(3) $options(-count3,value) set count(4) $options(-count4,value) set count(5) $options(-count5,value) set count(6) $options(-count6,value) set count(7) $options(-count7,value) set count(8) $options(-count8,value) set noWorkload $options(-noWorkload,value) set priorities $options(-priorities,value) set exitOnFail $options(-exitOnFail,value) set coTaskMem $options(-coTaskMem,value) set noTrace $options(-noTrace,value) } | > > | 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 | [list null MustHaveIntegerValue -1 -1 -count2 $count(2)] \ [list null MustHaveIntegerValue -1 -1 -count3 $count(3)] \ [list null MustHaveIntegerValue -1 -1 -count4 $count(4)] \ [list null MustHaveIntegerValue -1 -1 -count5 $count(5)] \ [list null MustHaveIntegerValue -1 -1 -count6 $count(6)] \ [list null MustHaveIntegerValue -1 -1 -count7 $count(7)] \ [list null MustHaveIntegerValue -1 -1 -count8 $count(8)] \ [list null MustHaveValue -1 -1 -journalMode $journalMode] \ [list null MustHaveListValue -1 -1 -noWorkload $noWorkload] \ [list null MustHaveListValue -1 -1 -priorities $priorities] \ [list null MustHaveBooleanValue -1 -1 -exitOnFail $exitOnFail] \ [list null MustHaveBooleanValue -1 -1 -coTaskMem $coTaskMem] \ [list null MustHaveBooleanValue -1 -1 -noTrace $noTrace]] $argv set count(0) $options(-count0,value) set count(1) $options(-count1,value) set count(2) $options(-count2,value) set count(3) $options(-count3,value) set count(4) $options(-count4,value) set count(5) $options(-count5,value) set count(6) $options(-count6,value) set count(7) $options(-count7,value) set count(8) $options(-count8,value) set journalMode $options(-journalMode,value) set noWorkload $options(-noWorkload,value) set priorities $options(-priorities,value) set exitOnFail $options(-exitOnFail,value) set coTaskMem $options(-coTaskMem,value) set noTrace $options(-noTrace,value) } |
︙ | ︙ | |||
472 473 474 475 476 477 478 479 480 481 482 483 484 485 | "---- workloads will have an auxiliary iteration delay of " \ $count(7) " millisecond(s)\n"] tputs $test_channel [appendArgs \ "---- workloads will have an auxiliary data value of " \ $count(8) \n] tputs $test_channel [appendArgs \ "---- workloads to be skipped... " \ [expr {[llength $noWorkload] > 0 ? $noWorkload : "none"}] \n] tputs $test_channel [appendArgs \ "---- workloads priority overrides... " \ [expr {[llength $priorities] > 0 ? $priorities : "none"}] \n] | > > > > | 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 | "---- workloads will have an auxiliary iteration delay of " \ $count(7) " millisecond(s)\n"] tputs $test_channel [appendArgs \ "---- workloads will have an auxiliary data value of " \ $count(8) \n] tputs $test_channel [appendArgs \ "---- the initial journal mode is " \ [expr {[llength $journalMode] > 0 ? $journalMode : "none"}] \n] tputs $test_channel [appendArgs \ "---- workloads to be skipped... " \ [expr {[llength $noWorkload] > 0 ? $noWorkload : "none"}] \n] tputs $test_channel [appendArgs \ "---- workloads priority overrides... " \ [expr {[llength $priorities] > 0 ? $priorities : "none"}] \n] |
︙ | ︙ | |||
1640 1641 1642 1643 1644 1645 1646 | cleanupLogging $logFileName } rename cleanupLogging "" rename setupLogging "" unset -nocomplain result thread index workload priority noWorkload \ | | | > | | 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 | cleanupLogging $logFileName } rename cleanupLogging "" rename setupLogging "" unset -nocomplain result thread index workload priority noWorkload \ journalMode priorities srcDb db fileName compiled options count \ times logFileName logListener event timeout connection \ indicators iterations exitOnFail coTaskMem noTrace failures \ status workloadNames workloadCallbacks } -time true -constraints {eagle command.object monoBug40 command.sql\ compile.DATA SQLite System.Data.SQLite compileCSharp} -result {0}} ############################################################################### # # NOTE: Report after test. |
︙ | ︙ |