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