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