diff options
Diffstat (limited to 'db-4.8.30/test/repmgr004.tcl')
-rw-r--r-- | db-4.8.30/test/repmgr004.tcl | 43 |
1 files changed, 43 insertions, 0 deletions
diff --git a/db-4.8.30/test/repmgr004.tcl b/db-4.8.30/test/repmgr004.tcl new file mode 100644 index 0000000..4c8cc64 --- /dev/null +++ b/db-4.8.30/test/repmgr004.tcl @@ -0,0 +1,43 @@ +# See the file LICENSE for redistribution information. +# +# Copyright (c) 2007-2009 Oracle. All rights reserved. +# +# $Id$ +# +# TEST repmgr004 +# TEST Basic repmgr test with in-memory logs. +# TEST +# TEST Create an appointed master and two clients, process some records and +# TEST verify resulting databases. +# TEST +# TEST Run for btree only because access method shouldn't matter. +# TEST +proc repmgr004 { method { niter 100 } { tnum "004" } args } { + + source ./include.tcl + + if { $is_freebsd_test == 1 } { + puts "Skipping replication manager test on FreeBSD platform." + return + } + + if { $is_windows9x_test == 1 } { + puts "Skipping replication test on Win9x platform." + return + } + + # Skip for all methods except btree. + if { $checking_valid_methods } { + return btree + } + if { [is_btree $method] == 0 } { + puts "Repmgr$tnum: skipping for non-btree method $method." + return + } + + set args [convert_args $method $args] + + puts "Repmgr$tnum ($method): Basic repmgr test in-memory logs." + basic_repmgr_test $method $niter $tnum 0 1 0 0 0 $args +} + |