Searched refs:tnum (Results 1 - 25 of 190) sorted by relevance

12345678

/macosx-10.10.1/BerkeleyDB-21/db/test/
H A Ddead007.tcl9 proc dead007 { {tnum "007"} } {
16 puts "Dead$tnum.a -- wrap around"
18 dead001 "2 10" "ring clump" "0" $tnum
21 dead004 $tnum
23 puts "Dead$tnum.b -- extend space"
26 dead001 "4 10" "ring clump" "0" $tnum
29 dead004 $tnum
H A Ddead006.tcl10 {timeout 1000} {tnum 006} } {
13 dead001 $procs $tests $timeout $tnum
14 dead002 $procs $tests $timeout $tnum
H A Dtest069.tcl11 proc test069 { method {ndups 50} {tnum "069"} args } {
12 eval test067 $method $ndups $tnum $args
H A Dtest081.tcl10 proc test081 { method {ndups 13} {tnum "081"} args} {
13 eval {test017 $method 1 $ndups $tnum} $args
H A Dtest007.tcl16 proc test007 { method {nentries 10000} {tnum "007"} {ndups 5} args} {
17 eval {test006 $method $nentries 1 $tnum $ndups} $args
H A Dtest082.tcl9 proc test082 { method {dir -prevnodup} {nitems 100} {tnum "082"} args} {
12 eval {test074 $method $dir $nitems $tnum} $args
H A Dtest090.tcl9 proc test090 { method {nentries 10000} {tnum "090"} args} {
11 puts "Skipping test$tnum for $method."
14 eval {test001 $method $nentries 4294967000 0 $tnum} $args
H A Dtest100.tcl10 proc test100 { method {nentries 10000} {tnum "100"} args} {
12 puts "Skipping test$tnum for $method."
15 eval {test025 $method $nentries 4294967000 $tnum} $args
H A Dtest091.tcl10 {nproducers 2} {nitems 1000} {start 0 } {tnum "091"} args} {
12 puts "Skipping test0$tnum for $method."
16 $nconsumers $nproducers $nitems WAIT $start -txn $tnum } $args
18 $nconsumers $nproducers $nitems WAIT $start -cdb $tnum } $args
H A Dtest071.tcl11 {mode CONSUME} {start 0 } {txn -txn} {tnum "071"} args } {
14 $nconsumers $nproducers $nitems $mode $start $txn $tnum $args
H A Dtest079.tcl13 proc test079 { method {nentries 10000} {pagesize 512} {tnum "079"} \
22 puts "Test$tnum: skipping for specific pagesizes"
26 eval {test006 $method $nentries 1 $tnum $ndups -pagesize \
H A Dtest101.tcl10 proc test101 { method {nentries 1000} {txn -txn} {tnum "101"} args} {
12 puts "Skipping test$tnum for $method."
15 eval {test070 $method 4 2 $nentries WAIT 4294967000 $txn $tnum} $args
H A Denv012.tcl34 set tnum "012"
36 puts "Env$tnum: Test of DB_REGISTER."
38 puts "\tEnv$tnum.a: Platforms without fcntl fail with DB_OPNOTSUP."
43 puts "Skipping env$tnum; DB_REGISTER is not supported."
47 puts "\tEnv$tnum.b: Second process can join with -register."
53 puts "\t\tEnv$tnum.b1: Start process 1."
55 $testdir/env$tnum.log.p1 \
61 puts "\t\tEnv$tnum.b2: Start process 2."
63 $testdir/env$tnum.log.p2 \
70 logcheck $testdir/env$tnum
[all...]
H A Dtest095.tcl9 proc test095 { method {tnum "095"} args } {
23 set basename $testdir/test$tnum
29 set basename test$tnum
42 puts "Test$tnum: $method ($args) Bulk get test"
48 puts "Test$tnum skipping for QNX"
52 puts "Test$tnum skipping for method $method"
74 puts "\tTest$tnum.a:\
104 t95_gettest $db $tnum b $smallbuf 1
106 puts "Skipping small buffer test Test$tnum.b"
108 t95_gettest $db $tnum
[all...]
H A Dtxn001.tcl9 proc txn001 { {tnum "001"} { max 1024 } { ntxns 50 } } {
14 puts -nonewline "Txn$tnum: Basic begin, commit, abort"
16 if { $tnum != "001"} {
30 txn001_suba $ntxns $env $tnum
31 txn001_subb $ntxns $env $tnum
32 txn001_subc $ntxns $env $tnum
37 proc txn001_suba { ntxns env tnum } {
43 puts "\tTxn$tnum.a: Beginning/Committing $ntxns Transactions in $env"
62 proc txn001_subb { ntxns env tnum } {
66 puts "\tTxn$tnum
[all...]
H A Dtest084.tcl9 proc test084 { method {nentries 10000} {tnum "084"} {pagesize 65536} args} {
18 set testfile $testdir/test$tnum-empty.db
21 set testfile test$tnum-empty.db
41 eval {test001 $method $nentries 0 0 $tnum} $args
H A Dtest102.tcl9 proc test102 { method {nsets 1000} {tnum "102"} args } {
15 puts "Test$tnum skipping for method $method"
25 set basename $testdir/test$tnum
31 set basename test$tnum
44 puts "Test$tnum: $method ($args) Bulk get test"
47 puts "\tTest$tnum.a: Creating $method database\
72 t102_gettest $db $tnum b $smallbuf 1
74 puts "Skipping Test$tnum.b for small pagesize."
76 t102_gettest $db $tnum c $bigbuf 0
80 t102_gettest $db $tnum
[all...]
H A Ddead003.tcl11 proc dead003 { {procs "2 4 10"} {tests "ring clump"} {tnum "003"} } {
17 puts "Dead$tnum: Deadlock detector tests: $detects"
22 puts "\tDead$tnum.a: creating environment for $d"
36 puts "\tDead$tnum: $n procs of test $t"
42 $testdir/dead$tnum.log.$i"
46 $testdir/dead$tnum.log.$i $testdir \
57 set did [open $testdir/dead$tnum.log.$i]
67 puts "\tDead$tnum: dead check..."
74 puts "\tDead$tnum: Verify $d locks were aborted"
82 set did [open $testdir/dead$tnum
[all...]
H A Dplat001.tcl15 proc plat001 { method {tnum "001"} args } {
30 set testfile $testdir/plat$tnum.db
31 set testdump $testdir/plat$tnum.dmp
34 set testfile plat$tnum.db
35 set testdump plat$tnum.dmp
51 puts "\tPlat$tnum.a: Create $method db with a sequence."
65 puts "\tPlat$tnum.b: Dump the db."
70 puts "\tPlat$tnum.c: Delete the db."
H A Dconscript.tcl8 # Usage: conscript dir file runtype nitems outputfile tnum args
14 # tnum: test number
16 proc consumescript_produce { db_cmd nitems tnum args } {
21 puts "\tTest$tnum: Producer $pid starting, producing $nitems items."
42 puts "\t\tTest$tnum: Producer $pid finished."
45 proc consumescript_consume { db_cmd nitems tnum outputfile mode args } {
49 puts "\tTest$tnum: Consumer $pid starting, seeking $nitems items."
73 puts "\t\tTest$tnum: Consumer $pid finished."
85 set usage "conscript.tcl dir file runtype nitems outputfile tnum"
93 set tnum [linde
[all...]
H A Ddead004.tcl22 proc dead004 { {tnum "004"} } {
28 puts "Dead$tnum: Deadlock detector test -a $a"
32 puts "\tDead$tnum.a: creating environment"
49 puts "\tDead$tnum: $n procs"
53 $testdir/dead$tnum.log.$i \
57 ddoyscript.tcl $testdir/dead$tnum.log.$i \
69 set did [open $testdir/dead$tnum.log.$i]
81 puts "\tDead$tnum: dead check..."
86 set did [open $testdir/dead$tnum.log.0]
91 set did [open $testdir/dead$tnum
[all...]
H A Ddead001.tcl13 {timeout 0} {tnum "001"} } {
18 puts "Dead$tnum: Deadlock detector tests"
23 puts "\tDead$tnum.a: creating environment"
44 puts "\tDead$tnum: $n procs of test $t"
48 ddscript.tcl $testdir/dead$tnum.log.$i \
51 ddscript.tcl $testdir/dead$tnum.log.$i \
62 set did [open $testdir/dead$tnum.log.$i]
73 puts "\tDead$tnum: dead check..."
83 fileremove -f $testdir/dead$tnum.log.$i
H A Ddead002.tcl11 {timeout 0} {tnum 002} } {
14 puts "Dead$tnum: Deadlock detector tests (detect on every collision)"
19 puts "\tDead$tnum.a: creating environment"
35 puts "\tDead$tnum: $n procs of test $t"
39 ddscript.tcl $testdir/dead$tnum.log.$i \
42 ddscript.tcl $testdir/dead$tnum.log.$i \
58 set did [open $testdir/dead$tnum.log.$i]
69 puts "\tDead$tnum: dead check ..."
77 fileremove -f $testdir/dead$tnum.log.$i
H A Dlog008.tcl14 set tnum "008"
16 puts "Log$tnum: Checkpoint test with records spanning log files."
25 puts "\tLog$tnum.a: Spawning child tclsh."
31 puts "\tLog$tnum.b: Child is done."
34 puts "\tLog$tnum.c: Join abandoned child env with recovery."
H A Drep077.tcl17 proc rep077 { method { tnum "077"} args} {
34 puts "Rep$tnum ($method):\
36 puts "Rep$tnum: Master logs are [lindex $l 0]"
37 puts "Rep$tnum: Client logs are [lindex $l 1]"
38 rep077_sub $method $tnum $l $args
42 proc rep077_sub { method tnum logset largs} {
90 puts "\tRep$tnum.a: Start up master and client."
95 puts "\tRep$tnum.b: Close client."
105 puts "\tRep$tnum.c: Run rep_test on master with client closed."
122 puts "\tRep$tnum
[all...]

Completed in 103 milliseconds

12345678