diff options
Diffstat (limited to 'test/repmgr006.tcl')
-rw-r--r-- | test/repmgr006.tcl | 43 |
1 files changed, 43 insertions, 0 deletions
diff --git a/test/repmgr006.tcl b/test/repmgr006.tcl new file mode 100644 index 00000000..d00a0525 --- /dev/null +++ b/test/repmgr006.tcl @@ -0,0 +1,43 @@ +# See the file LICENSE for redistribution information. +# +# Copyright (c) 2007-2009 Oracle. All rights reserved. +# +# $Id$ +# +# TEST repmgr006 +# TEST Basic repmgr test with bulk processing. +# 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 repmgr006 { method { niter 1000 } { tnum "006" } 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 bulk processing." + basic_repmgr_test $method $niter $tnum 0 0 0 1 0 $args +} + |