1# See the file LICENSE for redistribution information. 2# 3# Copyright (c) 2007-2009 Oracle. All rights reserved. 4# 5# $Id$ 6# 7# TEST repmgr003 8# TEST Basic repmgr internal init test. 9# TEST 10# TEST Start an appointed master site and two clients, processing 11# TEST transactions between each additional site. Verify all expected 12# TEST transactions are replicated. 13# TEST 14# TEST Run for btree only because access method shouldn't matter. 15# TEST 16proc repmgr003 { method { niter 100 } { tnum "003" } args } { 17 18 source ./include.tcl 19 20 if { $is_freebsd_test == 1 } { 21 puts "Skipping replication manager test on FreeBSD platform." 22 return 23 } 24 25 if { $is_windows9x_test == 1 } { 26 puts "Skipping replication test on Win9x platform." 27 return 28 } 29 30 # Skip for all methods except btree. 31 if { $checking_valid_methods } { 32 return btree 33 } 34 if { [is_btree $method] == 0 } { 35 puts "Repmgr$tnum: skipping for non-btree method $method." 36 return 37 } 38 39 set args [convert_args $method $args] 40 41 puts "Repmgr$tnum ($method): Basic repmgr internal init test." 42 basic_repmgr_init_test $method $niter $tnum 0 $args 43} 44